Description: <short summary of the patch>
 TODO: Put a short summary on the line above and replace this paragraph
 with a longer explanation of this change. Complete the meta-information
 with other relevant fields (see below for details). To make it easier, the
 information below has been extracted from the changelog. Adjust it or drop
 it.
 .
 gcl27 (2.7.0-7) unstable; urgency=medium
 .
   * Version_2_7_0pre10
Author: Camm Maguire <camm@debian.org>

---
The information above should follow the Patch Tagging Guidelines, please
checkout https://dep.debian.net/deps/dep3/ to learn about the format. Here
are templates for supplementary fields that you might want to add:

Origin: (upstream|backport|vendor|other), (<patch-url>|commit:<commit-id>)
Bug: <upstream-bugtracker-url>
Bug-Debian: https://bugs.debian.org/<bugnumber>
Bug-Ubuntu: https://launchpad.net/bugs/<bugnumber>
Forwarded: (no|not-needed|<patch-forwarded-url>)
Applied-Upstream: <version>, (<commit-url>|commit:<commid-id>)
Reviewed-By: <name and email of someone who approved/reviewed the patch>
Last-Update: 2024-01-27

--- gcl27-2.7.0.orig/cmpnew/gcl_cmpblock.lsp
+++ gcl27-2.7.0/cmpnew/gcl_cmpblock.lsp
@@ -59,10 +59,7 @@
   (ref-obs form blks 
 	   (lambda (x) (setf (blk-ref-ccb x) t))
 	   (lambda (x) (setf (blk-ref-clb x) t))
-	   (lambda (x) (setf (blk-ref x) t))
-	   'blk-name
-	   "Blk"
-	   (lambda (x &aux (y (pop x))) (when (eq y 'return-from) (cdr x)))))
+	   (lambda (x) (setf (blk-ref x) t))))
 
 ;; (defun ref-blks1 (form blks &aux (i (cadr form)))
 ;;   (dolist (blk blks)
@@ -103,10 +100,10 @@
 ;; 	   (ref-blks (cdddr form) blks l)));FIXME?
 ;; 	(t (ref-blks (car form) blks l) (ref-blks (cdr form) blks l))))
 
-(defun prune-mch (l)
+(defun prune-mch (l &optional tag-conflict-p)
   (remove-if (lambda (x &aux (v (pop x))(tp (pop x))(st (pop x))(m (car x)))
-	       (and (type>= (type-and (var-dt v) tp) (var-type v))
-		    (subsetp st (var-store v))
+	       (and (type<= (var-type v) tp)
+		    (or (when tag-conflict-p (cdr st)) (subsetp (var-store v) st))
 		    (if m (equal tp m) t)))
 	     l))
 
@@ -122,15 +119,15 @@
   (let* ((blk (make-blk :name (car args) :ref nil :ref-ccb nil :ref-clb nil :exit *c1exit*
 			:var (mapcan (lambda (x) (when (var-p x) (list (list x nil nil nil)))) *vars*)))
          (body (let ((*blocks* (cons blk *blocks*))) (c1progn (cdr args)))))
+    (when (info-type (cadr body))
+      (or-mch (prune-mch (blk-var blk))))
     (labels ((nb (b) (if (and (eq (car b) 'return-from) (eq blk (caddr b))) (nb (seventh b)) b)))
       (setq body (nb body)))
     (add-info info (cadr body))
     (setf (info-type info) (type-or1 (info-type (cadr body)) (blk-type blk)))
-    (when (info-type (cadr body))
-      (or-mch (prune-mch (blk-var blk))))
     (ref-blks body (list blk))
     (when (or (blk-ref-ccb blk) (blk-ref-clb blk))
-      (incf *setjmps*))
+      (set-volatile info))
     (mapc (lambda (x &aux (y x)(v (pop x))(tp (pop x))(st (pop x))(m (car x))
 		       (tp (type-and tp (var-dt v))));FIXME, unnecessary?
 	    (unless (and (si::type= tp (var-type v))
@@ -224,7 +221,7 @@
   (setf (blk-exit blk) *exit*)
   (setf (blk-value-to-go blk) *value-to-go*)
   (setf (blk-ref-clb blk) (vs-push))
-  (setf (blk-var blk) (add-symbol (blk-name blk)))
+  (setf (blk-var blk) (blk-name blk))
   (wt-nl) (wt-vs (blk-ref-clb blk)) (wt "=alloc_frame_id();")
   (wt-nl)
   (clink (blk-ref-clb blk))
--- gcl27-2.7.0.orig/cmpnew/gcl_cmpcall.lsp
+++ gcl27-2.7.0/cmpnew/gcl_cmpcall.lsp
@@ -336,7 +336,7 @@
 
 (defun insufficient-arg-str (fnstr nreq nsup sig st
 				   &aux (sig (if st sig (cons '(*) (cdr sig)))) ;(st nil)(nreq 0)
-				   (fnstr (or fnstr (ms (vv-str (add-object 'wrong-number-args)) "->s.s_gfdef"))))
+				   (fnstr (or fnstr (ms (vv-str 'wrong-number-args) "->s.s_gfdef"))))
   (ms (cdr (assoc (cadr sig) +to-c-var-alist+))
       "("
       (nvfun-wrap "call_proc_cs2" 
@@ -415,7 +415,7 @@
 
 (defun g (fname n sig &optional apnarg (clp t)
 		&aux (cname (format nil "/* ~a */(*LnkLI~d)" (function-string fname) n))
-		(fnstr (ms (vv-str (add-object fname)) "->s.s_gfdef"))
+		(fnstr (ms (vv-str fname) "->s.s_gfdef"))
 		(clp (when clp fnstr)))
   (g1 fnstr cname sig apnarg clp))
 
@@ -451,7 +451,7 @@
 		 (let ((x (last x 2))) 
 		   (when (eq 'link-call (car x)) 
 		     (eql n (cadr x))))) *inline-functions*)))
-	((let* ((n (progn (add-object2 (add-symbol fname)) (next-cfun)))
+	((let* ((n (progn (add-object2 fname) (next-cfun)))
 		(f (flags ans set))
 		(f (if (single-type-p rt) f (flag-or f svt)))
 		(f (if apnarg (flag-or f aa) f)))
@@ -512,11 +512,11 @@
        (let ((d (declaration-type (rep-type (if (link-arg-p type) type t)))));FIXME
 	 (if (or args (not (eq t type)))
 	     (wt "(object first,...){" d "V1;va_list ap;va_start(ap,first);V1=(" d ")"
-		 "call_proc_new(" (vv-str (add-object name)) "," (if clp "1" "0") "," 
+		 "call_proc_new(" (vv-str name) "," (if clp "1" "0") ","
 		 (write-to-string (argsizes args type 0));FIXME
 		 ",(void **)(void *)&Lnk" num "," (new-proclaimed-argd args type)
 		 ",first,ap);va_end(ap);return V1;}")
-	   (wt "(){" d "V1=(" d ")call_proc_new(" (vv-str (add-object name)) "," (if clp "1" "0") "," 
+	   (wt "(){" d "V1=(" d ")call_proc_new(" (vv-str name) "," (if clp "1" "0") ","
 	       (write-to-string (argsizes args type 0));FIXME
 	       ",(void **)(void *)&Lnk" num "," (new-proclaimed-argd args type)
 	       ",0,0);return V1;}")))))
@@ -554,8 +554,7 @@
 ;;     (and loc (wt "}")))
 ;;   (unwind-exit 'fun-val))
 
-(defun inline-proc (fname args &aux (n (length args)) res
-			  (obj (add-object fname)))
+(defun inline-proc (fname args &aux (n (length args)) res (obj fname))
   (format t "~%Using ifuncall: ~a" fname)
   (let ((result
   (case n
--- gcl27-2.7.0.orig/cmpnew/gcl_cmpcatch.lsp
+++ gcl27-2.7.0/cmpnew/gcl_cmpcatch.lsp
@@ -28,8 +28,7 @@
 (si:putprop 'throw 'c1throw 'c1special)
 (si:putprop 'throw 'c2throw 'c2)
 
-(defun c1catch (args &aux (info (make-info :type #t* :sp-change 1)) tag)
-  (incf *setjmps*)
+(defun c1catch (args &aux (info (make-info :type #t* :flags (iflags sp-change volatile))) tag)
   (when (endp args) (too-few-args 'catch 1 0))
   (setq tag (c1arg (car args) info))
   (let* ((tag (c1arg (pop args) info))
@@ -120,8 +119,7 @@
   (setq *frame-used* t)
   (wt-nl "frs_push(FRS_CATCH," loc ");"))
 
-(defun c1unwind-protect (args &aux (info (make-info :sp-change 1)) form)
-  (incf *setjmps*)
+(defun c1unwind-protect (args &aux (info (make-info :flags (iflags sp-change volatile))) form)
   (when (endp args) (too-few-args 'unwind-protect 1 0))
   (setq form (let ((*blocks* (cons 'lb *blocks*))
                    (*tags* (cons 'lb *tags*))
--- gcl27-2.7.0.orig/cmpnew/gcl_cmpenv.lsp
+++ gcl27-2.7.0/cmpnew/gcl_cmpenv.lsp
@@ -76,11 +76,11 @@
     (setf (gethash n *dlinks*) t)
     (add-init `(si::mdl ',(symbol-name l) ',(package-name (symbol-package l)) ,(add-address (concatenate 'string "&" n))))))
 
-(defun add-symbol (symbol) (add-object symbol))
+;(defun add-symbol (symbol) symbol)
 
 (defun add-object2 (object)
-  (let* ((init (if (when (consp object) (eq (car object) '|#,|)) (cdr object) `',object))
-	 (object (if (when (consp init) (eq (car init) 'nani)) (nani (cadr init)) object)))
+  (let* ((init (if (when (consp object) (eq (car object) '|#,|)) (cdr object) `',object)))
+;    (unless init (break))
     (cond ((gethash object *objects*))
 	  ((push-data-incf nil)
 	   (when init (add-init `(setvv ,*next-vv* ,init)))
@@ -98,13 +98,10 @@
        (eq (car x) 'si::nani) (eq (car y) 'si::nani)
        (eq (cadr x) (cadr y))))
 
-(defun add-object (object) 
-  (cond ((ltvp object) object)
-	((and *compiler-compile* (not *keep-gaz*)) (cons '|#,| `(nani ,(address object))))
-	(object)))
+;(defun add-object (object) object)
 
-(defun add-constant (symbol) 
-  (add-object (cons '|#,| symbol)))
+
+(defun add-constant (symbol) (cons '|#,| symbol))
 
 (defmacro next-cvar () '(incf *next-cvar*))
 (defmacro next-cmacro () '(incf *next-cmacro*))
@@ -255,7 +252,8 @@
      (member fname *inline*)
      (local-fun-fn fname)
      (get fname 'cmp-inline)
-     (member (symbol-package fname) (load-time-value (mapcar 'find-package '(:s |libm| |libc| |libgmp|)))))))
+     (member (symbol-package fname)
+	     (load-time-value (mapcar #'symbol-package (list 'c-t-tt (mdlsym "sin") (mdlsym "memmove"))))))))
 
 ;; (defun inline-asserted (fname)
 ;;   (unless *compiler-push-events*
--- gcl27-2.7.0.orig/cmpnew/gcl_cmpeval.lsp
+++ gcl27-2.7.0/cmpnew/gcl_cmpeval.lsp
@@ -659,8 +659,10 @@
 
 (defvar *basic-inlines* nil)
 
+(defun comment (x) x)
 (defun c1comment (args)
-  (list 'comment (make-info :type nil) (with-output-to-string (s) (princ (car args) s))))
+  (list 'comment (make-info :type t  :flags (iflags side-effects))
+	(with-output-to-string (s) (princ (car args) s))))
 (defun c2comment (comment)
   (wt-nl "/*" comment "*/"))
 (si::putprop 'comment 'c1comment 'c1)
@@ -2029,11 +2031,6 @@
 ;;     (uu (or inl (mi5 (or (when (symbolp fun) fun) ff) info fms last)))))
 
 
-(defun unprovfn (w &optional b fun &aux (f (cddr w)) (args (pop f)) (env (caar f)))
-  (let ((r (under-env env (c1function args nil b fun))))
-    (mapl (lambda (x y) (setf (car x) (car y))) w r)
-    (setf (cdddr w) nil)
-    w))
 
 ;; (defun unprovfn (f &optional b fun &aux (args (pop f)) (env (caar f)))
 ;;   (under-env env (c1function args nil b fun)))
@@ -2042,16 +2039,6 @@
 
 (defun current-env nil (list *lexical-env-mask* *vars* *blocks* *tags* *funs*))
 
-(defun uui (inl &aux (m inl))
-  (when (eq (car m) 'inline)
-    (when (eq (car (setq m (car (last m)))) 'let*)
-      (uu (fourth m))))
-  inl)
-
-(defun uu (f)
-  (cond ((atom f) f)
-	((eq (car f) 'provfn) (unprovfn f))
-	(t (uu (car f)) (uu (cdr f)) f)))
 
 ;; (defun uu (f)
 ;;   (cond ((atom f) f)
@@ -2066,7 +2053,7 @@
 (defun mi1 (fn args &optional last ff)
   (let* ((tp (get-return-type fn))
 	 (sp (if (when (symbolp fn) (get fn 'no-sp-change)) 0 1))
-	 (info (make-info :type tp :sp-change sp))
+	 (info (make-info :type tp :flags (if sp (iflags sp-change) 0)))
  	 (res (mi1a fn args last info ff)))
     (when tp 
       (let ((t1 (info-type (cadr res)))(t2 (info-type info)))
@@ -2381,7 +2368,7 @@
 				      tp))
 	   (list 'structure-ref info
 		 (c1arg form info)
-		 (add-symbol name)
+		 name
 		 index sd)))))
 
 ;; (defun c1structure-ref1 (form name index &aux (info (make-info)))
@@ -2484,7 +2471,7 @@
             (y (c1arg (cadddr args) info)))
         (setf (info-type info) (info-type (cadr y)))
         (list 'structure-set info x
-              (add-symbol (cadadr args)) ;;; remove QUOTE.
+              (cadadr args) ;;; remove QUOTE.
               (caddr args) y (get (cadadr args) 'si::s-data)))
       (list 'call-global info 'si:structure-set (c1args args info))))
 
@@ -2551,7 +2538,7 @@
 		 (cond ((not (isfinite val)) `(symbol-value ',(infinite-val-symbol val)))
 		       ((> (abs val) (/ most-positive-long-float 2)) (scl val 'most-positive-long-float))
 		       ((< 0.0 (abs val) (* least-positive-normalized-long-float 1.0d20)) (scl val 'least-positive-normalized-long-float)))))
-	    (add-object (if nval (cons '|#,| nval) val)))))
+	    (if nval (cons '|#,| nval) val))))
   
 
 (defun printable-short-float (val)
@@ -2560,7 +2547,7 @@
 		 (cond ((not (isfinite val)) `(symbol-value ',(infinite-val-symbol val)))
 		       ((> (abs val) (/ most-positive-short-float 2)) (scl val 'most-positive-short-float))
 		       ((< 0.0 (abs val) (* least-positive-normalized-short-float 1.0d20)) (scl val 'least-positive-normalized-short-float)))))
-	    (add-object (if nval (cons '|#,| nval) val)))))
+	    (if nval (cons '|#,| nval) val))))
 
 
 (defun ltvp (val)
@@ -2574,9 +2561,9 @@
    (character                          `(character-value nil ,(char-code val)))
    (long-float                         `(vv ,(printable-long-float val)))
    (short-float                        `(vv ,(printable-short-float val)));FIXME
-   ((or fixnum complex)                `(vv ,(add-object val)))
+   ((or fixnum complex)                `(vv ,val))
    (otherwise                          (when (or always (ltvp val))
-					 `(vv ,(add-object val))))))
+					 `(vv ,val)))))
 
 (defun c1constant-value (val always &aux (val (if (exit-to-fmla-p) (not (not val)) val)))
   (case 
--- gcl27-2.7.0.orig/cmpnew/gcl_cmpflet.lsp
+++ gcl27-2.7.0/cmpnew/gcl_cmpflet.lsp
@@ -160,10 +160,7 @@
   (ref-obs form funs 
 	   (lambda (x) (setf (fun-ref-ccb x) t))
 	   (lambda (x))
-	   (lambda (x) (setf (fun-ref x) t))
-	   'fun-name
-	   "Fun"
-	   (lambda (x &aux (y (pop x))) (when (eq y 'call-local) (butlast (cadr x))))))
+	   (lambda (x) (setf (fun-ref x) t))))
 
 ;; (defun ref-funs1 (form funs &aux (i (cadr form)))
 ;;   (dolist (fun funs)
@@ -219,7 +216,7 @@
       (push (car def) fnames))
     (let* ((def (effective-safety-src def))
 	   (src (si::block-lambda (cadr def) (car def) (cddr def)))
-	   (fun (make-fun :name (car def) :src src :info (make-info :type nil :sp-change 1))))
+	   (fun (make-fun :name (car def) :src src :info (make-info :type nil :flags (iflags sp-change)))))
       (push fun *funs*)
       (unless (< (cons-count src) *local-fun-inline-limit*)
 	(keyed-cmpnote (list (car def) 'notinline)
--- gcl27-2.7.0.orig/cmpnew/gcl_cmpfun.lsp
+++ gcl27-2.7.0/cmpnew/gcl_cmpfun.lsp
@@ -79,7 +79,7 @@
             'princ
             (list (list 'LOCATION
                         (make-info :type (cmp-norm-tp (if (characterp string) 'character 'string)))
-                        (list 'VV (add-object string)))
+                        (list 'VV string))
                   stream) nil t))))
 
 (defun c1terpri (args &aux stream (info (make-info :flags (iflags side-effects))))
--- gcl27-2.7.0.orig/cmpnew/gcl_cmpinline.lsp
+++ gcl27-2.7.0/cmpnew/gcl_cmpinline.lsp
@@ -48,10 +48,7 @@
 (defstruct (info (:print-function (lambda (x s i) (s-print 'info (info-type x) (si::address x) s)))
 		 (:copier old-copy-info))
   (type t)		    ;;; Type of the form.
-  (sp-change 0   :type bit) ;;; Whether execution of the form may change the value of a special variable *VS*.
-  (volatile  0   :type bit) ;;; whether there is a possible setjmp
-  (flags     0   :type char)
-  (unused1   0   :type char)
+  (flags     0   :type fixnum)
   (ch      nil   :type list)
   (ref-ccb nil   :type list)
   (ref-clb nil   :type list)
@@ -61,8 +58,8 @@
 
 (si::freeze-defstruct 'info)
 
-
-(defconstant +iflags+ '(side-effects provisional compiler args))
+;;; Old sp-change comment: Whether execution of the form may change the value of a special variable *VS*.
+(defconstant +iflags+ '(side-effects provisional compiler args volatile sp-change))
 
 (defmacro iflag-p (flags flag)
   (let ((i (position flag +iflags+)))
@@ -180,7 +177,6 @@
 	    (mrg info-ref-ccb)
 	    (mrg info-ref-clb)
 	    (mrg info-ref))
-  (when (/= (info-sp-change from-info) 0) (setf (info-sp-change to-info) 1))
   (setf (info-flags to-info) (logior (info-flags to-info) (info-flags from-info)))
   (setf (info-ref to-info) (nunion (info-ref to-info) (remove-if-not 'symbolp (info-ref from-info))));FIXME nunion asym
   (setf (info-ch-ccb to-info) (nunion (info-ch-ccb to-info) (info-ch-ccb from-info)))
@@ -288,8 +284,8 @@
 		       (return-from args-info-changed-vars t))))
 	  (REPLACED nil)
 	  (t (dolist (form forms nil)
-		       (when (or (is-changed var (cadr form))
-				 (/= (info-sp-change (cadr form)) 0))
+	       (when (or (is-changed var (cadr form))
+			 (iflag-p (info-flags (cadr form)) sp-change))
 			 (return-from args-info-changed-vars t)))))))
 
 ;; Variable references in arguments can also be via replaced variables
@@ -308,23 +304,6 @@
                        ;; see gcl_cmplet.lsp
    (cadr (var-loc x))))
 
-(defun args-info-referred-vars (var forms)
-  (if (member (var-kind var) +c-local-var-types+)
-      (dolist (form forms nil)
-		(when (or (is-referred var (cadr form))
-			  (is-rep-referred var (cadr form)))
-		  (return-from args-info-referred-vars t)))
-    (case (var-kind var)
-	  ((LEXICAL REPLACED OBJECT)
-	   (dolist (form forms nil)
-		     (when (or (is-referred var (cadr form))
-			       (is-rep-referred var (cadr form)))
-		       (return-from args-info-referred-vars t))))
-	  (t (dolist (form forms nil)
-		       (when (or (is-referred var (cadr form))
-				 (is-rep-referred var (cadr form))
-				 (/= (info-sp-change (cadr form)) 0))
-			 (return-from args-info-referred-vars t)))))))
 
 ;;; Valid property names for open coded functions are:
 ;;;  INLINE
--- gcl27-2.7.0.orig/cmpnew/gcl_cmplet.lsp
+++ gcl27-2.7.0/cmpnew/gcl_cmplet.lsp
@@ -248,7 +248,7 @@
 
 (defun c1let-* (args &optional star inls
 		     &aux (nm (if star 'let* 'let))
-		     (ov *vars*) (*vars* *vars*) (setjmps *setjmps*)
+		     (ov *vars*) (*vars* *vars*)
 		     ss is ts body other-decls
 		     (info (make-info)))
 
@@ -286,10 +286,9 @@
       (add-info info (cadr body))
       
       (setf (info-type info) (info-type (cadr body)))
-      (unless (eq setjmps *setjmps*) (setf (info-volatile info) 1))
       
       (if vars (list nm info vars fms body)
-	(list* (car body) info (cddr body))))))
+	  (list* (car body) info (cddr body))))))
 
 ;; (defun c1let-* (args &optional star inls
 ;; 		     &aux (nm (if star 'let* 'let))
--- gcl27-2.7.0.orig/cmpnew/gcl_cmpmain.lsp
+++ gcl27-2.7.0/cmpnew/gcl_cmpmain.lsp
@@ -416,19 +416,14 @@ Cannot compile ~a.~%" (namestring (merge
        (lam clo) 
        (function-lambda-expression fun)
        (assert (not (when mac clo)));FIXME?
-       (let ((form `(,(if mac 'defmacro 'defun) ,(if mac (cons 'macro na) na) ,(cadr lam) ,@(cddr lam))));na (if mac (cons 'macro na) na)
+       (let ((form `(,(if mac 'defmacro 'defun) ,(if mac (cons 'macro na) na) ,(cadr lam) ,@(cddr lam))))
 	 (values
 	  (if clo
-	      `(let* (,@(nreverse
-			 (let ((i -1))
-			   (mapcar (lambda (x)
-				     `(,(car x) (nth ,(incf i) (fun-env ',name))))
-				   clo))))
+	      `(let* ((e (fun-env ',name)) ,@(mapcar (lambda (x) `(,(car x) (pop e))) clo))
 		 ,form)
 	    form)
 	  na))))))
 
-
 (defvar *compiler-compile-data* nil)
 
 (defun compile (name &optional def &aux na tem gaz (*default-pathname-defaults* #p"."))
@@ -864,8 +859,8 @@ Cannot compile ~a.~%" (namestring (merge
 		      (if (stringp post) (format st "~a~%" post))
 		      (format st "(setq si::*optimize-maximum-pages* ~s si::*disable-recompile* ~s)(si::use-fast-links t)" si::*optimize-maximum-pages* si::*disable-recompile*)
 		      (format st "(si::save-system \"~a\")~%" (namestring image)))
-      (when (= 0 (system (format nil "GCL_SYSDIR=~a ~a ~a < ~a"
-				 si::*system-directory*
+      (when (= 0 (system (format nil "GCL_SYSDIR=~a GCL_LIBDIR=~a ~a ~a < ~a"
+				 si::*system-directory* si::*lib-directory*
 				 (namestring raw)
 				 si::*system-directory*
 				 (namestring init))))
--- gcl27-2.7.0.orig/cmpnew/gcl_cmpopt.lsp
+++ gcl27-2.7.0/cmpnew/gcl_cmpopt.lsp
@@ -921,7 +921,7 @@
 ;;REM
 (push '((t t) t #.(compiler::flags) "immnum_rem(#0,#1)") (get 'rem 'compiler::inline-always))
 #+intdiv
-(push '((fixnum fixnum) fixnum #.(flags rfa)"(#0)%(#1)")
+(push '((fixnum fixnum) fixnum #.(flags rfa)"((#0)%(#1))")
    (get 'rem 'inline-always))
 
 ;;SCHAR
--- gcl27-2.7.0.orig/cmpnew/gcl_cmpspecial.lsp
+++ gcl27-2.7.0/cmpnew/gcl_cmpspecial.lsp
@@ -308,11 +308,6 @@
 ;; (defun process-local-fun-env (env b f fun tp)
 ;;   (under-env env (process-local-fun b f fun tp)))
 
-(defun fun-def-env (fn)
-  (let ((fun (car (member-if (lambda (x) (when (fun-p x) (eq (fun-fn x) fn))) *funs*))))
-    (if fun
-	(car (fourth (fun-c1 fun)))
-      (current-env))))
 
 (defun mc nil (let ((env (cons nil nil))) (lambda nil env)))
 
@@ -366,8 +361,9 @@
     (cond ((setq fd (c1local-fun funid t))
 	   (add-info info (cadr fd))
 	   `(function ,info ,fd))
-	  ((symbolp funid) 
-	   (setf (info-sp-change info) (if (null (get funid 'no-sp-change)) 1 0))
+	  ((symbolp funid)
+	   (setf (info-flags info) (logior (info-flags info) (iflags sp-change)))
+;	   (setf (info-sp-change info) (if (null (get funid 'no-sp-change)) 1 0))
 	   `(function ,info (call-global ,info ,funid)))
 	  ((let* ((fun (or f (make-fun :name 'lambda :src funid :c1cb t :fn fn :info (make-info :type '*))))
 		  (fd (if *prov* (list fun) (process-local-fun b fun funid tp))))
@@ -523,7 +519,7 @@
 (defun c2function (funob);FIXME
   (case (car funob)
         (call-global
-         (unwind-exit (list 'symbol-function (add-symbol (caddr funob)))))
+         (unwind-exit (list 'symbol-function (caddr funob))))
         (call-local
 	 (let* ((funob (caddr funob))(fun (pop funob)))
 	   (unwind-exit (if (cadr funob) (list 'ccb-vs (fun-ref-ccb fun)) (list 'vs* (fun-ref fun))))))
--- gcl27-2.7.0.orig/cmpnew/gcl_cmptag.lsp
+++ gcl27-2.7.0/cmpnew/gcl_cmptag.lsp
@@ -83,10 +83,7 @@
   (ref-obs form tags 
 	   (lambda (x) (setf (tag-ref-ccb x) t))
 	   (lambda (x) (setf (tag-ref-clb x) t))
-	   (lambda (x) (setf (tag-ref x) t))
-	   'tag-name
-	   "Tag"
-	   (lambda (x &aux (y (pop x))) (when (eq y 'go) (cdr x)))))
+	   (lambda (x) (setf (tag-ref x) t))))
 
 ;; (defun ref-tags1 (form tags &aux (i (cadr form)))
 ;;   (dolist (tag tags)
@@ -158,9 +155,9 @@
 
 (defun or-mch (l &optional b)
   (mapc (lambda (x &aux (y x)(v (pop x))(tp (pop x))(st (pop x))(m (car x))
-		   (t1 (type-or1 (var-type v) (or m tp)));FIXME check expensive
-		   (t1 (if b (bbump-tp t1) t1))
-		   (t1 (type-and (var-dt v) t1)))
+		     (m (unless (equal tp m) m))
+		     (t1 (type-or1 (var-type v) (or m tp)));FIXME check expensive
+		     (t1 (if b (type-and (var-dt v) (bbump-tp t1)) t1)))
 	  (setf (cadr y) t1
 		(caddr y) (or-binds (var-store v) st);FIXME union?
 		(cadddr y) (mcpt t1)))
@@ -214,8 +211,8 @@
 	 (tags (union (remove-if-not 'tag-ref tags) tagsc))
 	 (body (remove-if-not (lambda (x) (if (tag-p x) (member x tags) t)) body)))
 	 
-    (mapc (lambda (x) (setf (tag-var x) (add-object (tag-name x)))) tagsc)
-    (if tagsc (incf *setjmps*) (add-loop-registers body))
+    (mapc (lambda (x) (setf (tag-var x) (tag-name x))) tagsc)
+    (if tagsc (set-volatile info) (add-loop-registers body))
     (when ref-ccb (mapc (lambda (x) (setf (tag-ref-ccb x) t)) ref-clb));FIXME?
     (mapc (lambda (x) (unless (tag-p x) (add-info info (cadr x)))) body)
     (let ((x (car (last body))))
@@ -335,9 +332,7 @@
 
 (defun tag-throw (tag &aux (b (assoc tag *bt*)))
   (if b
-      (let ((v (remove-if (lambda (x &aux (v (pop x))(tp (pop x))(st (pop x))(m (car x)))
-			    (and (type>= (type-and (var-dt v) tp) (var-type v)) (or (cdr st) (subsetp (var-store v) st)) (if m (equal tp m) t)))
-			  (cdr b))))
+      (let ((v (prune-mch (cdr b) t)))
 	(when v (throw tag (or-mch v t))))
     (let ((f (assoc tag *ft*)))
       (or (or-mch (cdr f)) (setf (cdr f) (mch))))))
--- gcl27-2.7.0.orig/cmpnew/gcl_cmptop.lsp
+++ gcl27-2.7.0/cmpnew/gcl_cmptop.lsp
@@ -33,7 +33,6 @@
 (defvar *free-data-registers* 6)
 
 (defvar *volatile*)
-(defvar *setjmps* 0)
 
 ;; Functions may use a block of C stack space.
 ;; (cs . i)  will become Vcs[i].
@@ -874,7 +873,8 @@
   (wt-nl "#define base0 ")
   (wt *value-to-go*)
   (wt "->fun.fun_env")
-  (wt-nl))
+  (wt-nl)
+  (setq *level* 1))
 (setf (get 'fun-fun 'c1) 'c1fun-fun)
 (setf (get 'fun-fun 'c2) 'c2fun-fun)
 (setf (get 'fun-fun 'wt-loc) 'wt-fun-fun)
@@ -1206,13 +1206,11 @@
 	 (oal (get-arg-types fname)) (ort (get-return-type fname))
 	 (osig (export-sig (list oal ort)))
 	 (e (or (gethash fname *sigs*) (setf (gethash fname *sigs*) (make-list 6))))
-	 (setjmps *setjmps*)
 	 (lambda-expr (do-fun fname args e t nil))
 	 (sig (car e))
 	 (osig (if (equal '((*) *) osig) sig osig));FIXME
 	 (doc (cadddr lambda-expr)))
 	 
-    (or (eql setjmps *setjmps*) (setf (info-volatile (cadr lambda-expr)) 1))
     (keyed-cmpnote (list 'return-type fname) "~s return type ~s" fname (c1retnote lambda-expr))
     
     (unless (or (equal osig sig) (eq fname 'cmp-anon));FIXME
@@ -1446,8 +1444,8 @@
 ;; 	       nil))))))
 	
 
-(defun volatile (info)
-   (if  (/= (info-volatile info) 0) "VOL " ""))
+(defun volatile (info) (if (iflag-p (info-flags info) volatile) "VOL " ""))
+(defun set-volatile (info) (setf (info-flags info) (logior (iflags volatile) (info-flags info))))
 
 (defun register (var)
   (cond ((and (equal *volatile* "")
@@ -2191,8 +2189,10 @@
 	 ;; (let ((*compiling-ordinary* t))
 	 ;;   (t1expr `(funcall (lambda nil ,form nil))))
 	 (let ((gen (gensym "progncompile"))(*compiling-ordinary* t))
-	   (t1expr `(progn (defun ,gen nil ,form nil) (,gen))))
-	 )
+	   (t1expr
+	    `(progn
+	       (defun ,gen nil (comment ',form) ,form nil)
+	       (,gen)))))
 	(t 
 	 (maybe-eval nil form)
 	 (let (*vars* *funs* *blocks* *tags*)
@@ -2256,7 +2256,7 @@
 			      (special-operator-p (caar s)))))
                   (push (cons (cons (caar s)
                                     (if (eq (caar s) 'quote)
-                                        (list (add-object (cadar s)))
+                                        (list (cadar s))
 				      (parse-cvspecs (cdar s))))
                               (parse-cvspecs (cdr s)))
                         body))
@@ -2294,15 +2294,15 @@
                (wt ");"))
              (cond ((setq fd (assoc (caar s) *global-funs*))
                     (cond (*compiler-push-events*
-                           (wt-nl1 "ihs_push(" (vv-str (add-symbol (caar s))) ");")
+                           (wt-nl1 "ihs_push(" (vv-str (caar s)) ");")
                            (wt-nl1 (c-function-name "L" (cdr fd) (caar s)) "();")
                            (wt-nl1 "ihs_pop();"))
                           (t (wt-nl1 (c-function-name "L" (cdr fd) (caar s)) "();"))))
                    (*compiler-push-events*
-                    (wt-nl1 "super_funcall(" (vv-str (add-symbol (caar s))) ");"))
+                    (wt-nl1 "super_funcall(" (vv-str (caar s)) ");"))
                    (*safe-compile*
-                    (wt-nl1 "super_funcall_no_event(" (vv-str (add-symbol (caar s))) ");"))
-                   (t (wt-nl1 "CMPfuncall(" (vv-str (add-symbol (caar s))) "->s.s_gfdef);")))
+                    (wt-nl1 "super_funcall_no_event(" (vv-str (caar s)) ");"))
+                   (t (wt-nl1 "CMPfuncall(" (vv-str (caar s)) "->s.s_gfdef);")))
              (unless (endp (cdr s))
                (wt-nl1 (cadadr s))
                (case (caadr s)
--- gcl27-2.7.0.orig/cmpnew/gcl_cmptype.lsp
+++ gcl27-2.7.0/cmpnew/gcl_cmptype.lsp
@@ -259,7 +259,10 @@
 	(x)))
 
 (defun ?list-bound (x r)
-  (if (unless (isinf x) (unless (isnan x) (when (numberp x) (member-if 'consp r)))) (list x) x))
+  (if (when (and (numberp x) (member-if 'consp r))
+	(not (or (isinf x) (isnan x) (integerp x))))
+      (list x)
+      x))
 
 (defun pole-d (x)
   (if (consp x) (car x) 0))
--- gcl27-2.7.0.orig/cmpnew/gcl_cmpvar.lsp
+++ gcl27-2.7.0/cmpnew/gcl_cmpvar.lsp
@@ -159,7 +159,7 @@
     
     (cond ((or (member name specials) (si:specialp name))
 	   (setf (var-kind var) 'SPECIAL)
-	   (setf (var-loc var) (add-symbol name))
+	   (setf (var-loc var) name)
 	   (when (and (not *compiler-new-safety*) (not (assoc name types)) (setq x (get name 'cmp-type)))
 	     (setf (var-type var) (ensure-known-type x)))
 	   (setq *special-binding* t))
@@ -229,57 +229,22 @@
 		     (list* f i tmp))))))
 	    ((list 'var info vref c1fv (make-vs info)))))))
 
-(defun ref-obs1 (form obs sccb sclb s &aux (i (cadr form)))
+(defun ref-obs (form obs sccb sclb s &aux (i (cadr form)))
   (mapc (lambda (x)
 	  (when (member x (info-ref-ccb i))
 	    (funcall sccb x))
 	  (when (member x (info-ref-clb i))
 	    (funcall sclb x))
 	  (when (member x (info-ref i))
-	    (funcall s x))) obs))
-(declaim (inline ref-obs1))
-
-(defvar *fast-ref* t)
-
-(defun ref-obs (form obs sccb sclb s n ns r &optional l &aux vref)
-  (cond ((not l)
-	 (cond (*fast-ref* (ref-obs1 form obs sccb sclb s))
-	       ((let* ((l (list (info-ref (cadr form)) (info-ref-ccb (cadr form)) (info-ref-clb (cadr form))))
-		       (l (mapcar (lambda (x) (intersection x obs)) l))
-		       (l (mapcar (lambda (y) (mapcar (lambda (x) (cons x nil)) y)) l)))
-		  (ref-obs form obs sccb sclb s n ns r l)
-		  (let* (y (x (member-if (lambda (x) (setq y (member nil x :key 'cdr))) l)))
-		    (when y
-		      (cmpwarn "~s ~s ~s referenced in info but not in form" (length (ldiff l x)) ns (funcall n (caar y)))))))))
-	((atom form))
-	((setq vref (funcall r form))
-	 (let* ((v (pop vref))
-		(ccb (pop vref))
-		(clb (car vref)))
-	   (when (member v obs)
-	     (cond (ccb (funcall sccb v))
-		   (clb (funcall sclb v))
-		   ((funcall s v)))
-	     (when l
-	       (let* ((y (cond (ccb (cadr l))(clb (caddr l))((car l))))(x (assoc v y)))
-		 (if x (rplacd x t) (cmpwarn "~s ~s ~s referenced in form but not in info" (if ccb 'cb (if clb 'lb)) ns (funcall n v)))))
-	     (keyed-cmpnote (list 'ref (funcall n v)) "~s ~s is referenced with barrier ~s" ns (funcall n v) (if ccb 'cb (if clb 'lb))))
-	   (ref-obs (cdddr form) obs sccb sclb s n ns r l)))
-	(t (ref-obs (car form) obs sccb sclb s n ns r l) (ref-obs (cdr form) obs sccb sclb s n ns r l))))
+	    (funcall s x)))
+	obs))
 (declaim (inline ref-obs))
 
 (defun ref-vars (form vars)
   (ref-obs form vars 
 	   (lambda (x) (when (eq (var-kind x) 'lexical) (setf (var-ref-ccb x) t)))
 	   (lambda (x) (when (eq (var-kind x) 'lexical) (setf (var-loc x) 'clb)) (setf (var-ref x) t))
-	   (lambda (x) (setf (var-ref x) t (var-register x) (1+ (var-register x))))
-	   'var-name
-	   "Var"
-	   (lambda (x &aux (y (pop x))) 
-	     (when (member y '(var setq))
-	       (let ((z (cadr x)))
-		 (unless (and (eq y 'setq) (not (cadr z)) (not (caddr z)))
-		   z))))))
+	   (lambda (x) (setf (var-ref x) t (var-register x) (1+ (var-register x))))))
 
 (defun inner-fun-var (&optional (v *vars*) f &aux (y v) (x (pop v)))
   (cond ((atom v) nil)
@@ -395,7 +360,7 @@
                    (unless (or (si:specialp name) (constantp name)) (undefined-variable name))
                    (setq var (make-var :name name
                                        :kind 'GLOBAL
-                                       :loc (add-symbol name)
+                                       :loc name
                                        :type (or (get name 'cmp-type) t)
 				       :ref t));FIXME
                    (push var *undefined-vars*))
@@ -635,7 +600,7 @@
   (dolist (name globals)
     (push (make-var :name name
                     :kind 'GLOBAL
-                    :loc (add-symbol name)
+                    :loc name
                     :type (or (get name 'cmp-type) t))
           *vars*)))
 
@@ -784,8 +749,8 @@
 			&aux (cvar (cs-push t t))
 			(*unwind-exit* *unwind-exit*))
   
-  (wt-nl "{object symbols,values;")
-  (wt-nl "bds_ptr V" cvar "=bds_top;")
+  (wt-nl "{object " *volatile* "symbols,values;")
+  (wt-nl "bds_ptr " *volatile* "V" cvar "=bds_top;")
   (wt-nl "V" cvar "=V" cvar ";");FIXME lintian unused var
   (push cvar *unwind-exit*)
   
--- gcl27-2.7.0.orig/configure
+++ gcl27-2.7.0/configure
@@ -707,6 +707,13 @@ MAKEINFO
 GPROF
 GCL_CC
 CPP
+OBJEXT
+EXEEXT
+ac_ct_CC
+CPPFLAGS
+LDFLAGS
+CFLAGS
+CC
 PRELINK_CHECK
 host_os
 host_vendor
@@ -717,13 +724,6 @@ build_vendor
 build_cpu
 build
 AWK
-OBJEXT
-EXEEXT
-ac_ct_CC
-CPPFLAGS
-LDFLAGS
-CFLAGS
-CC
 VERSION
 target_alias
 host_alias
@@ -2926,6 +2926,435 @@ ac_config_headers="$ac_config_headers h/
 VERSION=`cat majvers`.`cat minvers`
 
 
+# Check whether --enable-xgcl was given.
+if test ${enable_xgcl+y}
+then :
+  enableval=$enable_xgcl; enable_xgcl=$enableval
+else $as_nop
+  enable_xgcl="yes"
+fi
+
+
+#
+# Host information
+#
+
+for ac_prog in gawk nawk awk
+do
+  # Extract the first word of "$ac_prog", so it can be a program name with args.
+set dummy $ac_prog; ac_word=$2
+{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
+printf %s "checking for $ac_word... " >&6; }
+if test ${ac_cv_prog_AWK+y}
+then :
+  printf %s "(cached) " >&6
+else $as_nop
+  if test -n "$AWK"; then
+  ac_cv_prog_AWK="$AWK" # Let the user override the test.
+else
+as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  case $as_dir in #(((
+    '') as_dir=./ ;;
+    */) ;;
+    *) as_dir=$as_dir/ ;;
+  esac
+    for ac_exec_ext in '' $ac_executable_extensions; do
+  if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then
+    ac_cv_prog_AWK="$ac_prog"
+    printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5
+    break 2
+  fi
+done
+  done
+IFS=$as_save_IFS
+
+fi
+fi
+AWK=$ac_cv_prog_AWK
+if test -n "$AWK"; then
+  { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $AWK" >&5
+printf "%s\n" "$AWK" >&6; }
+else
+  { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5
+printf "%s\n" "no" >&6; }
+fi
+
+
+  test -n "$AWK" && break
+done
+
+
+
+
+
+  # Make sure we can run config.sub.
+$SHELL "${ac_aux_dir}config.sub" sun4 >/dev/null 2>&1 ||
+  as_fn_error $? "cannot run $SHELL ${ac_aux_dir}config.sub" "$LINENO" 5
+
+{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking build system type" >&5
+printf %s "checking build system type... " >&6; }
+if test ${ac_cv_build+y}
+then :
+  printf %s "(cached) " >&6
+else $as_nop
+  ac_build_alias=$build_alias
+test "x$ac_build_alias" = x &&
+  ac_build_alias=`$SHELL "${ac_aux_dir}config.guess"`
+test "x$ac_build_alias" = x &&
+  as_fn_error $? "cannot guess build type; you must specify one" "$LINENO" 5
+ac_cv_build=`$SHELL "${ac_aux_dir}config.sub" $ac_build_alias` ||
+  as_fn_error $? "$SHELL ${ac_aux_dir}config.sub $ac_build_alias failed" "$LINENO" 5
+
+fi
+{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_build" >&5
+printf "%s\n" "$ac_cv_build" >&6; }
+case $ac_cv_build in
+*-*-*) ;;
+*) as_fn_error $? "invalid value of canonical build" "$LINENO" 5;;
+esac
+build=$ac_cv_build
+ac_save_IFS=$IFS; IFS='-'
+set x $ac_cv_build
+shift
+build_cpu=$1
+build_vendor=$2
+shift; shift
+# Remember, the first character of IFS is used to create $*,
+# except with old shells:
+build_os=$*
+IFS=$ac_save_IFS
+case $build_os in *\ *) build_os=`echo "$build_os" | sed 's/ /-/g'`;; esac
+
+
+{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking host system type" >&5
+printf %s "checking host system type... " >&6; }
+if test ${ac_cv_host+y}
+then :
+  printf %s "(cached) " >&6
+else $as_nop
+  if test "x$host_alias" = x; then
+  ac_cv_host=$ac_cv_build
+else
+  ac_cv_host=`$SHELL "${ac_aux_dir}config.sub" $host_alias` ||
+    as_fn_error $? "$SHELL ${ac_aux_dir}config.sub $host_alias failed" "$LINENO" 5
+fi
+
+fi
+{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_host" >&5
+printf "%s\n" "$ac_cv_host" >&6; }
+case $ac_cv_host in
+*-*-*) ;;
+*) as_fn_error $? "invalid value of canonical host" "$LINENO" 5;;
+esac
+host=$ac_cv_host
+ac_save_IFS=$IFS; IFS='-'
+set x $ac_cv_host
+shift
+host_cpu=$1
+host_vendor=$2
+shift; shift
+# Remember, the first character of IFS is used to create $*,
+# except with old shells:
+host_os=$*
+IFS=$ac_save_IFS
+case $host_os in *\ *) host_os=`echo "$host_os" | sed 's/ /-/g'`;; esac
+
+
+canonical=$host
+my_host_kernel=`echo $host_os | ${AWK} '{j=split($1,A,"-");print A[1]}'`
+my_host_system=`echo $host_os | ${AWK} '{j=split($1,A,"-");if (j>=2) print A[2]}'`
+
+cat >>confdefs.h <<_ACEOF
+#define HOST_CPU "`echo $host_cpu | ${AWK} '{print toupper($0)}'`"
+_ACEOF
+
+
+cat >>confdefs.h <<_ACEOF
+#define HOST_KERNEL "`echo $my_host_kernel | ${AWK} '{print toupper($0)}'`"
+_ACEOF
+
+if test "$my_host_system" != "" ; then
+
+cat >>confdefs.h <<_ACEOF
+#define HOST_SYSTEM "`echo $my_host_system | ${AWK} '{print toupper($0)}'`"
+_ACEOF
+
+fi
+## host=CPU-COMPANY-SYSTEM
+{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: host=$host" >&5
+printf "%s\n" "host=$host" >&6; }
+
+use=unknown
+case $canonical in
+    sh4*linux*) use=sh4-linux;;
+    *x86_64*linux*) use=amd64-linux;;
+    *x86_64*kfreebsd*)	use=amd64-kfreebsd;;
+    *86*linux*) use=386-linux;;
+    *riscv64*linux*) use=riscv64-linux;;
+    *86*kfreebsd*) use=386-kfreebsd;;
+    *86*gnu*)	use=386-gnu;;
+    m68k*linux*) use=m68k-linux;;
+    alpha*linux*) use=alpha-linux;;
+    mips*linux*) use=mips-linux;;
+    mipsel*linux*) use=mipsel-linux;;
+    sparc*linux*) use=sparc-linux;;
+    aarch64*linux*) use=aarch64-linux;;
+    arm*linux*hf) use=armhf-linux;;
+    arm*linux*) use=arm-linux;;
+    s390*linux*) use=s390-linux;;
+    ia64*linux*) use=ia64-linux;;
+    hppa*linux*) use=hppa-linux;;
+    powerpc*linux*) use=powerpc-linux;;
+    powerpc-*-darwin*) use=powerpc-macosx;;
+    *86*darwin*) use=386-macosx;;
+    i*mingw*|i*msys*) use=mingw;;
+    *cygwin*)
+        if $CC -v 2>&1 | fgrep ming > /dev/null ;
+        then use=mingw
+        else use=gnuwin95
+        fi;;
+    *openbsd*) use=FreeBSD;;
+    sparc-sun-solaris*) use=solaris;;
+    i?86-pc-solaris*) use=solaris-i386;;
+esac
+
+# Check whether --enable-machine was given.
+if test ${enable_machine+y}
+then :
+  enableval=$enable_machine; echo enable_machine=$enableval ; use=$enableval
+fi
+
+
+{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: use=$use" >&5
+printf "%s\n" "use=$use" >&6; }
+
+def_dlopen="no"
+def_statsysbfd="no"
+def_custreloc="yes"
+def_oldgmp="no"
+def_pic="no";
+def_static="no";
+def_debug="no";
+case $use in
+    *kfreebsd)
+	ln -snf linux.defs h/$use.defs;;
+    *gnu)
+	ln -snf linux.defs h/$use.defs;;
+    *linux)
+	ln -snf linux.defs h/$use.defs;
+	case $use in
+	    ia64*)
+		def_dlopen="yes" ; def_custreloc="no" ;;
+	    hppa*)
+		def_pic="yes" ;;
+	esac;;
+esac
+
+# Check whether --enable-widecons was given.
+if test ${enable_widecons+y}
+then :
+  enableval=$enable_widecons; if test "$enableval" = "yes" ; then
+printf "%s\n" "#define WIDE_CONS 1" >>confdefs.h
+ fi
+fi
+
+
+# Check whether --enable-safecdr was given.
+if test ${enable_safecdr+y}
+then :
+  enableval=$enable_safecdr; if test "$enableval" = "yes" ; then
+
+printf "%s\n" "#define USE_SAFE_CDR 1" >>confdefs.h
+
+		   # Check whether --enable-safecdrdbg was given.
+if test ${enable_safecdrdbg+y}
+then :
+  enableval=$enable_safecdrdbg; if test "$enableval" = "yes" ; then
+printf "%s\n" "#define DEBUG_SAFE_CDR 1" >>confdefs.h
+ fi
+fi
+
+	       fi
+fi
+
+
+# Check whether --enable-prelink was given.
+if test ${enable_prelink+y}
+then :
+  enableval=$enable_prelink; if test "$enable_prelink" = "yes" ; then PRELINK_CHECK=t; fi
+fi
+
+
+
+# Check whether --enable-vssize was given.
+if test ${enable_vssize+y}
+then :
+  enableval=$enable_vssize;
+printf "%s\n" "#define VSSIZE $enableval" >>confdefs.h
+
+fi
+
+# Check whether --enable-bdssize was given.
+if test ${enable_bdssize+y}
+then :
+  enableval=$enable_bdssize;
+printf "%s\n" "#define BDSSIZE $enableval" >>confdefs.h
+
+fi
+
+# Check whether --enable-ihssize was given.
+if test ${enable_ihssize+y}
+then :
+  enableval=$enable_ihssize;
+printf "%s\n" "#define IHSSIZE $enableval" >>confdefs.h
+
+fi
+
+# Check whether --enable-frssize was given.
+if test ${enable_frssize+y}
+then :
+  enableval=$enable_frssize;
+printf "%s\n" "#define FRSSIZE $enableval" >>confdefs.h
+
+fi
+
+
+# Check whether --enable-infodir was given.
+if test ${enable_infodir+y}
+then :
+  enableval=$enable_infodir; INFO_DIR=$enableval
+else $as_nop
+  INFO_DIR=$prefix/share/info
+fi
+
+INFO_DIR=`eval echo $INFO_DIR/`
+
+# Check whether --enable-emacsdir was given.
+if test ${enable_emacsdir+y}
+then :
+  enableval=$enable_emacsdir; EMACS_SITE_LISP=$enableval
+else $as_nop
+  EMACS_SITE_LISP=$prefix/share/emacs/site-lisp
+fi
+
+EMACS_SITE_LISP=`eval echo $EMACS_SITE_LISP/`
+
+# Check whether --enable-xgcl was given.
+if test ${enable_xgcl+y}
+then :
+  enableval=$enable_xgcl;
+else $as_nop
+  enable_xgcl=yes
+fi
+
+
+# Check whether --enable-dlopen was given.
+if test ${enable_dlopen+y}
+then :
+  enableval=$enable_dlopen;
+else $as_nop
+  enable_dlopen=$def_dlopen
+fi
+
+# Check whether --enable-statsysbfd was given.
+if test ${enable_statsysbfd+y}
+then :
+  enableval=$enable_statsysbfd;
+else $as_nop
+  enable_statsysbfd=$def_statsysbfd
+fi
+
+# Check whether --enable-dynsysbfd was given.
+if test ${enable_dynsysbfd+y}
+then :
+  enableval=$enable_dynsysbfd;
+else $as_nop
+  enable_dynsysbfd=no
+fi
+
+# Check whether --enable-custreloc was given.
+if test ${enable_custreloc+y}
+then :
+  enableval=$enable_custreloc;
+else $as_nop
+  enable_custreloc=$def_custreloc
+fi
+
+
+# Check whether --enable-debug was given.
+if test ${enable_debug+y}
+then :
+  enableval=$enable_debug;
+else $as_nop
+  enable_debug=$def_debug
+fi
+
+# Check whether --enable-static was given.
+if test ${enable_static+y}
+then :
+  enableval=$enable_static;
+else $as_nop
+  enable_static=$def_static
+fi
+
+# Check whether --enable-pic was given.
+if test ${enable_pic+y}
+then :
+  enableval=$enable_pic;
+else $as_nop
+  enable_pic=$def_pic
+fi
+
+
+load_opt=0
+if test "$enable_dlopen" = "yes" ; then
+    load_opt=1
+fi
+if test "$enable_statsysbfd" = "yes" ; then
+    case $load_opt in
+	0) load_opt=1;;
+	1) load_opt=2;;
+    esac
+fi
+if test "$enable_dynsysbfd" = "yes" ; then
+    case $load_opt in
+	0) load_opt=1;;
+	1) load_opt=2;;
+	2) load_opt=3;;
+    esac
+fi
+if test "$enable_custreloc" = "yes" ; then
+    case $load_opt in
+	0) load_opt=1;;
+	1) load_opt=2;;
+	2) load_opt=3;;
+	3) load_opt=4;;
+	4) load_opt=5;;
+    esac
+fi
+
+if test "$load_opt" != "1" ; then
+    echo "Exactly one loader option must be chosen: dlopen=$enable_dlopen statsysbfd=$enable_statsysbfd dynsysbfd=$enable_dynsysbfd custreloc=$enable_custreloc"
+    as_fn_error $? "loader option failure" "$LINENO" 5
+fi
+
+
+#
+# System programs
+#
+
+# We set the default CFLAGS below, and don't want the autoconf default
+# CM 20040106
+if test "$CFLAGS" = "" ; then
+    CFLAGS=" "
+fi
+if test "$LDFLAGS" = "" ; then
+    LDFLAGS=" "
+fi
+
 
 
 
@@ -4092,438 +4521,6 @@ then :
 
 fi
 
-$ac_includes_default
-
-# Check whether --enable-xgcl was given.
-if test ${enable_xgcl+y}
-then :
-  enableval=$enable_xgcl; enable_xgcl=$enableval
-else $as_nop
-  enable_xgcl="yes"
-fi
-
-
-#
-# Host information
-#
-
-for ac_prog in gawk nawk awk
-do
-  # Extract the first word of "$ac_prog", so it can be a program name with args.
-set dummy $ac_prog; ac_word=$2
-{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5
-printf %s "checking for $ac_word... " >&6; }
-if test ${ac_cv_prog_AWK+y}
-then :
-  printf %s "(cached) " >&6
-else $as_nop
-  if test -n "$AWK"; then
-  ac_cv_prog_AWK="$AWK" # Let the user override the test.
-else
-as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
-for as_dir in $PATH
-do
-  IFS=$as_save_IFS
-  case $as_dir in #(((
-    '') as_dir=./ ;;
-    */) ;;
-    *) as_dir=$as_dir/ ;;
-  esac
-    for ac_exec_ext in '' $ac_executable_extensions; do
-  if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then
-    ac_cv_prog_AWK="$ac_prog"
-    printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5
-    break 2
-  fi
-done
-  done
-IFS=$as_save_IFS
-
-fi
-fi
-AWK=$ac_cv_prog_AWK
-if test -n "$AWK"; then
-  { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $AWK" >&5
-printf "%s\n" "$AWK" >&6; }
-else
-  { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5
-printf "%s\n" "no" >&6; }
-fi
-
-
-  test -n "$AWK" && break
-done
-
-
-
-
-
-  # Make sure we can run config.sub.
-$SHELL "${ac_aux_dir}config.sub" sun4 >/dev/null 2>&1 ||
-  as_fn_error $? "cannot run $SHELL ${ac_aux_dir}config.sub" "$LINENO" 5
-
-{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking build system type" >&5
-printf %s "checking build system type... " >&6; }
-if test ${ac_cv_build+y}
-then :
-  printf %s "(cached) " >&6
-else $as_nop
-  ac_build_alias=$build_alias
-test "x$ac_build_alias" = x &&
-  ac_build_alias=`$SHELL "${ac_aux_dir}config.guess"`
-test "x$ac_build_alias" = x &&
-  as_fn_error $? "cannot guess build type; you must specify one" "$LINENO" 5
-ac_cv_build=`$SHELL "${ac_aux_dir}config.sub" $ac_build_alias` ||
-  as_fn_error $? "$SHELL ${ac_aux_dir}config.sub $ac_build_alias failed" "$LINENO" 5
-
-fi
-{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_build" >&5
-printf "%s\n" "$ac_cv_build" >&6; }
-case $ac_cv_build in
-*-*-*) ;;
-*) as_fn_error $? "invalid value of canonical build" "$LINENO" 5;;
-esac
-build=$ac_cv_build
-ac_save_IFS=$IFS; IFS='-'
-set x $ac_cv_build
-shift
-build_cpu=$1
-build_vendor=$2
-shift; shift
-# Remember, the first character of IFS is used to create $*,
-# except with old shells:
-build_os=$*
-IFS=$ac_save_IFS
-case $build_os in *\ *) build_os=`echo "$build_os" | sed 's/ /-/g'`;; esac
-
-
-{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking host system type" >&5
-printf %s "checking host system type... " >&6; }
-if test ${ac_cv_host+y}
-then :
-  printf %s "(cached) " >&6
-else $as_nop
-  if test "x$host_alias" = x; then
-  ac_cv_host=$ac_cv_build
-else
-  ac_cv_host=`$SHELL "${ac_aux_dir}config.sub" $host_alias` ||
-    as_fn_error $? "$SHELL ${ac_aux_dir}config.sub $host_alias failed" "$LINENO" 5
-fi
-
-fi
-{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_host" >&5
-printf "%s\n" "$ac_cv_host" >&6; }
-case $ac_cv_host in
-*-*-*) ;;
-*) as_fn_error $? "invalid value of canonical host" "$LINENO" 5;;
-esac
-host=$ac_cv_host
-ac_save_IFS=$IFS; IFS='-'
-set x $ac_cv_host
-shift
-host_cpu=$1
-host_vendor=$2
-shift; shift
-# Remember, the first character of IFS is used to create $*,
-# except with old shells:
-host_os=$*
-IFS=$ac_save_IFS
-case $host_os in *\ *) host_os=`echo "$host_os" | sed 's/ /-/g'`;; esac
-
-
-canonical=$host
-my_host_kernel=`echo $host_os | ${AWK} '{j=split($1,A,"-");print A[1]}'`
-my_host_system=`echo $host_os | ${AWK} '{j=split($1,A,"-");if (j>=2) print A[2]}'`
-
-cat >>confdefs.h <<_ACEOF
-#define HOST_CPU "`echo $host_cpu | ${AWK} '{print toupper($0)}'`"
-_ACEOF
-
-
-cat >>confdefs.h <<_ACEOF
-#define HOST_KERNEL "`echo $my_host_kernel | ${AWK} '{print toupper($0)}'`"
-_ACEOF
-
-if test "$my_host_system" != "" ; then
-
-cat >>confdefs.h <<_ACEOF
-#define HOST_SYSTEM "`echo $my_host_system | ${AWK} '{print toupper($0)}'`"
-_ACEOF
-
-fi
-## host=CPU-COMPANY-SYSTEM
-{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: host=$host" >&5
-printf "%s\n" "host=$host" >&6; }
-
-use=unknown
-case $canonical in
-    sh4*linux*) use=sh4-linux;;
-    *x86_64*linux*) use=amd64-linux;;
-    *x86_64*kfreebsd*)	use=amd64-kfreebsd;;
-    *86*linux*) use=386-linux;;
-    *riscv64*linux*) use=riscv64-linux;;
-    *86*kfreebsd*) use=386-kfreebsd;;
-    *86*gnu*)	use=386-gnu;;
-    m68k*linux*) use=m68k-linux;;
-    alpha*linux*) use=alpha-linux;;
-    mips*linux*) use=mips-linux;;
-    mipsel*linux*) use=mipsel-linux;;
-    sparc*linux*) use=sparc-linux;;
-    aarch64*linux*) use=aarch64-linux;;
-    arm*linux*hf) use=armhf-linux;;
-    arm*linux*) use=arm-linux;;
-    s390*linux*) use=s390-linux;;
-    ia64*linux*) use=ia64-linux;;
-    hppa*linux*) use=hppa-linux;;
-    powerpc*linux*) use=powerpc-linux;;
-    powerpc-*-darwin*) use=powerpc-macosx;;
-    *86*darwin*) use=386-macosx;;
-    i*mingw*|i*msys*) use=mingw;;
-    *cygwin*)
-        if $CC -v 2>&1 | fgrep ming > /dev/null ;
-        then use=mingw
-        else use=gnuwin95
-        fi;;
-    *openbsd*) use=FreeBSD;;
-    sparc-sun-solaris*) use=solaris;;
-    i?86-pc-solaris*) use=solaris-i386;;
-esac
-
-# Check whether --enable-machine was given.
-if test ${enable_machine+y}
-then :
-  enableval=$enable_machine; echo enable_machine=$enableval ; use=$enableval
-fi
-
-
-{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: use=$use" >&5
-printf "%s\n" "use=$use" >&6; }
-
-def_dlopen="no"
-def_statsysbfd="no"
-def_custreloc="yes"
-def_oldgmp="no"
-def_pic="no";
-def_static="no";
-def_debug="no";
-case $use in
-    *kfreebsd)
-	ln -snf linux.defs h/$use.defs;;
-    *gnu)
-	ln -snf linux.defs h/$use.defs;;
-    *linux)
-	ln -snf linux.defs h/$use.defs;
-	case $use in
-	    ia64*)
-		def_dlopen="yes" ; def_custreloc="no" ;;
-	    hppa*)
-		def_pic="yes" ;;
-	esac;;
-esac
-
-# Check whether --enable-widecons was given.
-if test ${enable_widecons+y}
-then :
-  enableval=$enable_widecons; if test "$enableval" = "yes" ; then
-printf "%s\n" "#define WIDE_CONS 1" >>confdefs.h
- fi
-fi
-
-
-# Check whether --enable-safecdr was given.
-if test ${enable_safecdr+y}
-then :
-  enableval=$enable_safecdr; if test "$enableval" = "yes" ; then
-
-printf "%s\n" "#define USE_SAFE_CDR 1" >>confdefs.h
-
-		   # Check whether --enable-safecdrdbg was given.
-if test ${enable_safecdrdbg+y}
-then :
-  enableval=$enable_safecdrdbg; if test "$enableval" = "yes" ; then
-printf "%s\n" "#define DEBUG_SAFE_CDR 1" >>confdefs.h
- fi
-fi
-
-	       fi
-fi
-
-
-# Check whether --enable-prelink was given.
-if test ${enable_prelink+y}
-then :
-  enableval=$enable_prelink; if test "$enable_prelink" = "yes" ; then PRELINK_CHECK=t; fi
-fi
-
-
-
-# Check whether --enable-vssize was given.
-if test ${enable_vssize+y}
-then :
-  enableval=$enable_vssize;
-printf "%s\n" "#define VSSIZE $enableval" >>confdefs.h
-
-fi
-
-# Check whether --enable-bdssize was given.
-if test ${enable_bdssize+y}
-then :
-  enableval=$enable_bdssize;
-printf "%s\n" "#define BDSSIZE $enableval" >>confdefs.h
-
-fi
-
-# Check whether --enable-ihssize was given.
-if test ${enable_ihssize+y}
-then :
-  enableval=$enable_ihssize;
-printf "%s\n" "#define IHSSIZE $enableval" >>confdefs.h
-
-fi
-
-# Check whether --enable-frssize was given.
-if test ${enable_frssize+y}
-then :
-  enableval=$enable_frssize;
-printf "%s\n" "#define FRSSIZE $enableval" >>confdefs.h
-
-fi
-
-
-# Check whether --enable-infodir was given.
-if test ${enable_infodir+y}
-then :
-  enableval=$enable_infodir; INFO_DIR=$enableval
-else $as_nop
-  INFO_DIR=$prefix/share/info
-fi
-
-INFO_DIR=`eval echo $INFO_DIR/`
-
-# Check whether --enable-emacsdir was given.
-if test ${enable_emacsdir+y}
-then :
-  enableval=$enable_emacsdir; EMACS_SITE_LISP=$enableval
-else $as_nop
-  EMACS_SITE_LISP=$prefix/share/emacs/site-lisp
-fi
-
-EMACS_SITE_LISP=`eval echo $EMACS_SITE_LISP/`
-
-# Check whether --enable-xgcl was given.
-if test ${enable_xgcl+y}
-then :
-  enableval=$enable_xgcl;
-else $as_nop
-  enable_xgcl=yes
-fi
-
-
-# Check whether --enable-dlopen was given.
-if test ${enable_dlopen+y}
-then :
-  enableval=$enable_dlopen;
-else $as_nop
-  enable_dlopen=$def_dlopen
-fi
-
-# Check whether --enable-statsysbfd was given.
-if test ${enable_statsysbfd+y}
-then :
-  enableval=$enable_statsysbfd;
-else $as_nop
-  enable_statsysbfd=$def_statsysbfd
-fi
-
-# Check whether --enable-dynsysbfd was given.
-if test ${enable_dynsysbfd+y}
-then :
-  enableval=$enable_dynsysbfd;
-else $as_nop
-  enable_dynsysbfd=no
-fi
-
-# Check whether --enable-custreloc was given.
-if test ${enable_custreloc+y}
-then :
-  enableval=$enable_custreloc;
-else $as_nop
-  enable_custreloc=$def_custreloc
-fi
-
-
-# Check whether --enable-debug was given.
-if test ${enable_debug+y}
-then :
-  enableval=$enable_debug;
-else $as_nop
-  enable_debug=$def_debug
-fi
-
-# Check whether --enable-static was given.
-if test ${enable_static+y}
-then :
-  enableval=$enable_static;
-else $as_nop
-  enable_static=$def_static
-fi
-
-# Check whether --enable-pic was given.
-if test ${enable_pic+y}
-then :
-  enableval=$enable_pic;
-else $as_nop
-  enable_pic=$def_pic
-fi
-
-
-load_opt=0
-if test "$enable_dlopen" = "yes" ; then
-    load_opt=1
-fi
-if test "$enable_statsysbfd" = "yes" ; then
-    case $load_opt in
-	0) load_opt=1;;
-	1) load_opt=2;;
-    esac
-fi
-if test "$enable_dynsysbfd" = "yes" ; then
-    case $load_opt in
-	0) load_opt=1;;
-	1) load_opt=2;;
-	2) load_opt=3;;
-    esac
-fi
-if test "$enable_custreloc" = "yes" ; then
-    case $load_opt in
-	0) load_opt=1;;
-	1) load_opt=2;;
-	2) load_opt=3;;
-	3) load_opt=4;;
-	4) load_opt=5;;
-    esac
-fi
-
-if test "$load_opt" != "1" ; then
-    echo "Exactly one loader option must be chosen: dlopen=$enable_dlopen statsysbfd=$enable_statsysbfd dynsysbfd=$enable_dynsysbfd custreloc=$enable_custreloc"
-    as_fn_error $? "loader option failure" "$LINENO" 5
-fi
-
-
-#
-# System programs
-#
-
-# We set the default CFLAGS below, and don't want the autoconf default
-# CM 20040106
-if test "$CFLAGS" = "" ; then
-    CFLAGS=" "
-fi
-if test "$LDFLAGS" = "" ; then
-    LDFLAGS=" "
-fi
-
-
 ac_ext=c
 ac_cpp='$CPP $CPPFLAGS'
 ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5'
@@ -5740,8 +5737,6 @@ fi
 
 
 if test "$GPROF" != "" ; then
-   { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking working gprof" >&5
-printf %s "checking working gprof... " >&6; }
    case $use in
        powerpc*) if test "$host_cpu" = "powerpc64le" ; then GPROF=""; fi;;
        s390*) GPROF="";;#mcount smashes float args in make_shortfloat 20180313
@@ -5753,16 +5748,20 @@ printf %s "checking working gprof... " >
        aarch64*) GPROF="";;#unreproducible buildd bug 20170824
        *gnu)  GPROF="";;
    esac
+   OLD_CFLAGS=$CFLAGS
    if ! add_arg_to_cflags -pg ; then GPROF="" ; fi
+   CFLAGS=$OLD_CFLAGS
+   { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking working gprof" >&5
+printf %s "checking working gprof... " >&6; }
    if test "$GPROF" = "" ; then
        { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: disabled" >&5
 printf "%s\n" "disabled" >&6; }
    else
        { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: ok" >&5
 printf "%s\n" "ok" >&6; }
-       OLD_CFLAGS=$CFLAGS  # Do not run configure tests with -pg
-       assert_arg_to_cflags -pg
-       CFLAGS=$OLD_CFLAGS
+
+printf "%s\n" "#define USE_GPROF 1" >>confdefs.h
+
    fi
 fi
 
@@ -7568,6 +7567,39 @@ printf "%s\n" "$ac_cv_sizeof_int" >&6; }
 printf "%s\n" "#define SIZEOF_INT $ac_cv_sizeof_int" >>confdefs.h
 
 
+# The cast to long int works around a bug in the HP C Compiler
+# version HP92453-01 B.11.11.23709.GP, which incorrectly rejects
+# declarations like `int a3[[(sizeof (unsigned char)) >= 0]];'.
+# This bug is HP SR number 8606223364.
+{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking size of char" >&5
+printf %s "checking size of char... " >&6; }
+if test ${ac_cv_sizeof_char+y}
+then :
+  printf %s "(cached) " >&6
+else $as_nop
+  if ac_fn_c_compute_int "$LINENO" "(long int) (sizeof (char))" "ac_cv_sizeof_char"        "$ac_includes_default"
+then :
+
+else $as_nop
+  if test "$ac_cv_type_char" = yes; then
+     { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5
+printf "%s\n" "$as_me: error: in \`$ac_pwd':" >&2;}
+as_fn_error 77 "cannot compute sizeof (char)
+See \`config.log' for more details" "$LINENO" 5; }
+   else
+     ac_cv_sizeof_char=0
+   fi
+fi
+
+fi
+{ printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_sizeof_char" >&5
+printf "%s\n" "$ac_cv_sizeof_char" >&6; }
+
+
+
+printf "%s\n" "#define SIZEOF_CHAR $ac_cv_sizeof_char" >>confdefs.h
+
+
 
 
 # Check whether --enable-immfix was given.
@@ -8134,6 +8166,7 @@ else $as_nop
   cat confdefs.h - <<_ACEOF >conftest.$ac_ext
 /* end confdefs.h.  */
 
+                    #include <unistd.h>
 		    #include <stdio.h>
 		    #include <stdlib.h>
 		    int main(int argc,char *argv[],char *envp[]) {
@@ -8171,6 +8204,7 @@ else $as_nop
   cat confdefs.h - <<_ACEOF >conftest.$ac_ext
 /* end confdefs.h.  */
 
+                    #include <unistd.h>
 		    #include <stdio.h>
 		    #include <stdlib.h>
 		    int main(int argc,char * argv[],char * envp[]) {
@@ -8208,6 +8242,7 @@ else $as_nop
   cat confdefs.h - <<_ACEOF >conftest.$ac_ext
 /* end confdefs.h.  */
 
+                    #include <unistd.h>
 		    #include <stdio.h>
 		    #include <stdlib.h>
 		    int main(int argc,char * argv[],char * envp[]) {
@@ -8258,6 +8293,7 @@ else $as_nop
   cat confdefs.h - <<_ACEOF >conftest.$ac_ext
 /* end confdefs.h.  */
 
+                #include <unistd.h>
 		#include <stdio.h>
 		#include <stdlib.h>
 		int main(int argc,char **argv,char **envp) {
@@ -8298,6 +8334,7 @@ else $as_nop
   cat confdefs.h - <<_ACEOF >conftest.$ac_ext
 /* end confdefs.h.  */
 
+                #include <unistd.h>
 		#include <stdio.h>
 		#include <stdlib.h>
 		int main(int argc,char **argv,char **envp) {
@@ -9838,6 +9875,7 @@ printf %s "checking RL_COMPLETION_ENTRY_
                                  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
 /* end confdefs.h.  */
 
+                                                  #include <stdio.h>
                                                   #include <readline/readline.h>
 						  extern Function *rl_completion_entry_function __attribute__((weak));
 
@@ -9864,6 +9902,7 @@ printf %s "checking RL_COMPLETION_ENTRY_
                                          cat confdefs.h - <<_ACEOF >conftest.$ac_ext
 /* end confdefs.h.  */
 
+						          #include <stdio.h>
 		                                          #include <readline/readline.h>
 							  extern rl_compentry_func_t *rl_completion_entry_function __attribute__((weak));
 
@@ -9896,6 +9935,7 @@ printf %s "checking RL_READLINE_NAME_TYP
                                  cat confdefs.h - <<_ACEOF >conftest.$ac_ext
 /* end confdefs.h.  */
 
+					          #include <stdio.h>
 		                                  #include <readline/readline.h>
 		                                  extern char *rl_readline_name __attribute__((weak));
 
@@ -9922,6 +9962,7 @@ printf %s "checking RL_READLINE_NAME_TYP
                                          cat confdefs.h - <<_ACEOF >conftest.$ac_ext
 /* end confdefs.h.  */
 
+						          #include <stdio.h>
 		                                          #include <readline/readline.h>
 		                                          extern const char *rl_readline_name __attribute__((weak));
 
--- gcl27-2.7.0.orig/configure.in
+++ gcl27-2.7.0/configure.in
@@ -5,9 +5,6 @@ AC_CONFIG_HEADERS([h/gclincl.h])
 VERSION=`cat majvers`.`cat minvers`
 AC_SUBST(VERSION)
 
-AC_USE_SYSTEM_EXTENSIONS
-AC_INCLUDES_DEFAULT([])
-
 AC_ARG_ENABLE(xgcl,[ --enable-xgcl=yes will compile in support for XGCL],
 [enable_xgcl=$enableval],[enable_xgcl="yes"])
 
@@ -390,7 +387,6 @@ AC_ARG_ENABLE([gprof],[  --enable-gprof
 	      [if test "$enableval" != "yes" ; then GPROF=""; fi])
 
 if test "$GPROF" != "" ; then
-   AC_MSG_CHECKING([working gprof])
    case $use in
        powerpc*) if test "$host_cpu" = "powerpc64le" ; then GPROF=""; fi;;
        s390*) GPROF="";;#mcount smashes float args in make_shortfloat 20180313
@@ -402,14 +398,15 @@ if test "$GPROF" != "" ; then
        aarch64*) GPROF="";;#unreproducible buildd bug 20170824
        *gnu)  GPROF="";;
    esac
+   OLD_CFLAGS=$CFLAGS
    if ! add_arg_to_cflags -pg ; then GPROF="" ; fi
+   CFLAGS=$OLD_CFLAGS
+   AC_MSG_CHECKING([working gprof])
    if test "$GPROF" = "" ; then
        AC_MSG_RESULT([disabled])
    else
        AC_MSG_RESULT([ok])
-       OLD_CFLAGS=$CFLAGS  # Do not run configure tests with -pg
-       assert_arg_to_cflags -pg
-       CFLAGS=$OLD_CFLAGS
+       AC_DEFINE(USE_GPROF,1,[use gprof])
    fi
 fi
 AC_SUBST(GPROF)
@@ -1006,6 +1003,7 @@ esac
 AC_CHECK_SIZEOF(long,0)
 AC_CHECK_SIZEOF(short,0)
 AC_CHECK_SIZEOF(int,0)
+AC_CHECK_SIZEOF(char,0)
 
 
 AC_ARG_ENABLE([immfix],[  --enable-immfix will enable an immediate fixnum table above the C stack])
@@ -1240,6 +1238,7 @@ if test "$HAVE_SBRK" = "1" ; then
     AC_RUN_IFELSE(
 	[AC_LANG_SOURCE(
 		[[
+                    #include <unistd.h>
 		    #include <stdio.h>
 		    #include <stdlib.h>
 		    int main(int argc,char *argv[],char *envp[]) {
@@ -1256,6 +1255,7 @@ if test "$HAVE_SBRK" = "1" ; then
     AC_RUN_IFELSE(
 	[AC_LANG_SOURCE(
 		[[
+                    #include <unistd.h>
 		    #include <stdio.h>
 		    #include <stdlib.h>
 		    int main(int argc,char * argv[],char * envp[]) {
@@ -1277,6 +1277,7 @@ if test "$HAVE_SBRK" = "1" ; then
     AC_RUN_IFELSE(
 	[AC_LANG_SOURCE(
 		[[
+                    #include <unistd.h>
 		    #include <stdio.h>
 		    #include <stdlib.h>
 		    int main(int argc,char * argv[],char * envp[]) {
@@ -1308,6 +1309,7 @@ AC_MSG_CHECKING(CSTACK_DIRECTION)
 AC_RUN_IFELSE(
     [AC_LANG_SOURCE(
 	    [[
+                #include <unistd.h>
 		#include <stdio.h>
 		#include <stdlib.h>
 		int main(int argc,char **argv,char **envp) {
@@ -1327,6 +1329,7 @@ AC_MSG_CHECKING([finding CSTACK_ALIGNMEN
 AC_RUN_IFELSE(
     [AC_LANG_SOURCE(
 	    [[
+                #include <unistd.h>
 		#include <stdio.h>
 		#include <stdlib.h>
 		int main(int argc,char **argv,char **envp) {
@@ -1894,6 +1897,7 @@ if test "$enable_readline" != "no" ; the
                                  AC_COMPILE_IFELSE(
                                         [AC_LANG_PROGRAM(
 	                                       [[
+                                                  #include <stdio.h>
                                                   #include <readline/readline.h>
 						  extern Function *rl_completion_entry_function __attribute__((weak));
 	    				       ]],
@@ -1905,6 +1909,7 @@ if test "$enable_readline" != "no" ; the
                                          AC_COMPILE_IFELSE(
                                                 [AC_LANG_PROGRAM(
 	                                               [[
+						          #include <stdio.h>
 		                                          #include <readline/readline.h>
 							  extern rl_compentry_func_t *rl_completion_entry_function __attribute__((weak));
 	                                               ]],
@@ -1918,6 +1923,7 @@ if test "$enable_readline" != "no" ; the
                                  AC_COMPILE_IFELSE(
                                         [AC_LANG_PROGRAM(
 	                                       [[
+					          #include <stdio.h>
 		                                  #include <readline/readline.h>
 		                                  extern char *rl_readline_name __attribute__((weak));
 	                                       ]],
@@ -1929,6 +1935,7 @@ if test "$enable_readline" != "no" ; the
                                          AC_COMPILE_IFELSE(
                                                 [AC_LANG_PROGRAM(
 	                                               [[
+						          #include <stdio.h>
 		                                          #include <readline/readline.h>
 		                                          extern const char *rl_readline_name __attribute__((weak));
 	                                               ]],
--- gcl27-2.7.0.orig/gcl-tk/comm.c
+++ gcl27-2.7.0/gcl-tk/comm.c
@@ -34,11 +34,11 @@ available on FD, 0 if timeout reached an
   FD_SET(fd, &inp);
   n = select(fd + 1, &inp, NULL, NULL, &t);
   if (n < 0)
-    return make_fixnum1(-1);
+    return make_fixnum(-1);
   else if (FD_ISSET(fd, &inp))
-    return make_fixnum1(1);
+    return make_fixnum(1);
   else
-    return make_fixnum1(0);
+    return make_fixnum(0);
 }
 #ifdef STATIC_FUNCTION_POINTERS
 object
@@ -182,24 +182,25 @@ int m;
       sfd->valid_data=sfd->read_buffer;}
    /* there is at least a packet size of space available */   
   if ((fix(FFN(fScheck_fd_for_input)(sfd->fd,sfd->write_timeout))>0)) {
-
-    char *start = sfd->valid_data+sfd->valid_data_size;
   again:
-    nread = SAFE_READ(sfd->fd,start,sfd->read_buffer_size - (start -  sfd->read_buffer));
-    if (nread<0) {
-      if (errno == EAGAIN) goto again;
-      return -1;
-    }
-    if (nread == 0)  { 
-      return 0;
+    {
+      char *start = sfd->valid_data+sfd->valid_data_size;
+      nread = SAFE_READ(sfd->fd,start,sfd->read_buffer_size - (start -  sfd->read_buffer));
+      if (nread<0) {
+	if (errno == EAGAIN) goto again;
+	return -1;
+      }
+      if (nread == 0)  { 
+	return 0;
+      }
+      sfd->total_bytes_received +=  nread;
+      sfd->bytes_received_not_confirmed +=  nread;
+      sfd->valid_data_size += nread; 
+      if(sfd->bytes_received_not_confirmed > MUST_CONFIRM)
+	send_confirmation(sfd);
+      scan_headers(sfd); 
+      goto TRY_PACKET;
     }
-    sfd->total_bytes_received +=  nread;
-    sfd->bytes_received_not_confirmed +=  nread;
-    sfd->valid_data_size += nread; 
-    if(sfd->bytes_received_not_confirmed > MUST_CONFIRM)
-      send_confirmation(sfd);
-    scan_headers(sfd); 
-    goto TRY_PACKET;
   }
 
   return 0;
@@ -270,7 +271,7 @@ DEFUN("CLEAR-CONNECTION",object,fSclear_
   while (fix(FFN(fScheck_fd_for_input)(fd,0)))
     n+=read(fd,buffer,sizeof(buffer));
   
-  return make_fixnum1(n);
+  return make_fixnum(n);
 
 }
 #ifdef STATIC_FUNCTION_POINTERS
--- gcl27-2.7.0.orig/gcl-tk/guis.c
+++ gcl27-2.7.0/gcl-tk/guis.c
@@ -497,13 +497,3 @@ connection_failure(s)
      char *s;
 { fprintf(stderr,"connection_failure:%s",s); abort();
 }
-
-object
-make_fixnum1(long i) {
-
-  static union lispunion lu; 
-
-  lu.FIX.FIXVAL=i;
-  return &lu;
-
-}
--- gcl27-2.7.0.orig/gcl-tk/sheader.h
+++ gcl27-2.7.0/gcl-tk/sheader.h
@@ -104,7 +104,7 @@ struct connection_state
 extern struct connection_state *dsfd;
 
 #define fScheck_dsfd_for_input(sf,timeout) \
- (sf->valid_data_size > 0 ? make_fixnum1(1) : fScheck_fd_for_input(sf->fd,timeout))
+ (sf->valid_data_size > 0 ? make_fixnum(1) : fScheck_fd_for_input(sf->fd,timeout))
 
 #define OBJ_TO_CONNECTION_STATE(x) \
   ((struct connection_state *)(void *)((x)->ust.ust_self))
--- gcl27-2.7.0.orig/gcl-tk/tkMain.c
+++ gcl27-2.7.0/gcl-tk/tkMain.c
@@ -263,7 +263,7 @@ TkX_Wish (argc, argv)
      * specified on the command line.
      */
 
-    args = Tcl_Merge(argc-1, (void *)argv+1);
+    args = Tcl_Merge(argc-1, (const char **)argv+1);
     Tcl_SetVar(interp, "argv", args, TCL_GLOBAL_ONLY);
     ckfree(args);
     sprintf(buf, "%d", argc-1);
--- gcl27-2.7.0.orig/git.tag
+++ gcl27-2.7.0/git.tag
@@ -1,2 +1,2 @@
-"Version_2_7_0pre9"
+"Version_2_7_0pre10"
 
--- gcl27-2.7.0.orig/h/386-macosx.h
+++ gcl27-2.7.0/h/386-macosx.h
@@ -186,6 +186,8 @@ if (realpath (buf, fub) == 0) {
 
 #ifdef __x86_64__
 #define FPE_RLST "RAX RBX RCX RDX RDI RSI RBP RSP R8 R9 R10 R11 R12 R13 R14 R15 RIP RFLAGS CS FS GS"
+#elif defined(__i386__)
+#define FPE_RLST "GS FS ES DS EDI ESI EBP ESP EBX EDX ECX EAX TRAPNO ERR EIP CS EFL UESP SS"
 #else
 #error Missing reg list
 #endif
--- gcl27-2.7.0.orig/h/gclincl.h.in
+++ gcl27-2.7.0/h/gclincl.h.in
@@ -375,6 +375,9 @@
 /* have sigcontext of signal.h */
 #undef SIGNAL_H_HAS_SIGCONTEXT
 
+/* The size of `char', as computed by sizeof. */
+#undef SIZEOF_CHAR
+
 /* sizeof linked list for contiguous pages */
 #undef SIZEOF_CONTBLOCK
 
@@ -415,6 +418,9 @@
 /* use fionbio for non-blocking io */
 #undef USE_FIONBIO
 
+/* use gprof */
+#undef USE_GPROF
+
 /* use readline library */
 #undef USE_READLINE
 
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Available-Symbols.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Available Symbols (GCL SI Manual)</title>
+
+<meta name="description" content="Available Symbols (GCL SI Manual)">
+<meta name="keywords" content="Available Symbols (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="C-Interface.html" rel="up" title="C Interface">
+<link href="C-Interface.html" rel="prev" title="C Interface">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Available-Symbols">
+<div class="nav-panel">
+<p>
+Previous: <a href="C-Interface.html" accesskey="p" rel="prev">C Interface</a>, Up: <a href="C-Interface.html" accesskey="u" rel="up">C Interface</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Available-Symbols-1"><span>16.1 Available Symbols<a class="copiable-link" href="#Available-Symbols-1"> &para;</a></span></h3>
+
+<p>When GCL is built, those symbols in the system libraries which
+are referenced by functions linked in in the list of objects
+given in <samp class="file">unixport/makefile</samp>, become available for reference
+by GCL code.
+</p>
+<p>On some systems it is possible with <code class="code">faslink</code> to load <samp class="file">.o</samp> files
+which reference other libraries, but in general this practice is not
+portable.
+</p>
+
+
+
+
+
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Bignums.html
@@ -0,0 +1,112 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Bignums (GCL SI Manual)</title>
+
+<meta name="description" content="Bignums (GCL SI Manual)">
+<meta name="keywords" content="Bignums (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="GCL-Specific.html" rel="up" title="GCL Specific">
+<link href="GCL-Specific.html" rel="prev" title="GCL Specific">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Bignums">
+<div class="nav-panel">
+<p>
+Previous: <a href="GCL-Specific.html" accesskey="p" rel="prev">GCL Specific</a>, Up: <a href="GCL-Specific.html" accesskey="u" rel="up">GCL Specific</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Bignums-1"><span>15.1 Bignums<a class="copiable-link" href="#Bignums-1"> &para;</a></span></h3>
+
+<p>A directory mp was added to hold the new multi precision arithmetic
+code.  The layout and a fair amount of code in the mp directory is an
+enhanced version of gpari version 34. The gpari c code was rewritten
+to be more efficient, and gcc assembler macros were added to allow
+inlining of operations not possible to do in C.  On a 68K machine,
+this allows the C version to be as efficient as the very carefully
+written assembler in the gpari distribution.  For the main machines,
+an assembler file (produced by gcc) based on this new method, is
+included.   This is for sites which do not have gcc, or do not
+wish to compile the whole system with gcc.
+</p>
+<p>Bignum arithmetic is much faster now.  Many changes were made to
+cmpnew also, to add &rsquo;integer&rsquo; as a new type.  It differs from
+variables of other types, in that storage is associated to each such
+variable, and assignments mean copying the storage.  This allows a
+function which does a good deal of bignum arithmetic, to do very
+little consing in the heap.  An example is the computation of PI-INV
+in scratchpad, which calculates the inverse of pi to a prescribed
+number of bits accuracy.  That function is now about 20 times faster,
+and no longer causes garbage collection.  In versions of GCL  where
+HAVE_ALLOCA is defined, the temporary storage growth is on the C
+stack, although this often not so critical (for example it makes
+virtually no difference in the PI-INV example, since in spite of the
+many operations, only one storage allocation takes place.
+</p>	
+<p>Below is the actual code for PI-INV
+</p>
+<p>On a sun3/280 (cli.com)
+</p>
+<p>Here is the comparison of lucid and gcl before and after
+on that pi-inv.   Times are in seconds with multiples of the
+gcl/akcl time in parentheses.
+</p>
+<p>On a sun3/280 (cli.com)
+</p>
+<div class="example">
+<pre class="example-preformatted">
+
+pi-inv   akcl-566  franz        lucid         old kcl/akcl
+----------------------------------------
+10000      3.3     9.2(2.8 X)  15.3 (4.6X)    92.7   (29.5 X)
+20000      12.7    31.0(2.4 X) 62.2 (4.9X)    580.0  (45.5 X)
+
+
+(defun pi-inv (bits &amp;aux (m 0))
+  (declare (integer bits m))
+  (let* ((n (+ bits (integer-length bits) 11))
+         (tt (truncate (ash 1 n) 882))
+         (d (* 4 882 882))
+         (s 0))
+    (declare (integer s d tt n))
+    (do ((i 2 (+ i 2))
+         (j 1123 (+ j 21460)))
+        ((zerop tt) (cons s (- (+ n 2))))
+      (declare (integer i j))
+        (setq s (+ s (* j tt))
+              m (- (* (- i 1) (- (* 2 i) 1) (- (* 2 i) 3)))
+              tt (truncate (* m tt) (* d (the integer (expt i 3))))))))
+
+</pre></div>
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="GCL-Specific.html">GCL Specific</a>, Up: <a href="GCL-Specific.html">GCL Specific</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/C-Interface.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>C Interface (GCL SI Manual)</title>
+
+<meta name="description" content="C Interface (GCL SI Manual)">
+<meta name="keywords" content="C Interface (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="System-Definitions.html" rel="next" title="System Definitions">
+<link href="GCL-Specific.html" rel="prev" title="GCL Specific">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="C-Interface">
+<div class="nav-panel">
+<p>
+Next: <a href="System-Definitions.html" accesskey="n" rel="next">System Definitions</a>, Previous: <a href="GCL-Specific.html" accesskey="p" rel="prev">GCL Specific</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="C-Interface-1"><span>16 C Interface<a class="copiable-link" href="#C-Interface-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Available-Symbols.html" accesskey="1">Available Symbols</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Characters.html
@@ -0,0 +1,469 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Characters (GCL SI Manual)</title>
+
+<meta name="description" content="Characters (GCL SI Manual)">
+<meta name="keywords" content="Characters (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Lists.html" rel="next" title="Lists">
+<link href="Sequences-and-Arrays-and-Hash-Tables.html" rel="prev" title="Sequences and Arrays and Hash Tables">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Lists.html" accesskey="n" rel="next">Lists</a>, Previous: <a href="Sequences-and-Arrays-and-Hash-Tables.html" accesskey="p" rel="prev">Sequences and Arrays and Hash Tables</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Characters-1"><span>3 Characters<a class="copiable-link" href="#Characters-1"> &para;</a></span></h2>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NAME_002dCHAR"><span class="category-def">Function: </span><span><strong class="def-name">NAME-CHAR</strong> <var class="def-var-arguments">(name)</var><a class="copiable-link" href="#index-NAME_002dCHAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Given an argument acceptable to string,
+Returns a character object whose name is NAME if one exists.  Returns NIL
+otherwise.  NAME must be an object that can be coerced to a string.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_002dNAME"><span class="category-def">Function: </span><span><strong class="def-name">CHAR-NAME</strong> <var class="def-var-arguments">(char)</var><a class="copiable-link" href="#index-CHAR_002dNAME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the name for CHAR as a string; NIL if CHAR has no name.
+Only #\Backspace, #\Tab, #\Newline (or #\Linefeed), #\Page, #\Return,
+and #\Rubout have names.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BOTH_002dCASE_002dP"><span class="category-def">Function: </span><span><strong class="def-name">BOTH-CASE-P</strong> <var class="def-var-arguments">(char)</var><a class="copiable-link" href="#index-BOTH_002dCASE_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if CHAR is an alphabetic character; NIL otherwise.  Equivalent to
+ALPHA-CHAR-P.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SCHAR"><span class="category-def">Function: </span><span><strong class="def-name">SCHAR</strong> <var class="def-var-arguments">(simple-string index)</var><a class="copiable-link" href="#index-SCHAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the character object representing the INDEX-th character in STRING.
+This is faster than CHAR.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-CHAR_002dSUPER_002dBIT"><span class="category-def">Constant: </span><span><strong class="def-name">CHAR-SUPER-BIT</strong><a class="copiable-link" href="#index-CHAR_002dSUPER_002dBIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The bit that indicates a super character.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-CHAR_002dFONT_002dLIMIT"><span class="category-def">Constant: </span><span><strong class="def-name">CHAR-FONT-LIMIT</strong><a class="copiable-link" href="#index-CHAR_002dFONT_002dLIMIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The upper exclusive bound on values produced by CHAR-FONT.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_002dDOWNCASE"><span class="category-def">Function: </span><span><strong class="def-name">CHAR-DOWNCASE</strong> <var class="def-var-arguments">(char)</var><a class="copiable-link" href="#index-CHAR_002dDOWNCASE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the lower-case equivalent of CHAR, if any.
+If not, simply returns CHAR.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002dCHAR_002dP"><span class="category-def">Function: </span><span><strong class="def-name">STRING-CHAR-P</strong> <var class="def-var-arguments">(char)</var><a class="copiable-link" href="#index-STRING_002dCHAR_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if CHAR can be stored in a string.  In GCL, this function always
+returns T since any character in GCL can be stored in a string.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_002dNOT_002dLESSP"><span class="category-def">Function: </span><span><strong class="def-name">CHAR-NOT-LESSP</strong> <var class="def-var-arguments">(char &amp;rest more-chars)</var><a class="copiable-link" href="#index-CHAR_002dNOT_002dLESSP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if the codes of CHARs are in strictly non-increasing order; NIL
+otherwise.  For a lower-case character, the code of its upper-case equivalent
+is used.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DISASSEMBLE"><span class="category-def">Function: </span><span><strong class="def-name">DISASSEMBLE</strong> <var class="def-var-arguments">(thing)</var><a class="copiable-link" href="#index-DISASSEMBLE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Compiles the form specified by THING and prints the intermediate C language
+code for that form.  But does NOT install the result of compilation.
+If THING is a symbol that names a not-yet-compiled function, the function
+definition is disassembled.
+If THING is a lambda expression, it is disassembled as a function definition.
+Otherwise, THING itself is disassembled as a top-level form.
+</p>
+
+</dd></dl>
+
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOWER_002dCASE_002dP"><span class="category-def">Function: </span><span><strong class="def-name">LOWER-CASE-P</strong> <var class="def-var-arguments">(char)</var><a class="copiable-link" href="#index-LOWER_002dCASE_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if CHAR is a lower-case character; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_003c_003d"><span class="category-def">Function: </span><span><strong class="def-name">CHAR&lt;=</strong> <var class="def-var-arguments">(char &amp;rest more-chars)</var><a class="copiable-link" href="#index-CHAR_003c_003d"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if the codes of CHARs are in strictly non-decreasing order; NIL
+otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-CHAR_002dHYPER_002dBIT"><span class="category-def">Constant: </span><span><strong class="def-name">CHAR-HYPER-BIT</strong><a class="copiable-link" href="#index-CHAR_002dHYPER_002dBIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The bit that indicates a hyper character.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CODE_002dCHAR"><span class="category-def">Function: </span><span><strong class="def-name">CODE-CHAR</strong> <var class="def-var-arguments">(code &amp;optional (bits 0) (font 0))</var><a class="copiable-link" href="#index-CODE_002dCHAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a character object with the specified code, if any.
+If not, returns NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_002dCODE"><span class="category-def">Function: </span><span><strong class="def-name">CHAR-CODE</strong> <var class="def-var-arguments">(char)</var><a class="copiable-link" href="#index-CHAR_002dCODE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the code attribute of CHAR.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-CHAR_002dCONTROL_002dBIT"><span class="category-def">Constant: </span><span><strong class="def-name">CHAR-CONTROL-BIT</strong><a class="copiable-link" href="#index-CHAR_002dCONTROL_002dBIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The bit that indicates a control character.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_002dLESSP"><span class="category-def">Function: </span><span><strong class="def-name">CHAR-LESSP</strong> <var class="def-var-arguments">(char &amp;rest more-chars)</var><a class="copiable-link" href="#index-CHAR_002dLESSP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if the codes of CHARs are in strictly increasing order; NIL
+otherwise.  For a lower-case character, the code of its upper-case equivalent
+is used.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_002dFONT"><span class="category-def">Function: </span><span><strong class="def-name">CHAR-FONT</strong> <var class="def-var-arguments">(char)</var><a class="copiable-link" href="#index-CHAR_002dFONT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the font attribute of CHAR.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_003c"><span class="category-def">Function: </span><span><strong class="def-name">CHAR&lt;</strong> <var class="def-var-arguments">(char &amp;rest more-chars)</var><a class="copiable-link" href="#index-CHAR_003c"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if the codes of CHARs are in strictly increasing order; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_003e_003d"><span class="category-def">Function: </span><span><strong class="def-name">CHAR&gt;=</strong> <var class="def-var-arguments">(char &amp;rest more-chars)</var><a class="copiable-link" href="#index-CHAR_003e_003d"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if the codes of CHARs are in strictly non-increasing order; NIL
+otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-CHAR_002dMETA_002dBIT"><span class="category-def">Constant: </span><span><strong class="def-name">CHAR-META-BIT</strong><a class="copiable-link" href="#index-CHAR_002dMETA_002dBIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The bit that indicates a meta character.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GRAPHIC_002dCHAR_002dP"><span class="category-def">Function: </span><span><strong class="def-name">GRAPHIC-CHAR-P</strong> <var class="def-var-arguments">(char)</var><a class="copiable-link" href="#index-GRAPHIC_002dCHAR_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if CHAR is a printing character, i.e., #\Space through #\~;
+NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_002dNOT_002dEQUAL"><span class="category-def">Function: </span><span><strong class="def-name">CHAR-NOT-EQUAL</strong> <var class="def-var-arguments">(char &amp;rest more-chars)</var><a class="copiable-link" href="#index-CHAR_002dNOT_002dEQUAL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if no two of CHARs are the same character; NIL otherwise.
+Upper case character and its lower case equivalent are regarded the same.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-CHAR_002dBITS_002dLIMIT"><span class="category-def">Constant: </span><span><strong class="def-name">CHAR-BITS-LIMIT</strong><a class="copiable-link" href="#index-CHAR_002dBITS_002dLIMIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The upper exclusive bound on values produced by CHAR-BITS.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHARACTERP"><span class="category-def">Function: </span><span><strong class="def-name">CHARACTERP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CHARACTERP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a character; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_003d"><span class="category-def">Function: </span><span><strong class="def-name">CHAR=</strong> <var class="def-var-arguments">(char &amp;rest more-chars)</var><a class="copiable-link" href="#index-CHAR_003d"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if all CHARs are the same character; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ALPHA_002dCHAR_002dP"><span class="category-def">Function: </span><span><strong class="def-name">ALPHA-CHAR-P</strong> <var class="def-var-arguments">(char)</var><a class="copiable-link" href="#index-ALPHA_002dCHAR_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if CHAR is an alphabetic character, A-Z or a-z; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-UPPER_002dCASE_002dP"><span class="category-def">Function: </span><span><strong class="def-name">UPPER-CASE-P</strong> <var class="def-var-arguments">(char)</var><a class="copiable-link" href="#index-UPPER_002dCASE_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if CHAR is an upper-case character; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_002dBIT"><span class="category-def">Function: </span><span><strong class="def-name">CHAR-BIT</strong> <var class="def-var-arguments">(char name)</var><a class="copiable-link" href="#index-CHAR_002dBIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if the named bit is on in the character CHAR; NIL otherwise.
+In GCL, this function always returns NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dCHAR"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-CHAR</strong> <var class="def-var-arguments">(char &amp;optional (bits 0) (font 0))</var><a class="copiable-link" href="#index-MAKE_002dCHAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a character object with the same code attribute as CHAR and with
+the specified BITS and FONT attributes.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHARACTER"><span class="category-def">Function: </span><span><strong class="def-name">CHARACTER</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CHARACTER"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Coerces X into a character object if possible.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_002dEQUAL"><span class="category-def">Function: </span><span><strong class="def-name">CHAR-EQUAL</strong> <var class="def-var-arguments">(char &amp;rest more-chars)</var><a class="copiable-link" href="#index-CHAR_002dEQUAL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if all of its arguments are the same character; NIL otherwise.
+Upper case character and its lower case equivalent are regarded the same.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_002dNOT_002dGREATERP"><span class="category-def">Function: </span><span><strong class="def-name">CHAR-NOT-GREATERP</strong> <var class="def-var-arguments">(char &amp;rest more-chars)</var><a class="copiable-link" href="#index-CHAR_002dNOT_002dGREATERP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if the codes of CHARs are in strictly non-decreasing order; NIL
+otherwise.  For a lower-case character, the code of its upper-case equivalent
+is used.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_003e"><span class="category-def">Function: </span><span><strong class="def-name">CHAR&gt;</strong> <var class="def-var-arguments">(char &amp;rest more-chars)</var><a class="copiable-link" href="#index-CHAR_003e"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if the codes of CHARs are in strictly decreasing order; NIL
+otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STANDARD_002dCHAR_002dP"><span class="category-def">Function: </span><span><strong class="def-name">STANDARD-CHAR-P</strong> <var class="def-var-arguments">(char)</var><a class="copiable-link" href="#index-STANDARD_002dCHAR_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if CHAR is a standard character, i.e., one of the 95 ASCII printing
+characters #\Space to #\~ and #Newline; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_002dUPCASE"><span class="category-def">Function: </span><span><strong class="def-name">CHAR-UPCASE</strong> <var class="def-var-arguments">(char)</var><a class="copiable-link" href="#index-CHAR_002dUPCASE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the upper-case equivalent of CHAR, if any.
+If not, simply returns CHAR.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DIGIT_002dCHAR_002dP"><span class="category-def">Function: </span><span><strong class="def-name">DIGIT-CHAR-P</strong> <var class="def-var-arguments">(char &amp;optional (radix 10))</var><a class="copiable-link" href="#index-DIGIT_002dCHAR_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>If CHAR represents a digit in RADIX, then returns the weight as an integer.
+Otherwise, returns nil.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_002f_003d"><span class="category-def">Function: </span><span><strong class="def-name">CHAR/=</strong> <var class="def-var-arguments">(char &amp;rest more-chars)</var><a class="copiable-link" href="#index-CHAR_002f_003d"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if no two of CHARs are the same character; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_002dGREATERP"><span class="category-def">Function: </span><span><strong class="def-name">CHAR-GREATERP</strong> <var class="def-var-arguments">(char &amp;rest more-chars)</var><a class="copiable-link" href="#index-CHAR_002dGREATERP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if the codes of CHARs are in strictly decreasing order; NIL
+otherwise.  For a lower-case character, the code of its upper-case equivalent
+is used.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ALPHANUMERICP"><span class="category-def">Function: </span><span><strong class="def-name">ALPHANUMERICP</strong> <var class="def-var-arguments">(char)</var><a class="copiable-link" href="#index-ALPHANUMERICP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if CHAR is either numeric or alphabetic; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_002dBITS"><span class="category-def">Function: </span><span><strong class="def-name">CHAR-BITS</strong> <var class="def-var-arguments">(char)</var><a class="copiable-link" href="#index-CHAR_002dBITS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the bits attribute (which is always 0 in GCL) of CHAR.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DIGIT_002dCHAR"><span class="category-def">Function: </span><span><strong class="def-name">DIGIT-CHAR</strong> <var class="def-var-arguments">(digit &amp;optional (radix 10) (font 0))</var><a class="copiable-link" href="#index-DIGIT_002dCHAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a character object that represents the DIGIT in the specified RADIX.
+Returns NIL if no such character exists.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SET_002dCHAR_002dBIT"><span class="category-def">Function: </span><span><strong class="def-name">SET-CHAR-BIT</strong> <var class="def-var-arguments">(char name newvalue)</var><a class="copiable-link" href="#index-SET_002dCHAR_002dBIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a character just like CHAR except that the named bit is set or
+cleared, according to whether NEWVALUE is non-NIL or NIL.  This function
+is useless in GCL.
+</p>
+
+</dd></dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Lists.html">Lists</a>, Previous: <a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Command-Line.html
@@ -0,0 +1,169 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Command Line (GCL SI Manual)</title>
+
+<meta name="description" content="Command Line (GCL SI Manual)">
+<meta name="keywords" content="Command Line (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Operating-System.html" rel="up" title="Operating System">
+<link href="Operating-System-Definitions.html" rel="next" title="Operating System Definitions">
+<link href="Operating-System.html" rel="prev" title="Operating System">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Command-Line">
+<div class="nav-panel">
+<p>
+Next: <a href="Operating-System-Definitions.html" accesskey="n" rel="next">Operating System Definitions</a>, Previous: <a href="Operating-System.html" accesskey="p" rel="prev">Operating System</a>, Up: <a href="Operating-System.html" accesskey="u" rel="up">Operating System</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Command-Line-1"><span>9.1 Command Line<a class="copiable-link" href="#Command-Line-1"> &para;</a></span></h3>
+
+<p>The variable si::*command-args* is set to the list of strings passed
+in when gcl is invoked.
+</p>
+<p>Various flags are understood.
+</p><dl class="vtable">
+<dt><a id="index-_002deval"></a><span><code class="code">-eval</code><a class="copiable-link" href="#index-_002deval"> &para;</a></span></dt>
+<dd><p>Call read and then eval on the command argument following <code class="code">-eval</code>
+</p></dd>
+<dt><a id="index-_002dload"></a><span><code class="code">-load</code><a class="copiable-link" href="#index-_002dload"> &para;</a></span></dt>
+<dd><p>Load the file whose pathname is specified after <code class="code">-load</code>.
+</p></dd>
+<dt><a id="index-_002df"></a><span><code class="code">-f</code><a class="copiable-link" href="#index-_002df"> &para;</a></span></dt>
+<dd><p>Replace si::*command-args* by the the list starting after <code class="code">-f</code>.
+Open the file following <code class="code">-f</code> for input, skip the first line, and then
+read and eval the rest of the forms in the file.   This can be used
+as with the shells to write small shell programs:
+</p><div class="example">
+<pre class="example-preformatted">#!/usr/local/bin/gcl.exe -f
+(format t &quot;hello world ~a~%&quot; (nth 1 si::*command-args*))
+</pre></div>
+<p>The value si::*command-args* will have the appropriate value.
+Thus if the above 2 line file is made executable and called <samp class="file">foo</samp>
+then
+</p><div class="example">
+<pre class="example-preformatted">tutorial% foo billy
+hello world billy
+</pre></div>
+<p>NOTE:  On many systems (eg SunOs) the first line of an executable script file
+such as:
+</p><div class="example">
+<pre class="example-preformatted">#!/usr/local/bin/gcl.exe -f
+</pre></div>
+<p>only reads the first 32 characters!   So if your pathname where the executable
+together with the &rsquo;-f&rsquo; amount to more than 32 characters the file will not
+be recognized.   Also the executable must be the actual large binary file,
+[or a link to it], 
+and not just a <code class="code">/bin/sh</code> script.   In latter case the
+<code class="code">/bin/sh</code> interpreter would get invoked on the file.
+</p>
+<p>Alternately one could invoke the file <samp class="file">foo</samp> without making it
+executable:
+</p><div class="example">
+<pre class="example-preformatted">tutorial% gcl -f foo &quot;from bill&quot;
+hello world from bill
+</pre></div>
+
+<p>Finally perhaps the best way (why do we save the best for last..
+I guess because we only figure it out after all the others..)
+The following file <samp class="file">myhello</samp> has 4 lines: 
+</p><div class="example">
+<pre class="example-preformatted">#!/bin/sh
+#| Lisp will skip the next 2 lines on reading
+exec gcl   -f &quot;$0&quot; $&nbsp;|#
+(format t &quot;hello world ~a~%&quot; (nth 1 si::*command-args*))
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted">marie% chmod a+x myhello
+marie% myhello bill
+hello world bill
+</pre></div>
+
+<p>The advantage of this method is that <samp class="file">gcl</samp> can itself
+be a shell script, which sets up environment and
+so on.   Also the normal path will be searched to find <samp class="file">gcl</samp>
+The disadvantage is that this would cause 2 invocations of <samp class="file">sh</samp>
+and one invocation of <samp class="file">gcl</samp>.   The plan using <samp class="file">gcl.exe</samp>
+bypasses the <samp class="file">sh</samp> entirely.  Inded invoking <samp class="file">gcl.exe</samp> to
+print <samp class="file">hello world</samp> is faster on most systems than a similar
+<samp class="file">csh</samp> or <samp class="file">bash</samp> script, but slightly slower than the old
+<samp class="file">sh</samp>.   
+</p>
+
+</dd>
+<dt><a id="index-_002dbatch"></a><span><code class="code">-batch</code><a class="copiable-link" href="#index-_002dbatch"> &para;</a></span></dt>
+<dd><p>Do not enter the command print loop.  Useful if the other command line
+arguments do something.  Do not print the License and acknowledgement
+information.  Note if your program does print any License information,
+it must print the GCL header information also.
+</p></dd>
+<dt><a id="index-_002ddir"></a><span><code class="code">-dir</code><a class="copiable-link" href="#index-_002ddir"> &para;</a></span></dt>
+<dd><p>Directory where the executable binary that is running is located.
+Needed by save and friends.  This gets set as si::*system-directory*
+</p></dd>
+<dt><a id="index-_002dlibdir"></a><span><code class="code">-libdir</code><a class="copiable-link" href="#index-_002dlibdir"> &para;</a></span></dt>
+<dd><div class="example">
+<pre class="example-preformatted">   -libdir <samp class="file">/d/wfs/gcl-2.0/</samp>
+</pre></div>
+<p>would mean that the files like gcl-tk/tk.o would be found by
+concatting the path to the libdir path, ie in
+</p><div class="example">
+<pre class="example-preformatted"><samp class="file">/d/wfs/gcl-2.0/gcl-tk/tk.o</samp>
+</pre></div>
+</dd>
+<dt><a id="index-_002dcompile"></a><span><code class="code">-compile</code><a class="copiable-link" href="#index-_002dcompile"> &para;</a></span></dt>
+<dd><p>Invoke the compiler on the filename following <code class="code">-compile</code>.
+Other flags affect compilation.
+</p></dd>
+<dt><a id="index-_002do_002dfile"></a><span><code class="code">-o-file</code><a class="copiable-link" href="#index-_002do_002dfile"> &para;</a></span></dt>
+<dd><p>If nil follows <code class="code">-o-file</code> then do not produce an <code class="code">.o</code> file.
+</p></dd>
+<dt><a id="index-_002dc_002dfile"></a><span><code class="code">-c-file</code><a class="copiable-link" href="#index-_002dc_002dfile"> &para;</a></span></dt>
+<dd><p>If <code class="code">-c-file</code> is specified, leave the intermediate <code class="code">.c</code> file there.
+</p></dd>
+<dt><a id="index-_002dh_002dfile"></a><span><code class="code">-h-file</code><a class="copiable-link" href="#index-_002dh_002dfile"> &para;</a></span></dt>
+<dd><p>If <code class="code">-h-file</code> is specified, leave the intermediate <code class="code">.h</code> file there.
+</p></dd>
+<dt><a id="index-_002ddata_002dfile"></a><span><code class="code">-data-file</code><a class="copiable-link" href="#index-_002ddata_002dfile"> &para;</a></span></dt>
+<dd><p>If <code class="code">-data-file</code> is specified, leave the intermediate <code class="code">.data</code> file there.
+</p></dd>
+<dt><a id="index-_002dsystem_002dp"></a><span><code class="code">-system-p</code><a class="copiable-link" href="#index-_002dsystem_002dp"> &para;</a></span></dt>
+<dd><p>If <code class="code">-system-p</code> is specified then invoke <code class="code">compile-file</code> with the
+<code class="code">:system-p t</code> keyword argument, meaning that the C init function
+will bear a name based on the name of the file, so that it may be invoked
+by name by C code.
+</p></dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Operating-System-Definitions.html">Operating System Definitions</a>, Previous: <a href="Operating-System.html">Operating System</a>, Up: <a href="Operating-System.html">Operating System</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Compilation.html
@@ -0,0 +1,384 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Compilation (GCL SI Manual)</title>
+
+<meta name="description" content="Compilation (GCL SI Manual)">
+<meta name="keywords" content="Compilation (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Symbols.html" rel="next" title="Symbols">
+<link href="Special-Forms-and-Functions.html" rel="prev" title="Special Forms and Functions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Compilation">
+<div class="nav-panel">
+<p>
+Next: <a href="Symbols.html" accesskey="n" rel="next">Symbols</a>, Previous: <a href="Special-Forms-and-Functions.html" accesskey="p" rel="prev">Special Forms and Functions</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Compilation-1"><span>7 Compilation<a class="copiable-link" href="#Compilation-1"> &para;</a></span></h2>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COMPILE"><span class="category-def">Function: </span><span><strong class="def-name">COMPILE</strong> <var class="def-var-arguments">(name &amp;optional (definition nil))</var><a class="copiable-link" href="#index-COMPILE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>If DEFINITION is NIL, NAME must be the name of a not-yet-compiled
+function.  In this case, COMPILE compiles the function, installs the compiled
+function as the global function definition of NAME, and returns NAME.
+If DEFINITION is non-NIL, it must be a lambda expression and NAME must be
+a symbol.  COMPILE compiles the lambda expression, installs the compiled
+function as the function definition of NAME, and returns NAME.
+There is only one exception for this:  If NAME is NIL, then the compiled
+function is not installed but is simply returned as the value of COMPILE.
+     In any case, COMPILE creates temporary files whose filenames are
+&quot;gazonk***&quot;.  By default, i.e. if :LEAVE-GAZONK is not supplied or is
+NIL, these files are automatically deleted after compilation.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LINK"><span class="category-def">Function: </span><span><strong class="def-name">LINK</strong> <var class="def-var-arguments">(files image &amp;optional post extra-libs (run-user-init t) &amp;aux raw init)</var><a class="copiable-link" href="#index-LINK"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>On systems where dlopen is used for relocations, one cannot make custom
+images containing loaded binary object files simply by loading the files
+and executing save-system.  This function is provided for such cases.
+</p>
+<p>After compiling source files into objects, LINK can be called with a
+list of binary and source FILES which would otherwise normally be
+loaded in sequence before saving the image to IMAGE.  LINK will use
+the system C linker to link the binary files thus supplied with GCL&rsquo;s
+objects, using EXTRA-LIBS as well if provided, and producing a
+raw_IMAGE executable. This executable is then run to initialize first
+GCL&rsquo;s objects, followed by the supplied files, in order, if
+RUN-USER-INIT is set.  In such a case, source files are loaded at
+their position in the sequence.  Any optional code which should be run
+after file initialization can be supplied in the POST variable.  The
+image is then saved using save-system to IMAGE.
+</p>
+<p>This method of creating lisp images may also have the advantage that
+all new object files are kept out of the lisp core and placed instead
+in the final image&rsquo;s .text section.  This should in principle reduce
+the core size, speed up garbage collection, and forego any performance
+penalty induced by data cache flushing on some machines.
+</p>
+
+<p>In both the RAW and SAVED image, any calls to LOAD binary object files
+which have been specified in this list will bypass the normal load
+procedure, and simply initialize the already linked in module.  One
+can rely on this feature by disabling RUN-USER-INIT, and instead
+passing the normal build commands in POST.  In the course of executing
+this code, binary modules previously linked into the .text section of
+the executable will be initialized at the same point at which they
+would have normally been loaded into the lisp core, in the
+executable&rsquo;s .data section.  In this way, the user can choose to take
+advantage of the aforementioned possible benefits of this linking
+method in a relatively transparent way.
+</p>
+<p>All binary objects specified in FILES must have been compiled with
+:SYSTEM-P set to T.
+</p>
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-EVAL_002dWHEN"><span class="category-def">Special Form: </span><span><strong class="def-name">EVAL-WHEN</strong><a class="copiable-link" href="#index-EVAL_002dWHEN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(eval-when ({situation}*) {form}*)
+</pre></div>
+
+<p>A situation must be either COMPILE, LOAD, or EVAL.  The interpreter evaluates
+only when EVAL is specified.  If COMPILE is specified, FORMs are evaluated
+at compile time.  If LOAD is specified, the compiler arranges so that FORMs
+be evaluated when the compiled code is loaded.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COMPILE_002dFILE"><span class="category-def">Function: </span><span><strong class="def-name">COMPILE-FILE</strong> <var class="def-var-arguments">(input-pathname &amp;key output-file (load nil) (message-file nil)  ;GCL specific keywords: system-p c-debug c-file h-file data-file)</var><a class="copiable-link" href="#index-COMPILE_002dFILE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+
+<p>Compiles the file specified by INPUT-PATHNAME and generates a fasl file
+specified by OUTPUT-FILE.  If the filetype is not specified in INPUT-PATHNAME,
+then &quot;.lsp&quot; is used as the default file type for the source file.  :LOAD
+specifies whether to load the generated fasl file after compilation.
+:MESSAGE-FILE specifies the log file for the compiler messages.  It defaults to
+the value of the variable COMPILER:*DEFAULT-MESSAGE-FILE*.  A non-NIL value of
+COMPILER::*COMPILE-PRINT* forces the compiler to indicate the form currently
+being compiled.  More keyword parameters are accepted, depending on the
+version.  Most versions of GCL can receive :O-FILE, :C-FILE, :H-FILE, and
+:DATA-FILE keyword parameters, with which you can control the intermediate
+files generated by the GCL compiler.  Also :C-DEBUG will pass the -g flag to
+the C compiler.
+</p>
+
+<p>By top level forms in a file, we mean the value of *top-level-forms* after
+doing (TF form) for each form read from a file.  We define TF as follows:
+</p>
+<p>(defun TF (x)
+ (when (consp x)
+  (setq x (macroexpand x))
+  (when (consp x)
+     (cond ((member (car x) &rsquo;(progn  eval-when))
+            (mapcar &rsquo;tf (cdr x)))
+           (t  (push x *top-level-forms*))))))
+</p>
+<p>Among the common lisp special forms only DEFUN and DEFMACRO will cause actual
+native machine code to be generated.  The rest will be specially treated in an
+init section of the .data file.  This is done so that things like putprop,setq,
+and many other forms would use up space which could not be usefully freed, if
+we were to compile to native machine code.  If you have other &lsquo;ordinary&rsquo; top
+level forms which you need to have compiled fully to machine code you may
+either set compiler::*COMPILE-ORDINARIES* to t, or put them inside a
+</p>
+<p>(PROGN &rsquo;COMPILE ...forms-which-need-to-be-compiled)
+</p>
+<p>The compiler will take each of them and make a temporary function which will be
+compiled and invoked once.  It is permissible to wrap a (PROGN &rsquo;COMPILE ..)
+around the whole file.  Currently this construction binds the
+compiler::*COMPILE-ORDINARIES* flag to t.  Setting this flag globally to a non
+nil value to cause all top level forms to generate machine code.  This might be
+useful in a system such as PCL, where a number of top level lambda expressions
+are given.  Note that most common lisps will simply ignore the top level atom
+&rsquo;compile, since it has no side effects.
+</p>
+<p>Defentry, clines, and defcfun also result in machine code being generated.
+</p>
+</dd></dl>
+
+</div>
+<div class="unnumbered-level-extent" id="subsection-Evaluation-at-Compile-time">
+<h2 class="unnumbered"><span>subsection Evaluation at Compile time<a class="copiable-link" href="#subsection-Evaluation-at-Compile-time"> &para;</a></span></h2>
+
+<p>In GCL the eval-when behaviour was changed in order to allow
+more efficient init code, and also to bring it into line with the resolution
+passed by the X3j13 committee.  Evaluation at compile time is controlled by
+placing eval-when special forms in the code, or by the value of the variable
+compiler::*eval-when-defaults* [default value :defaults].  If that variable
+has value :defaults, then the following hold:
+</p>
+<p>Eval&nbsp;at&nbsp;Compile&nbsp;Type&nbsp;of&nbsp;Top&nbsp;Level&nbsp;Form<!-- /@w --><br>
+</p>
+<dl class="table">
+<dt>Partial:</dt>
+<dd><p>defstructs, defvar, defparameter
+</p></dd>
+<dt>Full:</dt>
+<dd><p>defmacro, defconstant, defsetf, define-setf-method,
+			deftype, package ops, proclaim
+</p></dd>
+<dt>None:</dt>
+<dd><p>defun, others
+</p></dd>
+</dl>
+
+
+<p>By &lsquo;partial&rsquo; we mean (see the X3J13 Common Lisp document
+(doc/compile-file-handling-of-top-level-forms) for more detail), that functions
+will not be defined, values will not be set, but other miscellaneous compiler
+properties will be set: eg properties to inline expand defstruct accessors and
+testers, defstruct properties allowing subsequent defstructs to include this
+one, any type hierarch information, special variable information will be set up.
+</p>
+<p>Example:
+</p><div class="example">
+<pre class="example-preformatted">(defun foo () 3)
+(defstruct jo a b)
+</pre></div>
+
+<p>As a side effect of compiling these two forms, foo would not have its function
+cell changed.  Neither would jo-a, although it would gain a property which
+allows it to expand inline to a structure access.  Thus if it had a previous
+definition (as commonly happens from previously loading the file), this previous
+definition would not be touched, and could well be inconsistent with the
+compiler properties.  Unfortunately this is what the CL standard says to do,
+and I am just trying to follow it.
+</p>
+<p>If you prefer a more intuitive scheme, of evaling all forms in the file, so
+that there are no inconsistencies, (previous behaviour of AKCL) you may set
+compiler::*eval-when-defaults* to &rsquo;(compile eval load).
+</p>
+<p>The variable compiler::*FASD-DATA* [default t] controls whether an ascii output
+is used for the data section of the object file.  The data section will be in
+ascii if *fasd-data* is nil or if the system-p keyword is supplied to
+compile-file and *fasd-data* is not eq to :system-p.
+</p>
+<p>The old GCL variable *compile-time-too* has disappeared.
+</p>
+<p>See OPTIMIZE on how to enable warnings of slow constructs.
+</p>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PROCLAIM"><span class="category-def">Function: </span><span><strong class="def-name">PROCLAIM</strong> <var class="def-var-arguments">(decl-spec)</var><a class="copiable-link" href="#index-PROCLAIM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Puts the declaration given by DECL-SPEC into effect globally.  See the doc of
+DECLARE for possible DECL-SPECs.
+</p>
+
+</dd></dl>
+
+
+
+
+
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PROVIDE"><span class="category-def">Function: </span><span><strong class="def-name">PROVIDE</strong> <var class="def-var-arguments">(module-name)</var><a class="copiable-link" href="#index-PROVIDE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Adds the specified module to the list of modules maintained in *MODULES*.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COMPILED_002dFUNCTION_002dP"><span class="category-def">Function: </span><span><strong class="def-name">COMPILED-FUNCTION-P</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-COMPILED_002dFUNCTION_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a compiled function; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GPROF_002dSTART"><span class="category-def">Function: </span><span><strong class="def-name">GPROF-START</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-GPROF_002dSTART"> &para;</a></span></dt>
+<dd><p>Package:SYSTEM
+</p>
+<p>GCL now has preliminary support for profiling with gprof, an
+externally supplied profiling tool at the C level which typically
+accompanies gcc.  Support must be enabled at compile time with
+&ndash;enable-gprof.  This function starts the profiling timers and
+counters.
+</p>
+</dd></dl>
+
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GPROF_002dQUIT"><span class="category-def">Function: </span><span><strong class="def-name">GPROF-QUIT</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-GPROF_002dQUIT"> &para;</a></span></dt>
+<dd><p>Package:SYSTEM
+</p>
+<p>GCL now has preliminary support for profiling with gprof, an
+externally supplied profiling tool at the C level which typically
+accompanies gcc.  Support must be enabled at compile time with
+&ndash;enable-gprof.  This function reports the profiling results in the
+form of a call graph to standard output, and clears the profiling
+arrays.  Please note that lisp functions are not (yet) displayed with
+their lisp names.  Please see also the PROFILE function.
+</p>
+</dd></dl>
+
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GPROF_002dSET"><span class="category-def">Function: </span><span><strong class="def-name">GPROF-SET</strong> <var class="def-var-arguments">(begin end)</var><a class="copiable-link" href="#index-GPROF_002dSET"> &para;</a></span></dt>
+<dd><p>Package:SYSTEM
+</p>
+<p>GCL now has preliminary support for profiling with gprof, an
+externally supplied profiling tool at the C level which typically
+accompanies gcc.  Support must be enabled at compile time with
+&ndash;enable-gprof.  This function sets the address range used by
+GPROF-START in specifying the section of the running program which is
+to be profiled.  All subsequent calls to GPROF-START will use this new
+address range.  By default, the range is set to begin at the starting
+address of the .text section, and to end at the current end of the
+running core.  These default values can be restored by calling
+GPROF-SET with both argments set to 0.
+</p>
+</dd></dl>
+
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aDEFAULT_002dSYSTEM_002dP_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*DEFAULT-SYSTEM-P*</strong><a class="copiable-link" href="#index-_002aDEFAULT_002dSYSTEM_002dP_002a"> &para;</a></span></dt>
+<dd><p>Pakcage:COMPILER
+Specifies the default setting of :SYSTEM-P used by COMPILE.  Defaults to NIL.
+</p></dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aDEFAULT_002dC_002dFILE_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*DEFAULT-C-FILE*</strong><a class="copiable-link" href="#index-_002aDEFAULT_002dC_002dFILE_002a"> &para;</a></span></dt>
+<dd><p>Pakcage:COMPILER
+Specifies the default setting of :C-FILE used by COMPILE.  Defaults to NIL.
+</p></dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aDEFAULT_002dH_002dFILE_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*DEFAULT-H-FILE*</strong><a class="copiable-link" href="#index-_002aDEFAULT_002dH_002dFILE_002a"> &para;</a></span></dt>
+<dd><p>Pakcage:COMPILER
+Specifies the default setting of :H-FILE used by COMPILE.  Defaults to NIL.
+</p></dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aDEFAULT_002dDATA_002dFILE_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*DEFAULT-DATA-FILE*</strong><a class="copiable-link" href="#index-_002aDEFAULT_002dDATA_002dFILE_002a"> &para;</a></span></dt>
+<dd><p>Pakcage:COMPILER
+Specifies the default setting of :DATA-FILE used by COMPILE.  Defaults to NIL.
+</p></dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aFEATURES_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*FEATURES*</strong><a class="copiable-link" href="#index-_002aFEATURES_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+List of symbols that name features of the current version of GCL.
+These features are used to decide the read-time conditionalization facility
+provided by &rsquo;#+&rsquo; and &rsquo;#-&rsquo; read macros.  When the GCL reader encounters
+</p><div class="example">
+<pre class="example-preformatted">	#+ feature-description form
+</pre></div>
+<p>it reads FORM in the usual manner if FEATURE-DESCRIPTION is true.  Otherwise,
+the reader just skips FORM.
+</p><div class="example">
+<pre class="example-preformatted">	#- feature-description form
+</pre></div>
+<p>is equivalent to
+</p><div class="example">
+<pre class="example-preformatted">	#- (not feature-description) form
+</pre></div>
+<p>A feature-description may be a symbol, which is true only when it is an
+element of *FEATURES*.  Or else, it must be one of the following:
+</p><div class="example">
+<pre class="example-preformatted">(and feature-desciption-1 ... feature-desciption-n)
+(or  feature-desciption-1 ... feature-desciption-n)
+(not feature-desciption)
+</pre></div>
+<p>The AND description is true only when all of its sub-descriptions are true.
+The OR description is true only when at least one of its sub-descriptions is
+true.  The NOT description is true only when its sub-description is false.
+</p>
+
+</dd></dl>
+
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Symbols.html">Symbols</a>, Previous: <a href="Special-Forms-and-Functions.html">Special Forms and Functions</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Compiler-Definitions.html
@@ -0,0 +1,255 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Compiler Definitions (GCL SI Manual)</title>
+
+<meta name="description" content="Compiler Definitions (GCL SI Manual)">
+<meta name="keywords" content="Compiler Definitions (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="JAPI-GUI-Library-Binding.html" rel="next" title="JAPI GUI Library Binding">
+<link href="Miscellaneous.html" rel="prev" title="Miscellaneous">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Compiler-Definitions">
+<div class="nav-panel">
+<p>
+Next: <a href="JAPI-GUI-Library-Binding.html" accesskey="n" rel="next">JAPI GUI Library Binding</a>, Previous: <a href="Miscellaneous.html" accesskey="p" rel="prev">Miscellaneous</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Compiler-Definitions-1"><span>20 Compiler Definitions<a class="copiable-link" href="#Compiler-Definitions-1"> &para;</a></span></h2>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-EMIT_002dFN"><span class="category-def">Function: </span><span><strong class="def-name">EMIT-FN</strong> <var class="def-var-arguments">(turn-on)</var><a class="copiable-link" href="#index-EMIT_002dFN"> &para;</a></span></dt>
+<dd><p>Package:COMPILER
+</p>
+<p>If TURN-ON is t, the subsequent calls to  COMPILE-FILE will
+cause compilation of foo.lisp to emit a foo.fn as well as foo.o.
+The .fn file contains cross referencing information as well as
+information useful to the collection utilities in cmpnew/collectfn
+This latter file must be manually loaded to call emit-fn.
+</p>
+
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aCMPINCLUDE_002dSTRING_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*CMPINCLUDE-STRING*</strong><a class="copiable-link" href="#index-_002aCMPINCLUDE_002dSTRING_002a"> &para;</a></span></dt>
+<dd><p>Package:COMPILER
+If it is a string it holds the text of the cmpinclude.h file appropriate for
+this version.  Otherwise the usual #include of *cmpinclude* will be used.  To
+disable this feature set *cmpinclude-string* to NIL in the init-form.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-EMIT_002dFN-1"><span class="category-def">Function: </span><span><strong class="def-name">EMIT-FN</strong> <var class="def-var-arguments">(turn-on)</var><a class="copiable-link" href="#index-EMIT_002dFN-1"> &para;</a></span></dt>
+<dd><p>Package:COMPILER
+</p>
+
+<p>If TURN-ON is t, then subsequent calls to compile-file on a file foo.lisp
+cause output of a file foo.fn.  This .fn file contains lisp structures
+describing the functions in foo.lisp.  Some tools for analyzing this data base
+are WHO-CALLS, LIST-UNDEFINED-FUNCTIONS, LIST-UNCALLED-FUNCTIONS, and
+MAKE-PROCLAIMS.
+</p>
+<p>Usage:
+(compiler::emit-fn t)
+(compile-file &quot;foo1.lisp&quot;)
+(compile-file &quot;foo2.lisp&quot;)
+</p>
+<p>This would create foo1.fn and foo2.fn.  These may be loaded using LOAD.  Each
+time compile-file is called the data base is cleared.  Immediately after the
+compilation, the data base consists of data from the compilation.  Thus if you
+wished to find functions called but not defined in the current file, you could
+do (list-undefined-functions), immediately following the compilation.  If you
+have a large system, you would load all the .fn files before using the above
+tools.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dALL_002dPROCLAIMS"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-ALL-PROCLAIMS</strong> <var class="def-var-arguments">(&amp;rest directories)</var><a class="copiable-link" href="#index-MAKE_002dALL_002dPROCLAIMS"> &para;</a></span></dt>
+<dd><p>Package:COMPILER
+</p>
+
+<p>For each D in DIRECTORIES all files in (directory D) are loaded.
+</p>
+<p>For example 
+(make-all-proclaims &quot;lsp/*.fn&quot; &quot;cmpnew/*.fn&quot;)
+would load any files in lsp/*.fn and cmpnew/*.fn.
+</p>
+<p>[See EMIT-FN for details on creation of .fn files] 
+</p>
+<p>Then calculations on the newly loaded .fn files are made, to determine
+function proclamations.  If number of values of a function cannot be
+determined [for example because of a final funcall, or call of a function
+totally unknown at this time] then return type * is assigned.
+</p>
+<p>Finally a file sys-proclaim.lisp is written out.  This file contains function
+proclamations.
+</p>
+<p>(load &quot;sys-proclaim.lisp&quot;)
+(compile-file &quot;foo1.lisp&quot;)
+(compile-file &quot;foo2.lisp&quot;)
+</p>
+
+
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dPROCLAIMS"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-PROCLAIMS</strong> <var class="def-var-arguments">(&amp;optional (stream *standard-output*))</var><a class="copiable-link" href="#index-MAKE_002dPROCLAIMS"> &para;</a></span></dt>
+<dd><p>Package:COMPILER
+</p>
+
+<p>Write to STREAM the function proclaims from the current data base.  Usually a
+number of .fn files are loaded prior to running this.  See EMIT-FN for details
+on how to collect this.  Simply use LOAD to load in .fn files.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LIST_002dUNDEFINED_002dFUNCTIONS"><span class="category-def">Function: </span><span><strong class="def-name">LIST-UNDEFINED-FUNCTIONS</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-LIST_002dUNDEFINED_002dFUNCTIONS"> &para;</a></span></dt>
+<dd><p>Package:COMPILER
+</p>
+
+<p>Return a list of all functions called but not defined, in the current data
+base (see EMIT-FN).
+</p>
+<div class="example">
+<pre class="example-preformatted">Sample:
+(compiler::emit-fn t)
+(compile-file &quot;foo1.lisp&quot;)
+(compiler::list-undefined-functions)
+or
+(mapcar 'load (directory &quot;*.fn&quot;)) (compiler::list-undefined-functions)
+
+</pre></div>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COMPILER_002dDEFAULT_002dTYPE"><span class="category-def">Function: </span><span><strong class="def-name">COMPILER-DEFAULT-TYPE</strong> <var class="def-var-arguments">(pathname)</var><a class="copiable-link" href="#index-COMPILER_002dDEFAULT_002dTYPE"> &para;</a></span></dt>
+<dd><p>Package:COMPILER
+</p>
+<p>Allows you to set the default file extension for compiler source files.
+The argument can either be a pathname or a string.  For example, imagine 
+you have two files, &ldquo;foo.lisp&rdquo; and &ldquo;foo1.lsp&rdquo; in your working 
+directory.  (Note the different extensions.)  Then:
+</p>
+<div class="example">
+<pre class="example-preformatted">
+
+&gt;(compile-file &quot;foo&quot;)
+
+The source file foo.lsp is not found.
+NIL
+
+&gt;(compile-file &quot;foo1&quot;)
+
+Compiling foo1.lsp.
+End of Pass 1.
+End of Pass 2.
+OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
+Finished compiling foo1.
+#p&quot;foo1.o&quot;
+
+&gt;(compiler::COMPILER-default-TYPE &quot;lisp&quot;)
+
+#p&quot;.lisp&quot;
+
+&gt;(compile-file &quot;foo&quot;)
+
+Compiling foo.lisp.
+End of Pass 1.
+End of Pass 2.
+OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
+Finished compiling foo.
+#p&quot;foo.o&quot;
+
+&gt;(compile-file &quot;foo1&quot;)
+
+The source file foo1.lisp is not found.
+NIL
+
+&gt;
+
+</pre></div>
+
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COMPILER_002dRESET_002dTYPE"><span class="category-def">Function: </span><span><strong class="def-name">COMPILER-RESET-TYPE</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-COMPILER_002dRESET_002dTYPE"> &para;</a></span></dt>
+<dd><p>Package:COMPILER
+</p>
+<p>Resets the default compiler input file extension to the GCL historical
+value of #&rdquo;.lsp&rdquo;.
+</p>
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aCC_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*CC*</strong><a class="copiable-link" href="#index-_002aCC_002a"> &para;</a></span></dt>
+<dd><p>Package:COMPILER
+Has value a string which controls which C compiler is used by GCL.
+Usually this string is obtained from the machine.defs file, but
+may be reset by the user, to change compilers or add an include path.
+</p>
+
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aSPLIT_002dFILES_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*SPLIT-FILES*</strong><a class="copiable-link" href="#index-_002aSPLIT_002dFILES_002a"> &para;</a></span></dt>
+<dd><p>Package:COMPILER
+This affects the behaviour of compile-file, and is useful for cases where
+the C compiler cannot handle large C files resulting from lisp compilation.
+This scheme should allow arbitrarily long lisp files to be compiled.
+</p>
+<p>If the  value [default NIL] is a positive integer, then the source file will
+be compiled into several object files whose names have 0,1,2,.. prepended,
+and which will be loaded by the main object file.     File 0 will
+contain compilation of top level forms thru position *split-files* in the
+lisp source file, and file 1 the next forms, etc.   Thus a 180k file
+would probably result in three object files (plus the master object file
+of the same name) if *split-files* was set to 60000.
+The package information will be inserted in each file.
+</p>
+
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aCOMPILE_002dORDINARIES_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*COMPILE-ORDINARIES*</strong><a class="copiable-link" href="#index-_002aCOMPILE_002dORDINARIES_002a"> &para;</a></span></dt>
+<dd><p>Package:COMPILER
+If this has a non nil value [default = nil], then all top level
+forms will be compiled into machine instructions.    Otherwise
+only defun&rsquo;s, defmacro&rsquo;s, and top level forms beginning
+with (progn &rsquo;compile ...) will do so.
+</p>
+
+</dd></dl>
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="JAPI-GUI-Library-Binding.html">JAPI GUI Library Binding</a>, Previous: <a href="Miscellaneous.html">Miscellaneous</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Debugging.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Debugging (GCL SI Manual)</title>
+
+<meta name="description" content="Debugging (GCL SI Manual)">
+<meta name="keywords" content="Debugging (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Miscellaneous.html" rel="next" title="Miscellaneous">
+<link href="System-Definitions.html" rel="prev" title="System Definitions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Debugging">
+<div class="nav-panel">
+<p>
+Next: <a href="Miscellaneous.html" accesskey="n" rel="next">Miscellaneous</a>, Previous: <a href="System-Definitions.html" accesskey="p" rel="prev">System Definitions</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Debugging-1"><span>18 Debugging<a class="copiable-link" href="#Debugging-1"> &para;</a></span></h2>
+
+
+
+
+<ul class="mini-toc">
+<li><a href="Source-Level-Debugging-in-Emacs.html" accesskey="1">Source Level Debugging in Emacs</a></li>
+<li><a href="Low-Level-Debug-Functions.html" accesskey="2">Low Level Debug Functions</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Doc.html
@@ -0,0 +1,152 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Doc (GCL SI Manual)</title>
+
+<meta name="description" content="Doc (GCL SI Manual)">
+<meta name="keywords" content="Doc (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Type.html" rel="next" title="Type">
+<link href="User-Interface.html" rel="prev" title="User Interface">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Doc">
+<div class="nav-panel">
+<p>
+Next: <a href="Type.html" accesskey="n" rel="next">Type</a>, Previous: <a href="User-Interface.html" accesskey="p" rel="prev">User Interface</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Doc-1"><span>13 Doc<a class="copiable-link" href="#Doc-1"> &para;</a></span></h2>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-APROPOS"><span class="category-def">Function: </span><span><strong class="def-name">APROPOS</strong> <var class="def-var-arguments">(string &amp;optional (package nil))</var><a class="copiable-link" href="#index-APROPOS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Prints those symbols whose print-names contain STRING as substring.
+If PACKAGE is non-NIL, then only the specified package is searched.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-INFO"><span class="category-def">Function: </span><span><strong class="def-name">INFO</strong> <var class="def-var-arguments">(string &amp;optional (list-of-info-files *default-info-files*))</var><a class="copiable-link" href="#index-INFO"> &para;</a></span></dt>
+<dd><p>PACKAGE:SI
+</p>
+<p>Find all documentation about STRING in LIST-OF-INFO-FILES.  The search
+is done for STRING as a substring of a node name, or for STRING in the
+indexed entries in the first index for each info file.  Typically that
+should be a variable and function definition index, if the info file is
+about a programming language.  If the windowing system is connected,
+then a choice box is offered and double clicking on an item brings up
+its documentation.
+</p>
+<p>Otherwise a list of choices is offered and the user may select some of
+these choices.
+</p>
+<p>list-of-info-files is of the form
+</p><div class="example">
+<pre class="example-preformatted"> (&quot;gcl-si.info&quot; &quot;gcl-tk.info&quot; &quot;gcl.info&quot;)
+</pre></div>
+<p>The above list is the default value of *default-info-files*,
+a variable in the SI package.   To find these files in the file
+system, the search path *info-paths* is consulted as is the master
+info directory <samp class="file">dir</samp>.
+</p>
+<p>see *Index *default-info-files*:: and *Index *info-paths*::.
+For example
+</p><div class="example">
+<pre class="example-preformatted">(info &quot;defun&quot;)
+
+ 0: DEFUN :(gcl-si.info)Special Forms and Functions.
+ 1: (gcl.info)defun.
+Enter n, all, none, or multiple choices eg 1 3 : 1
+
+Info from file /home/wfs/gcl-doc/gcl.info:
+defun                                                               [Macro]
+---------------------------------------------------------------------------
+`Defun'  function-name lambda-list [[{declaration}* | documentation]]
+...
+
+</pre></div>
+<p>would list the node <code class="code">(gcl.info)defun</code>.
+That is the node entitled <code class="code">defun</code> from the info file gcl.info.   That
+documentation is based on the ANSI common lisp standard.   The choice
+</p><div class="example">
+<pre class="example-preformatted">DEFUN :(gcl-si.info)Special Forms and Functions.
+</pre></div>
+
+<p>refers to the documentation on DEFUN from the info file gcl-si.info in
+the node <i class="i">Special Forms And Functions</i>.  This is an index reference
+and only the part of the node which refers to <code class="code">defun</code> will be
+printed.
+</p>
+<div class="example">
+<pre class="example-preformatted">(info &quot;factor&quot; '(&quot;maxima.info&quot;))
+</pre></div>
+<p>would search the maxima info files index and nodes for <code class="code">factor</code>.
+</p>
+</dd></dl>
+
+
+
+
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002ainfo_002dpaths_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*info-paths*</strong><a class="copiable-link" href="#index-_002ainfo_002dpaths_002a"> &para;</a></span></dt>
+<dd><p>Package SI:
+</p>
+<p>A list of strings such as
+</p><div class="example">
+<pre class="example-preformatted">  '(&quot;&quot; &quot;/usr/info/&quot; &quot;/usr/local/lib/info/&quot; &quot;/usr/local/info/&quot;
+    &quot;/usr/local/gnu/info/&quot; )
+</pre></div>
+<p>saying where to look for the info files.   It is used implicitly
+by <code class="code">info</code>, see *Index info::.
+</p>
+<p>Looking for maxima.info would look for the file
+maxima.info in all the directories listed in *info-paths*.  If nto found
+then it would look for <samp class="file">dir</samp> in the *info-paths* directories,
+and if it were found it would look in the <samp class="file">dir</samp> for a menu item
+such as
+</p>
+<div class="example">
+<pre class="example-preformatted">* maxima: (/home/wfs/maxima-5.0/info/maxima.info).
+</pre></div>
+
+<p>If such an entry exists then the directory there would be used for the
+purpose of finding <code class="code">maxima.info</code>
+</p>
+</dd></dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Type.html">Type</a>, Previous: <a href="User-Interface.html">User Interface</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Environment.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Environment (GCL SI Manual)</title>
+
+<meta name="description" content="Environment (GCL SI Manual)">
+<meta name="keywords" content="Environment (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Miscellaneous.html" rel="up" title="Miscellaneous">
+<link href="Inititialization.html" rel="next" title="Inititialization">
+<link href="Miscellaneous.html" rel="prev" title="Miscellaneous">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Environment">
+<div class="nav-panel">
+<p>
+Next: <a href="Inititialization.html" accesskey="n" rel="next">Initialization</a>, Previous: <a href="Miscellaneous.html" accesskey="p" rel="prev">Miscellaneous</a>, Up: <a href="Miscellaneous.html" accesskey="u" rel="up">Miscellaneous</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Environment-1"><span>19.1 Environment<a class="copiable-link" href="#Environment-1"> &para;</a></span></h3>
+
+<p>The environment in GCL which is passed to macroexpand and
+other functions requesting an environment, should be a
+list of 3 lists.    The first list looks like ((v1 val1) (v2 val2) ..)
+where vi are variables and vali are their values.    
+The second is a list of ((fname1 . fbody1) (fname2 . fbody2) ...)
+where fbody1 is either (macro lambda-list lambda-body) or
+(lambda-list lambda-body) depending on whether this is a macro
+or a function.   The third list contains tags and blocks.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Function-Index.html
@@ -0,0 +1,1000 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Function Index (GCL SI Manual)</title>
+
+<meta name="description" content="Function Index (GCL SI Manual)">
+<meta name="keywords" content="Function Index (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="#Function-Index" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Variable-Index.html" rel="next" title="Variable Index">
+<link href="JAPI-GUI-Library-Binding.html" rel="prev" title="JAPI GUI Library Binding">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+a.summary-letter-printindex {text-decoration: none}
+span:hover a.copiable-link {visibility: visible}
+td.printindex-index-entry {vertical-align: top}
+td.printindex-index-section {vertical-align: top; padding-left: 1em}
+th.entries-header-printindex {text-align:left}
+th.sections-header-printindex {text-align:left; padding-left: 1em}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="appendix-level-extent" id="Function-Index">
+<div class="nav-panel">
+<p>
+Next: <a href="Variable-Index.html" accesskey="n" rel="next">Variable Index</a>, Previous: <a href="JAPI-GUI-Library-Binding.html" accesskey="p" rel="prev">JAPI GUI Library Binding</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="#Function-Index" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="appendix" id="Function-Index-1"><span>Appendix A Function Index<a class="copiable-link" href="#Function-Index-1"> &para;</a></span></h2>
+<div class="printindex fn-printindex">
+<table class="fn-letters-header-printindex"><tr><th>Jump to: &nbsp; </th><td><a class="summary-letter-printindex" href="#Function-Index_fn_symbol-1"><b>-</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_symbol-2"><b>*</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_symbol-3"><b>/</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_symbol-4"><b>+</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_symbol-5"><b>&lt;</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_symbol-6"><b>=</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_symbol-7"><b>&gt;</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_symbol-8"><b>1</b></a>
+ &nbsp; 
+<br>
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-A"><b>A</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-B"><b>B</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-C"><b>C</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-D"><b>D</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-E"><b>E</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-F"><b>F</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-G"><b>G</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-H"><b>H</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-I"><b>I</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-K"><b>K</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-L"><b>L</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-M"><b>M</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-N"><b>N</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-O"><b>O</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-P"><b>P</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-Q"><b>Q</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-R"><b>R</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-S"><b>S</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-T"><b>T</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-U"><b>U</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-V"><b>V</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-W"><b>W</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-X"><b>X</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-Y"><b>Y</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-Z"><b>Z</b></a>
+ &nbsp; 
+</td></tr></table>
+<table class="fn-entries-printindex" border="0">
+<tr><td></td><th class="entries-header-printindex">Index Entry</th><th class="sections-header-printindex">Section</th></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_symbol-1">-</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-_002d"><code>-</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_symbol-2">*</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-_002a"><code>*</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-_002aMAKE_002dCONSTANT"><code>*MAKE-CONSTANT</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-_002aMAKE_002dSPECIAL"><code>*MAKE-SPECIAL</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_symbol-3">/</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-_002f"><code>/</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-_002f_003d"><code>/=</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_symbol-4">+</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-_002b"><code>+</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_symbol-5">&lt;</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-_003c"><code>&lt;</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-_003c_003d"><code>&lt;=</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_symbol-6">=</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-_003d"><code>=</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_symbol-7">&gt;</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-_003e"><code>&gt;</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-_003e_003d"><code>&gt;=</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_symbol-8">1</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-1_002d"><code>1-</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-1_002b"><code>1+</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-A">A</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-ABS"><code>ABS</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-ACCEPT"><code>ACCEPT</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-ACCEPT_002dSOCKET_002dCONNECTION"><code>ACCEPT-SOCKET-CONNECTION</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-ACONS"><code>ACONS</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-ACOS"><code>ACOS</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-ACOSH"><code>ACOSH</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-ADDRESS"><code>ADDRESS</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-ADJOIN"><code>ADJOIN</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-ADJUST_002dARRAY"><code>ADJUST-ARRAY</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-ADJUSTABLE_002dARRAY_002dP"><code>ADJUSTABLE-ARRAY-P</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-ALLOCATE"><code>ALLOCATE</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-ALLOCATE_002dCONTIGUOUS_002dPAGES"><code>ALLOCATE-CONTIGUOUS-PAGES</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-ALLOCATE_002dGROWTH"><code>ALLOCATE-GROWTH</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-ALLOCATE_002dRELOCATABLE_002dPAGES"><code>ALLOCATE-RELOCATABLE-PAGES</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-ALLOCATE_002dSGC"><code>ALLOCATE-SGC</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-ALLOCATED"><code>ALLOCATED</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-ALLOCATED_002dCONTIGUOUS_002dPAGES"><code>ALLOCATED-CONTIGUOUS-PAGES</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-ALLOCATED_002dPAGES"><code>ALLOCATED-PAGES</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-ALLOCATED_002dRELOCATABLE_002dPAGES"><code>ALLOCATED-RELOCATABLE-PAGES</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-ALPHA_002dCHAR_002dP"><code>ALPHA-CHAR-P</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-ALPHANUMERICP"><code>ALPHANUMERICP</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-AND"><code>AND</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-APPEND"><code>APPEND</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-APPLY"><code>APPLY</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-APPLYHOOK"><code>APPLYHOOK</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Doc.html#index-APROPOS"><code>APROPOS</code></a></td><td class="printindex-index-section"><a href="Doc.html">Doc</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-APROPOS_002dLIST"><code>APROPOS-LIST</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-AREF"><code>AREF</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-ARGC"><code>ARGC</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-ARGV"><code>ARGV</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-ARRAY_002dDIMENSION"><code>ARRAY-DIMENSION</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-ARRAY_002dDIMENSIONS"><code>ARRAY-DIMENSIONS</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-ARRAY_002dELEMENT_002dTYPE"><code>ARRAY-ELEMENT-TYPE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-ARRAY_002dHAS_002dFILL_002dPOINTER_002dP"><code>ARRAY-HAS-FILL-POINTER-P</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-ARRAY_002dIN_002dBOUNDS_002dP"><code>ARRAY-IN-BOUNDS-P</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-ARRAY_002dRANK"><code>ARRAY-RANK</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-ARRAY_002dROW_002dMAJOR_002dINDEX"><code>ARRAY-ROW-MAJOR-INDEX</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-ARRAY_002dTOTAL_002dSIZE"><code>ARRAY-TOTAL-SIZE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-ARRAYP"><code>ARRAYP</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-ASH"><code>ASH</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-ASIN"><code>ASIN</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-ASINH"><code>ASINH</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Type.html#index-ASSERT"><code>ASSERT</code></a></td><td class="printindex-index-section"><a href="Type.html">Type</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-ASSOC"><code>ASSOC</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-ASSOC_002dIF"><code>ASSOC-IF</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-ASSOC_002dIF_002dNOT"><code>ASSOC-IF-NOT</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-ATAN"><code>ATAN</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-ATANH"><code>ATANH</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-ATOM"><code>ATOM</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-B">B</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-BDS_002dVAL"><code>BDS-VAL</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-BDS_002dVAR"><code>BDS-VAR</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-BIT"><code>BIT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BIT_002dAND"><code>BIT-AND</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BIT_002dANDC1"><code>BIT-ANDC1</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BIT_002dANDC2"><code>BIT-ANDC2</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-BIT_002dEQV"><code>BIT-EQV</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-BIT_002dIOR"><code>BIT-IOR</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BIT_002dNAND"><code>BIT-NAND</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BIT_002dNOR"><code>BIT-NOR</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-BIT_002dNOT"><code>BIT-NOT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-BIT_002dORC1"><code>BIT-ORC1</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-BIT_002dORC2"><code>BIT-ORC2</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-BIT_002dVECTOR_002dP"><code>BIT-VECTOR-P</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-BIT_002dXOR"><code>BIT-XOR</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-BLOCK"><code>BLOCK</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE"><code>BOOLE</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-BOTH_002dCASE_002dP"><code>BOTH-CASE-P</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-BOUNDP"><code>BOUNDP</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-BREAK"><code>BREAK</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-BREAK_002dFUNCTION"><code>BREAK-FUNCTION</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-BUTLAST"><code>BUTLAST</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-BY"><code>BY</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-BYE"><code>BYE</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BYTE"><code>BYTE</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BYTE_002dPOSITION"><code>BYTE-POSITION</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BYTE_002dSIZE"><code>BYTE-SIZE</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-C">C</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CAAAAR"><code>CAAAAR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CAAADR"><code>CAAADR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CAAAR"><code>CAAAR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CAADAR"><code>CAADAR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CAADDR"><code>CAADDR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CAADR"><code>CAADR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CAAR"><code>CAAR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CADAAR"><code>CADAAR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CADADR"><code>CADADR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CADAR"><code>CADAR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CADDAR"><code>CADDAR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CADDDR"><code>CADDDR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CADDR"><code>CADDR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CADR"><code>CADR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CAR"><code>CAR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-CASE"><code>CASE</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-CATCH"><code>CATCH</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-CATCH_002dBAD_002dSIGNALS"><code>CATCH-BAD-SIGNALS</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-CATCH_002dFATAL"><code>CATCH-FATAL</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-CCASE"><code>CCASE</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CDAAAR"><code>CDAAAR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CDAADR"><code>CDAADR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CDAAR"><code>CDAAR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CDADAR"><code>CDADAR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CDADDR"><code>CDADDR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CDADR"><code>CDADR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CDAR"><code>CDAR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CDDAAR"><code>CDDAAR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CDDADR"><code>CDDADR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CDDAR"><code>CDDAR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CDDDAR"><code>CDDDAR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CDDDDR"><code>CDDDDR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CDDDR"><code>CDDDR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CDDR"><code>CDDR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CDR"><code>CDR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-CEILING"><code>CEILING</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-CERROR"><code>CERROR</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-CHAR"><code>CHAR</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dBIT"><code>CHAR-BIT</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dBITS"><code>CHAR-BITS</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dCODE"><code>CHAR-CODE</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dDOWNCASE"><code>CHAR-DOWNCASE</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dEQUAL"><code>CHAR-EQUAL</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dFONT"><code>CHAR-FONT</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dGREATERP"><code>CHAR-GREATERP</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-CHAR_002dINT"><code>CHAR-INT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dLESSP"><code>CHAR-LESSP</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dNAME"><code>CHAR-NAME</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dNOT_002dEQUAL"><code>CHAR-NOT-EQUAL</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dNOT_002dGREATERP"><code>CHAR-NOT-GREATERP</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dNOT_002dLESSP"><code>CHAR-NOT-LESSP</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dUPCASE"><code>CHAR-UPCASE</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002f_003d"><code>CHAR/=</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_003c"><code>CHAR&lt;</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_003c_003d"><code>CHAR&lt;=</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_003d"><code>CHAR=</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_003e"><code>CHAR&gt;</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_003e_003d"><code>CHAR&gt;=</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHARACTER"><code>CHARACTER</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHARACTERP"><code>CHARACTERP</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-CHDIR"><code>CHDIR</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Type.html#index-CHECK_002dTYPE"><code>CHECK-TYPE</code></a></td><td class="printindex-index-section"><a href="Type.html">Type</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-CIS"><code>CIS</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-CLEAR_002dINPUT"><code>CLEAR-INPUT</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-CLEAR_002dOUTPUT"><code>CLEAR-OUTPUT</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-CLINES"><code>CLINES</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-CLOSE"><code>CLOSE</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-CLOSE_002dFASD"><code>CLOSE-FASD</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-CLRHASH"><code>CLRHASH</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CODE_002dCHAR"><code>CODE-CHAR</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Type.html#index-COERCE"><code>COERCE</code></a></td><td class="printindex-index-section"><a href="Type.html">Type</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Type.html#index-COMMONP"><code>COMMONP</code></a></td><td class="printindex-index-section"><a href="Type.html">Type</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compilation.html#index-COMPILE"><code>COMPILE</code></a></td><td class="printindex-index-section"><a href="Compilation.html">Compilation</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compilation.html#index-COMPILE_002dFILE"><code>COMPILE-FILE</code></a></td><td class="printindex-index-section"><a href="Compilation.html">Compilation</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-COMPILED_002dFUNCTION_002dNAME"><code>COMPILED-FUNCTION-NAME</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compilation.html#index-COMPILED_002dFUNCTION_002dP"><code>COMPILED-FUNCTION-P</code></a></td><td class="printindex-index-section"><a href="Compilation.html">Compilation</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compiler-Definitions.html#index-COMPILER_002dDEFAULT_002dTYPE"><code>COMPILER-DEFAULT-TYPE</code></a></td><td class="printindex-index-section"><a href="Compiler-Definitions.html">Compiler Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-COMPILER_002dLET"><code>COMPILER-LET</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compiler-Definitions.html#index-COMPILER_002dRESET_002dTYPE"><code>COMPILER-RESET-TYPE</code></a></td><td class="printindex-index-section"><a href="Compiler-Definitions.html">Compiler Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-COMPLEX"><code>COMPLEX</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-COMPLEXP"><code>COMPLEXP</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-CONCATENATE"><code>CONCATENATE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-COND"><code>COND</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-CONJUGATE"><code>CONJUGATE</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CONS"><code>CONS</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-CONSP"><code>CONSP</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Type.html#index-CONSTANTP"><code>CONSTANTP</code></a></td><td class="printindex-index-section"><a href="Type.html">Type</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-COPY_002dALIST"><code>COPY-ALIST</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-COPY_002dARRAY_002dPORTION"><code>COPY-ARRAY-PORTION</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-COPY_002dLIST"><code>COPY-LIST</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-COPY_002dREADTABLE"><code>COPY-READTABLE</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-COPY_002dSEQ"><code>COPY-SEQ</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-COPY_002dSTREAM"><code>COPY-STREAM</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-COPY_002dSYMBOL"><code>COPY-SYMBOL</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-COPY_002dTREE"><code>COPY-TREE</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-COS"><code>COS</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-COSH"><code>COSH</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-COUNT"><code>COUNT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-COUNT_002dIF"><code>COUNT-IF</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-COUNT_002dIF_002dNOT"><code>COUNT-IF-NOT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-CTYPECASE"><code>CTYPECASE</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-D">D</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-DBL"><code>DBL</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-DECF"><code>DECF</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-DECLARE"><code>DECLARE</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-DECODE_002dFLOAT"><code>DECODE-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-DECODE_002dUNIVERSAL_002dTIME"><code>DECODE-UNIVERSAL-TIME</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-DEFCFUN"><code>DEFCFUN</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-DEFCONSTANT"><code>DEFCONSTANT</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-DEFENTRY"><code>DEFENTRY</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-DEFINE_002dCOMPILER_002dMACRO"><code>DEFINE-COMPILER-MACRO</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-DEFINE_002dINLINE_002dFUNCTION"><code>DEFINE-INLINE-FUNCTION</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-DEFINE_002dMODIFY_002dMACRO"><code>DEFINE-MODIFY-MACRO</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-DEFINE_002dSETF_002dMETHOD"><code>DEFINE-SETF-METHOD</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-DEFLA"><code>DEFLA</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-DEFMACRO"><code>DEFMACRO</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-DEFPARAMETER"><code>DEFPARAMETER</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-DEFSETF"><code>DEFSETF</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Structures.html#index-DEFSTRUCT"><code>DEFSTRUCT</code></a></td><td class="printindex-index-section"><a href="Structures.html">Structures</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Type.html#index-DEFTYPE"><code>DEFTYPE</code></a></td><td class="printindex-index-section"><a href="Type.html">Type</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-DEFUN"><code>DEFUN</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-DEFVAR"><code>DEFVAR</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-DELETE"><code>DELETE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-DELETE_002dDUPLICATES"><code>DELETE-DUPLICATES</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-DELETE_002dFILE"><code>DELETE-FILE</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-DELETE_002dIF"><code>DELETE-IF</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-DELETE_002dIF_002dNOT"><code>DELETE-IF-NOT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-DENOMINATOR"><code>DENOMINATOR</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-DEPOSIT_002dFIELD"><code>DEPOSIT-FIELD</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-DESCRIBE"><code>DESCRIBE</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-DIGIT_002dCHAR"><code>DIGIT-CHAR</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-DIGIT_002dCHAR_002dP"><code>DIGIT-CHAR-P</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-DIRECTORY"><code>DIRECTORY</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-DIRECTORY_002dNAMESTRING"><code>DIRECTORY-NAMESTRING</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-DISASSEMBLE"><code>DISASSEMBLE</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-DISPLACED_002dARRAY_002dP"><code>DISPLACED-ARRAY-P</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-DO"><code>DO</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Iteration-and-Tests.html#index-DO_002dALL_002dSYMBOLS"><code>DO-ALL-SYMBOLS</code></a></td><td class="printindex-index-section"><a href="Iteration-and-Tests.html">Iteration and Tests</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Iteration-and-Tests.html#index-DO_002dEXTERNAL_002dSYMBOLS"><code>DO-EXTERNAL-SYMBOLS</code></a></td><td class="printindex-index-section"><a href="Iteration-and-Tests.html">Iteration and Tests</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Iteration-and-Tests.html#index-DO_002dSYMBOLS"><code>DO-SYMBOLS</code></a></td><td class="printindex-index-section"><a href="Iteration-and-Tests.html">Iteration and Tests</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Iteration-and-Tests.html#index-DO_002a"><code>DO*</code></a></td><td class="printindex-index-section"><a href="Iteration-and-Tests.html">Iteration and Tests</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-DOCUMENTATION"><code>DOCUMENTATION</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Iteration-and-Tests.html#index-DOLIST"><code>DOLIST</code></a></td><td class="printindex-index-section"><a href="Iteration-and-Tests.html">Iteration and Tests</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-DOTIMES"><code>DOTIMES</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-DPB"><code>DPB</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-DRIBBLE"><code>DRIBBLE</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-E">E</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-ECASE"><code>ECASE</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-ED"><code>ED</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-EIGHTH"><code>EIGHTH</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-ELT"><code>ELT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compiler-Definitions.html#index-EMIT_002dFN"><code>EMIT-FN</code></a></td><td class="printindex-index-section"><a href="Compiler-Definitions.html">Compiler Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compiler-Definitions.html#index-EMIT_002dFN-1"><code>EMIT-FN</code></a></td><td class="printindex-index-section"><a href="Compiler-Definitions.html">Compiler Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-ENCODE_002dUNIVERSAL_002dTIME"><code>ENCODE-UNIVERSAL-TIME</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-ENDP"><code>ENDP</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-ENOUGH_002dNAMESTRING"><code>ENOUGH-NAMESTRING</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Iteration-and-Tests.html#index-EQ"><code>EQ</code></a></td><td class="printindex-index-section"><a href="Iteration-and-Tests.html">Iteration and Tests</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-EQL"><code>EQL</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Iteration-and-Tests.html#index-EQUAL"><code>EQUAL</code></a></td><td class="printindex-index-section"><a href="Iteration-and-Tests.html">Iteration and Tests</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Iteration-and-Tests.html#index-EQUALP"><code>EQUALP</code></a></td><td class="printindex-index-section"><a href="Iteration-and-Tests.html">Iteration and Tests</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-ERROR"><code>ERROR</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-ERROR_002dSET"><code>ERROR-SET</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-ETYPECASE"><code>ETYPECASE</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-EVAL"><code>EVAL</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compilation.html#index-EVAL_002dWHEN"><code>EVAL-WHEN</code></a></td><td class="printindex-index-section"><a href="Compilation.html">Compilation</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-EVALHOOK"><code>EVALHOOK</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-EVENP"><code>EVENP</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-EVERY"><code>EVERY</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-EXP"><code>EXP</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-EXPORT"><code>EXPORT</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-EXPT"><code>EXPT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-F">F</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-FASLINK"><code>FASLINK</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-FBOUNDP"><code>FBOUNDP</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-FCEILING"><code>FCEILING</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-FFLOOR"><code>FFLOOR</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-FIFTH"><code>FIFTH</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-FILE_002dAUTHOR"><code>FILE-AUTHOR</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-FILE_002dLENGTH"><code>FILE-LENGTH</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-FILE_002dNAMESTRING"><code>FILE-NAMESTRING</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-FILE_002dPOSITION"><code>FILE-POSITION</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-FILE_002dWRITE_002dDATE"><code>FILE-WRITE-DATE</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-FILL"><code>FILL</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-FILL_002dPOINTER"><code>FILL-POINTER</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-FIND"><code>FIND</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-FIND_002dALL_002dSYMBOLS"><code>FIND-ALL-SYMBOLS</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-FIND_002dIF"><code>FIND-IF</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-FIND_002dIF_002dNOT"><code>FIND-IF-NOT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-FIND_002dPACKAGE"><code>FIND-PACKAGE</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-FIND_002dSHARING_002dTOP"><code>FIND-SHARING-TOP</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-FIND_002dSYMBOL"><code>FIND-SYMBOL</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-FINISH_002dOUTPUT"><code>FINISH-OUTPUT</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-FIRST"><code>FIRST</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-FIXNUMP"><code>FIXNUMP</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-FLET"><code>FLET</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-FLOAT"><code>FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-FLOAT_002dDIGITS"><code>FLOAT-DIGITS</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-FLOAT_002dPRECISION"><code>FLOAT-PRECISION</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-FLOAT_002dRADIX"><code>FLOAT-RADIX</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-FLOAT_002dSIGN"><code>FLOAT-SIGN</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-FLOATP"><code>FLOATP</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-FLOOR"><code>FLOOR</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-FMAKUNBOUND"><code>FMAKUNBOUND</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-FORCE_002dOUTPUT"><code>FORCE-OUTPUT</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-FORMAT"><code>FORMAT</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-FOURTH"><code>FOURTH</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-FP_002dINPUT_002dSTREAM"><code>FP-INPUT-STREAM</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-FP_002dOUTPUT_002dSTREAM"><code>FP-OUTPUT-STREAM</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-FREAD"><code>FREAD</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-FREEZE_002dDEFSTRUCT"><code>FREEZE-DEFSTRUCT</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-FRESH_002dLINE"><code>FRESH-LINE</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-FROUND"><code>FROUND</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-FRS_002dBDS"><code>FRS-BDS</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-FRS_002dIHS"><code>FRS-IHS</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-FRS_002dVS"><code>FRS-VS</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-FTRUNCATE"><code>FTRUNCATE</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-FUNCALL"><code>FUNCALL</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-FUNCTION"><code>FUNCTION</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-FUNCTIONP"><code>FUNCTIONP</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-FWRITE"><code>FWRITE</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-G">G</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-GBC"><code>GBC</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-GBC_002dTIME"><code>GBC-TIME</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-GCD"><code>GCD</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-GENSYM"><code>GENSYM</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-GENTEMP"><code>GENTEMP</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-GET"><code>GET</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-GET_002dDECODED_002dTIME"><code>GET-DECODED-TIME</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-GET_002dDISPATCH_002dMACRO_002dCHARACTER"><code>GET-DISPATCH-MACRO-CHARACTER</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-GET_002dHOLE_002dSIZE"><code>GET-HOLE-SIZE</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-GET_002dINTERNAL_002dREAL_002dTIME"><code>GET-INTERNAL-REAL-TIME</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-GET_002dINTERNAL_002dRUN_002dTIME"><code>GET-INTERNAL-RUN-TIME</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-GET_002dMACRO_002dCHARACTER"><code>GET-MACRO-CHARACTER</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-GET_002dOUTPUT_002dSTREAM_002dSTRING"><code>GET-OUTPUT-STREAM-STRING</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-GET_002dPROPERTIES"><code>GET-PROPERTIES</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-GET_002dSETF_002dMETHOD"><code>GET-SETF-METHOD</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-GET_002dSETF_002dMETHOD_002dMULTIPLE_002dVALUE"><code>GET-SETF-METHOD-MULTIPLE-VALUE</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-GET_002dSTRING_002dINPUT_002dSTREAM_002dINDEX"><code>GET-STRING-INPUT-STREAM-INDEX</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-GET_002dUNIVERSAL_002dTIME"><code>GET-UNIVERSAL-TIME</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-GETENV"><code>GETENV</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-GETF"><code>GETF</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-GETHASH"><code>GETHASH</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-GO"><code>GO</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compilation.html#index-GPROF_002dQUIT"><code>GPROF-QUIT</code></a></td><td class="printindex-index-section"><a href="Compilation.html">Compilation</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compilation.html#index-GPROF_002dSET"><code>GPROF-SET</code></a></td><td class="printindex-index-section"><a href="Compilation.html">Compilation</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compilation.html#index-GPROF_002dSTART"><code>GPROF-START</code></a></td><td class="printindex-index-section"><a href="Compilation.html">Compilation</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-GRAPHIC_002dCHAR_002dP"><code>GRAPHIC-CHAR-P</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-H">H</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-HASH_002dTABLE_002dCOUNT"><code>HASH-TABLE-COUNT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-HASH_002dTABLE_002dP"><code>HASH-TABLE-P</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Structures.html#index-HELP"><code>HELP</code></a></td><td class="printindex-index-section"><a href="Structures.html">Structures</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-HELP_002a"><code>HELP*</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-HOST_002dNAMESTRING"><code>HOST-NAMESTRING</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-I">I</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-IDENTITY"><code>IDENTITY</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-IF"><code>IF</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-IHS_002dFUN"><code>IHS-FUN</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-IHS_002dVS"><code>IHS-VS</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-IMAGPART"><code>IMAGPART</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-IMPORT"><code>IMPORT</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-IN_002dPACKAGE"><code>IN-PACKAGE</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-INCF"><code>INCF</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Doc.html#index-INFO"><code>INFO</code></a></td><td class="printindex-index-section"><a href="Doc.html">Doc</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-INIT_002dSYSTEM"><code>INIT-SYSTEM</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-INPUT_002dSTREAM_002dP"><code>INPUT-STREAM-P</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-INSPECT"><code>INSPECT</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-INT_002dCHAR"><code>INT-CHAR</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-INTEGER_002dDECODE_002dFLOAT"><code>INTEGER-DECODE-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-INTEGER_002dLENGTH"><code>INTEGER-LENGTH</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-INTEGERP"><code>INTEGERP</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-INTERN"><code>INTERN</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-INTERSECTION"><code>INTERSECTION</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-ISQRT"><code>ISQRT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-K">K</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-KEYWORDP"><code>KEYWORDP</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-L">L</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-LABELS"><code>LABELS</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-LAST"><code>LAST</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LCM"><code>LCM</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LDB"><code>LDB</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LDB_002dTEST"><code>LDB-TEST</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-LDIFF"><code>LDIFF</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-LENGTH"><code>LENGTH</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-LET"><code>LET</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-LET_002a"><code>LET*</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compilation.html#index-LINK"><code>LINK</code></a></td><td class="printindex-index-section"><a href="Compilation.html">Compilation</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-LISP_002dIMPLEMENTATION_002dTYPE"><code>LISP-IMPLEMENTATION-TYPE</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-LISP_002dIMPLEMENTATION_002dVERSION"><code>LISP-IMPLEMENTATION-VERSION</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-LIST"><code>LIST</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-LIST_002dALL_002dPACKAGES"><code>LIST-ALL-PACKAGES</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-LIST_002dLENGTH"><code>LIST-LENGTH</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compiler-Definitions.html#index-LIST_002dUNDEFINED_002dFUNCTIONS"><code>LIST-UNDEFINED-FUNCTIONS</code></a></td><td class="printindex-index-section"><a href="Compiler-Definitions.html">Compiler Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-LIST_002a"><code>LIST*</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-LISTEN"><code>LISTEN</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-LISTP"><code>LISTP</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-LOAD"><code>LOAD</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-LOCALLY"><code>LOCALLY</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LOG"><code>LOG</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LOGAND"><code>LOGAND</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LOGANDC1"><code>LOGANDC1</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LOGANDC2"><code>LOGANDC2</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LOGBITP"><code>LOGBITP</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LOGCOUNT"><code>LOGCOUNT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LOGEQV"><code>LOGEQV</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LOGIOR"><code>LOGIOR</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LOGNAND"><code>LOGNAND</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LOGNOR"><code>LOGNOR</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LOGNOT"><code>LOGNOT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LOGORC1"><code>LOGORC1</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LOGORC2"><code>LOGORC2</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LOGTEST"><code>LOGTEST</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LOGXOR"><code>LOGXOR</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-LONG_002dSITE_002dNAME"><code>LONG-SITE-NAME</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Iteration-and-Tests.html#index-LOOP"><code>LOOP</code></a></td><td class="printindex-index-section"><a href="Iteration-and-Tests.html">Iteration and Tests</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-LOWER_002dCASE_002dP"><code>LOWER-CASE-P</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-M">M</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-MACHINE_002dINSTANCE"><code>MACHINE-INSTANCE</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-MACHINE_002dTYPE"><code>MACHINE-TYPE</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-MACHINE_002dVERSION"><code>MACHINE-VERSION</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-MACRO_002dFUNCTION"><code>MACRO-FUNCTION</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-MACROEXPAND"><code>MACROEXPAND</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-MACROEXPAND_002d1"><code>MACROEXPAND-1</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-MACROLET"><code>MACROLET</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compiler-Definitions.html#index-MAKE_002dALL_002dPROCLAIMS"><code>MAKE-ALL-PROCLAIMS</code></a></td><td class="printindex-index-section"><a href="Compiler-Definitions.html">Compiler Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-MAKE_002dARRAY"><code>MAKE-ARRAY</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-MAKE_002dBROADCAST_002dSTREAM"><code>MAKE-BROADCAST-STREAM</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-MAKE_002dCHAR"><code>MAKE-CHAR</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-MAKE_002dCONCATENATED_002dSTREAM"><code>MAKE-CONCATENATED-STREAM</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-MAKE_002dDISPATCH_002dMACRO_002dCHARACTER"><code>MAKE-DISPATCH-MACRO-CHARACTER</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-MAKE_002dECHO_002dSTREAM"><code>MAKE-ECHO-STREAM</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-MAKE_002dHASH_002dTABLE"><code>MAKE-HASH-TABLE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-MAKE_002dLIST"><code>MAKE-LIST</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-MAKE_002dPACKAGE"><code>MAKE-PACKAGE</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-MAKE_002dPATHNAME"><code>MAKE-PATHNAME</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compiler-Definitions.html#index-MAKE_002dPROCLAIMS"><code>MAKE-PROCLAIMS</code></a></td><td class="printindex-index-section"><a href="Compiler-Definitions.html">Compiler Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MAKE_002dRANDOM_002dSTATE"><code>MAKE-RANDOM-STATE</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-MAKE_002dSEQUENCE"><code>MAKE-SEQUENCE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-MAKE_002dSTRING"><code>MAKE-STRING</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-MAKE_002dSTRING_002dINPUT_002dSTREAM"><code>MAKE-STRING-INPUT-STREAM</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-MAKE_002dSTRING_002dINPUT_002dSTREAM-1"><code>MAKE-STRING-INPUT-STREAM</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-MAKE_002dSTRING_002dOUTPUT_002dSTREAM"><code>MAKE-STRING-OUTPUT-STREAM</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-MAKE_002dSTRING_002dOUTPUT_002dSTREAM_002dFROM_002dSTRING"><code>MAKE-STRING-OUTPUT-STREAM-FROM-STRING</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-MAKE_002dSYMBOL"><code>MAKE-SYMBOL</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-MAKE_002dSYNONYM_002dSTREAM"><code>MAKE-SYNONYM-STREAM</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-MAKE_002dTWO_002dWAY_002dSTREAM"><code>MAKE-TWO-WAY-STREAM</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-MAKUNBOUND"><code>MAKUNBOUND</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-MAP"><code>MAP</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-MAPC"><code>MAPC</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-MAPCAN"><code>MAPCAN</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Iteration-and-Tests.html#index-MAPCAR"><code>MAPCAR</code></a></td><td class="printindex-index-section"><a href="Iteration-and-Tests.html">Iteration and Tests</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-MAPCON"><code>MAPCON</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Iteration-and-Tests.html#index-MAPHASH"><code>MAPHASH</code></a></td><td class="printindex-index-section"><a href="Iteration-and-Tests.html">Iteration and Tests</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-MAPL"><code>MAPL</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-MAPLIST"><code>MAPLIST</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MASK_002dFIELD"><code>MASK-FIELD</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-MATCH_002dBEGINNING"><code>MATCH-BEGINNING</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-MATCH_002dEND"><code>MATCH-END</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MAX"><code>MAX</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-MAXIMUM_002dALLOCATABLE_002dPAGES"><code>MAXIMUM-ALLOCATABLE-PAGES</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-MAXIMUM_002dCONTIGUOUS_002dPAGES"><code>MAXIMUM-CONTIGUOUS-PAGES</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-MEMBER"><code>MEMBER</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-MEMBER_002dIF"><code>MEMBER-IF</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-MEMBER_002dIF_002dNOT"><code>MEMBER-IF-NOT</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-MERGE"><code>MERGE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-MERGE_002dPATHNAMES"><code>MERGE-PATHNAMES</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MIN"><code>MIN</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MINUSP"><code>MINUSP</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-MISMATCH"><code>MISMATCH</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MOD"><code>MOD</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MODF"><code>MODF</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-MULTIPLE_002dVALUE_002dBIND"><code>MULTIPLE-VALUE-BIND</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-MULTIPLE_002dVALUE_002dCALL"><code>MULTIPLE-VALUE-CALL</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-MULTIPLE_002dVALUE_002dLIST"><code>MULTIPLE-VALUE-LIST</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-MULTIPLE_002dVALUE_002dPROG1"><code>MULTIPLE-VALUE-PROG1</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-MULTIPLE_002dVALUE_002dSETQ"><code>MULTIPLE-VALUE-SETQ</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-N">N</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-NAME_002dCHAR"><code>NAME-CHAR</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-NAMESTRING"><code>NAMESTRING</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-NANI"><code>NANI</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-NBUTLAST"><code>NBUTLAST</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-NCONC"><code>NCONC</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-NINTERSECTION"><code>NINTERSECTION</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-NINTH"><code>NINTH</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-NLOAD"><code>NLOAD</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-NOT"><code>NOT</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-NOTANY"><code>NOTANY</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-NOTEVERY"><code>NOTEVERY</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-NRECONC"><code>NRECONC</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-NREVERSE"><code>NREVERSE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-NSET_002dDIFFERENCE"><code>NSET-DIFFERENCE</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-NSET_002dEXCLUSIVE_002dOR"><code>NSET-EXCLUSIVE-OR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-NSTRING_002dCAPITALIZE"><code>NSTRING-CAPITALIZE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-NSTRING_002dDOWNCASE"><code>NSTRING-DOWNCASE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-NSTRING_002dUPCASE"><code>NSTRING-UPCASE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-NSUBLIS"><code>NSUBLIS</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-NSUBST"><code>NSUBST</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-NSUBST_002dIF"><code>NSUBST-IF</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-NSUBST_002dIF_002dNOT"><code>NSUBST-IF-NOT</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-NSUBSTITUTE"><code>NSUBSTITUTE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-NSUBSTITUTE_002dIF"><code>NSUBSTITUTE-IF</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-NSUBSTITUTE_002dIF_002dNOT"><code>NSUBSTITUTE-IF-NOT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-NTH"><code>NTH</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-NTHCDR"><code>NTHCDR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-NULL"><code>NULL</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-NUMBERP"><code>NUMBERP</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-NUMERATOR"><code>NUMERATOR</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-NUNION"><code>NUNION</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-O">O</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-ODDP"><code>ODDP</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-OPEN"><code>OPEN</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-OPEN_002dFASD"><code>OPEN-FASD</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-OPEN_002dNAMED_002dSOCKET"><code>OPEN-NAMED-SOCKET</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-OR"><code>OR</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-OUTPUT_002dSTREAM_002dP"><code>OUTPUT-STREAM-P</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-OUTPUT_002dSTREAM_002dSTRING"><code>OUTPUT-STREAM-STRING</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-P">P</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-PACKAGE_002dNAME"><code>PACKAGE-NAME</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-PACKAGE_002dNICKNAMES"><code>PACKAGE-NICKNAMES</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-PACKAGE_002dSHADOWING_002dSYMBOLS"><code>PACKAGE-SHADOWING-SYMBOLS</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-PACKAGE_002dUSE_002dLIST"><code>PACKAGE-USE-LIST</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-PACKAGE_002dUSED_002dBY_002dLIST"><code>PACKAGE-USED-BY-LIST</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-PACKAGEP"><code>PACKAGEP</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-PAIRLIS"><code>PAIRLIS</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-PARSE_002dINTEGER"><code>PARSE-INTEGER</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-PARSE_002dNAMESTRING"><code>PARSE-NAMESTRING</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-PATHNAME"><code>PATHNAME</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-PATHNAME_002dDEVICE"><code>PATHNAME-DEVICE</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-PATHNAME_002dDIRECTORY"><code>PATHNAME-DIRECTORY</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-PATHNAME_002dHOST"><code>PATHNAME-HOST</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-PATHNAME_002dNAME"><code>PATHNAME-NAME</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-PATHNAME_002dTYPE"><code>PATHNAME-TYPE</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-PATHNAME_002dVERSION"><code>PATHNAME-VERSION</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-PATHNAMEP"><code>PATHNAMEP</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-PEEK_002dCHAR"><code>PEEK-CHAR</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-PHASE"><code>PHASE</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-PLUSP"><code>PLUSP</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-POP"><code>POP</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-POSITION"><code>POSITION</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-POSITION_002dIF"><code>POSITION-IF</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-POSITION_002dIF_002dNOT"><code>POSITION-IF-NOT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-PPRINT"><code>PPRINT</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-PRIN1"><code>PRIN1</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-PRIN1_002dTO_002dSTRING"><code>PRIN1-TO-STRING</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-PRINC"><code>PRINC</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-PRINC_002dTO_002dSTRING"><code>PRINC-TO-STRING</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-PRINT"><code>PRINT</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-PROBE_002dFILE"><code>PROBE-FILE</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compilation.html#index-PROCLAIM"><code>PROCLAIM</code></a></td><td class="printindex-index-section"><a href="Compilation.html">Compilation</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-PROCLAMATION"><code>PROCLAMATION</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-PROF"><code>PROF</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-PROG"><code>PROG</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-PROG_002a"><code>PROG*</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-PROG1"><code>PROG1</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-PROG2"><code>PROG2</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-PROGN"><code>PROGN</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-PROGV"><code>PROGV</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compilation.html#index-PROVIDE"><code>PROVIDE</code></a></td><td class="printindex-index-section"><a href="Compilation.html">Compilation</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-PSETF"><code>PSETF</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-PSETQ"><code>PSETQ</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-PUSH"><code>PUSH</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-PUSHNEW"><code>PUSHNEW</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-PUTPROP"><code>PUTPROP</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-Q">Q</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-QUOTE"><code>QUOTE</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-R">R</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-RANDOM"><code>RANDOM</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-RANDOM_002dSTATE_002dP"><code>RANDOM-STATE-P</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-RASSOC"><code>RASSOC</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-RASSOC_002dIF"><code>RASSOC-IF</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-RASSOC_002dIF_002dNOT"><code>RASSOC-IF-NOT</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-RATIONAL"><code>RATIONAL</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-RATIONALIZE"><code>RATIONALIZE</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-RATIONALP"><code>RATIONALP</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-READ"><code>READ</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-READ_002dBYTE"><code>READ-BYTE</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-READ_002dCHAR"><code>READ-CHAR</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-READ_002dCHAR_002dNO_002dHANG"><code>READ-CHAR-NO-HANG</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-READ_002dDELIMITED_002dLIST"><code>READ-DELIMITED-LIST</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-READ_002dFASD_002dTOP"><code>READ-FASD-TOP</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-READ_002dFROM_002dSTRING"><code>READ-FROM-STRING</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-READ_002dLINE"><code>READ-LINE</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-READ_002dPRESERVING_002dWHITESPACE"><code>READ-PRESERVING-WHITESPACE</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-READLINE_002dOFF"><code>READLINE-OFF</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-READLINE_002dON"><code>READLINE-ON</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-READTABLEP"><code>READTABLEP</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-REALPART"><code>REALPART</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-REDUCE"><code>REDUCE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-REM"><code>REM</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-REMF"><code>REMF</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-REMHASH"><code>REMHASH</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-REMOVE"><code>REMOVE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-REMOVE_002dDUPLICATES"><code>REMOVE-DUPLICATES</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-REMOVE_002dIF"><code>REMOVE-IF</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-REMOVE_002dIF_002dNOT"><code>REMOVE-IF-NOT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-REMPROP"><code>REMPROP</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-RENAME_002dFILE"><code>RENAME-FILE</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-RENAME_002dPACKAGE"><code>RENAME-PACKAGE</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-REPLACE"><code>REPLACE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-REQUIRE"><code>REQUIRE</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-RESET_002dGBC_002dCOUNT"><code>RESET-GBC-COUNT</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-RESET_002dSTACK_002dLIMITS"><code>RESET-STACK-LIMITS</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-REST"><code>REST</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-RETURN"><code>RETURN</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-RETURN_002dFROM"><code>RETURN-FROM</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-REVAPPEND"><code>REVAPPEND</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-REVERSE"><code>REVERSE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-ROOM"><code>ROOM</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-ROTATEF"><code>ROTATEF</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-ROUND"><code>ROUND</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-RPLACA"><code>RPLACA</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-RPLACD"><code>RPLACD</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-RUN_002dPROCESS"><code>RUN-PROCESS</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-S">S</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-SAVE"><code>SAVE</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-SAVE_002dSYSTEM"><code>SAVE-SYSTEM</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-SBIT"><code>SBIT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-SCALE_002dFLOAT"><code>SCALE-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-SCHAR"><code>SCHAR</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-SEARCH"><code>SEARCH</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-SECOND"><code>SECOND</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-SET"><code>SET</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-SET_002dCHAR_002dBIT"><code>SET-CHAR-BIT</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-SET_002dDIFFERENCE"><code>SET-DIFFERENCE</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-SET_002dDISPATCH_002dMACRO_002dCHARACTER"><code>SET-DISPATCH-MACRO-CHARACTER</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-SET_002dEXCLUSIVE_002dOR"><code>SET-EXCLUSIVE-OR</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-SET_002dHOLE_002dSIZE"><code>SET-HOLE-SIZE</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-SET_002dMACRO_002dCHARACTER"><code>SET-MACRO-CHARACTER</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-SET_002dSYNTAX_002dFROM_002dCHAR"><code>SET-SYNTAX-FROM-CHAR</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-SETF"><code>SETF</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-SETQ"><code>SETQ</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-SEVENTH"><code>SEVENTH</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-SGC_002dON"><code>SGC-ON</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-SHADOW"><code>SHADOW</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-SHADOWING_002dIMPORT"><code>SHADOWING-IMPORT</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-SHIFTF"><code>SHIFTF</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-SHORT_002dSITE_002dNAME"><code>SHORT-SITE-NAME</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-SIGNUM"><code>SIGNUM</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-SIMPLE_002dBIT_002dVECTOR_002dP"><code>SIMPLE-BIT-VECTOR-P</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-SIMPLE_002dSTRING_002dP"><code>SIMPLE-STRING-P</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-SIMPLE_002dVECTOR_002dP"><code>SIMPLE-VECTOR-P</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-SIN"><code>SIN</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-SINH"><code>SINH</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-SIXTH"><code>SIXTH</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-SLEEP"><code>SLEEP</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-SOCKET"><code>SOCKET</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-SOCKET-1"><code>SOCKET</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-SOFTWARE_002dTYPE"><code>SOFTWARE-TYPE</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-SOFTWARE_002dVERSION"><code>SOFTWARE-VERSION</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-SOME"><code>SOME</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-SORT"><code>SORT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-SPECIAL_002dFORM_002dP"><code>SPECIAL-FORM-P</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-SPECIALP"><code>SPECIALP</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-SQRT"><code>SQRT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STABLE_002dSORT"><code>STABLE-SORT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-STANDARD_002dCHAR_002dP"><code>STANDARD-CHAR-P</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-STEP"><code>STEP</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-STREAM_002dELEMENT_002dTYPE"><code>STREAM-ELEMENT-TYPE</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-STREAMP"><code>STREAMP</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING"><code>STRING</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_002dCAPITALIZE"><code>STRING-CAPITALIZE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-STRING_002dCHAR_002dP"><code>STRING-CHAR-P</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-STRING_002dCONCATENATE"><code>STRING-CONCATENATE</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_002dDOWNCASE"><code>STRING-DOWNCASE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_002dEQUAL"><code>STRING-EQUAL</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_002dGREATERP"><code>STRING-GREATERP</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_002dLEFT_002dTRIM"><code>STRING-LEFT-TRIM</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_002dLESSP"><code>STRING-LESSP</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-STRING_002dMATCH"><code>STRING-MATCH</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_002dNOT_002dEQUAL"><code>STRING-NOT-EQUAL</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_002dNOT_002dGREATERP"><code>STRING-NOT-GREATERP</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_002dNOT_002dLESSP"><code>STRING-NOT-LESSP</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_002dRIGHT_002dTRIM"><code>STRING-RIGHT-TRIM</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-STRING_002dTO_002dOBJECT"><code>STRING-TO-OBJECT</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_002dTRIM"><code>STRING-TRIM</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_002dUPCASE"><code>STRING-UPCASE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_002f_003d"><code>STRING/=</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_003c"><code>STRING&lt;</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_003c_003d"><code>STRING&lt;=</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_003d"><code>STRING=</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_003e"><code>STRING&gt;</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRING_003e_003d"><code>STRING&gt;=</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-STRINGP"><code>STRINGP</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-STRUCTUREP"><code>STRUCTUREP</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-SUBLIS"><code>SUBLIS</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-SUBSEQ"><code>SUBSEQ</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-SUBSETP"><code>SUBSETP</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-SUBST"><code>SUBST</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-SUBST_002dIF"><code>SUBST-IF</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-SUBST_002dIF_002dNOT"><code>SUBST-IF-NOT</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-SUBSTITUTE"><code>SUBSTITUTE</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-SUBSTITUTE_002dIF"><code>SUBSTITUTE-IF</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-SUBSTITUTE_002dIF_002dNOT"><code>SUBSTITUTE-IF-NOT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Type.html#index-SUBTYPEP"><code>SUBTYPEP</code></a></td><td class="printindex-index-section"><a href="Type.html">Type</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-SVREF"><code>SVREF</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-SXHASH"><code>SXHASH</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-SYMBOL_002dFUNCTION"><code>SYMBOL-FUNCTION</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-SYMBOL_002dNAME"><code>SYMBOL-NAME</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-SYMBOL_002dPACKAGE"><code>SYMBOL-PACKAGE</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-SYMBOL_002dPLIST"><code>SYMBOL-PLIST</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-SYMBOL_002dVALUE"><code>SYMBOL-VALUE</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-SYMBOLP"><code>SYMBOLP</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-SYSTEM"><code>SYSTEM</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-T">T</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-TAGBODY"><code>TAGBODY</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-TAILP"><code>TAILP</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-TAN"><code>TAN</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-TANH"><code>TANH</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-TENTH"><code>TENTH</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-TERPRI"><code>TERPRI</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-THE"><code>THE</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-THIRD"><code>THIRD</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-THROW"><code>THROW</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-TIME"><code>TIME</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-TOP_002dLEVEL"><code>TOP-LEVEL</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-TRACE"><code>TRACE</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-TREE_002dEQUAL"><code>TREE-EQUAL</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-TRUENAME"><code>TRUENAME</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-TRUNCATE"><code>TRUNCATE</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Type.html#index-TYPE_002dOF"><code>TYPE-OF</code></a></td><td class="printindex-index-section"><a href="Type.html">Type</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-TYPECASE"><code>TYPECASE</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Type.html#index-TYPEP"><code>TYPEP</code></a></td><td class="printindex-index-section"><a href="Type.html">Type</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-U">U</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-UNCATCH_002dBAD_002dSIGNALS"><code>UNCATCH-BAD-SIGNALS</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-UNEXPORT"><code>UNEXPORT</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-UNINTERN"><code>UNINTERN</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Lists.html#index-UNION"><code>UNION</code></a></td><td class="printindex-index-section"><a href="Lists.html">Lists</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-UNIVERSAL_002dERROR_002dHANDLER"><code>UNIVERSAL-ERROR-HANDLER</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-UNLESS"><code>UNLESS</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-UNREAD_002dCHAR"><code>UNREAD-CHAR</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-UNTRACE"><code>UNTRACE</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-UNUSE_002dPACKAGE"><code>UNUSE-PACKAGE</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-UNWIND_002dPROTECT"><code>UNWIND-PROTECT</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-UPPER_002dCASE_002dP"><code>UPPER-CASE-P</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-USE_002dFAST_002dLINKS"><code>USE-FAST-LINKS</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-USE_002dPACKAGE"><code>USE-PACKAGE</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-USER_002dHOMEDIR_002dPATHNAME"><code>USER-HOMEDIR-PATHNAME</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-V">V</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-VALUES"><code>VALUES</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-VALUES_002dLIST"><code>VALUES-LIST</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-VECTOR"><code>VECTOR</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-VECTOR_002dPOP"><code>VECTOR-POP</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-VECTOR_002dPUSH"><code>VECTOR-PUSH</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-VECTOR_002dPUSH_002dEXTEND"><code>VECTOR-PUSH-EXTEND</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-VECTORP"><code>VECTORP</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-VS"><code>VS</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-W">W</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-WARN"><code>WARN</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-WHEN"><code>WHEN</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-WITH_002dINPUT_002dFROM_002dSTRING"><code>WITH-INPUT-FROM-STRING</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-WITH_002dOPEN_002dFILE"><code>WITH-OPEN-FILE</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-WITH_002dOPEN_002dSTREAM"><code>WITH-OPEN-STREAM</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-WITH_002dOUTPUT_002dTO_002dSTRING"><code>WITH-OUTPUT-TO-STRING</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-WRITE"><code>WRITE</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-WRITE_002dBYTE"><code>WRITE-BYTE</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-WRITE_002dCHAR"><code>WRITE-CHAR</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-WRITE_002dDEBUG_002dSYMBOLS"><code>WRITE-DEBUG-SYMBOLS</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-WRITE_002dFASD_002dTOP"><code>WRITE-FASD-TOP</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-WRITE_002dLINE"><code>WRITE-LINE</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-WRITE_002dSTRING"><code>WRITE-STRING</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-WRITE_002dTO_002dSTRING"><code>WRITE-TO-STRING</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-X">X</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-XDR_002dOPEN"><code>XDR-OPEN</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-XDR_002dREAD"><code>XDR-READ</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-XDR_002dWRITE"><code>XDR-WRITE</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-Y">Y</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-Y_002dOR_002dN_002dP"><code>Y-OR-N-P</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Iteration-and-Tests.html#index-YES_002dOR_002dNO_002dP"><code>YES-OR-NO-P</code></a></td><td class="printindex-index-section"><a href="Iteration-and-Tests.html">Iteration and Tests</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Function-Index_fn_letter-Z">Z</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-ZEROP"><code>ZEROP</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+</table>
+<table class="fn-letters-footer-printindex"><tr><th>Jump to: &nbsp; </th><td><a class="summary-letter-printindex" href="#Function-Index_fn_symbol-1"><b>-</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_symbol-2"><b>*</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_symbol-3"><b>/</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_symbol-4"><b>+</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_symbol-5"><b>&lt;</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_symbol-6"><b>=</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_symbol-7"><b>&gt;</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_symbol-8"><b>1</b></a>
+ &nbsp; 
+<br>
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-A"><b>A</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-B"><b>B</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-C"><b>C</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-D"><b>D</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-E"><b>E</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-F"><b>F</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-G"><b>G</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-H"><b>H</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-I"><b>I</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-K"><b>K</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-L"><b>L</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-M"><b>M</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-N"><b>N</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-O"><b>O</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-P"><b>P</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-Q"><b>Q</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-R"><b>R</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-S"><b>S</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-T"><b>T</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-U"><b>U</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-V"><b>V</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-W"><b>W</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-X"><b>X</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-Y"><b>Y</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Function-Index_fn_letter-Z"><b>Z</b></a>
+ &nbsp; 
+</td></tr></table>
+</div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Variable-Index.html">Variable Index</a>, Previous: <a href="JAPI-GUI-Library-Binding.html">JAPI GUI Library Binding</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="#Function-Index" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/GCL-Specific.html
@@ -0,0 +1,367 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>GCL Specific (GCL SI Manual)</title>
+
+<meta name="description" content="GCL Specific (GCL SI Manual)">
+<meta name="keywords" content="GCL Specific (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="C-Interface.html" rel="next" title="C Interface">
+<link href="Type.html" rel="prev" title="Type">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="GCL-Specific">
+<div class="nav-panel">
+<p>
+Next: <a href="C-Interface.html" accesskey="n" rel="next">C Interface</a>, Previous: <a href="Type.html" accesskey="p" rel="prev">Type</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="GCL-Specific-1"><span>15 GCL Specific<a class="copiable-link" href="#GCL-Specific-1"> &para;</a></span></h2>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SYSTEM"><span class="category-def">Function: </span><span><strong class="def-name">SYSTEM</strong> <var class="def-var-arguments">(string)</var><a class="copiable-link" href="#index-SYSTEM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>GCL specific: Executes a Shell command as if STRING is an input to the
+Shell.  Not all versions of GCL support this function.  At least on
+POSIX systems, this call should return two integers represeting the
+exit status and any possible terminating signal respectively.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aTMP_002dDIR_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*TMP-DIR*</strong><a class="copiable-link" href="#index-_002aTMP_002dDIR_002a"> &para;</a></span></dt>
+<dd><p>Package:COMPILER
+GCL specific: Directory in which temporary &ldquo;gazonk&rdquo; files used by the
+compiler are to be created.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aIGNORE_002dMAXIMUM_002dPAGES_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*IGNORE-MAXIMUM-PAGES*</strong><a class="copiable-link" href="#index-_002aIGNORE_002dMAXIMUM_002dPAGES_002a"> &para;</a></span></dt>
+<dd><p>Package:SI
+GCL specific: Tells the GCL memory manager whether (non-NIL) or not (NIL) it
+should expand memory whenever the maximum allocatable pages have been used
+up.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aOPTIMIZE_002dMAXIMUM_002dPAGES_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*OPTIMIZE-MAXIMUM-PAGES*</strong><a class="copiable-link" href="#index-_002aOPTIMIZE_002dMAXIMUM_002dPAGES_002a"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Tells the GCL memory manager whether to attempt to
+adjust the maximum allowable pages for each type to approximately
+optimize the garbage collection load in the current process.  Defaults
+to T.  Set to NIL if you care more about memory usage than runtime.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MACHINE_002dVERSION"><span class="category-def">Function: </span><span><strong class="def-name">MACHINE-VERSION</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-MACHINE_002dVERSION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a string that identifies the machine version of the machine
+on which GCL is currently running.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BY"><span class="category-def">Function: </span><span><strong class="def-name">BY</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-BY"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>GCL specific: Exits from GCL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DEFCFUN"><span class="category-def">Macro: </span><span><strong class="def-name">DEFCFUN</strong><a class="copiable-link" href="#index-DEFCFUN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(defcfun header n {element}*)
+</pre></div>
+
+
+<p>GCL specific: Defines a C-language function which calls Lisp functions
+and/or handles Lisp objects.  HEADER gives the header of the C
+function as a string.  Non-negative-integer is the number of the main
+stack entries used by the C function, primarily for protecting Lisp
+objects from being garbage-collected.  Each ELEMENT may give a C code
+fragment as a string, or it may be a list
+	((symbol {arg}*) {place}*)
+which, when executed, calls the Lisp function named by SYMBOL with the
+specified arguments and saves the value(s) to the specified places.
+The DEFCFUN form has the above meanings only after compiled;  The GCL
+interpreter simply ignores this form.
+</p>
+<p>An example which defines a C function list2 of two arguments, but which 
+calls the &rsquo;lisp&rsquo; function CONS by name, and refers to the constant &rsquo;NIL.
+Note to be loaded by <code class="code">load</code> the function should be static.
+</p>
+
+<p>(defCfun &quot;static object list2(x,y) object x,y;&quot; 0
+              &quot;object z;&quot;
+               (&rsquo;NIL z)
+               ((CONS y z) z)
+               ((CONS x z) z)
+         	&quot;return(z);&quot;
+)
+</p>
+<p>In lisp the operations in the body would be
+   (setq z &rsquo;nil)
+   (setq z (cons y z))
+   (setq z (cons x z))
+</p>   
+
+
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">
+
+        (defCfun header non-negative-integer
+                { string
+                  | ( function-symbol { value }* )
+                  | (( function-symbol  { value }* ) { place }* ) })
+
+
+value:
+place:
+         { C-expr | ( C-type C-expr ) }
+
+C-function-name:
+C-expr:
+         { string | symbol }
+ 
+C-type:
+         { object | int | char | float | double }
+
+</pre></div>
+
+
+
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-CLINES"><span class="category-def">Macro: </span><span><strong class="def-name">CLINES</strong><a class="copiable-link" href="#index-CLINES"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(clines {string}*)
+</pre></div>
+
+<p>GCL specific:  The GCL compiler embeds STRINGs into the intermediate C
+language code.  The interpreter ignores this form.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ALLOCATE"><span class="category-def">Function: </span><span><strong class="def-name">ALLOCATE</strong> <var class="def-var-arguments">(type number &amp;optional (really-allocate nil))</var><a class="copiable-link" href="#index-ALLOCATE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>GCL specific: Sets the maximum number of pages for the type class of the
+GCL implementation type TYPE to NUMBER.  If REALLY-ALLOCATE is given a
+non-NIL value, then the specified number of pages will be allocated
+immediately.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GBC"><span class="category-def">Function: </span><span><strong class="def-name">GBC</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-GBC"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>GCL specific: Invokes the garbage collector (GC) with the collection level
+specified by X.  NIL as the argument causes GC to collect cells only.  T as
+the argument causes GC to collect everything.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SAVE"><span class="category-def">Function: </span><span><strong class="def-name">SAVE</strong> <var class="def-var-arguments">(pathname)</var><a class="copiable-link" href="#index-SAVE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>GCL specific: Saves the current GCL core image into a program file specified
+by PATHNAME.  This function depends on the version of GCL.  The function
+si::save-system is to be preferred in almost all circumstances.   Unlike
+save, it makes the relocatable section permanent, and causes no future gc of
+currently loaded .o files.
+</p>
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-HELP_002a"><span class="category-def">Function: </span><span><strong class="def-name">HELP*</strong> <var class="def-var-arguments">(string &amp;optional (package &rsquo;lisp))</var><a class="copiable-link" href="#index-HELP_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>GCL specific: Prints the documentation associated with those symbols in the
+specified package whose print names contain STRING as substring.  STRING may
+be a symbol, in which case the print-name of that symbol is used.  If PACKAGE
+is NIL, then all packages are searched.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DEFLA"><span class="category-def">Macro: </span><span><strong class="def-name">DEFLA</strong><a class="copiable-link" href="#index-DEFLA"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(defla name lambda-list {decl | doc}* {form}*)
+</pre></div>
+
+<p>GCL specific: Used to DEFine Lisp Alternative.  For the interpreter, DEFLA is
+equivalent to DEFUN, but the compiler ignores this form.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PROCLAMATION"><span class="category-def">Function: </span><span><strong class="def-name">PROCLAMATION</strong> <var class="def-var-arguments">(decl-spec)</var><a class="copiable-link" href="#index-PROCLAMATION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>GCL specific: Returns T if the specified declaration is globally in effect;
+NIL otherwise.  See the doc of DECLARE for possible DECL-SPECs.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DEFENTRY"><span class="category-def">Macro: </span><span><strong class="def-name">DEFENTRY</strong><a class="copiable-link" href="#index-DEFENTRY"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(defentry name arg-types c-function)
+</pre></div>
+
+
+<p>GCL specific: The compiler defines a Lisp function whose body consists of a
+calling sequence to the C language function specified by C-FUNCTION.  The
+interpreter ignores this form.  The ARG-TYPES specifies the C types of the
+arguments which C-FUNCTION requires.  The list of allowed types is (object
+char int float double string).  Code will be produced to coerce from a lisp
+object to the appropriate type before passing the argument to the C-FUNCTION.
+The c-function should be of the form (c-result-type c-fname) where
+c-result-type is a member of (void object char int float double string).
+c-fname may be a symbol (in which case it will be downcased) or a string.  If
+c-function is not a list, then (object c-function) is assumed.  In order
+for C code to be loaded in by <code class="code">load</code> you should declare any
+variables and functions to be static.   If you will link them in
+at build time, of course you are allowed to define new externals.
+</p>
+<div class="example">
+<pre class="example-preformatted">  Sample usage:
+--File begin-----
+;; JOE takes X a lisp string and Y a fixnum and returns a character.
+(clines &quot;#include \&quot;foo.ch\&quot;&quot;)
+(defentry joe (string int) (char &quot;our_c_fun&quot;))
+---File end------
+---File foo.ch---
+/* C function for extracting the i'th element of a string */
+static char our_c_fun(p,i)
+char *p;
+int i;
+   {
+	return p[i];
+   }
+-----File end---
+</pre></div>
+
+<p>One must be careful of storage allocation issues when passing a string.
+If the C code invokes storage allocation (either by calling <code class="code">malloc</code>
+or <code class="code">make_cons</code> etc), then there is a possibility of a garbage
+collection, so that if the string passed was not constructed with
+<code class="code">:static t</code> when its array was constructed, then it could move.
+If the C function may allocate storage, then you should pass a copy:
+</p><div class="example">
+<pre class="example-preformatted">(defun safe-c-string (x)
+  (let* ((n (length x))
+         (a (make-array (+ n 1) :element-type 'string-char
+           :static t :fill-pointer n)))
+    (si::copy-array-portion x y 0 0 n)
+    (setf (aref a n) (code-char 0)))
+    a)
+
+</pre></div>
+
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COPY_002dARRAY_002dPORTION"><span class="category-def">Function: </span><span><strong class="def-name">COPY-ARRAY-PORTION</strong> <var class="def-var-arguments">(x,y,i1,i2,n1)</var><a class="copiable-link" href="#index-COPY_002dARRAY_002dPORTION"> &para;</a></span></dt>
+<dd><p>Package:SI
+Copy elements from X to Y starting at X[i1] to Y[i2] and doing N1
+elements if N1 is supplied otherwise, doing the length of X - I1
+elements.  If the types of the arrays are not the same, this has
+implementation dependent results.
+</p></dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BYE"><span class="category-def">Function: </span><span><strong class="def-name">BYE</strong> <var class="def-var-arguments">( &amp;optional (exit-status 0))</var><a class="copiable-link" href="#index-BYE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>GCL specific: Exits from GCL with exit-status.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-USE_002dFAST_002dLINKS"><span class="category-def">Function: </span><span><strong class="def-name">USE-FAST-LINKS</strong> <var class="def-var-arguments">(turn-on)</var><a class="copiable-link" href="#index-USE_002dFAST_002dLINKS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>GCL specific: If TURN-ON is not nil, the fast link mechanism is enabled,
+so that ordinary function calls will not appear in the invocation stack,
+and calls will be much faster.  This is the default.   If you anticipate
+needing to see a stack trace in the debugger, then you should turn this
+off.
+</p>
+
+</dd></dl>
+
+
+<ul class="mini-toc">
+<li><a href="Bignums.html" accesskey="1">Bignums</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="C-Interface.html">C Interface</a>, Previous: <a href="Type.html">Type</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Inititialization.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Inititialization (GCL SI Manual)</title>
+
+<meta name="description" content="Inititialization (GCL SI Manual)">
+<meta name="keywords" content="Inititialization (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Miscellaneous.html" rel="up" title="Miscellaneous">
+<link href="Low-Level-X-Interface.html" rel="next" title="Low Level X Interface">
+<link href="Environment.html" rel="prev" title="Environment">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Inititialization">
+<div class="nav-panel">
+<p>
+Next: <a href="Low-Level-X-Interface.html" accesskey="n" rel="next">Low Level X Interface</a>, Previous: <a href="Environment.html" accesskey="p" rel="prev">Environment</a>, Up: <a href="Miscellaneous.html" accesskey="u" rel="up">Miscellaneous</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Initialization"><span>19.2 Initialization<a class="copiable-link" href="#Initialization"> &para;</a></span></h3>
+
+<p>If the file init.lsp exists in the current directory, it is
+loaded at startup.  The first argument passed to the executable image
+should be the system directory.  Normally this would be gcl/unixport.
+This directory is stored in the si::*system-directory* variable.  If
+the file sys-init.lsp exists in the system directory, it is loaded
+before init.lsp.  See also si::*TOP-LEVEL-HOOK*.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Iteration-and-Tests.html
@@ -0,0 +1,211 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Iteration and Tests (GCL SI Manual)</title>
+
+<meta name="description" content="Iteration and Tests (GCL SI Manual)">
+<meta name="keywords" content="Iteration and Tests (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="User-Interface.html" rel="next" title="User Interface">
+<link href="Structures.html" rel="prev" title="Structures">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Iteration-and-Tests">
+<div class="nav-panel">
+<p>
+Next: <a href="User-Interface.html" accesskey="n" rel="next">User Interface</a>, Previous: <a href="Structures.html" accesskey="p" rel="prev">Structures</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Iteration-and-Tests-1"><span>11 Iteration and Tests<a class="copiable-link" href="#Iteration-and-Tests-1"> &para;</a></span></h2>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DO_002dEXTERNAL_002dSYMBOLS"><span class="category-def">Macro: </span><span><strong class="def-name">DO-EXTERNAL-SYMBOLS</strong><a class="copiable-link" href="#index-DO_002dEXTERNAL_002dSYMBOLS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(do-external-symbols (var [package [result-form]])
+          {decl}* {tag | statement}*)
+</pre></div>
+
+<p>Executes STATEMENTs once for each external symbol in the PACKAGE (which
+defaults to the current package), with VAR bound to the current symbol.
+Then evaluates RESULT-FORM (which defaults to NIL) and returns the value(s).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DO_002a"><span class="category-def">Special Form: </span><span><strong class="def-name">DO*</strong><a class="copiable-link" href="#index-DO_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(do* ({(var [init [step]])}*) (endtest {result}*)
+          {decl}* {tag | statement}*)
+</pre></div>
+
+<p>Just like DO, but performs variable bindings and assignments in serial, just
+like LET* and SETQ do.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DO_002dALL_002dSYMBOLS"><span class="category-def">Macro: </span><span><strong class="def-name">DO-ALL-SYMBOLS</strong><a class="copiable-link" href="#index-DO_002dALL_002dSYMBOLS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(do-all-symbols (var [result-form]) {decl}* {tag | statement}*)
+</pre></div>
+
+<p>Executes STATEMENTs once for each symbol in each package, with VAR bound to
+the current symbol.  Then evaluates RESULT-FORM (which defaults to NIL) and
+returns the value(s).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-YES_002dOR_002dNO_002dP"><span class="category-def">Function: </span><span><strong class="def-name">YES-OR-NO-P</strong> <var class="def-var-arguments">(&amp;optional (format-string nil) &amp;rest args)</var><a class="copiable-link" href="#index-YES_002dOR_002dNO_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Asks the user a question whose answer is either &rsquo;YES&rsquo; or &rsquo;NO&rsquo;.  If FORMAT-
+STRING is non-NIL, then FRESH-LINE operation is performed, a message is
+printed as if FORMAT-STRING and ARGs were given to FORMAT, and then a prompt
+&quot;(Yes or No)&quot; is printed.  Otherwise, no prompt will appear.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAPHASH"><span class="category-def">Function: </span><span><strong class="def-name">MAPHASH</strong> <var class="def-var-arguments">#&rsquo;hash-table</var><a class="copiable-link" href="#index-MAPHASH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>For each entry in HASH-TABLE, calls FUNCTION on the key and value of the
+entry; returns NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAPCAR"><span class="category-def">Function: </span><span><strong class="def-name">MAPCAR</strong> <var class="def-var-arguments">(fun list &amp;rest more-lists)</var><a class="copiable-link" href="#index-MAPCAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Applies FUN to successive cars of LISTs and returns the results as a list.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DOLIST"><span class="category-def">Special Form: </span><span><strong class="def-name">DOLIST</strong><a class="copiable-link" href="#index-DOLIST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(dolist (var listform [result]) {decl}* {tag | statement}*)
+</pre></div>
+
+<p>Executes STATEMENTs, with VAR bound to each member of the list value of
+LISTFORM.  Then returns the value(s) of RESULT (which defaults to NIL).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-EQ"><span class="category-def">Function: </span><span><strong class="def-name">EQ</strong> <var class="def-var-arguments">(x y)</var><a class="copiable-link" href="#index-EQ"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X and Y are the same identical object; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-EQUALP"><span class="category-def">Function: </span><span><strong class="def-name">EQUALP</strong> <var class="def-var-arguments">(x y)</var><a class="copiable-link" href="#index-EQUALP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X and Y are EQUAL, if they are characters and satisfy CHAR-EQUAL,
+if they are numbers and have the same numerical value, or if they have
+components that are all EQUALP.  Returns NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-EQUAL"><span class="category-def">Function: </span><span><strong class="def-name">EQUAL</strong> <var class="def-var-arguments">(x y)</var><a class="copiable-link" href="#index-EQUAL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X and Y are EQL or if they are of the same type and corresponding
+components are EQUAL.  Returns NIL otherwise.  Strings and bit-vectors are
+EQUAL if they are the same length and have identical components.  Other
+arrays must be EQ to be EQUAL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DO_002dSYMBOLS"><span class="category-def">Macro: </span><span><strong class="def-name">DO-SYMBOLS</strong><a class="copiable-link" href="#index-DO_002dSYMBOLS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(do-symbols (var [package [result-form]]) {decl}* {tag |
+statement}*)
+</pre></div>
+
+<p>Executes STATEMENTs once for each symbol in the PACKAGE (which defaults to
+the current package), with VAR bound to the current symbol.  Then evaluates
+RESULT-FORM (which defaults to NIL) and returns the value(s).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-LOOP"><span class="category-def">Special Form: </span><span><strong class="def-name">LOOP</strong><a class="copiable-link" href="#index-LOOP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(loop {form}*)
+</pre></div>
+
+<p>Executes FORMs repeatedly until exited by a THROW or RETURN.  The FORMs are
+surrounded by an implicit NIL block.
+</p>
+
+</dd></dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="User-Interface.html">User Interface</a>, Previous: <a href="Structures.html">Structures</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/JAPI-GUI-Library-Binding.html
@@ -0,0 +1,555 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>JAPI GUI Library Binding (GCL SI Manual)</title>
+
+<meta name="description" content="JAPI GUI Library Binding (GCL SI Manual)">
+<meta name="keywords" content="JAPI GUI Library Binding (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Function-Index.html" rel="next" title="Function Index">
+<link href="Compiler-Definitions.html" rel="prev" title="Compiler Definitions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="JAPI-GUI-Library-Binding">
+<div class="nav-panel">
+<p>
+Next: <a href="Function-Index.html" accesskey="n" rel="next">Function Index</a>, Previous: <a href="Compiler-Definitions.html" accesskey="p" rel="prev">Compiler Definitions</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="JAPI-GUI-Library-Binding-1"><span>21 JAPI GUI Library Binding<a class="copiable-link" href="#JAPI-GUI-Library-Binding-1"> &para;</a></span></h2>
+
+<h3 class="heading" id="Introduction_003a_003a"><span>Introduction::<a class="copiable-link" href="#Introduction_003a_003a"> &para;</a></span></h3>
+
+<p>The JAPI GUI library is hosted on the internet at:
+</p>
+<div class="example">
+<pre class="example-preformatted">  http://www.japi.de
+</pre></div>
+
+<p>It has bindings to many common languages.
+</p>
+<h3 class="heading" id="Including-JAPI-in-your-GCL-build_003a_003a"><span>Including JAPI in your GCL build::<a class="copiable-link" href="#Including-JAPI-in-your-GCL-build_003a_003a"> &para;</a></span></h3>
+
+<p>The GCL binding presented here is
+based on the C language version of the library, statically linked into 
+GCL and uses the standard GCL FFI macros to import the functions and constants
+provided by JAPI.
+</p>
+<p>To include the library in your build of GCL, simply download the version of 
+JAPI needed for your computer system, install the headers and libraries,
+and add the GCL configure switch &ldquo;&ndash;enable-japi=yes&rdquo; to your usual
+configuration parameters.  Build GCL as usual.
+</p>
+<p>To run the GUI from GCL programs, you do need to have either of the executables
+&quot;java&quot; or &quot;jre&quot; in your PATH.
+</p>
+
+<h3 class="heading" id="How-it-works_003a_003a"><span>How it works::<a class="copiable-link" href="#How-it-works_003a_003a"> &para;</a></span></h3>
+
+<p>As downloaded from the above web site, JAPI uses a socket connection to a
+Java GUI which is, fortunately for us, invisible to GCL.  This
+gives the GCL JAPI binding the advantages and disadvantages of any non-native
+GUI system which trades off portability, speed and OS specific look and feel.
+</p>
+<p>The GCL JAPI binding works on Windows which is it&rsquo;s main advantage over GCL-Tk
+other than ease of maintenance at the Lisp level.
+</p>
+<p>The main disadvantage of GCL JAPI relative to GCL-Tk is that the JAPI library
+is no longer actively developed.  It has also been criticised for
+depending on Java, a proprietary system.
+</p>
+<p>This binding does nothing more than provide Lisp wrappers around the JAPI
+primitives; there are no higher order functional wrappers.  Never-the-less the
+interface is easy to understand, maintain and use at the Lisp level.
+</p>
+<p>The documentation for JAPI available from the web site is pretty much all you
+need to get started with the library under GCL.  All of the exposed library
+functions and constants are provided in GCL and a comprehensive example is
+provided here to give you some idea of how to start using the system.
+</p>
+<p>Here is a simple example of how to use JAPI.  It displays an empty frame for
+five seconds and then kills the GUI.
+</p>
+<div class="example">
+<pre class="example-preformatted">;; Run a five second frame in a Japi server
+(with-server (&quot;GCL Japi library test GUI 1&quot; 0)
+	     (with-frame (frame &quot;Five Second Blank Test Frame&quot;) 
+			 (j_show frame)
+			 (j_sleep 5000)))
+</pre></div>
+
+<p>The macros &ldquo;with-server&rdquo; and &ldquo;with-frame&rdquo; are defined in the larger
+example below.
+</p>
+<p>The first, &ldquo;with-server&rdquo;, takes two arguments, an application name string
+and a debug level.  With debug level zero there is no debug output on the
+console.
+</p>
+<p>The second, &ldquo;with-frame&rdquo; takes two arguments, a variable name and a frame
+title string.  You use the variable name, here &ldquo;frame&rdquo;, to refer to the
+frame in later function calls.
+</p>
+<p>The longer example below which includes the small example just explained, also 
+displays various kinds of dialog, does some graphics and mouse handling
+including the ability to save graphics to disk, and
+shows one way of implementing a very simple text editor.
+</p>
+
+<h3 class="heading" id="Example_003a_003a"><span>Example::<a class="copiable-link" href="#Example_003a_003a"> &para;</a></span></h3>
+
+<div class="example">
+<pre class="example-preformatted">
+
+;;;
+;;; Japi is a cross-platform, easy to use (rough and ready) Java based GUI library
+;;; Download a library and headers for your platform, and get the C examples
+;;; and documentation from:
+;;;
+;;;     http://www.japi.de/
+;;;
+;;; This file shows how to use some of the available functions.  You may assume
+;;; that the only functions tested so far in the binding are those which appear
+;;; below, as this file doubles as the test program.  The binding is so simple
+;;; however that so far no binding (APART FROM J_PRINT) has gone wrong of those
+;;; tested so far! 
+;;;
+;;;
+;;; HOW TO USE THIS FILE
+;;;
+;;; (compile-file &quot;c:/cvs/gcl/japitest.lsp&quot;) (load &quot;c:/cvs/gcl/japitest.o&quot;)
+;;;
+;;; Requires either &quot;java&quot; or &quot;jre&quot; in the path to work.
+;;;
+
+(in-package :japi-primitives)
+
+;; Start up the Japi server (needs to find either &quot;java&quot; or &quot;jre&quot; in your path
+(defmacro with-server ((app-name debug-level) . body)
+  (multiple-value-bind (ds b)
+		       (si::find-declarations body)
+		       `(if (= 0 (j_start))
+			    (format t (format nil &quot;~S can't connect to the Japi GUI server.&quot; ,app-name))
+			  (progn
+			    (j_setdebug ,debug-level)
+			    ,@ds
+			    (unwind-protect
+				(progn ,@b)
+			      (j_quit))))))
+
+;; Use a frame and clean up afterwards even if trouble ensues
+(defmacro with-frame ((frame-var-name title) . body)
+  (multiple-value-bind (ds b)
+		       (si::find-declarations body)
+		       `(let ((,frame-var-name (j_frame ,title)))
+			  ,@ds
+			  (unwind-protect
+			      (progn ,@b)
+			    (j_dispose ,frame-var-name)))))
+
+;; Use a canvas and clean up afterwards even if trouble ensues
+(defmacro with-canvas ((canvas-var-name frame-obj x-size y-size) . body)
+  (multiple-value-bind (ds b)
+		       (si::find-declarations body)
+		       `(let ((,canvas-var-name (j_canvas ,frame-obj ,x-size ,y-size)))
+			  ,@ds
+			  (unwind-protect
+			      (progn ,@b)
+			    (j_dispose ,canvas-var-name)))))
+
+;; Use a text area and clean up afterwards even if trouble ensues
+(defmacro with-text-area ((text-area-var-name panel-obj x-size y-size) . body)
+  (multiple-value-bind (ds b)
+		       (si::find-declarations body)
+		       `(let ((,text-area-var-name (j_textarea ,panel-obj ,x-size ,y-size)))
+			  ,@ds
+			  (unwind-protect
+			      (progn ,@b)
+			    (j_dispose ,text-area-var-name)))))
+
+;; Use a pulldown menu bar and clean up afterwards even if trouble ensues
+(defmacro with-menu-bar ((bar-var-name frame-obj) . body)
+  (multiple-value-bind (ds b)
+		       (si::find-declarations body)
+		       `(let ((,bar-var-name (j_menubar ,frame-obj)))
+			  ,@ds
+			  (unwind-protect
+			      (progn ,@b)
+			    (j_dispose ,bar-var-name)))))
+
+;; Add a pulldown menu and clean up afterwards even if trouble ensues
+(defmacro with-menu ((menu-var-name bar-obj title) . body)
+  (multiple-value-bind (ds b)
+		       (si::find-declarations body)
+		       `(let ((,menu-var-name (j_menu ,bar-obj ,title)))
+			  ,@ds
+			  (unwind-protect
+			      (progn ,@b)
+			    (j_dispose ,menu-var-name)))))
+
+;; Add a pulldown menu item and clean up afterwards even if trouble ensues
+(defmacro with-menu-item ((item-var-name menu-obj title) . body)
+  (multiple-value-bind (ds b)
+		       (si::find-declarations body)
+		       `(let ((,item-var-name (j_menuitem ,menu-obj ,title)))
+			  ,@ds
+			  (unwind-protect
+			      (progn ,@b)
+			    (j_dispose ,item-var-name)))))
+
+;; Add a mouse listener and clean up afterwards even if trouble ensues
+(defmacro with-mouse-listener ((var-name obj type) . body)
+  (multiple-value-bind (ds b)
+		       (si::find-declarations body)
+		       `(let ((,var-name (j_mouselistener ,obj ,type)))
+			  ,@ds
+			  (unwind-protect
+			      (progn ,@b)
+			    (j_dispose ,var-name)))))
+
+;; Use a panel and clean up afterwards even if trouble ensues
+(defmacro with-panel ((panel-var-name frame-obj) . body)
+  (multiple-value-bind (ds b)
+		       (si::find-declarations body)
+		       `(let ((,panel-var-name (j_panel ,frame-obj)))
+			  ,@ds
+			  (unwind-protect
+			      (progn ,@b)
+			    (j_dispose ,panel-var-name)))))
+
+;; Get a pointer to an array of ints
+(defCfun &quot;static void* inta_ptr(object s)&quot; 0 
+  &quot; return(s-&gt;fixa.fixa_self);&quot;)
+(defentry inta-ptr (object) (int &quot;inta_ptr&quot;))
+
+;; Draw function
+(defun drawgraphics (drawable xmin ymin xmax ymax)
+  (let* ((fntsize 10)
+	 (tmpstrx (format nil &quot;XMax = ~D&quot; xmax))
+	 (tmpstry (format nil &quot;YMax = ~D&quot; ymax))
+	 (tmpstrwidx (j_getstringwidth drawable tmpstrx)))
+    (j_setfontsize drawable fntsize)
+    (j_setnamedcolor drawable J_RED)
+
+    (j_drawline drawable xmin ymin        (- xmax 1)      (- ymax 1))
+    (j_drawline drawable xmin (- ymax 1)  (- xmax 1)      ymin)
+    (j_drawrect drawable xmin ymin        (- xmax xmin 1) (- ymax xmin 1))
+
+    (j_setnamedcolor drawable J_BLACK)
+    (j_drawline drawable xmin (- ymax 30) (- xmax 1)      (- ymax 30))
+    (j_drawstring drawable (- (/ xmax 2) (/ tmpstrwidx 2)) (- ymax 40) tmpstrx)
+
+    (j_drawline drawable (+ xmin 30) ymin (+ xmin 30) (- ymax 1))
+    (j_drawstring drawable (+ xmin 50) 40 tmpstry)
+
+    (j_setnamedcolor drawable J_MAGENTA)
+    (loop for i from 1 to 10
+	  do (j_drawoval drawable
+			 (+ xmin (/ (- xmax xmin) 2)) 
+			 (+ ymin (/ (- ymax ymin) 2))
+			 (* (/ (- xmax xmin) 20) i)
+			 (* (/ (- ymax ymin) 20) i)))
+
+    (j_setnamedcolor drawable J_BLUE)
+    (let ((y ymin)
+	  (teststr &quot;JAPI Test Text&quot;))
+      (loop for i from 5 to 21 do
+	    (j_setfontsize drawable i)
+	    (let ((x (- xmax (j_getstringwidth drawable teststr))))
+	      (setf y (+ y (j_getfontheight drawable)))
+	      (j_drawstring drawable x y teststr))))))
+
+
+     
+;; Run a five second frame in a Japi server
+(with-server (&quot;GCL Japi library test GUI 1&quot; 0)
+	     (with-frame (frame &quot;Five Second Blank Test Frame&quot;) 
+			 (j_show frame)
+			 (j_sleep 5000)))
+
+
+;; Run some more extensive tests
+(with-server
+ (&quot;GCL Japi library test GUI 2&quot; 0)
+ (with-frame
+  (frame &quot;Draw&quot;)
+  (j_show frame)
+  (let ((alert (j_messagebox frame &quot;Two second alert box&quot; &quot;label&quot;))) 
+    (j_sleep 2000)
+    (j_dispose alert))
+  (let ((result1 (j_alertbox frame &quot;label1&quot; &quot;label2&quot; &quot;OK&quot;))
+	(result2 (j_choicebox2 frame &quot;label1&quot; &quot;label2&quot; &quot;Yes&quot; &quot;No&quot;))
+	(result3 (j_choicebox3 frame &quot;label1&quot; &quot;label2&quot; &quot;Yes&quot; &quot;No&quot; &quot;Cancel&quot;)))
+    (format t &quot;Requestor results were: ~D, ~D, ~D~%&quot; result1 result2 result3))
+  (j_setborderlayout frame)
+  (with-menu-bar
+   (menubar frame)
+   (with-menu
+    (file menubar &quot;File&quot;)
+    (with-menu-item
+     (print file &quot;Print&quot;)
+     (with-menu-item
+      (save file &quot;Save BMP&quot;)
+      (with-menu-item
+       (quit file &quot;Quit&quot;)
+       (with-canvas  
+	(canvas frame 400 600)
+	(j_pack frame)
+	(drawgraphics canvas 0 0 (j_getwidth canvas) (j_getheight canvas))
+	(j_show frame)
+	(do ((obj (j_nextaction) (j_nextaction)))
+	    ((or (= obj frame) (= obj quit)) t)
+	    (when (= obj canvas)
+	      (j_setnamedcolorbg canvas J_WHITE)
+	      (drawgraphics canvas 10 10
+			    (- (j_getwidth canvas) 10)
+			    (- (j_getheight canvas) 10)))
+	    (when (= obj print)
+	      (let ((printer (j_printer frame)))
+		(when (&gt; 0 printer)
+		  (drawgraphics printer 40 40
+				(- (j_getwidth printer) 80)
+				(- (j_getheight printer) 80))
+		  (j_print printer))))
+	    (when (= obj save)
+	      (let ((image (j_image 600 800)))
+		(drawgraphics image 0 0 600 800)
+		(when (= 0 (j_saveimage image &quot;test.bmp&quot; J_BMP))
+		  (j_alertbox frame &quot;Problems&quot; &quot;Can't save the image&quot; &quot;OK&quot;)))))))))))))
+
+;; Try some mouse handling
+(with-server
+ (&quot;GCL Japi library test GUI 3&quot; 0)
+ (with-frame
+  (frame &quot;Move and drag the mouse&quot;)
+  (j_setsize frame 430 240)
+  (j_setnamedcolorbg frame J_LIGHT_GRAY)
+  (with-canvas
+   (canvas1 frame 200 200)
+   (with-canvas
+    (canvas2 frame 200 200)
+    (j_setpos canvas1 10 30)
+    (j_setpos canvas2 220 30)
+    (with-mouse-listener
+     (pressed canvas1 J_PRESSED)
+     (with-mouse-listener
+      (dragged canvas1 J_DRAGGED)
+      (with-mouse-listener
+       (released canvas1 J_RELEASED)
+       (with-mouse-listener
+	(entered canvas2 J_ENTERERD)
+	(with-mouse-listener
+	 (moved canvas2 J_MOVED)
+	 (with-mouse-listener
+	  (exited canvas2 J_EXITED)
+	  (j_show frame)
+          ;; Allocate immovable storage for passing data back from C land.
+	  ;; Uses the GCL only make-array keyword :static
+	  (let* ((xa (make-array 1 :initial-element 0 :element-type 'fixnum :static t))
+		 (ya (make-array 1 :initial-element 0 :element-type 'fixnum :static t))
+		 (pxa (inta-ptr xa))
+		 (pya (inta-ptr ya))
+		 (x 0)
+		 (y 0)
+		 (get-mouse-xy (lambda (obj)
+				 (progn (j_getmousepos obj pxa pya)
+					(setf x (aref xa 0))
+					(setf y (aref ya 0)))))
+		 (startx 0)
+		 (starty 0))
+	    (do ((obj (j_nextaction) (j_nextaction)))
+		((= obj frame) t)
+		(when (= obj pressed)
+		  (funcall get-mouse-xy pressed)
+		  (setf startx x)
+		  (setf starty y))
+		(when (= obj dragged)
+		  (funcall get-mouse-xy dragged)
+		  (j_drawrect canvas1 startx starty (- x startx) (- y starty)))
+		(when (= obj released)
+		  (funcall get-mouse-xy released)
+		  (j_drawrect canvas1 startx starty (- x startx) (- y starty)))
+		(when (= obj entered)
+		  (funcall get-mouse-xy entered)
+		  (setf startx x)
+		  (setf starty y))
+		(when (= obj moved)
+		  (funcall get-mouse-xy moved)
+		  (j_drawline canvas2 startx starty x y)
+		  (setf startx x)
+		  (setf starty y))
+		(when (= obj exited)
+		  (funcall get-mouse-xy exited)
+		  (j_drawline canvas2 startx starty x y))))))))))))))
+
+;; Text editor demo
+(with-server 
+ (&quot;GCL Japi library test text editor&quot; 0)
+ (with-frame
+  (frame &quot;A simple editor&quot;)
+  (j_setgridlayout frame 1 1)
+  (with-panel
+   (panel frame)
+   (j_setgridlayout panel 1 1)
+   (with-menu-bar
+    (menubar frame)
+    (with-menu
+     (file-mi menubar &quot;File&quot;)
+     (with-menu-item
+      (new-mi file-mi &quot;New&quot;)
+      (with-menu-item
+       (save-mi file-mi &quot;Save&quot;)
+       (j_seperator file-mi)
+       (with-menu-item
+	(quit-mi file-mi &quot;Quit&quot;)
+
+	(with-menu
+	 (edit-mi menubar &quot;Edit&quot;)
+	 (with-menu-item
+	  (select-all-mi edit-mi &quot;Select All&quot;)
+	  (j_seperator edit-mi)
+	  (with-menu-item
+	   (cut-mi edit-mi &quot;Cut&quot;)
+	   (with-menu-item
+	    (copy-mi edit-mi &quot;Copy&quot;)
+	    (with-menu-item
+	     (paste-mi edit-mi &quot;Paste&quot;)
+       
+	     (with-text-area
+	      (text panel 15 4)
+	      (j_setfont text J_DIALOGIN J_BOLD 18)
+	      (let ((new-text (format nil &quot;JAPI (Java Application~%Programming Interface)~%a platform and language~%independent API&quot;)))
+		(j_settext text new-text)
+		(j_show frame)
+		(j_pack frame)
+		(j_setrows text 4)
+		(j_setcolumns text 15)
+		(j_pack frame)
+		;; Allocate immovable storage for passing data back from C land.
+		;; Uses the GCL only make-array keyword :static
+		(let* ((xa (make-array 1 :initial-element 0 :element-type 'fixnum :static t))
+		       (ya (make-array 1 :initial-element 0 :element-type 'fixnum :static t))
+		       (pxa (inta-ptr xa))
+		       (pya (inta-ptr ya))
+		       (x 0)
+		       (y 0)
+		       (get-mouse-xy (lambda (obj)
+				       (progn (j_getmousepos obj pxa pya)
+					      (setf x (aref xa 0))
+					      (setf y (aref ya 0)))))
+		       (startx 0)
+		       (starty 0)
+		       (selstart 0)
+		       (selend 0)
+		       (text-buffer (make-array 64000 :initial-element 0 :element-type 'character :static t))
+					;	      (text-buffer (make-string 64000 :initial-element #\0))
+		       (p-text-buffer (inta-ptr text-buffer)))
+		  (do ((obj (j_nextaction) (j_nextaction)))
+		      ((or (= obj frame) (= obj quit-mi))t)
+		      (when (= obj panel)
+			(format t &quot;Size changed to ~D rows ~D columns~%&quot; (j_getrows text) (j_getcolumns text))
+			(format t &quot;Size changed to ~D x ~D pixels~%&quot; (j_getwidth text) (j_getheight text)))
+		      (when (= obj text) (format t &quot;Text changed (len=~D)~%&quot; (j_getlength text) ))
+		      (when (= obj new-mi) (j_settext new-text))
+		      (when (= obj save-mi) (j_gettext text text-buffer))
+		      (when (= obj select-all-mi) (j_selectall text))
+		      (when (or (= obj cut-mi)
+				(= obj copy-mi)
+				(= obj paste-mi))
+			(setf selstart (1- (j_getselstart text)))
+			(setf selend (1- (j_getselend text))))
+		      (when (= obj cut-mi)
+			(j_getseltext text p-text-buffer)
+			(j_delete text (1- (j_getselstart text)) (1- (j_getselend text)))
+			(setf selend selstart))
+		      (when (= obj copy-mi)
+			(j_getseltext text p-text-buffer))
+		      (when (= obj paste-mi)
+			(if (= selstart selend)
+			    (j_inserttext text p-text-buffer (1- (j_getcurpos text)))
+			  (j_replacetext text p-text-buffer (1- (j_getselstart text)) (1- (j_getselend text))))
+			))))))))))))))))))
+
+(defun mandel (drawable min_x max_x min_y max_y step_x step_y)
+  (let* ((scale_x (/ 1 step_x))
+	 (scale_y (/ 1 step_y)))
+    (loop for y from min_y to max_y by step_y do
+	  (loop for x from min_x to max_x by step_x do
+		(let* ((c 255)
+		       (z (complex x y))
+		       (a z))
+		  (loop while (and (&lt; (abs
+				       (setq z (+ (* z z) a)))
+				      2)
+				   (&gt;= (decf c) 0)))
+		  (j_setcolor drawable c c c)
+		  (j_drawpixel drawable (* scale_x (+ (abs min_x) x)) (* scale_y (+ (abs min_y) y)) ))))))
+
+;;; Monochrome Mandelbrot
+(with-server
+ (&quot;GCL Japi library test GUI 4&quot; 0)
+ (let* ((min_x -2)
+	(max_x  1)
+	(min_y -1)
+	(max_y  1.1)
+	(step_x 0.01)
+	(step_y 0.01)
+	(size_x (+ 1 (/ (- max_x min_x) step_x)))
+	(size_y (+ 1 (/ (- max_y min_y) step_y))))
+   (with-frame
+    (frame &quot;Mandelbrot&quot;)
+    (j_setsize frame size_x size_y)
+    (j_setborderlayout frame)
+    (with-menu-bar
+     (menubar frame)
+     (with-menu
+      (file menubar &quot;File&quot;)
+      (with-menu-item
+       (save file &quot;Save BMP&quot;)
+       (with-menu-item
+	(quit file &quot;Quit&quot;)
+	(with-canvas
+	 (canvas1 frame size_x size_y)
+	 (j_pack frame)
+	 (j_show frame)
+	 (j_show canvas1)
+	 (mandel canvas1  min_x max_x min_y max_y step_x step_y)
+	 (do ((obj (j_nextaction) (j_nextaction)))
+	     ((or (= obj frame) (= obj quit)) t)
+	     (when (= obj save)
+	       (let ((image (j_getimage canvas1)))
+		 (when (= 0 (j_saveimage image &quot;mandel.bmp&quot; J_BMP))
+		   (j_alertbox frame &quot;Problems&quot; &quot;Can't save the image&quot; &quot;OK&quot;))
+		 (j_dispose image) )))))))))))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Function-Index.html">Function Index</a>, Previous: <a href="Compiler-Definitions.html">Compiler Definitions</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Lists.html
@@ -0,0 +1,1057 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Lists (GCL SI Manual)</title>
+
+<meta name="description" content="Lists (GCL SI Manual)">
+<meta name="keywords" content="Lists (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Streams-and-Reading.html" rel="next" title="Streams and Reading">
+<link href="Characters.html" rel="prev" title="Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Streams-and-Reading.html" accesskey="n" rel="next">Streams and Reading</a>, Previous: <a href="Characters.html" accesskey="p" rel="prev">Characters</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Lists-1"><span>4 Lists<a class="copiable-link" href="#Lists-1"> &para;</a></span></h2>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NINTERSECTION"><span class="category-def">Function: </span><span><strong class="def-name">NINTERSECTION</strong> <var class="def-var-arguments">(list1 list2 &amp;key (test #&rsquo;eql) test-not (key #&rsquo;identity))</var><a class="copiable-link" href="#index-NINTERSECTION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the intersection of LIST1 and LIST2.  LIST1 may be destroyed.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-RASSOC_002dIF"><span class="category-def">Function: </span><span><strong class="def-name">RASSOC-IF</strong> <var class="def-var-arguments">(predicate alist)</var><a class="copiable-link" href="#index-RASSOC_002dIF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the first cons in ALIST whose cdr satisfies PREDICATE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dLIST"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-LIST</strong> <var class="def-var-arguments">(size &amp;key (initial-element nil))</var><a class="copiable-link" href="#index-MAKE_002dLIST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Creates and returns a list containing SIZE elements, each of which is
+initialized to INITIAL-ELEMENT.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NTH"><span class="category-def">Function: </span><span><strong class="def-name">NTH</strong> <var class="def-var-arguments">(n list)</var><a class="copiable-link" href="#index-NTH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the N-th element of LIST, where the car of LIST is the zeroth
+element.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CAAR"><span class="category-def">Function: </span><span><strong class="def-name">CAAR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CAAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR (CAR X)).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NULL"><span class="category-def">Function: </span><span><strong class="def-name">NULL</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-NULL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is NIL; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FIFTH"><span class="category-def">Function: </span><span><strong class="def-name">FIFTH</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-FIFTH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR (CDDDDR X)).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NCONC"><span class="category-def">Function: </span><span><strong class="def-name">NCONC</strong> <var class="def-var-arguments">(&amp;rest lists)</var><a class="copiable-link" href="#index-NCONC"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Concatenates LISTs by destructively modifying them.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-TAILP"><span class="category-def">Function: </span><span><strong class="def-name">TAILP</strong> <var class="def-var-arguments">(sublist list)</var><a class="copiable-link" href="#index-TAILP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if SUBLIST is one of the conses in LIST; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CONSP"><span class="category-def">Function: </span><span><strong class="def-name">CONSP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CONSP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a cons; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-TENTH"><span class="category-def">Function: </span><span><strong class="def-name">TENTH</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-TENTH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CADR (CDDDDR (CDDDDR X))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LISTP"><span class="category-def">Function: </span><span><strong class="def-name">LISTP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-LISTP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is either a cons or NIL; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAPCAN"><span class="category-def">Function: </span><span><strong class="def-name">MAPCAN</strong> <var class="def-var-arguments">(fun list &amp;rest more-lists)</var><a class="copiable-link" href="#index-MAPCAN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Applies FUN to successive cars of LISTs, NCONCs the results, and returns it.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-EIGHTH"><span class="category-def">Function: </span><span><strong class="def-name">EIGHTH</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-EIGHTH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CADDDR (CDDDDR X)).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LENGTH"><span class="category-def">Function: </span><span><strong class="def-name">LENGTH</strong> <var class="def-var-arguments">(sequence)</var><a class="copiable-link" href="#index-LENGTH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the length of SEQUENCE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-RASSOC"><span class="category-def">Function: </span><span><strong class="def-name">RASSOC</strong> <var class="def-var-arguments">(item alist &amp;key (test #&rsquo;eql) test-not (key #&rsquo;identity))</var><a class="copiable-link" href="#index-RASSOC"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the first cons in ALIST whose cdr is equal to ITEM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NSUBST_002dIF_002dNOT"><span class="category-def">Function: </span><span><strong class="def-name">NSUBST-IF-NOT</strong> <var class="def-var-arguments">(new test tree &amp;key (key #&rsquo;identity))</var><a class="copiable-link" href="#index-NSUBST_002dIF_002dNOT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Substitutes NEW for subtrees of TREE that do not satisfy TEST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NBUTLAST"><span class="category-def">Function: </span><span><strong class="def-name">NBUTLAST</strong> <var class="def-var-arguments">(list &amp;optional (n 1))</var><a class="copiable-link" href="#index-NBUTLAST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Changes the cdr of the N+1 th cons from the end of the list LIST to NIL.
+Returns the whole list.
+</p>
+
+</dd></dl>
+
+
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CDR"><span class="category-def">Function: </span><span><strong class="def-name">CDR</strong> <var class="def-var-arguments">(list)</var><a class="copiable-link" href="#index-CDR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the cdr of LIST.  Returns NIL if LIST is NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAPC"><span class="category-def">Function: </span><span><strong class="def-name">MAPC</strong> <var class="def-var-arguments">(fun list &amp;rest more-lists)</var><a class="copiable-link" href="#index-MAPC"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Applies FUN to successive cars of LISTs.  Returns the first LIST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAPL"><span class="category-def">Function: </span><span><strong class="def-name">MAPL</strong> <var class="def-var-arguments">(fun list &amp;rest more-lists)</var><a class="copiable-link" href="#index-MAPL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Applies FUN to successive cdrs of LISTs.  Returns the first LIST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CONS"><span class="category-def">Function: </span><span><strong class="def-name">CONS</strong> <var class="def-var-arguments">(x y)</var><a class="copiable-link" href="#index-CONS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a new cons whose car and cdr are X and Y, respectively.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LIST"><span class="category-def">Function: </span><span><strong class="def-name">LIST</strong> <var class="def-var-arguments">(&amp;rest args)</var><a class="copiable-link" href="#index-LIST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a list of its arguments
+</p>
+
+</dd></dl>
+
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-THIRD"><span class="category-def">Function: </span><span><strong class="def-name">THIRD</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-THIRD"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CADDR X).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CDDAAR"><span class="category-def">Function: </span><span><strong class="def-name">CDDAAR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CDDAAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CDR (CDR (CAR (CAR X)))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CDADAR"><span class="category-def">Function: </span><span><strong class="def-name">CDADAR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CDADAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CDR (CAR (CDR (CAR X)))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CDAADR"><span class="category-def">Function: </span><span><strong class="def-name">CDAADR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CDAADR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CDR (CAR (CAR (CDR X)))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CADDAR"><span class="category-def">Function: </span><span><strong class="def-name">CADDAR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CADDAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR (CDR (CDR (CAR X)))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CADADR"><span class="category-def">Function: </span><span><strong class="def-name">CADADR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CADADR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR (CDR (CAR (CDR X)))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CAADDR"><span class="category-def">Function: </span><span><strong class="def-name">CAADDR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CAADDR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR (CAR (CDR (CDR X)))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NTHCDR"><span class="category-def">Function: </span><span><strong class="def-name">NTHCDR</strong> <var class="def-var-arguments">(n list)</var><a class="copiable-link" href="#index-NTHCDR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the result of performing the CDR operation N times on LIST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PAIRLIS"><span class="category-def">Function: </span><span><strong class="def-name">PAIRLIS</strong> <var class="def-var-arguments">(keys data &amp;optional (alist nil))</var><a class="copiable-link" href="#index-PAIRLIS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Constructs an association list from KEYS and DATA adding to ALIST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SEVENTH"><span class="category-def">Function: </span><span><strong class="def-name">SEVENTH</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-SEVENTH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CADDR (CDDDDR X)).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SUBSETP"><span class="category-def">Function: </span><span><strong class="def-name">SUBSETP</strong> <var class="def-var-arguments">(list1 list2 &amp;key (test #&rsquo;eql) test-not (key #&rsquo;identity))</var><a class="copiable-link" href="#index-SUBSETP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if every element of LIST1 appears in LIST2; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NSUBST_002dIF"><span class="category-def">Function: </span><span><strong class="def-name">NSUBST-IF</strong> <var class="def-var-arguments">(new test tree &amp;key (key #&rsquo;identity))</var><a class="copiable-link" href="#index-NSUBST_002dIF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Substitutes NEW for subtrees of TREE that satisfy TEST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COPY_002dLIST"><span class="category-def">Function: </span><span><strong class="def-name">COPY-LIST</strong> <var class="def-var-arguments">(list)</var><a class="copiable-link" href="#index-COPY_002dLIST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a new copy of LIST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LAST"><span class="category-def">Function: </span><span><strong class="def-name">LAST</strong> <var class="def-var-arguments">(list)</var><a class="copiable-link" href="#index-LAST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the last cons in LIST
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CAAAR"><span class="category-def">Function: </span><span><strong class="def-name">CAAAR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CAAAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR (CAR (CAR X))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LIST_002dLENGTH"><span class="category-def">Function: </span><span><strong class="def-name">LIST-LENGTH</strong> <var class="def-var-arguments">(list)</var><a class="copiable-link" href="#index-LIST_002dLENGTH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the length of LIST, or NIL if LIST is circular.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CDDDR"><span class="category-def">Function: </span><span><strong class="def-name">CDDDR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CDDDR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CDR (CDR (CDR X))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-INTERSECTION"><span class="category-def">Function: </span><span><strong class="def-name">INTERSECTION</strong> <var class="def-var-arguments">(list1 list2 &amp;key (test #&rsquo;eql) test-not (key #&rsquo;identity))</var><a class="copiable-link" href="#index-INTERSECTION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the intersection of List1 and List2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NSUBST"><span class="category-def">Function: </span><span><strong class="def-name">NSUBST</strong> <var class="def-var-arguments">(new old tree &amp;key (test #&rsquo;eql) test-not (key #&rsquo;identity))</var><a class="copiable-link" href="#index-NSUBST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Substitutes NEW for subtrees in TREE that match OLD.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-REVAPPEND"><span class="category-def">Function: </span><span><strong class="def-name">REVAPPEND</strong> <var class="def-var-arguments">(x y)</var><a class="copiable-link" href="#index-REVAPPEND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (APPEND (REVERSE X) Y)
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CDAR"><span class="category-def">Function: </span><span><strong class="def-name">CDAR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CDAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CDR (CAR X)).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CADR"><span class="category-def">Function: </span><span><strong class="def-name">CADR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CADR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR (CDR X)).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-REST"><span class="category-def">Function: </span><span><strong class="def-name">REST</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-REST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CDR X).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NSET_002dEXCLUSIVE_002dOR"><span class="category-def">Function: </span><span><strong class="def-name">NSET-EXCLUSIVE-OR</strong> <var class="def-var-arguments">(list1 list2 &amp;key (test #&rsquo;eql) test-not (key #&rsquo;identity))</var><a class="copiable-link" href="#index-NSET_002dEXCLUSIVE_002dOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a list with elements which appear but once in LIST1 and LIST2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ACONS"><span class="category-def">Function: </span><span><strong class="def-name">ACONS</strong> <var class="def-var-arguments">(key datum alist)</var><a class="copiable-link" href="#index-ACONS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Constructs a new alist by adding the pair (KEY . DATUM) to ALIST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SUBST_002dIF_002dNOT"><span class="category-def">Function: </span><span><strong class="def-name">SUBST-IF-NOT</strong> <var class="def-var-arguments">(new test tree &amp;key (key #&rsquo;identity))</var><a class="copiable-link" href="#index-SUBST_002dIF_002dNOT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Substitutes NEW for subtrees of TREE that do not satisfy TEST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-RPLACA"><span class="category-def">Function: </span><span><strong class="def-name">RPLACA</strong> <var class="def-var-arguments">(x y)</var><a class="copiable-link" href="#index-RPLACA"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Replaces the car of X with Y, and returns the modified X.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SECOND"><span class="category-def">Function: </span><span><strong class="def-name">SECOND</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-SECOND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CADR X).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NUNION"><span class="category-def">Function: </span><span><strong class="def-name">NUNION</strong> <var class="def-var-arguments">(list1 list2 &amp;key (test #&rsquo;eql) test-not (key #&rsquo;identity))</var><a class="copiable-link" href="#index-NUNION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the union of LIST1 and LIST2.  LIST1 and/or LIST2 may be destroyed.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BUTLAST"><span class="category-def">Function: </span><span><strong class="def-name">BUTLAST</strong> <var class="def-var-arguments">(list &amp;optional (n 1))</var><a class="copiable-link" href="#index-BUTLAST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Creates and returns a list with the same elements as LIST but without the
+last N elements.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COPY_002dALIST"><span class="category-def">Function: </span><span><strong class="def-name">COPY-ALIST</strong> <var class="def-var-arguments">(alist)</var><a class="copiable-link" href="#index-COPY_002dALIST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+ Returns a new copy of ALIST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SIXTH"><span class="category-def">Function: </span><span><strong class="def-name">SIXTH</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-SIXTH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+ Equivalent to (CADR (CDDDDR X)).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CAAAAR"><span class="category-def">Function: </span><span><strong class="def-name">CAAAAR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CAAAAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR (CAR (CAR (CAR X)))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CDDDAR"><span class="category-def">Function: </span><span><strong class="def-name">CDDDAR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CDDDAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CDR (CDR (CDR (CAR X)))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CDDADR"><span class="category-def">Function: </span><span><strong class="def-name">CDDADR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CDDADR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CDR (CDR (CAR (CDR X)))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CDADDR"><span class="category-def">Function: </span><span><strong class="def-name">CDADDR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CDADDR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CDR (CAR (CDR (CDR X)))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CADDDR"><span class="category-def">Function: </span><span><strong class="def-name">CADDDR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CADDDR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR (CDR (CDR (CDR X)))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FOURTH"><span class="category-def">Function: </span><span><strong class="def-name">FOURTH</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-FOURTH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CADDDR X).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NSUBLIS"><span class="category-def">Function: </span><span><strong class="def-name">NSUBLIS</strong> <var class="def-var-arguments">(alist tree &amp;key (test #&rsquo;eql) test-not (key #&rsquo;identity))</var><a class="copiable-link" href="#index-NSUBLIS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Substitutes from ALIST for subtrees of TREE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SUBST_002dIF"><span class="category-def">Function: </span><span><strong class="def-name">SUBST-IF</strong> <var class="def-var-arguments">(new test tree &amp;key (key #&rsquo;identity))</var><a class="copiable-link" href="#index-SUBST_002dIF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Substitutes NEW for subtrees of TREE that satisfy TEST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NSET_002dDIFFERENCE"><span class="category-def">Function: </span><span><strong class="def-name">NSET-DIFFERENCE</strong> <var class="def-var-arguments">(list1 list2 &amp;key (test #&rsquo;eql) test-not (key #&rsquo;identity))</var><a class="copiable-link" href="#index-NSET_002dDIFFERENCE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a list of elements of LIST1 that do not appear in LIST2.  LIST1 may
+be destroyed.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-POP"><span class="category-def">Special Form: </span><span><strong class="def-name">POP</strong><a class="copiable-link" href="#index-POP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(pop place)
+</pre></div>
+
+<p>Pops one item off the front of the list in PLACE and returns it.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-PUSH"><span class="category-def">Special Form: </span><span><strong class="def-name">PUSH</strong><a class="copiable-link" href="#index-PUSH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(push item place)
+</pre></div>
+
+<p>Conses ITEM onto the list in PLACE, and returns the new list.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CDAAR"><span class="category-def">Function: </span><span><strong class="def-name">CDAAR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CDAAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CDR (CAR (CAR X))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CADAR"><span class="category-def">Function: </span><span><strong class="def-name">CADAR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CADAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR (CDR (CAR X))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CAADR"><span class="category-def">Function: </span><span><strong class="def-name">CAADR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CAADR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR (CAR (CDR X))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FIRST"><span class="category-def">Function: </span><span><strong class="def-name">FIRST</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-FIRST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR X).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SUBST"><span class="category-def">Function: </span><span><strong class="def-name">SUBST</strong> <var class="def-var-arguments">(new old tree &amp;key (test #&rsquo;eql) test-not (key #&rsquo;identity))</var><a class="copiable-link" href="#index-SUBST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Substitutes NEW for subtrees of TREE that match OLD.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ADJOIN"><span class="category-def">Function: </span><span><strong class="def-name">ADJOIN</strong> <var class="def-var-arguments">(item list &amp;key (test #&rsquo;eql) test-not (key #&rsquo;identity))</var><a class="copiable-link" href="#index-ADJOIN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Adds ITEM to LIST unless ITEM is already a member of LIST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAPCON"><span class="category-def">Function: </span><span><strong class="def-name">MAPCON</strong> <var class="def-var-arguments">(fun list &amp;rest more-lists)</var><a class="copiable-link" href="#index-MAPCON"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Applies FUN to successive cdrs of LISTs, NCONCs the results, and returns it.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-PUSHNEW"><span class="category-def">Macro: </span><span><strong class="def-name">PUSHNEW</strong><a class="copiable-link" href="#index-PUSHNEW"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(pushnew item place {keyword value}*)
+</pre></div>
+
+<p>If ITEM is already in the list stored in PLACE, does nothing.  Else, conses
+ITEM onto the list.  Returns NIL.  If no KEYWORDs are supplied, each element
+in the list is compared with ITEM by EQL, but the comparison can be controlled
+by supplying keywords :TEST, :TEST-NOT, and/or :KEY.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SET_002dEXCLUSIVE_002dOR"><span class="category-def">Function: </span><span><strong class="def-name">SET-EXCLUSIVE-OR</strong> <var class="def-var-arguments">(list1 list2 &amp;key (test #&rsquo;eql) test-not (key #&rsquo;identity))</var><a class="copiable-link" href="#index-SET_002dEXCLUSIVE_002dOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a list of elements appearing exactly once in LIST1 and LIST2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-TREE_002dEQUAL"><span class="category-def">Function: </span><span><strong class="def-name">TREE-EQUAL</strong> <var class="def-var-arguments">(x y &amp;key (test #&rsquo;eql) test-not)</var><a class="copiable-link" href="#index-TREE_002dEQUAL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X and Y are isomorphic trees with identical leaves.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CDDR"><span class="category-def">Function: </span><span><strong class="def-name">CDDR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CDDR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CDR (CDR X)).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GETF"><span class="category-def">Function: </span><span><strong class="def-name">GETF</strong> <var class="def-var-arguments">(place indicator &amp;optional (default nil))</var><a class="copiable-link" href="#index-GETF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Searches the property list stored in Place for an indicator EQ to Indicator.
+If one is found, the corresponding value is returned, else the Default is
+returned.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LDIFF"><span class="category-def">Function: </span><span><strong class="def-name">LDIFF</strong> <var class="def-var-arguments">(list sublist)</var><a class="copiable-link" href="#index-LDIFF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a new list, whose elements are those of LIST that appear before
+SUBLIST.  If SUBLIST is not a tail of LIST, a copy of LIST is returned.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-UNION"><span class="category-def">Function: </span><span><strong class="def-name">UNION</strong> <var class="def-var-arguments">(list1 list2 &amp;key (test #&rsquo;eql) test-not (key #&rsquo;identity))</var><a class="copiable-link" href="#index-UNION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the union of LIST1 and LIST2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ASSOC_002dIF_002dNOT"><span class="category-def">Function: </span><span><strong class="def-name">ASSOC-IF-NOT</strong> <var class="def-var-arguments">(test alist)</var><a class="copiable-link" href="#index-ASSOC_002dIF_002dNOT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the first pair in ALIST whose car does not satisfy TEST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-RPLACD"><span class="category-def">Function: </span><span><strong class="def-name">RPLACD</strong> <var class="def-var-arguments">(x y)</var><a class="copiable-link" href="#index-RPLACD"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Replaces the cdr of X with Y, and returns the modified X.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MEMBER_002dIF_002dNOT"><span class="category-def">Function: </span><span><strong class="def-name">MEMBER-IF-NOT</strong> <var class="def-var-arguments">(test list &amp;key (key #&rsquo;identity))</var><a class="copiable-link" href="#index-MEMBER_002dIF_002dNOT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the tail of LIST beginning with the first element not satisfying
+TEST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CAR"><span class="category-def">Function: </span><span><strong class="def-name">CAR</strong> <var class="def-var-arguments">(list)</var><a class="copiable-link" href="#index-CAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the car of LIST.  Returns NIL if LIST is NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ENDP"><span class="category-def">Function: </span><span><strong class="def-name">ENDP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-ENDP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is NIL.  Returns NIL if X is a cons.  Otherwise, signals an
+error.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LIST_002a"><span class="category-def">Function: </span><span><strong class="def-name">LIST*</strong> <var class="def-var-arguments">(arg &amp;rest others)</var><a class="copiable-link" href="#index-LIST_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a list of its arguments with the last cons being a dotted pair of
+the next to the last argument and the last argument.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NINTH"><span class="category-def">Function: </span><span><strong class="def-name">NINTH</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-NINTH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR (CDDDDR (CDDDDR X))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CDAAAR"><span class="category-def">Function: </span><span><strong class="def-name">CDAAAR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CDAAAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CDR (CAR (CAR (CAR X)))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CADAAR"><span class="category-def">Function: </span><span><strong class="def-name">CADAAR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CADAAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR (CDR (CAR (CAR X)))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CAADAR"><span class="category-def">Function: </span><span><strong class="def-name">CAADAR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CAADAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR (CAR (CDR (CAR X)))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CAAADR"><span class="category-def">Function: </span><span><strong class="def-name">CAAADR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CAAADR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR (CAR (CAR (CDR X)))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CDDDDR"><span class="category-def">Function: </span><span><strong class="def-name">CDDDDR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CDDDDR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CDR (CDR (CDR (CDR X)))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SUBLIS"><span class="category-def">Function: </span><span><strong class="def-name">SUBLIS</strong> <var class="def-var-arguments">(alist tree &amp;key (test #&rsquo;eql) test-not (key #&rsquo;identity))</var><a class="copiable-link" href="#index-SUBLIS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Substitutes from ALIST for subtrees of TREE nondestructively.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-RASSOC_002dIF_002dNOT"><span class="category-def">Function: </span><span><strong class="def-name">RASSOC-IF-NOT</strong> <var class="def-var-arguments">(predicate alist)</var><a class="copiable-link" href="#index-RASSOC_002dIF_002dNOT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the first cons in ALIST whose cdr does not satisfy PREDICATE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NRECONC"><span class="category-def">Function: </span><span><strong class="def-name">NRECONC</strong> <var class="def-var-arguments">(x y)</var><a class="copiable-link" href="#index-NRECONC"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (NCONC (NREVERSE X) Y).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAPLIST"><span class="category-def">Function: </span><span><strong class="def-name">MAPLIST</strong> <var class="def-var-arguments">(fun list &amp;rest more-lists)</var><a class="copiable-link" href="#index-MAPLIST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Applies FUN to successive cdrs of LISTs and returns the results as a list.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SET_002dDIFFERENCE"><span class="category-def">Function: </span><span><strong class="def-name">SET-DIFFERENCE</strong> <var class="def-var-arguments">(list1 list2 &amp;key (test #&rsquo;eql) test-not (key #&rsquo;identity))</var><a class="copiable-link" href="#index-SET_002dDIFFERENCE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a list of elements of LIST1 that do not appear in LIST2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ASSOC_002dIF"><span class="category-def">Function: </span><span><strong class="def-name">ASSOC-IF</strong> <var class="def-var-arguments">(test alist)</var><a class="copiable-link" href="#index-ASSOC_002dIF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the first pair in ALIST whose car satisfies TEST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GET_002dPROPERTIES"><span class="category-def">Function: </span><span><strong class="def-name">GET-PROPERTIES</strong> <var class="def-var-arguments">(place indicator-list)</var><a class="copiable-link" href="#index-GET_002dPROPERTIES"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Looks for the elements of INDICATOR-LIST in the property list stored in PLACE.
+If found, returns the indicator, the value, and T as multiple-values.  If not,
+returns NILs as its three values.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MEMBER_002dIF"><span class="category-def">Function: </span><span><strong class="def-name">MEMBER-IF</strong> <var class="def-var-arguments">(test list &amp;key (key #&rsquo;identity))</var><a class="copiable-link" href="#index-MEMBER_002dIF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the tail of LIST beginning with the first element satisfying TEST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COPY_002dTREE"><span class="category-def">Function: </span><span><strong class="def-name">COPY-TREE</strong> <var class="def-var-arguments">(object)</var><a class="copiable-link" href="#index-COPY_002dTREE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Recursively copies conses in OBJECT and returns the result.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ATOM"><span class="category-def">Function: </span><span><strong class="def-name">ATOM</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-ATOM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is not a cons; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CDDAR"><span class="category-def">Function: </span><span><strong class="def-name">CDDAR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CDDAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CDR (CDR (CAR X))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CDADR"><span class="category-def">Function: </span><span><strong class="def-name">CDADR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CDADR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CDR (CAR (CDR X))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CADDR"><span class="category-def">Function: </span><span><strong class="def-name">CADDR</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-CADDR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Equivalent to (CAR (CDR (CDR X))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ASSOC"><span class="category-def">Function: </span><span><strong class="def-name">ASSOC</strong> <var class="def-var-arguments">(item alist &amp;key (test #&rsquo;eql) test-not)</var><a class="copiable-link" href="#index-ASSOC"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the first pair in ALIST whose car is equal (in the sense of TEST) to
+ITEM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-APPEND"><span class="category-def">Function: </span><span><strong class="def-name">APPEND</strong> <var class="def-var-arguments">(&amp;rest lists)</var><a class="copiable-link" href="#index-APPEND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Constructs a new list by concatenating its arguments.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MEMBER"><span class="category-def">Function: </span><span><strong class="def-name">MEMBER</strong> <var class="def-var-arguments">(item list &amp;key (test #&rsquo;eql) test-not (key #&rsquo;identity))</var><a class="copiable-link" href="#index-MEMBER"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the tail of LIST beginning with the first ITEM.
+</p>
+
+</dd></dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Streams-and-Reading.html">Streams and Reading</a>, Previous: <a href="Characters.html">Characters</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Low-Level-Debug-Functions.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Low Level Debug Functions (GCL SI Manual)</title>
+
+<meta name="description" content="Low Level Debug Functions (GCL SI Manual)">
+<meta name="keywords" content="Low Level Debug Functions (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Debugging.html" rel="up" title="Debugging">
+<link href="Source-Level-Debugging-in-Emacs.html" rel="prev" title="Source Level Debugging in Emacs">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Low-Level-Debug-Functions">
+<div class="nav-panel">
+<p>
+Previous: <a href="Source-Level-Debugging-in-Emacs.html" accesskey="p" rel="prev">Source Level Debugging in Emacs</a>, Up: <a href="Debugging.html" accesskey="u" rel="up">Debugging</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Low-Level-Debug-Functions-1"><span>18.2 Low Level Debug Functions<a class="copiable-link" href="#Low-Level-Debug-Functions-1"> &para;</a></span></h3>
+
+<p>Use the following functions to directly access GCL stacks.
+</p><div class="example">
+<pre class="example-preformatted">(SI:VS i)	Returns the i-th entity in VS.
+(SI:IHS-VS i)	Returns the VS index of the i-th entity in IHS.
+(SI:IHS-FUN i)	Returns the function of the i-th entity in IHS.
+(SI:FRS-VS i)	Returns the VS index of the i-th entity in FRS.
+(SI:FRS-BDS i)	Returns the BDS index of the i-th entity in FRS.
+(SI:FRS-IHS i)	Returns the IHS index of the i-th entity in FRS.
+(SI:BDS-VAR i)	Returns the symbol of the i-th entity in BDS.
+(SI:BDS-VAL i)	Returns the value of the i-th entity in BDS.
+
+(SI:SUPER-GO i tag)
+	Jumps to the specified tag established by the TAGBODY frame at
+	FRS[i].  Both arguments are evaluated.  If FRS[i] happens to be
+	a non-TAGBODY frame, then (THROW (SI:IHS-TAG i) (VALUES)) is
+	performed.
+</pre></div>
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Low-Level-X-Interface.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Low Level X Interface (GCL SI Manual)</title>
+
+<meta name="description" content="Low Level X Interface (GCL SI Manual)">
+<meta name="keywords" content="Low Level X Interface (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Miscellaneous.html" rel="up" title="Miscellaneous">
+<link href="Inititialization.html" rel="prev" title="Inititialization">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Low-Level-X-Interface">
+<div class="nav-panel">
+<p>
+Previous: <a href="Inititialization.html" accesskey="p" rel="prev">Initialization</a>, Up: <a href="Miscellaneous.html" accesskey="u" rel="up">Miscellaneous</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Low-Level-X-Interface-1"><span>19.3 Low Level X Interface<a class="copiable-link" href="#Low-Level-X-Interface-1"> &para;</a></span></h3>
+
+<p>A sample program for drawing things on X windows from lisp
+is included in the file gcl/lsp/littleXlsp.lsp
+</p>
+<p>That routine invokes the corresponding C routines in XLIB.
+So in order to use it you must &lsquo;faslink&rsquo; in the X routines.
+Directions are given at the beginning of the lisp file,
+for either building them into the image or using faslink.
+</p>
+<p>This program is also a good tutorial on invoking C from lisp.
+</p>
+<p>See also defentry and faslink.
+</p>
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Miscellaneous.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Miscellaneous (GCL SI Manual)</title>
+
+<meta name="description" content="Miscellaneous (GCL SI Manual)">
+<meta name="keywords" content="Miscellaneous (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Compiler-Definitions.html" rel="next" title="Compiler Definitions">
+<link href="Debugging.html" rel="prev" title="Debugging">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Miscellaneous">
+<div class="nav-panel">
+<p>
+Next: <a href="Compiler-Definitions.html" accesskey="n" rel="next">Compiler Definitions</a>, Previous: <a href="Debugging.html" accesskey="p" rel="prev">Debugging</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Miscellaneous-1"><span>19 Miscellaneous<a class="copiable-link" href="#Miscellaneous-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Environment.html" accesskey="1">Environment</a></li>
+<li><a href="Inititialization.html" accesskey="2">Initialization</a></li>
+<li><a href="Low-Level-X-Interface.html" accesskey="3">Low Level X Interface</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Numbers.html
@@ -0,0 +1,1542 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Numbers (GCL SI Manual)</title>
+
+<meta name="description" content="Numbers (GCL SI Manual)">
+<meta name="keywords" content="Numbers (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Sequences-and-Arrays-and-Hash-Tables.html" rel="next" title="Sequences and Arrays and Hash Tables">
+<link href="index.html" rel="prev" title="Top">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Numbers">
+<div class="nav-panel">
+<p>
+Next: <a href="Sequences-and-Arrays-and-Hash-Tables.html" accesskey="n" rel="next">Sequences and Arrays and Hash Tables</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Numbers-1"><span>1 Numbers<a class="copiable-link" href="#Numbers-1"> &para;</a></span></h2>
+
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SIGNUM"><span class="category-def">Function: </span><span><strong class="def-name">SIGNUM</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-SIGNUM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>If NUMBER is zero, returns NUMBER; else returns (/ NUMBER (ABS NUMBER)).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOGNOT"><span class="category-def">Function: </span><span><strong class="def-name">LOGNOT</strong> <var class="def-var-arguments">(integer)</var><a class="copiable-link" href="#index-LOGNOT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the bit-wise logical NOT of INTEGER.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-MOST_002dPOSITIVE_002dSHORT_002dFLOAT"><span class="category-def">Constant: </span><span><strong class="def-name">MOST-POSITIVE-SHORT-FLOAT</strong><a class="copiable-link" href="#index-MOST_002dPOSITIVE_002dSHORT_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The short-float closest in value to positive infinity.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-INTEGER_002dDECODE_002dFLOAT"><span class="category-def">Function: </span><span><strong class="def-name">INTEGER-DECODE-FLOAT</strong> <var class="def-var-arguments">(float)</var><a class="copiable-link" href="#index-INTEGER_002dDECODE_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns, as three values, the integer interpretation of significand F,
+the exponent E, and the sign S of the given float, so that
+			 E
+	FLOAT = S * F * B	where B = (FLOAT-RADIX FLOAT)
+</p>
+<p>F is a non-negative integer, E is an integer, and S is either 1 or -1.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MINUSP"><span class="category-def">Function: </span><span><strong class="def-name">MINUSP</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-MINUSP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if NUMBER &lt; 0; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOGORC1"><span class="category-def">Function: </span><span><strong class="def-name">LOGORC1</strong> <var class="def-var-arguments">(integer1 integer2)</var><a class="copiable-link" href="#index-LOGORC1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the logical OR of (LOGNOT INTEGER1) and INTEGER2.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-MOST_002dNEGATIVE_002dSINGLE_002dFLOAT"><span class="category-def">Constant: </span><span><strong class="def-name">MOST-NEGATIVE-SINGLE-FLOAT</strong><a class="copiable-link" href="#index-MOST_002dNEGATIVE_002dSINGLE_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Same as MOST-NEGATIVE-LONG-FLOAT.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-BOOLE_002dC1"><span class="category-def">Constant: </span><span><strong class="def-name">BOOLE-C1</strong><a class="copiable-link" href="#index-BOOLE_002dC1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Makes BOOLE return the complement of INTEGER1.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-LEAST_002dPOSITIVE_002dSHORT_002dFLOAT"><span class="category-def">Constant: </span><span><strong class="def-name">LEAST-POSITIVE-SHORT-FLOAT</strong><a class="copiable-link" href="#index-LEAST_002dPOSITIVE_002dSHORT_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The positive short-float closest in value to zero.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BIT_002dNAND"><span class="category-def">Function: </span><span><strong class="def-name">BIT-NAND</strong> <var class="def-var-arguments">(bit-array1 bit-array2 &amp;optional (result-bit-array nil))</var><a class="copiable-link" href="#index-BIT_002dNAND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Performs a bit-wise logical NAND  on the elements of BIT-ARRAY1 and
+BIT-ARRAY2.
+Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
+BIT-ARRAY1 if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.
+</p>
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-INT_002dCHAR"><span class="category-def">Function: </span><span><strong class="def-name">INT-CHAR</strong> <var class="def-var-arguments">(integer)</var><a class="copiable-link" href="#index-INT_002dCHAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Performs the inverse of CHAR-INT.  Equivalent to CODE-CHAR in GCL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR_002dINT"><span class="category-def">Function: </span><span><strong class="def-name">CHAR-INT</strong> <var class="def-var-arguments">(char)</var><a class="copiable-link" href="#index-CHAR_002dINT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the font, bits, and code attributes as a single non-negative integer.
+Equivalent to CHAR-CODE in GCL.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-LEAST_002dNEGATIVE_002dSINGLE_002dFLOAT"><span class="category-def">Constant: </span><span><strong class="def-name">LEAST-NEGATIVE-SINGLE-FLOAT</strong><a class="copiable-link" href="#index-LEAST_002dNEGATIVE_002dSINGLE_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Same as LEAST-NEGATIVE-LONG-FLOAT.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-_002f_003d"><span class="category-def">Function: </span><span><strong class="def-name">/=</strong> <var class="def-var-arguments">(number &amp;rest more-numbers)</var><a class="copiable-link" href="#index-_002f_003d"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if no two of its arguments are numerically equal; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LDB_002dTEST"><span class="category-def">Function: </span><span><strong class="def-name">LDB-TEST</strong> <var class="def-var-arguments">(bytespec integer)</var><a class="copiable-link" href="#index-LDB_002dTEST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if at least one of the bits in the specified bytes of INTEGER is 1;
+NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-CHAR_002dCODE_002dLIMIT"><span class="category-def">Constant: </span><span><strong class="def-name">CHAR-CODE-LIMIT</strong><a class="copiable-link" href="#index-CHAR_002dCODE_002dLIMIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The upper exclusive bound on values produced by CHAR-CODE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-RATIONAL"><span class="category-def">Function: </span><span><strong class="def-name">RATIONAL</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-RATIONAL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Converts NUMBER into rational accurately and returns it.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-PI"><span class="category-def">Constant: </span><span><strong class="def-name">PI</strong><a class="copiable-link" href="#index-PI"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The floating-point number that is appropriately equal to the ratio of the
+circumference of the circle to the diameter.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SIN"><span class="category-def">Function: </span><span><strong class="def-name">SIN</strong> <var class="def-var-arguments">(radians)</var><a class="copiable-link" href="#index-SIN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the sine of RADIANS.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-BOOLE_002dORC2"><span class="category-def">Constant: </span><span><strong class="def-name">BOOLE-ORC2</strong><a class="copiable-link" href="#index-BOOLE_002dORC2"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Makes BOOLE return LOGORC2 of INTEGER1 and INTEGER2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NUMERATOR"><span class="category-def">Function: </span><span><strong class="def-name">NUMERATOR</strong> <var class="def-var-arguments">(rational)</var><a class="copiable-link" href="#index-NUMERATOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns as an integer the numerator of the given rational number.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MASK_002dFIELD"><span class="category-def">Function: </span><span><strong class="def-name">MASK-FIELD</strong> <var class="def-var-arguments">(bytespec integer)</var><a class="copiable-link" href="#index-MASK_002dFIELD"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Extracts the specified byte from INTEGER.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-INCF"><span class="category-def">Special Form: </span><span><strong class="def-name">INCF</strong><a class="copiable-link" href="#index-INCF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(incf place [delta])
+</pre></div>
+
+<p>Adds the number produced by DELTA (which defaults to 1) to the number
+in PLACE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SINH"><span class="category-def">Function: </span><span><strong class="def-name">SINH</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-SINH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the hyperbolic sine of NUMBER.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PHASE"><span class="category-def">Function: </span><span><strong class="def-name">PHASE</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-PHASE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the angle part of the polar representation of a complex number.
+For non-complex numbers, this is 0.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BOOLE"><span class="category-def">Function: </span><span><strong class="def-name">BOOLE</strong> <var class="def-var-arguments">(op integer1 integer2)</var><a class="copiable-link" href="#index-BOOLE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns an integer produced by performing the logical operation specified by
+OP on the two integers.  OP must be the value of one of the following
+constants:
+	BOOLE-CLR	BOOLE-C1	BOOLE-XOR	BOOLE-ANDC1
+	BOOLE-SET	BOOLE-C2	BOOLE-EQV	BOOLE-ANDC2
+	BOOLE-1		BOOLE-AND	BOOLE-NAND	BOOLE-ORC1
+	BOOLE-2		BOOLE-IOR	BOOLE-NOR	BOOLE-ORC2
+See the variable docs of these constants for their operations.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-SHORT_002dFLOAT_002dEPSILON"><span class="category-def">Constant: </span><span><strong class="def-name">SHORT-FLOAT-EPSILON</strong><a class="copiable-link" href="#index-SHORT_002dFLOAT_002dEPSILON"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The smallest positive short-float that satisfies
+	(not (= (float 1 e) (+ (float 1 e) e))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOGORC2"><span class="category-def">Function: </span><span><strong class="def-name">LOGORC2</strong> <var class="def-var-arguments">(integer1 integer2)</var><a class="copiable-link" href="#index-LOGORC2"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the logical OR of INTEGER1 and (LOGNOT INTEGER2).
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-BOOLE_002dC2"><span class="category-def">Constant: </span><span><strong class="def-name">BOOLE-C2</strong><a class="copiable-link" href="#index-BOOLE_002dC2"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Makes BOOLE return the complement of INTEGER2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-REALPART"><span class="category-def">Function: </span><span><strong class="def-name">REALPART</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-REALPART"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Extracts the real part of NUMBER.
+</p>
+
+</dd></dl>
+
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-BOOLE_002dCLR"><span class="category-def">Constant: </span><span><strong class="def-name">BOOLE-CLR</strong><a class="copiable-link" href="#index-BOOLE_002dCLR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Makes BOOLE return 0.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-BOOLE_002dIOR"><span class="category-def">Constant: </span><span><strong class="def-name">BOOLE-IOR</strong><a class="copiable-link" href="#index-BOOLE_002dIOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Makes BOOLE return LOGIOR of INTEGER1 and INTEGER2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FTRUNCATE"><span class="category-def">Function: </span><span><strong class="def-name">FTRUNCATE</strong> <var class="def-var-arguments">(number &amp;optional (divisor 1))</var><a class="copiable-link" href="#index-FTRUNCATE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Values: (quotient remainder)
+Same as TRUNCATE, but returns first value as a float.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-EQL"><span class="category-def">Function: </span><span><strong class="def-name">EQL</strong> <var class="def-var-arguments">(x y)</var><a class="copiable-link" href="#index-EQL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X and Y are EQ, or if they are numbers of the same type with
+the same value, or if they are character objects that represent the same
+character.  Returns NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOG"><span class="category-def">Function: </span><span><strong class="def-name">LOG</strong> <var class="def-var-arguments">(number &amp;optional base)</var><a class="copiable-link" href="#index-LOG"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the logarithm of NUMBER in the base BASE.  BASE defaults to the base
+of natural logarithms.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-DOUBLE_002dFLOAT_002dNEGATIVE_002dEPSILON"><span class="category-def">Constant: </span><span><strong class="def-name">DOUBLE-FLOAT-NEGATIVE-EPSILON</strong><a class="copiable-link" href="#index-DOUBLE_002dFLOAT_002dNEGATIVE_002dEPSILON"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Same as LONG-FLOAT-NEGATIVE-EPSILON.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOGIOR"><span class="category-def">Function: </span><span><strong class="def-name">LOGIOR</strong> <var class="def-var-arguments">(&amp;rest integers)</var><a class="copiable-link" href="#index-LOGIOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the bit-wise INCLUSIVE OR of its arguments.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-MOST_002dNEGATIVE_002dDOUBLE_002dFLOAT"><span class="category-def">Constant: </span><span><strong class="def-name">MOST-NEGATIVE-DOUBLE-FLOAT</strong><a class="copiable-link" href="#index-MOST_002dNEGATIVE_002dDOUBLE_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Same as MOST-NEGATIVE-LONG-FLOAT.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-_002f"><span class="category-def">Function: </span><span><strong class="def-name">/</strong> <var class="def-var-arguments">(number &amp;rest more-numbers)</var><a class="copiable-link" href="#index-_002f"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Divides the first NUMBER by each of the subsequent NUMBERS.
+With one arg, returns the reciprocal of the number.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aRANDOM_002dSTATE_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*RANDOM-STATE*</strong><a class="copiable-link" href="#index-_002aRANDOM_002dSTATE_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The default random-state object used by RAMDOM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-1_002b"><span class="category-def">Function: </span><span><strong class="def-name">1+</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-1_002b"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns NUMBER + 1.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-LEAST_002dNEGATIVE_002dDOUBLE_002dFLOAT"><span class="category-def">Constant: </span><span><strong class="def-name">LEAST-NEGATIVE-DOUBLE-FLOAT</strong><a class="copiable-link" href="#index-LEAST_002dNEGATIVE_002dDOUBLE_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Same as LEAST-NEGATIVE-LONG-FLOAT.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FCEILING"><span class="category-def">Function: </span><span><strong class="def-name">FCEILING</strong> <var class="def-var-arguments">(number &amp;optional (divisor 1))</var><a class="copiable-link" href="#index-FCEILING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Same as CEILING, but returns a float as the first value.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-MOST_002dPOSITIVE_002dFIXNUM"><span class="category-def">Constant: </span><span><strong class="def-name">MOST-POSITIVE-FIXNUM</strong><a class="copiable-link" href="#index-MOST_002dPOSITIVE_002dFIXNUM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The fixnum closest in value to positive infinity.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BIT_002dANDC1"><span class="category-def">Function: </span><span><strong class="def-name">BIT-ANDC1</strong> <var class="def-var-arguments">(bit-array1 bit-array2 &amp;optional (result-bit-array nil))</var><a class="copiable-link" href="#index-BIT_002dANDC1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Performs a bit-wise logical ANDC1 on the elements of BIT-ARRAY1 and
+BIT-ARRAY2.
+Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
+BIT-ARRAY1 if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-TAN"><span class="category-def">Function: </span><span><strong class="def-name">TAN</strong> <var class="def-var-arguments">(radians)</var><a class="copiable-link" href="#index-TAN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the tangent of RADIANS.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-BOOLE_002dNAND"><span class="category-def">Constant: </span><span><strong class="def-name">BOOLE-NAND</strong><a class="copiable-link" href="#index-BOOLE_002dNAND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Makes BOOLE return LOGNAND of INTEGER1 and INTEGER2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-TANH"><span class="category-def">Function: </span><span><strong class="def-name">TANH</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-TANH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the hyperbolic tangent of NUMBER.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ASIN"><span class="category-def">Function: </span><span><strong class="def-name">ASIN</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-ASIN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the arc sine of NUMBER.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BYTE"><span class="category-def">Function: </span><span><strong class="def-name">BYTE</strong> <var class="def-var-arguments">(size position)</var><a class="copiable-link" href="#index-BYTE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a byte specifier.  In GCL, a byte specifier is represented by
+a dotted pair (&lt;size&gt; . &lt;position&gt;).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ASINH"><span class="category-def">Function: </span><span><strong class="def-name">ASINH</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-ASINH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the hyperbolic arc sine of NUMBER.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-MOST_002dPOSITIVE_002dLONG_002dFLOAT"><span class="category-def">Constant: </span><span><strong class="def-name">MOST-POSITIVE-LONG-FLOAT</strong><a class="copiable-link" href="#index-MOST_002dPOSITIVE_002dLONG_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The long-float closest in value to positive infinity.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-SHIFTF"><span class="category-def">Macro: </span><span><strong class="def-name">SHIFTF</strong><a class="copiable-link" href="#index-SHIFTF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(shiftf {place}+ newvalue)
+</pre></div>
+
+<p>Evaluates all PLACEs and NEWVALUE in turn, then assigns the value of each
+form to the PLACE on its left.  Returns the original value of the leftmost
+form.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-LEAST_002dPOSITIVE_002dLONG_002dFLOAT"><span class="category-def">Constant: </span><span><strong class="def-name">LEAST-POSITIVE-LONG-FLOAT</strong><a class="copiable-link" href="#index-LEAST_002dPOSITIVE_002dLONG_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The positive long-float closest in value to zero.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DEPOSIT_002dFIELD"><span class="category-def">Function: </span><span><strong class="def-name">DEPOSIT-FIELD</strong> <var class="def-var-arguments">(newbyte bytespec integer)</var><a class="copiable-link" href="#index-DEPOSIT_002dFIELD"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns an integer computed by replacing the specified byte of INTEGER with
+the specified byte of NEWBYTE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BIT_002dAND"><span class="category-def">Function: </span><span><strong class="def-name">BIT-AND</strong> <var class="def-var-arguments">(bit-array1 bit-array2 &amp;optional (result-bit-array nil))</var><a class="copiable-link" href="#index-BIT_002dAND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Performs a bit-wise logical AND on the elements of BIT-ARRAY1 and BIT-ARRAY2.
+Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
+BIT-ARRAY1 if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOGNAND"><span class="category-def">Function: </span><span><strong class="def-name">LOGNAND</strong> <var class="def-var-arguments">(integer1 integer2)</var><a class="copiable-link" href="#index-LOGNAND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the complement of the logical AND of INTEGER1 and INTEGER2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BYTE_002dPOSITION"><span class="category-def">Function: </span><span><strong class="def-name">BYTE-POSITION</strong> <var class="def-var-arguments">(bytespec)</var><a class="copiable-link" href="#index-BYTE_002dPOSITION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the position part (in GCL, the cdr part) of the byte specifier.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-ROTATEF"><span class="category-def">Macro: </span><span><strong class="def-name">ROTATEF</strong><a class="copiable-link" href="#index-ROTATEF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(rotatef {place}*)
+</pre></div>
+
+<p>Evaluates PLACEs in turn, then assigns to each PLACE the value of the form to
+its right.  The rightmost PLACE gets the value of the leftmost PLACE.
+Returns NIL always.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BIT_002dANDC2"><span class="category-def">Function: </span><span><strong class="def-name">BIT-ANDC2</strong> <var class="def-var-arguments">(bit-array1 bit-array2 &amp;optional (result-bit-array nil))</var><a class="copiable-link" href="#index-BIT_002dANDC2"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Performs a bit-wise logical ANDC2 on the elements of BIT-ARRAY1 and
+BIT-ARRAY2.
+Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
+BIT-ARRAY1 if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-TRUNCATE"><span class="category-def">Function: </span><span><strong class="def-name">TRUNCATE</strong> <var class="def-var-arguments">(number &amp;optional (divisor 1))</var><a class="copiable-link" href="#index-TRUNCATE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Values: (quotient remainder)
+Returns NUMBER/DIVISOR as an integer, rounded toward 0.  The second returned
+value is the remainder.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-BOOLE_002dEQV"><span class="category-def">Constant: </span><span><strong class="def-name">BOOLE-EQV</strong><a class="copiable-link" href="#index-BOOLE_002dEQV"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Makes BOOLE return LOGEQV of INTEGER1 and INTEGER2.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-BOOLE_002dSET"><span class="category-def">Constant: </span><span><strong class="def-name">BOOLE-SET</strong><a class="copiable-link" href="#index-BOOLE_002dSET"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Makes BOOLE return -1.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LDB"><span class="category-def">Function: </span><span><strong class="def-name">LDB</strong> <var class="def-var-arguments">(bytespec integer)</var><a class="copiable-link" href="#index-LDB"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Extracts and right-justifies the specified byte of INTEGER, and returns the
+result.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BYTE_002dSIZE"><span class="category-def">Function: </span><span><strong class="def-name">BYTE-SIZE</strong> <var class="def-var-arguments">(bytespec)</var><a class="copiable-link" href="#index-BYTE_002dSIZE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the size part (in GCL, the car part) of the byte specifier.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-SHORT_002dFLOAT_002dNEGATIVE_002dEPSILON"><span class="category-def">Constant: </span><span><strong class="def-name">SHORT-FLOAT-NEGATIVE-EPSILON</strong><a class="copiable-link" href="#index-SHORT_002dFLOAT_002dNEGATIVE_002dEPSILON"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The smallest positive short-float that satisfies
+	(not (= (float 1 e) (- (float 1 e) e))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-REM"><span class="category-def">Function: </span><span><strong class="def-name">REM</strong> <var class="def-var-arguments">(number divisor)</var><a class="copiable-link" href="#index-REM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the second value of (TRUNCATE NUMBER DIVISOR).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MIN"><span class="category-def">Function: </span><span><strong class="def-name">MIN</strong> <var class="def-var-arguments">(number &amp;rest more-numbers)</var><a class="copiable-link" href="#index-MIN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the least of its arguments.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-EXP"><span class="category-def">Function: </span><span><strong class="def-name">EXP</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-EXP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Calculates e raised to the power NUMBER, where e is the base of natural
+logarithms.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DECODE_002dFLOAT"><span class="category-def">Function: </span><span><strong class="def-name">DECODE-FLOAT</strong> <var class="def-var-arguments">(float)</var><a class="copiable-link" href="#index-DECODE_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns, as three values, the significand F, the exponent E, and the sign S
+of the given float, so that
+			 E
+	FLOAT = S * F * B	where B = (FLOAT-RADIX FLOAT)
+</p>
+<p>S and F are floating-point numbers of the same float format as FLOAT, and E
+is an integer.
+</p>
+
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-LONG_002dFLOAT_002dEPSILON"><span class="category-def">Constant: </span><span><strong class="def-name">LONG-FLOAT-EPSILON</strong><a class="copiable-link" href="#index-LONG_002dFLOAT_002dEPSILON"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The smallest positive long-float that satisfies
+	(not (= (float 1 e) (+ (float 1 e) e))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FROUND"><span class="category-def">Function: </span><span><strong class="def-name">FROUND</strong> <var class="def-var-arguments">(number &amp;optional (divisor 1))</var><a class="copiable-link" href="#index-FROUND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Same as ROUND, but returns first value as a float.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOGEQV"><span class="category-def">Function: </span><span><strong class="def-name">LOGEQV</strong> <var class="def-var-arguments">(&amp;rest integers)</var><a class="copiable-link" href="#index-LOGEQV"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the bit-wise EQUIVALENCE of its arguments.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-MOST_002dNEGATIVE_002dSHORT_002dFLOAT"><span class="category-def">Constant: </span><span><strong class="def-name">MOST-NEGATIVE-SHORT-FLOAT</strong><a class="copiable-link" href="#index-MOST_002dNEGATIVE_002dSHORT_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The short-float closest in value to negative infinity.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BIT_002dNOR"><span class="category-def">Function: </span><span><strong class="def-name">BIT-NOR</strong> <var class="def-var-arguments">(bit-array1 bit-array2 &amp;optional (result-bit-array nil))</var><a class="copiable-link" href="#index-BIT_002dNOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Performs a bit-wise logical NOR  on the elements of BIT-ARRAY1 and BIT-ARRAY2.
+Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
+BIT-ARRAY1 if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CEILING"><span class="category-def">Function: </span><span><strong class="def-name">CEILING</strong> <var class="def-var-arguments">(number &amp;optional (divisor 1))</var><a class="copiable-link" href="#index-CEILING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the smallest integer not less than or NUMBER/DIVISOR.  Returns the
+remainder as the second value.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-LEAST_002dNEGATIVE_002dSHORT_002dFLOAT"><span class="category-def">Constant: </span><span><strong class="def-name">LEAST-NEGATIVE-SHORT-FLOAT</strong><a class="copiable-link" href="#index-LEAST_002dNEGATIVE_002dSHORT_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The negative short-float closest in value to zero.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-1_002d"><span class="category-def">Function: </span><span><strong class="def-name">1-</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-1_002d"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns NUMBER - 1.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-_003c_003d"><span class="category-def">Function: </span><span><strong class="def-name">&lt;=</strong> <var class="def-var-arguments">(number &amp;rest more-numbers)</var><a class="copiable-link" href="#index-_003c_003d"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if arguments are in strictly non-decreasing order; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-IMAGPART"><span class="category-def">Function: </span><span><strong class="def-name">IMAGPART</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-IMAGPART"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Extracts the imaginary part of NUMBER.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-INTEGERP"><span class="category-def">Function: </span><span><strong class="def-name">INTEGERP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-INTEGERP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is an integer (fixnum or bignum); NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ASH"><span class="category-def">Function: </span><span><strong class="def-name">ASH</strong> <var class="def-var-arguments">(integer count)</var><a class="copiable-link" href="#index-ASH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Shifts INTEGER left by COUNT places.  Shifts right if COUNT is negative.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LCM"><span class="category-def">Function: </span><span><strong class="def-name">LCM</strong> <var class="def-var-arguments">(integer &amp;rest more-integers)</var><a class="copiable-link" href="#index-LCM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the least common multiple of the arguments.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COS"><span class="category-def">Function: </span><span><strong class="def-name">COS</strong> <var class="def-var-arguments">(radians)</var><a class="copiable-link" href="#index-COS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the cosine of RADIANS.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DECF"><span class="category-def">Special Form: </span><span><strong class="def-name">DECF</strong><a class="copiable-link" href="#index-DECF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(decf place [delta])
+</pre></div>
+<p>Subtracts the number
+produced by DELTA (which defaults to 1) from the number in
+PLACE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ATAN"><span class="category-def">Function: </span><span><strong class="def-name">ATAN</strong> <var class="def-var-arguments">(x &amp;optional (y 1))</var><a class="copiable-link" href="#index-ATAN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+ Returns the arc tangent of
+X/Y.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-BOOLE_002dANDC1"><span class="category-def">Constant: </span><span><strong class="def-name">BOOLE-ANDC1</strong><a class="copiable-link" href="#index-BOOLE_002dANDC1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Makes BOOLE return LOGANDC1 of INTEGER1 and INTEGER2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COSH"><span class="category-def">Function: </span><span><strong class="def-name">COSH</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-COSH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+ Returns the hyperbolic cosine of
+NUMBER.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FLOAT_002dRADIX"><span class="category-def">Function: </span><span><strong class="def-name">FLOAT-RADIX</strong> <var class="def-var-arguments">(float)</var><a class="copiable-link" href="#index-FLOAT_002dRADIX"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the representation radix (or base) of the floating-point
+number.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ATANH"><span class="category-def">Function: </span><span><strong class="def-name">ATANH</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-ATANH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the hyperbolic arc tangent of NUMBER.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-EVENP"><span class="category-def">Function: </span><span><strong class="def-name">EVENP</strong> <var class="def-var-arguments">(integer)</var><a class="copiable-link" href="#index-EVENP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+ Returns T
+if INTEGER is even.  Returns NIL if INTEGER is odd.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ZEROP"><span class="category-def">Function: </span><span><strong class="def-name">ZEROP</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-ZEROP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+ Returns T if NUMBER = 0; NIL
+otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FLOATP"><span class="category-def">Function: </span><span><strong class="def-name">FLOATP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-FLOATP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a floating-point number; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SXHASH"><span class="category-def">Function: </span><span><strong class="def-name">SXHASH</strong> <var class="def-var-arguments">(object)</var><a class="copiable-link" href="#index-SXHASH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Computes a hash code for OBJECT and returns it as an integer.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-BOOLE_002d1"><span class="category-def">Constant: </span><span><strong class="def-name">BOOLE-1</strong><a class="copiable-link" href="#index-BOOLE_002d1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Makes BOOLE return INTEGER1.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-MOST_002dPOSITIVE_002dSINGLE_002dFLOAT"><span class="category-def">Constant: </span><span><strong class="def-name">MOST-POSITIVE-SINGLE-FLOAT</strong><a class="copiable-link" href="#index-MOST_002dPOSITIVE_002dSINGLE_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Same as MOST-POSITIVE-LONG-FLOAT.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOGANDC1"><span class="category-def">Function: </span><span><strong class="def-name">LOGANDC1</strong> <var class="def-var-arguments">(integer1 integer2)</var><a class="copiable-link" href="#index-LOGANDC1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the logical AND of (LOGNOT INTEGER1) and INTEGER2.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-LEAST_002dPOSITIVE_002dSINGLE_002dFLOAT"><span class="category-def">Constant: </span><span><strong class="def-name">LEAST-POSITIVE-SINGLE-FLOAT</strong><a class="copiable-link" href="#index-LEAST_002dPOSITIVE_002dSINGLE_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Same as LEAST-POSITIVE-LONG-FLOAT.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COMPLEXP"><span class="category-def">Function: </span><span><strong class="def-name">COMPLEXP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-COMPLEXP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a complex number; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-BOOLE_002dAND"><span class="category-def">Constant: </span><span><strong class="def-name">BOOLE-AND</strong><a class="copiable-link" href="#index-BOOLE_002dAND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Makes BOOLE return LOGAND of INTEGER1 and INTEGER2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAX"><span class="category-def">Function: </span><span><strong class="def-name">MAX</strong> <var class="def-var-arguments">(number &amp;rest more-numbers)</var><a class="copiable-link" href="#index-MAX"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the greatest of its arguments.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FLOAT_002dSIGN"><span class="category-def">Function: </span><span><strong class="def-name">FLOAT-SIGN</strong> <var class="def-var-arguments">(float1 &amp;optional (float2 (float 1 float1)))</var><a class="copiable-link" href="#index-FLOAT_002dSIGN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a floating-point number with the same sign as FLOAT1 and with the
+same absolute value as FLOAT2.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-BOOLE_002dANDC2"><span class="category-def">Constant: </span><span><strong class="def-name">BOOLE-ANDC2</strong><a class="copiable-link" href="#index-BOOLE_002dANDC2"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Makes BOOLE return LOGANDC2 of INTEGER1 and INTEGER2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DENOMINATOR"><span class="category-def">Function: </span><span><strong class="def-name">DENOMINATOR</strong> <var class="def-var-arguments">(rational)</var><a class="copiable-link" href="#index-DENOMINATOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the denominator of RATIONAL as an integer.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FLOAT"><span class="category-def">Function: </span><span><strong class="def-name">FLOAT</strong> <var class="def-var-arguments">(number &amp;optional other)</var><a class="copiable-link" href="#index-FLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Converts a non-complex number to a floating-point number.  If NUMBER is
+already a float, FLOAT simply returns NUMBER.  Otherwise, the format of
+the returned float depends on OTHER;  If OTHER is not provided, FLOAT returns
+a SINGLE-FLOAT.  If OTHER is provided, the result is in the same float format
+as OTHER&rsquo;s.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ROUND"><span class="category-def">Function: </span><span><strong class="def-name">ROUND</strong> <var class="def-var-arguments">(number &amp;optional (divisor 1))</var><a class="copiable-link" href="#index-ROUND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Rounds NUMBER/DIVISOR to nearest integer.  The second returned value is the
+remainder.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOGAND"><span class="category-def">Function: </span><span><strong class="def-name">LOGAND</strong> <var class="def-var-arguments">(&amp;rest integers)</var><a class="copiable-link" href="#index-LOGAND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the bit-wise AND of its arguments.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-BOOLE_002d2"><span class="category-def">Constant: </span><span><strong class="def-name">BOOLE-2</strong><a class="copiable-link" href="#index-BOOLE_002d2"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Makes BOOLE return INTEGER2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-_002a"><span class="category-def">Function: </span><span><strong class="def-name">*</strong> <var class="def-var-arguments">(&amp;rest numbers)</var><a class="copiable-link" href="#index-_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the product of its arguments.  With no args, returns 1.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-_003c"><span class="category-def">Function: </span><span><strong class="def-name">&lt;</strong> <var class="def-var-arguments">(number &amp;rest more-numbers)</var><a class="copiable-link" href="#index-_003c"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if its arguments are in strictly increasing order; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COMPLEX"><span class="category-def">Function: </span><span><strong class="def-name">COMPLEX</strong> <var class="def-var-arguments">(realpart &amp;optional (imagpart 0))</var><a class="copiable-link" href="#index-COMPLEX"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a complex number with the given real and imaginary parts.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-SINGLE_002dFLOAT_002dEPSILON"><span class="category-def">Constant: </span><span><strong class="def-name">SINGLE-FLOAT-EPSILON</strong><a class="copiable-link" href="#index-SINGLE_002dFLOAT_002dEPSILON"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Same as LONG-FLOAT-EPSILON.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOGANDC2"><span class="category-def">Function: </span><span><strong class="def-name">LOGANDC2</strong> <var class="def-var-arguments">(integer1 integer2)</var><a class="copiable-link" href="#index-LOGANDC2"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the logical AND of INTEGER1 and (LOGNOT INTEGER2).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-INTEGER_002dLENGTH"><span class="category-def">Function: </span><span><strong class="def-name">INTEGER-LENGTH</strong> <var class="def-var-arguments">(integer)</var><a class="copiable-link" href="#index-INTEGER_002dLENGTH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the number of significant bits in the absolute value of INTEGER.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-MOST_002dNEGATIVE_002dFIXNUM"><span class="category-def">Constant: </span><span><strong class="def-name">MOST-NEGATIVE-FIXNUM</strong><a class="copiable-link" href="#index-MOST_002dNEGATIVE_002dFIXNUM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The fixnum closest in value to negative infinity.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-LONG_002dFLOAT_002dNEGATIVE_002dEPSILON"><span class="category-def">Constant: </span><span><strong class="def-name">LONG-FLOAT-NEGATIVE-EPSILON</strong><a class="copiable-link" href="#index-LONG_002dFLOAT_002dNEGATIVE_002dEPSILON"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The smallest positive long-float that satisfies
+	(not (= (float 1 e) (- (float 1 e) e))).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-_003e_003d"><span class="category-def">Function: </span><span><strong class="def-name">&gt;=</strong> <var class="def-var-arguments">(number &amp;rest more-numbers)</var><a class="copiable-link" href="#index-_003e_003d"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if arguments are in strictly non-increasing order; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-BOOLE_002dNOR"><span class="category-def">Constant: </span><span><strong class="def-name">BOOLE-NOR</strong><a class="copiable-link" href="#index-BOOLE_002dNOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Makes BOOLE return LOGNOR of INTEGER1 and INTEGER2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ACOS"><span class="category-def">Function: </span><span><strong class="def-name">ACOS</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-ACOS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the arc cosine of NUMBER.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dRANDOM_002dSTATE"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-RANDOM-STATE</strong> <var class="def-var-arguments">(&amp;optional (state *random-state*))</var><a class="copiable-link" href="#index-MAKE_002dRANDOM_002dSTATE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Creates and returns a copy of the specified random state.  If STATE is NIL,
+then the value of *RANDOM-STATE* is used.  If STATE is T, then returns a
+random state object generated from the universal time.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-EXPT"><span class="category-def">Function: </span><span><strong class="def-name">EXPT</strong> <var class="def-var-arguments">(base-number power-number)</var><a class="copiable-link" href="#index-EXPT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns BASE-NUMBER raised to the power POWER-NUMBER.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SQRT"><span class="category-def">Function: </span><span><strong class="def-name">SQRT</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-SQRT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the principal square root of NUMBER.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SCALE_002dFLOAT"><span class="category-def">Function: </span><span><strong class="def-name">SCALE-FLOAT</strong> <var class="def-var-arguments">(float integer)</var><a class="copiable-link" href="#index-SCALE_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns (* FLOAT (expt (float-radix FLOAT) INTEGER)).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ACOSH"><span class="category-def">Function: </span><span><strong class="def-name">ACOSH</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-ACOSH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the hyperbolic arc cosine of NUMBER.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-MOST_002dNEGATIVE_002dLONG_002dFLOAT"><span class="category-def">Constant: </span><span><strong class="def-name">MOST-NEGATIVE-LONG-FLOAT</strong><a class="copiable-link" href="#index-MOST_002dNEGATIVE_002dLONG_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The long-float closest in value to negative infinity.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-LEAST_002dNEGATIVE_002dLONG_002dFLOAT"><span class="category-def">Constant: </span><span><strong class="def-name">LEAST-NEGATIVE-LONG-FLOAT</strong><a class="copiable-link" href="#index-LEAST_002dNEGATIVE_002dLONG_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The negative long-float closest in value to zero.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FFLOOR"><span class="category-def">Function: </span><span><strong class="def-name">FFLOOR</strong> <var class="def-var-arguments">(number &amp;optional (divisor 1))</var><a class="copiable-link" href="#index-FFLOOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Same as FLOOR, but returns a float as the first value.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOGNOR"><span class="category-def">Function: </span><span><strong class="def-name">LOGNOR</strong> <var class="def-var-arguments">(integer1 integer2)</var><a class="copiable-link" href="#index-LOGNOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the complement of the logical OR of INTEGER1 and INTEGER2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PARSE_002dINTEGER"><span class="category-def">Function: </span><span><strong class="def-name">PARSE-INTEGER</strong> <var class="def-var-arguments">(string &amp;key (start 0) (end (length string)) (radix 10) (junk-allowed nil))</var><a class="copiable-link" href="#index-PARSE_002dINTEGER"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Parses STRING for an integer and returns it.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-_002b"><span class="category-def">Function: </span><span><strong class="def-name">+</strong> <var class="def-var-arguments">(&amp;rest numbers)</var><a class="copiable-link" href="#index-_002b"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the sum of its arguments.  With no args, returns 0.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-_003d"><span class="category-def">Function: </span><span><strong class="def-name">=</strong> <var class="def-var-arguments">(number &amp;rest more-numbers)</var><a class="copiable-link" href="#index-_003d"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if all of its arguments are numerically equal; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NUMBERP"><span class="category-def">Function: </span><span><strong class="def-name">NUMBERP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-NUMBERP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is any kind of number; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-MOST_002dPOSITIVE_002dDOUBLE_002dFLOAT"><span class="category-def">Constant: </span><span><strong class="def-name">MOST-POSITIVE-DOUBLE-FLOAT</strong><a class="copiable-link" href="#index-MOST_002dPOSITIVE_002dDOUBLE_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Same as MOST-POSITIVE-LONG-FLOAT.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOGTEST"><span class="category-def">Function: </span><span><strong class="def-name">LOGTEST</strong> <var class="def-var-arguments">(integer1 integer2)</var><a class="copiable-link" href="#index-LOGTEST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if LOGAND of INTEGER1 and INTEGER2 is not zero; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-RANDOM_002dSTATE_002dP"><span class="category-def">Function: </span><span><strong class="def-name">RANDOM-STATE-P</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-RANDOM_002dSTATE_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a random-state object; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-LEAST_002dPOSITIVE_002dDOUBLE_002dFLOAT"><span class="category-def">Constant: </span><span><strong class="def-name">LEAST-POSITIVE-DOUBLE-FLOAT</strong><a class="copiable-link" href="#index-LEAST_002dPOSITIVE_002dDOUBLE_002dFLOAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Same as LEAST-POSITIVE-LONG-FLOAT.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FLOAT_002dPRECISION"><span class="category-def">Function: </span><span><strong class="def-name">FLOAT-PRECISION</strong> <var class="def-var-arguments">(float)</var><a class="copiable-link" href="#index-FLOAT_002dPRECISION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the number of significant radix-B digits used to represent the
+significand F of the floating-point number, where B = (FLOAT-RADIX FLOAT).
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-BOOLE_002dXOR"><span class="category-def">Constant: </span><span><strong class="def-name">BOOLE-XOR</strong><a class="copiable-link" href="#index-BOOLE_002dXOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Makes BOOLE return LOGXOR of INTEGER1 and INTEGER2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DPB"><span class="category-def">Function: </span><span><strong class="def-name">DPB</strong> <var class="def-var-arguments">(newbyte bytespec integer)</var><a class="copiable-link" href="#index-DPB"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns an integer computed by replacing the specified byte of INTEGER with
+NEWBYTE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ABS"><span class="category-def">Function: </span><span><strong class="def-name">ABS</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-ABS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the absolute value of NUMBER.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CONJUGATE"><span class="category-def">Function: </span><span><strong class="def-name">CONJUGATE</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-CONJUGATE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the complex conjugate of NUMBER.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CIS"><span class="category-def">Function: </span><span><strong class="def-name">CIS</strong> <var class="def-var-arguments">(radians)</var><a class="copiable-link" href="#index-CIS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns e raised to i*RADIANS.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ODDP"><span class="category-def">Function: </span><span><strong class="def-name">ODDP</strong> <var class="def-var-arguments">(integer)</var><a class="copiable-link" href="#index-ODDP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if INTEGER is odd; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-RATIONALIZE"><span class="category-def">Function: </span><span><strong class="def-name">RATIONALIZE</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-RATIONALIZE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Converts NUMBER into rational approximately and returns it.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ISQRT"><span class="category-def">Function: </span><span><strong class="def-name">ISQRT</strong> <var class="def-var-arguments">(integer)</var><a class="copiable-link" href="#index-ISQRT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the greatest integer less than or equal to the square root of the
+given non-negative integer.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOGXOR"><span class="category-def">Function: </span><span><strong class="def-name">LOGXOR</strong> <var class="def-var-arguments">(&amp;rest integers)</var><a class="copiable-link" href="#index-LOGXOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the bit-wise EXCLUSIVE OR of its arguments.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-_003e"><span class="category-def">Function: </span><span><strong class="def-name">&gt;</strong> <var class="def-var-arguments">(number &amp;rest more-numbers)</var><a class="copiable-link" href="#index-_003e"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if its arguments are in strictly decreasing order; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOGBITP"><span class="category-def">Function: </span><span><strong class="def-name">LOGBITP</strong> <var class="def-var-arguments">(index integer)</var><a class="copiable-link" href="#index-LOGBITP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if the INDEX-th bit of INTEGER is 1.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-DOUBLE_002dFLOAT_002dEPSILON"><span class="category-def">Constant: </span><span><strong class="def-name">DOUBLE-FLOAT-EPSILON</strong><a class="copiable-link" href="#index-DOUBLE_002dFLOAT_002dEPSILON"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Same as LONG-FLOAT-EPSILON.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOGCOUNT"><span class="category-def">Function: </span><span><strong class="def-name">LOGCOUNT</strong> <var class="def-var-arguments">(integer)</var><a class="copiable-link" href="#index-LOGCOUNT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>If INTEGER is negative, returns the number of 0 bits.  Otherwise, returns
+the number of 1 bits.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GCD"><span class="category-def">Function: </span><span><strong class="def-name">GCD</strong> <var class="def-var-arguments">(&amp;rest integers)</var><a class="copiable-link" href="#index-GCD"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the greatest common divisor of INTEGERs.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-RATIONALP"><span class="category-def">Function: </span><span><strong class="def-name">RATIONALP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-RATIONALP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is an integer or a ratio; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MOD"><span class="category-def">Function: </span><span><strong class="def-name">MOD</strong> <var class="def-var-arguments">(number divisor)</var><a class="copiable-link" href="#index-MOD"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the second result of (FLOOR NUMBER DIVISOR).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MODF"><span class="category-def">Function: </span><span><strong class="def-name">MODF</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-MODF"> &para;</a></span></dt>
+<dd><p>Package:SYSTEM
+</p>
+<p>Returns the integer and fractional part of a floating point number mod 1.0.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-BOOLE_002dORC1"><span class="category-def">Constant: </span><span><strong class="def-name">BOOLE-ORC1</strong><a class="copiable-link" href="#index-BOOLE_002dORC1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Makes BOOLE return LOGORC1 of INTEGER1 and INTEGER2.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-SINGLE_002dFLOAT_002dNEGATIVE_002dEPSILON"><span class="category-def">Constant: </span><span><strong class="def-name">SINGLE-FLOAT-NEGATIVE-EPSILON</strong><a class="copiable-link" href="#index-SINGLE_002dFLOAT_002dNEGATIVE_002dEPSILON"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Same as LONG-FLOAT-NEGATIVE-EPSILON.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FLOOR"><span class="category-def">Function: </span><span><strong class="def-name">FLOOR</strong> <var class="def-var-arguments">(number &amp;optional (divisor 1))</var><a class="copiable-link" href="#index-FLOOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the largest integer not larger than the NUMBER divided by DIVISOR.
+The second returned value is (- NUMBER (* first-value DIVISOR)).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PLUSP"><span class="category-def">Function: </span><span><strong class="def-name">PLUSP</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-PLUSP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if NUMBER &gt; 0; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FLOAT_002dDIGITS"><span class="category-def">Function: </span><span><strong class="def-name">FLOAT-DIGITS</strong> <var class="def-var-arguments">(float)</var><a class="copiable-link" href="#index-FLOAT_002dDIGITS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the number of radix-B digits used to represent the significand F of
+the floating-point number, where B = (FLOAT-RADIX FLOAT).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-RANDOM"><span class="category-def">Function: </span><span><strong class="def-name">RANDOM</strong> <var class="def-var-arguments">(number &amp;optional (state *random-state*))</var><a class="copiable-link" href="#index-RANDOM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Generates a uniformly distributed pseudo-random number between zero
+(inclusive) and NUMBER (exclusive), by using the random state object STATE.
+</p>
+
+</dd></dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Operating-System-Definitions.html
@@ -0,0 +1,370 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Operating System Definitions (GCL SI Manual)</title>
+
+<meta name="description" content="Operating System Definitions (GCL SI Manual)">
+<meta name="keywords" content="Operating System Definitions (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Operating-System.html" rel="up" title="Operating System">
+<link href="Command-Line.html" rel="prev" title="Command Line">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Operating-System-Definitions">
+<div class="nav-panel">
+<p>
+Previous: <a href="Command-Line.html" accesskey="p" rel="prev">Command Line</a>, Up: <a href="Operating-System.html" accesskey="u" rel="up">Operating System</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Operating-System-Definitions-1"><span>9.2 Operating System Definitions<a class="copiable-link" href="#Operating-System-Definitions-1"> &para;</a></span></h3>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GET_002dDECODED_002dTIME"><span class="category-def">Function: </span><span><strong class="def-name">GET-DECODED-TIME</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-GET_002dDECODED_002dTIME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the current time in decoded time format.  Returns nine values: second,
+minute, hour, date, month, year, day-of-week, daylight-saving-time-p, and
+time-zone.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-HOST_002dNAMESTRING"><span class="category-def">Function: </span><span><strong class="def-name">HOST-NAMESTRING</strong> <var class="def-var-arguments">(pathname)</var><a class="copiable-link" href="#index-HOST_002dNAMESTRING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the host part of PATHNAME as a string.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-RENAME_002dFILE"><span class="category-def">Function: </span><span><strong class="def-name">RENAME-FILE</strong> <var class="def-var-arguments">(file new-name)</var><a class="copiable-link" href="#index-RENAME_002dFILE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Renames the file FILE to NEW-NAME.  FILE may be a string, a pathname, or
+a stream.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FILE_002dAUTHOR"><span class="category-def">Function: </span><span><strong class="def-name">FILE-AUTHOR</strong> <var class="def-var-arguments">(file)</var><a class="copiable-link" href="#index-FILE_002dAUTHOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the author name of the specified file, as a string.
+FILE may be a string or a stream
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PATHNAME_002dHOST"><span class="category-def">Function: </span><span><strong class="def-name">PATHNAME-HOST</strong> <var class="def-var-arguments">(pathname)</var><a class="copiable-link" href="#index-PATHNAME_002dHOST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the host slot of PATHNAME.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FILE_002dPOSITION"><span class="category-def">Function: </span><span><strong class="def-name">FILE-POSITION</strong> <var class="def-var-arguments">(file-stream &amp;optional position)</var><a class="copiable-link" href="#index-FILE_002dPOSITION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Sets the file pointer of the specified file to POSITION, if POSITION is given.
+Otherwise, returns the current file position of the specified file.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DECODE_002dUNIVERSAL_002dTIME"><span class="category-def">Function: </span><span><strong class="def-name">DECODE-UNIVERSAL-TIME</strong> <var class="def-var-arguments">(universal-time &amp;optional (timezone -9))</var><a class="copiable-link" href="#index-DECODE_002dUNIVERSAL_002dTIME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Converts UNIVERSAL-TIME into a decoded time at the TIMEZONE.
+Returns nine values: second, minute, hour, date, month (1 - 12), year,
+day-of-week (0 - 6), daylight-saving-time-p, and time-zone.
+TIMEZONE in GCL defaults to 6, the time zone of Austin, Texas.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-USER_002dHOMEDIR_002dPATHNAME"><span class="category-def">Function: </span><span><strong class="def-name">USER-HOMEDIR-PATHNAME</strong> <var class="def-var-arguments">(&amp;optional host)</var><a class="copiable-link" href="#index-USER_002dHOMEDIR_002dPATHNAME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the home directory of the logged in user as a pathname.  HOST
+is ignored.
+</p>
+
+</dd></dl>
+
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aMODULES_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*MODULES*</strong><a class="copiable-link" href="#index-_002aMODULES_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+A list of names of the modules that have been loaded into GCL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SHORT_002dSITE_002dNAME"><span class="category-def">Function: </span><span><strong class="def-name">SHORT-SITE-NAME</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-SHORT_002dSITE_002dNAME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a string that identifies the physical location of the current GCL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DIRECTORY"><span class="category-def">Function: </span><span><strong class="def-name">DIRECTORY</strong> <var class="def-var-arguments">(name)</var><a class="copiable-link" href="#index-DIRECTORY"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a list of files that match NAME.  NAME may be a string, a pathname,
+or a file stream.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SOFTWARE_002dVERSION"><span class="category-def">Function: </span><span><strong class="def-name">SOFTWARE-VERSION</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-SOFTWARE_002dVERSION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a string that identifies the software version of the software
+under which GCL is currently running.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-INTERNAL_002dTIME_002dUNITS_002dPER_002dSECOND"><span class="category-def">Constant: </span><span><strong class="def-name">INTERNAL-TIME-UNITS-PER-SECOND</strong><a class="copiable-link" href="#index-INTERNAL_002dTIME_002dUNITS_002dPER_002dSECOND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The number of internal time units that fit into a second.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ENOUGH_002dNAMESTRING"><span class="category-def">Function: </span><span><strong class="def-name">ENOUGH-NAMESTRING</strong> <var class="def-var-arguments">(pathname &amp;optional (defaults *default-pathname-defaults*))</var><a class="copiable-link" href="#index-ENOUGH_002dNAMESTRING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a string which uniquely identifies PATHNAME with respect to
+DEFAULTS.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-REQUIRE"><span class="category-def">Function: </span><span><strong class="def-name">REQUIRE</strong> <var class="def-var-arguments">(module-name &amp;optional (pathname))</var><a class="copiable-link" href="#index-REQUIRE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>If the specified module is not present, then loads the appropriate file(s).
+PATHNAME may be a single pathname or it may be a list of pathnames.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ENCODE_002dUNIVERSAL_002dTIME"><span class="category-def">Function: </span><span><strong class="def-name">ENCODE-UNIVERSAL-TIME</strong> <var class="def-var-arguments">(second minute hour date month year &amp;optional (timezone ))</var><a class="copiable-link" href="#index-ENCODE_002dUNIVERSAL_002dTIME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Does the inverse operation of DECODE-UNIVERSAL-TIME.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LISP_002dIMPLEMENTATION_002dVERSION"><span class="category-def">Function: </span><span><strong class="def-name">LISP-IMPLEMENTATION-VERSION</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-LISP_002dIMPLEMENTATION_002dVERSION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a string that tells you when the current GCL implementation is
+brought up.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MACHINE_002dINSTANCE"><span class="category-def">Function: </span><span><strong class="def-name">MACHINE-INSTANCE</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-MACHINE_002dINSTANCE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a string that identifies the machine instance of the machine
+on which GCL is currently running.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ROOM"><span class="category-def">Function: </span><span><strong class="def-name">ROOM</strong> <var class="def-var-arguments">(&amp;optional (x t))</var><a class="copiable-link" href="#index-ROOM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Displays information about storage allocation in the following format.
+</p>
+<ul class="itemize">
+<li>for each type class
+<ul class="itemize">
+<li>the number of pages so-far allocated for the type class
+</li><li>the maximum number of pages for the type class
+</li><li>the percentage of used cells to cells so-far allocated
+</li><li>the number of times the garbage collector has been called to
+	  collect cells of the type class
+</li><li>the implementation types that belongs to the type class
+</li></ul>
+</li><li>the number of pages actually allocated for contiguous blocks
+</li><li>the maximum number of pages for contiguous blocks
+</li><li>the number of times the garbage collector has been called to collect
+  contiguous blocks
+</li><li>the number of pages in the hole
+</li><li>the maximum number of pages for relocatable blocks
+</li><li>the number of times the garbage collector has been called to collect
+  relocatable blocks
+</li><li>the total number of pages allocated for cells
+</li><li>the total number of pages allocated
+</li><li>the number of available pages
+</li><li>the number of pages GCL can use.
+
+<p>The number of times the garbage collector has been called is not shown,
+if the number is zero.  The optional X is ignored.
+</p></li></ul>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GET_002dUNIVERSAL_002dTIME"><span class="category-def">Function: </span><span><strong class="def-name">GET-UNIVERSAL-TIME</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-GET_002dUNIVERSAL_002dTIME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the current time as a single integer in universal time format.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GET_002dINTERNAL_002dRUN_002dTIME"><span class="category-def">Function: </span><span><strong class="def-name">GET-INTERNAL-RUN-TIME</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-GET_002dINTERNAL_002dRUN_002dTIME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the run time in the internal time format.  This is useful for
+finding CPU usage.  If the operating system allows, a second value
+containing CPU usage of child processes is returned.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aDEFAULT_002dPATHNAME_002dDEFAULTS_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*DEFAULT-PATHNAME-DEFAULTS*</strong><a class="copiable-link" href="#index-_002aDEFAULT_002dPATHNAME_002dDEFAULTS_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The default pathname-defaults pathname.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LONG_002dSITE_002dNAME"><span class="category-def">Function: </span><span><strong class="def-name">LONG-SITE-NAME</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-LONG_002dSITE_002dNAME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a string that identifies the physical location of the current GCL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DELETE_002dFILE"><span class="category-def">Function: </span><span><strong class="def-name">DELETE-FILE</strong> <var class="def-var-arguments">(file)</var><a class="copiable-link" href="#index-DELETE_002dFILE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+ Deletes FILE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GET_002dINTERNAL_002dREAL_002dTIME"><span class="category-def">Function: </span><span><strong class="def-name">GET-INTERNAL-REAL-TIME</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-GET_002dINTERNAL_002dREAL_002dTIME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the real time in the internal time format.  This is useful for
+finding elapsed time.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MACHINE_002dTYPE"><span class="category-def">Function: </span><span><strong class="def-name">MACHINE-TYPE</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-MACHINE_002dTYPE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a string that identifies the machine type of the machine
+on which GCL is currently running.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-TIME"><span class="category-def">Macro: </span><span><strong class="def-name">TIME</strong><a class="copiable-link" href="#index-TIME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(time form)
+</pre></div>
+
+<p>Evaluates FORM and outputs timing statistics on *TRACE-OUTPUT*.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SOFTWARE_002dTYPE"><span class="category-def">Function: </span><span><strong class="def-name">SOFTWARE-TYPE</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-SOFTWARE_002dTYPE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a string that identifies the software type of the software
+under which GCL is currently running.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LISP_002dIMPLEMENTATION_002dTYPE"><span class="category-def">Function: </span><span><strong class="def-name">LISP-IMPLEMENTATION-TYPE</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-LISP_002dIMPLEMENTATION_002dTYPE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a string that tells you that you are using a version of GCL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SLEEP"><span class="category-def">Function: </span><span><strong class="def-name">SLEEP</strong> <var class="def-var-arguments">(n)</var><a class="copiable-link" href="#index-SLEEP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>This function causes execution to be suspended for N seconds.  N may
+be any non-negative, non-complex number.
+</p>
+
+</dd></dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Command-Line.html">Command Line</a>, Up: <a href="Operating-System.html">Operating System</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Operating-System.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Operating System (GCL SI Manual)</title>
+
+<meta name="description" content="Operating System (GCL SI Manual)">
+<meta name="keywords" content="Operating System (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Structures.html" rel="next" title="Structures">
+<link href="Symbols.html" rel="prev" title="Symbols">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Operating-System">
+<div class="nav-panel">
+<p>
+Next: <a href="Structures.html" accesskey="n" rel="next">Structures</a>, Previous: <a href="Symbols.html" accesskey="p" rel="prev">Symbols</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Operating-System-1"><span>9 Operating System<a class="copiable-link" href="#Operating-System-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Command-Line.html" accesskey="1">Command Line</a></li>
+<li><a href="Operating-System-Definitions.html" accesskey="2">Operating System Definitions</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Regular-Expressions.html
@@ -0,0 +1,198 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Regular Expressions (GCL SI Manual)</title>
+
+<meta name="description" content="Regular Expressions (GCL SI Manual)">
+<meta name="keywords" content="Regular Expressions (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="System-Definitions.html" rel="up" title="System Definitions">
+<link href="System-Definitions.html" rel="prev" title="System Definitions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+ul.mark-bullet {list-style-type: disc}
+ul.mark-minus {list-style-type: "\2212"}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Regular-Expressions">
+<div class="nav-panel">
+<p>
+Previous: <a href="System-Definitions.html" accesskey="p" rel="prev">System Definitions</a>, Up: <a href="System-Definitions.html" accesskey="u" rel="up">System Definitions</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Regular-Expressions-1"><span>17.1 Regular Expressions<a class="copiable-link" href="#Regular-Expressions-1"> &para;</a></span></h3>
+
+<p>The function <code class="code">string-match</code> (*Index string-match::) is used to
+match a regular expression against a string.  If the variable
+<code class="code">*case-fold-search*</code> is not nil, case is ignored in the match.
+To determine the extent of the match use *Index match-beginning:: and
+*Index match-end::.
+</p>
+<p>Regular expressions are implemented using Henry Spencer&rsquo;s package
+(thank you  Henry!), and much of the description of regular expressions
+below is copied verbatim from his manual entry.  Code for delimited
+searches, case insensitive searches, and speedups to allow fast
+searching of long files was contributed by W. Schelter.  The speedups
+use an adaptation by Schelter of the Boyer and Moore string search
+algorithm to the case of branched regular expressions.  These allow
+such expressions as &rsquo;not_there|really_not&rsquo; to be searched for 30 times
+faster than in GNU emacs (1995), and 200 times faster than in the
+original Spencer method.  Expressions such as [a-u]bcdex get a speedup
+of 60 and 194 times respectively.  This is based on searching a string
+of 50000 characters (such as the file tk.lisp).
+</p>
+<ul class="itemize mark-bullet">
+<li>A regular expression is a string containing zero or more <i class="i">branches</i> which are separated by <code class="code">|</code>.  A match of the regular expression against a string is simply a match of the string with one of the branches.
+</li><li>Each branch consists of zero or more <i class="i">pieces</i>, concatenated.   A matching
+string must contain an initial substring  matching the first piece, immediately
+followed by a second substring matching the second piece and so on.
+</li><li>Each piece is an <i class="i">atom</i> optionally followed by  <code class="code">+</code>, <code class="code">*</code>, or <code class="code">?</code>.
+</li><li>An atom followed by <code class="code">+</code> matches a sequence of 1 or more matches of the atom.
+</li><li>An atom followed by <code class="code">*</code> matches a sequence of 0 or more matches of the atom.
+</li><li>An atom followed by <code class="code">?</code> matches a match of the atom, or the null string.
+</li><li>An atom is
+<ul class="itemize mark-minus">
+<li>a regular expression in parentheses matching a match for the regular expression
+</li><li>a <i class="i">range</i> see below
+</li><li>a <code class="code">.</code> matching any single character
+</li><li>a <code class="code">^</code> matching the null string at the beginning of the input string
+</li><li>a <code class="code">$</code> matching the null string at the end of the input string
+</li><li>a <code class="code">\</code> followed by a single character matching that character
+</li><li>a single character with no other significance
+(matching that character).
+</li></ul>
+</li><li>A <i class="i">range</i> is a sequence of characters enclosed in <code class="code">[]</code>.
+It normally matches any single character from the sequence.
+<ul class="itemize mark-minus">
+<li>If the sequence begins with <code class="code">^</code>,
+it matches any single character <i class="i">not</i> from the rest of the sequence.
+</li><li>If two characters in the sequence are separated by <code class="code">-</code>, this is shorthand
+for the full list of ASCII characters between them
+(e.g. <code class="code">[0-9]</code> matches any decimal digit).
+</li><li>To include a literal <code class="code">]</code> in the sequence, make it the first character
+(following a possible <code class="code">^</code>).
+</li><li>To include a literal <code class="code">-</code>, make it the first or last character.
+</li></ul>
+</li></ul>
+
+<ul class="mini-toc">
+<li><a href="#Ordering-Multiple-Matches" accesskey="1">Ordering Multiple Matches</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Ordering-Multiple-Matches">
+<h4 class="unnumberedsubsec"><span>Ordering Multiple Matches<a class="copiable-link" href="#Ordering-Multiple-Matches"> &para;</a></span></h4>
+
+<p>In general there may be more than one way to match a regular expression
+to an input string.  For example, consider the command
+</p>
+<div class="example">
+<pre class="example-preformatted"> (string-match &quot;(a*)b*&quot;  &quot;aabaaabb&quot;)
+</pre></div>
+
+<p>Considering only the rules given so far, the value of (list-matches 0 1)
+might be <code class="code">(&quot;aabb&quot; &quot;aa&quot;)</code> or <code class="code">(&quot;aaab&quot; &quot;aaa&quot;)</code> or <code class="code">(&quot;ab&quot; &quot;a&quot;)</code> 
+or any of several other combinations.
+To resolve this potential ambiguity <b class="b">string-match</b> chooses among
+alternatives using the rule <i class="i">first then longest</i>.
+In other words, it considers the possible matches in order working
+from left to right across the input string and the pattern, and it
+attempts to match longer pieces of the input string before shorter
+ones.  More specifically, the following rules apply in decreasing
+order of priority:
+</p><ul class="itemize">
+<li>[1]
+If a regular expression could match two different parts of an input string
+then it will match the one that begins earliest.
+</li><li>[2]
+If a regular expression contains <b class="b">|</b> operators then the leftmost
+matching sub-expression is chosen.
+</li><li>[3]
+In <b class="b">*</b><span class="r">, </span><b class="b">+</b><span class="r">, and </span><b class="b">?</b> constructs, longer matches are chosen
+in preference to shorter ones.
+</li><li>[4]
+In sequences of expression components the components are considered
+from left to right.
+</li></ul>
+
+<p>In the example from above, <b class="b">(a*)b*</b><span class="r"> matches </span><b class="b">aab</b><span class="r">:  the </span><b class="b">(a*)</b>
+portion of the pattern is matched first and it consumes the leading
+<b class="b">aa</b><span class="r">; then the </span><b class="b">b*</b> portion of the pattern consumes the
+next <b class="b">b</b>.  Or, consider the following example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (string-match &quot;(ab|a)(b*)c&quot;  &quot;xabc&quot;) ==&gt; 1
+ (list-matches 0 1 2 3) ==&gt; (&quot;abc&quot; &quot;ab&quot; &quot;&quot; NIL)
+ (match-beginning 0) ==&gt; 1
+ (match-end 0) ==&gt; 4
+ (match-beginning 1) ==&gt; 1
+ (match-end 1) ==&gt; 3
+ (match-beginning 2) ==&gt; 3
+ (match-end 2) ==&gt; 3
+ (match-beginning 3) ==&gt; -1
+ (match-end 3) ==&gt; -1
+
+</pre></div>
+
+<p>In the above example the return value of <code class="code">1</code> (which is <code class="code">&gt; -1</code>)
+indicates that a match was found.   The entire match runs from
+1 to 4. 
+Rule 4 specifies that <b class="b">(ab|a)</b> gets first shot at the input
+string and Rule 2 specifies that the <b class="b">ab</b> sub-expression
+is checked before the <b class="b">a</b> sub-expression.
+Thus the <b class="b">b</b><span class="r"> has already been claimed before the </span><b class="b">(b*)</b>
+component is checked and <b class="b">(b*)</b> must match an empty string.
+</p>
+<p>The special characters in the string <code class="code">&quot;\()[]+.*|^$?&quot;</code>,
+must be quoted, if a simple string search is desired.   The function
+re-quote-string is provided for this purpose.
+</p><div class="example">
+<pre class="example-preformatted">(re-quote-string &quot;*standard*&quot;) ==&gt; &quot;\\*standard\\*&quot;
+
+(string-match (re-quote-string &quot;*standard*&quot;) &quot;X *standard* &quot;)
+ ==&gt; 2
+
+(string-match &quot;*standard*&quot; &quot;X *standard* &quot;)
+Error: Regexp Error: ?+* follows nothing
+</pre></div>
+<p>Note there is actually just one <code class="code">\</code> before the <code class="code">*</code>
+but the printer makes two so that the string can be read, since
+<code class="code">\</code> is also the lisp quote character.   In the last example
+an error is signalled since the special character <code class="code">*</code> must
+follow an atom if it is interpreted as a regular expression.
+</p>
+
+
+
+
+
+
+
+</div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="System-Definitions.html">System Definitions</a>, Up: <a href="System-Definitions.html">System Definitions</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Sequences-and-Arrays-and-Hash-Tables.html
@@ -0,0 +1,1143 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sequences and Arrays and Hash Tables (GCL SI Manual)</title>
+
+<meta name="description" content="Sequences and Arrays and Hash Tables (GCL SI Manual)">
+<meta name="keywords" content="Sequences and Arrays and Hash Tables (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Characters.html" rel="next" title="Characters">
+<link href="Numbers.html" rel="prev" title="Numbers">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Sequences-and-Arrays-and-Hash-Tables">
+<div class="nav-panel">
+<p>
+Next: <a href="Characters.html" accesskey="n" rel="next">Characters</a>, Previous: <a href="Numbers.html" accesskey="p" rel="prev">Numbers</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Sequences-and-Arrays-and-Hash-Tables-1"><span>2 Sequences and Arrays and Hash Tables<a class="copiable-link" href="#Sequences-and-Arrays-and-Hash-Tables-1"> &para;</a></span></h2>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-VECTOR"><span class="category-def">Function: </span><span><strong class="def-name">VECTOR</strong> <var class="def-var-arguments">(&amp;rest objects)</var><a class="copiable-link" href="#index-VECTOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Constructs a Simple-Vector from the given objects.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SUBSEQ"><span class="category-def">Function: </span><span><strong class="def-name">SUBSEQ</strong> <var class="def-var-arguments">(sequence start &amp;optional (end (length sequence)))</var><a class="copiable-link" href="#index-SUBSEQ"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a copy of a subsequence of SEQUENCE between START (inclusive) and
+END (exclusive).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COPY_002dSEQ"><span class="category-def">Function: </span><span><strong class="def-name">COPY-SEQ</strong> <var class="def-var-arguments">(sequence)</var><a class="copiable-link" href="#index-COPY_002dSEQ"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a copy of SEQUENCE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-POSITION"><span class="category-def">Function: </span><span><strong class="def-name">POSITION</strong> <var class="def-var-arguments">(item sequence &amp;key (from-end nil) (test #&rsquo;eql) test-not (start 0) (end (length sequence)) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-POSITION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the index of the first element in SEQUENCE that satisfies TEST with
+ITEM; NIL if no such element exists.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ARRAY_002dRANK"><span class="category-def">Function: </span><span><strong class="def-name">ARRAY-RANK</strong> <var class="def-var-arguments">(array)</var><a class="copiable-link" href="#index-ARRAY_002dRANK"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the number of dimensions of ARRAY.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SBIT"><span class="category-def">Function: </span><span><strong class="def-name">SBIT</strong> <var class="def-var-arguments">(simple-bit-array &amp;rest subscripts)</var><a class="copiable-link" href="#index-SBIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the bit from SIMPLE-BIT-ARRAY at SUBSCRIPTS.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002dCAPITALIZE"><span class="category-def">Function: </span><span><strong class="def-name">STRING-CAPITALIZE</strong> <var class="def-var-arguments">(string &amp;key (start 0) (end (length string)))</var><a class="copiable-link" href="#index-STRING_002dCAPITALIZE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a copy of STRING with the first character of each word converted to
+upper-case, and remaining characters in the word converted to lower case.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NSUBSTITUTE_002dIF_002dNOT"><span class="category-def">Function: </span><span><strong class="def-name">NSUBSTITUTE-IF-NOT</strong> <var class="def-var-arguments">(new test sequence &amp;key (from-end nil) (start 0) (end (length sequence)) (count most-positive-fixnum) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-NSUBSTITUTE_002dIF_002dNOT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a sequence of the same kind as SEQUENCE with the same elements
+</p>
+<p>except that all elements not satisfying TEST are replaced with NEWITEM.
+SEQUENCE may be destroyed.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FIND_002dIF"><span class="category-def">Function: </span><span><strong class="def-name">FIND-IF</strong> <var class="def-var-arguments">(test sequence &amp;key (from-end nil) (start 0) (end (length sequence)) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-FIND_002dIF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the index of the first element in SEQUENCE that satisfies TEST; NIL if
+no such element exists.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BIT_002dEQV"><span class="category-def">Function: </span><span><strong class="def-name">BIT-EQV</strong> <var class="def-var-arguments">(bit-array1 bit-array2 &amp;optional (result-bit-array nil))</var><a class="copiable-link" href="#index-BIT_002dEQV"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Performs a bit-wise logical EQV  on the elements of BIT-ARRAY1 and BIT-ARRAY2.
+Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
+BIT-ARRAY1 if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_003c"><span class="category-def">Function: </span><span><strong class="def-name">STRING&lt;</strong> <var class="def-var-arguments">(string1 string2 &amp;key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))</var><a class="copiable-link" href="#index-STRING_003c"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>If STRING1 is lexicographically less than STRING2, then returns the longest
+common prefix of the strings.  Otherwise, returns NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-REVERSE"><span class="category-def">Function: </span><span><strong class="def-name">REVERSE</strong> <var class="def-var-arguments">(sequence)</var><a class="copiable-link" href="#index-REVERSE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a new sequence containing the same elements as SEQUENCE but in
+reverse order.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NSTRING_002dUPCASE"><span class="category-def">Function: </span><span><strong class="def-name">NSTRING-UPCASE</strong> <var class="def-var-arguments">(string &amp;key (start 0) (end (length string)))</var><a class="copiable-link" href="#index-NSTRING_002dUPCASE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns STRING with all lower case characters converted to uppercase.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_003e_003d"><span class="category-def">Function: </span><span><strong class="def-name">STRING&gt;=</strong> <var class="def-var-arguments">(string1 string2 &amp;key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))</var><a class="copiable-link" href="#index-STRING_003e_003d"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>If STRING1 is lexicographically greater than or equal to STRING2, then returns
+the longest common prefix of the strings.  Otherwise, returns NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ARRAY_002dROW_002dMAJOR_002dINDEX"><span class="category-def">Function: </span><span><strong class="def-name">ARRAY-ROW-MAJOR-INDEX</strong> <var class="def-var-arguments">(array &amp;rest subscripts)</var><a class="copiable-link" href="#index-ARRAY_002dROW_002dMAJOR_002dINDEX"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the index into the data vector of ARRAY for the element of ARRAY
+specified by SUBSCRIPTS.
+</p>
+
+</dd></dl>
+
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ARRAY_002dDIMENSION"><span class="category-def">Function: </span><span><strong class="def-name">ARRAY-DIMENSION</strong> <var class="def-var-arguments">(array axis-number)</var><a class="copiable-link" href="#index-ARRAY_002dDIMENSION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the length of AXIS-NUMBER of ARRAY.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FIND"><span class="category-def">Function: </span><span><strong class="def-name">FIND</strong> <var class="def-var-arguments">(item sequence &amp;key (from-end nil) (test #&rsquo;eql) test-not (start 0) (end (length sequence)) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-FIND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the first element in SEQUENCE satisfying TEST with ITEM; NIL if no
+such element exists.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002dNOT_002dEQUAL"><span class="category-def">Function: </span><span><strong class="def-name">STRING-NOT-EQUAL</strong> <var class="def-var-arguments">(string1 string2 &amp;key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))</var><a class="copiable-link" href="#index-STRING_002dNOT_002dEQUAL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Similar to STRING=, but ignores cases.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002dRIGHT_002dTRIM"><span class="category-def">Function: </span><span><strong class="def-name">STRING-RIGHT-TRIM</strong> <var class="def-var-arguments">(char-bag string)</var><a class="copiable-link" href="#index-STRING_002dRIGHT_002dTRIM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a copy of STRING with the characters in CHAR-BAG removed from the
+right end.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DELETE_002dIF_002dNOT"><span class="category-def">Function: </span><span><strong class="def-name">DELETE-IF-NOT</strong> <var class="def-var-arguments">(test sequence &amp;key (from-end nil) (start 0) (end (length sequence)) (count most-positive-fixnum) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-DELETE_002dIF_002dNOT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a sequence formed by destructively removing the elements not
+satisfying TEST from SEQUENCE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-REMOVE_002dIF_002dNOT"><span class="category-def">Function: </span><span><strong class="def-name">REMOVE-IF-NOT</strong> <var class="def-var-arguments">(test sequence &amp;key (from-end nil) (start 0) (end (length sequence)) (count most-positive-fixnum) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-REMOVE_002dIF_002dNOT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a copy of SEQUENCE with elements not satisfying TEST removed.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_003d"><span class="category-def">Function: </span><span><strong class="def-name">STRING=</strong> <var class="def-var-arguments">(string1 string2 &amp;key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))</var><a class="copiable-link" href="#index-STRING_003d"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if the two strings are character-wise CHAR=; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NSUBSTITUTE_002dIF"><span class="category-def">Function: </span><span><strong class="def-name">NSUBSTITUTE-IF</strong> <var class="def-var-arguments">(new test sequence &amp;key (from-end nil) (start 0) (end (length sequence)) (count most-positive-fixnum) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-NSUBSTITUTE_002dIF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a sequence of the same kind as SEQUENCE with the same elements
+except that all elements satisfying TEST are replaced with NEWITEM.  SEQUENCE
+may be destroyed.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SOME"><span class="category-def">Function: </span><span><strong class="def-name">SOME</strong> <var class="def-var-arguments">(predicate sequence &amp;rest more-sequences)</var><a class="copiable-link" href="#index-SOME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if at least one of the elements in SEQUENCEs satisfies PREDICATE;
+NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dSTRING"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-STRING</strong> <var class="def-var-arguments">(size &amp;key (initial-element #\Space))</var><a class="copiable-link" href="#index-MAKE_002dSTRING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Creates and returns a new string of SIZE length whose elements are all
+INITIAL-ELEMENT.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NSUBSTITUTE"><span class="category-def">Function: </span><span><strong class="def-name">NSUBSTITUTE</strong> <var class="def-var-arguments">(newitem olditem sequence &amp;key (from-end nil) (test #&rsquo;eql) test-not (start 0) (end (length sequence)) (count most-positive-fixnum) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-NSUBSTITUTE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a sequence of the same kind as SEQUENCE with the same elements
+except that OLDITEMs are replaced with NEWITEM.  SEQUENCE may be destroyed.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002dEQUAL"><span class="category-def">Function: </span><span><strong class="def-name">STRING-EQUAL</strong> <var class="def-var-arguments">(string1 string2 &amp;key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))</var><a class="copiable-link" href="#index-STRING_002dEQUAL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Given two strings (string1 and string2), and optional integers start1,
+start2, end1 and end2, compares characters in string1 to characters in
+string2 (using char-equal).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002dNOT_002dGREATERP"><span class="category-def">Function: </span><span><strong class="def-name">STRING-NOT-GREATERP</strong> <var class="def-var-arguments">(string1 string2 &amp;key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))</var><a class="copiable-link" href="#index-STRING_002dNOT_002dGREATERP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Similar to STRING&lt;=, but ignores cases.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_003e"><span class="category-def">Function: </span><span><strong class="def-name">STRING&gt;</strong> <var class="def-var-arguments">(string1 string2 &amp;key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))</var><a class="copiable-link" href="#index-STRING_003e"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>If STRING1 is lexicographically greater than STRING2, then returns the
+longest common prefix of the strings.  Otherwise, returns NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRINGP"><span class="category-def">Function: </span><span><strong class="def-name">STRINGP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-STRINGP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a string; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DELETE_002dIF"><span class="category-def">Function: </span><span><strong class="def-name">DELETE-IF</strong> <var class="def-var-arguments">(test sequence &amp;key (from-end nil) (start 0) (end (length sequence)) (count most-positive-fixnum) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-DELETE_002dIF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a sequence formed by removing the elements satisfying TEST
+destructively from SEQUENCE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SIMPLE_002dSTRING_002dP"><span class="category-def">Function: </span><span><strong class="def-name">SIMPLE-STRING-P</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-SIMPLE_002dSTRING_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a simple string; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-REMOVE_002dIF"><span class="category-def">Function: </span><span><strong class="def-name">REMOVE-IF</strong> <var class="def-var-arguments">(test sequence &amp;key (from-end nil) (start 0) (end (length sequence)) (count most-positive-fixnum) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-REMOVE_002dIF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a copy of SEQUENCE with elements satisfying TEST removed.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-HASH_002dTABLE_002dCOUNT"><span class="category-def">Function: </span><span><strong class="def-name">HASH-TABLE-COUNT</strong> <var class="def-var-arguments">(hash-table)</var><a class="copiable-link" href="#index-HASH_002dTABLE_002dCOUNT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the number of entries in the given Hash-Table.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ARRAY_002dDIMENSIONS"><span class="category-def">Function: </span><span><strong class="def-name">ARRAY-DIMENSIONS</strong> <var class="def-var-arguments">(array)</var><a class="copiable-link" href="#index-ARRAY_002dDIMENSIONS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a list whose elements are the dimensions of ARRAY
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SUBSTITUTE_002dIF_002dNOT"><span class="category-def">Function: </span><span><strong class="def-name">SUBSTITUTE-IF-NOT</strong> <var class="def-var-arguments">(new test sequence &amp;key (from-end nil) (start 0) (end (length sequence)) (count most-positive-fixnum) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-SUBSTITUTE_002dIF_002dNOT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a sequence of the same kind as SEQUENCE with the same elements
+except that all elements not satisfying TEST are replaced with NEWITEM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ADJUSTABLE_002dARRAY_002dP"><span class="category-def">Function: </span><span><strong class="def-name">ADJUSTABLE-ARRAY-P</strong> <var class="def-var-arguments">(array)</var><a class="copiable-link" href="#index-ADJUSTABLE_002dARRAY_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if ARRAY is adjustable; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SVREF"><span class="category-def">Function: </span><span><strong class="def-name">SVREF</strong> <var class="def-var-arguments">(simple-vector index)</var><a class="copiable-link" href="#index-SVREF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the INDEX-th element of SIMPLE-VECTOR.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-VECTOR_002dPUSH_002dEXTEND"><span class="category-def">Function: </span><span><strong class="def-name">VECTOR-PUSH-EXTEND</strong> <var class="def-var-arguments">(new-element vector &amp;optional (extension (length vector)))</var><a class="copiable-link" href="#index-VECTOR_002dPUSH_002dEXTEND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Similar to VECTOR-PUSH except that, if the fill pointer gets too large,
+extends VECTOR rather then simply returns NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DELETE"><span class="category-def">Function: </span><span><strong class="def-name">DELETE</strong> <var class="def-var-arguments">(item sequence &amp;key (from-end nil) (test #&rsquo;eql) test-not (start 0) (end (length sequence)) (count most-positive-fixnum) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-DELETE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a sequence formed by removing the specified ITEM destructively from
+SEQUENCE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-REMOVE"><span class="category-def">Function: </span><span><strong class="def-name">REMOVE</strong> <var class="def-var-arguments">(item sequence &amp;key (from-end nil) (test #&rsquo;eql) test-not (start 0) (end (length sequence)) (count most-positive-fixnum) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-REMOVE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a copy of SEQUENCE with ITEM removed.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING"><span class="category-def">Function: </span><span><strong class="def-name">STRING</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-STRING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Coerces X into a string.  If X is a string, then returns X itself.  If X is a
+symbol, then returns X&rsquo;s print name.  If X is a character, then returns a one
+element string containing that character.  Signals an error if X cannot be
+coerced into a string.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002dUPCASE"><span class="category-def">Function: </span><span><strong class="def-name">STRING-UPCASE</strong> <var class="def-var-arguments">(string &amp;key (start 0) (end (length string)))</var><a class="copiable-link" href="#index-STRING_002dUPCASE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a copy of STRING with all lower case characters converted to
+uppercase.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GETHASH"><span class="category-def">Function: </span><span><strong class="def-name">GETHASH</strong> <var class="def-var-arguments">(key hash-table &amp;optional (default nil))</var><a class="copiable-link" href="#index-GETHASH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Finds the entry in HASH-TABLE whose key is KEY and returns the associated
+value and T, as multiple values.  Returns DEFAULT and NIL if there is no
+such entry.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dHASH_002dTABLE"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-HASH-TABLE</strong> <var class="def-var-arguments">(&amp;key (test &rsquo;eql) (size 1024) (rehash-size 1.5) (rehash-threshold 0.7))</var><a class="copiable-link" href="#index-MAKE_002dHASH_002dTABLE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Creates and returns a hash table.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002f_003d"><span class="category-def">Function: </span><span><strong class="def-name">STRING/=</strong> <var class="def-var-arguments">(string1 string2 &amp;key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))</var><a class="copiable-link" href="#index-STRING_002f_003d"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns NIL if STRING1 and STRING2 are character-wise CHAR=.  Otherwise,
+returns the index to the longest common prefix of the strings.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002dGREATERP"><span class="category-def">Function: </span><span><strong class="def-name">STRING-GREATERP</strong> <var class="def-var-arguments">(string1 string2 &amp;key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))</var><a class="copiable-link" href="#index-STRING_002dGREATERP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Similar to STRING&gt;, but ignores cases.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ELT"><span class="category-def">Function: </span><span><strong class="def-name">ELT</strong> <var class="def-var-arguments">(sequence index)</var><a class="copiable-link" href="#index-ELT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the INDEX-th element of SEQUENCE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dARRAY"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-ARRAY</strong> <var class="def-var-arguments">(dimensions &amp;key (element-type t) initial-element (initial-contents nil) (adjustable nil) (fill-pointer nil) (displaced-to nil) (displaced-index-offset 0) static)</var><a class="copiable-link" href="#index-MAKE_002dARRAY"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Creates an array of the specified DIMENSIONS.  The default for INITIAL-
+ELEMENT depends on ELEMENT-TYPE.
+MAKE-ARRAY will always try to find the &lsquo;best&rsquo; array to
+accommodate the element-type specified.   For example on a SUN element-type
+(mod 1) &ndash;&gt; bit
+(integer 0 10) &ndash;&gt; unsigned-char
+(integer -3 10) &ndash;&gt; signed-char
+si::best-array-element-type is the function doing this.  It
+is also used by the compiler, for coercing array element types.
+If you are going to declare an array you should use the same
+element type as was used in making it.  eg
+(setq my-array (make-array 4 :element-type &rsquo;(integer 0 10)))
+(the (array (integer 0 10)) my-array)
+    When wanting to optimize references to an array you need to
+declare the array eg: (the (array (integer -3 10)) my-array) if ar
+were constructed using the (integer -3 10) element-type.  You could of
+course have used signed-char, but since the ranges may be
+implementation dependent it is better to use -3 10 range.  MAKE-ARRAY
+needs to do some calculation with the element-type if you don&rsquo;t
+provide a primitive data-type.  One way of doing this in a machine
+independent fashion:
+</p>
+<p>(defvar *my-elt-type* #.
+      (array-element-type (make-array 1 :element-type &rsquo;(integer -3 10))))
+</p>
+<p>Then calls to (make-array n :element-type *my-elt-type*) will not have to go
+through a type inclusion computation.  The keyword STATIC (GCL specific) if non
+nil, will cause the array body to be non relocatable.
+</p>
+
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NSTRING_002dDOWNCASE"><span class="category-def">Function: </span><span><strong class="def-name">NSTRING-DOWNCASE</strong> <var class="def-var-arguments">(string &amp;key (start 0) (end (length string)))</var><a class="copiable-link" href="#index-NSTRING_002dDOWNCASE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+ Returns STRING with all upper case
+characters converted to lowercase.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ARRAY_002dIN_002dBOUNDS_002dP"><span class="category-def">Function: </span><span><strong class="def-name">ARRAY-IN-BOUNDS-P</strong> <var class="def-var-arguments">(array &amp;rest subscripts)</var><a class="copiable-link" href="#index-ARRAY_002dIN_002dBOUNDS_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+ Returns T if SUBSCRIPTS are valid subscripts for
+ARRAY; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SORT"><span class="category-def">Function: </span><span><strong class="def-name">SORT</strong> <var class="def-var-arguments">(sequence predicate &amp;key (key #&rsquo;identity))</var><a class="copiable-link" href="#index-SORT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+ Destructively sorts SEQUENCE.
+PREDICATE should return non-NIL if its first argument is to precede
+its second argument.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-HASH_002dTABLE_002dP"><span class="category-def">Function: </span><span><strong class="def-name">HASH-TABLE-P</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-HASH_002dTABLE_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a hash table object; NIL
+otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COUNT_002dIF_002dNOT"><span class="category-def">Function: </span><span><strong class="def-name">COUNT-IF-NOT</strong> <var class="def-var-arguments">(test sequence &amp;key (from-end nil) (start 0) (end (length sequence)) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-COUNT_002dIF_002dNOT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the number of elements in SEQUENCE not satisfying TEST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FILL_002dPOINTER"><span class="category-def">Function: </span><span><strong class="def-name">FILL-POINTER</strong> <var class="def-var-arguments">(vector)</var><a class="copiable-link" href="#index-FILL_002dPOINTER"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the fill pointer of VECTOR.
+</p>
+
+</dd></dl>
+
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ARRAYP"><span class="category-def">Function: </span><span><strong class="def-name">ARRAYP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-ARRAYP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is an array; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-REPLACE"><span class="category-def">Function: </span><span><strong class="def-name">REPLACE</strong> <var class="def-var-arguments">(sequence1 sequence2 &amp;key (start1 0) (end1 (length sequence1)) (start2 0) (end2 (length sequence2)))</var><a class="copiable-link" href="#index-REPLACE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Destructively modifies SEQUENCE1 by copying successive elements into it from
+SEQUENCE2.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BIT_002dXOR"><span class="category-def">Function: </span><span><strong class="def-name">BIT-XOR</strong> <var class="def-var-arguments">(bit-array1 bit-array2 &amp;optional (result-bit-array nil))</var><a class="copiable-link" href="#index-BIT_002dXOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Performs a bit-wise logical XOR on the elements of BIT-ARRAY1 and BIT-ARRAY2.
+Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
+BIT-ARRAY1 if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CLRHASH"><span class="category-def">Function: </span><span><strong class="def-name">CLRHASH</strong> <var class="def-var-arguments">(hash-table)</var><a class="copiable-link" href="#index-CLRHASH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Removes all entries of HASH-TABLE and returns the hash table itself.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SUBSTITUTE_002dIF"><span class="category-def">Function: </span><span><strong class="def-name">SUBSTITUTE-IF</strong> <var class="def-var-arguments">(newitem test sequence &amp;key (from-end nil) (start 0) (end (length sequence)) (count most-positive-fixnum) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-SUBSTITUTE_002dIF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a sequence of the same kind as SEQUENCE with the same elements
+except that all elements satisfying TEST are replaced with NEWITEM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MISMATCH"><span class="category-def">Function: </span><span><strong class="def-name">MISMATCH</strong> <var class="def-var-arguments">(sequence1 sequence2 &amp;key (from-end nil) (test #&rsquo;eql) test-not (start1 0) (start2 0) (end1 (length sequence1)) (end2 (length sequence2)) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-MISMATCH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>The specified subsequences of SEQUENCE1 and SEQUENCE2 are compared
+element-wise.  If they are of equal length and match in every element, the
+result is NIL.  Otherwise, the result is a non-negative integer, the index
+within SEQUENCE1 of the leftmost position at which they fail to match; or, if
+one is shorter than and a matching prefix of the other, the index within
+SEQUENCE1 beyond the last position tested is returned.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-ARRAY_002dTOTAL_002dSIZE_002dLIMIT"><span class="category-def">Constant: </span><span><strong class="def-name">ARRAY-TOTAL-SIZE-LIMIT</strong><a class="copiable-link" href="#index-ARRAY_002dTOTAL_002dSIZE_002dLIMIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The exclusive upper bound on the total number of elements of an array.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-VECTOR_002dPOP"><span class="category-def">Function: </span><span><strong class="def-name">VECTOR-POP</strong> <var class="def-var-arguments">(vector)</var><a class="copiable-link" href="#index-VECTOR_002dPOP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Attempts to decrease the fill-pointer of VECTOR by 1 and returns the element
+pointed to by the new fill pointer.  Signals an error if the old value of
+the fill pointer is 0.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SUBSTITUTE"><span class="category-def">Function: </span><span><strong class="def-name">SUBSTITUTE</strong> <var class="def-var-arguments">(newitem olditem sequence &amp;key (from-end nil) (test #&rsquo;eql) test-not (start 0) (end (length sequence)) (count most-positive-fixnum) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-SUBSTITUTE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a sequence of the same kind as SEQUENCE with the same elements
+except that OLDITEMs are replaced with NEWITEM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ARRAY_002dHAS_002dFILL_002dPOINTER_002dP"><span class="category-def">Function: </span><span><strong class="def-name">ARRAY-HAS-FILL-POINTER-P</strong> <var class="def-var-arguments">(array)</var><a class="copiable-link" href="#index-ARRAY_002dHAS_002dFILL_002dPOINTER_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if ARRAY has a fill pointer; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CONCATENATE"><span class="category-def">Function: </span><span><strong class="def-name">CONCATENATE</strong> <var class="def-var-arguments">(result-type &amp;rest sequences)</var><a class="copiable-link" href="#index-CONCATENATE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a new sequence of the specified RESULT-TYPE, consisting of all
+elements in SEQUENCEs.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-VECTOR_002dPUSH"><span class="category-def">Function: </span><span><strong class="def-name">VECTOR-PUSH</strong> <var class="def-var-arguments">(new-element vector)</var><a class="copiable-link" href="#index-VECTOR_002dPUSH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Attempts to set the element of ARRAY designated by its fill pointer to
+NEW-ELEMENT and increments the fill pointer by one.  Returns NIL if the fill
+pointer is too large.  Otherwise, returns the new fill pointer value.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002dTRIM"><span class="category-def">Function: </span><span><strong class="def-name">STRING-TRIM</strong> <var class="def-var-arguments">(char-bag string)</var><a class="copiable-link" href="#index-STRING_002dTRIM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a copy of STRING with the characters in CHAR-BAG removed from both
+ends.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ARRAY_002dELEMENT_002dTYPE"><span class="category-def">Function: </span><span><strong class="def-name">ARRAY-ELEMENT-TYPE</strong> <var class="def-var-arguments">(array)</var><a class="copiable-link" href="#index-ARRAY_002dELEMENT_002dTYPE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the type of the elements of ARRAY
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NOTANY"><span class="category-def">Function: </span><span><strong class="def-name">NOTANY</strong> <var class="def-var-arguments">(predicate sequence &amp;rest more-sequences)</var><a class="copiable-link" href="#index-NOTANY"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if none of the elements in SEQUENCEs satisfies PREDICATE; NIL
+otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BIT_002dNOT"><span class="category-def">Function: </span><span><strong class="def-name">BIT-NOT</strong> <var class="def-var-arguments">(bit-array &amp;optional (result-bit-array nil))</var><a class="copiable-link" href="#index-BIT_002dNOT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Performs a bit-wise logical NOT in the elements of BIT-ARRAY.
+Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
+BIT-ARRAY if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BIT_002dORC1"><span class="category-def">Function: </span><span><strong class="def-name">BIT-ORC1</strong> <var class="def-var-arguments">(bit-array1 bit-array2 &amp;optional (result-bit-array nil))</var><a class="copiable-link" href="#index-BIT_002dORC1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Performs a bit-wise logical ORC1 on the elements of BIT-ARRAY1 and BIT-ARRAY2.
+Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
+BIT-ARRAY1 if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COUNT_002dIF"><span class="category-def">Function: </span><span><strong class="def-name">COUNT-IF</strong> <var class="def-var-arguments">(test sequence &amp;key (from-end nil) (start 0) (end (length sequence)) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-COUNT_002dIF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the number of elements in SEQUENCE satisfying TEST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAP"><span class="category-def">Function: </span><span><strong class="def-name">MAP</strong> <var class="def-var-arguments">(result-type function sequence &amp;rest more-sequences)</var><a class="copiable-link" href="#index-MAP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>FUNCTION must take as many arguments as there are sequences provided.  The 
+result is a sequence such that the i-th element is the result of applying
+FUNCTION to the i-th elements of the SEQUENCEs.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-ARRAY_002dRANK_002dLIMIT"><span class="category-def">Constant: </span><span><strong class="def-name">ARRAY-RANK-LIMIT</strong><a class="copiable-link" href="#index-ARRAY_002dRANK_002dLIMIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The exclusive upper bound on the rank of an array.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COUNT"><span class="category-def">Function: </span><span><strong class="def-name">COUNT</strong> <var class="def-var-arguments">(item sequence &amp;key (from-end nil) (test #&rsquo;eql) test-not (start 0) (end (length sequence)) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-COUNT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the number of elements in SEQUENCE satisfying TEST with ITEM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BIT_002dVECTOR_002dP"><span class="category-def">Function: </span><span><strong class="def-name">BIT-VECTOR-P</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-BIT_002dVECTOR_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a bit vector; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NSTRING_002dCAPITALIZE"><span class="category-def">Function: </span><span><strong class="def-name">NSTRING-CAPITALIZE</strong> <var class="def-var-arguments">(string &amp;key (start 0) (end (length string)))</var><a class="copiable-link" href="#index-NSTRING_002dCAPITALIZE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns STRING with the first character of each word converted to upper-case,
+and remaining characters in the word converted to lower case.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ADJUST_002dARRAY"><span class="category-def">Function: </span><span><strong class="def-name">ADJUST-ARRAY</strong> <var class="def-var-arguments">(array dimensions &amp;key (element-type (array-element-type array)) initial-element (initial-contents nil) (fill-pointer nil) (displaced-to nil) (displaced-index-offset 0))</var><a class="copiable-link" href="#index-ADJUST_002dARRAY"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Adjusts the dimensions of ARRAY to the given DIMENSIONS.  The default value
+of INITIAL-ELEMENT depends on ELEMENT-TYPE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SEARCH"><span class="category-def">Function: </span><span><strong class="def-name">SEARCH</strong> <var class="def-var-arguments">(sequence1 sequence2 &amp;key (from-end nil) (test #&rsquo;eql) test-not (start1 0) (start2 0) (end1 (length sequence1)) (end2 (length sequence2)) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-SEARCH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>A search is conducted for the first subsequence of SEQUENCE2 which
+element-wise matches SEQUENCE1.  If there is such a subsequence in SEQUENCE2,
+the index of the its leftmost element is returned; otherwise, NIL is
+returned.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SIMPLE_002dBIT_002dVECTOR_002dP"><span class="category-def">Function: </span><span><strong class="def-name">SIMPLE-BIT-VECTOR-P</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-SIMPLE_002dBIT_002dVECTOR_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a simple bit-vector; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dSEQUENCE"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-SEQUENCE</strong> <var class="def-var-arguments">(type length &amp;key initial-element)</var><a class="copiable-link" href="#index-MAKE_002dSEQUENCE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a sequence of the given TYPE and LENGTH, with elements initialized
+to INITIAL-ELEMENT.  The default value of INITIAL-ELEMENT depends on TYPE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BIT_002dORC2"><span class="category-def">Function: </span><span><strong class="def-name">BIT-ORC2</strong> <var class="def-var-arguments">(bit-array1 bit-array2 &amp;optional (result-bit-array nil))</var><a class="copiable-link" href="#index-BIT_002dORC2"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Performs a bit-wise logical ORC2 on the elements of BIT-ARRAY1 and BIT-ARRAY2.
+Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
+BIT-ARRAY1 if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NREVERSE"><span class="category-def">Function: </span><span><strong class="def-name">NREVERSE</strong> <var class="def-var-arguments">(sequence)</var><a class="copiable-link" href="#index-NREVERSE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a sequence of the same elements as SEQUENCE but in reverse order.
+SEQUENCE may be destroyed.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-ARRAY_002dDIMENSION_002dLIMIT"><span class="category-def">Constant: </span><span><strong class="def-name">ARRAY-DIMENSION-LIMIT</strong><a class="copiable-link" href="#index-ARRAY_002dDIMENSION_002dLIMIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The exclusive upper bound of the array dimension.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NOTEVERY"><span class="category-def">Function: </span><span><strong class="def-name">NOTEVERY</strong> <var class="def-var-arguments">(predicate sequence &amp;rest more-sequences)</var><a class="copiable-link" href="#index-NOTEVERY"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if at least one of the elements in SEQUENCEs does not satisfy
+PREDICATE; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-POSITION_002dIF_002dNOT"><span class="category-def">Function: </span><span><strong class="def-name">POSITION-IF-NOT</strong> <var class="def-var-arguments">(test sequence &amp;key (from-end nil) (start 0) (end (length sequence)) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-POSITION_002dIF_002dNOT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the index of the first element in SEQUENCE that does not satisfy TEST;
+NIL if no such element exists.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002dDOWNCASE"><span class="category-def">Function: </span><span><strong class="def-name">STRING-DOWNCASE</strong> <var class="def-var-arguments">(string &amp;key (start 0) (end (length string)))</var><a class="copiable-link" href="#index-STRING_002dDOWNCASE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a copy of STRING with all upper case characters converted to
+lowercase.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BIT"><span class="category-def">Function: </span><span><strong class="def-name">BIT</strong> <var class="def-var-arguments">(bit-array &amp;rest subscripts)</var><a class="copiable-link" href="#index-BIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the bit from BIT-ARRAY at SUBSCRIPTS.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002dNOT_002dLESSP"><span class="category-def">Function: </span><span><strong class="def-name">STRING-NOT-LESSP</strong> <var class="def-var-arguments">(string1 string2 &amp;key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))</var><a class="copiable-link" href="#index-STRING_002dNOT_002dLESSP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Similar to STRING&gt;=, but ignores cases.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHAR"><span class="category-def">Function: </span><span><strong class="def-name">CHAR</strong> <var class="def-var-arguments">(string index)</var><a class="copiable-link" href="#index-CHAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the INDEX-th character in STRING.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-AREF"><span class="category-def">Function: </span><span><strong class="def-name">AREF</strong> <var class="def-var-arguments">(array &amp;rest subscripts)</var><a class="copiable-link" href="#index-AREF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the element of ARRAY specified by SUBSCRIPTS.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FILL"><span class="category-def">Function: </span><span><strong class="def-name">FILL</strong> <var class="def-var-arguments">(sequence item &amp;key (start 0) (end (length sequence)))</var><a class="copiable-link" href="#index-FILL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Replaces the specified elements of SEQUENCE all with ITEM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STABLE_002dSORT"><span class="category-def">Function: </span><span><strong class="def-name">STABLE-SORT</strong> <var class="def-var-arguments">(sequence predicate &amp;key (key #&rsquo;identity))</var><a class="copiable-link" href="#index-STABLE_002dSORT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Destructively sorts SEQUENCE.  PREDICATE should return non-NIL if its first
+argument is to precede its second argument.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BIT_002dIOR"><span class="category-def">Function: </span><span><strong class="def-name">BIT-IOR</strong> <var class="def-var-arguments">(bit-array1 bit-array2 &amp;optional (result-bit-array nil))</var><a class="copiable-link" href="#index-BIT_002dIOR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Performs a bit-wise logical IOR on the elements of BIT-ARRAY1 and BIT-ARRAY2.
+Puts the results into a new bit array if RESULT-BIT-ARRAY is NIL, into
+BIT-ARRAY1 if RESULT-BIT-ARRAY is T, or into RESULT-BIT-ARRAY otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-REMHASH"><span class="category-def">Function: </span><span><strong class="def-name">REMHASH</strong> <var class="def-var-arguments">(key hash-table)</var><a class="copiable-link" href="#index-REMHASH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Removes any entry for KEY in HASH-TABLE.  Returns T if such an entry
+existed; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-VECTORP"><span class="category-def">Function: </span><span><strong class="def-name">VECTORP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-VECTORP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a vector; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_003c_003d"><span class="category-def">Function: </span><span><strong class="def-name">STRING&lt;=</strong> <var class="def-var-arguments">(string1 string2 &amp;key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))</var><a class="copiable-link" href="#index-STRING_003c_003d"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>If STRING1 is lexicographically less than or equal to STRING2, then returns
+the longest common prefix of the two strings.  Otherwise, returns NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SIMPLE_002dVECTOR_002dP"><span class="category-def">Function: </span><span><strong class="def-name">SIMPLE-VECTOR-P</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-SIMPLE_002dVECTOR_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a simple vector; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002dLEFT_002dTRIM"><span class="category-def">Function: </span><span><strong class="def-name">STRING-LEFT-TRIM</strong> <var class="def-var-arguments">(char-bag string)</var><a class="copiable-link" href="#index-STRING_002dLEFT_002dTRIM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a copy of STRING with the characters in CHAR-BAG removed from the
+left end.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ARRAY_002dTOTAL_002dSIZE"><span class="category-def">Function: </span><span><strong class="def-name">ARRAY-TOTAL-SIZE</strong> <var class="def-var-arguments">(array)</var><a class="copiable-link" href="#index-ARRAY_002dTOTAL_002dSIZE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the total number of elements of ARRAY.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FIND_002dIF_002dNOT"><span class="category-def">Function: </span><span><strong class="def-name">FIND-IF-NOT</strong> <var class="def-var-arguments">(test sequence &amp;key (from-end nil) (start 0) (end (length sequence)) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-FIND_002dIF_002dNOT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the index of the first element in SEQUENCE that does not satisfy
+TEST; NIL if no such element exists.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DELETE_002dDUPLICATES"><span class="category-def">Function: </span><span><strong class="def-name">DELETE-DUPLICATES</strong> <var class="def-var-arguments">(sequence &amp;key (from-end nil) (test #&rsquo;eql) test-not (start 0) (end (length sequence)) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-DELETE_002dDUPLICATES"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a sequence formed by removing duplicated elements destructively from
+SEQUENCE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-REMOVE_002dDUPLICATES"><span class="category-def">Function: </span><span><strong class="def-name">REMOVE-DUPLICATES</strong> <var class="def-var-arguments">(sequence &amp;key (from-end nil) (test #&rsquo;eql) test-not (start 0) (end (length sequence)) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-REMOVE_002dDUPLICATES"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>The elements of SEQUENCE are examined, and if any two match, one is discarded.
+Returns the resulting sequence.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-POSITION_002dIF"><span class="category-def">Function: </span><span><strong class="def-name">POSITION-IF</strong> <var class="def-var-arguments">(test sequence &amp;key (from-end nil) (start 0) (end (length sequence)) (key #&rsquo;identity))</var><a class="copiable-link" href="#index-POSITION_002dIF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the index of the first element in SEQUENCE that satisfies TEST; NIL
+if no such element exists.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MERGE"><span class="category-def">Function: </span><span><strong class="def-name">MERGE</strong> <var class="def-var-arguments">(result-type sequence1 sequence2 predicate &amp;key (key #&rsquo;identity))</var><a class="copiable-link" href="#index-MERGE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>SEQUENCE1 and SEQUENCE2 are destructively merged into a sequence of type
+RESULT-TYPE using PREDICATE to order the elements.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-EVERY"><span class="category-def">Function: </span><span><strong class="def-name">EVERY</strong> <var class="def-var-arguments">(predicate sequence &amp;rest more-sequences)</var><a class="copiable-link" href="#index-EVERY"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if every elements of SEQUENCEs satisfy PREDICATE; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-REDUCE"><span class="category-def">Function: </span><span><strong class="def-name">REDUCE</strong> <var class="def-var-arguments">(function sequence &amp;key (from-end nil) (start 0) (end (length sequence)) initial-value)</var><a class="copiable-link" href="#index-REDUCE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Combines all the elements of SEQUENCE using a binary operation FUNCTION.
+If INITIAL-VALUE is supplied, it is logically placed before the SEQUENCE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002dLESSP"><span class="category-def">Function: </span><span><strong class="def-name">STRING-LESSP</strong> <var class="def-var-arguments">(string1 string2 &amp;key (start1 0) (end1 (length string1)) (start2 0) (end2 (length string2)))</var><a class="copiable-link" href="#index-STRING_002dLESSP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Similar to STRING&lt;, but ignores cases.
+</p>
+
+</dd></dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Characters.html">Characters</a>, Previous: <a href="Numbers.html">Numbers</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Source-Level-Debugging-in-Emacs.html
@@ -0,0 +1,150 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Source Level Debugging in Emacs (GCL SI Manual)</title>
+
+<meta name="description" content="Source Level Debugging in Emacs (GCL SI Manual)">
+<meta name="keywords" content="Source Level Debugging in Emacs (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Debugging.html" rel="up" title="Debugging">
+<link href="Low-Level-Debug-Functions.html" rel="next" title="Low Level Debug Functions">
+<link href="Debugging.html" rel="prev" title="Debugging">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Source-Level-Debugging-in-Emacs">
+<div class="nav-panel">
+<p>
+Next: <a href="Low-Level-Debug-Functions.html" accesskey="n" rel="next">Low Level Debug Functions</a>, Previous: <a href="Debugging.html" accesskey="p" rel="prev">Debugging</a>, Up: <a href="Debugging.html" accesskey="u" rel="up">Debugging</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Source-Level-Debugging-in-Emacs-1"><span>18.1 Source Level Debugging in Emacs<a class="copiable-link" href="#Source-Level-Debugging-in-Emacs-1"> &para;</a></span></h3>
+
+<p>In emacs load (load &quot;dbl.el&quot;) from the gcl/doc directory.
+[ It also requires gcl.el from that directory.    Your system
+administrator should do make in the doc directory, so that
+these files are copied to the standard location.]
+</p>
+<p>OVERVIEW:
+</p>
+<p>Lisp files loaded with si::nload will have source line information about
+them recorded.  Break points may be set, and functions stepped.  Source code
+will be automatically displayed in the other window, with a little arrow beside
+the current line.  The backtrace (command :bt) will show line information and
+you will get automatic display of the source as you move up and down the stack.
+</p>
+<p>FUNCTIONS:
+break points which have been set.
+   si::nload (file)
+      load a lisp file collecting source line information.
+</p>    
+<p>si::break-function (function &amp;optional line absolute)
+     set up a breakpoint for FUNCTION at LINE relative to start or ABSOLUTE
+</p>
+<p>EMACS COMMANDS:
+M-x dbl makes a dbl buffer, suitable for running an inferior gcl.
+It has special keybindings for stepping and viewing sources.   You may
+start your favorite gcl program in the dbl shell buffer.
+</p>
+<p>Inferior Dbl Mode:
+Major mode for interacting with an inferior Dbl process.
+The following commands are available:
+</p>
+<p>C-c l           dbl-find-line
+</p>
+<p>ESC d           dbl-:down
+ESC u           dbl-:up
+ESC c           dbl-:r
+ESC n           dbl-:next
+ESC i           dbl-:step
+ESC s           dbl-:step
+</p>
+
+<p>M-x dbl-display-frame displays in the other window
+the last line referred to in the dbl buffer.
+</p>
+<p>ESC i and ESC n in the dbl window,
+call dbl to step and next and then update the other window
+with the current file and position.
+</p>
+<p>If you are in a source file, you may select a point to break
+at, by doing C-x SPC.
+</p>
+<p>Commands:
+Many commands are inherited from shell mode. 
+Additionally we have:
+</p>
+<p>M-x dbl-display-frame display frames file in other window
+ESC i advance one line in program
+ESC n advance one line in program (skip over calls).
+M-x send-dbl-command used for special printing of an arg at the current point.
+C-x SPACE sets break point at current line.
+</p>
+<p>&mdash;&mdash;&mdash;&mdash;&mdash;&mdash;&mdash;&mdash;&mdash;-
+</p>
+<p>When visiting a lisp buffer (if gcl.el is loaded in your emacs) the command
+c-m-x evaluates the current defun into the process running in the other window.
+Line information will be kept.  This line information allows you to set break
+points at a given line (by typing C-x \space on the line in the source file
+where you want the break to occur.  Once stopped within a function you may
+single step with M-s.  This moves one line at a time in the source code,
+displaying a little arrow beside your current position.  M-c is like M-s,
+except that function invocations are skipped over, rather than entered into.
+M-c continues execution.
+</p>
+<p>Keywords typed at top level, in the debug loop have
+a special meaning:
+</p><ul class="itemize">
+<li>:delete  [n1] [n2] .. &ndash; delete all break points or just n1,n2
+</li><li>:disable [n1] [n2] .. &ndash; disable all break points or just n1,n2
+</li><li>:enable  [n1] [n2] .. &ndash; enable all break points or just n1,n2
+</li><li>:info  [:bkpt]      &ndash;print information about 
+</li><li>:break [fun] [line] &ndash; break at the current location, or if
+     fun is supplied in fun.   Break  at the beginning unless a
+     line offset from the beginning of fun is supplied.
+</li><li>:fr [n] go to frame n   When in frame n, if the frame is interpreted,
+    typing the name of locals, will print their values.   If it is compiled
+    you must use (si::loc j) to print &lsquo;locj&rsquo;.   Autodisplay of the source
+    will take place if it is interpreted and the line can be determined.
+</li><li>:up [n] go up n frames from the current frame.
+</li><li>:down [n] go down n frames
+</li><li>:bt [n] back trace starting at the current frame and going to top level
+     If n is specified show only n frames.
+</li><li>:r  If stopped in a function resume.   If at top level in the dbl
+   loop, exit and resume an outer loop.
+</li><li>:q  quit the computation back to top level dbl loop.
+</li><li>:step step to the next line with line information
+</li><li>:next  step to the next line with line information skipping over function
+    invocations.
+
+</li></ul>
+<p>Files:  debug.lsp  dbl.el    gcl.el
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Low-Level-Debug-Functions.html">Low Level Debug Functions</a>, Previous: <a href="Debugging.html">Debugging</a>, Up: <a href="Debugging.html">Debugging</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Special-Forms-and-Functions.html
@@ -0,0 +1,1261 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Special Forms and Functions (GCL SI Manual)</title>
+
+<meta name="description" content="Special Forms and Functions (GCL SI Manual)">
+<meta name="keywords" content="Special Forms and Functions (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Compilation.html" rel="next" title="Compilation">
+<link href="Streams-and-Reading.html" rel="prev" title="Streams and Reading">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Special-Forms-and-Functions">
+<div class="nav-panel">
+<p>
+Next: <a href="Compilation.html" accesskey="n" rel="next">Compilation</a>, Previous: <a href="Streams-and-Reading.html" accesskey="p" rel="prev">Streams and Reading</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Special-Forms-and-Functions-1"><span>6 Special Forms and Functions<a class="copiable-link" href="#Special-Forms-and-Functions-1"> &para;</a></span></h2>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-LAMBDA_002dLIST_002dKEYWORDS"><span class="category-def">Constant: </span><span><strong class="def-name">LAMBDA-LIST-KEYWORDS</strong><a class="copiable-link" href="#index-LAMBDA_002dLIST_002dKEYWORDS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+List of all the lambda-list keywords used in GCL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GET_002dSETF_002dMETHOD"><span class="category-def">Function: </span><span><strong class="def-name">GET-SETF-METHOD</strong> <var class="def-var-arguments">(form)</var><a class="copiable-link" href="#index-GET_002dSETF_002dMETHOD"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the five values (or five &rsquo;gangs&rsquo;) constituting the SETF method for
+FORM.  See the doc of DEFINE-SETF-METHOD for the meanings of the gangs.  It
+is an error if the third value (i.e., the list of store variables) is not a
+one-element list.  See the doc of GET-SETF-METHOD-MULTIPLE-VALUE for
+comparison.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-THE"><span class="category-def">Special Form: </span><span><strong class="def-name">THE</strong><a class="copiable-link" href="#index-THE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(the value-type form)
+</pre></div>
+
+<p>Declares that the value of FORM must be of VALUE-TYPE.  Signals an error if
+this is not the case.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-SETF"><span class="category-def">Special Form: </span><span><strong class="def-name">SETF</strong><a class="copiable-link" href="#index-SETF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(setf {place newvalue}*)
+</pre></div>
+
+<p>Replaces the value in PLACE with the value of NEWVALUE, from left to right.
+Returns the value of the last NEWVALUE.  Each PLACE may be any one of the
+following:
+</p><ul class="itemize">
+<li>A symbol that names a variable.
+</li><li>A function call form whose first element is the name of the following
+    functions:
+<div class="example">
+<pre class="example-preformatted">nth	elt	subseq	rest	first ... tenth
+c?r	c??r	c???r	c????r
+aref	svref	char	schar	bit	sbit	fill-poiter
+get	getf	documentation	symbol-value	symbol-function
+symbol-plist	macro-function	gethash
+char-bit	ldb	mask-field
+apply
+</pre></div>
+<p>where &rsquo;?&rsquo; stands for either &rsquo;a&rsquo; or &rsquo;d&rsquo;.
+</p></li><li>the form (THE type place) with PLACE being a place recognized by SETF.
+</li><li>a macro call which expands to a place recognized by SETF.
+</li><li>any form for which a DEFSETF or DEFINE-SETF-METHOD declaration has been
+    made.
+</li></ul>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-WHEN"><span class="category-def">Special Form: </span><span><strong class="def-name">WHEN</strong><a class="copiable-link" href="#index-WHEN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(when test {form}*)
+</pre></div>
+
+<p>If TEST evaluates to non-NIL, then evaluates FORMs as a PROGN.  If not,
+simply returns NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-CCASE"><span class="category-def">Macro: </span><span><strong class="def-name">CCASE</strong><a class="copiable-link" href="#index-CCASE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(ccase keyplace {({key | ({key}*)} {form}*)}*)
+</pre></div>
+
+<p>Evaluates KEYPLACE and tries to find the KEY that is EQL to the value of
+KEYPLACE.  If one is found, then evaluates FORMs that follow the KEY and
+returns the value(s) of the last FORM.  If not, signals a correctable error.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MACROEXPAND"><span class="category-def">Function: </span><span><strong class="def-name">MACROEXPAND</strong> <var class="def-var-arguments">(form &amp;optional (env nil))</var><a class="copiable-link" href="#index-MACROEXPAND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>If FORM is a macro form, then expands it repeatedly until it is not a macro
+any more.  Returns two values: the expanded form and a T-or-NIL flag
+indicating whether the original form was a macro.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-MULTIPLE_002dVALUE_002dCALL"><span class="category-def">Special Form: </span><span><strong class="def-name">MULTIPLE-VALUE-CALL</strong><a class="copiable-link" href="#index-MULTIPLE_002dVALUE_002dCALL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(multiple-value-call function {form}*)
+</pre></div>
+
+<p>Calls FUNCTION with all the values of FORMs as arguments.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DEFSETF"><span class="category-def">Macro: </span><span><strong class="def-name">DEFSETF</strong><a class="copiable-link" href="#index-DEFSETF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(defsetf access-fun {update-fun [doc] |
+                             lambda-list (store-var) {decl | doc}*
+{form}*)
+</pre></div>
+
+<p>Defines how to SETF a generalized-variable reference of the form
+(ACCESS-FUN ...).  The doc-string DOC, if supplied, is saved as a SETF doc and
+can be retrieved by (documentation &rsquo;NAME &rsquo;setf).
+</p>
+<div class="example">
+<pre class="example-preformatted">(defsetf access-fun update-fun) defines an expansion from
+(setf (ACCESS-FUN arg1 ... argn) value) to (UPDATE-FUN arg1 ... argn value).
+
+(defsetf access-fun lambda-list (store-var) . body) defines a macro which
+</pre></div>
+<p>expands
+</p>
+<div class="example">
+<pre class="example-preformatted">(setf (ACCESS-FUN arg1 ... argn) value) into the form
+	(let* ((temp1 ARG1) ... (tempn ARGn) (temp0 value)) rest)
+</pre></div>
+<p>where REST is the value of BODY with parameters in LAMBDA-LIST bound to the
+symbols TEMP1 ... TEMPn and with STORE-VAR bound to the symbol TEMP0.
+</p>
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-TAGBODY"><span class="category-def">Special Form: </span><span><strong class="def-name">TAGBODY</strong><a class="copiable-link" href="#index-TAGBODY"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(tagbody {tag | statement}*)
+</pre></div>
+
+<p>Executes STATEMENTs and returns NIL if it falls off the end.
+</p>
+
+</dd></dl>
+
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-ETYPECASE"><span class="category-def">Macro: </span><span><strong class="def-name">ETYPECASE</strong><a class="copiable-link" href="#index-ETYPECASE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(etypecase keyform {(type {form}*)}*)
+</pre></div>
+
+<p>Evaluates KEYFORM and tries to find the TYPE in which the value of KEYFORM
+belongs.  If one is found, then evaluates FORMs that follow the KEY and
+returns the value(s) of the last FORM.  If not, signals an error.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-LET_002a"><span class="category-def">Special Form: </span><span><strong class="def-name">LET*</strong><a class="copiable-link" href="#index-LET_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(let* ({var | (var [value])}*) {decl}* {form}*)
+</pre></div>
+
+<p>Initializes VARs, binding them to the values of VALUEs (which defaults to NIL)
+from left to right, then evaluates FORMs as a PROGN.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-PROG1"><span class="category-def">Special Form: </span><span><strong class="def-name">PROG1</strong><a class="copiable-link" href="#index-PROG1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(prog1 first {form}*)
+</pre></div>
+
+<p>Evaluates FIRST and FORMs in order, and returns the (single) value of FIRST.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DEFUN"><span class="category-def">Special Form: </span><span><strong class="def-name">DEFUN</strong><a class="copiable-link" href="#index-DEFUN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(defun name lambda-list {decl | doc}* {form}*)
+</pre></div>
+
+<p>Defines a function as the global function definition of the symbol NAME.
+The complete syntax of a lambda-list is:
+	({var}*
+	 [&amp;optional {var | (var [initform [svar]])}*]
+	 [&amp;rest var]
+	 [&amp;key {var | ({var | (keyword var)} [initform [svar]])}*
+	       [&amp;allow-other-keys]]
+	 [&amp;aux {var | (var [initform])}*])
+The doc-string DOC, if supplied, is saved as a FUNCTION doc and can be
+retrieved by (documentation &rsquo;NAME &rsquo;function).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-MULTIPLE_002dVALUE_002dBIND"><span class="category-def">Special Form: </span><span><strong class="def-name">MULTIPLE-VALUE-BIND</strong><a class="copiable-link" href="#index-MULTIPLE_002dVALUE_002dBIND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(multiple-value-bind ({var}*) values-form {decl}* {form}*)
+</pre></div>
+
+<p>Binds the VARiables to the results of VALUES-FORM, in order (defaulting to
+NIL) and evaluates FORMs in order.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DECLARE"><span class="category-def">Special Form: </span><span><strong class="def-name">DECLARE</strong><a class="copiable-link" href="#index-DECLARE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(declare {decl-spec}*)
+</pre></div>
+
+<p>Gives a declaration.  Possible DECL-SPECs are:
+  (SPECIAL {var}*)
+  (TYPE type {var}*)
+     where &rsquo;TYPE&rsquo; is one of the following symbols
+</p><div class="example">
+<pre class="example-preformatted">array		fixnum		package		simple-bit-vector
+atom		float		pathname	simple-string
+bignum		function	random-state	simple-vector
+bit		hash-table	ratio		single-float
+bit-vector	integer		rational	standard-char
+character	keyword		readtable	stream
+common		list		sequence	string
+compiled-function  long-float	short-float	string-char
+complex		nil		signed-byte	symbol
+cons		null		unsigned-byte	t
+double-float	number		simple-array	vector
+</pre></div>
+<p>&rsquo;TYPE&rsquo; may also be a list containing one of the above symbols as
+its first element and more specific information later in the list.
+For example	
+</p><div class="example">
+<pre class="example-preformatted">(vector long-float 80) ; vector of 80 long-floats.
+(array long-float *)   ; array of long-floats
+(array fixnum)         ; array of fixnums
+(array * 30)           ; an array of length 30 but unspecified type
+</pre></div>
+
+<p>A list of 1 element may be replaced by the symbol alone, and a list ending
+      in &rsquo;*&rsquo; may drop the the final  &rsquo;*&rsquo;.
+ </p><div class="example">
+<pre class="example-preformatted">(OBJECT {var}*)
+(FTYPE type {function-name}*)
+    eg: ;; function of two required args and optional args and one value:
+     (ftype (function (t t *) t) sort reduce)
+        ;; function with 1 arg of general type returning 1 fixnum as value.
+     (ftype (function (t) fixnum) length)
+(FUNCTION function-name ({arg-type}*) {return-type}*)
+(INLINE {function-name}*)
+(NOTINLINE {function-name}*)
+(IGNORE {var}*)
+(OPTIMIZE {({SPEED | SPACE | SAFETY | COMPILATION-SPEED} {0 | 1 | 2 | 3})}*)
+(DECLARATION {non-standard-decl-name}*)
+(:DYNAMIC-EXTENT {var}*) ;GCL-specific.
+</pre></div>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DEFMACRO"><span class="category-def">Special Form: </span><span><strong class="def-name">DEFMACRO</strong><a class="copiable-link" href="#index-DEFMACRO"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(defmacro name defmacro-lambda-list {decl | doc}* {form}*)
+</pre></div>
+
+<p>Defines a macro as the global macro definition of the symbol NAME.
+The complete syntax of a defmacro-lambda-list is:
+</p>
+<p>( [&amp;whole var]
+  [&amp;environment var]
+  {pseudo-var}*
+  [&amp;optional {var | (pseudo-var [initform [pseudo-var]])}*]
+  {[{&amp;rest | &amp;body} pseudo-var]
+   [&amp;key {var | ({var | (keyword pseudo-var)} [initform [pseudo-var]])}*
+         [&amp;allow-other-keys]]
+   [&amp;aux {var | (pseudo-var [initform])}*]
+  |  . var})
+</p>
+<p>where pseudo-var is either a symbol or a list of the following form:
+</p>
+<p>( {pseudo-var}*
+  [&amp;optional {var | (pseudo-var [initform [pseudo-var]])}*]
+  {[{&amp;rest | &amp;body} pseudo-var]
+   [&amp;key {var | ({var | (keyword pseudo-var)} [initform [pseudo-var]])}*
+         [ &amp;allow-other-keys ] ]
+   [&amp;aux {var | (pseudo-var [initform])}*]
+  |  . var})
+</p>
+<p>As a special case, a non-NIL symbol is accepcted as a defmacro-lambda-list:
+(DEFMACRO &lt;name&gt; &lt;symbol&gt; ...) is equivalent to
+(DEFMACRO &lt;name&gt; (&amp;REST &lt;symbol&gt;) ...).
+     The doc-string DOC, if supplied, is saved as a FUNCTION doc and can be
+retrieved by (documentation &rsquo;NAME &rsquo;function).
+See the type doc of LIST for the backquote macro useful for defining macros.
+Also, see the function doc of PPRINT for the output-formatting.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aEVALHOOK_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*EVALHOOK*</strong><a class="copiable-link" href="#index-_002aEVALHOOK_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+If *EVALHOOK* is not NIL, its value must be a function that can receive
+two arguments: a form to evaluate and an environment.  This function does
+the evaluation instead of EVAL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FUNCTIONP"><span class="category-def">Function: </span><span><strong class="def-name">FUNCTIONP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-FUNCTIONP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a function, suitable for use by FUNCALL or APPLY.  Returns
+NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-LAMBDA_002dPARAMETERS_002dLIMIT"><span class="category-def">Constant: </span><span><strong class="def-name">LAMBDA-PARAMETERS-LIMIT</strong><a class="copiable-link" href="#index-LAMBDA_002dPARAMETERS_002dLIMIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The exclusive upper bound on the number of distinct parameter names that may
+appear in a single lambda-list.  Actually, however, there is no such upper
+bound in GCL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-FLET"><span class="category-def">Special Form: </span><span><strong class="def-name">FLET</strong><a class="copiable-link" href="#index-FLET"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(flet ({(name lambda-list {decl | doc}* {form}*)}*) . body)
+</pre></div>
+
+<p>Evaluates BODY as a PROGN, with local function definitions in effect.  BODY is
+the scope of each local function definition.  Since the scope does not include
+the function definitions themselves, the local function can reference
+externally defined functions of the same name.  See the doc of DEFUN for the
+complete syntax of a lambda-list.  Doc-strings for local functions are simply
+ignored.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-ECASE"><span class="category-def">Macro: </span><span><strong class="def-name">ECASE</strong><a class="copiable-link" href="#index-ECASE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(ecase keyform {({key | ({key}*)} {form}*)}*)
+</pre></div>
+
+<p>Evaluates KEYFORM and tries to find the KEY that is EQL to the value of
+KEYFORM.  If one is found, then evaluates FORMs that follow the KEY and
+returns the value(s) of the last FORM.  If not, signals an error.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-PROG2"><span class="category-def">Special Form: </span><span><strong class="def-name">PROG2</strong><a class="copiable-link" href="#index-PROG2"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(prog2 first second {forms}*)
+</pre></div>
+
+<p>Evaluates FIRST, SECOND, and FORMs in order, and returns the (single) value
+of SECOND.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-PROGV"><span class="category-def">Special Form: </span><span><strong class="def-name">PROGV</strong><a class="copiable-link" href="#index-PROGV"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(progv symbols values {form}*)
+</pre></div>
+
+<p>SYMBOLS must evaluate to a list of variables.  VALUES must evaluate to a list
+of initial values.  Evaluates FORMs as a PROGN, with each variable bound (as
+special) to the corresponding value.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-QUOTE"><span class="category-def">Special Form: </span><span><strong class="def-name">QUOTE</strong><a class="copiable-link" href="#index-QUOTE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(quote x)
+</pre></div>
+<p>or &rsquo;x
+Simply returns X without evaluating it.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DOTIMES"><span class="category-def">Special Form: </span><span><strong class="def-name">DOTIMES</strong><a class="copiable-link" href="#index-DOTIMES"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(dotimes (var countform [result]) {decl}* {tag | statement}*)
+</pre></div>
+
+<p>Executes STATEMENTs, with VAR bound to each number between 0 (inclusive) and
+the value of COUNTFORM (exclusive).  Then returns the value(s) of RESULT
+(which defaults to NIL).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SPECIAL_002dFORM_002dP"><span class="category-def">Function: </span><span><strong class="def-name">SPECIAL-FORM-P</strong> <var class="def-var-arguments">(symbol)</var><a class="copiable-link" href="#index-SPECIAL_002dFORM_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if SYMBOL globally names a special form; NIL otherwise.
+The special forms defined in Steele&rsquo;s manual are:
+</p><div class="example">
+<pre class="example-preformatted">block		if			progv
+catch		labels			quote
+compiler-let	let			return-from
+declare		let*			setq
+eval-when	macrolet		tagbody
+flet		multiple-value-call	the
+function	multiple-value-prog1	throw
+go		progn			unwind-protect
+</pre></div>
+
+<p>In addition, GCL implements the following macros as special forms, though
+of course macro-expanding functions such as MACROEXPAND work correctly for
+these macros.
+</p>
+<div class="example">
+<pre class="example-preformatted">and		incf			prog1
+case		locally			prog2
+cond		loop			psetq
+decf		multiple-value-bind	push
+defmacro	multiple-value-list	return
+defun		multiple-value-set	setf
+do		or			unless
+do*		pop			when
+dolist		prog
+dotimes		prog* 
+</pre></div>
+
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-FUNCTION"><span class="category-def">Special Form: </span><span><strong class="def-name">FUNCTION</strong><a class="copiable-link" href="#index-FUNCTION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(function x)
+</pre></div>
+<p>or #&rsquo;x
+If X is a lambda expression, creates and returns a lexical closure of X in
+the current lexical environment.  If X is a symbol that names a function,
+returns that function.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-MULTIPLE_002dVALUES_002dLIMIT"><span class="category-def">Constant: </span><span><strong class="def-name">MULTIPLE-VALUES-LIMIT</strong><a class="copiable-link" href="#index-MULTIPLE_002dVALUES_002dLIMIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The exclusive upper bound on the number of values that may be returned from
+a function.  Actually, however, there is no such upper bound in GCL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-APPLYHOOK"><span class="category-def">Function: </span><span><strong class="def-name">APPLYHOOK</strong> <var class="def-var-arguments">(function args evalhookfn applyhookfn &amp;optional (env nil))</var><a class="copiable-link" href="#index-APPLYHOOK"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Applies FUNCTION to ARGS, with *EVALHOOK* bound to EVALHOOKFN and with
+*APPLYHOOK* bound to APPLYHOOKFN.  Ignores the hook function once, for the
+top-level application of FUNCTION to ARGS.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aMACROEXPAND_002dHOOK_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*MACROEXPAND-HOOK*</strong><a class="copiable-link" href="#index-_002aMACROEXPAND_002dHOOK_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Holds a function that can take two arguments (a macro expansion function
+and the macro form to be expanded) and returns the expanded form.  This
+function is whenever a macro-expansion takes place.  Initially this is set to
+#&rsquo;FUNCALL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-PROG_002a"><span class="category-def">Special Form: </span><span><strong class="def-name">PROG*</strong><a class="copiable-link" href="#index-PROG_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(prog* ({var | (var [init])}*) {decl}* {tag | statement}*)
+</pre></div>
+
+<p>Creates a NIL block, binds VARs sequentially, and then executes STATEMENTs.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-BLOCK"><span class="category-def">Special Form: </span><span><strong class="def-name">BLOCK</strong><a class="copiable-link" href="#index-BLOCK"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(block name {form}*)
+</pre></div>
+
+<p>The FORMs are evaluated in order, but it is possible to exit the block
+using (RETURN-FROM name value).  The RETURN-FROM must be lexically contained
+within the block.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-PROGN"><span class="category-def">Special Form: </span><span><strong class="def-name">PROGN</strong><a class="copiable-link" href="#index-PROGN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(progn {form}*)
+</pre></div>
+
+<p>Evaluates FORMs in order, and returns whatever the last FORM returns.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-APPLY"><span class="category-def">Function: </span><span><strong class="def-name">APPLY</strong> <var class="def-var-arguments">(function arg &amp;rest more-args)</var><a class="copiable-link" href="#index-APPLY"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Applies FUNCTION.  The arguments to the function consist of all ARGs
+except for the last, and all elements of the last ARG.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-LABELS"><span class="category-def">Special Form: </span><span><strong class="def-name">LABELS</strong><a class="copiable-link" href="#index-LABELS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(labels ({(name lambda-list {decl | doc}* {form}*)}*) . body)
+</pre></div>
+
+<p>Evaluates BODY as a PROGN, with the local function definitions in effect.  The
+scope of the locally defined functions include the function definitions
+themselves, so their definitions may include recursive references.  See the doc
+of DEFUN for the complete syntax of a lambda-list.  Doc-strings for local
+functions are simply ignored.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-RETURN"><span class="category-def">Special Form: </span><span><strong class="def-name">RETURN</strong><a class="copiable-link" href="#index-RETURN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(return [result])
+</pre></div>
+
+<p>Returns from the lexically surrounding NIL block.  The value of RESULT,
+which defaults to NIL, is returned as the value of the block.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-TYPECASE"><span class="category-def">Macro: </span><span><strong class="def-name">TYPECASE</strong><a class="copiable-link" href="#index-TYPECASE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(typecase keyform {(type {form}*)}*)
+</pre></div>
+
+<p>Evaluates KEYFORM and tries to find the TYPE in which the value of KEYFORM
+belongs.  If one is found, then evaluates FORMs that follow the KEY and
+returns the value of the last FORM.  If not, simply returns NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-AND"><span class="category-def">Special Form: </span><span><strong class="def-name">AND</strong><a class="copiable-link" href="#index-AND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(and {form}*)
+</pre></div>
+
+<p>Evaluates FORMs in order from left to right.  If any FORM evaluates to NIL,
+returns immediately with the value NIL.  Else, returns the value(s) of the
+last FORM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-LET"><span class="category-def">Special Form: </span><span><strong class="def-name">LET</strong><a class="copiable-link" href="#index-LET"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(let ({var | (var [value])}*) {decl}* {form}*)
+</pre></div>
+
+<p>Initializes VARs, binding them to the values of VALUEs (which defaults to NIL)
+all at once, then evaluates FORMs as a PROGN.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-COND"><span class="category-def">Special Form: </span><span><strong class="def-name">COND</strong><a class="copiable-link" href="#index-COND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(cond {(test {form}*)}*)
+</pre></div>
+<p>Evaluates each
+TEST in order until one evaluates to a non-NIL value.  Then evaluates
+the associated FORMs in order and returns the value(s) of the last
+FORM.  If no forms follow the TEST, then returns the value of the
+TEST.  Returns NIL, if all TESTs evaluate to NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GET_002dSETF_002dMETHOD_002dMULTIPLE_002dVALUE"><span class="category-def">Function: </span><span><strong class="def-name">GET-SETF-METHOD-MULTIPLE-VALUE</strong> <var class="def-var-arguments">(form)</var><a class="copiable-link" href="#index-GET_002dSETF_002dMETHOD_002dMULTIPLE_002dVALUE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+ Returns the five values (or five &rsquo;gangs&rsquo;)
+constituting the SETF method for FORM.  See the doc of
+DEFINE-SETF-METHOD for the meanings of the gangs.  The third value
+(i.e., the list of store variables) may consist of any number of
+elements.  See the doc of GET-SETF-METHOD for
+comparison.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-CATCH"><span class="category-def">Special Form: </span><span><strong class="def-name">CATCH</strong><a class="copiable-link" href="#index-CATCH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(catch tag {form}*)
+</pre></div>
+
+<p>Sets up a catcher with
+that value TAG.  Then evaluates FORMs as a PROGN, but may possibly
+abort the evaluation by a THROW form that specifies the value EQ to
+the catcher tag.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DEFINE_002dMODIFY_002dMACRO"><span class="category-def">Macro: </span><span><strong class="def-name">DEFINE-MODIFY-MACRO</strong><a class="copiable-link" href="#index-DEFINE_002dMODIFY_002dMACRO"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(define-modify-macro name lambda-list fun [doc])
+</pre></div>
+
+<p>Defines a read-modify-write macro, like PUSH and INCF.  The defined macro will
+expand a form (NAME place val1 ... valn) into a form that in effect SETFs the
+value of the call (FUN PLACE arg1 ... argm) into PLACE, where arg1 ... argm
+are parameters in LAMBDA-LIST which are bound to the forms VAL1 ... VALn.
+The doc-string DOC, if supplied, is saved as a FUNCTION doc and can be
+retrieved by (documentation &rsquo;NAME &rsquo;function).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MACROEXPAND_002d1"><span class="category-def">Function: </span><span><strong class="def-name">MACROEXPAND-1</strong> <var class="def-var-arguments">(form &amp;optional (env nil))</var><a class="copiable-link" href="#index-MACROEXPAND_002d1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>If FORM is a macro form, then expands it once.  Returns two values: the
+expanded form and a T-or-NIL flag indicating whether the original form was
+a macro.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FUNCALL"><span class="category-def">Function: </span><span><strong class="def-name">FUNCALL</strong> <var class="def-var-arguments">(function &amp;rest arguments)</var><a class="copiable-link" href="#index-FUNCALL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Applies FUNCTION to the ARGUMENTs
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-CALL_002dARGUMENTS_002dLIMIT"><span class="category-def">Constant: </span><span><strong class="def-name">CALL-ARGUMENTS-LIMIT</strong><a class="copiable-link" href="#index-CALL_002dARGUMENTS_002dLIMIT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The upper exclusive bound on the number of arguments that may be passed to
+a function.  Actually, however, there is no such upper bound in GCL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-CASE"><span class="category-def">Special Form: </span><span><strong class="def-name">CASE</strong><a class="copiable-link" href="#index-CASE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(case keyform {({key | ({key}*)} {form}*)}*)
+</pre></div>
+
+<p>Evaluates KEYFORM and tries to find the KEY that is EQL to the value of
+KEYFORM.  If one is found, then evaluates FORMs that follow the KEY and
+returns the value(s) of the last FORM.  If not, simply returns NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DEFINE_002dSETF_002dMETHOD"><span class="category-def">Macro: </span><span><strong class="def-name">DEFINE-SETF-METHOD</strong><a class="copiable-link" href="#index-DEFINE_002dSETF_002dMETHOD"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(define-setf-method access-fun defmacro-lambda-list {decl | doc}*
+          {form}*)
+</pre></div>
+
+<p>Defines how to SETF a generalized-variable reference of the form
+(ACCESS-FUN ...).  When a form (setf (ACCESS-FUN arg1 ... argn) value) is
+being evaluated, the FORMs are first evaluated as a PROGN with the parameters
+in DEFMACRO-LAMBDA-LIST bound to ARG1 ... ARGn.  Assuming that the last FORM
+returns five values
+	(temp-var-1 ... temp-var-k)
+	(value-from-1 ... value-form-k)
+	(store-var)
+	storing-form
+	access-form
+in order, the whole SETF is then expanded into
+	(let* ((temp-var-1 value-from-1) ... (temp-k value-form-k)
+	       (store-var VALUE))
+	  storing-from)
+Incidentally, the five values are called the five gangs of a SETF method.
+The doc-string DOC, if supplied, is saved as a SETF doc and can be retrieved
+by (documentation &rsquo;NAME &rsquo;setf).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-COMPILER_002dLET"><span class="category-def">Special Form: </span><span><strong class="def-name">COMPILER-LET</strong><a class="copiable-link" href="#index-COMPILER_002dLET"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(compiler-let ({var | (var [value])}*) {form}*)
+</pre></div>
+
+<p>When interpreted, this form works just like a LET form with all VARs declared
+special.  When compiled, FORMs are processed with the VARs bound at compile
+time, but no bindings occur when the compiled code is executed.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-VALUES"><span class="category-def">Function: </span><span><strong class="def-name">VALUES</strong> <var class="def-var-arguments">(&amp;rest args)</var><a class="copiable-link" href="#index-VALUES"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns ARGs in order, as values.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-MULTIPLE_002dVALUE_002dLIST"><span class="category-def">Special Form: </span><span><strong class="def-name">MULTIPLE-VALUE-LIST</strong><a class="copiable-link" href="#index-MULTIPLE_002dVALUE_002dLIST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(multiple-value-list form)
+</pre></div>
+
+<p>Evaluates FORM, and returns a list of multiple values it returned.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-MULTIPLE_002dVALUE_002dPROG1"><span class="category-def">Special Form: </span><span><strong class="def-name">MULTIPLE-VALUE-PROG1</strong><a class="copiable-link" href="#index-MULTIPLE_002dVALUE_002dPROG1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(multiple-value-prog1 form {form}*)
+</pre></div>
+
+<p>Evaluates the first FORM, saves all the values produced, then evaluates
+the other FORMs.  Returns the saved values.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-MACROLET"><span class="category-def">Special Form: </span><span><strong class="def-name">MACROLET</strong><a class="copiable-link" href="#index-MACROLET"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(macrolet ({(name defmacro-lambda-list {decl | doc}* . body)}*)
+          {form}*)
+</pre></div>
+
+<p>Evaluates FORMs as a PROGN, with the local macro definitions in effect.
+See the doc of DEFMACRO for the complete syntax of a defmacro-lambda-list.
+Doc-strings for local macros are simply ignored.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-GO"><span class="category-def">Special Form: </span><span><strong class="def-name">GO</strong><a class="copiable-link" href="#index-GO"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(go tag)
+</pre></div>
+
+<p>Jumps to the specified TAG established by a lexically surrounding TAGBODY.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-PROG"><span class="category-def">Special Form: </span><span><strong class="def-name">PROG</strong><a class="copiable-link" href="#index-PROG"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(prog ({var | (var [init])}*) {decl}* {tag | statement}*)
+</pre></div>
+
+<p>Creates a NIL block, binds VARs in parallel, and then executes STATEMENTs.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aAPPLYHOOK_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*APPLYHOOK*</strong><a class="copiable-link" href="#index-_002aAPPLYHOOK_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Used to substitute another function for the implicit APPLY normally done
+within EVAL.  If *APPLYHOOK* is not NIL, its value must be a function 
+which takes three arguments: a function to be applied, a list of arguments,
+and an environment.  This function does the application instead of APPLY.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-RETURN_002dFROM"><span class="category-def">Special Form: </span><span><strong class="def-name">RETURN-FROM</strong><a class="copiable-link" href="#index-RETURN_002dFROM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(return-from name [result])
+</pre></div>
+
+<p>Returns from the lexically surrounding block whose name is NAME.  The value
+of RESULT, which defaults to NIL, is returned as the value of the block.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-UNLESS"><span class="category-def">Special Form: </span><span><strong class="def-name">UNLESS</strong><a class="copiable-link" href="#index-UNLESS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(unless test {form}*)
+</pre></div>
+
+<p>If TEST evaluates to NIL, then evaluates FORMs as a PROGN.  If not,
+simply returns NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-MULTIPLE_002dVALUE_002dSETQ"><span class="category-def">Special Form: </span><span><strong class="def-name">MULTIPLE-VALUE-SETQ</strong><a class="copiable-link" href="#index-MULTIPLE_002dVALUE_002dSETQ"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(multiple-value-setq variables form)
+</pre></div>
+
+<p>Sets each variable in the list VARIABLES to the corresponding value of FORM.
+Returns the value assigned to the first variable.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-LOCALLY"><span class="category-def">Special Form: </span><span><strong class="def-name">LOCALLY</strong><a class="copiable-link" href="#index-LOCALLY"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(locally {decl}* {form}*)
+</pre></div>
+
+<p>Gives local pervasive declarations.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-IDENTITY"><span class="category-def">Function: </span><span><strong class="def-name">IDENTITY</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-IDENTITY"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Simply returns X.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NOT"><span class="category-def">Function: </span><span><strong class="def-name">NOT</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-NOT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is NIL; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DEFCONSTANT"><span class="category-def">Macro: </span><span><strong class="def-name">DEFCONSTANT</strong><a class="copiable-link" href="#index-DEFCONSTANT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(defconstant name initial-value [doc])
+</pre></div>
+
+<p>Declares that the variable NAME is a constant whose value is the value of
+INITIAL-VALUE.  The doc-string DOC, if supplied, is saved as a VARIABLE doc
+and can be retrieved by (documentation &rsquo;NAME &rsquo;variable).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-VALUES_002dLIST"><span class="category-def">Function: </span><span><strong class="def-name">VALUES-LIST</strong> <var class="def-var-arguments">(list)</var><a class="copiable-link" href="#index-VALUES_002dLIST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns all of the elements of LIST in order, as values.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ERROR"><span class="category-def">Function: </span><span><strong class="def-name">ERROR</strong> <var class="def-var-arguments">(control-string &amp;rest args)</var><a class="copiable-link" href="#index-ERROR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Signals a fatal error.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-IF"><span class="category-def">Special Form: </span><span><strong class="def-name">IF</strong><a class="copiable-link" href="#index-IF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(if test then [else])
+</pre></div>
+
+<p>If TEST evaluates to non-NIL, then evaluates THEN and returns the result.
+If not, evaluates ELSE (which defaults to NIL) and returns the result.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-UNWIND_002dPROTECT"><span class="category-def">Special Form: </span><span><strong class="def-name">UNWIND-PROTECT</strong><a class="copiable-link" href="#index-UNWIND_002dPROTECT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(unwind-protect protected-form {cleanup-form}*)
+</pre></div>
+
+<p>Evaluates PROTECTED-FORM and returns whatever it returned.  Guarantees that
+CLEANUP-FORMs be always evaluated before exiting from the UNWIND-PROTECT
+form.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-EVALHOOK"><span class="category-def">Function: </span><span><strong class="def-name">EVALHOOK</strong> <var class="def-var-arguments">(form evalhookfn applyhookfn &amp;optional (env nil))</var><a class="copiable-link" href="#index-EVALHOOK"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Evaluates FORM with *EVALHOOK* bound to EVALHOOKFN and *APPLYHOOK* bound
+to APPLYHOOKFN.  Ignores these hooks once, for the top-level evaluation
+of FORM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-OR"><span class="category-def">Special Form: </span><span><strong class="def-name">OR</strong><a class="copiable-link" href="#index-OR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(or {form}*)
+</pre></div>
+
+<p>Evaluates FORMs in order from left to right.  If any FORM evaluates to
+non-NIL, quits and returns that (single) value.  If the last FORM is reached,
+returns whatever values it returns.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-CTYPECASE"><span class="category-def">Macro: </span><span><strong class="def-name">CTYPECASE</strong><a class="copiable-link" href="#index-CTYPECASE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(ctypecase keyplace {(type {form}*)}*)
+</pre></div>
+
+<p>Evaluates KEYPLACE and tries to find the TYPE in which the value of KEYPLACE
+belongs.  If one is found, then evaluates FORMs that follow the KEY and
+returns the value(s) of the last FORM.  If not, signals a correctable error.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-EVAL"><span class="category-def">Function: </span><span><strong class="def-name">EVAL</strong> <var class="def-var-arguments">(exp)</var><a class="copiable-link" href="#index-EVAL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Evaluates EXP and returns the result(s).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-PSETF"><span class="category-def">Macro: </span><span><strong class="def-name">PSETF</strong><a class="copiable-link" href="#index-PSETF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(psetf {place newvalue}*)
+</pre></div>
+
+<p>Similar to SETF, but evaluates all NEWVALUEs first, and then replaces the
+value in each PLACE with the value of the corresponding NEWVALUE.  Returns
+NIL always.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-THROW"><span class="category-def">Special Form: </span><span><strong class="def-name">THROW</strong><a class="copiable-link" href="#index-THROW"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(throw tag result)
+</pre></div>
+
+<p>Evaluates TAG and aborts the execution of the most recent CATCH form that sets
+up a catcher with the same tag value.  The CATCH form returns whatever RESULT
+returned.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DEFPARAMETER"><span class="category-def">Macro: </span><span><strong class="def-name">DEFPARAMETER</strong><a class="copiable-link" href="#index-DEFPARAMETER"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(defparameter name initial-value [doc])
+</pre></div>
+
+<p>Declares the variable NAME as a special variable and initializes the value.
+The doc-string DOC, if supplied, is saved as a VARIABLE doc and can be
+retrieved by (documentation &rsquo;NAME &rsquo;variable).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DEFVAR"><span class="category-def">Macro: </span><span><strong class="def-name">DEFVAR</strong><a class="copiable-link" href="#index-DEFVAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(defvar name [initial-value [doc]])
+</pre></div>
+
+<p>Declares the variable NAME as a special variable and, optionally, initializes
+it.  The doc-string DOC, if supplied, is saved as a VARIABLE doc and can be
+retrieved by (documentation &rsquo;NAME &rsquo;variable).
+</p>
+
+</dd></dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Compilation.html">Compilation</a>, Previous: <a href="Streams-and-Reading.html">Streams and Reading</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Streams-and-Reading.html
@@ -0,0 +1,1157 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Streams and Reading (GCL SI Manual)</title>
+
+<meta name="description" content="Streams and Reading (GCL SI Manual)">
+<meta name="keywords" content="Streams and Reading (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Special-Forms-and-Functions.html" rel="next" title="Special Forms and Functions">
+<link href="Lists.html" rel="prev" title="Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Streams-and-Reading">
+<div class="nav-panel">
+<p>
+Next: <a href="Special-Forms-and-Functions.html" accesskey="n" rel="next">Special Forms and Functions</a>, Previous: <a href="Lists.html" accesskey="p" rel="prev">Lists</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Streams-and-Reading-1"><span>5 Streams and Reading<a class="copiable-link" href="#Streams-and-Reading-1"> &para;</a></span></h2>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dECHO_002dSTREAM"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-ECHO-STREAM</strong> <var class="def-var-arguments">(input-stream output-stream)</var><a class="copiable-link" href="#index-MAKE_002dECHO_002dSTREAM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a bidirectional stream which gets its input from INPUT-STREAM and
+sends its output to OUTPUT-STREAM.  In addition, all input is echoed to
+OUTPUT-STREAM.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aREADTABLE_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*READTABLE*</strong><a class="copiable-link" href="#index-_002aREADTABLE_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The current readtable.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LOAD"><span class="category-def">Function: </span><span><strong class="def-name">LOAD</strong> <var class="def-var-arguments">(filename &amp;key (verbose *load-verbose*) (print nil) (if-does-not-exist :error))</var><a class="copiable-link" href="#index-LOAD"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Loads the file named by FILENAME into GCL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-OPEN"><span class="category-def">Function: </span><span><strong class="def-name">OPEN</strong> <var class="def-var-arguments">(filename &amp;key (direction :input) (element-type &rsquo;string-char) (if-exists :error) (if-does-not-exist :error))</var><a class="copiable-link" href="#index-OPEN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Opens the file specified by FILENAME, which may be a string, a pathname,
+or a stream.  Returns a stream for the open file.
+DIRECTION is  :INPUT, :OUTPUT, :IO or :PROBE.
+ELEMENT-TYPE is  STRING-CHAR, (UNSIGNED-BYTE n),
+UNSIGNED-BYTE, (SIGNED-BYTE n), SIGNED-BYTE, CHARACTER, BIT, (MOD n), or
+:DEFAULT.
+IF-EXISTS is :ERROR, :NEW-VERSION, :RENAME,
+:RENAME-AND-DELETE, :OVERWRITE, :APPEND, :SUPERSEDE, or NIL.
+IF-DOES-NOT-EXIST is  :ERROR, :CREATE, or NIL.
+</p>
+<p>If FILENAME begins with a vertical pipe sign: &rsquo;|&rsquo;  then the resulting
+stream is actually a one way pipe.   It will be open for reading
+or writing depending on the direction given.   The rest
+of FILENAME in this case is passed to the /bin/sh command.   See
+the posix description of popen for more details.
+</p><div class="example">
+<pre class="example-preformatted">(setq pipe (open &quot;| wc &lt; /tmp/jim&quot;))
+(format t &quot;File has ~%d lines&quot; (read pipe))
+(close pipe)
+</pre></div>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aPRINT_002dBASE_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*PRINT-BASE*</strong><a class="copiable-link" href="#index-_002aPRINT_002dBASE_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The radix in which the GCL printer prints integers and rationals.
+The value must be an integer from 2 to 36, inclusive.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dSTRING_002dINPUT_002dSTREAM"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-STRING-INPUT-STREAM</strong> <var class="def-var-arguments">(string &amp;optional (start 0) (end (length string)))</var><a class="copiable-link" href="#index-MAKE_002dSTRING_002dINPUT_002dSTREAM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns an input stream which will supply the characters of String between
+Start and End in order.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PPRINT"><span class="category-def">Function: </span><span><strong class="def-name">PPRINT</strong> <var class="def-var-arguments">(object &amp;optional (stream *standard-output*))</var><a class="copiable-link" href="#index-PPRINT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Pretty-prints OBJECT.  Returns OBJECT.  Equivalent to
+	(WRITE :STREAM STREAM :PRETTY T)
+The SI:PRETTY-PRINT-FORMAT property N (which must be a non-negative integer)
+of a symbol SYMBOL controls the pretty-printing of form
+	(SYMBOL f1 ... fN fN+1 ... fM)
+in such a way that the subforms fN+1, ..., fM are regarded as the &rsquo;body&rsquo; of
+the entire form.  For instance, the property value of 2 is initially given
+to the symbol DO.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aREAD_002dDEFAULT_002dFLOAT_002dFORMAT_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*READ-DEFAULT-FLOAT-FORMAT*</strong><a class="copiable-link" href="#index-_002aREAD_002dDEFAULT_002dFLOAT_002dFORMAT_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The floating-point format the GCL reader uses when reading floating-point
+numbers that have no exponent marker or have e or E for an exponent marker.
+Must be one of SHORT-FLOAT, SINGLE-FLOAT, DOUBLE-FLOAT, and LONG-FLOAT.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-READ_002dPRESERVING_002dWHITESPACE"><span class="category-def">Function: </span><span><strong class="def-name">READ-PRESERVING-WHITESPACE</strong> <var class="def-var-arguments">(&amp;optional (stream *standard-input*) (eof-error-p t) (eof-value nil) (recursive-p nil))</var><a class="copiable-link" href="#index-READ_002dPRESERVING_002dWHITESPACE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Reads an object from STREAM, preserving the whitespace that followed the
+object.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STREAMP"><span class="category-def">Function: </span><span><strong class="def-name">STREAMP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-STREAMP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a stream object; NIL otherwise.
+</p>
+
+</dd></dl>
+
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SET_002dDISPATCH_002dMACRO_002dCHARACTER"><span class="category-def">Function: </span><span><strong class="def-name">SET-DISPATCH-MACRO-CHARACTER</strong> <var class="def-var-arguments">(disp-char sub-char function &amp;optional (readtable *readtable*))</var><a class="copiable-link" href="#index-SET_002dDISPATCH_002dMACRO_002dCHARACTER"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Causes FUNCTION to be called when the DISP-CHAR followed by SUB-CHAR is
+read.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-WITH_002dOUTPUT_002dTO_002dSTRING"><span class="category-def">Macro: </span><span><strong class="def-name">WITH-OUTPUT-TO-STRING</strong><a class="copiable-link" href="#index-WITH_002dOUTPUT_002dTO_002dSTRING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(with-output-to-string (var [string]) {decl}* {form}*)
+</pre></div>
+
+<p>Binds VAR to a string output stream that puts characters into STRING, which
+defaults to a new string.  The stream is automatically closed on exit and
+the string is returned.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FILE_002dLENGTH"><span class="category-def">Function: </span><span><strong class="def-name">FILE-LENGTH</strong> <var class="def-var-arguments">(file-stream)</var><a class="copiable-link" href="#index-FILE_002dLENGTH"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the length of the specified file stream.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aPRINT_002dCASE_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*PRINT-CASE*</strong><a class="copiable-link" href="#index-_002aPRINT_002dCASE_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The case in which the GCL printer should print ordinary symbols.
+The value must be one of the keywords :UPCASE, :DOWNCASE, and :CAPITALIZE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PRINT"><span class="category-def">Function: </span><span><strong class="def-name">PRINT</strong> <var class="def-var-arguments">(object &amp;optional (stream *standard-output*))</var><a class="copiable-link" href="#index-PRINT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Outputs a newline character, and then prints OBJECT in the mostly readable
+representation.  Returns OBJECT.  Equivalent to
+	(PROGN (TERPRI STREAM) (WRITE OBJECT :STREAM STREAM :ESCAPE T)).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SET_002dMACRO_002dCHARACTER"><span class="category-def">Function: </span><span><strong class="def-name">SET-MACRO-CHARACTER</strong> <var class="def-var-arguments">(char function &amp;optional (non-terminating-p nil) (readtable *readtable*))</var><a class="copiable-link" href="#index-SET_002dMACRO_002dCHARACTER"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Causes CHAR to be a macro character that, when seen by READ, causes FUNCTION
+to be called.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FORCE_002dOUTPUT"><span class="category-def">Function: </span><span><strong class="def-name">FORCE-OUTPUT</strong> <var class="def-var-arguments">(&amp;optional (stream *standard-output*))</var><a class="copiable-link" href="#index-FORCE_002dOUTPUT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Attempts to force any buffered output to be sent.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aPRINT_002dARRAY_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*PRINT-ARRAY*</strong><a class="copiable-link" href="#index-_002aPRINT_002dARRAY_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Whether the GCL printer should print array elements.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STREAM_002dELEMENT_002dTYPE"><span class="category-def">Function: </span><span><strong class="def-name">STREAM-ELEMENT-TYPE</strong> <var class="def-var-arguments">(stream)</var><a class="copiable-link" href="#index-STREAM_002dELEMENT_002dTYPE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a type specifier for the kind of object returned by STREAM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-WRITE_002dBYTE"><span class="category-def">Function: </span><span><strong class="def-name">WRITE-BYTE</strong> <var class="def-var-arguments">(integer stream)</var><a class="copiable-link" href="#index-WRITE_002dBYTE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Outputs INTEGER to the binary stream STREAM.  Returns INTEGER.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dCONCATENATED_002dSTREAM"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-CONCATENATED-STREAM</strong> <var class="def-var-arguments">(&amp;rest streams)</var><a class="copiable-link" href="#index-MAKE_002dCONCATENATED_002dSTREAM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a stream which takes its input from each of the STREAMs in turn,
+going on to the next at end of stream.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PRIN1"><span class="category-def">Function: </span><span><strong class="def-name">PRIN1</strong> <var class="def-var-arguments">(object &amp;optional (stream *standard-output*))</var><a class="copiable-link" href="#index-PRIN1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Prints OBJECT in the mostly readable representation.  Returns OBJECT.
+Equivalent to (WRITE OBJECT :STREAM STREAM :ESCAPE T).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PRINC"><span class="category-def">Function: </span><span><strong class="def-name">PRINC</strong> <var class="def-var-arguments">(object &amp;optional (stream *standard-output*))</var><a class="copiable-link" href="#index-PRINC"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Prints OBJECT without escape characters.  Returns OBJECT.  Equivalent to
+	(WRITE OBJECT :STREAM STREAM :ESCAPE NIL).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CLEAR_002dOUTPUT"><span class="category-def">Function: </span><span><strong class="def-name">CLEAR-OUTPUT</strong> <var class="def-var-arguments">(&amp;optional (stream *standard-output*))</var><a class="copiable-link" href="#index-CLEAR_002dOUTPUT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Clears the output stream STREAM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-TERPRI"><span class="category-def">Function: </span><span><strong class="def-name">TERPRI</strong> <var class="def-var-arguments">(&amp;optional (stream *standard-output*))</var><a class="copiable-link" href="#index-TERPRI"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Outputs a newline character.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FINISH_002dOUTPUT"><span class="category-def">Function: </span><span><strong class="def-name">FINISH-OUTPUT</strong> <var class="def-var-arguments">(&amp;optional (stream *standard-output*))</var><a class="copiable-link" href="#index-FINISH_002dOUTPUT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Attempts to ensure that all output sent to STREAM has reached its destination,
+and only then returns.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-WITH_002dOPEN_002dFILE"><span class="category-def">Macro: </span><span><strong class="def-name">WITH-OPEN-FILE</strong><a class="copiable-link" href="#index-WITH_002dOPEN_002dFILE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(with-open-file (stream filename {options}*) {decl}* {form}*)
+</pre></div>
+
+<p>Opens the file whose name is FILENAME, using OPTIONs, and binds the variable
+STREAM to a stream to/from the file.  Then evaluates FORMs as a PROGN.
+The file is automatically closed on exit.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DO"><span class="category-def">Special Form: </span><span><strong class="def-name">DO</strong><a class="copiable-link" href="#index-DO"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(do ({(var [init [step]])}*) (endtest {result}*)
+          {decl}* {tag | statement}*)
+</pre></div>
+
+<p>Creates a NIL block, binds each VAR to the value of the corresponding INIT,
+and then executes STATEMENTs repeatedly until ENDTEST is satisfied.  After
+each iteration, assigns to each VAR the value of the corresponding STEP.  When
+ENDTEST is satisfied, evaluates RESULTs as a PROGN and returns the value(s) of
+the last RESULT (or NIL if no RESULTs are supplied).  Performs variable
+bindings and assignments all at once, just like LET and PSETQ do.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-READ_002dFROM_002dSTRING"><span class="category-def">Function: </span><span><strong class="def-name">READ-FROM-STRING</strong> <var class="def-var-arguments">(string &amp;optional (eof-error-p t) (eof-value nil) &amp;key (start 0) (end (length string)) (preserve-whitespace nil))</var><a class="copiable-link" href="#index-READ_002dFROM_002dSTRING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Reads an object from STRING.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-WRITE_002dSTRING"><span class="category-def">Function: </span><span><strong class="def-name">WRITE-STRING</strong> <var class="def-var-arguments">(string &amp;optional (stream *standard-output*) &amp;key (start 0) (end (length string)))</var><a class="copiable-link" href="#index-WRITE_002dSTRING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Outputs STRING and returns it.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aPRINT_002dLEVEL_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*PRINT-LEVEL*</strong><a class="copiable-link" href="#index-_002aPRINT_002dLEVEL_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+How many levels deep the GCL printer should print.  Unlimited if NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aPRINT_002dRADIX_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*PRINT-RADIX*</strong><a class="copiable-link" href="#index-_002aPRINT_002dRADIX_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Whether the GCL printer should print the radix indicator when printing
+integers and rationals.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-Y_002dOR_002dN_002dP"><span class="category-def">Function: </span><span><strong class="def-name">Y-OR-N-P</strong> <var class="def-var-arguments">(&amp;optional (format-string nil) &amp;rest args)</var><a class="copiable-link" href="#index-Y_002dOR_002dN_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Asks the user a question whose answer is either &rsquo;Y&rsquo; or &rsquo;N&rsquo;.  If FORMAT-STRING
+is non-NIL, then FRESH-LINE operation is performed, a message is printed as
+if FORMAT-STRING and ARGs were given to FORMAT, and then a prompt
+&quot;(Y or N)&quot; is printed.  Otherwise, no prompt will appear.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dBROADCAST_002dSTREAM"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-BROADCAST-STREAM</strong> <var class="def-var-arguments">(&amp;rest streams)</var><a class="copiable-link" href="#index-MAKE_002dBROADCAST_002dSTREAM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns an output stream which sends its output to all of the given streams.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-READ_002dCHAR"><span class="category-def">Function: </span><span><strong class="def-name">READ-CHAR</strong> <var class="def-var-arguments">(&amp;optional (stream *standard-input*) (eof-error-p t) (eof-value nil) (recursive-p nil))</var><a class="copiable-link" href="#index-READ_002dCHAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Reads a character from STREAM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PEEK_002dCHAR"><span class="category-def">Function: </span><span><strong class="def-name">PEEK-CHAR</strong> <var class="def-var-arguments">(&amp;optional (peek-type nil) (stream *standard-input*) (eof-error-p t) (eof-value nil) (recursive-p nil))</var><a class="copiable-link" href="#index-PEEK_002dCHAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Peeks at the next character in the input stream STREAM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-OUTPUT_002dSTREAM_002dP"><span class="category-def">Function: </span><span><strong class="def-name">OUTPUT-STREAM-P</strong> <var class="def-var-arguments">(stream)</var><a class="copiable-link" href="#index-OUTPUT_002dSTREAM_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns non-nil if STREAM can handle output operations; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aQUERY_002dIO_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*QUERY-IO*</strong><a class="copiable-link" href="#index-_002aQUERY_002dIO_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The query I/O stream.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aREAD_002dBASE_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*READ-BASE*</strong><a class="copiable-link" href="#index-_002aREAD_002dBASE_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The radix that the GCL reader reads numbers in.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-WITH_002dOPEN_002dSTREAM"><span class="category-def">Macro: </span><span><strong class="def-name">WITH-OPEN-STREAM</strong><a class="copiable-link" href="#index-WITH_002dOPEN_002dSTREAM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(with-open-stream (var stream) {decl}* {form}*)
+</pre></div>
+
+<p>Evaluates FORMs as a PROGN with VAR bound to the value of STREAM.  The stream
+is automatically closed on exit.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-WITH_002dINPUT_002dFROM_002dSTRING"><span class="category-def">Macro: </span><span><strong class="def-name">WITH-INPUT-FROM-STRING</strong><a class="copiable-link" href="#index-WITH_002dINPUT_002dFROM_002dSTRING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(with-input-from-string (var string {keyword value}*) {decl}*
+{form}*)
+</pre></div>
+
+<p>Binds VAR to an input stream that returns characters from STRING and evaluates
+the FORMs.  The stream is automatically closed on exit.  Allowed keywords are
+:INDEX, :START, and :END.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CLEAR_002dINPUT"><span class="category-def">Function: </span><span><strong class="def-name">CLEAR-INPUT</strong> <var class="def-var-arguments">(&amp;optional (stream *standard-input*))</var><a class="copiable-link" href="#index-CLEAR_002dINPUT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+ Clears the input
+stream STREAM.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aTERMINAL_002dIO_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*TERMINAL-IO*</strong><a class="copiable-link" href="#index-_002aTERMINAL_002dIO_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The terminal I/O stream.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LISTEN"><span class="category-def">Function: </span><span><strong class="def-name">LISTEN</strong> <var class="def-var-arguments">(&amp;optional (stream *standard-input*))</var><a class="copiable-link" href="#index-LISTEN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if a character is available on STREAM; NIL otherwise.  This function
+does not correctly work in some versions of GCL because of the lack of such
+mechanism in the underlying operating system.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dPATHNAME"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-PATHNAME</strong> <var class="def-var-arguments">(&amp;key (defaults (parse-namestring &quot;&quot; (pathname-host *default-pathname-defaults*))) (host (pathname-host defaults)) (device (pathname-device defaults)) (directory (pathname-directory defaults)) (name (pathname-name defaults)) (type (pathname-type defaults)) (version (pathname-version defaults)))</var><a class="copiable-link" href="#index-MAKE_002dPATHNAME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Create a pathname from HOST, DEVICE, DIRECTORY, NAME, TYPE and VERSION.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PATHNAME_002dTYPE"><span class="category-def">Function: </span><span><strong class="def-name">PATHNAME-TYPE</strong> <var class="def-var-arguments">(pathname)</var><a class="copiable-link" href="#index-PATHNAME_002dTYPE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the type slot of PATHNAME.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aPRINT_002dGENSYM_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*PRINT-GENSYM*</strong><a class="copiable-link" href="#index-_002aPRINT_002dGENSYM_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Whether the GCL printer should prefix symbols with no home package
+with &quot;#:&quot;.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-READ_002dLINE"><span class="category-def">Function: </span><span><strong class="def-name">READ-LINE</strong> <var class="def-var-arguments">(&amp;optional (stream *standard-input*) (eof-error-p t) (eof-value nil) (recursive-p nil))</var><a class="copiable-link" href="#index-READ_002dLINE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a line of text read from STREAM as a string, discarding the newline
+character.
+</p>
+<p>Note that when using line at a time input under unix,
+input forms will always be followed by a #\newline.   Thus if you
+do
+</p>
+<p>&gt;(read-line)
+&quot;&quot;
+nil
+</p>
+<p>the empty string will be returned.  After lisp reads the (read-line)
+it then invokes (read-line).  This happens before it does anything
+else and so happens before the newline character immediately following
+(read-line) has been read.  Thus read-line immediately encounters a
+#\newline and so returns the empty string.  If there had been other
+characters before the #\newline it would have been different:
+</p>
+<p>&gt;(read-line) how are you
+&quot; how are you&quot;
+nil
+</p>
+<p>If you want to throw away &quot;&quot; input, you can do that with
+the following:
+</p>
+<p>(sloop::sloop while (equal (setq input (read-line)) &quot;&quot;))
+</p>
+<p>You may also want to use character at a time input, but that
+makes input editing harder.
+nicolas% stty cbreak
+nicolas% gcl
+GCL (GNU Common Lisp)  Version(1.1.2) Mon Jan  9 12:58:22 MET 1995
+Licensed under GNU Public Library License
+Contains Enhancements by W. Schelter
+</p>
+<p>&gt;(let ((ifilename nil))
+    (format t &quot;~%Input file name: &quot;)
+    (setq ifilename (read-line)))
+Input file name: /tmp/myfile
+&quot;/tmp/myfile&quot;
+</p>
+<p>&gt;(bye)Bye.
+</p>
+
+
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-WRITE_002dTO_002dSTRING"><span class="category-def">Function: </span><span><strong class="def-name">WRITE-TO-STRING</strong> <var class="def-var-arguments">(object &amp;key (escape *print-escape*) (radix *print-radix*) (base *print-base*) (circle *print-circle*) (pretty *print-pretty*) (level *print-level*) (length *print-length*) (case *print-case*) (array *print-array*) (gensym *print-gensym*))</var><a class="copiable-link" href="#index-WRITE_002dTO_002dSTRING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns as a string the printed representation of OBJECT in the specified
+mode.  See the variable docs of *PRINT-...* for the mode.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PATHNAMEP"><span class="category-def">Function: </span><span><strong class="def-name">PATHNAMEP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-PATHNAMEP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a pathname object; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-READTABLEP"><span class="category-def">Function: </span><span><strong class="def-name">READTABLEP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-READTABLEP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a readtable object; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-READ"><span class="category-def">Function: </span><span><strong class="def-name">READ</strong> <var class="def-var-arguments">(&amp;optional (stream *standard-input*) (eof-error-p t) (eof-value nil) (recursivep nil))</var><a class="copiable-link" href="#index-READ"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Reads in the next object from STREAM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NAMESTRING"><span class="category-def">Function: </span><span><strong class="def-name">NAMESTRING</strong> <var class="def-var-arguments">(pathname)</var><a class="copiable-link" href="#index-NAMESTRING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the full form of PATHNAME as a string.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-UNREAD_002dCHAR"><span class="category-def">Function: </span><span><strong class="def-name">UNREAD-CHAR</strong> <var class="def-var-arguments">(character &amp;optional (stream *standard-input*))</var><a class="copiable-link" href="#index-UNREAD_002dCHAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Puts CHARACTER back on the front of the input stream STREAM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CLOSE"><span class="category-def">Function: </span><span><strong class="def-name">CLOSE</strong> <var class="def-var-arguments">(stream &amp;key (abort nil))</var><a class="copiable-link" href="#index-CLOSE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Closes STREAM.  A non-NIL value of :ABORT indicates an abnormal termination.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aPRINT_002dLENGTH_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*PRINT-LENGTH*</strong><a class="copiable-link" href="#index-_002aPRINT_002dLENGTH_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+How many elements the GCL printer should print at each level of nested data
+object.  Unlimited if NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SET_002dSYNTAX_002dFROM_002dCHAR"><span class="category-def">Function: </span><span><strong class="def-name">SET-SYNTAX-FROM-CHAR</strong> <var class="def-var-arguments">(to-char from-char &amp;optional (to-readtable *readtable*) (from-readtable nil))</var><a class="copiable-link" href="#index-SET_002dSYNTAX_002dFROM_002dCHAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Makes the syntax of TO-CHAR in TO-READTABLE be the same as the syntax of
+FROM-CHAR in FROM-READTABLE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-INPUT_002dSTREAM_002dP"><span class="category-def">Function: </span><span><strong class="def-name">INPUT-STREAM-P</strong> <var class="def-var-arguments">(stream)</var><a class="copiable-link" href="#index-INPUT_002dSTREAM_002dP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns non-NIL if STREAM can handle input operations; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PATHNAME"><span class="category-def">Function: </span><span><strong class="def-name">PATHNAME</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-PATHNAME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Turns X into a pathname.  X may be a string, symbol, stream, or pathname.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FILE_002dNAMESTRING"><span class="category-def">Function: </span><span><strong class="def-name">FILE-NAMESTRING</strong> <var class="def-var-arguments">(pathname)</var><a class="copiable-link" href="#index-FILE_002dNAMESTRING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the written representation of PATHNAME as a string.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dDISPATCH_002dMACRO_002dCHARACTER"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-DISPATCH-MACRO-CHARACTER</strong> <var class="def-var-arguments">(char &amp;optional (non-terminating-p nil) (readtable *readtable*))</var><a class="copiable-link" href="#index-MAKE_002dDISPATCH_002dMACRO_002dCHARACTER"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Causes the character CHAR to be a dispatching macro character in READTABLE.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aSTANDARD_002dOUTPUT_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*STANDARD-OUTPUT*</strong><a class="copiable-link" href="#index-_002aSTANDARD_002dOUTPUT_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The default output stream used by the GCL printer.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dTWO_002dWAY_002dSTREAM"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-TWO-WAY-STREAM</strong> <var class="def-var-arguments">(input-stream output-stream)</var><a class="copiable-link" href="#index-MAKE_002dTWO_002dWAY_002dSTREAM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a bidirectional stream which gets its input from INPUT-STREAM and
+sends its output to OUTPUT-STREAM.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aPRINT_002dESCAPE_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*PRINT-ESCAPE*</strong><a class="copiable-link" href="#index-_002aPRINT_002dESCAPE_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Whether the GCL printer should put escape characters whenever appropriate.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COPY_002dREADTABLE"><span class="category-def">Function: </span><span><strong class="def-name">COPY-READTABLE</strong> <var class="def-var-arguments">(&amp;optional (from-readtable *readtable*) (to-readtable nil))</var><a class="copiable-link" href="#index-COPY_002dREADTABLE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a copy of the readtable FROM-READTABLE.  If TO-READTABLE is non-NIL,
+then copies into TO-READTABLE.  Otherwise, creates a new readtable.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DIRECTORY_002dNAMESTRING"><span class="category-def">Function: </span><span><strong class="def-name">DIRECTORY-NAMESTRING</strong> <var class="def-var-arguments">(pathname)</var><a class="copiable-link" href="#index-DIRECTORY_002dNAMESTRING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the directory part of PATHNAME as a string.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-TRUENAME"><span class="category-def">Function: </span><span><strong class="def-name">TRUENAME</strong> <var class="def-var-arguments">(pathname)</var><a class="copiable-link" href="#index-TRUENAME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the pathname for the actual file described by PATHNAME.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aREAD_002dSUPPRESS_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*READ-SUPPRESS*</strong><a class="copiable-link" href="#index-_002aREAD_002dSUPPRESS_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+When the value of this variable is NIL, the GCL reader operates normally.
+When it is non-NIL, then the reader parses input characters but much of what
+is read is not interpreted.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GET_002dDISPATCH_002dMACRO_002dCHARACTER"><span class="category-def">Function: </span><span><strong class="def-name">GET-DISPATCH-MACRO-CHARACTER</strong> <var class="def-var-arguments">(disp-char sub-char &amp;optional (readtable *readtable*))</var><a class="copiable-link" href="#index-GET_002dDISPATCH_002dMACRO_002dCHARACTER"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the macro-character function for SUB-CHAR under DISP-CHAR.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PATHNAME_002dDEVICE"><span class="category-def">Function: </span><span><strong class="def-name">PATHNAME-DEVICE</strong> <var class="def-var-arguments">(pathname)</var><a class="copiable-link" href="#index-PATHNAME_002dDEVICE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the device slot of PATHNAME.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-READ_002dCHAR_002dNO_002dHANG"><span class="category-def">Function: </span><span><strong class="def-name">READ-CHAR-NO-HANG</strong> <var class="def-var-arguments">(&amp;optional (stream *standard-input*) (eof-error-p t) (eof-value nil) (recursive-p nil))</var><a class="copiable-link" href="#index-READ_002dCHAR_002dNO_002dHANG"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the next character from STREAM if one is available; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FRESH_002dLINE"><span class="category-def">Function: </span><span><strong class="def-name">FRESH-LINE</strong> <var class="def-var-arguments">(&amp;optional (stream *standard-output*))</var><a class="copiable-link" href="#index-FRESH_002dLINE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Outputs a newline if it is not positioned at the beginning of a line.  Returns
+T if it output a newline; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-WRITE_002dCHAR"><span class="category-def">Function: </span><span><strong class="def-name">WRITE-CHAR</strong> <var class="def-var-arguments">(char &amp;optional (stream *standard-output*))</var><a class="copiable-link" href="#index-WRITE_002dCHAR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Outputs CHAR and returns it.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PARSE_002dNAMESTRING"><span class="category-def">Function: </span><span><strong class="def-name">PARSE-NAMESTRING</strong> <var class="def-var-arguments">(thing &amp;optional host (defaults *default-pathname-defaults*) &amp;key (start 0) (end (length thing)) (junk-allowed nil))</var><a class="copiable-link" href="#index-PARSE_002dNAMESTRING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Parses a string representation of a pathname into a pathname.  HOST
+is ignored.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PATHNAME_002dDIRECTORY"><span class="category-def">Function: </span><span><strong class="def-name">PATHNAME-DIRECTORY</strong> <var class="def-var-arguments">(pathname)</var><a class="copiable-link" href="#index-PATHNAME_002dDIRECTORY"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the directory slot of PATHNAME.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GET_002dMACRO_002dCHARACTER"><span class="category-def">Function: </span><span><strong class="def-name">GET-MACRO-CHARACTER</strong> <var class="def-var-arguments">(char &amp;optional (readtable *readtable*))</var><a class="copiable-link" href="#index-GET_002dMACRO_002dCHARACTER"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the function associated with CHAR and, as a second value, returns
+the non-terminating-p flag.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FORMAT"><span class="category-def">Function: </span><span><strong class="def-name">FORMAT</strong> <var class="def-var-arguments">(destination control-string &amp;rest arguments)</var><a class="copiable-link" href="#index-FORMAT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Provides various facilities for formatting output.
+DESTINATION controls where the result will go.  If DESTINATION is T, then
+the output is sent to the standard output stream.  If it is NIL, then the
+output is returned in a string as the value of the call.  Otherwise,
+DESTINATION must be a stream to which the output will be sent.
+</p>
+<p>CONTROL-STRING is a string to be output, possibly with embedded
+formatting directives, which are flagged with the escape character
+&quot;~&quot;.  Directives generally expand into additional text to be output,
+usually consuming one or more of ARGUMENTs in the process.
+</p>
+
+
+<p>A few useful directives are:
+</p><div class="example">
+<pre class="example-preformatted">
+
+~A, ~nA, ~n@A	Prints one argument as if by PRINC
+~S, ~nS, ~n@S	Prints one argument as if by PRIN1
+~D, ~B, ~O, ~X	Prints one integer in decimal, binary, octal, and hexa
+~%		Does TERPRI
+~&amp;		Does FRESH-LINE
+</pre></div>
+
+<p>where n is the minimal width of the field in which the object is printed.
+~nA and ~nS put padding spaces on the right; ~n@A and ~n@S put on the left.
+</p>
+<div class="example">
+<pre class="example-preformatted">~R  is for printing numbers in various formats.
+
+  ~nR   prints arg in radix n.
+  ~R    prints arg as a cardinal english number: two
+  ~:R   prints arg as an ordinal english number: third
+  ~@R   prints arg as an a Roman Numeral: VII
+  ~:@R   prints arg as an old Roman Numeral: IIII
+
+~C prints a character.
+  ~:C represents non printing characters by their pretty names,eg Space
+  ~@C uses the #\ syntax to allow the reader to read it.
+
+~F prints a floating point number arg.
+  The full form is ~w,d,k,overflowchar,padcharF
+  w represents the total width of the printed representation (variable if
+    not present)
+  d the number of fractional digits to display
+    (format nil &quot;~,2f&quot; 10010.0314) --&gt; &quot;10010.03&quot;
+  k arg is multiplied by 10^k before printing it as a decimal number.
+  overflowchar width w characters copies of the overflow character will
+    be printed.   eg(format t &quot;X&gt;~5,2,,'?F&lt;X&quot; 100.034) --&gt; X&gt;?????&lt;X
+  padchar is the character to pad with
+    (format t &quot;X&gt;~10,2,1,'?,'bF&lt;X&quot; 100.03417) --&gt;X&gt;bbb1000.34&lt;X
+  @ makes + sign print if the arg is positive
+
+~@[print-if-true~]
+</pre></div>
+<p>if arg is not nil, then it is retained as an arg for further printing,
+   otherwise it is used up
+</p>
+<div class="example">
+<pre class="example-preformatted">   (format nil &quot;~@[x = ~d~]~a&quot; nil 'bil) --&gt; &quot;BIL&quot;
+   (format nil &quot;~@[x = ~d ~]~a&quot; 8) --&gt; &quot;x = 8 BIL&quot;
+</pre></div>
+
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PATHNAME_002dNAME"><span class="category-def">Function: </span><span><strong class="def-name">PATHNAME-NAME</strong> <var class="def-var-arguments">(pathname)</var><a class="copiable-link" href="#index-PATHNAME_002dNAME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the name slot of PATHNAME.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dSTRING_002dOUTPUT_002dSTREAM"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-STRING-OUTPUT-STREAM</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-MAKE_002dSTRING_002dOUTPUT_002dSTREAM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns an output stream which will accumulate all output given it for
+the benefit of the function GET-OUTPUT-STREAM-STRING.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dSYNONYM_002dSTREAM"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-SYNONYM-STREAM</strong> <var class="def-var-arguments">(symbol)</var><a class="copiable-link" href="#index-MAKE_002dSYNONYM_002dSTREAM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a stream which performs its operations on the stream which is the
+value of the dynamic variable named by SYMBOL.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aLOAD_002dVERBOSE_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*LOAD-VERBOSE*</strong><a class="copiable-link" href="#index-_002aLOAD_002dVERBOSE_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The default for the VERBOSE argument to LOAD.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aPRINT_002dCIRCLE_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*PRINT-CIRCLE*</strong><a class="copiable-link" href="#index-_002aPRINT_002dCIRCLE_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Whether the GCL printer should take care of circular lists.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aPRINT_002dPRETTY_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*PRINT-PRETTY*</strong><a class="copiable-link" href="#index-_002aPRINT_002dPRETTY_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Whether the GCL printer should pretty-print.  See the function doc of PPRINT
+for more information about pretty-printing.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FILE_002dWRITE_002dDATE"><span class="category-def">Function: </span><span><strong class="def-name">FILE-WRITE-DATE</strong> <var class="def-var-arguments">(file)</var><a class="copiable-link" href="#index-FILE_002dWRITE_002dDATE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the time at which the specified file is written, as an integer in
+universal time format.  FILE may be a string or a stream.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PRIN1_002dTO_002dSTRING"><span class="category-def">Function: </span><span><strong class="def-name">PRIN1-TO-STRING</strong> <var class="def-var-arguments">(object)</var><a class="copiable-link" href="#index-PRIN1_002dTO_002dSTRING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns as a string the printed representation of OBJECT in the mostly
+readable representation.
+Equivalent to (WRITE-TO-STRING OBJECT :ESCAPE T).
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MERGE_002dPATHNAMES"><span class="category-def">Function: </span><span><strong class="def-name">MERGE-PATHNAMES</strong> <var class="def-var-arguments">(pathname &amp;optional (defaults *default-pathname-defaults*) default-version)</var><a class="copiable-link" href="#index-MERGE_002dPATHNAMES"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Fills in unspecified slots of PATHNAME from DEFAULTS.  DEFAULT-VERSION
+is ignored in GCL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-READ_002dBYTE"><span class="category-def">Function: </span><span><strong class="def-name">READ-BYTE</strong> <var class="def-var-arguments">(stream &amp;optional (eof-error-p t) (eof-value nil))</var><a class="copiable-link" href="#index-READ_002dBYTE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Reads the next byte from STREAM.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PRINC_002dTO_002dSTRING"><span class="category-def">Function: </span><span><strong class="def-name">PRINC-TO-STRING</strong> <var class="def-var-arguments">(object)</var><a class="copiable-link" href="#index-PRINC_002dTO_002dSTRING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns as a string the printed representation of OBJECT without escape
+characters.  Equivalent to
+	(WRITE-TO-STRING OBJECT :ESCAPE NIL).
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aSTANDARD_002dINPUT_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*STANDARD-INPUT*</strong><a class="copiable-link" href="#index-_002aSTANDARD_002dINPUT_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The default input stream used by the GCL reader.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PROBE_002dFILE"><span class="category-def">Function: </span><span><strong class="def-name">PROBE-FILE</strong> <var class="def-var-arguments">(file)</var><a class="copiable-link" href="#index-PROBE_002dFILE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the truename of file if the file exists.
+Returns NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PATHNAME_002dVERSION"><span class="category-def">Function: </span><span><strong class="def-name">PATHNAME-VERSION</strong> <var class="def-var-arguments">(pathname)</var><a class="copiable-link" href="#index-PATHNAME_002dVERSION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the version slot of PATHNAME.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-WRITE_002dLINE"><span class="category-def">Function: </span><span><strong class="def-name">WRITE-LINE</strong> <var class="def-var-arguments">(string &amp;optional (stream *standard-output*) &amp;key (start 0) (end (length string)))</var><a class="copiable-link" href="#index-WRITE_002dLINE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Outputs STRING and then outputs a newline character.  Returns STRING.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-WRITE"><span class="category-def">Function: </span><span><strong class="def-name">WRITE</strong> <var class="def-var-arguments">(object &amp;key (stream *standard-output*) (escape *print-escape*) (radix *print-radix*) (base *print-base*) (circle *print-circle*) (pretty *print-pretty*) (level *print-level*) (length *print-length*) (case *print-case*) (array *print-array*) (gensym *print-gensym*))</var><a class="copiable-link" href="#index-WRITE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Prints OBJECT in the specified mode.  See the variable docs of *PRINT-...*
+for the mode.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GET_002dOUTPUT_002dSTREAM_002dSTRING"><span class="category-def">Function: </span><span><strong class="def-name">GET-OUTPUT-STREAM-STRING</strong> <var class="def-var-arguments">(stream)</var><a class="copiable-link" href="#index-GET_002dOUTPUT_002dSTREAM_002dSTRING"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a string of all the characters sent to STREAM made by
+MAKE-STRING-OUTPUT-STREAM since the last call to this function.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-READ_002dDELIMITED_002dLIST"><span class="category-def">Function: </span><span><strong class="def-name">READ-DELIMITED-LIST</strong> <var class="def-var-arguments">(char &amp;optional (stream *standard-input*) (recursive-p nil))</var><a class="copiable-link" href="#index-READ_002dDELIMITED_002dLIST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Reads objects from STREAM until the next character after an object&rsquo;s
+representation is CHAR.  Returns a list of the objects read.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-READLINE_002dON"><span class="category-def">Function: </span><span><strong class="def-name">READLINE-ON</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-READLINE_002dON"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Begins readline command editing mode when possible.  In addition to
+the basic readline editing features, command word completion is
+implemented according to the following scheme:
+</p>
+<p>[[pkg]:[:]]txt
+</p>
+<p>pkg &ndash; an optional package specifier.  Defaults to the current
+package.  The symbols in this package and those in the packages in
+this package&rsquo;s use list will be searched.
+</p>
+<p>:[:] &ndash; an optional internal/external specifier.  Defaults to
+external.  The keyword package is denoted by a single colon at the
+beginning of the token.  Only symbols of this type will be searched
+for completion.
+</p>
+<p>txt &ndash; a string.  Symbol names beginning with this string are
+completed.  The comparison is case insensitive.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-READLINE_002dOFF"><span class="category-def">Function: </span><span><strong class="def-name">READLINE-OFF</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-READLINE_002dOFF"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Disables readline command editing mode.
+</p>
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aREADLINE_002dPREFIX_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*READLINE-PREFIX*</strong><a class="copiable-link" href="#index-_002aREADLINE_002dPREFIX_002a"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>A string implicitly prepended to input text for use in readline
+command completion.  If this string contains one or more colons, it is
+used to specify the default package and internal/external setting for
+searched symbols in the case that the supplied text itself contains no
+explicit package specification.  If this string contains characters
+after the colon(s), or contains no colons at all, it is treated as a
+symbol name prefix.  In this case, the prefix is matched first, then
+the supplied text, and the completion returned is relative to the
+supplied text itself, i.e. contains no prefix.  For example, the
+setting &ldquo;maxima::$&rdquo; will complete input text &ldquo;int&rdquo; according to
+the internal symbols in the maxima package of the form
+&ldquo;maxima::$int...&rdquo;, and return suggestions to the user of the form
+&ldquo;int...&rdquo;.
+</p>
+</dd></dl>
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Special-Forms-and-Functions.html">Special Forms and Functions</a>, Previous: <a href="Lists.html">Lists</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Structures.html
@@ -0,0 +1,90 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Structures (GCL SI Manual)</title>
+
+<meta name="description" content="Structures (GCL SI Manual)">
+<meta name="keywords" content="Structures (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Iteration-and-Tests.html" rel="next" title="Iteration and Tests">
+<link href="Operating-System.html" rel="prev" title="Operating System">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Structures">
+<div class="nav-panel">
+<p>
+Next: <a href="Iteration-and-Tests.html" accesskey="n" rel="next">Iteration and Tests</a>, Previous: <a href="Operating-System.html" accesskey="p" rel="prev">Operating System</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Structures-1"><span>10 Structures<a class="copiable-link" href="#Structures-1"> &para;</a></span></h2>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DEFSTRUCT"><span class="category-def">Macro: </span><span><strong class="def-name">DEFSTRUCT</strong><a class="copiable-link" href="#index-DEFSTRUCT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(defstruct
+         {name | (name {:conc-name | (:conc-name prefix-string) |
+                        :constructor | (:constructor symbol [lambda-list]) |
+                        :copier | (:copier symbol) |
+                        :predicate | (:predicate symbol) | 
+                        (:include symbol) |
+                        (:print-function function) |
+                        (:type {vector | (vector type) | list}) |
+                        :named | (:static { nil | t})
+                        (:initial-offset number)}*)}
+         [doc]
+         {slot-name |
+          (slot-name [default-value-form] {:type type | :read-only flag}*) }*
+         )
+</pre></div>
+
+<p>Defines a structure.  The doc-string DOC, if supplied, is saved as a STRUCTURE
+doc and can be retrieved by (documentation &rsquo;NAME &rsquo;structure).
+STATIC is gcl specific and makes the body non relocatable.
+</p>
+<p>See the files misc/rusage.lsp misc/cstruct.lsp, for examples of making
+a lisp structure correspond to a C structure.
+</p>
+
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-HELP"><span class="category-def">Function: </span><span><strong class="def-name">HELP</strong> <var class="def-var-arguments">(&amp;optional symbol)</var><a class="copiable-link" href="#index-HELP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>GCL specific: Prints the documentation associated with SYMBOL.  With no
+argument, this function prints the greeting message to GCL beginners.
+</p>
+
+</dd></dl>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Symbols.html
@@ -0,0 +1,562 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Symbols (GCL SI Manual)</title>
+
+<meta name="description" content="Symbols (GCL SI Manual)">
+<meta name="keywords" content="Symbols (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Operating-System.html" rel="next" title="Operating System">
+<link href="Compilation.html" rel="prev" title="Compilation">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Symbols">
+<div class="nav-panel">
+<p>
+Next: <a href="Operating-System.html" accesskey="n" rel="next">Operating System</a>, Previous: <a href="Compilation.html" accesskey="p" rel="prev">Compilation</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Symbols-1"><span>8 Symbols<a class="copiable-link" href="#Symbols-1"> &para;</a></span></h2>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GENSYM"><span class="category-def">Function: </span><span><strong class="def-name">GENSYM</strong> <var class="def-var-arguments">(&amp;optional (x nil))</var><a class="copiable-link" href="#index-GENSYM"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Creates and returns a new uninterned symbol whose name is a prefix string
+(defaults to &quot;G&quot;), followed by a decimal number.  The number is incremented
+by each call to GENSYM.  X, if an integer, resets the counter.  If X is a
+string, it becomes the new prefix.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-KEYWORDP"><span class="category-def">Function: </span><span><strong class="def-name">KEYWORDP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-KEYWORDP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a symbol and it belongs to the KEYWORD package; NIL
+otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-REMPROP"><span class="category-def">Function: </span><span><strong class="def-name">REMPROP</strong> <var class="def-var-arguments">(symbol indicator)</var><a class="copiable-link" href="#index-REMPROP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Look on property list of SYMBOL for property with specified
+INDICATOR.  If found, splice this indicator and its value out of
+the plist, and return T. If not found, returns NIL with no side effects.
+</p>
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SYMBOL_002dPACKAGE"><span class="category-def">Function: </span><span><strong class="def-name">SYMBOL-PACKAGE</strong> <var class="def-var-arguments">(symbol)</var><a class="copiable-link" href="#index-SYMBOL_002dPACKAGE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the contents of the package cell of the symbol SYMBOL.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aPACKAGE_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*PACKAGE*</strong><a class="copiable-link" href="#index-_002aPACKAGE_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The current package.
+</p>
+
+</dd></dl>
+
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SHADOWING_002dIMPORT"><span class="category-def">Function: </span><span><strong class="def-name">SHADOWING-IMPORT</strong> <var class="def-var-arguments">(symbols &amp;optional (package *package*))</var><a class="copiable-link" href="#index-SHADOWING_002dIMPORT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Imports SYMBOLS into PACKAGE, disregarding any name conflict.  If a symbol
+of the same name is already present, then it is uninterned.  SYMBOLS must
+be a list of symbols or a symbol.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-REMF"><span class="category-def">Macro: </span><span><strong class="def-name">REMF</strong><a class="copiable-link" href="#index-REMF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(remf place indicator)
+</pre></div>
+
+<p>PLACE may be any place expression acceptable to SETF, and is expected
+to hold a property list or NIL.  This list is destructively altered to
+remove the property specified by INDICATOR.  Returns T if such a
+property was present; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKUNBOUND"><span class="category-def">Function: </span><span><strong class="def-name">MAKUNBOUND</strong> <var class="def-var-arguments">(symbol)</var><a class="copiable-link" href="#index-MAKUNBOUND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Makes empty the value slot of SYMBOL.  Returns SYMBOL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-USE_002dPACKAGE"><span class="category-def">Function: </span><span><strong class="def-name">USE-PACKAGE</strong> <var class="def-var-arguments">(packages-to-use &amp;optional (package *package*))</var><a class="copiable-link" href="#index-USE_002dPACKAGE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Adds all packages in PACKAGE-TO-USE list to the use list for PACKAGE so that
+the external symbols of the used packages are available as internal symbols
+in PACKAGE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dSYMBOL"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-SYMBOL</strong> <var class="def-var-arguments">(string)</var><a class="copiable-link" href="#index-MAKE_002dSYMBOL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Creates and returns a new uninterned symbol whose print name is STRING.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-PSETQ"><span class="category-def">Special Form: </span><span><strong class="def-name">PSETQ</strong><a class="copiable-link" href="#index-PSETQ"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(psetq {var form}*)
+</pre></div>
+
+<p>Similar to SETQ, but evaluates all FORMs first, and then assigns each value to
+the corresponding VAR.  Returns NIL always.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PACKAGE_002dUSED_002dBY_002dLIST"><span class="category-def">Function: </span><span><strong class="def-name">PACKAGE-USED-BY-LIST</strong> <var class="def-var-arguments">(package)</var><a class="copiable-link" href="#index-PACKAGE_002dUSED_002dBY_002dLIST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the list of packages that use PACKAGE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SYMBOLP"><span class="category-def">Function: </span><span><strong class="def-name">SYMBOLP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-SYMBOLP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a symbol; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-NIL"><span class="category-def">Constant: </span><span><strong class="def-name">NIL</strong><a class="copiable-link" href="#index-NIL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Holds NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SET"><span class="category-def">Function: </span><span><strong class="def-name">SET</strong> <var class="def-var-arguments">(symbol value)</var><a class="copiable-link" href="#index-SET"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Assigns the value of VALUE to the dynamic variable named by SYMBOL, and
+returns the value assigned.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-SETQ"><span class="category-def">Special Form: </span><span><strong class="def-name">SETQ</strong><a class="copiable-link" href="#index-SETQ"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(setq {var form}*)
+</pre></div>
+
+<p>VARs are not evaluated and must be symbols.  Assigns the value of the first
+FORM to the first VAR, then assigns the value of the second FORM to the second
+VAR, and so on.  Returns the last value assigned.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-UNUSE_002dPACKAGE"><span class="category-def">Function: </span><span><strong class="def-name">UNUSE-PACKAGE</strong> <var class="def-var-arguments">(packages-to-unuse &amp;optional (package *package*))</var><a class="copiable-link" href="#index-UNUSE_002dPACKAGE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Removes PACKAGES-TO-UNUSE from the use list for PACKAGE.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-T"><span class="category-def">Constant: </span><span><strong class="def-name">T</strong><a class="copiable-link" href="#index-T"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Holds T.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PACKAGE_002dUSE_002dLIST"><span class="category-def">Function: </span><span><strong class="def-name">PACKAGE-USE-LIST</strong> <var class="def-var-arguments">(package)</var><a class="copiable-link" href="#index-PACKAGE_002dUSE_002dLIST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the list of packages used by PACKAGE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-LIST_002dALL_002dPACKAGES"><span class="category-def">Function: </span><span><strong class="def-name">LIST-ALL-PACKAGES</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-LIST_002dALL_002dPACKAGES"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a list of all existing packages.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COPY_002dSYMBOL"><span class="category-def">Function: </span><span><strong class="def-name">COPY-SYMBOL</strong> <var class="def-var-arguments">(symbol &amp;optional (copy-props nil))</var><a class="copiable-link" href="#index-COPY_002dSYMBOL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a new uninterned symbol with the same print name as SYMBOL.
+If COPY-PROPS is NIL, the function, the variable, and the property slots
+of the new symbol have no value.  Otherwise, these slots are given the
+values of the corresponding slots of SYMBOL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SYMBOL_002dPLIST"><span class="category-def">Function: </span><span><strong class="def-name">SYMBOL-PLIST</strong> <var class="def-var-arguments">(symbol)</var><a class="copiable-link" href="#index-SYMBOL_002dPLIST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the property list of SYMBOL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SYMBOL_002dNAME"><span class="category-def">Function: </span><span><strong class="def-name">SYMBOL-NAME</strong> <var class="def-var-arguments">(symbol)</var><a class="copiable-link" href="#index-SYMBOL_002dNAME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the print name of the symbol SYMBOL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FIND_002dSYMBOL"><span class="category-def">Function: </span><span><strong class="def-name">FIND-SYMBOL</strong> <var class="def-var-arguments">(name &amp;optional (package *package*))</var><a class="copiable-link" href="#index-FIND_002dSYMBOL"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the symbol named NAME in
+PACKAGE.  If such a symbol is found, then the second value is :INTERN,
+:EXTERNAL, or :INHERITED to indicate how the symbol is accessible.  If
+no symbol is found then both values are NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SHADOW"><span class="category-def">Function: </span><span><strong class="def-name">SHADOW</strong> <var class="def-var-arguments">(symbols &amp;optional (package *package*))</var><a class="copiable-link" href="#index-SHADOW"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Creates an internal symbol in PACKAGE with the same name as each of the
+specified SYMBOLS.  SYMBOLS must be a list of symbols or a symbol.
+</p>
+
+</dd></dl>
+
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FBOUNDP"><span class="category-def">Function: </span><span><strong class="def-name">FBOUNDP</strong> <var class="def-var-arguments">(symbol)</var><a class="copiable-link" href="#index-FBOUNDP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if SYMBOL has a global function definition or if SYMBOL names a
+special form or a macro; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MACRO_002dFUNCTION"><span class="category-def">Function: </span><span><strong class="def-name">MACRO-FUNCTION</strong> <var class="def-var-arguments">(symbol)</var><a class="copiable-link" href="#index-MACRO_002dFUNCTION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>If SYMBOL globally names a macro, then returns the expansion function.
+Returns NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-IN_002dPACKAGE"><span class="category-def">Function: </span><span><strong class="def-name">IN-PACKAGE</strong> <var class="def-var-arguments">(package-name &amp;key (nicknames nil) (use &rsquo;(lisp)))</var><a class="copiable-link" href="#index-IN_002dPACKAGE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Sets *PACKAGE* to the package with PACKAGE-NAME, creating the package if
+it does not exist.  If the package already exists then it is modified
+to agree with USE and NICKNAMES arguments.  Any new nicknames are added
+without removing any old ones not specified.  If any package in the USE list
+is not currently used, then it is added to the use list.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dPACKAGE"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-PACKAGE</strong> <var class="def-var-arguments">(package-name &amp;key (nicknames nil) (use &rsquo;(lisp)))</var><a class="copiable-link" href="#index-MAKE_002dPACKAGE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Makes a new package having the specified PACKAGE-NAME and NICKNAMES.  The
+package will inherit all external symbols from each package in the USE list.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PACKAGE_002dSHADOWING_002dSYMBOLS"><span class="category-def">Function: </span><span><strong class="def-name">PACKAGE-SHADOWING-SYMBOLS</strong> <var class="def-var-arguments">(package)</var><a class="copiable-link" href="#index-PACKAGE_002dSHADOWING_002dSYMBOLS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the list of symbols that have been declared as shadowing symbols
+in PACKAGE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-INTERN"><span class="category-def">Function: </span><span><strong class="def-name">INTERN</strong> <var class="def-var-arguments">(name &amp;optional (package *package*))</var><a class="copiable-link" href="#index-INTERN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a symbol having the specified name, creating it if necessary.
+Returns as the second value one of the symbols :INTERNAL, :EXTERNAL,
+:INHERITED, and NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-EXPORT"><span class="category-def">Function: </span><span><strong class="def-name">EXPORT</strong> <var class="def-var-arguments">(symbols &amp;optional (package *package*))</var><a class="copiable-link" href="#index-EXPORT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Makes SYMBOLS external symbols of PACKAGE.  SYMBOLS must be a list of symbols
+or a symbol.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PACKAGEP"><span class="category-def">Function: </span><span><strong class="def-name">PACKAGEP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-PACKAGEP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a package; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SYMBOL_002dFUNCTION"><span class="category-def">Function: </span><span><strong class="def-name">SYMBOL-FUNCTION</strong> <var class="def-var-arguments">(symbol)</var><a class="copiable-link" href="#index-SYMBOL_002dFUNCTION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the current global function definition named by SYMBOL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SYMBOL_002dVALUE"><span class="category-def">Function: </span><span><strong class="def-name">SYMBOL-VALUE</strong> <var class="def-var-arguments">(symbol)</var><a class="copiable-link" href="#index-SYMBOL_002dVALUE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the current value of the dynamic (special) variable named by SYMBOL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BOUNDP"><span class="category-def">Function: </span><span><strong class="def-name">BOUNDP</strong> <var class="def-var-arguments">(symbol)</var><a class="copiable-link" href="#index-BOUNDP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if the global variable named by SYMBOL has a value; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DOCUMENTATION"><span class="category-def">Function: </span><span><strong class="def-name">DOCUMENTATION</strong> <var class="def-var-arguments">(symbol doc-type)</var><a class="copiable-link" href="#index-DOCUMENTATION"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the doc-string of DOC-TYPE for SYMBOL; NIL if none exists.
+Possible doc-types are:
+	FUNCTION  (special forms, macros, and functions)
+	VARIABLE  (dynamic variables, including constants)
+	TYPE      (types defined by DEFTYPE)
+	STRUCTURE (structures defined by DEFSTRUCT)
+	SETF      (SETF methods defined by DEFSETF, DEFINE-SETF-METHOD, and
+	           DEFINE-MODIFY-MACRO)
+All built-in special forms, macros, functions, and variables have their
+doc-strings.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GENTEMP"><span class="category-def">Function: </span><span><strong class="def-name">GENTEMP</strong> <var class="def-var-arguments">(&amp;optional (prefix &quot;t&quot;) (package *package*))</var><a class="copiable-link" href="#index-GENTEMP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Creates a new symbol interned in the package PACKAGE with the given PREFIX.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-RENAME_002dPACKAGE"><span class="category-def">Function: </span><span><strong class="def-name">RENAME-PACKAGE</strong> <var class="def-var-arguments">(package new-name &amp;optional (new-nicknames nil))</var><a class="copiable-link" href="#index-RENAME_002dPACKAGE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Replaces the old name and nicknames of PACKAGE with NEW-NAME and
+NEW-NICKNAMES.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-UNINTERN"><span class="category-def">Function: </span><span><strong class="def-name">UNINTERN</strong> <var class="def-var-arguments">(symbol &amp;optional (package *package*))</var><a class="copiable-link" href="#index-UNINTERN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Makes SYMBOL no longer present in PACKAGE.  Returns T if SYMBOL was present;
+NIL otherwise.  If PACKAGE is the home package of SYMBOL, then makes SYMBOL
+uninterned.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-UNEXPORT"><span class="category-def">Function: </span><span><strong class="def-name">UNEXPORT</strong> <var class="def-var-arguments">(symbols &amp;optional (package *package*))</var><a class="copiable-link" href="#index-UNEXPORT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Makes SYMBOLS no longer accessible as external symbols in PACKAGE.  SYMBOLS
+must be a list of symbols or a symbol.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PACKAGE_002dNICKNAMES"><span class="category-def">Function: </span><span><strong class="def-name">PACKAGE-NICKNAMES</strong> <var class="def-var-arguments">(package)</var><a class="copiable-link" href="#index-PACKAGE_002dNICKNAMES"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns as a list the nickname strings for the specified PACKAGE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-IMPORT"><span class="category-def">Function: </span><span><strong class="def-name">IMPORT</strong> <var class="def-var-arguments">(symbols &amp;optional (package *package*))</var><a class="copiable-link" href="#index-IMPORT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Makes SYMBOLS internal symbols of PACKAGE.  SYMBOLS must be a list of symbols
+or a symbol.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GET"><span class="category-def">Function: </span><span><strong class="def-name">GET</strong> <var class="def-var-arguments">(symbol indicator &amp;optional (default nil))</var><a class="copiable-link" href="#index-GET"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Looks on the property list of SYMBOL for the specified INDICATOR.  If this
+is found, returns the associated value.  Otherwise, returns DEFAULT.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FIND_002dALL_002dSYMBOLS"><span class="category-def">Function: </span><span><strong class="def-name">FIND-ALL-SYMBOLS</strong> <var class="def-var-arguments">(string-or-symbol)</var><a class="copiable-link" href="#index-FIND_002dALL_002dSYMBOLS"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns a list of all symbols that have the specified name.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FMAKUNBOUND"><span class="category-def">Function: </span><span><strong class="def-name">FMAKUNBOUND</strong> <var class="def-var-arguments">(symbol)</var><a class="copiable-link" href="#index-FMAKUNBOUND"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Discards the global function definition named by SYMBOL.  Returns SYMBOL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PACKAGE_002dNAME"><span class="category-def">Function: </span><span><strong class="def-name">PACKAGE-NAME</strong> <var class="def-var-arguments">(package)</var><a class="copiable-link" href="#index-PACKAGE_002dNAME"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the string that names the specified PACKAGE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FIND_002dPACKAGE"><span class="category-def">Function: </span><span><strong class="def-name">FIND-PACKAGE</strong> <var class="def-var-arguments">(name)</var><a class="copiable-link" href="#index-FIND_002dPACKAGE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the specified package if it already exists; NIL otherwise.  NAME may
+be a string that is the name or nickname of the package.  NAME may also be
+a symbol, in which case the symbol&rsquo;s print name is used.
+</p>
+
+</dd></dl>
+
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-APROPOS_002dLIST"><span class="category-def">Function: </span><span><strong class="def-name">APROPOS-LIST</strong> <var class="def-var-arguments">(string &amp;optional (package nil))</var><a class="copiable-link" href="#index-APROPOS_002dLIST"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns, as a list, all symbols whose print-names contain STRING as substring.
+If PACKAGE is non-NIL, then only the specified package is searched.
+</p>
+
+</dd></dl>
+
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Operating-System.html">Operating System</a>, Previous: <a href="Compilation.html">Compilation</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/System-Definitions.html
@@ -0,0 +1,1162 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>System Definitions (GCL SI Manual)</title>
+
+<meta name="description" content="System Definitions (GCL SI Manual)">
+<meta name="keywords" content="System Definitions (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Debugging.html" rel="next" title="Debugging">
+<link href="C-Interface.html" rel="prev" title="C Interface">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="System-Definitions">
+<div class="nav-panel">
+<p>
+Next: <a href="Debugging.html" accesskey="n" rel="next">Debugging</a>, Previous: <a href="C-Interface.html" accesskey="p" rel="prev">C Interface</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="System-Definitions-1"><span>17 System Definitions<a class="copiable-link" href="#System-Definitions-1"> &para;</a></span></h2>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SOCKET"><span class="category-def">Function: </span><span><strong class="def-name">SOCKET</strong> <var class="def-var-arguments">(port :host host)</var><a class="copiable-link" href="#index-SOCKET"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Open a socket connection to HOST at PORT.
+</p>
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-OPEN_002dNAMED_002dSOCKET"><span class="category-def">Function: </span><span><strong class="def-name">OPEN-NAMED-SOCKET</strong> <var class="def-var-arguments">(port)</var><a class="copiable-link" href="#index-OPEN_002dNAMED_002dSOCKET"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Open a socket on PORT, returning (cons fd portname) where fd
+is a small fixnum which is the write file descriptor for
+the socket.  If PORT is zero do automatic allocation of port.
+</p>
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ACCEPT_002dSOCKET_002dCONNECTION"><span class="category-def">Function: </span><span><strong class="def-name">ACCEPT-SOCKET-CONNECTION</strong> <var class="def-var-arguments">(NAMED_SOCKET)</var><a class="copiable-link" href="#index-ACCEPT_002dSOCKET_002dCONNECTION"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Wait for a connection on NAMED_SOCKET 
+and return (list* named_socket fd name1) when one is established.
+</p>
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ALLOCATE_002dCONTIGUOUS_002dPAGES"><span class="category-def">Function: </span><span><strong class="def-name">ALLOCATE-CONTIGUOUS-PAGES</strong> <var class="def-var-arguments">(number &amp;optional (really-allocate nil))</var><a class="copiable-link" href="#index-ALLOCATE_002dCONTIGUOUS_002dPAGES"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Sets the maximum number of pages for contiguous blocks to
+NUMBER.  If REALLY-ALLOCATE is non-NIL, then the specified
+number of pages will be allocated immediately.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FREEZE_002dDEFSTRUCT"><span class="category-def">Function: </span><span><strong class="def-name">FREEZE-DEFSTRUCT</strong> <var class="def-var-arguments">(name)</var><a class="copiable-link" href="#index-FREEZE_002dDEFSTRUCT"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>The inline defstruct type checker will be made more efficient, in that
+it will only check for types which currently include NAME.   After
+calling this the defstruct should not be altered.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAXIMUM_002dALLOCATABLE_002dPAGES"><span class="category-def">Function: </span><span><strong class="def-name">MAXIMUM-ALLOCATABLE-PAGES</strong> <var class="def-var-arguments">(type)</var><a class="copiable-link" href="#index-MAXIMUM_002dALLOCATABLE_002dPAGES"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the current maximum number of pages for the type class
+of the GCL implementation type TYPE.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ALLOCATED_002dRELOCATABLE_002dPAGES"><span class="category-def">Function: </span><span><strong class="def-name">ALLOCATED-RELOCATABLE-PAGES</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-ALLOCATED_002dRELOCATABLE_002dPAGES"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the number of pages currently allocated for relocatable
+blocks.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PUTPROP"><span class="category-def">Function: </span><span><strong class="def-name">PUTPROP</strong> <var class="def-var-arguments">(symbol value indicator)</var><a class="copiable-link" href="#index-PUTPROP"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Give SYMBOL the VALUE on INDICATOR property.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ALLOCATED_002dPAGES"><span class="category-def">Function: </span><span><strong class="def-name">ALLOCATED-PAGES</strong> <var class="def-var-arguments">(type)</var><a class="copiable-link" href="#index-ALLOCATED_002dPAGES"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the number of pages currently allocated for the type
+class of the GCL implementation type TYPE.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ALLOCATE_002dRELOCATABLE_002dPAGES"><span class="category-def">Function: </span><span><strong class="def-name">ALLOCATE-RELOCATABLE-PAGES</strong> <var class="def-var-arguments">(number)</var><a class="copiable-link" href="#index-ALLOCATE_002dRELOCATABLE_002dPAGES"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Sets the maximum number of pages for relocatable blocks to
+NUMBER.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ALLOCATED_002dCONTIGUOUS_002dPAGES"><span class="category-def">Function: </span><span><strong class="def-name">ALLOCATED-CONTIGUOUS-PAGES</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-ALLOCATED_002dCONTIGUOUS_002dPAGES"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the number of pages currently allocated for contiguous
+blocks.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAXIMUM_002dCONTIGUOUS_002dPAGES"><span class="category-def">Function: </span><span><strong class="def-name">MAXIMUM-CONTIGUOUS-PAGES</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-MAXIMUM_002dCONTIGUOUS_002dPAGES"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the current maximum number of pages for contiguous
+blocks.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GET_002dHOLE_002dSIZE"><span class="category-def">Function: </span><span><strong class="def-name">GET-HOLE-SIZE</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-GET_002dHOLE_002dSIZE"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns as a fixnum the size of the memory hole (in pages).
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SPECIALP"><span class="category-def">Function: </span><span><strong class="def-name">SPECIALP</strong> <var class="def-var-arguments">(symbol)</var><a class="copiable-link" href="#index-SPECIALP"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns T if the SYMBOL is a globally special variable; NIL
+otherwise.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-OUTPUT_002dSTREAM_002dSTRING"><span class="category-def">Function: </span><span><strong class="def-name">OUTPUT-STREAM-STRING</strong> <var class="def-var-arguments">(string-output-stream)</var><a class="copiable-link" href="#index-OUTPUT_002dSTREAM_002dSTRING"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the string corresponding to the STRING-OUTPUT-STREAM.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GET_002dSTRING_002dINPUT_002dSTREAM_002dINDEX"><span class="category-def">Function: </span><span><strong class="def-name">GET-STRING-INPUT-STREAM-INDEX</strong> <var class="def-var-arguments">(string-input-stream)</var><a class="copiable-link" href="#index-GET_002dSTRING_002dINPUT_002dSTREAM_002dINDEX"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the current index of the STRING-INPUT-STREAM.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002dCONCATENATE"><span class="category-def">Function: </span><span><strong class="def-name">STRING-CONCATENATE</strong> <var class="def-var-arguments">(&amp;rest strings)</var><a class="copiable-link" href="#index-STRING_002dCONCATENATE"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the result of concatenating the given STRINGS.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BDS_002dVAR"><span class="category-def">Function: </span><span><strong class="def-name">BDS-VAR</strong> <var class="def-var-arguments">(i)</var><a class="copiable-link" href="#index-BDS_002dVAR"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the symbol of the i-th entity in the bind stack.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ERROR_002dSET"><span class="category-def">Function: </span><span><strong class="def-name">ERROR-SET</strong> <var class="def-var-arguments">(form)</var><a class="copiable-link" href="#index-ERROR_002dSET"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Evaluates the FORM in the null environment.  If the evaluation
+of the FORM has successfully completed, SI:ERROR-SET returns NIL as the first
+value and the result of the evaluation as the rest of the values.  If, in the
+course of the evaluation, a non-local jump from the FORM is atempted,
+SI:ERROR-SET traps the jump and returns the corresponding jump tag as its
+value.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COMPILED_002dFUNCTION_002dNAME"><span class="category-def">Function: </span><span><strong class="def-name">COMPILED-FUNCTION-NAME</strong> <var class="def-var-arguments">(compiled-function-object)</var><a class="copiable-link" href="#index-COMPILED_002dFUNCTION_002dNAME"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the name of the COMPILED-FUNCTION-OBJECT.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRUCTUREP"><span class="category-def">Function: </span><span><strong class="def-name">STRUCTUREP</strong> <var class="def-var-arguments">(object)</var><a class="copiable-link" href="#index-STRUCTUREP"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns T if the OBJECT is a structure; NIL otherwise.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-IHS_002dVS"><span class="category-def">Function: </span><span><strong class="def-name">IHS-VS</strong> <var class="def-var-arguments">(i)</var><a class="copiable-link" href="#index-IHS_002dVS"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the value stack index of the i-th entity in the
+invocation history stack.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-UNIVERSAL_002dERROR_002dHANDLER"><span class="category-def">Function: </span><span><strong class="def-name">UNIVERSAL-ERROR-HANDLER</strong> <var class="def-var-arguments">(error-name correctable function-name continue-format-string error-format-string &amp;rest args)</var><a class="copiable-link" href="#index-UNIVERSAL_002dERROR_002dHANDLER"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Starts the error handler of GCL.  When an error is detected,
+GCL calls SI:UNIVERSAL-ERROR-HANDLER with the specified arguments.
+ERROR-NAME is the name of the error.  CORRECTABLE is T for a correctable
+error and NIL for a fatal error.  FUNCTION-NAME is the name of the function
+that caused the error.  CONTINUE-FORMAT-STRING and ERROR-FORMAT-STRING are
+the format strings of the error message.  ARGS are the arguments to the
+format strings.
+     To change the error handler of GCL, redefine SI:UNIVERSAL-ERROR-
+HANDLER.
+</p>
+
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aINTERRUPT_002dENABLE_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*INTERRUPT-ENABLE*</strong><a class="copiable-link" href="#index-_002aINTERRUPT_002dENABLE_002a"> &para;</a></span></dt>
+<dd><p>Package:SI
+GCL specific: If the value of SI:*INTERRUPT-ENABLE* is non-NIL, GCL signals
+an error on the terminal interrupt (this is the default case).  If it is NIL,
+GCL ignores the interrupt and assigns T to SI:*INTERRUPT-ENABLE*.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CHDIR"><span class="category-def">Function: </span><span><strong class="def-name">CHDIR</strong> <var class="def-var-arguments">(pathname)</var><a class="copiable-link" href="#index-CHDIR"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL/UNIX specific: Changes the current working directory to the specified
+pathname.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COPY_002dSTREAM"><span class="category-def">Function: </span><span><strong class="def-name">COPY-STREAM</strong> <var class="def-var-arguments">(in-stream out-stream)</var><a class="copiable-link" href="#index-COPY_002dSTREAM"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Copies IN-STREAM to OUT-STREAM until the end-of-file on IN-
+STREAM.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-INIT_002dSYSTEM"><span class="category-def">Function: </span><span><strong class="def-name">INIT-SYSTEM</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-INIT_002dSYSTEM"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Initializes the library and the compiler of GCL.  Since they
+have already been initialized in the standard image of GCL, calling SI:INIT-
+SYSTEM will cause an error.
+</p>
+
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aINDENT_002dFORMATTED_002dOUTPUT_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*INDENT-FORMATTED-OUTPUT*</strong><a class="copiable-link" href="#index-_002aINDENT_002dFORMATTED_002dOUTPUT_002a"> &para;</a></span></dt>
+<dd><p>Package:SI
+GCL specific: The FORMAT directive ~% indents the next line if the value of
+this variable is non-NIL.  If NIL, ~% simply does Newline.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SET_002dHOLE_002dSIZE"><span class="category-def">Function: </span><span><strong class="def-name">SET-HOLE-SIZE</strong> <var class="def-var-arguments">(fixnum)</var><a class="copiable-link" href="#index-SET_002dHOLE_002dSIZE"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Sets the size of the memory hole (in pages).
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FRS_002dBDS"><span class="category-def">Function: </span><span><strong class="def-name">FRS-BDS</strong> <var class="def-var-arguments">(i)</var><a class="copiable-link" href="#index-FRS_002dBDS"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the bind stack index of the i-th entity in the frame
+stack.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-IHS_002dFUN"><span class="category-def">Function: </span><span><strong class="def-name">IHS-FUN</strong> <var class="def-var-arguments">(i)</var><a class="copiable-link" href="#index-IHS_002dFUN"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the function value of the i-th entity in the invocation
+history stack.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-_002aMAKE_002dCONSTANT"><span class="category-def">Function: </span><span><strong class="def-name">*MAKE-CONSTANT</strong> <var class="def-var-arguments">(symbol value)</var><a class="copiable-link" href="#index-_002aMAKE_002dCONSTANT"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Makes the SYMBOL a constant with the specified VALUE.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FIXNUMP"><span class="category-def">Function: </span><span><strong class="def-name">FIXNUMP</strong> <var class="def-var-arguments">(object)</var><a class="copiable-link" href="#index-FIXNUMP"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns T if the OBJECT is a fixnum; NIL otherwise.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BDS_002dVAL"><span class="category-def">Function: </span><span><strong class="def-name">BDS-VAL</strong> <var class="def-var-arguments">(i)</var><a class="copiable-link" href="#index-BDS_002dVAL"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the value of the i-th entity in the bind stack.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002dTO_002dOBJECT"><span class="category-def">Function: </span><span><strong class="def-name">STRING-TO-OBJECT</strong> <var class="def-var-arguments">(string)</var><a class="copiable-link" href="#index-STRING_002dTO_002dOBJECT"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: (SI:STRING-TO-OBJECT STRING) is equivalent to
+(READ-FROM-STRING STRING), but much faster.
+</p>
+
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aSYSTEM_002dDIRECTORY_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*SYSTEM-DIRECTORY*</strong><a class="copiable-link" href="#index-_002aSYSTEM_002dDIRECTORY_002a"> &para;</a></span></dt>
+<dd><p>Package:SI
+GCL specific: Holds the name of the system directory of GCL.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FRS_002dIHS"><span class="category-def">Function: </span><span><strong class="def-name">FRS-IHS</strong> <var class="def-var-arguments">(i)</var><a class="copiable-link" href="#index-FRS_002dIHS"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the invocation history stack index of the i-th entity
+in the frame stack.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-RESET_002dGBC_002dCOUNT"><span class="category-def">Function: </span><span><strong class="def-name">RESET-GBC-COUNT</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-RESET_002dGBC_002dCOUNT"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Resets the counter of the garbage collector that records how
+many times the garbage collector has been called for each implementation
+type.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CATCH_002dBAD_002dSIGNALS"><span class="category-def">Function: </span><span><strong class="def-name">CATCH-BAD-SIGNALS</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-CATCH_002dBAD_002dSIGNALS"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL/BSD specific: Installs a signal catcher for bad signals:
+	SIGILL, SIGIOT, SIGEMT, SIGBUS, SIGSEGV, SIGSYS.
+The signal catcher, upon catching the signal, signals an error (and enter
+the break-level).  Since the internal memory of GCL may be broken, the user
+should check the signal and exit from GCL if necessary.  When the signal
+is caught during garbage collection, GCL terminates immediately.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-RESET_002dSTACK_002dLIMITS"><span class="category-def">Function: </span><span><strong class="def-name">RESET-STACK-LIMITS</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-RESET_002dSTACK_002dLIMITS"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Resets the stack limits to the normal state.  When a stack has
+overflowed, GCL extends the limit for the stack in order to execute the error
+handler.  After processing the error, GCL resets the stack limit by calling
+SI:RESET-STACK-LIMITS.
+</p>
+
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aGBC_002dMESSAGE_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*GBC-MESSAGE*</strong><a class="copiable-link" href="#index-_002aGBC_002dMESSAGE_002a"> &para;</a></span></dt>
+<dd><p>Package:SI
+GCL specific: If the value of SI:*GBC-MESSAGE* is non-NIL, the garbage
+collector prints some information on the terminal.  Usually SI:*GBC-MESSAGE*
+should be set NIL.
+</p>
+
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aGBC_002dNOTIFY_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*GBC-NOTIFY*</strong><a class="copiable-link" href="#index-_002aGBC_002dNOTIFY_002a"> &para;</a></span></dt>
+<dd><p>Package:SI
+GCL specific: If the value is non-NIL, the garbage
+collector prints a very brief one line message about the area causing the collection,
+and the time spent in internal time units.
+</p>
+
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aAFTER_002dGBC_002dHOOK_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*AFTER-GBC-HOOK*</strong><a class="copiable-link" href="#index-_002aAFTER_002dGBC_002dHOOK_002a"> &para;</a></span></dt>
+<dd><p>Package:SI
+Defaults to nil, but may be set to a function of one argument TYPE which is
+a lisp variable indicating the TYPE which caused the current collection.
+</p>
+
+</dd></dl>
+<dl class="first-deffn">
+<dt class="deffn" id="index-ALLOCATED"><span class="category-def">Funcition: </span><span><strong class="def-name">ALLOCATED</strong> <var class="def-var-arguments">(type)</var><a class="copiable-link" href="#index-ALLOCATED"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Returns 6 values:
+</p><dl class="table">
+<dt>nfree</dt>
+<dd><p>number free 
+</p></dd>
+<dt>npages</dt>
+<dd><p>number of pages 
+</p></dd>
+<dt>maxpage</dt>
+<dd><p>number of pages to grow to 
+</p></dd>
+<dt>nppage</dt>
+<dd><p>number per page 
+</p></dd>
+<dt>gbccount</dt>
+<dd><p>number of gc&rsquo;s due to running out of items of this size
+</p></dd>
+<dt>nused</dt>
+<dd><p>number of items used 
+</p></dd>
+</dl>
+
+<p>Note that all items of the same size are stored on similar pages.
+Thus for example on a 486 under linux the following basic types are
+all the same size and so will share the same allocated information:
+CONS BIGNUM RATIO COMPLEX STRUCTURE.
+</p>
+
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-_002aMAKE_002dSPECIAL"><span class="category-def">Function: </span><span><strong class="def-name">*MAKE-SPECIAL</strong> <var class="def-var-arguments">(symbol)</var><a class="copiable-link" href="#index-_002aMAKE_002dSPECIAL"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Makes the SYMBOL globally special.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dSTRING_002dOUTPUT_002dSTREAM_002dFROM_002dSTRING"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-STRING-OUTPUT-STREAM-FROM-STRING</strong> <var class="def-var-arguments">(string)</var><a class="copiable-link" href="#index-MAKE_002dSTRING_002dOUTPUT_002dSTREAM_002dFROM_002dSTRING"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Creates a string-output-stream corresponding to the STRING and
+returns it.  The STRING should have a fill-pointer.
+</p>
+
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aIGNORE_002dEOF_002dON_002dTERMINAL_002dIO_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*IGNORE-EOF-ON-TERMINAL-IO*</strong><a class="copiable-link" href="#index-_002aIGNORE_002dEOF_002dON_002dTERMINAL_002dIO_002a"> &para;</a></span></dt>
+<dd><p>Package:SI
+GCL specific: If the value of SI:*IGNORE-EOF-ON-TERMINAL-IO* is non-NIL, GCL
+ignores the eof-character (usually ^D) on the terminal and the terminal never
+becomes end-of-file.  The default value of SI:*IGNORE-EOF-ON-TERMINAL-IO* is
+NIL.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ADDRESS"><span class="category-def">Function: </span><span><strong class="def-name">ADDRESS</strong> <var class="def-var-arguments">(object)</var><a class="copiable-link" href="#index-ADDRESS"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the address of the OBJECT as a fixnum.  The address of
+an object depends on the version of GCL.  E.g. (SI:ADDRESS NIL) returns
+1879062044 on GCL/AOSVS dated March 14, 1986.
+</p>
+
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aLISP_002dMAXPAGES_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*LISP-MAXPAGES*</strong><a class="copiable-link" href="#index-_002aLISP_002dMAXPAGES_002a"> &para;</a></span></dt>
+<dd><p>Package:SI
+GCL specific: Holds the maximum number of pages (1 page = 2048 bytes) for the
+GCL process.  The result of changing the value of SI:*LISP-MAXPAGES* is
+unpredictable.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ARGC"><span class="category-def">Function: </span><span><strong class="def-name">ARGC</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-ARGC"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the number of arguments on the command line that invoked
+the GCL process.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NANI"><span class="category-def">Function: </span><span><strong class="def-name">NANI</strong> <var class="def-var-arguments">(fixnum)</var><a class="copiable-link" href="#index-NANI"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the object in the address FIXNUM.  This function is
+the inverse of SI:ADDRESS.  Although SI:ADDRESS is a harmless operation,
+SI:NANI is quite dangerous and should be used with care.
+</p>
+
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aNOTIFY_002dGBC_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*NOTIFY-GBC*</strong><a class="copiable-link" href="#index-_002aNOTIFY_002dGBC_002a"> &para;</a></span></dt>
+<dd><p>Package:SI
+GCL specific: If the value of this variable is non-NIL, then the garbage
+collector notifies that it begins to run whenever it is invoked.  Otherwise,
+garbage collection begins silently.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SAVE_002dSYSTEM"><span class="category-def">Function: </span><span><strong class="def-name">SAVE-SYSTEM</strong> <var class="def-var-arguments">(pathname)</var><a class="copiable-link" href="#index-SAVE_002dSYSTEM"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Saves the current GCL core imange into a program file specified
+by PATHNAME.  This function differs from SAVE in that the contiguous and
+relocatable areas are made permanent in the saved image.  Usually the
+standard image of GCL interpreter/compiler is saved by SI:SAVE-SYSTEM.
+This function causes an exit from lisp.  Various changes are made
+to the memory of the running system, such as closing files and
+resetting io streams.   It would not be possible to continue normally.   
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-UNCATCH_002dBAD_002dSIGNALS"><span class="category-def">Function: </span><span><strong class="def-name">UNCATCH-BAD-SIGNALS</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-UNCATCH_002dBAD_002dSIGNALS"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL/BSD specific: Undoes the effect of SI:CATCH-BAD-SIGNALS.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-VS"><span class="category-def">Function: </span><span><strong class="def-name">VS</strong> <var class="def-var-arguments">(i)</var><a class="copiable-link" href="#index-VS"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the i-th entity in the value stack.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DISPLACED_002dARRAY_002dP"><span class="category-def">Function: </span><span><strong class="def-name">DISPLACED-ARRAY-P</strong> <var class="def-var-arguments">(array)</var><a class="copiable-link" href="#index-DISPLACED_002dARRAY_002dP"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns T if the ARRAY is a displaced array; NIL otherwise.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ARGV"><span class="category-def">Function: </span><span><strong class="def-name">ARGV</strong> <var class="def-var-arguments">(fixnum)</var><a class="copiable-link" href="#index-ARGV"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the FIXNUM-th argument on the command line that invoked
+the GCL process.
+</p>
+
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aDEFAULT_002dTIME_002dZONE_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*DEFAULT-TIME-ZONE*</strong><a class="copiable-link" href="#index-_002aDEFAULT_002dTIME_002dZONE_002a"> &para;</a></span></dt>
+<dd><p>Package:SI
+GCL specific: Holds the default time zone.  The initial value of SI:*DEFAULT-
+TIME-ZONE* is 6 (the time zone of Austin, Texas).
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GETENV"><span class="category-def">Function: </span><span><strong class="def-name">GETENV</strong> <var class="def-var-arguments">(string)</var><a class="copiable-link" href="#index-GETENV"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL/UNIX specific: Returns the environment with the name STRING as a string;
+if the environment specified by STRING is not found, returns NIL.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FASLINK"><span class="category-def">Function: </span><span><strong class="def-name">FASLINK</strong> <var class="def-var-arguments">(file string)</var><a class="copiable-link" href="#index-FASLINK"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL/BSD specific: Loads the FASL file FILE while linking the object files and
+libraries specified by STRING.  For example,
+	(faslink &quot;foo.o&quot; &quot;bar.o boo.o -lpixrect&quot;)
+loads foo.o while linking two object files (bar.o and boo.o) and the library
+pixrect.  Usually, foo.o consists of the C language interface for the
+functions defined in the object files or the libraries.
+</p>
+<p>A more portable way of making references to C code, is to build it
+in at the time of the original make.   If foo.c references things
+in -lpixrect, and foo.o is its compilation in the gcl/unixport directory
+</p>
+<p>(cd gcl/unixport ; make &quot;EXTRAS= foo.o -lpixrect &quot;)
+</p>
+<p>should add them.   If EXTRAS was already joe.o in the unixport/makefile
+you should of course add joe.o to the above &quot;EXTRAS= joe.o foo.o..&quot;
+</p>
+<p>Faslink does not work on most UNIX systems which are derived from SYS V or AIX.
+</p>
+
+
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-TOP_002dLEVEL"><span class="category-def">Function: </span><span><strong class="def-name">TOP-LEVEL</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-TOP_002dLEVEL"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Starts the standard top-level listner of GCL.  When the GCL
+process is invoked, it calls SI:TOP-LEVEL by (FUNCALL &rsquo;SI:TOP-LEVEL).
+     To change the top-level of GCL, redefine SI:TOP-LEVEL and save the core
+imange in a file.  When the saved imange is invoked, it will start the
+redefined top-level.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FRS_002dVS"><span class="category-def">Function: </span><span><strong class="def-name">FRS-VS</strong> <var class="def-var-arguments">(i)</var><a class="copiable-link" href="#index-FRS_002dVS"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>GCL specific: Returns the value stack index of the i-th entity in the frame
+stack.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-WRITE_002dDEBUG_002dSYMBOLS"><span class="category-def">Function: </span><span><strong class="def-name">WRITE-DEBUG-SYMBOLS</strong> <var class="def-var-arguments">(start file &amp;key (main-file &quot;/usr/local/schelter/xgcl/unixport/raw_gcl&quot;) (output-file &quot;debug-symbols.o&quot; ))</var><a class="copiable-link" href="#index-WRITE_002dDEBUG_002dSYMBOLS"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Write out a file of debug-symbols using address START as the place
+where FILE will be loaded into the running executable MAIN-FILE.  The
+last is a keyword argument.
+</p>
+
+
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-PROF"><span class="category-def">Function: </span><span><strong class="def-name">PROF</strong> <var class="def-var-arguments">(x y)</var><a class="copiable-link" href="#index-PROF"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>These functions in the SI package are GCL specific, and allow monitoring
+the run time of functions loaded into GCL, as well as the basic functions.
+ Sample Usage:
+    (si::set-up-profile 1000000) (si::prof 0 90)
+     run program
+    (si::prof 0 0)   ;; turn off profile
+    (si::display-prof)
+    (si::clear-profile)
+    (si::prof 0 90)  ;; start profile again
+    run program
+   ..
+  Profile can be stopped with (si::prof 0 0) and restarted with (si::prof 0 90)
+The START-ADDRESS will correspond to the beginning of the profile array, and
+the SCALE will mean that 256 bytes of code correspond to SCALE bytes in the
+profile array.
+</p>
+<p>Thus if the profile array is 1,000,000  bytes long and the code segment is 
+5 megabytes long you can profile the whole thing using a scale of 50
+Note that long runs may result in overflow, and so an understating of the
+time in a function.
+</p>
+<p>You must run intensively however since, with a scale of 128 it takes
+6,000,000 times through a loop to overflow the sampling in one part of
+the code.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CATCH_002dFATAL"><span class="category-def">Function: </span><span><strong class="def-name">CATCH-FATAL</strong> <var class="def-var-arguments">(i)</var><a class="copiable-link" href="#index-CATCH_002dFATAL"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+
+<p>Sets the value of the C variable catch_fatal to I which should be an integer.
+If catch_fatal is 1, then most unrecoverable fatal errors will be caught.
+Upon catching such an error catch_fatal becomes -1, to avoid recursive errors.
+The top level loop automatically sets catch_fatal to 1, if the value is less
+than zero.  Catching can be turned off by making catch_fatal = 0.
+</p>
+
+
+
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aMULTIPLY_002dSTACKS_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*MULTIPLY-STACKS*</strong><a class="copiable-link" href="#index-_002aMULTIPLY_002dSTACKS_002a"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>If this variable is set to a positive fixnum, then the next time through the
+TOP-LEVEL loop, the loop will be exited.  The size of the stacks will be
+multiplied by the value of *multiply-stacks*, and the TOP-LEVEL will be called
+again.  Thus to double the size of the stacks:
+</p>
+<p>&gt;(setq si::*multiply-stacks* 2)
+[exits top level and reinvokes it, with the new stacks in place]
+&gt;
+</p>
+<p>We must exit TOP-LEVEL, because it and any other lisp functions
+maintain many pointers into the stacks, which would be incorrect when the
+stacks have been moved.    Interrupting the process of growing the stacks,
+can leave you in an inconsistent state.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-GBC_002dTIME"><span class="category-def">Function: </span><span><strong class="def-name">GBC-TIME</strong> <var class="def-var-arguments">(&amp;optional x)</var><a class="copiable-link" href="#index-GBC_002dTIME"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Sets the internal C variable gc_time to X if X is supplied and then
+returns gc_time.  If gc_time is greater or equal to 0, then gc_time is
+incremented by the garbage collector, according to the number of
+internal time units spent there.   The initial value of gc_time is -1.
+</p>
+
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FWRITE"><span class="category-def">Function: </span><span><strong class="def-name">FWRITE</strong> <var class="def-var-arguments">(string start count stream)</var><a class="copiable-link" href="#index-FWRITE"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Write from STRING starting at char START (or 0 if it is nil) COUNT characters
+(or to end if COUNT is nil) to STREAM.  STREAM must be a stream such as
+returned by FP-OUTPUT-STREAM.  Returns nil if it fails.
+</p>
+
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FREAD"><span class="category-def">Function: </span><span><strong class="def-name">FREAD</strong> <var class="def-var-arguments">(string start count stream)</var><a class="copiable-link" href="#index-FREAD"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Read characters into STRING starting at char START (or 0 if it is nil) COUNT
+characters (or from start to length of STRING if COUNT is nil).  Characters
+are read from STREAM.  STREAM must be a stream such as returned by
+FP-INPUT-STREAM.  Returns nil if it fails.  Return number of characters read
+if it succeeds.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SGC_002dON"><span class="category-def">Function: </span><span><strong class="def-name">SGC-ON</strong> <var class="def-var-arguments">(&amp;optional ON)</var><a class="copiable-link" href="#index-SGC_002dON"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>If ON is not nil then SGC (stratified garbage collection) is turned
+on.   If ON is supplied and is nil, then SGC is turned off.
+If ON is not supplied, then it returns T if SGC is on, and NIL if
+SGC is off.
+</p>
+<p>The purpose of SGC is to prevent paging activity during garbage
+collection.  It is efficient if the actual number of pages being
+written to form a small percentage of the total image size.  The image
+should be built as compactly as possible.  This can be accomplished by
+using a settings such as (si::allocate-growth &rsquo;cons 1 10 50 20) to limit
+the growth in the cons maxpage to 10 pages per time.    Then
+just before calling si::save-system to save your image you can
+do something like:
+</p>
+<p>(si::set-hole-size 500)(gbc nil) (si::sgc-on t) (si::save-system ..)
+</p>
+<p>This makes the saved image come up with SGC on.  We have set a
+reasonably large hole size.  This is so that allocation of pages
+either because they fill up, or through specific calls to
+si::allocate, will not need to move all the relocatable data.  Moving
+relocatable data requires turning SGC off, performing a full gc, and
+then turning it back on.  New relocatable data is collected by SGC,
+but moving the old requires going through all pages of memory to
+change pointers into it.
+</p>
+<p>Using si::*notify-gbc* gives information about the number of pages
+used by SGC.   
+</p>
+<p>Note that SGC is only available on operating systems which provide
+the mprotect system call, to write protect pages.   Otherwise we
+cannot tell which pages have been written too.
+</p>
+
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ALLOCATE_002dSGC"><span class="category-def">Function: </span><span><strong class="def-name">ALLOCATE-SGC</strong> <var class="def-var-arguments">(type min-pages max-pages percent-free)</var><a class="copiable-link" href="#index-ALLOCATE_002dSGC"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>If MIN-PAGES is 0, then this type will not be swept by SGC.    Otherwise
+this is the minimum number of pages to make available to SGC.   MAX-PAGES
+is the upper limit of such pages.   Only pages with PERCENT-FREE objects
+on them, will be assigned to SGC.
+A list of the previous values for min, max and percent are returned.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ALLOCATE_002dGROWTH"><span class="category-def">Function: </span><span><strong class="def-name">ALLOCATE-GROWTH</strong> <var class="def-var-arguments">(type min max percent percent-free)</var><a class="copiable-link" href="#index-ALLOCATE_002dGROWTH"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+
+<p>The next time after a garbage collection for TYPE, if PERCENT-FREE of
+the objects of this TYPE are not actually free, and if the maximum
+number of pages for this type has already been allocated, then the
+maximum number will be increased by PERCENT of the old maximum,
+subject to the condition that this increment be at least MIN pages and
+at most MAX pages.  A list of the previous values for min, max,
+percent, and percent-free for the type TYPE is returned.   A value
+of 0 means use the system default,  and if an argument is out of range
+then the current values are returned with no change made.
+</p>
+<p>Examples:
+(si::allocate-growth &rsquo;cons 1 10 50 10)
+would insist that after a garbage collection for cons, there be at least
+10% cons&rsquo;s free.   If not the number of cons pages would be grown by
+50% or 10 pages which ever was smaller.   This might be reasonable if you
+were trying to build an image which was &lsquo;full&rsquo;, ie had few free objects
+of this type.
+</p>
+<p>(si::allocate-growth &rsquo;fixnum 0 10000 30 40)
+would grow space till there were normally 40% free fixnums, usually
+growing by 30% per time.
+</p>
+<p>(si::allocate-growth &rsquo;cons 0 0 0 40) would require 40% free conses after
+garbage collection for conses, and would use system defaults for the the rate
+to grow towards this goal.
+</p>
+<p>(si::allocate-growth &rsquo;cons -1 0 0 0)
+would return the current values, but not make any changes.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-OPEN_002dFASD"><span class="category-def">Function: </span><span><strong class="def-name">OPEN-FASD</strong> <var class="def-var-arguments">(stream direction eof-value table)</var><a class="copiable-link" href="#index-OPEN_002dFASD"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Given file STREAM open for input or output in DIRECTION,
+set it up to start writing or reading in fasd format.   When
+reading from this stream the EOF-VALUE will be returned when
+the end a fasd end of dump marker is encountered.   TABLE should
+be an eq hashtable on output, a vector on input, or nil.   In this
+last case a default one will be constructed.
+</p>
+<p>We shall refer to the result as a &lsquo;fasd stream&rsquo;.   It is
+suitable as the arg to CLOSE-FASD, READ-FASD-TOP, and as the second
+second arg to WRITE-FASD.   As a lisp object it is actually a vector,
+whose body coincides with:
+</p>
+<p>struct fasd {
+  object stream;   /* lisp object of type stream */
+  object table;  /* hash table used in dumping or vector on input*/
+  object eof;      /* lisp object to be returned on coming to eof mark */
+  object direction;    /* holds Cnil or Kinput or Koutput */
+  object package;  /* the package symbols are in by default */
+  object index;     /* integer.  The current_dump index on write  */
+  object filepos;   /* nil or the position of the start */ 
+  object table_length; /*    On read it is set to the size dump array needed
+		     or 0
+		     */
+  object macro ; }
+</p>
+<p>We did not use a defstruct for this, because we want the compiler to use this
+and it makes bootstrapping more difficult.   It is in &quot;cmpnew/fasdmacros.lsp&quot;
+</p>
+
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-WRITE_002dFASD_002dTOP"><span class="category-def">Function: </span><span><strong class="def-name">WRITE-FASD-TOP</strong> <var class="def-var-arguments">(X FASD-STREAM)</var><a class="copiable-link" href="#index-WRITE_002dFASD_002dTOP"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Write X to FASD-STREAM.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-READ_002dFASD_002dTOP"><span class="category-def">Function: </span><span><strong class="def-name">READ-FASD-TOP</strong> <var class="def-var-arguments">(FASD-STREAM)</var><a class="copiable-link" href="#index-READ_002dFASD_002dTOP"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Read the next object from FASD-STREAM.   Return the eof-value of FASD-STREAM if we
+encounter an eof marker put out by CLOSE-FASD.   Encountering end of actual file
+stream causes an error.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CLOSE_002dFASD"><span class="category-def">Function: </span><span><strong class="def-name">CLOSE-FASD</strong> <var class="def-var-arguments">(FASD-STREAM)</var><a class="copiable-link" href="#index-CLOSE_002dFASD"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>On output write an eof marker to the associated file stream, and then
+make FASD-STREAM invalid for further output.   It also attempts to write
+information to the stream on the size of the index table needed to read from the
+stream from the last open.    This is useful in growing the array.
+It does not alter the file stream, other than for writing this information to it.
+The file stream may be reopened for further use.   It is an error
+to OPEN-FASD the same file or file stream again with out first calling CLOSE-FASD.
+</p>
+
+
+
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FIND_002dSHARING_002dTOP"><span class="category-def">Function: </span><span><strong class="def-name">FIND-SHARING-TOP</strong> <var class="def-var-arguments">(x table)</var><a class="copiable-link" href="#index-FIND_002dSHARING_002dTOP"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>X is any lisp object and TABLE is an eq hash table.  This walks through X
+making entries to indicate the frequency of symbols,lists, and arrays.
+Initially items get -1 when they are first met, and this is decremented by 1
+each time the object occurs.  Call this function on all the objects in a fasd
+file, which you wish to share structure.
+</p>
+
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aLOAD_002dPATHNAME_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*LOAD-PATHNAME*</strong><a class="copiable-link" href="#index-_002aLOAD_002dPATHNAME_002a"> &para;</a></span></dt>
+<dd><p>Package:SI
+Load binds this to the pathname of the file being loaded.
+</p>
+
+</dd></dl>
+<dl class="first-deffn">
+<dt class="deffn" id="index-DEFINE_002dINLINE_002dFUNCTION"><span class="category-def">Macro: </span><span><strong class="def-name">DEFINE-INLINE-FUNCTION</strong> <var class="def-var-arguments">(fname vars &amp;body body)</var><a class="copiable-link" href="#index-DEFINE_002dINLINE_002dFUNCTION"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>This is equivalent to defun except that VARS may not contain
+&amp;optional, &amp;rest, &amp;key or &amp;aux.   Also a compiler property is
+added, which essentially saves the body and turns this into
+a let of the VARS and then execution of the body.   This
+last is done using si::DEFINE-COMPILER-MACRO
+Example:
+(si::define-inline-function myplus (a b c) (+ a b c))
+</p>
+
+</dd></dl>
+<dl class="first-deffn">
+<dt class="deffn" id="index-DEFINE_002dCOMPILER_002dMACRO"><span class="category-def">Macro: </span><span><strong class="def-name">DEFINE-COMPILER-MACRO</strong> <var class="def-var-arguments">(fname vars &amp;body body)</var><a class="copiable-link" href="#index-DEFINE_002dCOMPILER_002dMACRO"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>FNAME may be the name of a function, but at compile time the macro
+expansion given by this is used.
+</p>
+<p>(si::define-compiler-macro mycar (a) &lsquo;(car ,a))
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DBL"><span class="category-def">Function: </span><span><strong class="def-name">DBL</strong> <var class="def-var-arguments">()</var><a class="copiable-link" href="#index-DBL"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Invoke a top level loop, in which debug commands may be entered.
+These commands may also be entered at breaks, or in the error
+handler.
+See SOURCE-LEVEL-DEBUG
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-NLOAD"><span class="category-def">Function: </span><span><strong class="def-name">NLOAD</strong> <var class="def-var-arguments">(file)</var><a class="copiable-link" href="#index-NLOAD"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Load a file with the readtable bound to a special readtable, which
+permits tracking of source line information as the file is loaded.
+see SOURCE-LEVEL-DEBUG
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BREAK_002dFUNCTION"><span class="category-def">Function: </span><span><strong class="def-name">BREAK-FUNCTION</strong> <var class="def-var-arguments">(function &amp;optional line absolute)</var><a class="copiable-link" href="#index-BREAK_002dFUNCTION"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Set a breakpoint for a FUNCTION at LINE if the function has source
+information loaded.  If ABSOLUTE is not nil, then the line is understood to be
+relative to the beginning of the buffer.  See also dbl-break-function, the
+emacs command.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-XDR_002dOPEN"><span class="category-def">Function: </span><span><strong class="def-name">XDR-OPEN</strong> <var class="def-var-arguments">(stream)</var><a class="copiable-link" href="#index-XDR_002dOPEN"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Returns an object suitable for passing to XDR-READ if the stream
+is an input stream, and XDR-WRITE if it was an output stream.
+Note the stream must be a unix stream, on which  si::fp-input-stream
+or si::fp-output-stream would act as the identity.
+</p>
+
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FP_002dINPUT_002dSTREAM"><span class="category-def">Function: </span><span><strong class="def-name">FP-INPUT-STREAM</strong> <var class="def-var-arguments">(stream)</var><a class="copiable-link" href="#index-FP_002dINPUT_002dSTREAM"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Return a unix stream for input associated to STREAM if possible,
+otherwise return nil.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-FP_002dOUTPUT_002dSTREAM"><span class="category-def">Function: </span><span><strong class="def-name">FP-OUTPUT-STREAM</strong> <var class="def-var-arguments">(stream)</var><a class="copiable-link" href="#index-FP_002dOUTPUT_002dSTREAM"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Return a unix stream for output associated to STREAM if possible,
+otherwise return nil.
+</p>
+
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-XDR_002dREAD"><span class="category-def">Function: </span><span><strong class="def-name">XDR-READ</strong> <var class="def-var-arguments">(stream element)</var><a class="copiable-link" href="#index-XDR_002dREAD"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Read one item from STREAM of type the type of ELEMENT.    The representation
+of the elements is machine independent.    The xdr routines are what is
+used by the basic unix rpc calls.    
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-XDR_002dWRITE"><span class="category-def">Function: </span><span><strong class="def-name">XDR-WRITE</strong> <var class="def-var-arguments">(stream element)</var><a class="copiable-link" href="#index-XDR_002dWRITE"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+<p>Write to STREAM the given ELEMENT.
+</p>
+
+
+
+</dd></dl>
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aTOP_002dLEVEL_002dHOOK_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*TOP-LEVEL-HOOK*</strong><a class="copiable-link" href="#index-_002aTOP_002dLEVEL_002dHOOK_002a"> &para;</a></span></dt>
+<dd><p>Package:SI
+If this variable is has a function as its value at start up time, then
+it is run immediately after the init.lsp file is loaded.    This is useful
+for starting up an alternate top level loop.
+</p>
+
+</dd></dl>
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-RUN_002dPROCESS"><span class="category-def">Function: </span><span><strong class="def-name">RUN-PROCESS</strong> <var class="def-var-arguments">(string arglist)</var><a class="copiable-link" href="#index-RUN_002dPROCESS"> &para;</a></span></dt>
+<dd><p>Package:SI
+</p>
+
+<p>Execute the command STRING in a subshell passing the strings in the
+list ARGLIST as arguments to the command.  Return a two way stream
+associated to this.  Use si::fp-output-stream to get an associated
+output stream or si::fp-input-stream.
+</p>
+<p>Bugs: It does not properly deallocate everything, so that it will fail
+if you call it too many times.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aCASE_002dFOLD_002dSEARCH_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*CASE-FOLD-SEARCH*</strong><a class="copiable-link" href="#index-_002aCASE_002dFOLD_002dSEARCH_002a"> &para;</a></span></dt>
+<dd><p>Package: SI
+Non nil means that a string-match should ignore case
+</p></dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-STRING_002dMATCH"><span class="category-def">Function: </span><span><strong class="def-name">STRING-MATCH</strong> <var class="def-var-arguments">(pattern string &amp;optional start end)</var><a class="copiable-link" href="#index-STRING_002dMATCH"> &para;</a></span></dt>
+<dd><p>Package: SI
+Match regexp PATTERN in STRING starting in string starting at START
+and ending at END.  Return -1 if match not found, otherwise
+return the start index  of the first matchs.  The variable
+*MATCH-DATA* will be set to a fixnum array of sufficient size to hold
+the matches, to be obtained with match-beginning and match-end.
+If it already contains such an array, then the contents of it will
+be over written.
+</p>
+<p>The form of a regexp pattern is discussed in See <a class="xref" href="Regular-Expressions.html">Regular Expressions</a>.
+</p>
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MATCH_002dBEGINNING"><span class="category-def">Function: </span><span><strong class="def-name">MATCH-BEGINNING</strong> <var class="def-var-arguments">(index)</var><a class="copiable-link" href="#index-MATCH_002dBEGINNING"> &para;</a></span></dt>
+<dd><p>Returns the beginning of the I&rsquo;th match from the previous STRING-MATCH,
+where the 0th is for the whole regexp and the subsequent ones match parenthetical expressions.  -1 is returned if there is no match, or if the *match-data*
+vector is not a fixnum array.
+</p></dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MATCH_002dEND"><span class="category-def">Function: </span><span><strong class="def-name">MATCH-END</strong> <var class="def-var-arguments">(index)</var><a class="copiable-link" href="#index-MATCH_002dEND"> &para;</a></span></dt>
+<dd><p>Returns the end of the I&rsquo;th match from the previous STRING-MATCH
+</p></dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SOCKET-1"><span class="category-def">Function: </span><span><strong class="def-name">SOCKET</strong> <var class="def-var-arguments">(port &amp;key host server async myaddr myport daemon)</var><a class="copiable-link" href="#index-SOCKET-1"> &para;</a></span></dt>
+<dd>
+<p>Establishes a socket connection to the specified PORT under a variety
+of circumstances.  
+</p>
+<p>If HOST is specified, then it is a string designating the IP address
+of the server to which we are the client.  ASYNC specifies that the
+connection should be made asynchronously, and the call return
+immediately.  MYADDR and MYPORT can specify the IP address and port
+respectively of a client connection, for example when the running
+machine has several network interfaces.
+</p>
+<p>If SERVER is specified, then it is a function which will handle
+incoming connections to this PORT.  DAEMON specifies that the running
+process should be forked to handle incoming connections in the
+background.  If DAEMON is set to the keyword PERSISTENT, then the
+backgrounded process will survive when the parent process exits, and
+the SOCKET call returns NIL.  Any other non-NIL setting of DAEMON
+causes the socket call to return the process id of the backgrounded
+process.  DAEMON currently only works on BSD and Linux based systems.
+</p>
+<p>If DAEMON is not set or nil, or if the socket is not a SERVER socket,
+then the SOCKET call returns a two way stream.  In this case, the
+running process is responsible for all I/O operations on the stream.
+Specifically, if a SERVER socket is created as a non-DAEMON, then the
+running process must LISTEN for connections, ACCEPT them when present,
+and call the SERVER function on the stream returned by ACCEPT.
+</p>
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ACCEPT"><span class="category-def">Function: </span><span><strong class="def-name">ACCEPT</strong> <var class="def-var-arguments">(stream)</var><a class="copiable-link" href="#index-ACCEPT"> &para;</a></span></dt>
+<dd>
+<p>Creates a new two-way stream to handle an individual incoming
+connection to STREAM, which must have been created with the SOCKET
+function with the SERVER keyword set.  ACCEPT should only be invoked
+when LISTEN on STREAM returns T.  If the STREAM was created with the
+DAEMON keyword set in the call to SOCKET, ACCEPT is unnecessary and
+will be called automatically as needed.
+</p>
+</dd></dl>
+
+
+<ul class="mini-toc">
+<li><a href="Regular-Expressions.html" accesskey="1">Regular Expressions</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Debugging.html">Debugging</a>, Previous: <a href="C-Interface.html">C Interface</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Type.html
@@ -0,0 +1,179 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Type (GCL SI Manual)</title>
+
+<meta name="description" content="Type (GCL SI Manual)">
+<meta name="keywords" content="Type (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="GCL-Specific.html" rel="next" title="GCL Specific">
+<link href="Doc.html" rel="prev" title="Doc">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Type">
+<div class="nav-panel">
+<p>
+Next: <a href="GCL-Specific.html" accesskey="n" rel="next">GCL Specific</a>, Previous: <a href="Doc.html" accesskey="p" rel="prev">Doc</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Type-1"><span>14 Type<a class="copiable-link" href="#Type-1"> &para;</a></span></h2>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COERCE"><span class="category-def">Function: </span><span><strong class="def-name">COERCE</strong> <var class="def-var-arguments">(x type)</var><a class="copiable-link" href="#index-COERCE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Coerces X to an object of the type TYPE.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-TYPE_002dOF"><span class="category-def">Function: </span><span><strong class="def-name">TYPE-OF</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-TYPE_002dOF"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns the type of X.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CONSTANTP"><span class="category-def">Function: </span><span><strong class="def-name">CONSTANTP</strong> <var class="def-var-arguments">(symbol)</var><a class="copiable-link" href="#index-CONSTANTP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if the variable named by SYMBOL is a constant; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-TYPEP"><span class="category-def">Function: </span><span><strong class="def-name">TYPEP</strong> <var class="def-var-arguments">(x type)</var><a class="copiable-link" href="#index-TYPEP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is of the type TYPE; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-COMMONP"><span class="category-def">Function: </span><span><strong class="def-name">COMMONP</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-COMMONP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if X is a Common Lisp object; NIL otherwise.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-SUBTYPEP"><span class="category-def">Function: </span><span><strong class="def-name">SUBTYPEP</strong> <var class="def-var-arguments">(type1 type2)</var><a class="copiable-link" href="#index-SUBTYPEP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns T if TYPE1 is a subtype of TYPE2; NIL otherwise.  If it could not
+determine, then returns NIL as the second value.  Otherwise, the second value
+is T.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-CHECK_002dTYPE"><span class="category-def">Macro: </span><span><strong class="def-name">CHECK-TYPE</strong><a class="copiable-link" href="#index-CHECK_002dTYPE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(check-type place typespec [string])
+</pre></div>
+
+<p>Signals an error, if the contents of PLACE are not of the specified type.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-ASSERT"><span class="category-def">Macro: </span><span><strong class="def-name">ASSERT</strong><a class="copiable-link" href="#index-ASSERT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(assert test-form [({place}*) [string {arg}*]])
+</pre></div>
+
+<p>Signals an error if the value of TEST-FORM is NIL.  STRING is an format string
+used as the error message.  ARGs are arguments to the format string.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-DEFTYPE"><span class="category-def">Macro: </span><span><strong class="def-name">DEFTYPE</strong><a class="copiable-link" href="#index-DEFTYPE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(deftype name lambda-list {decl | doc}* {form}*)
+</pre></div>
+
+<p>Defines a new type-specifier abbreviation in terms of an &rsquo;expansion&rsquo; function
+	(lambda lambda-list1 {decl}* {form}*)
+where lambda-list1 is identical to LAMBDA-LIST except that all optional
+parameters with no default value specified in LAMBDA-LIST defaults to the
+symbol &rsquo;*&rsquo;, but not to NIL.  When the type system of GCL encounters a
+type specifier (NAME arg1 ... argn), it calls the expansion function with
+the arguments arg1 ... argn, and uses the returned value instead of the
+original type specifier.  When the symbol NAME is used as a type specifier,
+the expansion function is called with no argument.  The doc-string DOC, if
+supplied, is saved as the TYPE doc of NAME, and is retrieved by
+(documentation &rsquo;NAME &rsquo;type).
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-DYNAMIC_002dEXTENT"><span class="category-def">Declaration: </span><span><strong class="def-name">DYNAMIC-EXTENT</strong><a class="copiable-link" href="#index-DYNAMIC_002dEXTENT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Declaration to allow locals to be cons&rsquo;d on the C stack.
+For example
+(defun foo (&amp;rest l) (declare (:dynamic-extent l)) ...)
+will cause l to be a list formed on the C stack of the foo function
+frame.
+Of course passing L out as a value of foo will cause havoc.
+(setq x (make-list n))
+(setq x (cons a b))
+(setq x (list a  b c ..))
+also are handled on the stack, for dynamic-extent x.
+</p>
+
+
+</dd></dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="GCL-Specific.html">GCL Specific</a>, Previous: <a href="Doc.html">Doc</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/User-Interface.html
@@ -0,0 +1,467 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>User Interface (GCL SI Manual)</title>
+
+<meta name="description" content="User Interface (GCL SI Manual)">
+<meta name="keywords" content="User Interface (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Doc.html" rel="next" title="Doc">
+<link href="Iteration-and-Tests.html" rel="prev" title="Iteration and Tests">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+strong.def-name {font-family: monospace; font-weight: bold; font-size: larger}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="User-Interface">
+<div class="nav-panel">
+<p>
+Next: <a href="Doc.html" accesskey="n" rel="next">Doc</a>, Previous: <a href="Iteration-and-Tests.html" accesskey="p" rel="prev">Iteration and Tests</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="User-Interface-1"><span>12 User Interface<a class="copiable-link" href="#User-Interface-1"> &para;</a></span></h2>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-_002d-1"><span class="category-def">Special Variable: </span><span><strong class="def-name">-</strong><a class="copiable-link" href="#index-_002d-1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Holds the top-level form that GCL is currently evaluating.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-_002d"><span class="category-def">Function: </span><span><strong class="def-name">-</strong> <var class="def-var-arguments">(number &amp;rest more-numbers)</var><a class="copiable-link" href="#index-_002d"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Subtracts the second and all subsequent NUMBERs from the first NUMBER.
+With one arg, negates it.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-UNTRACE"><span class="category-def">Macro: </span><span><strong class="def-name">UNTRACE</strong><a class="copiable-link" href="#index-UNTRACE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(untrace {function-name}*)
+</pre></div>
+
+<p>Removes tracing from the specified functions.  With no FUNCTION-NAMEs,
+untraces all functions.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002a_002a_002a"><span class="category-def">Variable: </span><span><strong class="def-name">***</strong><a class="copiable-link" href="#index-_002a_002a_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Gets the previous value of ** when GCL evaluates a top-level form.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-MAKE_002dSTRING_002dINPUT_002dSTREAM-1"><span class="category-def">Function: </span><span><strong class="def-name">MAKE-STRING-INPUT-STREAM</strong> <var class="def-var-arguments">(string &amp;optional (start 0) (end (length string)))</var><a class="copiable-link" href="#index-MAKE_002dSTRING_002dINPUT_002dSTREAM-1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Returns an input stream which will supply the characters of String between
+Start and End in order.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-STEP"><span class="category-def">Macro: </span><span><strong class="def-name">STEP</strong><a class="copiable-link" href="#index-STEP"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(step form)
+</pre></div>
+
+<p>Evaluates FORM in the single-step mode and returns the value.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aBREAK_002dENABLE_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*BREAK-ENABLE*</strong><a class="copiable-link" href="#index-_002aBREAK_002dENABLE_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+GCL specific:  When an error occurrs, control enters to the break loop only
+if the value of this variable is non-NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-_002f-1"><span class="category-def">Special Variable: </span><span><strong class="def-name">/</strong><a class="copiable-link" href="#index-_002f-1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Holds a list of the values of the last top-level form.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DESCRIBE"><span class="category-def">Function: </span><span><strong class="def-name">DESCRIBE</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-DESCRIBE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Prints a description of the object X.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-ED"><span class="category-def">Function: </span><span><strong class="def-name">ED</strong> <var class="def-var-arguments">(&amp;optional x)</var><a class="copiable-link" href="#index-ED"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Invokes the editor.  The action depends on the version of GCL.  
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aDEBUG_002dIO_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*DEBUG-IO*</strong><a class="copiable-link" href="#index-_002aDEBUG_002dIO_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Holds the I/O stream used by the GCL debugger.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aBREAK_002dON_002dWARNINGS_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*BREAK-ON-WARNINGS*</strong><a class="copiable-link" href="#index-_002aBREAK_002dON_002dWARNINGS_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+When the function WARN is called, control enters to the break loop only
+if the value of this varialbe is non-NIL.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-CERROR"><span class="category-def">Function: </span><span><strong class="def-name">CERROR</strong> <var class="def-var-arguments">(continue-format-string error-format-string &amp;rest args)</var><a class="copiable-link" href="#index-CERROR"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Signals a correctable error.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002a_002a"><span class="category-def">Variable: </span><span><strong class="def-name">**</strong><a class="copiable-link" href="#index-_002a_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Gets the previous value of * when GCL evaluates a top-level form.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-_002b_002b_002b"><span class="category-def">Special Variable: </span><span><strong class="def-name">+++</strong><a class="copiable-link" href="#index-_002b_002b_002b"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Gets the previous value of ++ when GCL evaluates a top-level form.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-INSPECT"><span class="category-def">Function: </span><span><strong class="def-name">INSPECT</strong> <var class="def-var-arguments">(x)</var><a class="copiable-link" href="#index-INSPECT"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Shows the information about the object X in an interactive manner
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-_002f_002f"><span class="category-def">Special Variable: </span><span><strong class="def-name">//</strong><a class="copiable-link" href="#index-_002f_002f"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Gets the previous value of / when GCL evaluates a top-level form.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aTRACE_002dOUTPUT_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*TRACE-OUTPUT*</strong><a class="copiable-link" href="#index-_002aTRACE_002dOUTPUT_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+The trace output stream.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-_002b_002b"><span class="category-def">Special Variable: </span><span><strong class="def-name">++</strong><a class="copiable-link" href="#index-_002b_002b"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Gets the previous value of + when GCL evaluates a top-level form.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002aERROR_002dOUTPUT_002a"><span class="category-def">Variable: </span><span><strong class="def-name">*ERROR-OUTPUT*</strong><a class="copiable-link" href="#index-_002aERROR_002dOUTPUT_002a"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Holds the output stream for error messages.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-DRIBBLE"><span class="category-def">Function: </span><span><strong class="def-name">DRIBBLE</strong> <var class="def-var-arguments">(&amp;optional pathname)</var><a class="copiable-link" href="#index-DRIBBLE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>If PATHNAME is given, begins to record the interaction to the specified file.
+If PATHNAME is not given, ends the recording.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr first-defvar-alias-first-defvr">
+<dt class="defvr defvar-alias-defvr" id="index-_002a-1"><span class="category-def">Variable: </span><span><strong class="def-name">*</strong><a class="copiable-link" href="#index-_002a-1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Holds the value of the last top-level form.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-_002f_002f_002f"><span class="category-def">Special Variable: </span><span><strong class="def-name">///</strong><a class="copiable-link" href="#index-_002f_002f_002f"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Gets the previous value of // when GCL evaluates a top-level form.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-WARN"><span class="category-def">Function: </span><span><strong class="def-name">WARN</strong> <var class="def-var-arguments">(format-string &amp;rest args)</var><a class="copiable-link" href="#index-WARN"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Formats FORMAT-STRING and ARGs to *ERROR-OUTPUT* as a warning message.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn first-defun-alias-first-deffn">
+<dt class="deffn defun-alias-deffn" id="index-BREAK"><span class="category-def">Function: </span><span><strong class="def-name">BREAK</strong> <var class="def-var-arguments">(&amp;optional (format-string nil) &amp;rest args)</var><a class="copiable-link" href="#index-BREAK"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Enters a break loop.  If FORMAT-STRING is non-NIL, formats FORMAT-STRING
+and ARGS to *ERROR-OUTPUT* before entering a break loop.
+Typing :HELP at the break loop will list the break-loop commands.
+</p>
+
+</dd></dl>
+
+<dl class="first-defvr">
+<dt class="defvr" id="index-_002b-1"><span class="category-def">Special Variable: </span><span><strong class="def-name">+</strong><a class="copiable-link" href="#index-_002b-1"> &para;</a></span></dt>
+<dd><p>Package:LISP
+Holds the last top-level form.
+</p>
+
+</dd></dl>
+
+<dl class="first-deffn">
+<dt class="deffn" id="index-TRACE"><span class="category-def">Macro: </span><span><strong class="def-name">TRACE</strong><a class="copiable-link" href="#index-TRACE"> &para;</a></span></dt>
+<dd><p>Package:LISP
+</p>
+<p>Syntax:
+</p><div class="example">
+<pre class="example-preformatted">(trace {function-name}*)
+</pre></div>
+
+<p>Traces the specified functions.  With no FUNCTION-NAMEs, returns a list of
+functions currently being traced.
+</p>
+<p>Additional Keywords are allowed in GCL with the
+syntax (trace {fn | (fn {:kw form}*)}*)
+</p>
+<p>For each FN naming a function, traces that function.  Each :KW should
+be one of the ones listed below, and FORM should have the
+corresponding form.  No :KW may be given more than once for the same
+FN.  Returns a list of all FNs now traced which weren&rsquo;t already
+traced.
+</p>
+
+<p>EXAMPLE (Try this with your favorite factorial function FACT):
+</p>
+<div class="example">
+<pre class="example-preformatted">;; print entry args and exit values
+
+(trace FACT)
+
+;; Break coming out of FACT if the value is bigger than 1000.
+
+(trace (fact :exit
+	     (progn
+	       (if (&gt; (car values) 1000)(break &quot;big result&quot;))
+	       (car values))))
+
+;; Hairy example:
+
+;;make arglist available without the si:: prefix
+(import 'si::arglist)
+
+(trace (fact
+        :DECLARATIONS
+        ((in-string &quot;Here comes input: &quot;)
+         (out-string &quot;Here comes output: &quot;)
+         all-values
+         (silly (+ 3 4)))
+        :COND
+        (equal (rem (car arglist) 2) 0)
+        :ENTRY
+        (progn
+          (cond
+           ((equal (car arglist) 8)
+            (princ &quot;Entering FACT on input 8!! &quot;)
+            (setq out-string &quot;Here comes output from inside (FACT 8): &quot;))
+           (t
+            (princ in-string)))
+          (car arglist))
+        :EXIT
+        (progn
+          (setq all-values (cons (car values) all-values))
+          (princ out-string)
+          (when (equal (car arglist) 8)
+                ;; reset out-string
+                (setq out-string &quot;Here comes output: &quot;))
+          (cons 'fact values))
+        :ENTRYCOND
+        (not (= (car arglist) 6))
+        :EXITCOND
+        (not (= (car values) (* 6 (car arglist))))
+        :DEPTH
+        5))
+</pre></div>
+
+<p>Syntax is <code class="code">:keyword</code> <i class="i">form1</i> <code class="code">:keyword</code> <i class="i">form2</i> ...
+</p>
+<dl class="table">
+<dt><code class="code">:declarations</code></dt>
+<dd><div class="example">
+<pre class="example-preformatted">DEFAULT: NIL
+</pre></div>
+
+<p>FORM is ((var1  form1 )(var2  form2 )...), where
+the var_i  are symbols distinct from each other and from
+all symbols which are similarly declared for currently
+traced functions.  Each form  is evaluated immediately.
+Upon any invocation of a traced function when not already
+inside a traced function call, each var  is bound to
+that value of form .
+</p>
+</dd>
+<dt><code class="code">:COND</code></dt>
+<dd><div class="example">
+<pre class="example-preformatted">DEFAULT: T
+</pre></div>
+
+<p>Here, FORM is any Lisp form to be evaluated (by EVAL)
+upon entering a call of FN, in the environment where si::ARGLIST
+is bound to the current list of arguments of FN.  Note that
+even if the evaluation of FORM changes the value of SI::ARGLIST
+(e.g. by evaluation of (SETQ si::ARGLIST ...)), the list of
+arguments passed to FN is unchanged.  Users may alter args passed
+by destructively modifying the list structure of SI::ARGLIST
+however. The call is traced 
+(thus invoking the :ENTRYCOND and :EXITCOND forms, at least)
+if and only if FORM does not evaluate to NIL.
+</p>
+</dd>
+<dt><code class="code">:ENTRYCOND</code></dt>
+<dd><div class="example">
+<pre class="example-preformatted">DEFAULT: T
+</pre></div>
+
+<p>This is evaluated (by EVAL) if the :COND form evaluates to
+non-NIL, both in an environment where SI::ARGLIST is bound to the
+current list of arguments of FN.  If non-NIL, the :ENTRY form
+is then evaluated and printed with the trace &quot;prompt&quot;.
+</p>
+</dd>
+<dt><code class="code">:ENTRY</code></dt>
+<dd><div class="example">
+<pre class="example-preformatted">DEFAULT: (CONS (QUOTE x) SI::ARGLIST),
+</pre></div>
+
+<p>where x is the symbol we call FN
+If the :COND and :ENTRYCOND forms evaluate to non-NIL,
+then the trace &quot;prompt&quot; is printed and then this FORM is
+evaluated (by EVAL) in an environment where SI::ARGLIST is bound
+to the current list of arguments of FN.  The result is then
+printed.
+</p>
+</dd>
+<dt><code class="code">:EXITCOND</code></dt>
+<dd><div class="example">
+<pre class="example-preformatted">DEFAULT: T
+</pre></div>
+
+<p>This is evaluated (by EVAL) in the environment described
+below for the :EXIT form.  The :EXIT form is then evaluated
+and printed with the &quot;prompt&quot; if and only if the result here
+is non-NIL.
+</p>
+</dd>
+<dt><code class="code">:EXIT</code></dt>
+<dd><div class="example">
+<pre class="example-preformatted">DEFAULT: (CONS (QUOTE x) VALUES),
+</pre></div>
+
+<p>where x is the symbol we call FN
+Upon exit from tracing a given call, this FORM is
+evaluated (after the appropriate trace &quot;prompt&quot; is printed),
+using EVAL in an environment where SI::ARGLIST is bound to the
+current list of arguments of FN and VALUES is bound to the
+list of values returned by FN (recalling that Common Lisp
+functions may return multiple values).
+</p>
+</dd>
+<dt><code class="code">:DEPTH</code></dt>
+<dd><div class="example">
+<pre class="example-preformatted">DEFAULT:  No depth limit
+</pre></div>
+
+<p>FORM is simply a positive integer specifying the maximum
+nesting of traced calls of FN, i.e. of calls of FN in which
+the :COND form evaluated to non-NIL.  For calls of FN in
+which this limit is exceeded, even the :COND form is not
+evaluated, and the call is not traced.
+</p>
+</dd>
+</dl>
+
+</dd></dl>
+
+
+
+
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Doc.html">Doc</a>, Previous: <a href="Iteration-and-Tests.html">Iteration and Tests</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/Variable-Index.html
@@ -0,0 +1,298 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Variable Index (GCL SI Manual)</title>
+
+<meta name="description" content="Variable Index (GCL SI Manual)">
+<meta name="keywords" content="Variable Index (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Function-Index.html" rel="prev" title="Function Index">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+a.summary-letter-printindex {text-decoration: none}
+span:hover a.copiable-link {visibility: visible}
+td.printindex-index-entry {vertical-align: top}
+td.printindex-index-section {vertical-align: top; padding-left: 1em}
+th.entries-header-printindex {text-align:left}
+th.sections-header-printindex {text-align:left; padding-left: 1em}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="appendix-level-extent" id="Variable-Index">
+<div class="nav-panel">
+<p>
+Previous: <a href="Function-Index.html" accesskey="p" rel="prev">Function Index</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<h2 class="appendix" id="Variable-Index-1"><span>Appendix B Variable Index<a class="copiable-link" href="#Variable-Index-1"> &para;</a></span></h2>
+<div class="printindex vr-printindex">
+<table class="vr-letters-header-printindex"><tr><th>Jump to: &nbsp; </th><td><a class="summary-letter-printindex" href="#Variable-Index_vr_symbol-1"><b>-</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_symbol-2"><b>*</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_symbol-3"><b>/</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_symbol-4"><b>+</b></a>
+ &nbsp; 
+<br>
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-A"><b>A</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-B"><b>B</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-C"><b>C</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-D"><b>D</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-I"><b>I</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-L"><b>L</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-M"><b>M</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-N"><b>N</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-P"><b>P</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-S"><b>S</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-T"><b>T</b></a>
+ &nbsp; 
+</td></tr></table>
+<table class="vr-entries-printindex" border="0">
+<tr><td></td><th class="entries-header-printindex">Index Entry</th><th class="sections-header-printindex">Section</th></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Variable-Index_vr_symbol-1">-</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-_002d-1"><code>-</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Command-Line.html#index-_002dbatch"><code>-batch</code></a></td><td class="printindex-index-section"><a href="Command-Line.html">Command Line</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Command-Line.html#index-_002dc_002dfile"><code>-c-file</code></a></td><td class="printindex-index-section"><a href="Command-Line.html">Command Line</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Command-Line.html#index-_002dcompile"><code>-compile</code></a></td><td class="printindex-index-section"><a href="Command-Line.html">Command Line</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Command-Line.html#index-_002ddata_002dfile"><code>-data-file</code></a></td><td class="printindex-index-section"><a href="Command-Line.html">Command Line</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Command-Line.html#index-_002ddir"><code>-dir</code></a></td><td class="printindex-index-section"><a href="Command-Line.html">Command Line</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Command-Line.html#index-_002deval"><code>-eval</code></a></td><td class="printindex-index-section"><a href="Command-Line.html">Command Line</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Command-Line.html#index-_002df"><code>-f</code></a></td><td class="printindex-index-section"><a href="Command-Line.html">Command Line</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Command-Line.html#index-_002dh_002dfile"><code>-h-file</code></a></td><td class="printindex-index-section"><a href="Command-Line.html">Command Line</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Command-Line.html#index-_002dlibdir"><code>-libdir</code></a></td><td class="printindex-index-section"><a href="Command-Line.html">Command Line</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Command-Line.html#index-_002dload"><code>-load</code></a></td><td class="printindex-index-section"><a href="Command-Line.html">Command Line</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Command-Line.html#index-_002do_002dfile"><code>-o-file</code></a></td><td class="printindex-index-section"><a href="Command-Line.html">Command Line</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Command-Line.html#index-_002dsystem_002dp"><code>-system-p</code></a></td><td class="printindex-index-section"><a href="Command-Line.html">Command Line</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Variable-Index_vr_symbol-2">*</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-_002a-1"><code>*</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-_002a_002a"><code>**</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-_002a_002a_002a"><code>***</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-_002aAFTER_002dGBC_002dHOOK_002a"><code>*AFTER-GBC-HOOK*</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-_002aAPPLYHOOK_002a"><code>*APPLYHOOK*</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-_002aBREAK_002dENABLE_002a"><code>*BREAK-ENABLE*</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-_002aBREAK_002dON_002dWARNINGS_002a"><code>*BREAK-ON-WARNINGS*</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-_002aCASE_002dFOLD_002dSEARCH_002a"><code>*CASE-FOLD-SEARCH*</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compiler-Definitions.html#index-_002aCC_002a"><code>*CC*</code></a></td><td class="printindex-index-section"><a href="Compiler-Definitions.html">Compiler Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compiler-Definitions.html#index-_002aCMPINCLUDE_002dSTRING_002a"><code>*CMPINCLUDE-STRING*</code></a></td><td class="printindex-index-section"><a href="Compiler-Definitions.html">Compiler Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compiler-Definitions.html#index-_002aCOMPILE_002dORDINARIES_002a"><code>*COMPILE-ORDINARIES*</code></a></td><td class="printindex-index-section"><a href="Compiler-Definitions.html">Compiler Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-_002aDEBUG_002dIO_002a"><code>*DEBUG-IO*</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compilation.html#index-_002aDEFAULT_002dC_002dFILE_002a"><code>*DEFAULT-C-FILE*</code></a></td><td class="printindex-index-section"><a href="Compilation.html">Compilation</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compilation.html#index-_002aDEFAULT_002dDATA_002dFILE_002a"><code>*DEFAULT-DATA-FILE*</code></a></td><td class="printindex-index-section"><a href="Compilation.html">Compilation</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compilation.html#index-_002aDEFAULT_002dH_002dFILE_002a"><code>*DEFAULT-H-FILE*</code></a></td><td class="printindex-index-section"><a href="Compilation.html">Compilation</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-_002aDEFAULT_002dPATHNAME_002dDEFAULTS_002a"><code>*DEFAULT-PATHNAME-DEFAULTS*</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compilation.html#index-_002aDEFAULT_002dSYSTEM_002dP_002a"><code>*DEFAULT-SYSTEM-P*</code></a></td><td class="printindex-index-section"><a href="Compilation.html">Compilation</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-_002aDEFAULT_002dTIME_002dZONE_002a"><code>*DEFAULT-TIME-ZONE*</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-_002aERROR_002dOUTPUT_002a"><code>*ERROR-OUTPUT*</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-_002aEVALHOOK_002a"><code>*EVALHOOK*</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compilation.html#index-_002aFEATURES_002a"><code>*FEATURES*</code></a></td><td class="printindex-index-section"><a href="Compilation.html">Compilation</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-_002aGBC_002dMESSAGE_002a"><code>*GBC-MESSAGE*</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-_002aGBC_002dNOTIFY_002a"><code>*GBC-NOTIFY*</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-_002aIGNORE_002dEOF_002dON_002dTERMINAL_002dIO_002a"><code>*IGNORE-EOF-ON-TERMINAL-IO*</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-_002aIGNORE_002dMAXIMUM_002dPAGES_002a"><code>*IGNORE-MAXIMUM-PAGES*</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-_002aINDENT_002dFORMATTED_002dOUTPUT_002a"><code>*INDENT-FORMATTED-OUTPUT*</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Doc.html#index-_002ainfo_002dpaths_002a"><code>*info-paths*</code></a></td><td class="printindex-index-section"><a href="Doc.html">Doc</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-_002aINTERRUPT_002dENABLE_002a"><code>*INTERRUPT-ENABLE*</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-_002aLISP_002dMAXPAGES_002a"><code>*LISP-MAXPAGES*</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-_002aLOAD_002dPATHNAME_002a"><code>*LOAD-PATHNAME*</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aLOAD_002dVERBOSE_002a"><code>*LOAD-VERBOSE*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-_002aMACROEXPAND_002dHOOK_002a"><code>*MACROEXPAND-HOOK*</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-_002aMODULES_002a"><code>*MODULES*</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-_002aMULTIPLY_002dSTACKS_002a"><code>*MULTIPLY-STACKS*</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-_002aNOTIFY_002dGBC_002a"><code>*NOTIFY-GBC*</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-_002aOPTIMIZE_002dMAXIMUM_002dPAGES_002a"><code>*OPTIMIZE-MAXIMUM-PAGES*</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-_002aPACKAGE_002a"><code>*PACKAGE*</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aPRINT_002dARRAY_002a"><code>*PRINT-ARRAY*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aPRINT_002dBASE_002a"><code>*PRINT-BASE*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aPRINT_002dCASE_002a"><code>*PRINT-CASE*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aPRINT_002dCIRCLE_002a"><code>*PRINT-CIRCLE*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aPRINT_002dESCAPE_002a"><code>*PRINT-ESCAPE*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aPRINT_002dGENSYM_002a"><code>*PRINT-GENSYM*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aPRINT_002dLENGTH_002a"><code>*PRINT-LENGTH*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aPRINT_002dLEVEL_002a"><code>*PRINT-LEVEL*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aPRINT_002dPRETTY_002a"><code>*PRINT-PRETTY*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aPRINT_002dRADIX_002a"><code>*PRINT-RADIX*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aQUERY_002dIO_002a"><code>*QUERY-IO*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-_002aRANDOM_002dSTATE_002a"><code>*RANDOM-STATE*</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aREAD_002dBASE_002a"><code>*READ-BASE*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aREAD_002dDEFAULT_002dFLOAT_002dFORMAT_002a"><code>*READ-DEFAULT-FLOAT-FORMAT*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aREAD_002dSUPPRESS_002a"><code>*READ-SUPPRESS*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aREADLINE_002dPREFIX_002a"><code>*READLINE-PREFIX*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aREADTABLE_002a"><code>*READTABLE*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Compiler-Definitions.html#index-_002aSPLIT_002dFILES_002a"><code>*SPLIT-FILES*</code></a></td><td class="printindex-index-section"><a href="Compiler-Definitions.html">Compiler Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aSTANDARD_002dINPUT_002a"><code>*STANDARD-INPUT*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aSTANDARD_002dOUTPUT_002a"><code>*STANDARD-OUTPUT*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-_002aSYSTEM_002dDIRECTORY_002a"><code>*SYSTEM-DIRECTORY*</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Streams-and-Reading.html#index-_002aTERMINAL_002dIO_002a"><code>*TERMINAL-IO*</code></a></td><td class="printindex-index-section"><a href="Streams-and-Reading.html">Streams and Reading</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="GCL-Specific.html#index-_002aTMP_002dDIR_002a"><code>*TMP-DIR*</code></a></td><td class="printindex-index-section"><a href="GCL-Specific.html">GCL Specific</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="System-Definitions.html#index-_002aTOP_002dLEVEL_002dHOOK_002a"><code>*TOP-LEVEL-HOOK*</code></a></td><td class="printindex-index-section"><a href="System-Definitions.html">System Definitions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-_002aTRACE_002dOUTPUT_002a"><code>*TRACE-OUTPUT*</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Variable-Index_vr_symbol-3">/</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-_002f-1"><code>/</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-_002f_002f"><code>//</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-_002f_002f_002f"><code>///</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Variable-Index_vr_symbol-4">+</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-_002b-1"><code>+</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-_002b_002b"><code>++</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="User-Interface.html#index-_002b_002b_002b"><code>+++</code></a></td><td class="printindex-index-section"><a href="User-Interface.html">User Interface</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Variable-Index_vr_letter-A">A</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-ARRAY_002dDIMENSION_002dLIMIT"><code>ARRAY-DIMENSION-LIMIT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-ARRAY_002dRANK_002dLIMIT"><code>ARRAY-RANK-LIMIT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Sequences-and-Arrays-and-Hash-Tables.html#index-ARRAY_002dTOTAL_002dSIZE_002dLIMIT"><code>ARRAY-TOTAL-SIZE-LIMIT</code></a></td><td class="printindex-index-section"><a href="Sequences-and-Arrays-and-Hash-Tables.html">Sequences and Arrays and Hash Tables</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Variable-Index_vr_letter-B">B</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE_002d1"><code>BOOLE-1</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE_002d2"><code>BOOLE-2</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE_002dAND"><code>BOOLE-AND</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE_002dANDC1"><code>BOOLE-ANDC1</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE_002dANDC2"><code>BOOLE-ANDC2</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE_002dC1"><code>BOOLE-C1</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE_002dC2"><code>BOOLE-C2</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE_002dCLR"><code>BOOLE-CLR</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE_002dEQV"><code>BOOLE-EQV</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE_002dIOR"><code>BOOLE-IOR</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE_002dNAND"><code>BOOLE-NAND</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE_002dNOR"><code>BOOLE-NOR</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE_002dORC1"><code>BOOLE-ORC1</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE_002dORC2"><code>BOOLE-ORC2</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE_002dSET"><code>BOOLE-SET</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-BOOLE_002dXOR"><code>BOOLE-XOR</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Variable-Index_vr_letter-C">C</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-CALL_002dARGUMENTS_002dLIMIT"><code>CALL-ARGUMENTS-LIMIT</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dBITS_002dLIMIT"><code>CHAR-BITS-LIMIT</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-CHAR_002dCODE_002dLIMIT"><code>CHAR-CODE-LIMIT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dCONTROL_002dBIT"><code>CHAR-CONTROL-BIT</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dFONT_002dLIMIT"><code>CHAR-FONT-LIMIT</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dHYPER_002dBIT"><code>CHAR-HYPER-BIT</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dMETA_002dBIT"><code>CHAR-META-BIT</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Characters.html#index-CHAR_002dSUPER_002dBIT"><code>CHAR-SUPER-BIT</code></a></td><td class="printindex-index-section"><a href="Characters.html">Characters</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Variable-Index_vr_letter-D">D</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-DOUBLE_002dFLOAT_002dEPSILON"><code>DOUBLE-FLOAT-EPSILON</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-DOUBLE_002dFLOAT_002dNEGATIVE_002dEPSILON"><code>DOUBLE-FLOAT-NEGATIVE-EPSILON</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Type.html#index-DYNAMIC_002dEXTENT"><code>DYNAMIC-EXTENT</code></a></td><td class="printindex-index-section"><a href="Type.html">Type</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Variable-Index_vr_letter-I">I</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Operating-System-Definitions.html#index-INTERNAL_002dTIME_002dUNITS_002dPER_002dSECOND"><code>INTERNAL-TIME-UNITS-PER-SECOND</code></a></td><td class="printindex-index-section"><a href="Operating-System-Definitions.html">Operating System Definitions</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Variable-Index_vr_letter-L">L</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-LAMBDA_002dLIST_002dKEYWORDS"><code>LAMBDA-LIST-KEYWORDS</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-LAMBDA_002dPARAMETERS_002dLIMIT"><code>LAMBDA-PARAMETERS-LIMIT</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LEAST_002dNEGATIVE_002dDOUBLE_002dFLOAT"><code>LEAST-NEGATIVE-DOUBLE-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LEAST_002dNEGATIVE_002dLONG_002dFLOAT"><code>LEAST-NEGATIVE-LONG-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LEAST_002dNEGATIVE_002dSHORT_002dFLOAT"><code>LEAST-NEGATIVE-SHORT-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LEAST_002dNEGATIVE_002dSINGLE_002dFLOAT"><code>LEAST-NEGATIVE-SINGLE-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LEAST_002dPOSITIVE_002dDOUBLE_002dFLOAT"><code>LEAST-POSITIVE-DOUBLE-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LEAST_002dPOSITIVE_002dLONG_002dFLOAT"><code>LEAST-POSITIVE-LONG-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LEAST_002dPOSITIVE_002dSHORT_002dFLOAT"><code>LEAST-POSITIVE-SHORT-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LEAST_002dPOSITIVE_002dSINGLE_002dFLOAT"><code>LEAST-POSITIVE-SINGLE-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LONG_002dFLOAT_002dEPSILON"><code>LONG-FLOAT-EPSILON</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-LONG_002dFLOAT_002dNEGATIVE_002dEPSILON"><code>LONG-FLOAT-NEGATIVE-EPSILON</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Variable-Index_vr_letter-M">M</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MOST_002dNEGATIVE_002dDOUBLE_002dFLOAT"><code>MOST-NEGATIVE-DOUBLE-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MOST_002dNEGATIVE_002dFIXNUM"><code>MOST-NEGATIVE-FIXNUM</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MOST_002dNEGATIVE_002dLONG_002dFLOAT"><code>MOST-NEGATIVE-LONG-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MOST_002dNEGATIVE_002dSHORT_002dFLOAT"><code>MOST-NEGATIVE-SHORT-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MOST_002dNEGATIVE_002dSINGLE_002dFLOAT"><code>MOST-NEGATIVE-SINGLE-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MOST_002dPOSITIVE_002dDOUBLE_002dFLOAT"><code>MOST-POSITIVE-DOUBLE-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MOST_002dPOSITIVE_002dFIXNUM"><code>MOST-POSITIVE-FIXNUM</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MOST_002dPOSITIVE_002dLONG_002dFLOAT"><code>MOST-POSITIVE-LONG-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MOST_002dPOSITIVE_002dSHORT_002dFLOAT"><code>MOST-POSITIVE-SHORT-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-MOST_002dPOSITIVE_002dSINGLE_002dFLOAT"><code>MOST-POSITIVE-SINGLE-FLOAT</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Special-Forms-and-Functions.html#index-MULTIPLE_002dVALUES_002dLIMIT"><code>MULTIPLE-VALUES-LIMIT</code></a></td><td class="printindex-index-section"><a href="Special-Forms-and-Functions.html">Special Forms and Functions</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Variable-Index_vr_letter-N">N</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-NIL"><code>NIL</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Variable-Index_vr_letter-P">P</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-PI"><code>PI</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Variable-Index_vr_letter-S">S</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-SHORT_002dFLOAT_002dEPSILON"><code>SHORT-FLOAT-EPSILON</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-SHORT_002dFLOAT_002dNEGATIVE_002dEPSILON"><code>SHORT-FLOAT-NEGATIVE-EPSILON</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-SINGLE_002dFLOAT_002dEPSILON"><code>SINGLE-FLOAT-EPSILON</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Numbers.html#index-SINGLE_002dFLOAT_002dNEGATIVE_002dEPSILON"><code>SINGLE-FLOAT-NEGATIVE-EPSILON</code></a></td><td class="printindex-index-section"><a href="Numbers.html">Numbers</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+<tr><th id="Variable-Index_vr_letter-T">T</th></tr>
+<tr><td></td><td class="printindex-index-entry"><a href="Symbols.html#index-T"><code>T</code></a></td><td class="printindex-index-section"><a href="Symbols.html">Symbols</a></td></tr>
+<tr><td colspan="3"><hr></td></tr>
+</table>
+<table class="vr-letters-footer-printindex"><tr><th>Jump to: &nbsp; </th><td><a class="summary-letter-printindex" href="#Variable-Index_vr_symbol-1"><b>-</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_symbol-2"><b>*</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_symbol-3"><b>/</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_symbol-4"><b>+</b></a>
+ &nbsp; 
+<br>
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-A"><b>A</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-B"><b>B</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-C"><b>C</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-D"><b>D</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-I"><b>I</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-L"><b>L</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-M"><b>M</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-N"><b>N</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-P"><b>P</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-S"><b>S</b></a>
+ &nbsp; 
+<a class="summary-letter-printindex" href="#Variable-Index_vr_letter-T"><b>T</b></a>
+ &nbsp; 
+</td></tr></table>
+</div>
+
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Function-Index.html">Function Index</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-si_html/index.html
@@ -0,0 +1,145 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Top (GCL SI Manual)</title>
+
+<meta name="description" content="Top (GCL SI Manual)">
+<meta name="keywords" content="Top (GCL SI Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="#Top" rel="start" title="Top">
+<link href="Function-Index.html" rel="index" title="Function Index">
+<link href="#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="../dir_html/index.html" rel="up" title="(dir)">
+<link href="Numbers.html" rel="next" title="Numbers">
+<link href="../dir_html/index.html" rel="prev" title="(dir)">
+<style type="text/css">
+<!--
+ul.toc-numbered-mark {list-style: none}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+
+
+
+
+
+
+<div class="top-level-extent" id="Top">
+<div class="nav-panel">
+<p>
+Next: <a href="Numbers.html" accesskey="n" rel="next">Numbers</a>, Previous: <a href="../dir_html/index.html" accesskey="p" rel="prev">(dir)</a>, Up: <a href="../dir_html/index.html" accesskey="u" rel="up">(dir)</a> &nbsp; [<a href="#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+<hr>
+<a class="top" id="SEC_Top"></a>
+
+<div class="element-shortcontents" id="SEC_Shortcontents">
+<h2 class="shortcontents-heading">Short Table of Contents</h2>
+
+<div class="shortcontents">
+<ul class="toc-numbered-mark">
+<li><a id="stoc-Numbers-1" href="#toc-Numbers-1">1 Numbers</a></li>
+<li><a id="stoc-Sequences-and-Arrays-and-Hash-Tables-1" href="#toc-Sequences-and-Arrays-and-Hash-Tables-1">2 Sequences and Arrays and Hash Tables</a></li>
+<li><a id="stoc-Characters-1" href="#toc-Characters-1">3 Characters</a></li>
+<li><a id="stoc-Lists-1" href="#toc-Lists-1">4 Lists</a></li>
+<li><a id="stoc-Streams-and-Reading-1" href="#toc-Streams-and-Reading-1">5 Streams and Reading</a></li>
+<li><a id="stoc-Special-Forms-and-Functions-1" href="#toc-Special-Forms-and-Functions-1">6 Special Forms and Functions</a></li>
+<li><a id="stoc-Compilation-1" href="#toc-Compilation-1">7 Compilation</a></li>
+<li><a id="stoc-subsection-Evaluation-at-Compile-time" href="#toc-subsection-Evaluation-at-Compile-time">subsection Evaluation at Compile time</a></li>
+<li><a id="stoc-Symbols-1" href="#toc-Symbols-1">8 Symbols</a></li>
+<li><a id="stoc-Operating-System-1" href="#toc-Operating-System-1">9 Operating System</a></li>
+<li><a id="stoc-Structures-1" href="#toc-Structures-1">10 Structures</a></li>
+<li><a id="stoc-Iteration-and-Tests-1" href="#toc-Iteration-and-Tests-1">11 Iteration and Tests</a></li>
+<li><a id="stoc-User-Interface-1" href="#toc-User-Interface-1">12 User Interface</a></li>
+<li><a id="stoc-Doc-1" href="#toc-Doc-1">13 Doc</a></li>
+<li><a id="stoc-Type-1" href="#toc-Type-1">14 Type</a></li>
+<li><a id="stoc-GCL-Specific-1" href="#toc-GCL-Specific-1">15 GCL Specific</a></li>
+<li><a id="stoc-C-Interface-1" href="#toc-C-Interface-1">16 C Interface</a></li>
+<li><a id="stoc-System-Definitions-1" href="#toc-System-Definitions-1">17 System Definitions</a></li>
+<li><a id="stoc-Debugging-1" href="#toc-Debugging-1">18 Debugging</a></li>
+<li><a id="stoc-Miscellaneous-1" href="#toc-Miscellaneous-1">19 Miscellaneous</a></li>
+<li><a id="stoc-Compiler-Definitions-1" href="#toc-Compiler-Definitions-1">20 Compiler Definitions</a></li>
+<li><a id="stoc-JAPI-GUI-Library-Binding-1" href="#toc-JAPI-GUI-Library-Binding-1">21 JAPI GUI Library Binding</a></li>
+<li><a id="stoc-Function-Index-1" href="#toc-Function-Index-1" rel="index">Appendix A Function Index</a></li>
+<li><a id="stoc-Variable-Index-1" href="#toc-Variable-Index-1" rel="index">Appendix B Variable Index</a></li>
+</ul>
+</div>
+</div>
+<div class="element-contents" id="SEC_Contents">
+<h2 class="contents-heading">Table of Contents</h2>
+
+<div class="contents">
+
+<ul class="toc-numbered-mark">
+  <li><a id="toc-Numbers-1" href="Numbers.html">1 Numbers</a></li>
+  <li><a id="toc-Sequences-and-Arrays-and-Hash-Tables-1" href="Sequences-and-Arrays-and-Hash-Tables.html">2 Sequences and Arrays and Hash Tables</a></li>
+  <li><a id="toc-Characters-1" href="Characters.html">3 Characters</a></li>
+  <li><a id="toc-Lists-1" href="Lists.html">4 Lists</a></li>
+  <li><a id="toc-Streams-and-Reading-1" href="Streams-and-Reading.html">5 Streams and Reading</a></li>
+  <li><a id="toc-Special-Forms-and-Functions-1" href="Special-Forms-and-Functions.html">6 Special Forms and Functions</a></li>
+  <li><a id="toc-Compilation-1" href="Compilation.html">7 Compilation</a></li>
+  <li><a id="toc-subsection-Evaluation-at-Compile-time" href="Compilation.html#subsection-Evaluation-at-Compile-time">subsection Evaluation at Compile time</a></li>
+  <li><a id="toc-Symbols-1" href="Symbols.html">8 Symbols</a></li>
+  <li><a id="toc-Operating-System-1" href="Operating-System.html">9 Operating System</a>
+  <ul class="toc-numbered-mark">
+    <li><a id="toc-Command-Line-1" href="Command-Line.html">9.1 Command Line</a></li>
+    <li><a id="toc-Operating-System-Definitions-1" href="Operating-System-Definitions.html">9.2 Operating System Definitions</a></li>
+  </ul></li>
+  <li><a id="toc-Structures-1" href="Structures.html">10 Structures</a></li>
+  <li><a id="toc-Iteration-and-Tests-1" href="Iteration-and-Tests.html">11 Iteration and Tests</a></li>
+  <li><a id="toc-User-Interface-1" href="User-Interface.html">12 User Interface</a></li>
+  <li><a id="toc-Doc-1" href="Doc.html">13 Doc</a></li>
+  <li><a id="toc-Type-1" href="Type.html">14 Type</a></li>
+  <li><a id="toc-GCL-Specific-1" href="GCL-Specific.html">15 GCL Specific</a>
+  <ul class="toc-numbered-mark">
+    <li><a id="toc-Bignums-1" href="Bignums.html">15.1 Bignums</a></li>
+  </ul></li>
+  <li><a id="toc-C-Interface-1" href="C-Interface.html">16 C Interface</a>
+  <ul class="toc-numbered-mark">
+    <li><a id="toc-Available-Symbols-1" href="Available-Symbols.html">16.1 Available Symbols</a></li>
+  </ul></li>
+  <li><a id="toc-System-Definitions-1" href="System-Definitions.html">17 System Definitions</a>
+  <ul class="toc-numbered-mark">
+    <li><a id="toc-Regular-Expressions-1" href="Regular-Expressions.html">17.1 Regular Expressions</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Ordering-Multiple-Matches" href="Regular-Expressions.html#Ordering-Multiple-Matches">Ordering Multiple Matches</a></li>
+    </ul></li>
+  </ul></li>
+  <li><a id="toc-Debugging-1" href="Debugging.html">18 Debugging</a>
+  <ul class="toc-numbered-mark">
+    <li><a id="toc-Source-Level-Debugging-in-Emacs-1" href="Source-Level-Debugging-in-Emacs.html">18.1 Source Level Debugging in Emacs</a></li>
+    <li><a id="toc-Low-Level-Debug-Functions-1" href="Low-Level-Debug-Functions.html">18.2 Low Level Debug Functions</a></li>
+  </ul></li>
+  <li><a id="toc-Miscellaneous-1" href="Miscellaneous.html">19 Miscellaneous</a>
+  <ul class="toc-numbered-mark">
+    <li><a id="toc-Environment-1" href="Environment.html">19.1 Environment</a></li>
+    <li><a id="toc-Initialization" href="Inititialization.html">19.2 Initialization</a></li>
+    <li><a id="toc-Low-Level-X-Interface-1" href="Low-Level-X-Interface.html">19.3 Low Level X Interface</a></li>
+  </ul></li>
+  <li><a id="toc-Compiler-Definitions-1" href="Compiler-Definitions.html">20 Compiler Definitions</a></li>
+  <li><a id="toc-JAPI-GUI-Library-Binding-1" href="JAPI-GUI-Library-Binding.html">21 JAPI GUI Library Binding</a></li>
+  <li><a id="toc-Function-Index-1" href="Function-Index.html" rel="index">Appendix A Function Index</a></li>
+  <li><a id="toc-Variable-Index-1" href="Variable-Index.html" rel="index">Appendix B Variable Index</a></li>
+</ul>
+</div>
+</div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Numbers.html" accesskey="n" rel="next">Numbers</a>, Previous: <a href="../dir_html/index.html" accesskey="p" rel="prev">(dir)</a>, Up: <a href="../dir_html/index.html" accesskey="u" rel="up">(dir)</a> &nbsp; [<a href="#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Function-Index.html" title="Index" rel="index">Index</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/Argument-Lists.html
@@ -0,0 +1,149 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Argument Lists (GCL TK Manual)</title>
+
+<meta name="description" content="Argument Lists (GCL TK Manual)">
+<meta name="keywords" content="Argument Lists (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="General.html" rel="up" title="General">
+<link href="Lisp-Functions-Invoked-from-Graphics.html" rel="next" title="Lisp Functions Invoked from Graphics">
+<link href="Return-Values.html" rel="prev" title="Return Values">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Argument-Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Lisp-Functions-Invoked-from-Graphics.html" accesskey="n" rel="next">Lisp Functions Invoked from Graphics</a>, Previous: <a href="Return-Values.html" accesskey="p" rel="prev">Return Values</a>, Up: <a href="General.html" accesskey="u" rel="up">General</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Argument-Lists-1"><span>1.5 Argument Lists<a class="copiable-link" href="#Argument-Lists-1"> &para;</a></span></h3>
+
+<ul class="mini-toc">
+<li><a href="#Widget-Functions" accesskey="1">Widget Functions</a></li>
+<li><a href="#Widget-Constructor-Argument-Lists" accesskey="2">Widget Constructor Argument Lists</a></li>
+<li><a href="#Concatenation-Using-_0060_003a_0027-in-Argument-List" accesskey="3">Concatenation Using &lsquo;:&rsquo; in Argument List</a></li>
+</ul>
+<div class="subsection-level-extent" id="Widget-Functions">
+<h4 class="subsection"><span>1.5.1 Widget Functions<a class="copiable-link" href="#Widget-Functions"> &para;</a></span></h4>
+
+<p>The rule is that the first argument for a widget function is a keyword,
+called the <i class="i">option</i>.  The pattern of the remaining arguments depends
+completely
+on the <i class="i">option</i> argument.  Thus
+</p>
+<div class="example">
+<pre class="example-preformatted">(.hello <i class="i">option</i> ?arg1? ?arg2? ...)
+</pre></div>
+
+<p>One <i class="i">option</i> which is permitted for every widget function is
+<code class="code">:configure</code>.  The argument pattern following it is the same
+keyword/value pair list which is used in widget creation.  For a
+<code class="code">button</code> widget, the other valid options are <code class="code">:deactivate</code>,
+<code class="code">:flash</code>, and <code class="code">:invoke</code>.   To find these, since
+<code class="code">.hello</code> was constructed with the <code class="code">button</code> constructor, you
+should see See <a class="xref" href="button.html">button</a>.  
+The argument pattern for other options depends completely on the option
+and the widget function.
+For example if <code class="code">.scrollbar</code> is a scroll bar window, then the option
+<code class="code">:set</code> must be followed by 4 numeric arguments, which indicate how
+the scrollbar should be displayed, see See <a class="xref" href="scrollbar.html">scrollbar</a>. 
+</p>
+<div class="example">
+<pre class="example-preformatted">(.scrollbar :set a1 a2 a3 a4)
+</pre></div>
+
+<p>If on the other hand <code class="code">.scale</code> is a scale (see <a class="pxref" href="scale.html">scale</a>), then we have
+</p>
+<div class="example">
+<pre class="example-preformatted">(.scale :set a1 )
+</pre></div>
+<p>only one numeric argument should be supplied, in order to position the
+scale.
+</p>
+</div>
+<div class="subsection-level-extent" id="Widget-Constructor-Argument-Lists">
+<h4 class="subsection"><span>1.5.2 Widget Constructor Argument Lists<a class="copiable-link" href="#Widget-Constructor-Argument-Lists"> &para;</a></span></h4>
+
+<p>These are
+</p>
+<div class="example">
+<pre class="example-preformatted">(widget-constructor <i class="i">pathname</i> :keyword1 value1 :keyword2 value2 ...)
+</pre></div>
+
+<p>to create the widget whose name is <i class="i">pathname</i>.  The possible keywords
+allowed are specified in the corresponding section of See <a class="xref" href="Widgets.html">Widgets</a>.
+</p>
+</div>
+<div class="subsection-level-extent" id="Concatenation-Using-_0060_003a_0027-in-Argument-List">
+<h4 class="subsection"><span>1.5.3 Concatenation Using &lsquo;:&rsquo; in Argument List<a class="copiable-link" href="#Concatenation-Using-_0060_003a_0027-in-Argument-List"> &para;</a></span></h4>
+
+<p>What has been said so far about arguments is not quite true.  A
+special string concatenation construction is allowed in argument lists
+for widgets, widget constructors and control functions.
+</p>
+<p>First we introduce the function <code class="code">tk-conc</code> which takes an arbitrary
+number of arguments, which may be symbols, strings or numbers, and 
+concatenates these into a string.   The print names of symbols are 
+converted to lower case, and package names are ignored.
+</p>
+<div class="example">
+<pre class="example-preformatted">(tk-conc &quot;a&quot; 1 :b 'cd &quot;e&quot;) ==&gt; &quot;a1bcde&quot;
+</pre></div>
+
+<p>One could use <code class="code">tk-conc</code> to construct arguments for widget
+functions.  But even though <code class="code">tk-conc</code> has been made quite
+efficient, it still would involve the creation of a string.   The
+<code class="code">:</code> construct avoids this.   In a call to a widget function,
+a widget constructor, or a control function you may remove the call to
+<code class="code">tk-conc</code> and place <code class="code">:</code> in between each of its arguments.
+Those functions are able to understand this and treat the extra
+arguments as if they were glued together in one string, but without
+the extra cost of actually forming that string.
+</p>
+<div class="example">
+<pre class="example-preformatted">(tk-conc a b c .. w) &lt;==&gt; a : b : c : ... w
+(setq i 10)
+(.hello :configure :text i : &quot; pies&quot;)
+(.hello :configure :text (tk-conc i  &quot; pies&quot;))
+(.hello :configure :text (format nil &quot;~a pies&quot; i))
+</pre></div>
+
+<p>The last three examples would all result in the text string being
+<code class="code">&quot;10 pies&quot;</code>, but the first method is the most efficient.
+That call will be made with no string or cons creation.   The 
+<b class="b">GC Monitor</b> example, is written in such a way that there is no
+creation of <code class="code">cons</code> or <code class="code">string</code> types during normal operation.
+This is particularly useful in that case, since one is trying to 
+monitor usage of conses by other programs, not its own usage.
+</p>
+</div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Lisp-Functions-Invoked-from-Graphics.html">Lisp Functions Invoked from Graphics</a>, Previous: <a href="Return-Values.html">Return Values</a>, Up: <a href="General.html">General</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/Common-Features-of-Widgets.html
@@ -0,0 +1,144 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Common Features of Widgets (GCL TK Manual)</title>
+
+<meta name="description" content="Common Features of Widgets (GCL TK Manual)">
+<meta name="keywords" content="Common Features of Widgets (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="General.html" rel="up" title="General">
+<link href="Return-Values.html" rel="next" title="Return Values">
+<link href="Getting-Started.html" rel="prev" title="Getting Started">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Common-Features-of-Widgets">
+<div class="nav-panel">
+<p>
+Next: <a href="Return-Values.html" accesskey="n" rel="next">Return Values</a>, Previous: <a href="Getting-Started.html" accesskey="p" rel="prev">Getting Started</a>, Up: <a href="General.html" accesskey="u" rel="up">General</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Common-Features-of-Widgets-1"><span>1.3 Common Features of Widgets<a class="copiable-link" href="#Common-Features-of-Widgets-1"> &para;</a></span></h3>
+
+<p>A <i class="i">widget</i> is a lisp symbol which has a function binding.   The
+first argument is always a keyword and is called the <i class="i">option</i>.
+The argument pattern for the remaining arguments depends on the
+<i class="i">option</i>.    The most common <i class="i">option</i> is <code class="code">:configure</code> in
+which case the remaining arguments are alternating keyword/value
+pairs, with the same keywords being permitted as at the creation
+of the widget.
+</p>
+<p>A <i class="i">widget</i> is created by means of a <i class="i">widget constructor</i>, of
+which there are currently 15, each of them appearing as the title of a
+section in <a class="ref" href="Widgets.html">Widgets</a>.  They live in the <code class="code">&quot;TK&quot;</code> package, and for
+the moment we will assume we have switched to this package.  Thus for
+example <code class="code">button</code> is such a widget constructor function.   Of course
+this is lisp, and you can make your own widget constructors, but when
+you do so it is a good idea to follow the standard argument patterns
+that are outlined in this section.
+</p>
+<div class="example">
+<pre class="example-preformatted">(button '.hello)
+==&gt; .HELLO
+</pre></div>
+<p>creates a <i class="i">widget</i> whose name is <code class="code">.hello</code>.  There is a parent child
+hierarchy among widgets which is implicit in the name used for the
+widget.   This is much like the pathname structure on a Unix or Dos
+file system, except that <code class="code">'.'</code> is used as the separator rather
+than a <code class="code">/</code> or <code class="code">\</code>.   For this reason the widget instances
+are sometimes referred to as <i class="i">pathnames</i>.   A child of the
+parent widget <code class="code">.hello</code> might be called <code class="code">.hello.joe</code>, and
+a child of this last might be <code class="code">.hello.joe.bar</code>.  The parent of
+everyone is called <code class="code">.</code> .   Multiple top level windows are created
+using the <code class="code">toplevel</code> command (see <a class="pxref" href="toplevel.html">toplevel</a>).
+</p>
+<p>The widget constructor functions take keyword and  value  pairs, which
+allow you to specify attributes at the time of creation:
+</p>
+<div class="example">
+<pre class="example-preformatted">(button '.hello :text &quot;Hello World&quot; :width 20)
+==&gt;.HELLO
+</pre></div>
+<p>indicating that we want the text in the button window to be
+<code class="code">Hello World</code> and the width of the window to be 20 characters
+wide.  Other types of windows allow specification in centimeters
+<code class="code">2c</code>, or in inches (<code class="code">2i</code>) or in millimeters <code class="code">2m</code>
+or in pixels <code class="code">2</code>.   But text windows usually have their
+dimensions specified as multiples of a character width and height.
+This latter concept is called a grid.
+</p>
+<p>Once the window has been created, if you want to change the
+text you do NOT do:
+</p><div class="example">
+<pre class="example-preformatted">(button '.hello :text &quot;Bye World&quot; :width 20)
+</pre></div>
+<p>This would be in error, because the window .hello already exists.
+You would either have to first call
+</p>
+<div class="example">
+<pre class="example-preformatted">(destroy '.hello)
+</pre></div>
+
+<p>But usually you just want to change an attribute.  <code class="code">.hello</code> is
+actually a function, as we mentioned earlier, and it is this function
+that you use:
+</p>
+<div class="example">
+<pre class="example-preformatted">(.hello :configure :text &quot;Bye World&quot;)
+</pre></div>
+
+<p>This would simply change the text, and not change where the window had
+been placed on the screen (if it had), or how it had been packed
+into the window hierarchy.   Here the argument <code class="code">:configure</code> is
+called an <i class="i">option</i>, and it specifies which types of keywords can
+follow it.   For example
+</p>
+<div class="example">
+<pre class="example-preformatted">(.hello :flash)
+</pre></div>
+<p>is also valid, but in this case the <code class="code">:text</code> keyword is not permitted
+after flash.   If it were, then it would mean something else besides
+what it means in the above.  For example one might have defined
+</p>
+<div class="example">
+<pre class="example-preformatted">(.hello :flash :text &quot;PUSH ME&quot;)
+</pre></div>
+<p>so here the same keyword <code class="code">:text</code> would mean something else, eg
+to flash a subliminal message on the screen.
+</p>
+<p>We often refer to calls to the widget functions 
+as messages.   One reason for this is that they actually turn into
+messages to the graphics process <samp class="file">gcltksrv</samp>.   To actually see these
+messages you can do
+</p><div class="example">
+<pre class="example-preformatted">(debugging t).
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Return-Values.html">Return Values</a>, Previous: <a href="Getting-Started.html">Getting Started</a>, Up: <a href="General.html">General</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/Control.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Control (GCL TK Manual)</title>
+
+<meta name="description" content="Control (GCL TK Manual)">
+<meta name="keywords" content="Control (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Widgets.html" rel="prev" title="Widgets">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Control">
+<div class="nav-panel">
+<p>
+Previous: <a href="Widgets.html" accesskey="p" rel="prev">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Control-1"><span>3 Control<a class="copiable-link" href="#Control-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="after.html" accesskey="1">after</a></li>
+<li><a href="bind.html" accesskey="2">bind</a></li>
+<li><a href="destroy.html" accesskey="3">destroy</a></li>
+<li><a href="tk_002ddialog.html" accesskey="4">tk-dialog</a></li>
+<li><a href="exit.html" accesskey="5">exit</a></li>
+<li><a href="focus.html" accesskey="6">focus</a></li>
+<li><a href="grab.html" accesskey="7">grab</a></li>
+<li><a href="tk_002dlistbox_002dsingle_002dselect.html" accesskey="8">tk-listbox-single-select</a></li>
+<li><a href="lower.html" accesskey="9">lower</a></li>
+<li><a href="tk_002dmenu_002dbar.html">tk-menu-bar</a></li>
+<li><a href="option.html">option</a></li>
+<li><a href="options.html">options</a></li>
+<li><a href="pack_002dold.html">pack-old</a></li>
+<li><a href="pack.html">pack</a></li>
+<li><a href="place.html">place</a></li>
+<li><a href="raise.html">raise</a></li>
+<li><a href="selection.html">selection</a></li>
+<li><a href="send.html">send</a></li>
+<li><a href="tk.html">tk</a></li>
+<li><a href="tkerror.html">tkerror</a></li>
+<li><a href="tkvars.html">tkvars</a></li>
+<li><a href="tkwait.html">tkwait</a></li>
+<li><a href="update.html">update</a></li>
+<li><a href="winfo.html">winfo</a></li>
+<li><a href="wm.html">wm</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/General.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>General (GCL TK Manual)</title>
+
+<meta name="description" content="General (GCL TK Manual)">
+<meta name="keywords" content="General (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Widgets.html" rel="next" title="Widgets">
+<link href="index.html" rel="prev" title="Top">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="General">
+<div class="nav-panel">
+<p>
+Next: <a href="Widgets.html" accesskey="n" rel="next">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="General-1"><span>1 General<a class="copiable-link" href="#General-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Introduction.html" accesskey="1">Introduction</a></li>
+<li><a href="Getting-Started.html" accesskey="2">Getting Started</a></li>
+<li><a href="Common-Features-of-Widgets.html" accesskey="3">Common Features of Widgets</a></li>
+<li><a href="Return-Values.html" accesskey="4">Return Values</a></li>
+<li><a href="Argument-Lists.html" accesskey="5">Argument Lists</a></li>
+<li><a href="Lisp-Functions-Invoked-from-Graphics.html" accesskey="6">Lisp Functions Invoked from Graphics</a></li>
+<li><a href="Linked-Variables.html" accesskey="7">Linked Variables</a></li>
+<li><a href="tkconnect.html" accesskey="8">tkconnect</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/Getting-Started.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Getting Started (GCL TK Manual)</title>
+
+<meta name="description" content="Getting Started (GCL TK Manual)">
+<meta name="keywords" content="Getting Started (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="General.html" rel="up" title="General">
+<link href="Common-Features-of-Widgets.html" rel="next" title="Common Features of Widgets">
+<link href="Introduction.html" rel="prev" title="Introduction">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Getting-Started">
+<div class="nav-panel">
+<p>
+Next: <a href="Common-Features-of-Widgets.html" accesskey="n" rel="next">Common Features of Widgets</a>, Previous: <a href="Introduction.html" accesskey="p" rel="prev">Introduction</a>, Up: <a href="General.html" accesskey="u" rel="up">General</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Getting-Started-1"><span>1.2 Getting Started<a class="copiable-link" href="#Getting-Started-1"> &para;</a></span></h3>
+
+<p>Once <b class="b">GCL</b> has been properly installed you should be able to do the
+following simple example:
+</p>
+<div class="example">
+<pre class="example-preformatted">(in-package &quot;TK&quot;)
+(tkconnect)
+(button '.hello :text &quot;Hello World&quot; :command '(print &quot;hi&quot;))
+==&gt;.HELLO
+(pack '.hello)
+</pre></div>
+<p>We first switched to the &quot;TK&quot; package, so that functions like button
+and pack would be found.  
+After doing the tkconnect, a window should appear on your screen, see See <a class="xref" href="tkconnect.html">tkconnect</a>.
+The invocation of the function <code class="code">button</code> creates a new function
+called <code class="code">.hello</code> which is a <i class="i">widget function</i>.   It is then
+made visible in the window by using the <code class="code">pack</code> function.
+</p>
+<p>You may now click on the little window, and you should see the command
+executed in your lisp.  Thus &quot;hi&quot; should be printed in the lisp
+window.  This will happen whether or not you have a job running in
+the lisp, that is lisp will be interrupted and your command will run,
+and then return the control to your program.
+</p>
+<p>The function <code class="code">button</code> is called a widget constructor, and the
+function <code class="code">.hello</code> is called a widget.  If you have managed to
+accomplish the above, then <b class="b">GCL</b> is probably installed correctly, and you
+can graduate to the next section!  If you dont like reading but prefer
+to look at demos and code, then you should look in the demos directory,
+where you will find a number of examples.  A monitor for the garbage
+collector (mkgcmonitor), a demonstration of canvas widgets (mkitems),
+a sample listbox with scrolling (mklistbox).   
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/Introduction.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Introduction (GCL TK Manual)</title>
+
+<meta name="description" content="Introduction (GCL TK Manual)">
+<meta name="keywords" content="Introduction (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="General.html" rel="up" title="General">
+<link href="Getting-Started.html" rel="next" title="Getting Started">
+<link href="General.html" rel="prev" title="General">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Introduction">
+<div class="nav-panel">
+<p>
+Next: <a href="Getting-Started.html" accesskey="n" rel="next">Getting Started</a>, Previous: <a href="General.html" accesskey="p" rel="prev">General</a>, Up: <a href="General.html" accesskey="u" rel="up">General</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Introduction-1"><span>1.1 Introduction<a class="copiable-link" href="#Introduction-1"> &para;</a></span></h3>
+
+<p><b class="b">GCL-TK</b> is a windowing interface for <b class="b">GNU Common Lisp</b>.   It provides the
+functionality of the <b class="b">TK</b> widget set, which in turn implements a widget
+set which has the look and feel of <b class="b">Motif</b>.
+</p>
+<p>The interface allows the user to draw graphics, get input from menus,
+make regions mouse sensitive, and bind lisp commands to regions.  It
+communicates over a socket with a <samp class="file">gcltksrv</samp> process, which speaks to the
+display via the <b class="b">TK</b> library.  The displaying process may run on
+a machine which is closer to the display, and so involves less
+communication.  It also may remain active even though the lisp is
+involved in a separate user computation.  The display server can, however,
+interrupt the lisp at will, to inquire about variables and run
+commands.   
+</p>
+<p>The user may also interface with existing <code class="code">TCL/TK</code> programs,
+binding some buttons, or tracking some objects.
+</p>
+<p>The size of the program is moderate.   In its current form it adds only
+about 45K bytes to the lisp image, and the <samp class="file">gcltksrv</samp> program uses shared
+libraries, and is on the order of 150Kbytes on a sparc.
+</p>
+<p>This chapter describes some of the common features of the command
+structure of widgets, and of control functions.   The actual functions
+for construction of windows 
+are discussed in <a class="ref" href="Widgets.html">Widgets</a>, and more general functions
+for making them appear, lowering them, querying about them in <a class="ref" href="Control.html">Control</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/Linked-Variables.html
@@ -0,0 +1,142 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Linked Variables (GCL TK Manual)</title>
+
+<meta name="description" content="Linked Variables (GCL TK Manual)">
+<meta name="keywords" content="Linked Variables (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="General.html" rel="up" title="General">
+<link href="tkconnect.html" rel="next" title="tkconnect">
+<link href="Lisp-Functions-Invoked-from-Graphics.html" rel="prev" title="Lisp Functions Invoked from Graphics">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Linked-Variables">
+<div class="nav-panel">
+<p>
+Next: <a href="tkconnect.html" accesskey="n" rel="next">tkconnect</a>, Previous: <a href="Lisp-Functions-Invoked-from-Graphics.html" accesskey="p" rel="prev">Lisp Functions Invoked from Graphics</a>, Up: <a href="General.html" accesskey="u" rel="up">General</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Linked-Variables-1"><span>1.7 Linked Variables<a class="copiable-link" href="#Linked-Variables-1"> &para;</a></span></h3>
+
+<p>It is possible to link lisp variables to <b class="b">TK</b> variables.  In general
+when the <b class="b">TK</b> variable is changed, by for instance clicking on a
+radiobutton, the linked lisp variable will be changed.  Conversely
+changing the lisp variable will be noticed by the <b class="b">TK</b> graphics side, if
+one does the assignment in lisp using <code class="code">setk</code> instead of
+<code class="code">setq</code>.
+</p>
+<div class="example">
+<pre class="example-preformatted">(button '.hello :textvariable '*message* :text &quot;hi there&quot;)
+(pack '.hello)
+</pre></div>
+
+<p>This causes linking of the global variable <code class="code">*message*</code> in lisp
+to a corresponding variable in <b class="b">TK</b>.  Moreover the message that is in
+the button <code class="code">.hello</code> will be whatever the value of this global
+variable is (so long as the <b class="b">TK</b> side is notified of the change!).
+</p>
+<p>Thus if one does
+</p>
+<div class="example">
+<pre class="example-preformatted">(setk *message* &quot;good bye&quot;)
+</pre></div>
+
+<p>then the button will change to have <i class="i">good bye</i> as its text.
+The lisp macro <code class="code">setk</code> expands into
+</p>
+<div class="example">
+<pre class="example-preformatted">(prog1 (setf *message* &quot;good bye&quot;) (notice-text-variables))
+</pre></div>
+
+<p>which does the assignment, and then goes thru the linked variables
+checking for those that have changed, and updating the <b class="b">TK</b> side should
+there be any.   Thus if you have a more complex program which might
+have done the assignment of your global variable, you may include
+the call to <code class="code">notice-text-variables</code> at the end, to assure that
+the graphics side knows about the changes.
+</p>
+<p>A variable which is linked using the keyword <code class="code">:textvariable</code> is
+always a variable containing a string.
+</p>
+<p>However it is possible to have other types of variables.
+</p>
+<div class="example">
+<pre class="example-preformatted">(checkbutton '.checkbutton1 :text &quot;A button&quot; :variable '(boolean *joe*))
+(checkbutton '.checkbutton2 :text &quot;A button&quot; :variable '*joe*)
+(checkbutton '.checkbutton3 :text &quot;Debugging&quot; :variable '(t *debug*)
+              :onvalue 100 :offvalue -1)
+</pre></div>
+
+<p>The first two examples are the same in that the default variable type
+for a checkbutton is <code class="code">boolean</code>.  Notice that the specification of a
+variable type is by <code class="code">(<i class="i">type</i> variable)</code>.  The types which are
+permissible are those which have coercion-fucntions, See <a class="xref" href="Return-Values.html">Return Values</a>.  In the first example a variable <code class="code">*joe*</code> will be linked, and
+its default initial value will be set to nil, since the default initial
+state of the check button is off, and the default off value is nil.
+Actually on the <b class="b">TK</b> side, the corresponding boolean values are <code class="code">&quot;1&quot;</code>
+and <code class="code">&quot;0&quot;</code>, but the <code class="code">boolean</code> type makes these become <code class="code">t</code>
+and <code class="code">nil</code>.
+</p>
+<p>In the third example the variable *debug* may have any lisp value (here
+<i class="i">type</i> is <code class="code">t</code>).   The initial value will be made to be <code class="code">-1</code>,
+since the checkbutton is off.   Clicking on <code class="code">.checkbutton3</code> will
+result in the value of <code class="code">*debug*</code> being changed to 100, and the light
+in the button will be toggled to on, See <a class="xref" href="checkbutton.html">checkbutton</a>.  You may
+set the variable to be another value besides 100.
+</p>
+<p>You may also call
+</p>
+<div class="example">
+<pre class="example-preformatted">(link-text-variable '*joe* 'boolean)
+</pre></div>
+
+<p>to cause the linking of a variable named *joe*.  This is done
+automatically
+whenever the variable is specified after one of the keys
+</p>
+<div class="example">
+<pre class="example-preformatted">:variable   :textvariable.
+</pre></div>
+
+<p>Just as one must be cautious about using global variables in lisp, one
+must be cautious in making such linked variables.  In particular note
+that the <b class="b">TK</b> side, uses variables for various purposes.  If you make a
+checkbutton with pathname <code class="code">.a.b.c</code> then unless you specify a
+<code class="code">:variable</code> option, the variable <code class="code">c</code> will become associated to
+the <b class="b">TK</b> value of the checkbutton.  We do NOT link this variable by
+default, feeling that one might inadvertently alter global variables,
+and that they would not typically use the lisp convention of being of
+the form <code class="code">*c*</code>.  You must specify the <code class="code">:variable</code> option, or
+call <code class="code">link-variable</code>.
+</p>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="tkconnect.html">tkconnect</a>, Previous: <a href="Lisp-Functions-Invoked-from-Graphics.html">Lisp Functions Invoked from Graphics</a>, Up: <a href="General.html">General</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/Lisp-Functions-Invoked-from-Graphics.html
@@ -0,0 +1,193 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Lisp Functions Invoked from Graphics (GCL TK Manual)</title>
+
+<meta name="description" content="Lisp Functions Invoked from Graphics (GCL TK Manual)">
+<meta name="keywords" content="Lisp Functions Invoked from Graphics (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="General.html" rel="up" title="General">
+<link href="Linked-Variables.html" rel="next" title="Linked Variables">
+<link href="Argument-Lists.html" rel="prev" title="Argument Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Lisp-Functions-Invoked-from-Graphics">
+<div class="nav-panel">
+<p>
+Next: <a href="Linked-Variables.html" accesskey="n" rel="next">Linked Variables</a>, Previous: <a href="Argument-Lists.html" accesskey="p" rel="prev">Argument Lists</a>, Up: <a href="General.html" accesskey="u" rel="up">General</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Lisp-Functions-Invoked-from-Graphics-1"><span>1.6 Lisp Functions Invoked from Graphics<a class="copiable-link" href="#Lisp-Functions-Invoked-from-Graphics-1"> &para;</a></span></h3>
+
+
+<p>It is possible to make certain areas of a window mouse sensitive,
+or to run commands on reception of certain events such as keystrokes,
+while the focus is in a certain window.   This is done by having
+a lisp function invoked or some lisp form evaluated.   We shall
+refer to such a lisp function or form as a <em class="emph">command</em>. 
+</p>
+<p>For example
+</p>
+<div class="example">
+<pre class="example-preformatted">(button '.button :text &quot;Hello&quot; :command '(print &quot;hi&quot;))
+(button '.jim :text &quot;Call Jim&quot; :command 'call-jim)
+</pre></div>
+
+<p>In the first case when the window <code class="code">.button</code> is clicked on, the
+word &quot;hi&quot; will be printed in the lisp to standard output.   In the
+second case <code class="code">call-jim</code> will be funcalled with no arguments.
+</p>
+<p>A command must be one of the following three types.  What happens
+depends on which type it is:
+</p>
+<dl class="table">
+<dt>&lsquo;<samp class="samp">function</samp>&rsquo;</dt>
+<dd><p>If the value satisfies <code class="code">functionp</code> then it will be called with
+a number of arguments which is dependent on the way it was bound,
+to graphics.  
+</p></dd>
+<dt>&lsquo;<samp class="samp">string</samp>&rsquo;</dt>
+<dd><p>If the command is a string, then it is passed directly to <b class="b">TCL/TK</b>
+for evaluation on that side.  Lisp will not be required for the
+evaluation when the command is invoked.
+</p></dd>
+<dt>&lsquo;<samp class="samp">lisp form</samp>&rsquo;</dt>
+<dd><p>Any other lisp object is regarded as a lisp form to be eval&rsquo;d, and
+this will be done when the command is invoked.
+</p></dd>
+</dl>
+
+<p>The following keywords accept as their value a command:
+</p>
+<div class="example">
+<pre class="example-preformatted">   :command
+   :yscroll    :yscrollcommand
+   :xscroll    :xscrollcommand
+   :scrollcommand
+   :bind
+</pre></div>
+
+<p>and in addition <code class="code">bind</code> takes a command as its third argument,
+see See <a class="xref" href="bind.html">bind</a>.
+</p>
+<p>Below we give three different examples using the 3 possibilities for
+a command: functionp, string, and lisp form.  They all accomplish
+exactly the same thing.  
+For given a frame <code class="code">.frame</code> we could construct a listbox
+in it as:
+</p>
+<div class="example">
+<pre class="example-preformatted">(listbox '.frame.listbox :yscroll 'joe)
+</pre></div>
+
+<p>Then whenever the listbox view position changes, or text is inserted,
+so that something changes, the function <code class="code">joe</code> will be invoked with 4
+arguments giving the totalsize of the text, maximum number of units
+the window can display, the index of the top unit, and finally the
+index of the bottom unit.   What these arguments are is specific
+to the widget <code class="code">listbox</code> and is documented See <a class="xref" href="listbox.html">listbox</a>.
+</p>
+<p><code class="code">joe</code> might be used to do anything, but a common usage is to have
+<code class="code">joe</code> alter the position of some other window, such as a scroll
+bar window.   Indeed if <code class="code">.scrollbar</code> is a scrollbar then
+the function
+</p>
+<div class="example">
+<pre class="example-preformatted">(defun joe (a b c d)
+  (.scrollbar :set a b c d))
+</pre></div>
+
+<p>would look after sizing the scrollbar appropriately for the percentage
+of the window visible, and positioning it.
+</p>
+<p>A second method of accomplishing this identical, using a string (the
+second type of command),
+</p>
+
+<div class="example">
+<pre class="example-preformatted">(listbox '.frame.listbox :yscroll &quot;.scrollbar set&quot;)
+</pre></div>
+
+<p>and this will not involve a call back to lisp.   It uses the fact that
+the <b class="b">TK</b> graphics side understands the window name <code class="code">.scrollbar</code> and
+that it takes the <i class="i">option</i> <code class="code">set</code>.   Note that it does not get
+the <code class="code">:</code> before the keyword in this case.
+</p>
+<p>In the case of a command which is a <i class="i">lisp form</i> but is not installed
+via <code class="code">bind</code> or <code class="code">:bind</code>, then the form will be installed as
+</p>
+<div class="example">
+<pre class="example-preformatted">#'(lambda (&amp;rest *arglist*) <i class="i">lisp-form</i>)
+</pre></div>
+
+<p>where the <i class="i">lisp-form</i> might wish to access the elements of the special
+variable <code class="code">*arglist*</code>.   Most often this list will be empty, but for
+example if the command was setup for <code class="code">.scale</code> which is a <i class="i">scale</i>,
+then the command will be supplied one argument which is the new numeric
+value which is the scale position.  A third way of accomplishing the
+scrollbar setting using a lisp form is:
+</p>
+<div class="example">
+<pre class="example-preformatted">(listbox '.frame.listbox :yscroll '(apply '.scrollbar :set *arglist*))
+</pre></div>
+
+<p>The <code class="code">bind</code> command and <code class="code">:bind</code> keyword, have an additional
+wrinkle, see See <a class="xref" href="bind.html">bind</a>.   These are associated to an event in a
+particular window, and the lisp function or form to be evaled must have
+access to that information.   For example the x y position, the window
+name, the key pressed, etc.   This is done via <i class="i">percent symbols</i> which
+are specified, see See <a class="xref" href="bind.html">bind</a>.
+</p>
+<div class="example">
+<pre class="example-preformatted">(bind &quot;Entry&quot; &quot;&lt;Control-KeyPress&gt;&quot; '(emacs-move  %W %A ))
+</pre></div>
+
+<p>will cause the function emacs-move to be be invoked whenever a control
+key is pressed (unless there are more key specific or window specific
+bindings of said key).   It will be invoked with two arguments, the
+first %W indicating the window in which it was invoked, and the second
+being a string which is the ascii keysym which was pressed at the same
+time as the control key.
+</p>
+<p>These <i class="i">percent constructs</i> are only permitted in commands which are
+invoked via <code class="code">bind</code> or <code class="code">:bind</code>.  The lisp form which is passed
+as the command, is searched for the percent constructs, and then a
+function
+</p>
+<div class="example">
+<pre class="example-preformatted">#'(lambda (%W %A) (emacs-move %W %A))
+</pre></div>
+
+<p>will be invoked with two arguments, which will be supplied by the
+<b class="b">TK</b> graphics server, at the time the command is invoked.   The
+<code class="code">*arglist*</code> construct is not available for these commands.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Linked-Variables.html">Linked Variables</a>, Previous: <a href="Argument-Lists.html">Argument Lists</a>, Up: <a href="General.html">General</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/Return-Values.html
@@ -0,0 +1,170 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Return Values (GCL TK Manual)</title>
+
+<meta name="description" content="Return Values (GCL TK Manual)">
+<meta name="keywords" content="Return Values (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="General.html" rel="up" title="General">
+<link href="Argument-Lists.html" rel="next" title="Argument Lists">
+<link href="Common-Features-of-Widgets.html" rel="prev" title="Common Features of Widgets">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Return-Values">
+<div class="nav-panel">
+<p>
+Next: <a href="Argument-Lists.html" accesskey="n" rel="next">Argument Lists</a>, Previous: <a href="Common-Features-of-Widgets.html" accesskey="p" rel="prev">Common Features of Widgets</a>, Up: <a href="General.html" accesskey="u" rel="up">General</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="Return-Values-1"><span>1.4 Return Values<a class="copiable-link" href="#Return-Values-1"> &para;</a></span></h3>
+
+<ul class="mini-toc">
+<li><a href="#Widget-Constructor-Return-Values" accesskey="1">Widget Constructor Return Values</a></li>
+<li><a href="#Widget-Return-Values" accesskey="2">Widget Return Values</a></li>
+<li><a href="#Control-Function-Return-Values" accesskey="3">Control Function Return Values</a></li>
+</ul>
+<div class="subsection-level-extent" id="Widget-Constructor-Return-Values">
+<h4 class="subsection"><span>1.4.1 Widget Constructor Return Values<a class="copiable-link" href="#Widget-Constructor-Return-Values"> &para;</a></span></h4>
+
+<p>On successful completion, the widget constructor functions return the
+symbol passed in as the first argument.   It will now have a functional
+binding.   It is an error to pass in a symbol which already corresponds
+to a widget, without first calling the <code class="code">destroy</code> command.   On failure,
+an error is signalled.
+</p>
+</div>
+<div class="subsection-level-extent" id="Widget-Return-Values">
+<h4 class="subsection"><span>1.4.2 Widget Return Values<a class="copiable-link" href="#Widget-Return-Values"> &para;</a></span></h4>
+
+<p>The <i class="i">widget</i> functions themselves, do not normally return any value.
+Indeed the lisp process does not wait for them to return, but merely
+dispatches the commands, such as to change the text in themselves.
+Sometimes however you either wish to wait, in order to synchronize, or
+you wish to see if your command fails or succeeds.  You request values
+by passing the keyword :return and a value indicating the type.   
+</p>
+<div class="example">
+<pre class="example-preformatted">(.hello :configure :text &quot;Bye World&quot; :return 'string)
+==&gt; &quot;&quot; 
+==&gt; T
+</pre></div>
+<p>the empty string is returned as first value, and the second value
+<code class="code">T</code> indicates that the new text value was successfully set.  LISP
+will not continue until the tkclsrv process indicates back that the
+function call has succeeded.  While waiting of course LISP will continue
+to process other graphics events which arrive, since otherwise a
+deadlock would arise: the user for instance might click on a mouse, just after
+we had decided to wait for a return value from the <code class="code">.hello</code> function.
+More generally a user program may be running in <b class="b">GCL</b> and be interrupted
+to receive and act on communications from the <samp class="file">gcltksrv</samp>
+process.   If an error occurred then the second return value of the
+lisp function will be NIL.  In this case the first value, the string
+is usually an informative message about the type of error.
+</p>
+<p>A special variable <code class="code">tk::*break-on-errors*</code> which if not
+<code class="code">nil</code>, requests that that <b class="b">LISP</b> signal an error when a message
+is received indicating a function failed.  Whenever a command fails,
+whether a return value was requested or not, <samp class="file">gcltksrv</samp> returns a
+message indicating failure.  The default is to not go into the
+debugger.  When debugging your windows it may be convenient however to
+set this variable to <code class="code">T</code> to track down incorrect messages.
+</p>
+<p>The <samp class="file">gcltksrv</samp> process always returns strings as values.
+If <code class="code">:return</code> <i class="i">type</i> is specified, then conversion to <i class="i">type</i>
+is accomplished by calling
+</p>
+<div class="example">
+<pre class="example-preformatted">(coerce-result <i class="i">return-string</i> <i class="i">type</i>)
+</pre></div>
+
+<p>Here <i class="i">type</i> must be a symbol with a <code class="code">coercion-functions</code>
+property.
+The builtin return types which may be requested are:
+</p>
+<dl class="table">
+<dt><code class="code">T</code></dt>
+<dd><p>in which case
+the string passed back from the <samp class="file">gcltksrv</samp> process, will be read by the
+lisp reader.
+</p></dd>
+<dt><code class="code">number</code></dt>
+<dd><p>the string is converted to a number using the current *read-base*
+</p></dd>
+<dt><code class="code">list-strings</code></dt>
+<dd>
+<div class="example">
+<pre class="example-preformatted">(coerce-result &quot;a b {c d} e&quot; 'list-strings)
+==&gt; (&quot;a&quot; &quot;b&quot; &quot;c d&quot; &quot;e&quot;)
+</pre></div>
+</dd>
+<dt><code class="code">boolean</code></dt>
+<dd><p>(coerce-result &quot;1&quot; &rsquo;boolean)
+==&gt; T
+(coerce-result &quot;0&quot; &rsquo;boolean)
+==&gt; NIL
+</p></dd>
+</dl>
+
+<p>The above symbols are in the <code class="code">TK</code> or <code class="code">LISP</code> package.
+It would be possible to add new types just as the <code class="code">:return t</code>
+is done:
+</p>
+<div class="example">
+<pre class="example-preformatted">(setf (get 't 'coercion-functions)
+      (cons #'(lambda (x) (our-read-from-string x 0))
+	    #'(lambda (x) (format nil &quot;~s&quot; x))))
+</pre></div>
+
+<p>The <code class="code">coercion-functions</code> property of a symbol, is a cons whose
+<code class="code">car</code> is the coercion form from a string to some possibly different
+lisp object, and whose <code class="code">cdr</code> is a function which builds a string
+to send to the graphics server.   Often the two functions are inverse
+functions one of the other up to equal.
+</p>
+</div>
+<div class="subsection-level-extent" id="Control-Function-Return-Values">
+<h4 class="subsection"><span>1.4.3 Control Function Return Values<a class="copiable-link" href="#Control-Function-Return-Values"> &para;</a></span></h4>
+
+<p>The <i class="i">control</i> funcions (see <a class="pxref" href="Control.html">Control</a>)  do not return a value
+or wait unless requested to do so, using the <code class="code">:return</code> keyword.
+The types and method of specification are the same as for the
+Widget Functions in the previous section.
+</p>
+<div class="example">
+<pre class="example-preformatted">(winfo :width '.hello :return 'number)
+==&gt; 120
+</pre></div>
+<p>indicates that the <code class="code">.hello</code> button is actually 120 pixels
+wide.
+</p>
+</div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Argument-Lists.html">Argument Lists</a>, Previous: <a href="Common-Features-of-Widgets.html">Common Features of Widgets</a>, Up: <a href="General.html">General</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/Widgets.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Widgets (GCL TK Manual)</title>
+
+<meta name="description" content="Widgets (GCL TK Manual)">
+<meta name="keywords" content="Widgets (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="index.html" rel="up" title="Top">
+<link href="Control.html" rel="next" title="Control">
+<link href="General.html" rel="prev" title="General">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Widgets">
+<div class="nav-panel">
+<p>
+Next: <a href="Control.html" accesskey="n" rel="next">Control</a>, Previous: <a href="General.html" accesskey="p" rel="prev">General</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h2 class="chapter" id="Widgets-1"><span>2 Widgets<a class="copiable-link" href="#Widgets-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="button.html" accesskey="1">button</a></li>
+<li><a href="listbox.html" accesskey="2">listbox</a></li>
+<li><a href="scale.html" accesskey="3">scale</a></li>
+<li><a href="canvas.html" accesskey="4">canvas</a></li>
+<li><a href="menu.html" accesskey="5">menu</a></li>
+<li><a href="scrollbar.html" accesskey="6">scrollbar</a></li>
+<li><a href="checkbutton.html" accesskey="7">checkbutton</a></li>
+<li><a href="menubutton.html" accesskey="8">menubutton</a></li>
+<li><a href="text.html" accesskey="9">text</a></li>
+<li><a href="entry.html">entry</a></li>
+<li><a href="message.html">message</a></li>
+<li><a href="frame.html">frame</a></li>
+<li><a href="label.html">label</a></li>
+<li><a href="radiobutton.html">radiobutton</a></li>
+<li><a href="toplevel.html">toplevel</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/after.html
@@ -0,0 +1,86 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>after (GCL TK Manual)</title>
+
+<meta name="description" content="after (GCL TK Manual)">
+<meta name="keywords" content="after (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="bind.html" rel="next" title="bind">
+<link href="Control.html" rel="prev" title="Control">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="after">
+<div class="nav-panel">
+<p>
+Next: <a href="bind.html" accesskey="n" rel="next">bind</a>, Previous: <a href="Control.html" accesskey="p" rel="prev">Control</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="after-1"><span>3.1 after<a class="copiable-link" href="#after-1"> &para;</a></span></h3>
+
+<p>after - Execute a command after a time delay
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-15" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-12" accesskey="2">Description</a></li>
+<li><a href="#Keywords-15" accesskey="3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-15">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-15"> &para;</a></span></h4>
+<p><b class="b">after </b><i class="i">ms </i><span class="r">?</span><i class="i">arg1 arg2 arg3 ...</i>?
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-12">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-12"> &para;</a></span></h4>
+
+<p>This command is used to delay execution of the program or to execute
+a command in background after a delay.  The <i class="i">ms</i> argument gives
+a time in milliseconds.
+If <i class="i">ms</i><span class="r"> is the only argument to </span><b class="b">after</b>
+then the command sleeps for <i class="i">ms</i> milliseconds and returns.
+While the command is sleeping the application does not respond to
+X events and other events.
+</p>
+<p>If additional arguments are
+present after <i class="i">ms</i>, then a Tcl command is formed by concatenating
+all the additional arguments in the same fashion as the <b class="b">concat</b>
+command.  <b class="b">After</b> returns immediately but arranges for the command
+to be executed <i class="i">ms</i> milliseconds later in background.
+The command will be executed at global level (outside the context
+of any Tcl procedure).
+If an error occurs while executing the delayed command then the
+<b class="b">tkerror</b> mechanism is used to report the error.
+</p>
+<p>The <b class="b">after</b> command always returns an empty string.
+</p>
+<p>See <a class="xref" href="tkerror.html">tkerror</a>.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-15">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-15"> &para;</a></span></h4>
+<p>delay, sleep, time
+</p></div>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/bind.html
@@ -0,0 +1,480 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>bind (GCL TK Manual)</title>
+
+<meta name="description" content="bind (GCL TK Manual)">
+<meta name="keywords" content="bind (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="destroy.html" rel="next" title="destroy">
+<link href="after.html" rel="prev" title="after">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="bind">
+<div class="nav-panel">
+<p>
+Next: <a href="destroy.html" accesskey="n" rel="next">destroy</a>, Previous: <a href="after.html" accesskey="p" rel="prev">after</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="bind-1"><span>3.2 bind<a class="copiable-link" href="#bind-1"> &para;</a></span></h3>
+
+<p>bind \- Arrange for X events to invoke Tcl commands
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-16" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-13" accesskey="2">Description</a></li>
+<li><a href="#Keywords-16" accesskey="3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-16">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-16"> &para;</a></span></h4>
+<br><p><b class="b">bind</b><i class="i">&nbsp;windowSpec</i><!-- /@w --><br>
+<br><b class="b">bind</b><i class="i">&nbsp;windowSpec&nbsp;sequence</i><!-- /@w --><br>
+<br><b class="b">bind</b><i class="i">&nbsp;windowSpec&nbsp;sequence&nbsp;command</i><!-- /@w --><br>
+<b class="b">bind</b><i class="i"> windowSpec sequence </i><b class="b">+</b><i class="i">command</i>
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-13">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-13"> &para;</a></span></h4>
+
+<p>If all three arguments are specified, <b class="b">bind</b> will
+arrange for <i class="i">command</i> (a Tcl
+command) to be executed whenever the sequence of events given
+by <i class="i">sequence</i><span class="r"> occurs in the window(s) identified by </span><i class="i">windowSpec</i>.
+If <i class="i">command</i> is prefixed with a &ldquo;+&rdquo;, then it is appended to
+any existing binding for <i class="i">sequence</i><span class="r">;  otherwise </span><i class="i">command</i> replaces
+the existing binding, if any.  If <i class="i">command</i>
+is an empty string then the current binding for <i class="i">sequence</i>
+is destroyed, leaving <i class="i">sequence</i> unbound.  In all of the cases
+where a <i class="i">command</i><span class="r"> argument is provided, </span><b class="b">bind</b> returns
+an empty string.
+</p>
+<p>If <i class="i">sequence</i><span class="r"> is specified without a </span><i class="i">command</i>, then the
+command currently bound to <i class="i">sequence</i> is returned, or
+an empty string if there is no binding for <i class="i">sequence</i>.  If
+neither <i class="i">sequence</i><span class="r"> nor </span><i class="i">command</i> is specified, then the
+return value is a list whose elements are all the sequences
+for which there exist bindings for <i class="i">windowSpec</i>.
+</p>
+<p>The <i class="i">windowSpec</i> argument selects which window(s) the binding
+applies to.
+It may have one of three forms.
+If <i class="i">windowSpec</i> is the path name for a window, then the binding
+applies to that particular window.
+If <i class="i">windowSpec</i> is the name of a class of widgets, then the
+binding applies to all widgets in that class.
+Lastly, <i class="i">windowSpec</i><span class="r"> may have the value </span><b class="b">all</b>, in which case
+the binding applies to all windows in the application.
+</p>
+<p>The <i class="i">sequence</i> argument specifies a sequence of one or more
+event patterns, with optional white space between the patterns.  Each
+event pattern may
+take either of two forms.  In the simplest case it is a single
+printing ASCII character, such as <b class="b">a</b><span class="r"> or </span><b class="b">[</b>.  The character
+may not be a space character or the character <b class="b">&lt;</b>.  This form of
+pattern matches a <b class="b">KeyPress</b> event for the particular
+character.  The second form of pattern is longer but more general.
+It has the following syntax:
+</p>
+<div class="example">
+<pre class="example-preformatted"><b class="b">&lt;</b><i class="i">modifier-modifier-type-detail</i><b class="b">&gt;</b>
+</pre></div>
+
+<p>The entire event pattern is surrounded by angle brackets.
+Inside the angle brackets are zero or more modifiers, an event
+type, and an extra piece of information (<i class="i">detail</i>) identifying
+a particular button or keysym.  Any of the fields may be omitted,
+as long as at least one of <i class="i">type</i><span class="r"> and </span><i class="i">detail</i> is present.
+The fields must be separated by white space or dashes.
+</p>
+
+<p>Modifiers may consist of any of the values in the following list:
+</p>
+<div class="example">
+<pre class="example-preformatted">Control                  Any                            
+Shift                    Double                         
+Lock                     Triple                         
+Button1, B1              Mod1, M1, Meta, M              
+Button2, B2              Mod2, M2, Alt                  
+Button3, B3              Mod3, M3                       
+Button4, B4              Mod4, M4                       
+Button5, B5              Mod5, M5                       
+</pre></div>
+
+<p>Where more than one value is listed, separated by commas, the values
+are equivalent.   All of the modifiers except <b class="b">Any</b>,
+<b class="b">Double</b><span class="r">, and </span><b class="b">Triple</b> have
+the obvious X meanings.  For example, <b class="b">Button1</b> requires that
+button 1 be depressed when the event occurs.  Under normal conditions
+the button and modifier state at the time of the event must
+match exactly those specified in the <b class="b">bind</b> command.  If
+no modifiers are specified, then events will match only if no modifiers
+are present.  If the <b class="b">Any</b> modifier is specified, then additional
+modifiers may be present besides those specified explicitly.  For
+example, if button 1 is pressed while the shift and control keys
+are down, the specifier <b class="b">&lt;Any-Control-Button-1&gt;</b> will match
+the event, but the specifier <b class="b">&lt;Control-Button-1&gt;</b> will not.
+</p>
+
+<p>The <b class="b">Double</b><span class="r"> and </span><b class="b">Triple</b> modifiers are a convenience
+for specifying double mouse clicks and other repeated
+events. They cause a particular event pattern to be
+repeated 2 or 3 times, and also place a time and space requirement
+on the sequence:  for a sequence of events to match a <b class="b">Double</b>
+or <b class="b">Triple</b> pattern, all of the events must occur close together
+in time and without substantial mouse motion in between.
+For example, <b class="b">&lt;Double-Button-1&gt;</b>
+is equivalent to <b class="b">&lt;Button-1&gt;&lt;Button-1&gt;</b> with the extra
+time and space requirement.
+</p>
+
+<p>The <i class="i">type</i> field may be any of the standard X event types, with a
+few extra abbreviations.  Below is a list of all the valid types;
+where two name appear together, they are synonyms.
+</p>
+<div class="example">
+<pre class="example-preformatted">ButtonPress, Button      Expose             Leave              
+ButtonRelease            FocusIn            Map                
+Circulate                FocusOut           Property           
+CirculateRequest         Gravity            Reparent           
+Colormap                 Keymap             ResizeRequest      
+Configure                KeyPress, Key      Unmap              
+ConfigureRequest         KeyRelease         Visibility         
+Destroy                  MapRequest         
+Enter                    Motion             
+</pre></div>
+
+
+
+<p>The last part of a long event specification is <i class="i">detail</i>.  In the
+case of a <b class="b">ButtonPress</b><span class="r"> or </span><b class="b">ButtonRelease</b> event, it is the
+number of a button (1-5).  If a button number is given, then only an
+event on that particular button will match;  if no button number is
+given, then an event on any button will match.  Note:  giving a
+specific button number is different than specifying a button modifier;
+in the first case, it refers to a button being pressed or released,
+while in the second it refers to some other button that is already
+depressed when the matching event occurs.  If a button
+number is given then <i class="i">type</i> may be omitted:  if will default
+to <b class="b">ButtonPress</b><span class="r">.  For example, the specifier </span><b class="b">&lt;1&gt;</b>
+is equivalent to <b class="b">&lt;ButtonPress-1&gt;</b>.
+</p>
+
+<p>If the event type is <b class="b">KeyPress</b><span class="r"> or </span><b class="b">KeyRelease</b>, then
+<i class="i">detail</i> may be specified in the form of an X keysym.  Keysyms
+are textual specifications for particular keys on the keyboard;
+they include all the alphanumeric ASCII characters (e.g. &ldquo;a&rdquo; is
+the keysym for the ASCII character &ldquo;a&rdquo;), plus descriptions for
+non-alphanumeric characters (&ldquo;comma&rdquo; is the keysym for the comma
+character), plus descriptions for all the non-ASCII keys on the
+keyboard (&ldquo;Shift_L&rdquo; is the keysm for the left shift key, and
+&ldquo;F1&rdquo; is the keysym for the F1 function key, if it exists).  The
+complete list of keysyms is not presented here;  it should be
+available in other X documentation.  If necessary, you can use the
+<b class="b">%K</b> notation described below to print out the keysym name for
+an arbitrary key.  If a keysym <i class="i">detail</i> is given, then the
+<i class="i">type</i><span class="r"> field may be omitted;  it will default to </span><b class="b">KeyPress</b>.
+For example, <b class="b">&lt;Control-comma&gt;</b> is equivalent to
+<b class="b">&lt;Control-KeyPress-comma&gt;</b><span class="r">.  If a keysym </span><i class="i">detail</i> is specified
+then the <b class="b">Shift</b> modifier need not be specified and will be
+ignored if specified:  each keysym already implies a particular
+state for the shift key.
+</p>
+
+<p>The <i class="i">command</i><span class="r"> argument to </span><b class="b">bind</b> is a Tcl command string,
+which will be executed whenever the given event sequence occurs.
+<i class="i">Command</i> will be executed in the same interpreter that the
+<b class="b">bind</b><span class="r"> command was executed in.  If </span><i class="i">command</i> contains
+any <b class="b">%</b> characters, then the command string will not be
+executed directly.  Instead, a new command string will be
+generated by replacing each <b class="b">%</b>, and the character following
+it, with information from the current event.  The replacement
+depends on the character following the <b class="b">%</b>, as defined in the
+list below.  Unless otherwise indicated, the
+replacement string is the decimal value of the given field from
+the current event.
+Some of the substitutions are only valid for
+certain types of events;  if they are used for other types of events
+the value substituted is undefined.
+</p>
+<dl class="table">
+<dt><b class="b">%%</b></dt>
+<dd><p>Replaced with a single percent.
+</p></dd>
+<dt><b class="b">|%#|</b></dt>
+<dd><p>The number of the last client request processed by the server
+(the <i class="i">serial</i> field from the event).  Valid for all event
+types.
+</p></dd>
+<dt><b class="b">|%a|</b></dt>
+<dd><p>The <i class="i">above</i> field from the event.
+Valid only for <b class="b">ConfigureNotify</b> events.
+</p></dd>
+<dt><b class="b">|%b|</b></dt>
+<dd><p>The number of the button that was pressed or released.  Valid only
+for <b class="b">ButtonPress</b><span class="r"> and </span><b class="b">ButtonRelease</b> events.
+</p></dd>
+<dt><b class="b">|%c|</b></dt>
+<dd><p>The <i class="i">count</i><span class="r"> field from the event.  Valid only for </span><b class="b">Expose</b>,
+<b class="b">GraphicsExpose</b><span class="r">, and </span><b class="b">MappingNotify</b> events.
+</p></dd>
+<dt><b class="b">|%d|</b></dt>
+<dd><p>The <i class="i">detail</i><span class="r"> field from the event.  The </span><b class="b">|%d|</b> is replaced by
+a string identifying the detail.  For <b class="b">EnterNotify</b>,
+<b class="b">LeaveNotify</b><span class="r">, </span><b class="b">FocusIn</b><span class="r">, and </span><b class="b">FocusOut</b> events,
+the string will be one of the following:
+</p>
+<div class="example">
+<pre class="example-preformatted">NotifyAncestor            NotifyNonlinearVirtual          
+NotifyDetailNone          NotifyPointer                   
+NotifyInferior            NotifyPointerRoot               
+NotifyNonlinear           NotifyVirtual                   
+</pre></div>
+
+<p>For <b class="b">ConfigureRequest</b> events, the substituted string will be
+one of the following:
+</p>
+<div class="example">
+<pre class="example-preformatted">Above                     Opposite                  
+Below                     TopIf                     
+BottomIf                  
+</pre></div>
+
+<p>For events other than these, the substituted string is undefined.
+.RE
+</p></dd>
+<dt><b class="b">|%f|</b></dt>
+<dd><p>The <i class="i">focus</i><span class="r"> field from the event (</span><b class="b">0</b><span class="r"> or </span><b class="b">1</b>).  Valid only
+for <b class="b">EnterNotify</b><span class="r"> and </span><b class="b">LeaveNotify</b> events.
+</p></dd>
+<dt><b class="b">|%h|</b></dt>
+<dd><p>The <i class="i">height</i><span class="r"> field from the event.  Valid only for </span><b class="b">Configure</b>,
+<b class="b">ConfigureNotify</b><span class="r">, </span><b class="b">Expose</b><span class="r">, </span><b class="b">GraphicsExpose</b>, and
+<b class="b">ResizeRequest</b> events.
+</p></dd>
+<dt><b class="b">|%k|</b></dt>
+<dd><p>The <i class="i">keycode</i><span class="r"> field from the event.  Valid only for </span><b class="b">KeyPress</b>
+and <b class="b">KeyRelease</b> events.
+</p></dd>
+<dt><b class="b">|%m|</b></dt>
+<dd><p>The <i class="i">mode</i> field from the event.  The substituted string is one of
+<b class="b">NotifyNormal</b><span class="r">, </span><b class="b">NotifyGrab</b><span class="r">, </span><b class="b">NotifyUngrab</b>, or
+<b class="b">NotifyWhileGrabbed</b><span class="r">.  Valid only for </span><b class="b">EnterWindow</b>,
+<b class="b">FocusIn</b><span class="r">, </span><b class="b">FocusOut</b><span class="r">, and </span><b class="b">LeaveWindow</b> events.
+</p></dd>
+<dt><b class="b">|%o|</b></dt>
+<dd><p>The <i class="i">override_redirect</i> field from the event.  Valid only for
+<b class="b">CreateNotify</b><span class="r">, </span><b class="b">MapNotify</b><span class="r">, </span><b class="b">ReparentNotify</b>,
+and <b class="b">ConfigureNotify</b> events.
+</p></dd>
+<dt><b class="b">|%p|</b></dt>
+<dd><p>The <i class="i">place</i> field from the event, substituted as one of the
+strings <b class="b">PlaceOnTop</b><span class="r"> or </span><b class="b">PlaceOnBottom</b>.  Valid only
+for <b class="b">CirculateNotify</b><span class="r"> and </span><b class="b">CirculateRequest</b> events.
+</p></dd>
+<dt><b class="b">|%s|</b></dt>
+<dd><p>The <i class="i">state</i><span class="r"> field from the event.  For </span><b class="b">ButtonPress</b>,
+<b class="b">ButtonRelease</b><span class="r">, </span><b class="b">EnterNotify</b><span class="r">, </span><b class="b">KeyPress</b><span class="r">, </span><b class="b">KeyRelease</b>,
+<b class="b">LeaveNotify</b><span class="r">, and </span><b class="b">MotionNotify</b> events,
+a decimal string
+is substituted.  For <b class="b">VisibilityNotify</b>, one of the strings
+<b class="b">VisibilityUnobscured</b><span class="r">, </span><b class="b">VisibilityPartiallyObscured</b>,
+and <b class="b">VisibilityFullyObscured</b> is substituted.
+</p></dd>
+<dt><b class="b">|%t|</b></dt>
+<dd><p>The <i class="i">time</i> field from the event.  Valid only for events that
+contain a <i class="i">time</i> field.
+</p></dd>
+<dt><b class="b">|%v|</b></dt>
+<dd><p>The <i class="i">value_mask</i> field from the event.  Valid only for
+<b class="b">ConfigureRequest</b> events.
+</p></dd>
+<dt><b class="b">|%w|</b></dt>
+<dd><p>The <i class="i">width</i> field from the event.  Valid only for
+<b class="b">Configure</b><span class="r">, </span><b class="b">ConfigureRequest</b><span class="r">, </span><b class="b">Expose</b>,
+<b class="b">GraphicsExpose</b><span class="r">, and </span><b class="b">ResizeRequest</b> events.
+</p></dd>
+<dt><b class="b">|%x|</b></dt>
+<dd><p>The <i class="i">x</i> field from the event.  Valid only for events containing
+an <i class="i">x</i> field.
+</p></dd>
+<dt><b class="b">|%y|</b></dt>
+<dd><p>The <i class="i">y</i> field from the event.  Valid only for events containing
+a <i class="i">y</i> field.
+</p></dd>
+<dt><b class="b">%A</b></dt>
+<dd><p>Substitutes the ASCII character corresponding to the event, or
+the empty string if the event doesn&rsquo;t correspond to an ASCII character
+(e.g. the shift key was pressed).  <b class="b">XLookupString</b> does all the
+work of translating from the event to an ASCII character.
+Valid only for <b class="b">KeyPress</b><span class="r"> and </span><b class="b">KeyRelease</b> events.
+</p></dd>
+<dt><b class="b">%B</b></dt>
+<dd><p>The <i class="i">border_width</i> field from the event.  Valid only for
+<b class="b">ConfigureNotify</b><span class="r"> and </span><b class="b">CreateWindow</b> events.
+</p></dd>
+<dt><b class="b">%D</b></dt>
+<dd><p>The <i class="i">display</i> field from the event.  Valid for all event types.
+</p></dd>
+<dt><b class="b">%E</b></dt>
+<dd><p>The <i class="i">send_event</i> field from the event.  Valid for all event types.
+</p></dd>
+<dt><b class="b">%K</b></dt>
+<dd><p>The keysym corresponding to the event, substituted as a textual
+string.  Valid only for <b class="b">KeyPress</b><span class="r"> and </span><b class="b">KeyRelease</b> events.
+</p></dd>
+<dt><b class="b">%N</b></dt>
+<dd><p>The keysym corresponding to the event, substituted as
+a decimal
+number.  Valid only for <b class="b">KeyPress</b><span class="r"> and </span><b class="b">KeyRelease</b> events.
+</p></dd>
+<dt><b class="b">%R</b></dt>
+<dd><p>The <i class="i">root</i> window identifier from the event.  Valid only for
+events containing a <i class="i">root</i> field.
+</p></dd>
+<dt><b class="b">%S</b></dt>
+<dd><p>The <i class="i">subwindow</i> window identifier from the event.  Valid only for
+events containing a <i class="i">subwindow</i> field.
+</p></dd>
+<dt><b class="b">%T</b></dt>
+<dd><p>The <i class="i">type</i> field from the event.  Valid for all event types.
+</p></dd>
+<dt><b class="b">%W</b></dt>
+<dd><p>The path name of the window to which the event was reported (the
+<i class="i">window</i> field from the event).  Valid for all event types.
+</p></dd>
+<dt><b class="b">%X</b></dt>
+<dd><p>The <i class="i">x_root</i> field from the event.
+If a virtual-root window manager is being used then the substituted
+value is the corresponding x-coordinate in the virtual root.
+Valid only for
+<b class="b">ButtonPress</b><span class="r">, </span><b class="b">ButtonRelease</b><span class="r">, </span><b class="b">KeyPress</b><span class="r">, </span><b class="b">KeyRelease</b>,
+and <b class="b">MotionNotify</b> events.
+</p></dd>
+<dt><b class="b">%Y</b></dt>
+<dd><p>The <i class="i">y_root</i> field from the event.
+If a virtual-root window manager is being used then the substituted
+value is the corresponding y-coordinate in the virtual root.
+Valid only for
+<b class="b">ButtonPress</b><span class="r">, </span><b class="b">ButtonRelease</b><span class="r">, </span><b class="b">KeyPress</b><span class="r">, </span><b class="b">KeyRelease</b>,
+and <b class="b">MotionNotify</b> events.
+</p></dd>
+</dl>
+
+
+<p>If the replacement string
+for a %-replacement contains characters that are interpreted
+specially by the Tcl parser (such as backslashes or square
+brackets or spaces) additional backslashes are added
+during replacement so that the result after parsing is the original
+replacement string.
+For example, if <i class="i">command</i> is
+</p>
+<div class="example">
+<pre class="example-preformatted">insert %A
+</pre></div>
+
+<p>and the character typed is an open square bracket, then the command
+actually executed will be
+</p>
+<div class="example">
+<pre class="example-preformatted">insert \e[
+</pre></div>
+
+<p>This will cause the <b class="b">insert</b> to receive the original replacement
+string (open square bracket) as its first argument.
+If the extra backslash hadn&rsquo;t been added, Tcl would not have been
+able to parse the command correctly.
+</p>
+
+<p>At most one binding will trigger for any given X event.
+If several bindings match the recent events, the most specific binding
+is chosen and its command will be executed.
+The following tests are applied, in order, to determine which of
+several matching sequences is more specific:
+(a) a binding whose <i class="i">windowSpec</i> names a particular window is
+more specific than a binding for a class,
+which is more specific than a binding whose <i class="i">windowSpec</i> is
+<b class="b">all</b>;
+(b) a longer sequence (in terms of number
+of events matched) is more specific than a shorter sequence;
+(c) an event pattern that specifies a specific button or key is more specific
+than one that doesn&rsquo;t;  (e) an event pattern that requires a particular
+modifier is more specific than one that doesn&rsquo;t require the modifier;
+(e) an event pattern specifying the <b class="b">Any</b> modifier is less specific
+than one that doesn&rsquo;t.  If the matching sequences contain more than
+one event, then tests (c)-(e) are applied in order from the most
+recent event to the least recent event in the sequences.  If these
+tests fail to determine a winner, then the most recently registered
+sequence is the winner.
+</p>
+
+<p>If an X event does not match any of the existing bindings, then the
+event is ignored (an unbound event is not considered to be an error).
+</p>
+
+<p>When a <i class="i">sequence</i><span class="r"> specified in a </span><b class="b">bind</b> command contains
+more than one event pattern, then its command is executed whenever
+the recent events (leading up to and including the current event)
+match the given sequence.  This means, for example, that if button 1 is
+clicked repeatedly the sequence <b class="b">&lt;Double-ButtonPress-1&gt;</b> will match
+each button press but the first.
+If extraneous events that would prevent a match occur in the middle
+of an event sequence then the extraneous events are
+ignored unless they are <b class="b">KeyPress</b><span class="r"> or </span><b class="b">ButtonPress</b> events.
+For example, <b class="b">&lt;Double-ButtonPress-1&gt;</b> will match a sequence of
+presses of button 1, even though there will be <b class="b">ButtonRelease</b>
+events (and possibly <b class="b">MotionNotify</b> events) between the
+<b class="b">ButtonPress</b> events.
+Furthermore, a <b class="b">KeyPress</b> event may be preceded by any number
+of other <b class="b">KeyPress</b> events for modifier keys without the
+modifier keys preventing a match.
+For example, the event sequence <b class="b">aB</b> will match a press of the
+<b class="b">a</b><span class="r"> key, a release of the </span><b class="b">a</b><span class="r"> key, a press of the </span><b class="b">Shift</b>
+key, and a press of the <b class="b">b</b><span class="r"> key:  the press of </span><b class="b">Shift</b> is
+ignored because it is a modifier key.
+Finally, if several <b class="b">MotionNotify</b> events occur in a row, only
+the last one is used for purposes of matching binding sequences.
+</p>
+
+<p>If an error occurs in executing the command for a binding then the
+<b class="b">tkerror</b> mechanism is used to report the error.
+The command will be executed at global level (outside the context
+of any Tcl procedure).
+</p>
+<p>See <a class="xref" href="tkerror.html">tkerror</a>.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-16">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-16"> &para;</a></span></h4>
+<p>form, manual
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="destroy.html">destroy</a>, Previous: <a href="after.html">after</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/button.html
@@ -0,0 +1,262 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>button (GCL TK Manual)</title>
+
+<meta name="description" content="button (GCL TK Manual)">
+<meta name="keywords" content="button (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Widgets.html" rel="up" title="Widgets">
+<link href="listbox.html" rel="next" title="listbox">
+<link href="Widgets.html" rel="prev" title="Widgets">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="button">
+<div class="nav-panel">
+<p>
+Next: <a href="listbox.html" accesskey="n" rel="next">listbox</a>, Previous: <a href="Widgets.html" accesskey="p" rel="prev">Widgets</a>, Up: <a href="Widgets.html" accesskey="u" rel="up">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="button-1"><span>2.1 button<a class="copiable-link" href="#button-1"> &para;</a></span></h3>
+
+<p>button \- Create and manipulate button widgets
+</p><ul class="mini-toc">
+<li><a href="#Synopsis" accesskey="1">Synopsis</a></li>
+<li><a href="#Standard-Options" accesskey="2">Standard Options</a></li>
+<li><a href="#Arguments-for-Button" accesskey="3">Arguments for Button</a></li>
+<li><a href="#Description" accesskey="4">Description</a></li>
+<li><a href="#A-Button-Widget_0027s-Arguments" accesskey="5">A Button Widget&rsquo;s Arguments</a></li>
+<li><a href="#g_t_0022Default-Bindings_0022" accesskey="6">&quot;Default Bindings&quot;</a></li>
+<li><a href="#Keywords" accesskey="7">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis"> &para;</a></span></h4>
+<p><b class="b">button</b><i class="i"> </i><i class="i">pathName </i><span class="r">?</span><i class="i">options</i>?
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Standard-Options">
+<h4 class="unnumberedsubsec"><span>Standard Options<a class="copiable-link" href="#Standard-Options"> &para;</a></span></h4>
+
+
+<div class="example">
+<pre class="example-preformatted">activeBackground  bitmap              font        relief        
+activeForeground  borderWidth         foreground  text          
+anchor            cursor              padX        textVariable  
+background        disabledForeground  padY        
+</pre></div>
+
+
+<p>See <a class="xref" href="options.html">options</a>, for more information.
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Arguments-for-Button">
+<h4 class="unnumberedsubsec"><span>Arguments for Button<a class="copiable-link" href="#Arguments-for-Button"> &para;</a></span></h4>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:command</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">command</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Command</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a Tcl command to associate with the button.  This command
+is typically invoked when mouse button 1 is released over the button
+window.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:height</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">height</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Height</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a desired height for the button.
+If a bitmap is being displayed in the button then the value is in
+screen units (i.e. any of the forms acceptable to <b class="b">Tk_GetPixels</b>);
+for text it is in lines of text.
+If this option isn&rsquo;t specified, the button&rsquo;s desired height is computed
+from the size of the bitmap or text being displayed in it.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:state</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">state</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">State</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies one of three states for the button:  <b class="b">normal</b><span class="r">, </span><b class="b">active</b>,
+or <b class="b">disabled</b>.  In normal state the button is displayed using the
+<b class="b">foreground</b><span class="r"> and </span><b class="b">background</b> options.  The active state is
+typically used when the pointer is over the button.  In active state
+the button is displayed using the <b class="b">activeForeground</b> and
+<b class="b">activeBackground</b> options.  Disabled state means that the button
+is insensitive:  it doesn&rsquo;t activate and doesn&rsquo;t respond to mouse
+button presses.  In this state the <b class="b">disabledForeground</b> and
+<b class="b">background</b> options determine how the button is displayed.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:width</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">width</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Width</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a desired width for the button.
+If a bitmap is being displayed in the button then the value is in
+screen units (i.e. any of the forms acceptable to <b class="b">Tk_GetPixels</b>);
+for text it is in characters.
+If this option isn&rsquo;t specified, the button&rsquo;s desired width is computed
+from the size of the bitmap or text being displayed in it.
+</p></dd>
+</dl>
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description"> &para;</a></span></h4>
+
+<p>The <b class="b">button</b> command creates a new window (given by the
+<i class="i">pathName</i> argument) and makes it into a button widget.
+Additional
+options, described above, may be specified on the command line
+or in the option database
+to configure aspects of the button such as its colors, font,
+text, and initial relief.  The <b class="b">button</b> command returns its
+<i class="i">pathName</i> argument.  At the time this command is invoked,
+there must not exist a window named <i class="i">pathName</i>, but
+<i class="i">pathName</i>&rsquo;s parent must exist.
+</p>
+<p>A button is a widget
+that displays a textual string or bitmap.
+It can display itself in either of three different ways, according
+to
+the <b class="b">state</b> option; 
+it can be made to appear raised, sunken, or flat;
+and it can be made to flash.  When a user invokes the
+button (by pressing mouse button 1 with the cursor over the
+button), then the Tcl command specified in the <b class="b">:command</b>
+option is invoked.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="A-Button-Widget_0027s-Arguments">
+<h4 class="unnumberedsubsec"><span>A Button Widget&rsquo;s Arguments<a class="copiable-link" href="#A-Button-Widget_0027s-Arguments"> &para;</a></span></h4>
+
+<p>The <b class="b">button</b> command creates a new Tcl command whose
+name is <i class="i">pathName</i>.  This
+command may be used to invoke various
+operations on the widget.  It has the following general form:
+</p>
+<div class="example">
+<pre class="example-preformatted"><i class="i">pathName option </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</pre></div>
+
+<p><i class="i">Option</i><span class="r"> and the </span><i class="i">arg</i>s
+determine the exact behavior of the command.  The following
+commands are possible for button widgets:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:activate</b></dt>
+<dd><p>Change the button&rsquo;s state to <b class="b">active</b> and redisplay the button
+using its active foreground and background colors instead of normal
+colors.
+This command is ignored if the button&rsquo;s state is <b class="b">disabled</b>.
+This command is obsolete and will eventually be removed;
+use &ldquo;<i class="i">pathName </i><b class="b">:configure :state active</b>&rdquo; instead.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:configure</b><span class="r"> ?</span><i class="i">option</i><span class="r">? ?</span><i class="i">value option value ...</i>?</dt>
+<dd><p>Query or modify the configuration options of the widget.
+If no <i class="i">option</i> is specified, returns a list describing all of
+the available options for <i class="i">pathName</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).  If <i class="i">option</i> is specified
+with no <i class="i">value</i>, then the command returns a list describing the
+one named option (this list will be identical to the corresponding
+sublist of the value returned if no <i class="i">option</i> is specified).  If
+one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given widget option(s) to have the given value(s);  in
+this case the command returns an empty string.
+<i class="i">Option</i><span class="r"> may have any of the values accepted by the </span><b class="b">button</b>
+command.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:deactivate</b></dt>
+<dd><p>Change the button&rsquo;s state to <b class="b">normal</b> and redisplay the button
+using its normal foreground and background colors.
+This command is ignored if the button&rsquo;s state is <b class="b">disabled</b>.
+This command is obsolete and will eventually be removed;
+use &ldquo;<i class="i">pathName </i><b class="b">:configure :state normal</b>&rdquo; instead.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:flash</b></dt>
+<dd><p>Flash the button.  This is accomplished by redisplaying the button
+several times, alternating between active and normal colors.  At
+the end of the flash the button is left in the same normal/active
+state as when the command was invoked.
+This command is ignored if the button&rsquo;s state is <b class="b">disabled</b>.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:invoke</b></dt>
+<dd><p>Invoke the Tcl command associated with the button, if there is one.
+The return value is the return value from the Tcl command, or an
+empty string if there is no command associated with the button.
+This command is ignored if the button&rsquo;s state is <b class="b">disabled</b>.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022Default-Bindings_0022">
+<h4 class="unnumberedsubsec"><span>&quot;Default Bindings&quot;<a class="copiable-link" href="#g_t_0022Default-Bindings_0022"> &para;</a></span></h4>
+
+<p>Tk automatically creates class bindings for buttons that give them
+the following default behavior:
+</p><ul class="itemize">
+<li>[1]
+The button activates whenever the mouse passes over it and deactivates
+whenever the mouse leaves the button.
+</li><li>[2]
+The button&rsquo;s relief is changed to sunken whenever mouse button 1 is
+pressed over the button, and the relief is restored to its original
+value when button 1 is later released.
+</li><li>[3]
+If mouse button 1 is pressed over the button and later released over
+the button, the button is invoked.  However, if the mouse is not
+over the button when button 1 is released, then no invocation occurs.
+</li></ul>
+
+<p>If the button&rsquo;s state is <b class="b">disabled</b> then none of the above
+actions occur:  the button is completely non-responsive.
+</p>
+<p>The behavior of buttons can be changed by defining new bindings for
+individual widgets or by redefining the class bindings.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords"> &para;</a></span></h4>
+<p>button, widget
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="listbox.html">listbox</a>, Previous: <a href="Widgets.html">Widgets</a>, Up: <a href="Widgets.html">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/canvas.html
@@ -0,0 +1,1601 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>canvas (GCL TK Manual)</title>
+
+<meta name="description" content="canvas (GCL TK Manual)">
+<meta name="keywords" content="canvas (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Widgets.html" rel="up" title="Widgets">
+<link href="menu.html" rel="next" title="menu">
+<link href="scale.html" rel="prev" title="scale">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="canvas">
+<div class="nav-panel">
+<p>
+Next: <a href="menu.html" accesskey="n" rel="next">menu</a>, Previous: <a href="scale.html" accesskey="p" rel="prev">scale</a>, Up: <a href="Widgets.html" accesskey="u" rel="up">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="canvas-1"><span>2.4 canvas<a class="copiable-link" href="#canvas-1"> &para;</a></span></h3>
+
+<p>canvas \- Create and manipulate canvas widgets
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-3" accesskey="1">Synopsis</a></li>
+<li><a href="#Standard-Options-3" accesskey="2">Standard Options</a></li>
+<li><a href="#Arguments-for-Canvas" accesskey="3">Arguments for Canvas</a></li>
+<li><a href="#Introduction-2" accesskey="4">Introduction</a></li>
+<li><a href="#Display-List" accesskey="5">Display List</a></li>
+<li><a href="#Item-Ids-And-Tags" accesskey="6">Item Ids And Tags</a></li>
+<li><a href="#Coordinates" accesskey="7">Coordinates</a></li>
+<li><a href="#Transformations" accesskey="8">Transformations</a></li>
+<li><a href="#Indices" accesskey="9">Indices</a></li>
+<li><a href="#A-Canvas-Widget_0027s-Arguments">A Canvas Widget&rsquo;s Arguments</a></li>
+<li><a href="#Overview-Of-Item-Types">Overview Of Item Types</a></li>
+<li><a href="#Arc-Items">Arc Items</a></li>
+<li><a href="#Bitmap-Items">Bitmap Items</a></li>
+<li><a href="#Line-Items">Line Items</a></li>
+<li><a href="#Oval-Items">Oval Items</a></li>
+<li><a href="#Polygon-Items">Polygon Items</a></li>
+<li><a href="#Rectangle-Items">Rectangle Items</a></li>
+<li><a href="#Text-Items">Text Items</a></li>
+<li><a href="#Window-Items">Window Items</a></li>
+<li><a href="#Application_002dDefined-Item-Types">Application-Defined Item Types</a></li>
+<li><a href="#Bindings-1">Bindings</a></li>
+<li><a href="#Credits">Credits</a></li>
+<li><a href="#Keywords-3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-3">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-3"> &para;</a></span></h4>
+<p><b class="b">canvas</b><i class="i"> </i><i class="i">pathName </i><span class="r">?</span><i class="i">options</i>?
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Standard-Options-3">
+<h4 class="unnumberedsubsec"><span>Standard Options<a class="copiable-link" href="#Standard-Options-3"> &para;</a></span></h4>
+
+
+<div class="example">
+<pre class="example-preformatted">background       insertBorderWidth relief            xScrollCommand 
+borderWidth      insertOffTime     selectBackground  yScrollCommand 
+cursor           insertOnTime      selectBorderWidth 
+insertBackground insertWidth       selectForeground  
+</pre></div>
+
+
+<p>See <a class="xref" href="options.html">options</a>, for more information.
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Arguments-for-Canvas">
+<h4 class="unnumberedsubsec"><span>Arguments for Canvas<a class="copiable-link" href="#Arguments-for-Canvas"> &para;</a></span></h4>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:closeenough</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">closeEnough</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">CloseEnough</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a floating-point value indicating how close the mouse cursor
+must be to an item before it is considered to be &ldquo;inside&rdquo; the item.
+Defaults to 1.0.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:confine</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">confine</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Confine</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a boolean value that indicates whether or not it should be
+allowable to set the canvas&rsquo;s view outside the region defined by the
+<b class="b">scrollRegion</b> argument.
+Defaults to true, which means that the view will
+be constrained within the scroll region.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:height</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">height</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Height</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a desired window height that the canvas widget should request from
+its geometry manager.  The value may be specified in any
+of the forms described in the COORDINATES section below.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:scrollincrement</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">scrollIncrement</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">ScrollIncrement</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a distance used as increment during scrolling:  when one of
+the arrow buttons on an associated scrollbar is pressed, the picture
+will shift by this distance.  The distance may be specified in any
+of the forms described in the COORDINATES section below.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:scrollregion</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">scrollRegion</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">ScrollRegion</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a list with four coordinates describing the left, top, right, and
+bottom coordinates of a rectangular region.
+This region is used for scrolling purposes and is considered to be
+the boundary of the information in the canvas.
+Each of the coordinates may be specified
+in any of the forms given in the COORDINATES section below.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:width</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">width</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">width</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a desired window width that the canvas widget should request from
+its geometry manager.  The value may be specified in any
+of the forms described in the COORDINATES section below.
+</p></dd>
+</dl>
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Introduction-2">
+<h4 class="unnumberedsubsec"><span>Introduction<a class="copiable-link" href="#Introduction-2"> &para;</a></span></h4>
+
+<p>The <b class="b">canvas</b> command creates a new window (given
+by the <i class="i">pathName</i> argument) and makes it into a canvas widget.
+Additional options, described above, may be specified on the
+command line or in the option database
+to configure aspects of the canvas such as its colors and 3-D relief.
+The <b class="b">canvas</b> command returns its
+<i class="i">pathName</i> argument.  At the time this command is invoked,
+there must not exist a window named <i class="i">pathName</i>, but
+<i class="i">pathName</i>&rsquo;s parent must exist.
+</p>
+<p>Canvas widgets implement structured graphics.
+A canvas displays any number of <i class="i">items</i>, which may be things like
+rectangles, circles, lines, and text.
+Items may be manipulated (e.g. moved or re-colored) and commands may
+be associated with items in much the same way that the <b class="b">bind</b>
+command allows commands to be bound to widgets.  For example,
+a particular command may be associated with the &lt;Button-1&gt; event
+so that the command is invoked whenever button 1 is pressed with
+the mouse cursor over an item.
+This means that items in a canvas can have behaviors defined by
+the Tcl scripts bound to them.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Display-List">
+<h4 class="unnumberedsubsec"><span>Display List<a class="copiable-link" href="#Display-List"> &para;</a></span></h4>
+
+<p>The items in a canvas are ordered for purposes of display,
+with the first item in the display list being displayed
+first, followed by the next item in the list, and so on.
+Items later in the display list obscure those that are
+earlier in the display list and are sometimes referred to
+as being &ldquo;on top&rdquo; of earlier items.
+When a new item is created it is placed at the end of the
+display list, on top of everything else.
+Widget commands may be used to re-arrange the order of the
+display list.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Item-Ids-And-Tags">
+<h4 class="unnumberedsubsec"><span>Item Ids And Tags<a class="copiable-link" href="#Item-Ids-And-Tags"> &para;</a></span></h4>
+
+<p>Items in a canvas widget may be named in either of two ways:
+by id or by tag.
+Each item has a unique identifying number which is assigned to
+that item when it is created.  The id of an item never changes
+and id numbers are never re-used within the lifetime of a
+canvas widget.
+</p>
+<p>Each item may also have any number of <i class="i">tags</i> associated
+with it.  A tag is just a string of characters, and it may
+take any form except that of an integer.
+For example, &ldquo;x123&rdquo; is OK but &ldquo;123&rdquo; isn&rsquo;t.
+The same tag may be associated with many different items.
+This is commonly done to group items in various interesting
+ways;  for example, all selected items might be given the
+tag &ldquo;selected&rdquo;.
+</p>
+<p>The tag <b class="b">all</b> is implicitly associated with every item
+in the canvas;  it may be used to invoke operations on
+all the items in the canvas.
+</p>
+<p>The tag <b class="b">current</b> is managed automatically by Tk;
+it applies to the <i class="i">current item</i>, which is the
+topmost item whose drawn area covers the position of
+the mouse cursor.
+If the mouse is not in the canvas widget or is not over
+an item, then no item has the <b class="b">current</b> tag.
+</p>
+<p>When specifying items in canvas widget commands, if the
+specifier is an integer then it is assumed to refer to
+the single item with that id.
+If the specifier is not an integer, then it is assumed to
+refer to all of the items in the canvas that have a tag
+matching the specifier.
+The symbol <i class="i">tagOrId</i> is used below to indicate that
+an argument specifies either an id that selects a single
+item or a tag that selects zero or more items.
+Some widget commands only operate on a single item at a
+time;  if <i class="i">tagOrId</i> is specified in a way that
+names multiple items, then the normal behavior is for
+the command to use the first (lowest) of these items in
+the display list that is suitable for the command.
+Exceptions are noted in the widget command descriptions
+below.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Coordinates">
+<h4 class="unnumberedsubsec"><span>Coordinates<a class="copiable-link" href="#Coordinates"> &para;</a></span></h4>
+
+<p>All coordinates related to canvases are stored as floating-point
+numbers.
+Coordinates and distances are specified in screen units,
+which are floating-point numbers optionally followed
+by one of several letters.
+If no letter is supplied then the distance is in pixels.
+If the letter is <b class="b">m</b> then the distance is in millimeters on
+the screen;  if it is <b class="b">c</b> then the distance is in centimeters;
+<b class="b">i</b><span class="r"> means inches, and </span><b class="b">p</b> means printers points (1/72 inch).
+Larger y-coordinates refer to points lower on the screen;  larger
+x-coordinates refer to points farther to the right.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Transformations">
+<h4 class="unnumberedsubsec"><span>Transformations<a class="copiable-link" href="#Transformations"> &para;</a></span></h4>
+
+<p>Normally the origin of the canvas coordinate system is at the
+upper-left corner of the window containing the canvas.
+It is possible to adjust the origin of the canvas
+coordinate system relative to the origin of the window using the
+<b class="b">xview</b><span class="r"> and </span><b class="b">yview</b> widget commands;  this is typically used
+for scrolling.
+Canvases do not support scaling or rotation of the canvas coordinate
+system relative to the window coordinate system.
+</p>
+<p>Indidividual items may be moved or scaled using widget commands
+described below, but they may not be rotated.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Indices">
+<h4 class="unnumberedsubsec"><span>Indices<a class="copiable-link" href="#Indices"> &para;</a></span></h4>
+
+<p>Text items support the notion of an <i class="i">index</i> for identifying
+particular positions within the item.
+Indices are used for commands such as inserting text, deleting
+a range of characters, and setting the insertion cursor position.
+An index may be specified in any of a number of ways, and
+different types of items may support different forms for
+specifying indices.
+Text items support the following forms for an index;  if you
+define new types of text-like items, it would be advisable to
+support as many of these forms as practical.
+Note that it is possible to refer to the character just after
+the last one in the text item;  this is necessary for such
+tasks as inserting new text at the end of the item.
+</p>
+<dl class="table">
+<dt><i class="i">number</i></dt>
+<dd><p>A decimal number giving the position of the desired character
+within the text item.
+0 refers to the first character, 1 to the next character, and
+so on.
+A number less than 0 is treated as if it were zero, and a
+number greater than the length of the text item is treated
+as if it were equal to the length of the text item.
+</p></dd>
+<dt><b class="b">end</b></dt>
+<dd><p>Refers to the character just after the last one in the item
+(same as the number of characters in the item).
+</p></dd>
+<dt><b class="b">insert</b></dt>
+<dd><p>Refers to the character just before which the insertion cursor
+is drawn in this item.
+</p></dd>
+<dt><b class="b">sel.first</b></dt>
+<dd><p>Refers to the first selected character in the item.
+If the selection isn&rsquo;t in this item then this form is illegal.
+</p></dd>
+<dt><b class="b">sel.last</b></dt>
+<dd><p>Refers to the last selected character in the item.
+If the selection isn&rsquo;t in this item then this form is illegal.
+</p></dd>
+<dt><b class="b">@</b><i class="i">x,y</i></dt>
+<dd><p>Refers to the character at the point given by <i class="i">x</i> and
+<i class="i">y</i><span class="r">, where </span><i class="i">x</i><span class="r"> and </span><i class="i">y</i> are specified in the coordinate
+system of the canvas.
+If <i class="i">x</i><span class="r"> and </span><i class="i">y</i> lie outside the coordinates covered by the
+text item, then they refer to the first or last character in the
+line that is closest to the given point.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="A-Canvas-Widget_0027s-Arguments">
+<h4 class="unnumberedsubsec"><span>A Canvas Widget&rsquo;s Arguments<a class="copiable-link" href="#A-Canvas-Widget_0027s-Arguments"> &para;</a></span></h4>
+
+<p>The <b class="b">canvas</b> command creates a new Tcl command whose
+name is <i class="i">pathName</i>.  This
+command may be used to invoke various
+operations on the widget.  It has the following general form:
+</p>
+<div class="example">
+<pre class="example-preformatted"><i class="i">pathName option </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</pre></div>
+
+<p><i class="i">Option</i><span class="r"> and the </span><i class="i">arg</i>s
+determine the exact behavior of the command.
+The following widget commands are possible for canvas widgets:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:addtag </b><i class="i">tag searchSpec </i><span class="r">?</span><i class="i">arg arg ...</i>?</dt>
+<dd><p>For each item that meets the constraints specified by
+<i class="i">searchSpec</i><span class="r"> and the </span><i class="i">arg</i>s, add
+<i class="i">tag</i> to the list of tags associated with the item if it
+isn&rsquo;t already present on that list.
+It is possible that no items will satisfy the constraints
+given by <i class="i">searchSpec and </i><i class="i">arg</i>s, in which case the
+command has no effect.
+This command returns an empty string as result.
+<i class="i">SearchSpec</i><span class="r"> and </span><i class="i">arg</i>&rsquo;s may take any of the following
+forms:
+</p>
+<dl class="table">
+<dt><b class="b">above </b><i class="i">tagOrId</i></dt>
+<dd><p>Selects the item just after (above) the one given by <i class="i">tagOrId</i>
+in the display list.
+If <i class="i">tagOrId</i> denotes more than one item, then the last (topmost)
+of these items in the display list is used.
+</p></dd>
+<dt><b class="b">all</b></dt>
+<dd><p>Selects all the items in the canvas.
+</p></dd>
+<dt><b class="b">below </b><i class="i">tagOrId</i></dt>
+<dd><p>Selects the item just before (below) the one given by <i class="i">tagOrId</i>
+in the display list.
+If <i class="i">tagOrId</i> denotes more than one item, then the first (lowest)
+of these items in the display list is used.
+</p></dd>
+<dt><b class="b">closest </b><i class="i">x y </i><span class="r">?</span><i class="i">halo</i><span class="r">? ?</span><i class="i">start</i>?</dt>
+<dd><p>Selects the item closest to the point given by <i class="i">x</i><span class="r"> and </span><i class="i">y</i>.
+If more than one item is at the same closest distance (e.g. two
+items overlap the point), then the top-most of these items (the
+last one in the display list) is used.
+If <i class="i">halo</i> is specified, then it must be a non-negative
+value.
+Any item closer than <i class="i">halo</i> to the point is considered to
+overlap it.
+The <i class="i">start</i> argument may be used to step circularly through
+all the closest items.
+If <i class="i">start</i> is specified, it names an item using a tag or id
+(if by tag, it selects the first item in the display list with
+the given tag).
+Instead of selecting the topmost closest item, this form will
+select the topmost closest item that is below <i class="i">start</i> in
+the display list;  if no such item exists, then the selection
+behaves as if the <i class="i">start</i> argument had not been specified.
+</p></dd>
+<dt><b class="b">enclosed</b><span class="r"> </span><i class="i">x1</i><span class="r"> </span><i class="i">y1</i><span class="r"> </span><i class="i">x2</i><span class="r"> </span><i class="i">y2</i></dt>
+<dd><p>Selects all the items completely enclosed within the rectangular
+region given by <i class="i">x1</i><span class="r">, </span><i class="i">y1</i><span class="r">, </span><i class="i">x2</i><span class="r">, and </span><i class="i">y2</i>.
+<i class="i">X1</i><span class="r"> must be no greater then </span><i class="i">x2</i><span class="r"> and </span><i class="i">y1</i> must be
+no greater than <i class="i">y2</i>.
+</p></dd>
+<dt><b class="b">overlapping</b><span class="r"> </span><i class="i">x1</i><span class="r"> </span><i class="i">y1</i><span class="r"> </span><i class="i">x2</i><span class="r"> </span><i class="i">y2</i></dt>
+<dd><p>Selects all the items that overlap or are enclosed within the
+rectangular region given by <i class="i">x1</i><span class="r">, </span><i class="i">y1</i><span class="r">, </span><i class="i">x2</i>,
+and <i class="i">y2</i>.
+<i class="i">X1</i><span class="r"> must be no greater then </span><i class="i">x2</i><span class="r"> and </span><i class="i">y1</i> must be
+no greater than <i class="i">y2</i>.
+</p></dd>
+<dt><b class="b">withtag </b><i class="i">tagOrId</i></dt>
+<dd><p>Selects all the items given by <i class="i">tagOrId</i>.
+</p></dd>
+</dl>
+
+</dd>
+<dt><i class="i">pathName </i><b class="b">:bbox </b><i class="i">tagOrId</i><span class="r"> ?</span><i class="i">tagOrId tagOrId ...</i>?</dt>
+<dd><p>Returns a list with four elements giving an approximate bounding box
+for all the items named by the <i class="i">tagOrId</i> arguments.
+The list has the form &ldquo;<i class="i">x1 y1 x2 y2</i>&rdquo; such that the drawn
+areas of all the named elements are within the region bounded by
+<i class="i">x1</i><span class="r"> on the left, </span><i class="i">x2</i><span class="r"> on the right, </span><i class="i">y1</i> on the top,
+and <i class="i">y2</i> on the bottom.
+The return value may overestimate the actual bounding box by
+a few pixels.
+If no items match any of the <i class="i">tagOrId</i> arguments then an
+empty string is returned.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:bind </b><i class="i">tagOrId</i><span class="r"> ?</span><i class="i">sequence</i><span class="r">? ?</span><i class="i">command</i>?</dt>
+<dd><p>This command associates <i class="i">command</i> with all the items given by
+<i class="i">tagOrId</i> such that whenever the event sequence given by
+<i class="i">sequence</i> occurs for one of the items the command will
+be invoked.
+This widget command is similar to the <b class="b">bind</b> command except that
+it operates on items in a canvas rather than entire widgets.
+See the <b class="b">bind</b> manual entry for complete details
+on the syntax of <i class="i">sequence</i> and the substitutions performed
+on <i class="i">command</i> before invoking it.
+If all arguments are specified then a new binding is created, replacing
+any existing binding for the same <i class="i">sequence</i><span class="r"> and </span><i class="i">tagOrId</i>
+(if the first character of <i class="i">command</i><span class="r"> is &ldquo;+&rdquo; then </span><i class="i">command</i>
+augments an existing binding rather than replacing it).
+In this case the return value is an empty string.
+If <i class="i">command</i><span class="r"> is omitted then the command returns the </span><i class="i">command</i>
+associated with <i class="i">tagOrId</i><span class="r"> and </span><i class="i">sequence</i> (an error occurs
+if there is no such binding).
+If both <i class="i">command</i><span class="r"> and </span><i class="i">sequence</i> are omitted then the command
+returns a list of all the sequences for which bindings have been
+defined for <i class="i">tagOrId</i>.
+</p></dd>
+</dl>
+
+
+<p>The only events for which bindings may be specified are those related
+to the mouse and keyboard, such as <b class="b">Enter</b><span class="r">, </span><b class="b">Leave</b>,
+<b class="b">ButtonPress</b><span class="r">, </span><b class="b">Motion</b><span class="r">, and </span><b class="b">KeyPress</b>.
+The handling of events in canvases uses the current item defined
+in ITEM IDS AND TAGS above.
+<b class="b">Enter</b><span class="r"> and </span><b class="b">Leave</b> events trigger for an item when it
+becomes the current item or ceases to be the current item;  note
+that these events are different than <b class="b">Enter</b><span class="r"> and </span><b class="b">Leave</b>
+events for windows.
+Mouse-related events are directed to the current item, if any.
+Keyboard-related events are directed to the focus item, if any
+(see the <b class="b">focus</b> widget command below for more on this).
+</p>
+
+<p>It is possible for multiple commands to be bound to a single
+event sequence for a single object.
+This occurs, for example, if one command is associated with the
+item&rsquo;s id and another is associated with one of the item&rsquo;s tags.
+When this occurs, the first matching binding is used.
+A binding for the item&rsquo;s id has highest priority, followed by
+the oldest tag for the item and proceeding through all of the
+item&rsquo;s tags up through the most-recently-added one.
+If a binding is associated with the tag <b class="b">all</b>, the binding
+will have lower priority than all other bindings associated
+with the item.
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:canvasx </b><i class="i">screenx</i><span class="r"> ?</span><i class="i">gridspacing</i>?</dt>
+<dd><p>Given a screen x-coordinate <i class="i">screenx</i> this command returns
+the canvas x-coordinate that is displayed at that location.
+If <i class="i">gridspacing</i> is specified, then the canvas coordinate is
+rounded to the nearest multiple of <i class="i">gridspacing</i> units.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:canvasy </b><i class="i">screeny</i><span class="r"> ?</span><i class="i">gridspacing</i>?</dt>
+<dd><p>Given a screen y-coordinate <i class="i">screeny</i> this command returns
+the canvas y-coordinate that is displayed at that location.
+If <i class="i">gridspacing</i> is specified, then the canvas coordinate is
+rounded to the nearest multiple of <i class="i">gridspacing</i> units.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:configure ?</b><i class="i">option</i><span class="r">? ?</span><i class="i">value</i><span class="r">? ?</span><i class="i">option value ...</i>?</dt>
+<dd><p>Query or modify the configuration options of the widget.
+If no <i class="i">option</i> is specified, returns a list describing all of
+the available options for <i class="i">pathName</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).  If <i class="i">option</i> is specified
+with no <i class="i">value</i>, then the command returns a list describing the
+one named option (this list will be identical to the corresponding
+sublist of the value returned if no <i class="i">option</i> is specified).  If
+one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given widget option(s) to have the given value(s);  in
+this case the command returns an empty string.
+<i class="i">Option</i><span class="r"> may have any of the values accepted by the </span><b class="b">canvas</b>
+command.
+</p></dd>
+<dt><i class="i">pathName</i><span class="r"> </span><b class="b">:coords </b><i class="i">tagOrId </i><span class="r">?</span><i class="i">x0 y0 ...</i>?</dt>
+<dd><p>Query or modify the coordinates that define an item.
+If no coordinates are specified, this command returns a list
+whose elements are the coordinates of the item named by
+<i class="i">tagOrId</i>.
+If coordinates are specified, then they replace the current
+coordinates for the named item.
+If <i class="i">tagOrId</i> refers to multiple items, then
+the first one in the display list is used.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:create </b><i class="i">type x y </i><span class="r">?</span><i class="i">x y ...</i><span class="r">? ?</span><i class="i">option value ...</i>?</dt>
+<dd><p>Create a new item in <i class="i">pathName</i><span class="r"> of type </span><i class="i">type</i>.
+The exact format of the arguments after <b class="b">type</b> depends
+on <b class="b">type</b>, but usually they consist of the coordinates for
+one or more points, followed by specifications for zero or
+more item options.
+See the subsections on individual item types below for more
+on the syntax of this command.
+This command returns the id for the new item.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:dchars </b><i class="i">tagOrId first </i><span class="r">?</span><i class="i">last</i>?</dt>
+<dd><p>For each item given by <i class="i">tagOrId</i>, delete the characters
+in the range given by <i class="i">first</i><span class="r"> and </span><i class="i">last</i>,
+inclusive.
+If some of the items given by <i class="i">tagOrId</i> don&rsquo;t support
+text operations, then they are ignored.
+<i class="i">First</i><span class="r"> and </span><i class="i">last</i> are indices of characters
+within the item(s) as described in INDICES above.
+If <i class="i">last</i><span class="r"> is omitted, it defaults to </span><i class="i">first</i>.
+This command returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:delete </b><span class="r">?</span><i class="i">tagOrId tagOrId ...</i>?</dt>
+<dd><p>Delete each of the items given by each <i class="i">tagOrId</i>, and return
+an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:dtag </b><i class="i">tagOrId </i><span class="r">?tagToDelete</span>?</dt>
+<dd><p>For each of the items given by <i class="i">tagOrId</i>, delete the
+tag given by <i class="i">tagToDelete</i> from the list of those
+associated with the item.
+If an item doesn&rsquo;t have the tag <i class="i">tagToDelete</i> then
+the item is unaffected by the command.
+If <i class="i">tagToDelete</i><span class="r"> is omitted then it defaults to </span><i class="i">tagOrId</i>.
+This command returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:find </b><i class="i">searchCommand </i><span class="r">?</span><i class="i">arg arg ...</i>?</dt>
+<dd><p>This command returns a list consisting of all the items that
+meet the constraints specified by <i class="i">searchCommand</i> and
+<i class="i">arg</i>&rsquo;s.
+<i class="i">SearchCommand</i><span class="r"> and </span><i class="i">args</i> have any of the forms
+accepted by the <b class="b">addtag</b> command.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:focus </b><span class="r">?</span><i class="i">tagOrId</i>?</dt>
+<dd><p>Set the keyboard focus for the canvas widget to the item given by
+<i class="i">tagOrId</i>.
+If <i class="i">tagOrId</i> refers to several items, then the focus is set
+to the first such item in the display list that supports the
+insertion cursor.
+If <i class="i">tagOrId</i> doesn&rsquo;t refer to any items, or if none of them
+support the insertion cursor, then the focus isn&rsquo;t changed.
+If <i class="i">tagOrId</i> is an empty
+string, then the focus item is reset so that no item has the focus.
+If <i class="i">tagOrId</i> is not specified then the command returns the
+id for the item that currently has the focus, or an empty string
+if no item has the focus.
+</p></dd>
+</dl>
+
+
+<p>Once the focus has been set to an item, the item will display
+the insertion cursor and all keyboard events will be directed
+to that item.
+The focus item within a canvas and the focus window on the
+screen (set with the <b class="b">focus</b> command) are totally independent:
+a given item doesn&rsquo;t actually have the input focus unless (a)
+its canvas is the focus window and (b) the item is the focus item
+within the canvas.
+In most cases it is advisable to follow the <b class="b">focus</b> widget
+command with the <b class="b">focus</b> command to set the focus window to
+the canvas (if it wasn&rsquo;t there already).
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:gettags</b><span class="r"> </span><i class="i">tagOrId</i></dt>
+<dd><p>Return a list whose elements are the tags associated with the
+item given by <i class="i">tagOrId</i>.
+If <i class="i">tagOrId</i> refers to more than one item, then the tags
+are returned from the first such item in the display list.
+If <i class="i">tagOrId</i> doesn&rsquo;t refer to any items, or if the item
+contains no tags, then an empty string is returned.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:icursor </b><i class="i">tagOrId index</i></dt>
+<dd><p>Set the position of the insertion cursor for the item(s)
+given by <i class="i">tagOrId</i>
+to just before the character whose position is given by <i class="i">index</i>.
+If some or all of the items given by <i class="i">tagOrId</i> don&rsquo;t support
+an insertion cursor then this command has no effect on them.
+See INDICES above for a description of the
+legal forms for <i class="i">index</i>.
+Note:  the insertion cursor is only displayed in an item if
+that item currently has the keyboard focus (see the widget
+command <b class="b">focus</b>, below), but the cursor position may
+be set even when the item doesn&rsquo;t have the focus.
+This command returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:index </b><i class="i">tagOrId index</i></dt>
+<dd><p>This command returns a decimal string giving the numerical index
+within <i class="i">tagOrId</i><span class="r"> corresponding to </span><i class="i">index</i>.
+<i class="i">Index</i> gives a textual description of the desired position
+as described in INDICES above.
+The return value is guaranteed to lie between 0 and the number
+of characters within the item, inclusive.
+If <i class="i">tagOrId</i> refers to multiple items, then the index
+is processed in the first of these items that supports indexing
+operations (in display list order).
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:insert </b><i class="i">tagOrId beforeThis string</i></dt>
+<dd><p>For each of the items given by <i class="i">tagOrId</i>, if the item supports
+text insertion then <i class="i">string</i> is inserted into the item&rsquo;s
+text just before the character whose index is <i class="i">beforeThis</i>.
+See INDICES above for information about the forms allowed
+for <i class="i">beforeThis</i>.
+This command returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:itemconfigure </b><i class="i">tagOrId</i><span class="r"> ?</span><i class="i">option</i><span class="r">? ?</span><i class="i">value</i><span class="r">? ?</span><i class="i">option value ...</i>?</dt>
+<dd><p>This command is similar to the <b class="b">configure</b> widget command except
+that it modifies item-specific options for the items given by
+<i class="i">tagOrId</i> instead of modifying options for the overall
+canvas widget.
+If no <i class="i">option</i> is specified, returns a list describing all of
+the available options for the first item given by <i class="i">tagOrId</i>
+(see <b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).  If <i class="i">option</i> is specified
+with no <i class="i">value</i>, then the command returns a list describing the
+one named option (this list will be identical to the corresponding
+sublist of the value returned if no <i class="i">option</i> is specified).  If
+one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given widget option(s) to have the given value(s) in
+each of the items given by <i class="i">tagOrId</i>;  in
+this case the command returns an empty string.
+The <i class="i">option</i><span class="r">s and </span><i class="i">value</i>s are the same as those permissible
+in the <b class="b">create</b> widget command when the item(s) were created;
+see the sections describing individual item types below for details
+on the legal options.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:lower </b><i class="i">tagOrId </i><span class="r">?</span><i class="i">belowThis</i>?</dt>
+<dd><p>Move all of the items given by <i class="i">tagOrId</i> to a new position
+in the display list just before the item given by <i class="i">belowThis</i>.
+If <i class="i">tagOrId</i> refers to more than one item then all are moved
+but the relative order of the moved items will not be changed.
+<i class="i">BelowThis</i> is a tag or id;  if it refers to more than one
+item then the first (lowest) of these items in the display list is used
+as the destination location for the moved items.
+This command returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:move </b><i class="i">tagOrId xAmount yAmount</i></dt>
+<dd><p>Move each of the items given by <i class="i">tagOrId</i> in the canvas coordinate
+space by adding <i class="i">xAmount</i> to the x-coordinate of each point
+associated with the item and <i class="i">yAmount</i> to the y-coordinate of
+each point associated with the item.
+This command returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:postscript </b><span class="r">?</span><i class="i">option value option value ...</i>?</dt>
+<dd><p>Generate a Postscript representation for part or all of the canvas.
+If the <b class="b">:file</b> option is specified then the Postscript is written
+to a file and an empty string is returned;  otherwise the Postscript
+is returned as the result of the command.
+The Postscript is created in Encapsulated Postscript form using
+version 3.0 of the Document Structuring Conventions.
+The <i class="i">option</i>\-<i class="i">value</i> argument pairs provide additional
+information to control the generation of Postscript.  The following
+options are supported:
+</p>
+<dl class="table">
+<dt><b class="b">:colormap </b><i class="i">varName</i></dt>
+<dd><p><i class="i">VarName</i> must be the name of a global array variable
+that specifies a color mapping to use in the Postscript.
+Each element of <i class="i">varName</i> must consist of Postscript
+code to set a particular color value (e.g. &ldquo;<b class="b">1.0 1.0 0.0 setrgbcolor</b>&rdquo;).
+When outputting color information in the Postscript, Tk checks
+to see if there is an element of <i class="i">varName</i> with the same
+name as the color.
+If so, Tk uses the value of the element as the Postscript command
+to set the color.
+If this option hasn&rsquo;t been specified, or if there isn&rsquo;t an entry
+in <i class="i">varName</i> for a given color, then Tk uses the red, green,
+and blue intensities from the X color.
+</p></dd>
+<dt><b class="b">:colormode </b><i class="i">mode</i></dt>
+<dd><p>Specifies how to output color information.  <i class="i">Mode</i> must be either
+<b class="b">color</b><span class="r"> (for full color output), </span><b class="b">gray</b> (convert all colors
+to their gray-scale equivalents) or <b class="b">mono</b> (convert all colors
+to black or white).
+</p></dd>
+<dt><b class="b">:file </b><i class="i">fileName</i></dt>
+<dd><p>Specifies the name of the file in which to write the Postscript.
+If this option isn&rsquo;t specified then the Postscript is returned as the
+result of the command instead of being written to a file.
+</p></dd>
+<dt><b class="b">:fontmap </b><i class="i">varName</i></dt>
+<dd><p><i class="i">VarName</i> must be the name of a global array variable
+that specifies a font mapping to use in the Postscript.
+Each element of <i class="i">varName</i> must consist of a Tcl list with
+two elements, which are the name and point size of a Postscript font.
+When outputting Postscript commands for a particular font, Tk
+checks to see if <i class="i">varName</i> contains an element with the same
+name as the font.
+If there is such an element, then the font information contained in
+that element is used in the Postscript.
+Otherwise Tk attempts to guess what Postscript font to use.
+Tk&rsquo;s guesses generally only work for well-known fonts such as
+Times and Helvetica and Courier, and only if the X font name does not
+omit any dashes up through the point size.
+For example, \fB\-*\-Courier\-Bold\-R\-Normal\-\-*\-120\-* will work but
+\fB*Courier\-Bold\-R\-Normal*120* will not;  Tk needs the dashes to
+parse the font name).
+</p></dd>
+<dt><b class="b">:height </b><i class="i">size</i></dt>
+<dd><p>Specifies the height of the area of the canvas to print.
+Defaults to the height of the canvas window.
+</p></dd>
+<dt><b class="b">:pageanchor </b><i class="i">anchor</i></dt>
+<dd><p>Specifies which point of the printed area should be appear over
+the positioning point on the page (which is given by the <b class="b">:pagex</b>
+and <b class="b">:pagey</b> options).
+For example, <b class="b">:pageanchor n</b> means that the top center of the
+printed area should be over the positioning point.
+Defaults to <b class="b">center</b>.
+</p></dd>
+<dt><b class="b">:pageheight </b><i class="i">size</i></dt>
+<dd><p>Specifies that the Postscript should be scaled in both x and y so
+that the printed area is <i class="i">size</i> high on the Postscript page.
+<i class="i">Size</i> consists of a floating-point number followed by
+<b class="b">c</b><span class="r"> for centimeters, </span><b class="b">i</b><span class="r"> for inches, </span><b class="b">m</b> for millimeters,
+or <b class="b">p</b> or nothing for printer&rsquo;s points (1/72 inch).
+Defaults to the height of the printed area on the screen.
+If both <b class="b">:pageheight</b><span class="r"> and </span><b class="b">:pagewidth</b> are specified then
+the scale factor from the later option is used (non-uniform scaling
+is not implemented).
+</p></dd>
+<dt><b class="b">:pagewidth </b><i class="i">size</i></dt>
+<dd><p>Specifies that the Postscript should be scaled in both x and y so
+that the printed area is <i class="i">size</i> wide on the Postscript page.
+<i class="i">Size</i><span class="r"> has the same form as for </span><b class="b">:pageheight</b>.
+Defaults to the width of the printed area on the screen.
+If both <b class="b">:pageheight</b><span class="r"> and </span><b class="b">:pagewidth</b> are specified then
+the scale factor from the later option is used (non-uniform scaling
+is not implemented).
+</p></dd>
+<dt><b class="b">:pagex </b><i class="i">position</i></dt>
+<dd><p><i class="i">Position</i> gives the x-coordinate of the positioning point on
+the Postscript page, using any of the forms allowed for <b class="b">:pageheight</b>.
+Used in conjunction with the <b class="b">:pagey</b><span class="r"> and </span><b class="b">:pageanchor</b> options
+to determine where the printed area appears on the Postscript page.
+Defaults to the center of the page.
+</p></dd>
+<dt><b class="b">:pagey </b><i class="i">position</i></dt>
+<dd><p><i class="i">Position</i> gives the y-coordinate of the positioning point on
+the Postscript page, using any of the forms allowed for <b class="b">:pageheight</b>.
+Used in conjunction with the <b class="b">:pagex</b><span class="r"> and </span><b class="b">:pageanchor</b> options
+to determine where the printed area appears on the Postscript page.
+Defaults to the center of the page.
+</p></dd>
+<dt><b class="b">:rotate </b><i class="i">boolean</i></dt>
+<dd><p><i class="i">Boolean</i> specifies whether the printed area is to be rotated 90
+degrees.
+In non-rotated output the x-axis of the printed area runs along
+the short dimension of the page (&ldquo;portrait&rdquo; orientation);
+in rotated output the x-axis runs along the long dimension of the
+page (&ldquo;landscape&rdquo; orientation).
+Defaults to non-rotated.
+</p></dd>
+<dt><b class="b">:width </b><i class="i">size</i></dt>
+<dd><p>Specifies the width of the area of the canvas to print.
+Defaults to the width of the canvas window.
+</p></dd>
+<dt><b class="b">:x </b><i class="i">position</i></dt>
+<dd><p>Specifies the x-coordinate of the left edge of the area of the
+canvas that is to be printed, in canvas coordinates, not window
+coordinates.
+Defaults to the coordinate of the left edge of the window.
+</p></dd>
+<dt><b class="b">:y </b><i class="i">position</i></dt>
+<dd><p>Specifies the y-coordinate of the top edge of the area of the
+canvas that is to be printed, in canvas coordinates, not window
+coordinates.
+Defaults to the coordinate of the top edge of the window.
+</p></dd>
+</dl>
+
+</dd>
+<dt><i class="i">pathName </i><b class="b">:raise </b><i class="i">tagOrId </i><span class="r">?</span><i class="i">aboveThis</i>?</dt>
+<dd><p>Move all of the items given by <i class="i">tagOrId</i> to a new position
+in the display list just after the item given by <i class="i">aboveThis</i>.
+If <i class="i">tagOrId</i> refers to more than one item then all are moved
+but the relative order of the moved items will not be changed.
+<i class="i">AboveThis</i> is a tag or id;  if it refers to more than one
+item then the last (topmost) of these items in the display list is used
+as the destination location for the moved items.
+This command returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:scale </b><i class="i">tagOrId xOrigin yOrigin xScale yScale</i></dt>
+<dd><p>Rescale all of the items given by <i class="i">tagOrId</i> in canvas coordinate
+space.
+<i class="i">XOrigin</i><span class="r"> and </span><i class="i">yOrigin</i> identify the origin for the scaling
+operation and <i class="i">xScale</i><span class="r"> and </span><i class="i">yScale</i> identify the scale
+factors for x- and y-coordinates, respectively (a scale factor of
+1.0 implies no change to that coordinate).
+For each of the points defining each item, the x-coordinate is
+adjusted to change the distance from <i class="i">xOrigin</i> by a factor
+of <i class="i">xScale</i>.
+Similarly, each y-coordinate is adjusted to change the distance
+from <i class="i">yOrigin</i><span class="r"> by a factor of </span><i class="i">yScale</i>.
+This command returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:scan</b><span class="r"> </span><i class="i">option args</i></dt>
+<dd><p>This command is used to implement scanning on canvases.  It has
+two forms, depending on <i class="i">option</i>:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:scan :mark </b><i class="i">x y</i></dt>
+<dd><p>Records <i class="i">x</i><span class="r"> and </span><i class="i">y</i> and the canvas&rsquo;s current view;  used
+in conjunction with later <b class="b">scan dragto</b> commands.
+Typically this command is associated with a mouse button press in
+the widget and <i class="i">x</i><span class="r"> and </span><i class="i">y</i> are the coordinates of the
+mouse.  It returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:scan :dragto </b><i class="i">x y</i>.</dt>
+<dd><p>This command computes the difference between its <i class="i">x</i><span class="r"> and </span><i class="i">y</i>
+arguments (which are typically mouse coordinates) and the <i class="i">x</i> and
+<i class="i">y</i><span class="r"> arguments to the last </span><b class="b">scan mark</b> command for the widget.
+It then adjusts the view by 10 times the
+difference in coordinates.  This command is typically associated
+with mouse motion events in the widget, to produce the effect of
+dragging the canvas at high speed through its window.  The return
+value is an empty string.
+</p></dd>
+</dl>
+
+</dd>
+<dt><i class="i">pathName </i><b class="b">:select </b><i class="i">option</i><span class="r"> ?</span><i class="i">tagOrId arg</i>?</dt>
+<dd><p>Manipulates the selection in one of several ways, depending on
+<i class="i">option</i>.
+The command may take any of the forms described below.
+In all of the descriptions below, <i class="i">tagOrId</i> must refer to
+an item that supports indexing and selection;  if it refers to
+multiple items then the first of
+these that supports indexing and the selection is used.
+<i class="i">Index</i> gives a textual description of a position
+within <i class="i">tagOrId</i>, as described in INDICES above.
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:select :adjust </b><i class="i">tagOrId index</i></dt>
+<dd><p>Locate the end of the selection in <i class="i">tagOrId</i> nearest
+to the character given by <i class="i">index</i>, and adjust that
+end of the selection to be at <i class="i">index</i> (i.e. including
+but not going beyond <i class="i">index</i>).
+The other end of the selection is made the anchor point
+for future <b class="b">select to</b> commands.
+If the selection isn&rsquo;t currently in <i class="i">tagOrId</i> then
+this command behaves the same as the <b class="b">select to</b> widget
+command.
+Returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:select :clear</b></dt>
+<dd><p>Clear the selection if it is in this widget.
+If the selection isn&rsquo;t in this widget then the command
+has no effect.
+Returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:select :from </b><i class="i">tagOrId index</i></dt>
+<dd><p>Set the selection anchor point for the widget to be just
+before the character
+given by <i class="i">index</i><span class="r"> in the item given by </span><i class="i">tagOrId</i>.
+This command doesn&rsquo;t change the selection;  it just sets
+the fixed end of the selection for future <b class="b">select to</b>
+commands.
+Returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:select :item</b></dt>
+<dd><p>Returns the id of the selected item, if the selection is in an
+item in this canvas.
+If the selection is not in this canvas then an empty string
+is returned.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:select :to </b><i class="i">tagOrId index</i></dt>
+<dd><p>Set the selection to consist of those characters of <i class="i">tagOrId</i>
+between the selection anchor point and
+<i class="i">index</i>.
+The new selection will include the character given by <i class="i">index</i>;
+it will include the character given by the anchor point only if
+<i class="i">index</i> is greater than or equal to the anchor point.
+The anchor point is determined by the most recent <b class="b">select adjust</b>
+or <b class="b">select from</b> command for this widget.
+If the selection anchor point for the widget isn&rsquo;t currently in
+<i class="i">tagOrId</i>, then it is set to the same character given
+by <i class="i">index</i>.
+Returns an empty string.
+</p></dd>
+</dl>
+
+</dd>
+<dt><i class="i">pathName </i><b class="b">:type</b><i class="i"> tagOrId</i></dt>
+<dd><p>Returns the type of the item given by <i class="i">tagOrId</i>, such as
+<b class="b">rectangle</b><span class="r"> or </span><b class="b">text</b>.
+If <i class="i">tagOrId</i> refers to more than one item, then the type
+of the first item in the display list is returned.
+If <i class="i">tagOrId</i> doesn&rsquo;t refer to any items at all then
+an empty string is returned.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:xview</b><i class="i"> index</i></dt>
+<dd><p>Change the view in the canvas so that the canvas position given by
+<i class="i">index</i> appears at the left edge of the window.
+This command is typically used by scrollbars to scroll the
+canvas.
+<i class="i">Index</i> counts in units of scroll increments (the value of the
+<b class="b">scrollIncrement</b> option):  a value of 0 corresponds to the left
+edge of the scroll region (as defined by the <b class="b">scrollRegion</b>
+option),  a value of 1 means one scroll unit to the right of this,
+and so on.  The return value is an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:yview</b><i class="i"> index</i></dt>
+<dd><p>Change the view in the canvas so that the canvas position given by
+<i class="i">index</i> appears at the top edge of the window.
+This command is typically used by scrollbars to scroll the
+canvas.
+<i class="i">Index</i> counts in units of scroll increments (the value of the
+<b class="b">scrollIncrement</b> option):  a value of 0 corresponds to the top
+edge of the scroll region (as defined by the <b class="b">scrollRegion</b>
+option),  a value of 1 means one scroll unit below this,
+and so on.  The return value is an empty string.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Overview-Of-Item-Types">
+<h4 class="unnumberedsubsec"><span>Overview Of Item Types<a class="copiable-link" href="#Overview-Of-Item-Types"> &para;</a></span></h4>
+
+<p>The sections below describe the various types of items supported
+by canvas widgets.  Each item type is characterized by two things:
+first, the form of the <b class="b">create</b> command used to create
+instances of the type;  and second, a set of configuration options
+for items of that type, which may be used in the
+<b class="b">create</b><span class="r"> and </span><b class="b">itemconfigure</b> widget commands.
+Most items don&rsquo;t support indexing or selection or the commands
+related to them, such as <b class="b">index</b><span class="r"> and </span><b class="b">insert</b>.
+Where items do support these facilities, it is noted explicitly
+in the descriptions below (at present, only text items provide
+this support).
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Arc-Items">
+<h4 class="unnumberedsubsec"><span>Arc Items<a class="copiable-link" href="#Arc-Items"> &para;</a></span></h4>
+
+<p>Items of type <b class="b">arc</b> appear on the display as arc-shaped regions.
+An arc is a section of an oval delimited by two angles (specified
+by the <b class="b">:start</b><span class="r"> and </span><b class="b">:extent</b> options) and displayed in
+one of several ways (specified by the <b class="b">:style</b> option).
+Arcs are created with widget commands of the following form:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:create arc </b><i class="i">x1 y1 x2 y2 </i><span class="r">?</span><i class="i">option value option value ...</i>?</dt>
+<dd><p>The arguments <i class="i">x1</i><span class="r">, </span><i class="i">y1</i><span class="r">, </span><i class="i">x2</i><span class="r">, and </span><i class="i">y2</i> give
+the coordinates of two diagonally opposite corners of a
+rectangular region enclosing the oval that defines the arc.
+After the coordinates there may be any number of <i class="i">option</i><span class="r">-</span><i class="i">value</i>
+pairs, each of which sets one of the configuration options
+for the item.  These same <i class="i">option</i>\-<i class="i">value</i> pairs may be
+used in <b class="b">itemconfigure</b> widget commands to change the item&rsquo;s
+configuration.
+The following options are supported for arcs:
+</p>
+<dl class="table">
+<dt><b class="b">:extent </b><i class="i">degrees</i></dt>
+<dd><p>Specifies the size of the angular range occupied by the arc.
+The arc&rsquo;s range extends for <i class="i">degrees</i> degrees counter-clockwise
+from the starting angle given by the <b class="b">:start</b> option.
+<i class="i">Degrees</i> may be negative.
+</p></dd>
+<dt><b class="b">:fill </b><i class="i">color</i></dt>
+<dd><p>Fill the region of the arc with <i class="i">color</i>.
+<i class="i">Color</i><span class="r"> may have any of the forms accepted by </span><b class="b">Tk_GetColor</b>.
+If <i class="i">color</i> is an empty string (the default), then
+then the arc will not be filled.
+</p></dd>
+<dt><b class="b">:outline </b><i class="i">color</i></dt>
+<dd><p><i class="i">Color</i> specifies a color to use for drawing the arc&rsquo;s
+outline;  it may have any of the forms accepted by <b class="b">Tk_GetColor</b>.
+This option defaults to <b class="b">black</b>.  If the arc&rsquo;s style is
+<b class="b">arc</b> then this option is ignored (the section of perimeter is
+filled using the <b class="b">:fill</b><span class="r"> option).  If </span><i class="i">color</i> is specified
+as an empty string then no outline is drawn for the arc.
+</p></dd>
+<dt><b class="b">:start </b><i class="i">degrees</i></dt>
+<dd><p>Specifies the beginning of the angular range occupied by the
+arc.
+<i class="i">Degrees</i> is given in units of degrees measured counter-clockwise
+from the 3-o&rsquo;clock position;  it may be either positive or negative.
+</p></dd>
+<dt><b class="b">:stipple </b><i class="i">bitmap</i></dt>
+<dd><p>Indicates that the arc should be filled in a stipple pattern;
+<i class="i">bitmap</i> specifies the stipple pattern to use, in any of the
+forms accepted by <b class="b">Tk_GetBitmap</b>.
+If the <b class="b">:fill</b> option hasn&rsquo;t been specified then this option
+has no effect.
+If <i class="i">bitmap</i> is an empty string (the default), then filling is done
+in a solid fashion.
+</p></dd>
+<dt><b class="b">:style </b><i class="i">type</i></dt>
+<dd><p>Specifies how to draw the arc.  If <i class="i">type</i><span class="r"> is </span><b class="b">pieslice</b>
+(the default) then the arc&rsquo;s region is defined by a section
+of the oval&rsquo;s perimeter plus two line segments, one between the center
+of the oval and each end of the perimeter section.
+If <i class="i">type</i><span class="r"> is </span><b class="b">chord</b> then the arc&rsquo;s region is defined
+by a section of the oval&rsquo;s perimeter plus a single line segment
+connecting the two end points of the perimeter section.
+If <i class="i">type</i><span class="r"> is </span><b class="b">arc</b> then the arc&rsquo;s region consists of
+a section of the perimeter alone.  In this last case there is
+no outline for the arc and the <b class="b">:outline</b> option is ignored.
+</p></dd>
+<dt><b class="b">:tags </b><i class="i">tagList</i></dt>
+<dd><p>Specifies a set of tags to apply to the item.
+<i class="i">TagList</i> consists of a list of tag names, which replace any
+existing tags for the item.
+<i class="i">TagList</i> may be an empty list.
+</p></dd>
+<dt><b class="b">:width </b><i class="i">outlineWidth</i></dt>
+<dd><p>Specifies the width of the outline to be drawn around
+the arc&rsquo;s region, in any of the forms described in the COORDINATES
+section above.
+If the <b class="b">:outline</b> option has been specified as an empty string
+then this option has no effect.
+Wide outlines will be drawn centered on the edges of the arc&rsquo;s region.
+This option defaults to 1.0.
+</p></dd>
+</dl>
+</dd>
+</dl>
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Bitmap-Items">
+<h4 class="unnumberedsubsec"><span>Bitmap Items<a class="copiable-link" href="#Bitmap-Items"> &para;</a></span></h4>
+
+<p>Items of type <b class="b">bitmap</b> appear on the display as images with
+two colors, foreground and background.
+Bitmaps are created with widget commands of the following form:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:create bitmap </b><i class="i">x y </i><span class="r">?</span><i class="i">option value option value ...</i>?</dt>
+<dd><p>The arguments <i class="i">x</i><span class="r"> and </span><i class="i">y</i> specify the coordinates of a
+point used to position the bitmap on the display (see the <b class="b">:anchor</b>
+option below for more information on how bitmaps are displayed).
+After the coordinates there may be any number of <i class="i">option</i><span class="r">-</span><i class="i">value</i>
+pairs, each of which sets one of the configuration options
+for the item.  These same <i class="i">option</i>\-<i class="i">value</i> pairs may be
+used in <b class="b">itemconfigure</b> widget commands to change the item&rsquo;s
+configuration.
+The following options are supported for bitmaps:
+</p>
+<dl class="table">
+<dt><b class="b">:anchor </b><i class="i">anchorPos</i></dt>
+<dd><p><i class="i">AnchorPos</i> tells how to position the bitmap relative to the
+positioning point for the item;  it may have any of the forms
+accepted by <b class="b">Tk_GetAnchor</b><span class="r">.  For example, if </span><i class="i">anchorPos</i>
+is <b class="b">center</b> then the bitmap is centered on the point;  if
+<i class="i">anchorPos</i><span class="r"> is </span><b class="b">n</b> then the bitmap will be drawn so that
+its top center point is at the positioning point.
+This option defaults to <b class="b">center</b>.
+</p></dd>
+<dt><b class="b">:background </b><i class="i">color</i></dt>
+<dd><p>Specifies a color to use for each of the bitmap pixels
+whose value is 0.
+<i class="i">Color</i><span class="r"> may have any of the forms accepted by </span><b class="b">Tk_GetColor</b>.
+If this option isn&rsquo;t specified, or if it is specified as an empty
+string, then the background color for the canvas is used.
+</p></dd>
+<dt><b class="b">:bitmap </b><i class="i">bitmap</i></dt>
+<dd><p>Specifies the bitmap to display in the item.
+<i class="i">Bitmap</i><span class="r"> may have any of the forms accepted by </span><b class="b">Tk_GetBitmap</b>.
+</p></dd>
+<dt><b class="b">:foreground </b><i class="i">color</i></dt>
+<dd><p>Specifies a color to use for each of the bitmap pixels
+whose value is 1.
+<i class="i">Color</i><span class="r"> may have any of the forms accepted by </span><b class="b">Tk_GetColor</b> and
+defaults to <b class="b">black</b>.
+</p></dd>
+<dt><b class="b">:tags </b><i class="i">tagList</i></dt>
+<dd><p>Specifies a set of tags to apply to the item.
+<i class="i">TagList</i> consists of a list of tag names, which replace any
+existing tags for the item.
+<i class="i">TagList</i> may be an empty list.
+</p></dd>
+</dl>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Line-Items">
+<h4 class="unnumberedsubsec"><span>Line Items<a class="copiable-link" href="#Line-Items"> &para;</a></span></h4>
+
+<p>Items of type <b class="b">line</b> appear on the display as one or more connected
+line segments or curves.
+Lines are created with widget commands of the following form:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:create line </b><i class="i">x1 y1... xn yn </i><span class="r">?</span><i class="i">option value option value ...</i>?</dt>
+<dd>
+<p>The arguments <i class="i">x1</i><span class="r"> through </span><i class="i">yn</i> give
+the coordinates for a series of two or more points that describe
+a series of connected line segments.
+After the coordinates there may be any number of <i class="i">option</i><span class="r">-</span><i class="i">value</i>
+pairs, each of which sets one of the configuration options
+for the item.  These same <i class="i">option</i>\-<i class="i">value</i> pairs may be
+used in <b class="b">itemconfigure</b> widget commands to change the item&rsquo;s
+configuration.
+The following options are supported for lines:
+</p>
+<dl class="table">
+<dt><b class="b">:arrow </b><i class="i">where</i></dt>
+<dd><p>Indicates whether or not arrowheads are to be drawn at one or both
+ends of the line.
+<i class="i">Where</i><span class="r"> must have one of the values </span><b class="b">none</b> (for no arrowheads),
+<b class="b">first</b> (for an arrowhead at the first point of the line),
+<b class="b">last</b> (for an arrowhead at the last point of the line), or
+<b class="b">both</b> (for arrowheads at both ends).
+This option defaults to <b class="b">none</b>.
+</p></dd>
+<dt><b class="b">:arrowshape </b><i class="i">shape</i></dt>
+<dd><p>This option indicates how to draw arrowheads.
+The <i class="i">shape</i> argument must be a list with three elements, each
+specifying a distance in any of the forms described in
+the COORDINATES section above.
+The first element of the list gives the distance along the line
+from the neck of the arrowhead to its tip.
+The second element gives the distance along the line from the
+trailing points of the arrowhead to the tip, and the third
+element gives the distance from the outside edge of the line to the
+trailing points.
+If this option isn&rsquo;t specified then Tk picks a &ldquo;reasonable&rdquo; shape.
+</p></dd>
+<dt><b class="b">:capstyle </b><i class="i">style</i></dt>
+<dd><p>Specifies the ways in which caps are to be drawn at the endpoints
+of the line.
+<i class="i">Style</i><span class="r"> may have any of the forms accepted by </span><b class="b">Tk_GetCapStyle</b>
+(<b class="b">butt</b><span class="r">, </span><b class="b">projecting</b><span class="r">, or </span><b class="b">round</b>).
+If this option isn&rsquo;t specified then it defaults to <b class="b">butt</b>.
+Where arrowheads are drawn the cap style is ignored.
+</p></dd>
+<dt><b class="b">:fill </b><i class="i">color</i></dt>
+<dd><p><i class="i">Color</i> specifies a color to use for drawing the line; it may have
+any of the forms acceptable to <b class="b">Tk_GetColor</b>.  It may also be an
+empty string, in which case the line will be transparent.
+This option defaults to <b class="b">black</b>.
+</p></dd>
+<dt><b class="b">:joinstyle </b><i class="i">style</i></dt>
+<dd><p>Specifies the ways in which joints are to be drawn at the vertices
+of the line.
+<i class="i">Style</i><span class="r"> may have any of the forms accepted by </span><b class="b">Tk_GetCapStyle</b>
+(<b class="b">bevel</b><span class="r">, </span><b class="b">miter</b><span class="r">, or </span><b class="b">round</b>).
+If this option isn&rsquo;t specified then it defaults to <b class="b">miter</b>.
+If the line only contains two points then this option is
+irrelevant.
+</p></dd>
+<dt><b class="b">:smooth </b><i class="i">boolean</i></dt>
+<dd><p><i class="i">Boolean</i><span class="r"> must have one of the forms accepted by </span><b class="b">Tk_GetBoolean</b>.
+It indicates whether or not the line should be drawn as a curve.
+If so, the line is rendered as a set of Bezier splines: one spline
+is drawn for the first and second line segments, one for the second
+and third, and so on.  Straight-line segments can be generated within
+a curve by duplicating the end-points of the desired line segment.
+</p></dd>
+<dt><b class="b">:splinesteps </b><i class="i">number</i></dt>
+<dd><p>Specifies the degree of smoothness desired for curves:  each spline
+will be approximated with <i class="i">number</i> line segments.  This
+option is ignored unless the <b class="b">:smooth</b> option is true.
+</p></dd>
+<dt><b class="b">:stipple </b><i class="i">bitmap</i></dt>
+<dd><p>Indicates that the line should be filled in a stipple pattern;
+<i class="i">bitmap</i> specifies the stipple pattern to use, in any of the
+forms accepted by <b class="b">Tk_GetBitmap</b>.
+If <i class="i">bitmap</i> is an empty string (the default), then filling is
+done in a solid fashion.
+</p></dd>
+<dt><b class="b">:tags </b><i class="i">tagList</i></dt>
+<dd><p>Specifies a set of tags to apply to the item.
+<i class="i">TagList</i> consists of a list of tag names, which replace any
+existing tags for the item.
+<i class="i">TagList</i> may be an empty list.
+</p></dd>
+<dt><b class="b">:width </b><i class="i">lineWidth</i></dt>
+<dd><p><i class="i">LineWidth</i> specifies the width of the line, in any of the forms
+described in the COORDINATES section above.
+Wide lines will be drawn centered on the path specified by the
+points.
+If this option isn&rsquo;t specified then it defaults to 1.0.
+</p></dd>
+</dl>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Oval-Items">
+<h4 class="unnumberedsubsec"><span>Oval Items<a class="copiable-link" href="#Oval-Items"> &para;</a></span></h4>
+
+<p>Items of type <b class="b">oval</b> appear as circular or oval regions on
+the display.  Each oval may have an outline, a fill, or
+both.  Ovals are created with widget commands of the
+following form:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:create oval </b><i class="i">x1 y1 x2 y2 </i><span class="r">?</span><i class="i">option value option value ...</i>?</dt>
+<dd>
+<p>The arguments <i class="i">x1</i><span class="r">, </span><i class="i">y1</i><span class="r">, </span><i class="i">x2</i><span class="r">, and </span><i class="i">y2</i> give
+the coordinates of two diagonally opposite corners of a
+rectangular region enclosing the oval.
+The oval will include the top and left edges of the rectangle
+not the lower or right edges.
+If the region is square then the resulting oval is circular;
+otherwise it is elongated in shape.
+After the coordinates there may be any number of <i class="i">option</i><span class="r">-</span><i class="i">value</i>
+pairs, each of which sets one of the configuration options
+for the item.  These same <i class="i">option</i>\-<i class="i">value</i> pairs may be
+used in <b class="b">itemconfigure</b> widget commands to change the item&rsquo;s
+configuration.
+The following options are supported for ovals:
+</p>
+<dl class="table">
+<dt><b class="b">:fill </b><i class="i">color</i></dt>
+<dd><p>Fill the area of the oval with <i class="i">color</i>.
+<i class="i">Color</i><span class="r"> may have any of the forms accepted by </span><b class="b">Tk_GetColor</b>.
+If <i class="i">color</i> is an empty string (the default), then
+then the oval will not be filled.
+</p></dd>
+<dt><b class="b">:outline </b><i class="i">color</i></dt>
+<dd><p><i class="i">Color</i> specifies a color to use for drawing the oval&rsquo;s
+outline;  it may have any of the forms accepted by <b class="b">Tk_GetColor</b>.
+This option defaults to <b class="b">black</b>.
+If <i class="i">color</i> is an empty string then no outline will be
+drawn for the oval.
+</p></dd>
+<dt><b class="b">:stipple </b><i class="i">bitmap</i></dt>
+<dd><p>Indicates that the oval should be filled in a stipple pattern;
+<i class="i">bitmap</i> specifies the stipple pattern to use, in any of the
+forms accepted by <b class="b">Tk_GetBitmap</b>.
+If the <b class="b">:fill</b> option hasn&rsquo;t been specified then this option
+has no effect.
+If <i class="i">bitmap</i> is an empty string (the default), then filling is done
+in a solid fashion.
+</p></dd>
+<dt><b class="b">:tags </b><i class="i">tagList</i></dt>
+<dd><p>Specifies a set of tags to apply to the item.
+<i class="i">TagList</i> consists of a list of tag names, which replace any
+existing tags for the item.
+<i class="i">TagList</i> may be an empty list.
+</p></dd>
+<dt><b class="b">:width </b><i class="i">outlineWidth</i></dt>
+<dd><p><i class="i">outlineWidth</i> specifies the width of the outline to be drawn around
+the oval, in any of the forms described in the COORDINATES section above.
+If the <b class="b">:outline</b> option hasn&rsquo;t been specified then this option
+has no effect.
+Wide outlines are drawn centered on the oval path defined by
+<i class="i">x1</i><span class="r">, </span><i class="i">y1</i><span class="r">, </span><i class="i">x2</i><span class="r">, and </span><i class="i">y2</i>.
+This option defaults to 1.0.
+</p></dd>
+</dl>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Polygon-Items">
+<h4 class="unnumberedsubsec"><span>Polygon Items<a class="copiable-link" href="#Polygon-Items"> &para;</a></span></h4>
+
+<p>Items of type <b class="b">polygon</b> appear as polygonal or curved filled regions
+on the display.
+Polygons are created with widget commands of the following form:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:create polygon </b><i class="i">x1 y1 ... xn yn </i><span class="r">?</span><i class="i">option value option value ...</i>?</dt>
+<dd>
+
+<p>The arguments <i class="i">x1</i><span class="r"> through </span><i class="i">yn</i> specify the coordinates for
+three or more points that define a closed polygon.
+The first and last points may be the same;  whether they are or not,
+Tk will draw the polygon as a closed polygon.
+After the coordinates there may be any number of <i class="i">option</i><span class="r">-</span><i class="i">value</i>
+pairs, each of which sets one of the configuration options
+for the item.  These same <i class="i">option</i>\-<i class="i">value</i> pairs may be
+used in <b class="b">itemconfigure</b> widget commands to change the item&rsquo;s
+configuration.
+The following options are supported for polygons:
+</p>
+<dl class="table">
+<dt><b class="b">:fill </b><i class="i">color</i></dt>
+<dd><p><i class="i">Color</i> specifies a color to use for filling the area of the
+polygon; it may have any of the forms acceptable to <b class="b">Tk_GetColor</b>.
+If <i class="i">color</i> is an empty string then the polygon will be
+transparent.
+This option defaults to <b class="b">black</b>.
+</p></dd>
+<dt><b class="b">:smooth </b><i class="i">boolean</i></dt>
+<dd><p><i class="i">Boolean</i><span class="r"> must have one of the forms accepted by </span><b class="b">Tk_GetBoolean</b>
+It indicates whether or not the polygon should be drawn with a
+curved perimeter.
+If so, the outline of the polygon becomes a set of Bezier splines,
+one spline for the first and second line segments, one for the second
+and third, and so on.  Straight-line segments can be generated in a
+smoothed polygon by duplicating the end-points of the desired line segment.
+</p></dd>
+<dt><b class="b">:splinesteps </b><i class="i">number</i></dt>
+<dd><p>Specifies the degree of smoothness desired for curves:  each spline
+will be approximated with <i class="i">number</i> line segments.  This
+option is ignored unless the <b class="b">:smooth</b> option is true.
+</p></dd>
+<dt><b class="b">:stipple </b><i class="i">bitmap</i></dt>
+<dd><p>Indicates that the polygon should be filled in a stipple pattern;
+<i class="i">bitmap</i> specifies the stipple pattern to use, in any of the
+forms accepted by <b class="b">Tk_GetBitmap</b>.
+If <i class="i">bitmap</i> is an empty string (the default), then filling is
+done in a solid fashion.
+</p></dd>
+<dt><b class="b">:tags </b><i class="i">tagList</i></dt>
+<dd><p>Specifies a set of tags to apply to the item.
+<i class="i">TagList</i> consists of a list of tag names, which replace any
+existing tags for the item.
+<i class="i">TagList</i> may be an empty list.
+</p></dd>
+</dl>
+</dd>
+</dl>
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Rectangle-Items">
+<h4 class="unnumberedsubsec"><span>Rectangle Items<a class="copiable-link" href="#Rectangle-Items"> &para;</a></span></h4>
+
+<p>Items of type <b class="b">rectangle</b> appear as rectangular regions on
+the display.  Each rectangle may have an outline, a fill, or
+both.  Rectangles are created with widget commands of the
+following form:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:create rectangle </b><i class="i">x1 y1 x2 y2 </i><span class="r">?</span><i class="i">option value option value ...</i>?</dt>
+<dd>
+<p>The arguments <i class="i">x1</i><span class="r">, </span><i class="i">y1</i><span class="r">, </span><i class="i">x2</i><span class="r">, and </span><i class="i">y2</i> give
+the coordinates of two diagonally opposite corners of the rectangle
+(the rectangle will include its upper and left edges but not
+its lower or right edges).
+After the coordinates there may be any number of <i class="i">option</i><span class="r">-</span><i class="i">value</i>
+pairs, each of which sets one of the configuration options
+for the item.  These same <i class="i">option</i>\-<i class="i">value</i> pairs may be
+used in <b class="b">itemconfigure</b> widget commands to change the item&rsquo;s
+configuration.
+The following options are supported for rectangles:
+</p>
+<dl class="table">
+<dt><b class="b">:fill </b><i class="i">color</i></dt>
+<dd><p>Fill the area of the rectangle with <i class="i">color</i>, which may be
+specified in any of the forms accepted by <b class="b">Tk_GetColor</b>.
+If <i class="i">color</i> is an empty string (the default), then
+then the rectangle will not be filled.
+</p></dd>
+<dt><b class="b">:outline </b><i class="i">color</i></dt>
+<dd><p>Draw an outline around the edge of the rectangle in <i class="i">color</i>.
+<i class="i">Color</i><span class="r"> may have any of the forms accepted by </span><b class="b">Tk_GetColor</b>.
+This option defaults to <b class="b">black</b>.
+If <i class="i">color</i> is an empty string then no outline will be
+drawn for the rectangle.
+</p></dd>
+<dt><b class="b">:stipple </b><i class="i">bitmap</i></dt>
+<dd><p>Indicates that the rectangle should be filled in a stipple pattern;
+<i class="i">bitmap</i> specifies the stipple pattern to use, in any of the
+forms accepted by <b class="b">Tk_GetBitmap</b>.
+If the <b class="b">:fill</b> option hasn&rsquo;t been specified then this option
+has no effect.
+If <i class="i">bitmap</i> is an empty string (the default), then filling
+is done in a solid fashion.
+</p></dd>
+<dt><b class="b">:tags </b><i class="i">tagList</i></dt>
+<dd><p>Specifies a set of tags to apply to the item.
+<i class="i">TagList</i> consists of a list of tag names, which replace any
+existing tags for the item.
+<i class="i">TagList</i> may be an empty list.
+</p></dd>
+<dt><b class="b">:width </b><i class="i">outlineWidth</i></dt>
+<dd><p><i class="i">OutlineWidth</i> specifies the width of the outline to be drawn around
+the rectangle, in any of the forms described in the COORDINATES section above.
+If the <b class="b">:outline</b> option hasn&rsquo;t been specified then this option
+has no effect.
+Wide outlines are drawn centered on the rectangular path
+defined by <i class="i">x1</i><span class="r">, </span><i class="i">y1</i><span class="r">, </span><i class="i">x2</i><span class="r">, and </span><i class="i">y2</i>.
+This option defaults to 1.0.
+</p></dd>
+</dl>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Text-Items">
+<h4 class="unnumberedsubsec"><span>Text Items<a class="copiable-link" href="#Text-Items"> &para;</a></span></h4>
+
+<p>A text item displays a string of characters on the screen in one
+or more lines.
+Text items support indexing and selection, along with the
+following text-related canvas widget commands:  <b class="b">dchars</b>,
+<b class="b">focus</b><span class="r">, </span><b class="b">icursor</b><span class="r">, </span><b class="b">index</b><span class="r">, </span><b class="b">insert</b>,
+<b class="b">select</b>.
+Text items are created with widget commands of the following
+form:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:create text </b><i class="i">x y </i><span class="r">?</span><i class="i">option value option value ...</i>?</dt>
+<dd>
+<p>The arguments <i class="i">x</i><span class="r"> and </span><i class="i">y</i> specify the coordinates of a
+point used to position the text on the display (see the options
+below for more information on how text is displayed).
+After the coordinates there may be any number of <i class="i">option</i><span class="r">-</span><i class="i">value</i>
+pairs, each of which sets one of the configuration options
+for the item.  These same <i class="i">option</i>\-<i class="i">value</i> pairs may be
+used in <b class="b">itemconfigure</b> widget commands to change the item&rsquo;s
+configuration.
+The following options are supported for text items:
+</p>
+<dl class="table">
+<dt><b class="b">:anchor </b><i class="i">anchorPos</i></dt>
+<dd><p><i class="i">AnchorPos</i> tells how to position the text relative to the
+positioning point for the text;  it may have any of the forms
+accepted by <b class="b">Tk_GetAnchor</b><span class="r">.  For example, if </span><i class="i">anchorPos</i>
+is <b class="b">center</b> then the text is centered on the point;  if
+<i class="i">anchorPos</i><span class="r"> is </span><b class="b">n</b> then the text will be drawn such that
+the top center point of the rectangular region occupied by the
+text will be at the positioning point.
+This option defaults to <b class="b">center</b>.
+</p></dd>
+<dt><b class="b">:fill </b><i class="i">color</i></dt>
+<dd><p><i class="i">Color</i> specifies a color to use for filling the text characters;
+it may have any of the forms accepted by <b class="b">Tk_GetColor</b>.
+If this option isn&rsquo;t specified then it defaults to <b class="b">black</b>.
+</p></dd>
+<dt><b class="b">:font </b><i class="i">fontName</i></dt>
+<dd><p>Specifies the font to use for the text item.
+<i class="i">FontName</i><span class="r"> may be any string acceptable to </span><b class="b">Tk_GetFontStruct</b>.
+If this option isn&rsquo;t specified, it defaults to a system-dependent
+font.
+</p></dd>
+<dt><b class="b">:justify </b><i class="i">how</i></dt>
+<dd><p>Specifies how to justify the text within its bounding region.
+<i class="i">How</i><span class="r"> must be one of the values </span><b class="b">left</b><span class="r">, </span><b class="b">right</b>,
+or <b class="b">center</b>.
+This option will only matter if the text is displayed as multiple
+lines.
+If the option is omitted, it defaults to <b class="b">left</b>.
+</p></dd>
+<dt><b class="b">:stipple </b><i class="i">bitmap</i></dt>
+<dd><p>Indicates that the text should be drawn in a stippled pattern
+rather than solid;
+<i class="i">bitmap</i> specifies the stipple pattern to use, in any of the
+forms accepted by <b class="b">Tk_GetBitmap</b>.
+If <i class="i">bitmap</i> is an empty string (the default) then the text
+is drawn in a solid fashion.
+</p></dd>
+<dt><b class="b">:tags </b><i class="i">tagList</i></dt>
+<dd><p>Specifies a set of tags to apply to the item.
+<i class="i">TagList</i> consists of a list of tag names, which replace any
+existing tags for the item.
+<i class="i">TagList</i> may be an empty list.
+</p></dd>
+<dt><b class="b">:text </b><i class="i">string</i></dt>
+<dd><p><i class="i">String</i> specifies the characters to be displayed in the text item.
+Newline characters cause line breaks.
+The characters in the item may also be changed with the
+<b class="b">insert</b><span class="r"> and </span><b class="b">delete</b> widget commands.
+This option defaults to an empty string.
+</p></dd>
+<dt><b class="b">:width </b><i class="i">lineLength</i></dt>
+<dd><p>Specifies a maximum line length for the text, in any of the forms
+described in the COORDINATES section abov.
+If this option is zero (the default) the text is broken into
+lines only at newline characters.
+However, if this option is non-zero then any line that would
+be longer than <i class="i">lineLength</i> is broken just before a space
+character to make the line shorter than <i class="i">lineLength</i>;  the
+space character is treated as if it were a newline
+character.
+</p>
+</dd>
+</dl>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Window-Items">
+<h4 class="unnumberedsubsec"><span>Window Items<a class="copiable-link" href="#Window-Items"> &para;</a></span></h4>
+
+<p>Items of type <b class="b">window</b> cause a particular window to be displayed
+at a given position on the canvas.
+Window items are created with widget commands of the following form:
+</p>
+<div class="example">
+<pre class="example-preformatted"><i class="i">pathName </i><b class="b">:create window </b><i class="i">x y </i><span class="r">?</span><i class="i">option value option value ...</i>?
+</pre></div>
+
+<p>The arguments <i class="i">x</i><span class="r"> and </span><i class="i">y</i> specify the coordinates of a
+point used to position the window on the display (see the <b class="b">:anchor</b>
+option below for more information on how bitmaps are displayed).
+After the coordinates there may be any number of <i class="i">option</i><span class="r">-</span><i class="i">value</i>
+pairs, each of which sets one of the configuration options
+for the item.  These same <i class="i">option</i>\-<i class="i">value</i> pairs may be
+used in <b class="b">itemconfigure</b> widget commands to change the item&rsquo;s
+configuration.
+The following options are supported for window items:
+</p>
+<dl class="table">
+<dt><b class="b">:anchor </b><i class="i">anchorPos</i></dt>
+<dd><p><i class="i">AnchorPos</i> tells how to position the window relative to the
+positioning point for the item;  it may have any of the forms
+accepted by <b class="b">Tk_GetAnchor</b><span class="r">.  For example, if </span><i class="i">anchorPos</i>
+is <b class="b">center</b> then the window is centered on the point;  if
+<i class="i">anchorPos</i><span class="r"> is </span><b class="b">n</b> then the window will be drawn so that
+its top center point is at the positioning point.
+This option defaults to <b class="b">center</b>.
+</p></dd>
+<dt><b class="b">:height </b><i class="i">pixels</i></dt>
+<dd><p>Specifies the height to assign to the item&rsquo;s window.
+<i class="i">Pixels</i> may have any of the
+forms described in the COORDINATES section above.
+If this option isn&rsquo;t specified, or if it is specified as an empty
+string, then the window is given whatever height it requests internally.
+</p></dd>
+<dt><b class="b">:tags </b><i class="i">tagList</i></dt>
+<dd><p>Specifies a set of tags to apply to the item.
+<i class="i">TagList</i> consists of a list of tag names, which replace any
+existing tags for the item.
+<i class="i">TagList</i> may be an empty list.
+</p></dd>
+<dt><b class="b">:width </b><i class="i">pixels</i></dt>
+<dd><p>Specifies the width to assign to the item&rsquo;s window.
+<i class="i">Pixels</i> may have any of the
+forms described in the COORDINATES section above.
+If this option isn&rsquo;t specified, or if it is specified as an empty
+string, then the window is given whatever width it requests internally.
+</p></dd>
+<dt><b class="b">:window </b><i class="i">pathName</i></dt>
+<dd><p>Specifies the window to associate with this item.
+The window specified by <i class="i">pathName</i> must either be a child of
+the canvas widget or a child of some ancestor of the canvas widget.
+<i class="i">PathName</i> may not refer to a top-level window.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Application_002dDefined-Item-Types">
+<h4 class="unnumberedsubsec"><span>Application-Defined Item Types<a class="copiable-link" href="#Application_002dDefined-Item-Types"> &para;</a></span></h4>
+
+<p>It is possible for individual applications to define new item
+types for canvas widgets using C code.
+The interfaces for this mechanism are not presently documented,
+and it&rsquo;s possible they may change, but you should be able to
+see how they work by examining the code for some of the existing
+item types.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Bindings-1">
+<h4 class="unnumberedsubsec"><span>Bindings<a class="copiable-link" href="#Bindings-1"> &para;</a></span></h4>
+
+<p>In the current implementation, new canvases are not given any
+default behavior:  you&rsquo;ll have to execute explicit Tcl commands
+to give the canvas its behavior.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Credits">
+<h4 class="unnumberedsubsec"><span>Credits<a class="copiable-link" href="#Credits"> &para;</a></span></h4>
+
+<p>Tk&rsquo;s canvas widget is a blatant ripoff of ideas from Joel Bartlett&rsquo;s
+<i class="i">ezd</i><span class="r"> program.  </span><i class="i">Ezd</i> provides structured graphics in a Scheme
+environment and preceded canvases by a year or two.  Its simple
+mechanisms for placing and animating graphical objects inspired the
+functions of canvases.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-3">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-3"> &para;</a></span></h4>
+<p>canvas, widget
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="menu.html">menu</a>, Previous: <a href="scale.html">scale</a>, Up: <a href="Widgets.html">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/checkbutton.html
@@ -0,0 +1,346 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>checkbutton (GCL TK Manual)</title>
+
+<meta name="description" content="checkbutton (GCL TK Manual)">
+<meta name="keywords" content="checkbutton (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Widgets.html" rel="up" title="Widgets">
+<link href="menubutton.html" rel="next" title="menubutton">
+<link href="scrollbar.html" rel="prev" title="scrollbar">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="checkbutton">
+<div class="nav-panel">
+<p>
+Next: <a href="menubutton.html" accesskey="n" rel="next">menubutton</a>, Previous: <a href="scrollbar.html" accesskey="p" rel="prev">scrollbar</a>, Up: <a href="Widgets.html" accesskey="u" rel="up">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="checkbutton-1"><span>2.7 checkbutton<a class="copiable-link" href="#checkbutton-1"> &para;</a></span></h3>
+
+<p>checkbutton \- Create and manipulate check-button widgets
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-6" accesskey="1">Synopsis</a></li>
+<li><a href="#Standard-Options-6" accesskey="2">Standard Options</a></li>
+<li><a href="#Arguments-for-Checkbutton" accesskey="3">Arguments for Checkbutton</a></li>
+<li><a href="#Description-4" accesskey="4">Description</a></li>
+<li><a href="#A-Checkbutton-Widget_0027s-Arguments" accesskey="5">A Checkbutton Widget&rsquo;s Arguments</a></li>
+<li><a href="#Bindings-3" accesskey="6">Bindings</a></li>
+<li><a href="#Keywords-6" accesskey="7">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-6">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-6"> &para;</a></span></h4>
+<p><b class="b">checkbutton</b><i class="i"> pathName </i><span class="r">?</span><i class="i">options</i>?
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Standard-Options-6">
+<h4 class="unnumberedsubsec"><span>Standard Options<a class="copiable-link" href="#Standard-Options-6"> &para;</a></span></h4>
+
+
+<div class="example">
+<pre class="example-preformatted">activeBackground  bitmap              font        relief        
+activeForeground  borderWidth         foreground  text          
+anchor            cursor              padX        textVariable  
+background        disabledForeground  padY        
+</pre></div>
+
+
+<p>See <a class="xref" href="options.html">options</a>, for more information.
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Arguments-for-Checkbutton">
+<h4 class="unnumberedsubsec"><span>Arguments for Checkbutton<a class="copiable-link" href="#Arguments-for-Checkbutton"> &para;</a></span></h4>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:command</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">command</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Command</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a Tcl command to associate with the button.  This command
+is typically invoked when mouse button 1 is released over the button
+window.  The button&rsquo;s global variable (<b class="b">:variable</b> option) will
+be updated before the command is invoked.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:height</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">height</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Height</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a desired height for the button.
+If a bitmap is being displayed in the button then the value is in
+screen units (i.e. any of the forms acceptable to <b class="b">Tk_GetPixels</b>);
+for text it is in lines of text.
+If this option isn&rsquo;t specified, the button&rsquo;s desired height is computed
+from the size of the bitmap or text being displayed in it.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:offvalue</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">offValue</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Value</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies value to store in the button&rsquo;s associated variable whenever
+this button is deselected.  Defaults to &ldquo;0&rdquo;.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:onvalue</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">onValue</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Value</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies value to store in the button&rsquo;s associated variable whenever
+this button is selected.  Defaults to &ldquo;1&rdquo;.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:selector</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">selector</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Foreground</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the color to draw in the selector when this button is
+selected.
+If specified as an empty string then no selector is
+drawn for the button.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:state</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">state</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">State</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies one of three states for the check button:  <b class="b">normal</b><span class="r">, </span><b class="b">active</b>,
+or <b class="b">disabled</b>.  In normal state the check button is displayed using the
+<b class="b">foreground</b><span class="r"> and </span><b class="b">background</b> options.  The active state is
+typically used when the pointer is over the check button.  In active state
+the check button is displayed using the <b class="b">activeForeground</b> and
+<b class="b">activeBackground</b> options.  Disabled state means that the check button
+is insensitive:  it doesn&rsquo;t activate and doesn&rsquo;t respond to mouse
+button presses.  In this state the <b class="b">disabledForeground</b> and
+<b class="b">background</b> options determine how the check button is displayed.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:variable</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">variable</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Variable</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies name of global variable to set to indicate whether
+or not this button is selected.  Defaults to the name of the
+button within its parent (i.e. the last element of the button
+window&rsquo;s path name).
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:width</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">width</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Width</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a desired width for the button.
+If a bitmap is being displayed in the button then the value is in
+screen units (i.e. any of the forms acceptable to <b class="b">Tk_GetPixels</b>);
+for text it is in characters.
+If this option isn&rsquo;t specified, the button&rsquo;s desired width is computed
+from the size of the bitmap or text being displayed in it.
+</p></dd>
+</dl>
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-4">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-4"> &para;</a></span></h4>
+
+<p>The <b class="b">checkbutton</b> command creates a new window (given by the
+<i class="i">pathName</i> argument) and makes it into a check-button widget.
+Additional
+options, described above, may be specified on the command line
+or in the option database
+to configure aspects of the check button such as its colors, font,
+text, and initial relief.  The <b class="b">checkbutton</b> command returns its
+<i class="i">pathName</i> argument.  At the time this command is invoked,
+there must not exist a window named <i class="i">pathName</i>, but
+<i class="i">pathName</i>&rsquo;s parent must exist.
+</p>
+<p>A check button is a widget
+that displays a textual string or bitmap
+and a square called a <i class="i">selector</i>.
+A check button has
+all of the behavior of a simple button, including the
+following: it can display itself in either of three different
+ways, according to the <b class="b">state</b> option;
+it can be made to appear
+raised, sunken, or flat; it can be made to flash; and it invokes
+a Tcl command whenever mouse button 1 is clicked over the
+check button.
+</p>
+<p>In addition, check buttons can be <i class="i">selected</i>.  If a check button is
+selected then a special highlight appears in the selector, and
+a Tcl variable associated with the check button is set to a particular
+value (normally 1).  If the check button is not selected, then
+the selector is drawn in a different fashion and the associated
+variable is set to a different value (typically 0).  By default,
+the name of the variable associated with a check button is the
+same as the <i class="i">name</i> used to create the check button.  The
+variable name, and the &ldquo;on&rdquo; and &ldquo;off&rdquo; values stored in it,
+may be modified with options on the command line or in the option
+database.  By default a check button is configured to select and deselect
+itself on alternate button clicks.
+In addition, each check button monitors its associated variable and
+automatically selects and deselects itself when the variables value
+changes to and from the button&rsquo;s &ldquo;on&rdquo; value.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="A-Checkbutton-Widget_0027s-Arguments">
+<h4 class="unnumberedsubsec"><span>A Checkbutton Widget&rsquo;s Arguments<a class="copiable-link" href="#A-Checkbutton-Widget_0027s-Arguments"> &para;</a></span></h4>
+
+<p>The <b class="b">checkbutton</b> command creates a new Tcl command whose
+name is <i class="i">pathName</i>.  This
+command may be used to invoke various
+operations on the widget.  It has the following general form:
+</p>
+<div class="example">
+<pre class="example-preformatted"><i class="i">pathName option </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</pre></div>
+
+<p><i class="i">Option</i><span class="r"> and the </span><i class="i">arg</i>s
+determine the exact behavior of the command.  The following
+commands are possible for check button widgets:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:activate</b></dt>
+<dd><p>Change the check button&rsquo;s state to <b class="b">active</b> and redisplay the button
+using its active foreground and background colors instead of normal
+colors.
+This command is ignored if the check button&rsquo;s state is <b class="b">disabled</b>.
+This command is obsolete and will eventually be removed;
+use &ldquo;<i class="i">pathName </i><b class="b">:configure :state active</b>&rdquo; instead.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:configure</b><span class="r"> ?</span><i class="i">option</i><span class="r">? ?</span><i class="i">value option value ...</i>?</dt>
+<dd><p>Query or modify the configuration options of the widget.
+If no <i class="i">option</i> is specified, returns a list describing all of
+the available options for <i class="i">pathName</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).  If <i class="i">option</i> is specified
+with no <i class="i">value</i>, then the command returns a list describing the
+one named option (this list will be identical to the corresponding
+sublist of the value returned if no <i class="i">option</i> is specified).  If
+one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given widget option(s) to have the given value(s);  in
+this case the command returns an empty string.
+<i class="i">Option</i><span class="r"> may have any of the values accepted by the </span><b class="b">checkbutton</b>
+command.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:deactivate</b></dt>
+<dd><p>Change the check button&rsquo;s state to <b class="b">normal</b> and redisplay the button
+using its normal foreground and background colors.
+This command is ignored if the check button&rsquo;s state is <b class="b">disabled</b>.
+This command is obsolete and will eventually be removed;
+use &ldquo;<i class="i">pathName </i><b class="b">:configure :state normal</b>&rdquo; instead.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:deselect</b></dt>
+<dd><p>Deselect the check button:  redisplay it without a highlight in
+the selector and set the associated variable to its &ldquo;off&rdquo;
+value.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:flash</b></dt>
+<dd><p>Flash the check button.  This is accomplished by redisplaying the check button
+several times, alternating between active and normal colors.  At
+the end of the flash the check button is left in the same normal/active
+state as when the command was invoked.
+This command is ignored if the check button&rsquo;s state is <b class="b">disabled</b>.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:invoke</b></dt>
+<dd><p>Does just what would have happened if the user invoked the check button
+with the mouse: toggle the selection state of the button and invoke
+the Tcl command associated with the check button, if there is one.
+The return value is the return value from the Tcl command, or an
+empty string if there is no command associated with the check button.
+This command is ignored if the check button&rsquo;s state is <b class="b">disabled</b>.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:select</b></dt>
+<dd><p>Select the check button:  display it with a highlighted
+selector and set the associated variable to its &ldquo;on&rdquo;
+value.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:toggle</b></dt>
+<dd><p>Toggle the selection state of the button, redisplaying it and
+modifying its associated variable to reflect the new state.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Bindings-3">
+<h4 class="unnumberedsubsec"><span>Bindings<a class="copiable-link" href="#Bindings-3"> &para;</a></span></h4>
+
+<p>Tk automatically creates class bindings for check buttons that give them
+the following default behavior:
+</p><ul class="itemize">
+<li>[1]
+The check button activates whenever the mouse passes over it and deactivates
+whenever the mouse leaves the check button.
+</li><li>[2]
+The check button&rsquo;s relief is changed to sunken whenever mouse button 1 is
+pressed over it, and the relief is restored to its original
+value when button 1 is later released.
+</li><li>[3]
+If mouse button 1 is pressed over the check button and later released over
+the check button, the check button is invoked (i.e. its selection
+state toggles and the command associated with the button is invoked,
+if there is one).  However, if the mouse is not
+over the check button when button 1 is released, then no invocation occurs.
+</li></ul>
+
+<p>If the check button&rsquo;s state is <b class="b">disabled</b> then none of the above
+actions occur:  the check button is completely non-responsive.
+</p>
+<p>The behavior of check buttons can be changed by defining new bindings for
+individual widgets or by redefining the class bindings.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-6">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-6"> &para;</a></span></h4>
+<p>check button, widget
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="menubutton.html">menubutton</a>, Previous: <a href="scrollbar.html">scrollbar</a>, Up: <a href="Widgets.html">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/destroy.html
@@ -0,0 +1,72 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>destroy (GCL TK Manual)</title>
+
+<meta name="description" content="destroy (GCL TK Manual)">
+<meta name="keywords" content="destroy (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="tk_002ddialog.html" rel="next" title="tk-dialog">
+<link href="bind.html" rel="prev" title="bind">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="destroy">
+<div class="nav-panel">
+<p>
+Next: <a href="tk_002ddialog.html" accesskey="n" rel="next">tk-dialog</a>, Previous: <a href="bind.html" accesskey="p" rel="prev">bind</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="destroy-1"><span>3.3 destroy<a class="copiable-link" href="#destroy-1"> &para;</a></span></h3>
+
+<p>destroy \- Destroy one or more windows
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-17" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-14" accesskey="2">Description</a></li>
+<li><a href="#Keywords-17" accesskey="3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-17">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-17"> &para;</a></span></h4>
+<p><b class="b">destroy </b><span class="r">?</span><i class="i">window window ...</i>?
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-14">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-14"> &para;</a></span></h4>
+
+<p>This command deletes the windows given by the
+<i class="i">window</i> arguments, plus all of their descendants.
+If a <i class="i">window</i> &ldquo;.&rdquo; is deleted then the entire application
+will be destroyed.
+The <i class="i">window</i>s are destroyed in order, and if an error occurs
+in destroying a window the command aborts without destroying the
+remaining windows.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-17">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-17"> &para;</a></span></h4>
+<p>application, destroy, window
+</p></div>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/entry.html
@@ -0,0 +1,350 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>entry (GCL TK Manual)</title>
+
+<meta name="description" content="entry (GCL TK Manual)">
+<meta name="keywords" content="entry (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Widgets.html" rel="up" title="Widgets">
+<link href="message.html" rel="next" title="message">
+<link href="text.html" rel="prev" title="text">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="entry">
+<div class="nav-panel">
+<p>
+Next: <a href="message.html" accesskey="n" rel="next">message</a>, Previous: <a href="text.html" accesskey="p" rel="prev">text</a>, Up: <a href="Widgets.html" accesskey="u" rel="up">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="entry-1"><span>2.10 entry<a class="copiable-link" href="#entry-1"> &para;</a></span></h3>
+
+<p>entry \- Create and manipulate entry widgets
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-9" accesskey="1">Synopsis</a></li>
+<li><a href="#Standard-Options-9" accesskey="2">Standard Options</a></li>
+<li><a href="#Arguments-for-Entry" accesskey="3">Arguments for Entry</a></li>
+<li><a href="#Description-6" accesskey="4">Description</a></li>
+<li><a href="#A-Entry-Widget_0027s-Arguments" accesskey="5">A Entry Widget&rsquo;s Arguments</a></li>
+<li><a href="#g_t_0022Default-Bindings_0022-3" accesskey="6">&quot;Default Bindings&quot;</a></li>
+<li><a href="#Keywords-9" accesskey="7">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-9">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-9"> &para;</a></span></h4>
+<p><b class="b">entry</b><i class="i"> </i><i class="i">pathName </i><span class="r">?</span><i class="i">options</i>?
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Standard-Options-9">
+<h4 class="unnumberedsubsec"><span>Standard Options<a class="copiable-link" href="#Standard-Options-9"> &para;</a></span></h4>
+
+
+<div class="example">
+<pre class="example-preformatted">background      foreground        insertWidth       selectForeground 
+borderWidth     insertBackground  relief            textVariable     
+cursor          insertBorderWidth scrollCommand     
+exportSelection insertOffTime     selectBackground  
+font            insertOnTime      selectBorderWidth 
+</pre></div>
+
+
+<p>See <a class="xref" href="options.html">options</a>, for more information.
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Arguments-for-Entry">
+<h4 class="unnumberedsubsec"><span>Arguments for Entry<a class="copiable-link" href="#Arguments-for-Entry"> &para;</a></span></h4>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:state</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">state</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">State</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies one of two states for the entry:  <b class="b">normal</b><span class="r"> or </span><b class="b">disabled</b>.
+If the entry is disabled then the value may not be changed using widget
+commands and no insertion cursor will be displayed, even if the input focus is
+in the widget.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:width</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">width</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Width</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies an integer value indicating the desired width of the entry window,
+in average-size characters of the widget&rsquo;s font.
+</p></dd>
+</dl>
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-6">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-6"> &para;</a></span></h4>
+
+<p>The <b class="b">entry</b> command creates a new window (given by the
+<i class="i">pathName</i> argument) and makes it into an entry widget.
+Additional options, described above, may be specified on the
+command line or in the option database
+to configure aspects of the entry such as its colors, font,
+and relief.  The <b class="b">entry</b> command returns its
+<i class="i">pathName</i> argument.  At the time this command is invoked,
+there must not exist a window named <i class="i">pathName</i>, but
+<i class="i">pathName</i>&rsquo;s parent must exist.
+</p>
+<p>An entry is a widget that displays a one-line text string and
+allows that string to be edited using widget commands described below, which
+are typically bound to keystrokes and mouse actions.
+When first created, an entry&rsquo;s string is empty.
+A portion of the entry may be selected as described below.
+If an entry is exporting its selection (see the <b class="b">exportSelection</b>
+option), then it will observe the standard X11 protocols for handling the
+selection;  entry selections are available as type <b class="b">STRING</b>.
+Entries also observe the standard Tk rules for dealing with the
+input focus.  When an entry has the input focus it displays an
+<i class="i">insertion cursor</i> to indicate where new characters will be
+inserted.
+</p>
+<p>Entries are capable of displaying strings that are too long to
+fit entirely within the widget&rsquo;s window.  In this case, only a
+portion of the string will be displayed;  commands described below
+may be used to change the view in the window.  Entries use
+the standard <b class="b">scrollCommand</b> mechanism for interacting with
+scrollbars (see the description of the <b class="b">scrollCommand</b> option
+for details).  They also support scanning, as described below.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="A-Entry-Widget_0027s-Arguments">
+<h4 class="unnumberedsubsec"><span>A Entry Widget&rsquo;s Arguments<a class="copiable-link" href="#A-Entry-Widget_0027s-Arguments"> &para;</a></span></h4>
+
+<p>The <b class="b">entry</b> command creates a new Tcl command whose
+name is <i class="i">pathName</i>.  This
+command may be used to invoke various
+operations on the widget.  It has the following general form:
+</p>
+<div class="example">
+<pre class="example-preformatted"><i class="i">pathName option </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</pre></div>
+
+<p><i class="i">Option</i><span class="r"> and the </span><i class="i">arg</i>s
+determine the exact behavior of the command.
+</p>
+<p>Many of the widget commands for entries take one or more indices as
+arguments.  An index specifies a particular character in the entry&rsquo;s
+string, in any of the following ways:
+</p>
+<dl class="table">
+<dt><i class="i">number</i></dt>
+<dd><p>Specifies the character as a numerical index, where 0 corresponds
+to the first character in the string.
+</p></dd>
+<dt><b class="b">end</b></dt>
+<dd><p>Indicates the character just after the last one in the entry&rsquo;s string.
+This is equivalent to specifying a numerical index equal to the length
+of the entry&rsquo;s string.
+</p></dd>
+<dt><b class="b">insert</b></dt>
+<dd><p>Indicates the character adjacent to and immediately following the
+insertion cursor.
+</p></dd>
+<dt><b class="b">sel.first</b></dt>
+<dd><p>Indicates the first character in the selection.  It is an error to
+use this form if the selection isn&rsquo;t in the entry window.
+</p></dd>
+<dt><b class="b">sel.last</b></dt>
+<dd><p>Indicates the last character in the selection.  It is an error to
+use this form if the selection isn&rsquo;t in the entry window.
+</p></dd>
+<dt><b class="b">@</b><i class="i">number</i></dt>
+<dd><p>In this form, <i class="i">number</i> is treated as an x-coordinate in the
+entry&rsquo;s window;  the character spanning that x-coordinate is used.
+For example, &ldquo;<b class="b">@0</b>&rdquo; indicates the left-most character in the
+window.
+</p></dd>
+</dl>
+
+
+<p>Abbreviations may be used for any of the forms above, e.g. &ldquo;<b class="b">e</b>&rdquo;
+or &ldquo;<b class="b">sel.f</b>&rdquo;.  In general, out-of-range indices are automatically
+rounded to the nearest legal value.
+</p>
+<p>The following commands are possible for entry widgets:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:configure</b><span class="r"> ?</span><i class="i">option</i><span class="r">? ?</span><i class="i">value option value ...</i>?</dt>
+<dd><p>Query or modify the configuration options of the widget.
+If no <i class="i">option</i> is specified, returns a list describing all of
+the available options for <i class="i">pathName</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).  If <i class="i">option</i> is specified
+with no <i class="i">value</i>, then the command returns a list describing the
+one named option (this list will be identical to the corresponding
+sublist of the value returned if no <i class="i">option</i> is specified).  If
+one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given widget option(s) to have the given value(s);  in
+this case the command returns an empty string.
+<i class="i">Option</i><span class="r"> may have any of the values accepted by the </span><b class="b">entry</b>
+command.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:delete </b><i class="i">first </i><span class="r">?</span><i class="i">last</i>?</dt>
+<dd><p>Delete one or more elements of the entry.  <i class="i">First</i><span class="r"> and </span><i class="i">last</i>
+are indices of of the first and last characters in the range to
+be deleted.   If <i class="i">last</i> isn&rsquo;t specified it defaults to
+<i class="i">first</i>, i.e. a single character is deleted.  This command
+returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:get</b></dt>
+<dd><p>Returns the entry&rsquo;s string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:icursor </b><i class="i">index</i></dt>
+<dd><p>Arrange for the insertion cursor to be displayed just before the character
+given by <i class="i">index</i>.  Returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:index</b><i class="i"> index</i></dt>
+<dd><p>Returns the numerical index corresponding to <i class="i">index</i>.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:insert </b><i class="i">index string</i></dt>
+<dd><p>Insert the characters of <i class="i">string</i> just before the character
+indicated by <i class="i">index</i>.  Returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:scan</b><span class="r"> </span><i class="i">option args</i></dt>
+<dd><p>This command is used to implement scanning on entries.  It has
+two forms, depending on <i class="i">option</i>:
+</p><dl class="table">
+<dt><i class="i">pathName </i><b class="b">:scan :mark </b><i class="i">x</i></dt>
+<dd><p>Records <i class="i">x</i> and the current view in the entry window;  used in
+conjunction with later <b class="b">scan dragto</b> commands.  Typically this
+command is associated with a mouse button press in the widget.  It
+returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:scan :dragto </b><i class="i">x</i></dt>
+<dd><p>This command computes the difference between its <i class="i">x</i> argument
+and the <i class="i">x</i><span class="r"> argument to the last </span><b class="b">scan mark</b> command for
+the widget.  It then adjusts the view left or right by 10 times the
+difference in x-coordinates.  This command is typically associated
+with mouse motion events in the widget, to produce the effect of
+dragging the entry at high speed through the window.  The return
+value is an empty string.
+</p></dd>
+</dl>
+</dd>
+<dt><i class="i">pathName </i><b class="b">:select </b><i class="i">option arg</i></dt>
+<dd><p>This command is used to adjust the selection within an entry.  It
+has several forms, depending on <i class="i">option</i>:
+</p><dl class="table">
+<dt><i class="i">pathName </i><b class="b">:select :adjust </b><i class="i">index</i></dt>
+<dd><p>Locate the end of the selection nearest to the character given by
+<i class="i">index</i><span class="r">, and adjust that end of the selection to be at </span><i class="i">index</i>
+(i.e including but not going beyond <i class="i">index</i>).  The other
+end of the selection is made the anchor point for future
+<b class="b">select to</b> commands.  If the selection
+isn&rsquo;t currently in the entry, then a new selection is created to
+include the characters between <i class="i">index</i> and the most recent
+selection anchor point, inclusive.
+Returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:select :clear</b></dt>
+<dd><p>Clear the selection if it is currently in this widget.  If the
+selection isn&rsquo;t in this widget then the command has no effect.
+Returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:select :from </b><i class="i">index</i></dt>
+<dd><p>Set the selection anchor point to just before the character
+given by <i class="i">index</i>.  Doesn&rsquo;t change the selection.
+Returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:select :to </b><i class="i">index</i></dt>
+<dd><p>Set the selection to consist of the elements from the anchor
+point to element <i class="i">index</i>, inclusive.  The anchor point is
+determined by the most recent <b class="b">select from</b><span class="r"> or </span><b class="b">select adjust</b>
+command in this widget.  If the selection isn&rsquo;t in this widget
+then a new selection is created using the most recent anchor point
+specified for the widget.  Returns an empty string.
+</p></dd>
+</dl>
+</dd>
+<dt><i class="i">pathName </i><b class="b">:view </b><i class="i">index</i></dt>
+<dd><p>Adjust the view in the entry so that element <i class="i">index</i> is
+at the left edge of the window.  Returns an empty string.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022Default-Bindings_0022-3">
+<h4 class="unnumberedsubsec"><span>&quot;Default Bindings&quot;<a class="copiable-link" href="#g_t_0022Default-Bindings_0022-3"> &para;</a></span></h4>
+
+<p>Tk automatically creates class bindings for entries that give them
+the following default behavior:
+</p>
+<ul class="itemize">
+<li>[1]
+Clicking mouse button 1 in an entry positions the insertion cursor
+just before the character underneath the mouse cursor and sets the
+input focus to this widget.
+</li><li>[2]
+Dragging with mouse button 1 strokes out a selection between
+the insertion cursor and the character under the mouse.
+</li><li>[3]
+The ends of the selection can be adjusted by dragging with mouse
+button 1 while the shift key is down;  this will adjust the end
+of the selection that was nearest to the mouse cursor when button
+1 was pressed.
+</li><li>[4]
+The view in the entry can be adjusted by dragging with mouse button 2.
+</li><li>[5]
+If the input focus is in an entry widget and characters are typed on the
+keyboard, the characters are inserted just before the insertion cursor.
+</li><li>[6]
+Control-h and the Backspace and Delete keys erase the character just
+before the insertion cursor.
+</li><li>[7]
+Control-w erases the word just before the insertion cursor.
+</li><li>[8]
+Control-u clears the entry to an empty string.
+</li><li>[9]
+Control-v inserts the current selection just before the insertion cursor.
+</li><li>[10]
+Control-d deletes the selected characters;  an error occurs if the selection
+is not in this widget.
+</li></ul>
+
+<p>If the entry is disabled using the <b class="b">state</b> option, then the entry&rsquo;s
+view can still be adjusted and text in the entry can still be selected,
+but no insertion cursor will be displayed and no text modifications will
+take place.
+</p>
+<p>The behavior of entries can be changed by defining new bindings for
+individual widgets or by redefining the class bindings.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-9">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-9"> &para;</a></span></h4>
+<p>entry, widget
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="message.html">message</a>, Previous: <a href="text.html">text</a>, Up: <a href="Widgets.html">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/exit.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>exit (GCL TK Manual)</title>
+
+<meta name="description" content="exit (GCL TK Manual)">
+<meta name="keywords" content="exit (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="focus.html" rel="next" title="focus">
+<link href="tk_002ddialog.html" rel="prev" title="tk-dialog">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="exit">
+<div class="nav-panel">
+<p>
+Next: <a href="focus.html" accesskey="n" rel="next">focus</a>, Previous: <a href="tk_002ddialog.html" accesskey="p" rel="prev">tk-dialog</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="exit-1"><span>3.5 exit<a class="copiable-link" href="#exit-1"> &para;</a></span></h3>
+
+<p>exit \- Exit the process
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-19" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-16" accesskey="2">Description</a></li>
+<li><a href="#Keywords-19" accesskey="3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-19">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-19"> &para;</a></span></h4>
+<p><b class="b">exit </b><span class="r">?</span><i class="i">returnCode</i>?
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-16">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-16"> &para;</a></span></h4>
+
+<p>Terminate the process, returning <i class="i">returnCode</i> (an integer) to the
+system as the exit status.
+If <i class="i">returnCode</i> isn&rsquo;t specified then it defaults
+to 0.
+This command replaces the Tcl command by the same name.
+It is identical to Tcl&rsquo;s <b class="b">exit</b> command except that
+before exiting it destroys all the windows managed by
+the process.
+This allows various cleanup operations to be performed, such
+as removing application names from the global registry of applications.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-19">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-19"> &para;</a></span></h4>
+<p>exit, process
+</p></div>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/focus.html
@@ -0,0 +1,173 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>focus (GCL TK Manual)</title>
+
+<meta name="description" content="focus (GCL TK Manual)">
+<meta name="keywords" content="focus (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="grab.html" rel="next" title="grab">
+<link href="exit.html" rel="prev" title="exit">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="focus">
+<div class="nav-panel">
+<p>
+Next: <a href="grab.html" accesskey="n" rel="next">grab</a>, Previous: <a href="exit.html" accesskey="p" rel="prev">exit</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="focus-1"><span>3.6 focus<a class="copiable-link" href="#focus-1"> &para;</a></span></h3>
+
+<p>focus \- Direct keyboard events to a particular window
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-20" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-17" accesskey="2">Description</a></li>
+<li><a href="#g_t_0022Focus-Events_0022" accesskey="3">&quot;Focus Events&quot;</a></li>
+<li><a href="#Keywords-20" accesskey="4">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-20">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-20"> &para;</a></span></h4>
+<br><p><b class="b">focus</b><!-- /@w --><br>
+<br><b class="b">focus&nbsp;</b><i class="i">window</i><!-- /@w --><br>
+<b class="b">focus </b><i class="i">option</i><span class="r"> ?</span><i class="i">arg arg ...</i>?
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-17">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-17"> &para;</a></span></h4>
+
+<p>The <b class="b">focus</b> command is used to manage the Tk input focus.
+At any given time, one window in an application is designated as
+the focus window for that application;  any key press or key release
+events directed to any window in the application will be redirected
+instead to the focus window.  If there is no focus window for an
+application then keyboard events are discarded.
+Typically, windows that are prepared to deal with the focus
+(e.g. entries and other widgets that display editable text) will
+claim the focus when mouse button 1 is pressed in them.
+When an application is created its main window is initially given
+the focus.
+</p>
+<p>The <b class="b">focus</b> command can take any of the following forms:
+</p>
+<dl class="table">
+<dt><b class="b">focus</b></dt>
+<dd><p>If invoked with no arguments, <b class="b">focus</b> returns the path name of
+the current focus window, or <b class="b">none</b> if there is no focus window.
+</p></dd>
+<dt><b class="b">focus </b><i class="i">window</i></dt>
+<dd><p>If invoked with a single argument consisting of a window&rsquo;s path
+name, <b class="b">focus</b> sets the input focus to that window.
+The return value is an empty string.
+</p></dd>
+<dt><b class="b">focus :default </b><span class="r">?</span><i class="i">window</i>?</dt>
+<dd><p>If <i class="i">window</i> is specified, it becomes the default focus window
+(the window that receives the focus whenever the focus window is
+deleted) and the command returns an empty string.
+If <i class="i">window</i> isn&rsquo;t specified, the command returns the path name
+of the current default focus window, or <b class="b">none</b> if there is no
+default.
+<i class="i">Window</i><span class="r"> may be specified as </span><b class="b">none</b> to clear its existing
+value.
+The default window is initially <b class="b">none</b>.
+</p></dd>
+<dt><b class="b">focus :none</b></dt>
+<dd><p>Clears the focus window, so that keyboard input to this application
+will be discarded.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022Focus-Events_0022">
+<h4 class="unnumberedsubsec"><span>&quot;Focus Events&quot;<a class="copiable-link" href="#g_t_0022Focus-Events_0022"> &para;</a></span></h4>
+
+<p>Tk&rsquo;s model of the input focus is different than X&rsquo;s model, and the
+focus window set with the <b class="b">focus</b> command is not usually the
+same as the X focus window.
+Tk never explicitly changes the official X focus window.
+It waits for the window manager to direct the X input focus to
+and from the application&rsquo;s top-level windows, and it intercepts
+<b class="b">FocusIn</b><span class="r"> and </span><b class="b">FocusOut</b> events coming from the X
+server to detect these changes.
+All of the focus events received from X are discarded by Tk;  they
+never reach the application.
+Instead, Tk generates a different stream of <b class="b">FocusIn</b> and
+<b class="b">FocusOut</b> for the application.
+This means that <b class="b">FocusIn</b> and
+and <b class="b">FocusOut</b> events seen by the application will not obey the
+conventions described in the documentation for Xlib.
+</p>
+<p>Tk applications receive two kinds of <b class="b">FocusIn</b><span class="r"> and </span><b class="b">FocusOut</b>
+events, which can be distinguished by their <i class="i">detail</i> fields.
+Events with a <i class="i">detail</i><span class="r"> of </span><b class="b">NotifyAncestor</b> are directed
+to the current focus window when it becomes active or inactive.
+A window is the active focus whenever two conditions are
+simultaneously true: (a) the window is the focus window for its
+application, and (b) some top-level window in the application has
+received the X focus.
+When this happens Tk generates a <b class="b">FocusIn</b> event for the focus
+window with detail <b class="b">NotifyAncestor</b>.
+When a window loses the active focus (either because the window manager
+removed the focus from the application or because the focus window changed
+within the application) then it receives a <b class="b">FocusOut</b> event
+with detail <b class="b">NotifyAncestor</b>.
+</p>
+<p>The events described above are directed to the application&rsquo;s focus
+window regardless of which top-level window within the application
+has received the focus.
+The second kind of focus event is provided for applications that
+need to know which particular top-level window has the X focus.
+Tk generates <b class="b">FocusIn</b><span class="r"> and </span><b class="b">FocusOut</b> events with detail
+<b class="b">NotifyVirtual</b> for top-level windows whenever they receive or
+lose the X focus.
+These events are generated regardless of which window in the
+application has the Tk input focus.
+They do not imply that keystrokes will be directed to the window
+that receives the event;  they simply indicate which top-level
+window is active as far as the window manager is concerned.
+If a top-level window is also the application&rsquo;s focus window,
+then it will receive both <b class="b">NotifyVirtual</b><span class="r"> and </span><b class="b">NotifyAncestor</b>
+events when it receives or loses the X focus.
+</p>
+<p>Tk does not generate the hierarchical chains of <b class="b">FocusIn</b> and
+<b class="b">FocusOut</b> events described in the Xlib documentation (e.g.
+a window can get a <b class="b">FocusIn</b><span class="r"> or </span><b class="b">FocusOut</b> event without
+all of its ancestors getting events too).
+Furthermore, the <i class="i">mode</i> field in focus events is always
+<b class="b">NotifyNormal</b> and the only values ever present in the
+<i class="i">detail</i><span class="r"> field are </span><b class="b">NotifyAncestor</b><span class="r"> and </span><b class="b">NotifyVirtual</b>.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-20">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-20"> &para;</a></span></h4>
+<p>events, focus, keyboard, top-level, window manager
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="grab.html">grab</a>, Previous: <a href="exit.html">exit</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/frame.html
@@ -0,0 +1,191 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>frame (GCL TK Manual)</title>
+
+<meta name="description" content="frame (GCL TK Manual)">
+<meta name="keywords" content="frame (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Widgets.html" rel="up" title="Widgets">
+<link href="label.html" rel="next" title="label">
+<link href="message.html" rel="prev" title="message">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="frame">
+<div class="nav-panel">
+<p>
+Next: <a href="label.html" accesskey="n" rel="next">label</a>, Previous: <a href="message.html" accesskey="p" rel="prev">message</a>, Up: <a href="Widgets.html" accesskey="u" rel="up">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="frame-1"><span>2.12 frame<a class="copiable-link" href="#frame-1"> &para;</a></span></h3>
+
+<p>frame \- Create and manipulate frame widgets
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-11" accesskey="1">Synopsis</a></li>
+<li><a href="#Standard-Options-11" accesskey="2">Standard Options</a></li>
+<li><a href="#Arguments-for-Frame" accesskey="3">Arguments for Frame</a></li>
+<li><a href="#Description-8" accesskey="4">Description</a></li>
+<li><a href="#A-Frame-Widget_0027s-Arguments" accesskey="5">A Frame Widget&rsquo;s Arguments</a></li>
+<li><a href="#Bindings-5" accesskey="6">Bindings</a></li>
+<li><a href="#Keywords-11" accesskey="7">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-11">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-11"> &para;</a></span></h4>
+<p><b class="b">frame</b><i class="i"> </i><i class="i">pathName </i><span class="r">?</span><b class="b">:class </b><i class="i">className</i><span class="r">? ?</span><i class="i">options</i>?
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Standard-Options-11">
+<h4 class="unnumberedsubsec"><span>Standard Options<a class="copiable-link" href="#Standard-Options-11"> &para;</a></span></h4>
+
+
+<div class="example">
+<pre class="example-preformatted">background             cursor             relief           
+borderWidth            geometry           
+</pre></div>
+
+
+<p>See <a class="xref" href="options.html">options</a>, for more information.
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Arguments-for-Frame">
+<h4 class="unnumberedsubsec"><span>Arguments for Frame<a class="copiable-link" href="#Arguments-for-Frame"> &para;</a></span></h4>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:height</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">height</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Height</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the desired height for the window in any of the forms
+acceptable to <b class="b">Tk_GetPixels</b>.
+This option is only used if the <b class="b">:geometry</b> option is
+unspecified.
+If this option is less than or equal to zero (and <b class="b">:geometry</b>
+is not specified) then the window will not request any size at
+all.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:width</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">width</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Width</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the desired width for the window in any of the forms
+acceptable to <b class="b">Tk_GetPixels</b>.
+This option is only used if the <b class="b">:geometry</b> option is
+unspecified.
+If this option is less than or equal to zero (and <b class="b">:geometry</b>
+is not specified) then the window will not request any size at
+all.
+</p></dd>
+</dl>
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-8">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-8"> &para;</a></span></h4>
+
+<p>The <b class="b">frame</b> command creates a new window (given by the
+<i class="i">pathName</i> argument) and makes it into a frame widget.
+Additional
+options, described above, may be specified on the command line
+or in the option database
+to configure aspects of the frame such as its background color
+and relief.  The <b class="b">frame</b> command returns the
+path name of the new window.
+</p>
+<p>A frame is a simple widget.  Its primary purpose is to act as a
+spacer or container for complex window layouts.  The only features
+of a frame are its background color and an optional 3-D border to make the
+frame appear raised or sunken.
+</p>
+<p>In addition to the standard options listed above, a <b class="b">:class</b>
+option may be specified on the command line.  If it is specified, then
+the new widget&rsquo;s class will be set to <i class="i">className</i> instead of
+<b class="b">Frame</b>.  Changing the class of a frame widget may be useful
+in order to use a special class name in database options referring
+to this widget and its children.  Note:  <b class="b">:class</b> is handled
+differently than other command-line options and cannot be specified
+using the option database (it has to be processed
+before the other options are even looked up, since the new class
+name will affect the lookup of the other options).  In addition,
+the <b class="b">:class</b> option may not be queried or changed using the
+<b class="b">config</b> command described below.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="A-Frame-Widget_0027s-Arguments">
+<h4 class="unnumberedsubsec"><span>A Frame Widget&rsquo;s Arguments<a class="copiable-link" href="#A-Frame-Widget_0027s-Arguments"> &para;</a></span></h4>
+
+<p>The <b class="b">frame</b> command creates a new Tcl command whose
+name is the same as the path name of the frame&rsquo;s window.  This
+command may be used to invoke various
+operations on the widget.  It has the following general form:
+</p>
+<div class="example">
+<pre class="example-preformatted"><i class="i">pathName option </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</pre></div>
+
+<p><i class="i">PathName</i> is the name of the command, which is the same as
+the frame widget&rsquo;s path name.  <i class="i">Option</i><span class="r"> and the </span><i class="i">arg</i>s
+determine the exact behavior of the command.  The following
+commands are possible for frame widgets:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:configure</b><span class="r"> ?</span><i class="i">option</i><span class="r">? </span><i class="i">?value option value ...</i>?</dt>
+<dd><p>Query or modify the configuration options of the widget.
+If no <i class="i">option</i> is specified, returns a list describing all of
+the available options for <i class="i">pathName</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).  If <i class="i">option</i> is specified
+with no <i class="i">value</i>, then the command returns a list describing the
+one named option (this list will be identical to the corresponding
+sublist of the value returned if no <i class="i">option</i> is specified).  If
+one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given widget option(s) to have the given value(s);  in
+this case the command returns an empty string.
+<i class="i">Option</i><span class="r"> may have any of the values accepted by the </span><b class="b">frame</b>
+command.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Bindings-5">
+<h4 class="unnumberedsubsec"><span>Bindings<a class="copiable-link" href="#Bindings-5"> &para;</a></span></h4>
+
+<p>When a new frame is created, it has no default event bindings:
+frames are not intended to be interactive.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-11">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-11"> &para;</a></span></h4>
+<p>frame, widget
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="label.html">label</a>, Previous: <a href="message.html">message</a>, Up: <a href="Widgets.html">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/grab.html
@@ -0,0 +1,173 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>grab (GCL TK Manual)</title>
+
+<meta name="description" content="grab (GCL TK Manual)">
+<meta name="keywords" content="grab (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="tk_002dlistbox_002dsingle_002dselect.html" rel="next" title="tk-listbox-single-select">
+<link href="focus.html" rel="prev" title="focus">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="grab">
+<div class="nav-panel">
+<p>
+Next: <a href="tk_002dlistbox_002dsingle_002dselect.html" accesskey="n" rel="next">tk-listbox-single-select</a>, Previous: <a href="focus.html" accesskey="p" rel="prev">focus</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="grab-1"><span>3.7 grab<a class="copiable-link" href="#grab-1"> &para;</a></span></h3>
+
+<p>grab \- Confine pointer and keyboard events to a window sub-tree
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-21" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-18" accesskey="2">Description</a></li>
+<li><a href="#Bugs-2" accesskey="3">Bugs</a></li>
+<li><a href="#Keywords-21" accesskey="4">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-21">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-21"> &para;</a></span></h4>
+<br><p><b class="b">grab&nbsp;</b><span class="r">?</span><b class="b">:global</b><span class="r">?&nbsp;</span><i class="i">window</i><!-- /@w --><br>
+<b class="b">grab </b><i class="i">option </i><span class="r">?arg arg </span>...?
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-18">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-18"> &para;</a></span></h4>
+
+<p>This command implements simple pointer and keyboard grabs for Tk.
+Tk&rsquo;s grabs are different than the grabs
+described in the Xlib documentation.
+When a grab is set for a particular window, Tk restricts all pointer
+events to the grab window and its descendants in Tk&rsquo;s window hierarchy.
+Whenever the pointer is within the grab window&rsquo;s subtree, the pointer
+will behave exactly the same as if there had been no grab at all
+and all events will be reported in the normal fashion.
+When the pointer is outside <i class="i">window</i>&rsquo;s tree, button presses and
+releases and
+mouse motion events are reported to <i class="i">window</i>, and window entry
+and window exit events are ignored.
+The grab subtree &ldquo;owns&rdquo; the pointer:
+windows outside the grab subtree will be visible on the screen
+but they will be insensitive until the grab is released.
+The tree of windows underneath the grab window can include top-level
+windows, in which case all of those top-level windows
+and their descendants will continue to receive mouse events
+during the grab.
+</p>
+<p>Two forms of grabs are possible:  local and global.
+A local grab affects only the grabbing application:  events will
+be reported to other applications as if the grab had never occurred.
+Grabs are local by default.
+A global grab locks out all applications on the screen,
+so that only the given subtree of the grabbing application will be
+sensitive to pointer events (mouse button presses, mouse button releases,
+pointer motions, window entries, and window exits).
+During global grabs the window manager will not receive pointer
+events either.
+</p>
+<p>During local grabs, keyboard events (key presses and key releases)
+are delivered as usual:  the window
+manager controls which application receives keyboard events, and
+if they are sent to any window in the grabbing application then they are
+redirected to the focus window.
+During a global grab Tk grabs the keyboard so that all keyboard events
+are always sent to the grabbing application.
+The <b class="b">focus</b> command is still used to determine which window in the
+application receives the keyboard events.
+The keyboard grab is released when the grab is released.
+</p>
+<p>Grabs apply to particular displays.  If an application has windows
+on multiple displays then it can establish a separate grab on each
+display.
+The grab on a particular display affects only the windows on
+that display.
+It is possible for different applications on a single display to have
+simultaneous local grabs, but only one application can have a global
+grab on a given display at once.
+</p>
+<p>The <b class="b">grab</b> command can take any of the following forms:
+</p>
+<dl class="table">
+<dt><b class="b">grab </b><span class="r">?</span><b class="b">:global</b><span class="r">? </span><i class="i">window</i></dt>
+<dd><p>Same as <b class="b">grab :set</b>, described below.
+</p></dd>
+<dt><b class="b">grab :current </b><span class="r">?</span><i class="i">window</i>?</dt>
+<dd><p>If <i class="i">window</i> is specified, returns the name of the current grab
+window in this application for <i class="i">window</i>&rsquo;s display, or an empty
+string if there is no such window.
+If <i class="i">window</i> is omitted, the command returns a list whose elements
+are all of the windows grabbed by this application for all displays,
+or an empty string if the application has no grabs.
+</p></dd>
+<dt><b class="b">grab :release </b><i class="i">window</i></dt>
+<dd><p>Releases the grab on <i class="i">window</i> if there is one, otherwise does
+nothing.  Returns an empty string.
+</p></dd>
+<dt><b class="b">grab :set </b><span class="r">?</span><b class="b">:global</b><span class="r">? </span><i class="i">window</i></dt>
+<dd><p>Sets a grab on <i class="i">window</i><span class="r">.  If </span><b class="b">:global</b> is specified then the
+grab is global, otherwise it is local.
+If a grab was already in effect for this application on
+<i class="i">window</i>&rsquo;s display then it is automatically released.
+If there is already a grab on <i class="i">window</i> and it has the same
+global/local form as the requested grab, then the command
+does nothing.  Returns an empty string.
+</p></dd>
+<dt><b class="b">grab :status </b><i class="i">window</i></dt>
+<dd><p>Returns <b class="b">none</b><span class="r"> if no grab is currently set on </span><i class="i">window</i>,
+<b class="b">local</b><span class="r"> if a local grab is set on </span><i class="i">window</i>, and
+<b class="b">global</b> if a global grab is set.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Bugs-2">
+<h4 class="unnumberedsubsec"><span>Bugs<a class="copiable-link" href="#Bugs-2"> &para;</a></span></h4>
+
+<p>It took an incredibly complex and gross implementation to produce
+the simple grab effect described above.
+Given the current implementation, it isn&rsquo;t safe for applications
+to use the Xlib grab facilities at all except through the Tk grab
+procedures.
+If applications try to manipulate X&rsquo;s grab mechanisms directly,
+things will probably break.
+</p>
+<p>If a single process is managing several different Tk applications,
+only one of those applications can have a local grab for a given
+display at any given time.  If the applications are in different
+processes, this restriction doesn&rsquo;t exist.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-21">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-21"> &para;</a></span></h4>
+<p>grab, keyboard events, pointer events, window
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="tk_002dlistbox_002dsingle_002dselect.html">tk-listbox-single-select</a>, Previous: <a href="focus.html">focus</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/index.html
@@ -0,0 +1,443 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Top (GCL TK Manual)</title>
+
+<meta name="description" content="Top (GCL TK Manual)">
+<meta name="keywords" content="Top (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="#Top" rel="start" title="Top">
+<link href="#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="../dir_html/index.html" rel="up" title="(dir)">
+<link href="General.html" rel="next" title="General">
+<link href="../dir_html/index.html" rel="prev" title="(dir)">
+<style type="text/css">
+<!--
+ul.toc-numbered-mark {list-style: none}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+
+
+
+
+
+<div class="top-level-extent" id="Top">
+<div class="nav-panel">
+<p>
+Next: <a href="General.html" accesskey="n" rel="next">General</a>, Previous: <a href="../dir_html/index.html" accesskey="p" rel="prev">(dir)</a>, Up: <a href="../dir_html/index.html" accesskey="u" rel="up">(dir)</a> &nbsp; [<a href="#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<a class="top" id="SEC_Top"></a>
+
+
+<div class="element-shortcontents" id="SEC_Shortcontents">
+<h2 class="shortcontents-heading">Short Table of Contents</h2>
+
+<div class="shortcontents">
+<ul class="toc-numbered-mark">
+<li><a id="stoc-General-1" href="#toc-General-1">1 General</a></li>
+<li><a id="stoc-Widgets-1" href="#toc-Widgets-1">2 Widgets</a></li>
+<li><a id="stoc-Control-1" href="#toc-Control-1">3 Control</a></li>
+</ul>
+</div>
+</div>
+<div class="element-contents" id="SEC_Contents">
+<h2 class="contents-heading">Table of Contents</h2>
+
+<div class="contents">
+
+<ul class="toc-numbered-mark">
+  <li><a id="toc-General-1" href="General.html">1 General</a>
+  <ul class="toc-numbered-mark">
+    <li><a id="toc-Introduction-1" href="Introduction.html">1.1 Introduction</a></li>
+    <li><a id="toc-Getting-Started-1" href="Getting-Started.html">1.2 Getting Started</a></li>
+    <li><a id="toc-Common-Features-of-Widgets-1" href="Common-Features-of-Widgets.html">1.3 Common Features of Widgets</a></li>
+    <li><a id="toc-Return-Values-1" href="Return-Values.html">1.4 Return Values</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Widget-Constructor-Return-Values" href="Return-Values.html#Widget-Constructor-Return-Values">1.4.1 Widget Constructor Return Values</a></li>
+      <li><a id="toc-Widget-Return-Values" href="Return-Values.html#Widget-Return-Values">1.4.2 Widget Return Values</a></li>
+      <li><a id="toc-Control-Function-Return-Values" href="Return-Values.html#Control-Function-Return-Values">1.4.3 Control Function Return Values</a></li>
+    </ul></li>
+    <li><a id="toc-Argument-Lists-1" href="Argument-Lists.html">1.5 Argument Lists</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Widget-Functions" href="Argument-Lists.html#Widget-Functions">1.5.1 Widget Functions</a></li>
+      <li><a id="toc-Widget-Constructor-Argument-Lists" href="Argument-Lists.html#Widget-Constructor-Argument-Lists">1.5.2 Widget Constructor Argument Lists</a></li>
+      <li><a id="toc-Concatenation-Using-_0060_003a_0027-in-Argument-List" href="Argument-Lists.html#Concatenation-Using-_0060_003a_0027-in-Argument-List">1.5.3 Concatenation Using &lsquo;:&rsquo; in Argument List</a></li>
+    </ul></li>
+    <li><a id="toc-Lisp-Functions-Invoked-from-Graphics-1" href="Lisp-Functions-Invoked-from-Graphics.html">1.6 Lisp Functions Invoked from Graphics</a></li>
+    <li><a id="toc-Linked-Variables-1" href="Linked-Variables.html">1.7 Linked Variables</a></li>
+    <li><a id="toc-tkconnect-1" href="tkconnect.html">1.8 tkconnect</a></li>
+  </ul></li>
+  <li><a id="toc-Widgets-1" href="Widgets.html">2 Widgets</a>
+  <ul class="toc-numbered-mark">
+    <li><a id="toc-button-1" href="button.html">2.1 button</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis" href="button.html#Synopsis">Synopsis</a></li>
+      <li><a id="toc-Standard-Options" href="button.html#Standard-Options">Standard Options</a></li>
+      <li><a id="toc-Arguments-for-Button" href="button.html#Arguments-for-Button">Arguments for Button</a></li>
+      <li><a id="toc-Description" href="button.html#Description">Description</a></li>
+      <li><a id="toc-A-Button-Widget_0027s-Arguments" href="button.html#A-Button-Widget_0027s-Arguments">A Button Widget&rsquo;s Arguments</a></li>
+      <li><a id="toc-_0022Default-Bindings_0022" href="button.html#g_t_0022Default-Bindings_0022">&quot;Default Bindings&quot;</a></li>
+      <li><a id="toc-Keywords" href="button.html#Keywords">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-listbox-1" href="listbox.html">2.2 listbox</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-1" href="listbox.html#Synopsis-1">Synopsis</a></li>
+      <li><a id="toc-Standard-Options-1" href="listbox.html#Standard-Options-1">Standard Options</a></li>
+      <li><a id="toc-Arguments-for-Listbox" href="listbox.html#Arguments-for-Listbox">Arguments for Listbox</a></li>
+      <li><a id="toc-Description-1" href="listbox.html#Description-1">Description</a></li>
+      <li><a id="toc-A-Listbox_0027s-Arguments" href="listbox.html#A-Listbox_0027s-Arguments">A Listbox&rsquo;s Arguments</a></li>
+      <li><a id="toc-_0022Default-Bindings_0022-1" href="listbox.html#g_t_0022Default-Bindings_0022-1">&quot;Default Bindings&quot;</a></li>
+      <li><a id="toc-Keywords-1" href="listbox.html#Keywords-1">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-scale-1" href="scale.html">2.3 scale</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-2" href="scale.html#Synopsis-2">Synopsis</a></li>
+      <li><a id="toc-Standard-Options-2" href="scale.html#Standard-Options-2">Standard Options</a></li>
+      <li><a id="toc-Arguments-for-Scale" href="scale.html#Arguments-for-Scale">Arguments for Scale</a></li>
+      <li><a id="toc-Description-2" href="scale.html#Description-2">Description</a></li>
+      <li><a id="toc-A-Scale_0027s_0022Argumentsommand_0022" href="scale.html#A-Scale_0027s_0022Argumentsommand_0022">A Scale&rsquo;s&quot;Argumentsommand&quot;</a></li>
+      <li><a id="toc-Bindings" href="scale.html#Bindings">Bindings</a></li>
+      <li><a id="toc-Keywords-2" href="scale.html#Keywords-2">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-canvas-1" href="canvas.html">2.4 canvas</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-3" href="canvas.html#Synopsis-3">Synopsis</a></li>
+      <li><a id="toc-Standard-Options-3" href="canvas.html#Standard-Options-3">Standard Options</a></li>
+      <li><a id="toc-Arguments-for-Canvas" href="canvas.html#Arguments-for-Canvas">Arguments for Canvas</a></li>
+      <li><a id="toc-Introduction-2" href="canvas.html#Introduction-2">Introduction</a></li>
+      <li><a id="toc-Display-List" href="canvas.html#Display-List">Display List</a></li>
+      <li><a id="toc-Item-Ids-And-Tags" href="canvas.html#Item-Ids-And-Tags">Item Ids And Tags</a></li>
+      <li><a id="toc-Coordinates" href="canvas.html#Coordinates">Coordinates</a></li>
+      <li><a id="toc-Transformations" href="canvas.html#Transformations">Transformations</a></li>
+      <li><a id="toc-Indices" href="canvas.html#Indices">Indices</a></li>
+      <li><a id="toc-A-Canvas-Widget_0027s-Arguments" href="canvas.html#A-Canvas-Widget_0027s-Arguments">A Canvas Widget&rsquo;s Arguments</a></li>
+      <li><a id="toc-Overview-Of-Item-Types" href="canvas.html#Overview-Of-Item-Types">Overview Of Item Types</a></li>
+      <li><a id="toc-Arc-Items" href="canvas.html#Arc-Items">Arc Items</a></li>
+      <li><a id="toc-Bitmap-Items" href="canvas.html#Bitmap-Items">Bitmap Items</a></li>
+      <li><a id="toc-Line-Items" href="canvas.html#Line-Items">Line Items</a></li>
+      <li><a id="toc-Oval-Items" href="canvas.html#Oval-Items">Oval Items</a></li>
+      <li><a id="toc-Polygon-Items" href="canvas.html#Polygon-Items">Polygon Items</a></li>
+      <li><a id="toc-Rectangle-Items" href="canvas.html#Rectangle-Items">Rectangle Items</a></li>
+      <li><a id="toc-Text-Items" href="canvas.html#Text-Items">Text Items</a></li>
+      <li><a id="toc-Window-Items" href="canvas.html#Window-Items">Window Items</a></li>
+      <li><a id="toc-Application_002dDefined-Item-Types" href="canvas.html#Application_002dDefined-Item-Types">Application-Defined Item Types</a></li>
+      <li><a id="toc-Bindings-1" href="canvas.html#Bindings-1">Bindings</a></li>
+      <li><a id="toc-Credits" href="canvas.html#Credits">Credits</a></li>
+      <li><a id="toc-Keywords-3" href="canvas.html#Keywords-3">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-menu-1" href="menu.html">2.5 menu</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-4" href="menu.html#Synopsis-4">Synopsis</a></li>
+      <li><a id="toc-Standard-Options-4" href="menu.html#Standard-Options-4">Standard Options</a></li>
+      <li><a id="toc-Arguments-for-Menu" href="menu.html#Arguments-for-Menu">Arguments for Menu</a></li>
+      <li><a id="toc-Introduction-3" href="menu.html#Introduction-3">Introduction</a></li>
+      <li><a id="toc-Command-Entries" href="menu.html#Command-Entries">Command Entries</a></li>
+      <li><a id="toc-Separator-Entries" href="menu.html#Separator-Entries">Separator Entries</a></li>
+      <li><a id="toc-Check_002dButton-Entries" href="menu.html#Check_002dButton-Entries">Check-Button Entries</a></li>
+      <li><a id="toc-Radio_002dButton-Entries" href="menu.html#Radio_002dButton-Entries">Radio-Button Entries</a></li>
+      <li><a id="toc-Cascade-Entries" href="menu.html#Cascade-Entries">Cascade Entries</a></li>
+      <li><a id="toc-A-Menu-Widget_0027s-Arguments" href="menu.html#A-Menu-Widget_0027s-Arguments">A Menu Widget&rsquo;s Arguments</a></li>
+      <li><a id="toc-Default-Bindings" href="menu.html#Default-Bindings">Default Bindings</a></li>
+      <li><a id="toc-Bugs" href="menu.html#Bugs">Bugs</a></li>
+      <li><a id="toc-Keywords-4" href="menu.html#Keywords-4">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-scrollbar-1" href="scrollbar.html">2.6 scrollbar</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-5" href="scrollbar.html#Synopsis-5">Synopsis</a></li>
+      <li><a id="toc-Standard-Options-5" href="scrollbar.html#Standard-Options-5">Standard Options</a></li>
+      <li><a id="toc-Arguments-for-Scrollbar" href="scrollbar.html#Arguments-for-Scrollbar">Arguments for Scrollbar</a></li>
+      <li><a id="toc-Description-3" href="scrollbar.html#Description-3">Description</a></li>
+      <li><a id="toc-A-Scrollbar-Widget_0027s-Arguments" href="scrollbar.html#A-Scrollbar-Widget_0027s-Arguments">A Scrollbar Widget&rsquo;s Arguments</a></li>
+      <li><a id="toc-Bindings-2" href="scrollbar.html#Bindings-2">Bindings</a></li>
+      <li><a id="toc-Keywords-5" href="scrollbar.html#Keywords-5">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-checkbutton-1" href="checkbutton.html">2.7 checkbutton</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-6" href="checkbutton.html#Synopsis-6">Synopsis</a></li>
+      <li><a id="toc-Standard-Options-6" href="checkbutton.html#Standard-Options-6">Standard Options</a></li>
+      <li><a id="toc-Arguments-for-Checkbutton" href="checkbutton.html#Arguments-for-Checkbutton">Arguments for Checkbutton</a></li>
+      <li><a id="toc-Description-4" href="checkbutton.html#Description-4">Description</a></li>
+      <li><a id="toc-A-Checkbutton-Widget_0027s-Arguments" href="checkbutton.html#A-Checkbutton-Widget_0027s-Arguments">A Checkbutton Widget&rsquo;s Arguments</a></li>
+      <li><a id="toc-Bindings-3" href="checkbutton.html#Bindings-3">Bindings</a></li>
+      <li><a id="toc-Keywords-6" href="checkbutton.html#Keywords-6">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-menubutton-1" href="menubutton.html">2.8 menubutton</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-7" href="menubutton.html#Synopsis-7">Synopsis</a></li>
+      <li><a id="toc-Standard-Options-7" href="menubutton.html#Standard-Options-7">Standard Options</a></li>
+      <li><a id="toc-Arguments-for-Menubutton" href="menubutton.html#Arguments-for-Menubutton">Arguments for Menubutton</a></li>
+      <li><a id="toc-Introduction-4" href="menubutton.html#Introduction-4">Introduction</a></li>
+      <li><a id="toc-A-Menubutton-Widget_0027s-Arguments" href="menubutton.html#A-Menubutton-Widget_0027s-Arguments">A Menubutton Widget&rsquo;s Arguments</a></li>
+      <li><a id="toc-_0022Default-Bindings_0022-2" href="menubutton.html#g_t_0022Default-Bindings_0022-2">&quot;Default Bindings&quot;</a></li>
+      <li><a id="toc-Keywords-7" href="menubutton.html#Keywords-7">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-text-1" href="text.html">2.9 text</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-8" href="text.html#Synopsis-8">Synopsis</a></li>
+      <li><a id="toc-Standard-Options-8" href="text.html#Standard-Options-8">Standard Options</a></li>
+      <li><a id="toc-Arguments-for-Text" href="text.html#Arguments-for-Text">Arguments for Text</a></li>
+      <li><a id="toc-Description-5" href="text.html#Description-5">Description</a></li>
+      <li><a id="toc-Indices-1" href="text.html#Indices-1">Indices</a></li>
+      <li><a id="toc-Tags" href="text.html#Tags">Tags</a></li>
+      <li><a id="toc-Marks" href="text.html#Marks">Marks</a></li>
+      <li><a id="toc-Windows" href="text.html#Windows">Windows</a></li>
+      <li><a id="toc-The-Selection" href="text.html#The-Selection">The Selection</a></li>
+      <li><a id="toc-The-Insertion-Cursor" href="text.html#The-Insertion-Cursor">The Insertion Cursor</a></li>
+      <li><a id="toc-A-Text-Widget_0027s-Arguments" href="text.html#A-Text-Widget_0027s-Arguments">A Text Widget&rsquo;s Arguments</a></li>
+      <li><a id="toc-Bindings-4" href="text.html#Bindings-4">Bindings</a></li>
+      <li><a id="toc-_0022Performance-Issues_0022" href="text.html#g_t_0022Performance-Issues_0022">&quot;Performance Issues&quot;</a></li>
+      <li><a id="toc-Keywords-8" href="text.html#Keywords-8">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-entry-1" href="entry.html">2.10 entry</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-9" href="entry.html#Synopsis-9">Synopsis</a></li>
+      <li><a id="toc-Standard-Options-9" href="entry.html#Standard-Options-9">Standard Options</a></li>
+      <li><a id="toc-Arguments-for-Entry" href="entry.html#Arguments-for-Entry">Arguments for Entry</a></li>
+      <li><a id="toc-Description-6" href="entry.html#Description-6">Description</a></li>
+      <li><a id="toc-A-Entry-Widget_0027s-Arguments" href="entry.html#A-Entry-Widget_0027s-Arguments">A Entry Widget&rsquo;s Arguments</a></li>
+      <li><a id="toc-_0022Default-Bindings_0022-3" href="entry.html#g_t_0022Default-Bindings_0022-3">&quot;Default Bindings&quot;</a></li>
+      <li><a id="toc-Keywords-9" href="entry.html#Keywords-9">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-message-1" href="message.html">2.11 message</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-10" href="message.html#Synopsis-10">Synopsis</a></li>
+      <li><a id="toc-Standard-Options-10" href="message.html#Standard-Options-10">Standard Options</a></li>
+      <li><a id="toc-Arguments-for-Message" href="message.html#Arguments-for-Message">Arguments for Message</a></li>
+      <li><a id="toc-Description-7" href="message.html#Description-7">Description</a></li>
+      <li><a id="toc-A-Message-Widget_0027s-Arguments" href="message.html#A-Message-Widget_0027s-Arguments">A Message Widget&rsquo;s Arguments</a></li>
+      <li><a id="toc-_0022Default-Bindings_0022-4" href="message.html#g_t_0022Default-Bindings_0022-4">&quot;Default Bindings&quot;</a></li>
+      <li><a id="toc-Bugs-1" href="message.html#Bugs-1">Bugs</a></li>
+      <li><a id="toc-Keywords-10" href="message.html#Keywords-10">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-frame-1" href="frame.html">2.12 frame</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-11" href="frame.html#Synopsis-11">Synopsis</a></li>
+      <li><a id="toc-Standard-Options-11" href="frame.html#Standard-Options-11">Standard Options</a></li>
+      <li><a id="toc-Arguments-for-Frame" href="frame.html#Arguments-for-Frame">Arguments for Frame</a></li>
+      <li><a id="toc-Description-8" href="frame.html#Description-8">Description</a></li>
+      <li><a id="toc-A-Frame-Widget_0027s-Arguments" href="frame.html#A-Frame-Widget_0027s-Arguments">A Frame Widget&rsquo;s Arguments</a></li>
+      <li><a id="toc-Bindings-5" href="frame.html#Bindings-5">Bindings</a></li>
+      <li><a id="toc-Keywords-11" href="frame.html#Keywords-11">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-label-1" href="label.html">2.13 label</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-12" href="label.html#Synopsis-12">Synopsis</a></li>
+      <li><a id="toc-Standard-Options-12" href="label.html#Standard-Options-12">Standard Options</a></li>
+      <li><a id="toc-Arguments-for-Label" href="label.html#Arguments-for-Label">Arguments for Label</a></li>
+      <li><a id="toc-Description-9" href="label.html#Description-9">Description</a></li>
+      <li><a id="toc-A-Label-Widget_0027s-Arguments" href="label.html#A-Label-Widget_0027s-Arguments">A Label Widget&rsquo;s Arguments</a></li>
+      <li><a id="toc-Bindings-6" href="label.html#Bindings-6">Bindings</a></li>
+      <li><a id="toc-Keywords-12" href="label.html#Keywords-12">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-radiobutton-1" href="radiobutton.html">2.14 radiobutton</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-13" href="radiobutton.html#Synopsis-13">Synopsis</a></li>
+      <li><a id="toc-Standard-Options-13" href="radiobutton.html#Standard-Options-13">Standard Options</a></li>
+      <li><a id="toc-Arguments-for-Radiobutton" href="radiobutton.html#Arguments-for-Radiobutton">Arguments for Radiobutton</a></li>
+      <li><a id="toc-Description-10" href="radiobutton.html#Description-10">Description</a></li>
+      <li><a id="toc-A-Radiobutton-Widget_0027s-Arguments" href="radiobutton.html#A-Radiobutton-Widget_0027s-Arguments">A Radiobutton Widget&rsquo;s Arguments</a></li>
+      <li><a id="toc-Bindings-7" href="radiobutton.html#Bindings-7">Bindings</a></li>
+      <li><a id="toc-Keywords-13" href="radiobutton.html#Keywords-13">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-toplevel-1" href="toplevel.html">2.15 toplevel</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-14" href="toplevel.html#Synopsis-14">Synopsis</a></li>
+      <li><a id="toc-Standard-Options-14" href="toplevel.html#Standard-Options-14">Standard Options</a></li>
+      <li><a id="toc-Arguments-for-Toplevel" href="toplevel.html#Arguments-for-Toplevel">Arguments for Toplevel</a></li>
+      <li><a id="toc-Description-11" href="toplevel.html#Description-11">Description</a></li>
+      <li><a id="toc-A-Toplevel-Widget_0027s-Arguments" href="toplevel.html#A-Toplevel-Widget_0027s-Arguments">A Toplevel Widget&rsquo;s Arguments</a></li>
+      <li><a id="toc-Bindings-8" href="toplevel.html#Bindings-8">Bindings</a></li>
+      <li><a id="toc-Keywords-14" href="toplevel.html#Keywords-14">Keywords</a></li>
+    </ul></li>
+  </ul></li>
+  <li><a id="toc-Control-1" href="Control.html">3 Control</a>
+  <ul class="toc-numbered-mark">
+    <li><a id="toc-after-1" href="after.html">3.1 after</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-15" href="after.html#Synopsis-15">Synopsis</a></li>
+      <li><a id="toc-Description-12" href="after.html#Description-12">Description</a></li>
+      <li><a id="toc-Keywords-15" href="after.html#Keywords-15">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-bind-1" href="bind.html">3.2 bind</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-16" href="bind.html#Synopsis-16">Synopsis</a></li>
+      <li><a id="toc-Description-13" href="bind.html#Description-13">Description</a></li>
+      <li><a id="toc-Keywords-16" href="bind.html#Keywords-16">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-destroy-1" href="destroy.html">3.3 destroy</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-17" href="destroy.html#Synopsis-17">Synopsis</a></li>
+      <li><a id="toc-Description-14" href="destroy.html#Description-14">Description</a></li>
+      <li><a id="toc-Keywords-17" href="destroy.html#Keywords-17">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-tk_002ddialog-1" href="tk_002ddialog.html">3.4 tk-dialog</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-18" href="tk_002ddialog.html#Synopsis-18">Synopsis</a></li>
+      <li><a id="toc-Description-15" href="tk_002ddialog.html#Description-15">Description</a></li>
+      <li><a id="toc-Keywords-18" href="tk_002ddialog.html#Keywords-18">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-exit-1" href="exit.html">3.5 exit</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-19" href="exit.html#Synopsis-19">Synopsis</a></li>
+      <li><a id="toc-Description-16" href="exit.html#Description-16">Description</a></li>
+      <li><a id="toc-Keywords-19" href="exit.html#Keywords-19">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-focus-1" href="focus.html">3.6 focus</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-20" href="focus.html#Synopsis-20">Synopsis</a></li>
+      <li><a id="toc-Description-17" href="focus.html#Description-17">Description</a></li>
+      <li><a id="toc-_0022Focus-Events_0022" href="focus.html#g_t_0022Focus-Events_0022">&quot;Focus Events&quot;</a></li>
+      <li><a id="toc-Keywords-20" href="focus.html#Keywords-20">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-grab-1" href="grab.html">3.7 grab</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-21" href="grab.html#Synopsis-21">Synopsis</a></li>
+      <li><a id="toc-Description-18" href="grab.html#Description-18">Description</a></li>
+      <li><a id="toc-Bugs-2" href="grab.html#Bugs-2">Bugs</a></li>
+      <li><a id="toc-Keywords-21" href="grab.html#Keywords-21">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-tk_002dlistbox_002dsingle_002dselect-1" href="tk_002dlistbox_002dsingle_002dselect.html">3.8 tk-listbox-single-select</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-22" href="tk_002dlistbox_002dsingle_002dselect.html#Synopsis-22">Synopsis</a></li>
+      <li><a id="toc-Description-19" href="tk_002dlistbox_002dsingle_002dselect.html#Description-19">Description</a></li>
+      <li><a id="toc-Keywords-22" href="tk_002dlistbox_002dsingle_002dselect.html#Keywords-22">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-lower-1" href="lower.html">3.9 lower</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-23" href="lower.html#Synopsis-23">Synopsis</a></li>
+      <li><a id="toc-Description-20" href="lower.html#Description-20">Description</a></li>
+      <li><a id="toc-Keywords-23" href="lower.html#Keywords-23">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-tk_002dmenu_002dbar-1" href="tk_002dmenu_002dbar.html">3.10 tk-menu-bar</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-24" href="tk_002dmenu_002dbar.html#Synopsis-24">Synopsis</a></li>
+      <li><a id="toc-Description-21" href="tk_002dmenu_002dbar.html#Description-21">Description</a></li>
+      <li><a id="toc-_0022Menu-Traversal-Bindings_0022" href="tk_002dmenu_002dbar.html#g_t_0022Menu-Traversal-Bindings_0022">&quot;Menu Traversal Bindings&quot;</a></li>
+      <li><a id="toc-Keywords-24" href="tk_002dmenu_002dbar.html#Keywords-24">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-option-1" href="option.html">3.11 option</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-25" href="option.html#Synopsis-25">Synopsis</a></li>
+      <li><a id="toc-Description-22" href="option.html#Description-22">Description</a></li>
+      <li><a id="toc-Keywords-25" href="option.html#Keywords-25">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-options-1" href="options.html">3.12 options</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Description-23" href="options.html#Description-23">Description</a></li>
+      <li><a id="toc-Keywords-26" href="options.html#Keywords-26">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-pack_002dold-1" href="pack_002dold.html">3.13 pack-old</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-26" href="pack_002dold.html#Synopsis-26">Synopsis</a></li>
+      <li><a id="toc-Description-24" href="pack_002dold.html#Description-24">Description</a></li>
+      <li><a id="toc-Keywords-27" href="pack_002dold.html#Keywords-27">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-pack-1" href="pack.html">3.14 pack</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-27" href="pack.html#Synopsis-27">Synopsis</a></li>
+      <li><a id="toc-Description-25" href="pack.html#Description-25">Description</a></li>
+      <li><a id="toc-_0022The-Packer-Algorithm_0022" href="pack.html#g_t_0022The-Packer-Algorithm_0022">&quot;The Packer Algorithm&quot;</a></li>
+      <li><a id="toc-_0022Expansion_0022" href="pack.html#g_t_0022Expansion_0022">&quot;Expansion&quot;</a></li>
+      <li><a id="toc-_0022Geometry-Propagation_0022" href="pack.html#g_t_0022Geometry-Propagation_0022">&quot;Geometry Propagation&quot;</a></li>
+      <li><a id="toc-_0022Restrictions-On-Master-Windows_0022" href="pack.html#g_t_0022Restrictions-On-Master-Windows_0022">&quot;Restrictions On Master Windows&quot;</a></li>
+      <li><a id="toc-_0022Packing-Order_0022" href="pack.html#g_t_0022Packing-Order_0022">&quot;Packing Order&quot;</a></li>
+      <li><a id="toc-Keywords-28" href="pack.html#Keywords-28">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-place-1" href="place.html">3.15 place</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-28" href="place.html#Synopsis-28">Synopsis</a></li>
+      <li><a id="toc-Description-26" href="place.html#Description-26">Description</a></li>
+      <li><a id="toc-_0022Fine-Points_0022" href="place.html#g_t_0022Fine-Points_0022">&quot;Fine Points&quot;</a></li>
+      <li><a id="toc-Keywords-29" href="place.html#Keywords-29">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-raise-1" href="raise.html">3.16 raise</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-29" href="raise.html#Synopsis-29">Synopsis</a></li>
+      <li><a id="toc-Description-27" href="raise.html#Description-27">Description</a></li>
+      <li><a id="toc-Keywords-30" href="raise.html#Keywords-30">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-selection-1" href="selection.html">3.17 selection</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-30" href="selection.html#Synopsis-30">Synopsis</a></li>
+      <li><a id="toc-Description-28" href="selection.html#Description-28">Description</a></li>
+      <li><a id="toc-Keywords-31" href="selection.html#Keywords-31">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-send-1" href="send.html">3.18 send</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-31" href="send.html#Synopsis-31">Synopsis</a></li>
+      <li><a id="toc-Description-29" href="send.html#Description-29">Description</a></li>
+      <li><a id="toc-Security" href="send.html#Security">Security</a></li>
+      <li><a id="toc-Keywords-32" href="send.html#Keywords-32">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-tk-1" href="tk.html">3.19 tk</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-32" href="tk.html#Synopsis-32">Synopsis</a></li>
+      <li><a id="toc-Description-30" href="tk.html#Description-30">Description</a></li>
+      <li><a id="toc-Keywords-33" href="tk.html#Keywords-33">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-tkerror-1" href="tkerror.html">3.20 tkerror</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-33" href="tkerror.html#Synopsis-33">Synopsis</a></li>
+      <li><a id="toc-Description-31" href="tkerror.html#Description-31">Description</a></li>
+      <li><a id="toc-Keywords-34" href="tkerror.html#Keywords-34">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-tkvars-1" href="tkvars.html">3.21 tkvars</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Description-32" href="tkvars.html#Description-32">Description</a></li>
+      <li><a id="toc-Keywords-35" href="tkvars.html#Keywords-35">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-tkwait-1" href="tkwait.html">3.22 tkwait</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-34" href="tkwait.html#Synopsis-34">Synopsis</a></li>
+      <li><a id="toc-Description-33" href="tkwait.html#Description-33">Description</a></li>
+      <li><a id="toc-Keywords-36" href="tkwait.html#Keywords-36">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-update-1" href="update.html">3.23 update</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-35" href="update.html#Synopsis-35">Synopsis</a></li>
+      <li><a id="toc-Description-34" href="update.html#Description-34">Description</a></li>
+      <li><a id="toc-Keywords-37" href="update.html#Keywords-37">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-winfo-1" href="winfo.html">3.24 winfo</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-36" href="winfo.html#Synopsis-36">Synopsis</a></li>
+      <li><a id="toc-Description-35" href="winfo.html#Description-35">Description</a></li>
+      <li><a id="toc-Keywords-38" href="winfo.html#Keywords-38">Keywords</a></li>
+    </ul></li>
+    <li><a id="toc-wm-1" href="wm.html">3.25 wm</a>
+    <ul class="toc-numbered-mark">
+      <li><a id="toc-Synopsis-37" href="wm.html#Synopsis-37">Synopsis</a></li>
+      <li><a id="toc-Description-36" href="wm.html#Description-36">Description</a></li>
+      <li><a id="toc-_0022Sources-Of-Geometry-Information_0022" href="wm.html#g_t_0022Sources-Of-Geometry-Information_0022">&quot;Sources Of Geometry Information&quot;</a></li>
+      <li><a id="toc-_0022Ungridded-Geometry-Management_0022" href="wm.html#g_t_0022Ungridded-Geometry-Management_0022">&quot;Ungridded Geometry Management&quot;</a></li>
+      <li><a id="toc-_0022Gridded-Geometry-Management_0022" href="wm.html#g_t_0022Gridded-Geometry-Management_0022">&quot;Gridded Geometry Management&quot;</a></li>
+      <li><a id="toc-Bugs-3" href="wm.html#Bugs-3">Bugs</a></li>
+      <li><a id="toc-Keywords-39" href="wm.html#Keywords-39">Keywords</a></li>
+    </ul></li>
+  </ul></li>
+</ul>
+</div>
+</div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="General.html" accesskey="n" rel="next">General</a>, Previous: <a href="../dir_html/index.html" accesskey="p" rel="prev">(dir)</a>, Up: <a href="../dir_html/index.html" accesskey="u" rel="up">(dir)</a> &nbsp; [<a href="#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/label.html
@@ -0,0 +1,178 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>label (GCL TK Manual)</title>
+
+<meta name="description" content="label (GCL TK Manual)">
+<meta name="keywords" content="label (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Widgets.html" rel="up" title="Widgets">
+<link href="radiobutton.html" rel="next" title="radiobutton">
+<link href="frame.html" rel="prev" title="frame">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="label">
+<div class="nav-panel">
+<p>
+Next: <a href="radiobutton.html" accesskey="n" rel="next">radiobutton</a>, Previous: <a href="frame.html" accesskey="p" rel="prev">frame</a>, Up: <a href="Widgets.html" accesskey="u" rel="up">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="label-1"><span>2.13 label<a class="copiable-link" href="#label-1"> &para;</a></span></h3>
+
+<p>label \- Create and manipulate label widgets
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-12" accesskey="1">Synopsis</a></li>
+<li><a href="#Standard-Options-12" accesskey="2">Standard Options</a></li>
+<li><a href="#Arguments-for-Label" accesskey="3">Arguments for Label</a></li>
+<li><a href="#Description-9" accesskey="4">Description</a></li>
+<li><a href="#A-Label-Widget_0027s-Arguments" accesskey="5">A Label Widget&rsquo;s Arguments</a></li>
+<li><a href="#Bindings-6" accesskey="6">Bindings</a></li>
+<li><a href="#Keywords-12" accesskey="7">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-12">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-12"> &para;</a></span></h4>
+<p><b class="b">label</b><i class="i"> </i><i class="i">pathName </i><span class="r">?</span><i class="i">options</i>?
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Standard-Options-12">
+<h4 class="unnumberedsubsec"><span>Standard Options<a class="copiable-link" href="#Standard-Options-12"> &para;</a></span></h4>
+
+
+<div class="example">
+<pre class="example-preformatted">anchor           borderWidth     foreground     relief           
+background       cursor          padX           text             
+bitmap           font            padY           textVariable     
+</pre></div>
+
+
+<p>See <a class="xref" href="options.html">options</a>, for more information.
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Arguments-for-Label">
+<h4 class="unnumberedsubsec"><span>Arguments for Label<a class="copiable-link" href="#Arguments-for-Label"> &para;</a></span></h4>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:height</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">height</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Height</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a desired height for the label.
+If a bitmap is being displayed in the label then the value is in
+screen units (i.e. any of the forms acceptable to <b class="b">Tk_GetPixels</b>);
+for text it is in lines of text.
+If this option isn&rsquo;t specified, the label&rsquo;s desired height is computed
+from the size of the bitmap or text being displayed in it.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:width</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">width</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Width</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a desired width for the label.
+If a bitmap is being displayed in the label then the value is in
+screen units (i.e. any of the forms acceptable to <b class="b">Tk_GetPixels</b>);
+for text it is in characters.
+If this option isn&rsquo;t specified, the label&rsquo;s desired width is computed
+from the size of the bitmap or text being displayed in it.
+</p></dd>
+</dl>
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-9">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-9"> &para;</a></span></h4>
+
+<p>The <b class="b">label</b> command creates a new window (given by the
+<i class="i">pathName</i> argument) and makes it into a label widget.
+Additional
+options, described above, may be specified on the command line
+or in the option database
+to configure aspects of the label such as its colors, font,
+text, and initial relief.  The <b class="b">label</b> command returns its
+<i class="i">pathName</i> argument.  At the time this command is invoked,
+there must not exist a window named <i class="i">pathName</i>, but
+<i class="i">pathName</i>&rsquo;s parent must exist.
+</p>
+<p>A label is a widget
+that displays a textual string or bitmap.
+The label can be manipulated in a few simple ways, such as
+changing its relief or text, using the commands described below.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="A-Label-Widget_0027s-Arguments">
+<h4 class="unnumberedsubsec"><span>A Label Widget&rsquo;s Arguments<a class="copiable-link" href="#A-Label-Widget_0027s-Arguments"> &para;</a></span></h4>
+
+<p>The <b class="b">label</b> command creates a new Tcl command whose
+name is <i class="i">pathName</i>.  This
+command may be used to invoke various
+operations on the widget.  It has the following general form:
+</p>
+<div class="example">
+<pre class="example-preformatted"><i class="i">pathName option </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</pre></div>
+
+<p><i class="i">Option</i><span class="r"> and the </span><i class="i">arg</i>s
+determine the exact behavior of the command.  The following
+commands are possible for label widgets:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:configure</b><span class="r"> ?</span><i class="i">option</i><span class="r">? ?</span><i class="i">value option value ...</i>?</dt>
+<dd><p>Query or modify the configuration options of the widget.
+If no <i class="i">option</i> is specified, returns a list describing all of
+the available options for <i class="i">pathName</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).  If <i class="i">option</i> is specified
+with no <i class="i">value</i>, then the command returns a list describing the
+one named option (this list will be identical to the corresponding
+sublist of the value returned if no <i class="i">option</i> is specified).  If
+one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given widget option(s) to have the given value(s);  in
+this case the command returns an empty string.
+<i class="i">Option</i><span class="r"> may have any of the values accepted by the </span><b class="b">label</b>
+command.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Bindings-6">
+<h4 class="unnumberedsubsec"><span>Bindings<a class="copiable-link" href="#Bindings-6"> &para;</a></span></h4>
+
+<p>When a new label is created, it has no default event bindings:
+labels are not intended to be interactive.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-12">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-12"> &para;</a></span></h4>
+<p>label, widget
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="radiobutton.html">radiobutton</a>, Previous: <a href="frame.html">frame</a>, Up: <a href="Widgets.html">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/listbox.html
@@ -0,0 +1,287 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>listbox (GCL TK Manual)</title>
+
+<meta name="description" content="listbox (GCL TK Manual)">
+<meta name="keywords" content="listbox (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Widgets.html" rel="up" title="Widgets">
+<link href="scale.html" rel="next" title="scale">
+<link href="button.html" rel="prev" title="button">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="listbox">
+<div class="nav-panel">
+<p>
+Next: <a href="scale.html" accesskey="n" rel="next">scale</a>, Previous: <a href="button.html" accesskey="p" rel="prev">button</a>, Up: <a href="Widgets.html" accesskey="u" rel="up">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="listbox-1"><span>2.2 listbox<a class="copiable-link" href="#listbox-1"> &para;</a></span></h3>
+
+<p>listbox \- Create and manipulate listbox widgets
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-1" accesskey="1">Synopsis</a></li>
+<li><a href="#Standard-Options-1" accesskey="2">Standard Options</a></li>
+<li><a href="#Arguments-for-Listbox" accesskey="3">Arguments for Listbox</a></li>
+<li><a href="#Description-1" accesskey="4">Description</a></li>
+<li><a href="#A-Listbox_0027s-Arguments" accesskey="5">A Listbox&rsquo;s Arguments</a></li>
+<li><a href="#g_t_0022Default-Bindings_0022-1" accesskey="6">&quot;Default Bindings&quot;</a></li>
+<li><a href="#Keywords-1" accesskey="7">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-1">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-1"> &para;</a></span></h4>
+<p><b class="b">listbox</b><i class="i"> </i><i class="i">pathName </i><span class="r">?</span><i class="i">options</i>?
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Standard-Options-1">
+<h4 class="unnumberedsubsec"><span>Standard Options<a class="copiable-link" href="#Standard-Options-1"> &para;</a></span></h4>
+
+
+<div class="example">
+<pre class="example-preformatted">background       foreground  selectBackground   xScrollCommand  
+borderWidth      font        selectBorderWidth  yScrollCommand  
+cursor           geometry    selectForeground   
+exportSelection  relief      setGrid            
+</pre></div>
+
+
+<p>See <a class="xref" href="options.html">options</a>, for more information.
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Arguments-for-Listbox">
+<h4 class="unnumberedsubsec"><span>Arguments for Listbox<a class="copiable-link" href="#Arguments-for-Listbox"> &para;</a></span></h4>
+
+
+<p>None.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-1">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-1"> &para;</a></span></h4>
+
+<p>The <b class="b">listbox</b> command creates a new window (given by the
+<i class="i">pathName</i> argument) and makes it into a listbox widget.
+Additional
+options, described above, may be specified on the command line
+or in the option database
+to configure aspects of the listbox such as its colors, font,
+text, and relief.  The <b class="b">listbox</b> command returns its
+<i class="i">pathName</i> argument.  At the time this command is invoked,
+there must not exist a window named <i class="i">pathName</i>, but
+<i class="i">pathName</i>&rsquo;s parent must exist.
+</p>
+<p>A listbox is a widget that displays a list of strings, one per line.
+When first created, a new listbox has no elements in its list.
+Elements may be added or deleted using widget commands described
+below.  In addition, one or more elements may be selected as described
+below.
+If a listbox is exporting its selection (see <b class="b">exportSelection</b>
+option), then it will observe the standard X11 protocols
+for handling the selection;  listbox selections are available
+as type <b class="b">STRING</b>, consisting of a Tcl list with one entry
+for each selected element.
+</p>
+<p>For large lists only a subset of the list elements will be
+displayed in the listbox window at once;  commands described below
+may be used to change the view in the window.  Listboxes allow
+scrolling in both directions using the standard <b class="b">xScrollCommand</b>
+and <b class="b">yScrollCommand</b> options.
+They also support scanning, as described below.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="A-Listbox_0027s-Arguments">
+<h4 class="unnumberedsubsec"><span>A Listbox&rsquo;s Arguments<a class="copiable-link" href="#A-Listbox_0027s-Arguments"> &para;</a></span></h4>
+
+<p>The <b class="b">listbox</b> command creates a new Tcl command whose
+name is <i class="i">pathName</i>.  This
+command may be used to invoke various
+operations on the widget.  It has the following general form:
+</p>
+<div class="example">
+<pre class="example-preformatted"><i class="i">pathName option </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</pre></div>
+
+<p><i class="i">Option</i><span class="r"> and the </span><i class="i">arg</i>s
+determine the exact behavior of the command.  The following
+commands are possible for listbox widgets:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:configure</b><span class="r"> ?</span><i class="i">option</i><span class="r">? ?</span><i class="i">value option value ...</i>?</dt>
+<dd><p>Query or modify the configuration options of the widget.
+If no <i class="i">option</i> is specified, returns a list describing all of
+the available options for <i class="i">pathName</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).  If <i class="i">option</i> is specified
+with no <i class="i">value</i>, then the command returns a list describing the
+one named option (this list will be identical to the corresponding
+sublist of the value returned if no <i class="i">option</i> is specified).  If
+one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given widget option(s) to have the given value(s);  in
+this case the command returns an empty string.
+<i class="i">Option</i><span class="r"> may have any of the values accepted by the </span><b class="b">listbox</b>
+command.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:curselection</b></dt>
+<dd><p>Returns a list containing the indices of
+all of the elements in the listbox that are currently selected.
+If there are no elements selected in the listbox then an empty
+string is returned.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:delete </b><i class="i">first </i><span class="r">?</span><i class="i">last</i>?</dt>
+<dd><p>Delete one or more elements of the listbox.  <i class="i">First</i><span class="r"> and </span><i class="i">last</i>
+give the integer indices of the first and last elements in the range
+to be deleted.  If <i class="i">last</i> isn&rsquo;t specified it defaults to
+<i class="i">first</i>, i.e. a single element is deleted.  An index of
+<b class="b">0</b> corresponds to the first element in the listbox.  Either
+<i class="i">first</i><span class="r"> or </span><i class="i">last</i><span class="r"> may be specified as </span><b class="b">end</b>, in which
+case it refers to the last element of the listbox.  This command
+returns an empty string
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:get </b><i class="i">index</i></dt>
+<dd><p>Return the contents of the listbox element indicated by <i class="i">index</i>.
+<i class="i">Index</i> must be a non-negative integer (0 corresponds to
+the first element in the listbox), or it may also be specified as
+<b class="b">end</b> to indicate the last element in the listbox.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:insert </b><i class="i">index </i><span class="r">?</span><i class="i">element element ...</i>?</dt>
+<dd><p>Insert zero or more new elements in the list just before the
+element given by <i class="i">index</i><span class="r">.  If </span><i class="i">index</i> is specified as
+<b class="b">end</b> then the new elements are added to the end of the
+list.  Returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:nearest </b><i class="i">y</i></dt>
+<dd><p>Given a y-coordinate within the listbox window, this command returns
+the index of the (visible) listbox element nearest to that y-coordinate.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:scan</b><span class="r"> </span><i class="i">option args</i></dt>
+<dd><p>This command is used to implement scanning on listboxes.  It has
+two forms, depending on <i class="i">option</i>:
+</p><dl class="table">
+<dt><i class="i">pathName </i><b class="b">:scan :mark </b><i class="i">x y</i></dt>
+<dd><p>Records <i class="i">x</i><span class="r"> and </span><i class="i">y</i> and the current view in the listbox
+window;  used in conjunction with later <b class="b">scan dragto</b> commands.
+Typically this command is associated with a mouse button press in
+the widget.  It returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:scan :dragto </b><i class="i">x y</i>.</dt>
+<dd><p>This command computes the difference between its <i class="i">x</i><span class="r"> and </span><i class="i">y</i>
+arguments and the <i class="i">x</i><span class="r"> and </span><i class="i">y</i> arguments to the last
+<b class="b">scan mark</b> command for the widget.
+It then adjusts the view by 10 times the
+difference in coordinates.  This command is typically associated
+with mouse motion events in the widget, to produce the effect of
+dragging the list at high speed through the window.  The return
+value is an empty string.
+</p></dd>
+</dl>
+</dd>
+<dt><i class="i">pathName </i><b class="b">:select </b><i class="i">option arg</i></dt>
+<dd><p>This command is used to adjust the selection within a listbox.  It
+has several forms, depending on <i class="i">option</i>.  In all of the forms
+the index <b class="b">end</b> refers to the last element in the listbox.
+</p><dl class="table">
+<dt><i class="i">pathName </i><b class="b">:select :adjust </b><i class="i">index</i></dt>
+<dd><p>Locate the end of the selection nearest to the element given by
+<i class="i">index</i><span class="r">, and adjust that end of the selection to be at </span><i class="i">index</i>
+(i.e including but not going beyond <i class="i">index</i>).  The other
+end of the selection is made the anchor point for future
+<b class="b">select to</b> commands.  If the selection
+isn&rsquo;t currently in the listbox, then this command is identical to
+the <b class="b">select from</b> widget command.
+Returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:select :clear</b></dt>
+<dd><p>If the selection is in this listbox then it is cleared so that
+none of the listbox&rsquo;s elements are selected anymore.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:select :from </b><i class="i">index</i></dt>
+<dd><p>Set the selection to consist of element <i class="i">index</i>, and make
+<i class="i">index</i><span class="r"> the anchor point for future </span><b class="b">select to</b> widget
+commands.  Returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:select :to </b><i class="i">index</i></dt>
+<dd><p>Set the selection to consist of the elements from the anchor
+point to element <i class="i">index</i>, inclusive.  The anchor point is
+determined by the most recent <b class="b">select from</b><span class="r"> or </span><b class="b">select adjust</b>
+command in this widget.  If the selection isn&rsquo;t in this widget,
+this command is identical to <b class="b">select from</b>.
+Returns an empty string.
+</p></dd>
+</dl>
+
+</dd>
+<dt><i class="i">pathName </i><b class="b">:size</b></dt>
+<dd><p>Returns a decimal string indicating the total number of elements
+in the listbox.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:xview </b><i class="i">index</i></dt>
+<dd><p>Adjust the view in the listbox so that character position <i class="i">index</i>
+is displayed at the left edge of the widget.
+Returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:yview </b><i class="i">index</i></dt>
+<dd><p>Adjust the view in the listbox so that element <i class="i">index</i> is
+displayed at the top of the widget.
+If <i class="i">index</i><span class="r"> is specified as </span><b class="b">end</b> it indicates the last
+element of the listbox.  Returns an empty string.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022Default-Bindings_0022-1">
+<h4 class="unnumberedsubsec"><span>&quot;Default Bindings&quot;<a class="copiable-link" href="#g_t_0022Default-Bindings_0022-1"> &para;</a></span></h4>
+
+<p>Tk automatically creates class bindings for listboxes that give them
+the following default behavior:
+</p><ul class="itemize">
+<li>[1]
+When button 1 is pressed over a listbox, the element underneath the
+mouse cursor is selected.  The mouse can be dragged to select a
+range of elements.
+</li><li>[2]
+The ends of the selection can be adjusted by dragging with mouse
+button 1 while the shift key is down;  this will adjust the end
+of the selection that was nearest to the mouse cursor when button
+1 was pressed.
+</li><li>[3]
+The view in the listbox can be adjusted by dragging with mouse button 2.
+</li></ul>
+
+<p>The behavior of listboxes can be changed by defining new bindings for
+individual widgets or by redefining the class bindings.
+In addition, the procedure <b class="b">tk_listboxSingleSelect</b> may be
+invoked to change listbox behavior so that only a single element
+may be selected at once.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-1">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-1"> &para;</a></span></h4>
+<p>listbox, widget
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="scale.html">scale</a>, Previous: <a href="button.html">button</a>, Up: <a href="Widgets.html">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/lower.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>lower (GCL TK Manual)</title>
+
+<meta name="description" content="lower (GCL TK Manual)">
+<meta name="keywords" content="lower (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="tk_002dmenu_002dbar.html" rel="next" title="tk-menu-bar">
+<link href="tk_002dlistbox_002dsingle_002dselect.html" rel="prev" title="tk-listbox-single-select">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="lower">
+<div class="nav-panel">
+<p>
+Next: <a href="tk_002dmenu_002dbar.html" accesskey="n" rel="next">tk-menu-bar</a>, Previous: <a href="tk_002dlistbox_002dsingle_002dselect.html" accesskey="p" rel="prev">tk-listbox-single-select</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="lower-1"><span>3.9 lower<a class="copiable-link" href="#lower-1"> &para;</a></span></h3>
+
+<p>lower \- Change a window&rsquo;s position in the stacking order
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-23" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-20" accesskey="2">Description</a></li>
+<li><a href="#Keywords-23" accesskey="3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-23">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-23"> &para;</a></span></h4>
+<p><b class="b">lower </b><i class="i">window </i><span class="r">?</span><i class="i">belowThis</i>?
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-20">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-20"> &para;</a></span></h4>
+
+<p>If the <i class="i">belowThis</i> argument is omitted then the command lowers
+<i class="i">window</i> so that it is below all of its siblings in the stacking
+order (it will be obscured by any siblings that overlap it and
+will not obscure any siblings).
+If <i class="i">belowThis</i> is specified then it must be the path name of
+a window that is either a sibling of <i class="i">window</i> or the descendant
+of a sibling of <i class="i">window</i>.
+In this case the <b class="b">lower</b> command will insert
+<i class="i">window</i><span class="r"> into the stacking order just below </span><i class="i">belowThis</i>
+(or the ancestor of <i class="i">belowThis</i><span class="r"> that is a sibling of </span><i class="i">window</i>);
+this could end up either raising or lowering <i class="i">window</i>.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-23">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-23"> &para;</a></span></h4>
+<p>lower, obscure, stacking order
+</p></div>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/menu.html
@@ -0,0 +1,565 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>menu (GCL TK Manual)</title>
+
+<meta name="description" content="menu (GCL TK Manual)">
+<meta name="keywords" content="menu (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Widgets.html" rel="up" title="Widgets">
+<link href="scrollbar.html" rel="next" title="scrollbar">
+<link href="canvas.html" rel="prev" title="canvas">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="menu">
+<div class="nav-panel">
+<p>
+Next: <a href="scrollbar.html" accesskey="n" rel="next">scrollbar</a>, Previous: <a href="canvas.html" accesskey="p" rel="prev">canvas</a>, Up: <a href="Widgets.html" accesskey="u" rel="up">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="menu-1"><span>2.5 menu<a class="copiable-link" href="#menu-1"> &para;</a></span></h3>
+
+<p>menu \- Create and manipulate menu widgets
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-4" accesskey="1">Synopsis</a></li>
+<li><a href="#Standard-Options-4" accesskey="2">Standard Options</a></li>
+<li><a href="#Arguments-for-Menu" accesskey="3">Arguments for Menu</a></li>
+<li><a href="#Introduction-3" accesskey="4">Introduction</a></li>
+<li><a href="#Command-Entries" accesskey="5">Command Entries</a></li>
+<li><a href="#Separator-Entries" accesskey="6">Separator Entries</a></li>
+<li><a href="#Check_002dButton-Entries" accesskey="7">Check-Button Entries</a></li>
+<li><a href="#Radio_002dButton-Entries" accesskey="8">Radio-Button Entries</a></li>
+<li><a href="#Cascade-Entries" accesskey="9">Cascade Entries</a></li>
+<li><a href="#A-Menu-Widget_0027s-Arguments">A Menu Widget&rsquo;s Arguments</a></li>
+<li><a href="#Default-Bindings">Default Bindings</a></li>
+<li><a href="#Bugs">Bugs</a></li>
+<li><a href="#Keywords-4">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-4">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-4"> &para;</a></span></h4>
+<p><b class="b">menu</b><i class="i"> </i><i class="i">pathName </i><span class="r">?</span><i class="i">options</i>?
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Standard-Options-4">
+<h4 class="unnumberedsubsec"><span>Standard Options<a class="copiable-link" href="#Standard-Options-4"> &para;</a></span></h4>
+
+
+<div class="example">
+<pre class="example-preformatted">activeBackground       background       disabledForeground      
+activeBorderWidth      borderWidth      font                    
+activeForeground       cursor           foreground              
+</pre></div>
+
+
+<p>See <a class="xref" href="options.html">options</a>, for more information.
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Arguments-for-Menu">
+<h4 class="unnumberedsubsec"><span>Arguments for Menu<a class="copiable-link" href="#Arguments-for-Menu"> &para;</a></span></h4>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:postcommand</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">postCommand</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Command</b>&quot;</code>
+</p></div><br>
+
+<p>If this option is specified then it provides a Tcl command to execute
+each time the menu is posted.  The command is invoked by the <b class="b">post</b>
+widget command before posting the menu.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:selector</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">selector</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Foreground</b>&quot;</code>
+</p></div><br>
+
+<p>For menu entries that are check buttons or radio buttons, this option
+specifies the color to display in the selector when the check button
+or radio button is selected.
+</p></dd>
+</dl>
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Introduction-3">
+<h4 class="unnumberedsubsec"><span>Introduction<a class="copiable-link" href="#Introduction-3"> &para;</a></span></h4>
+
+<p>The <b class="b">menu</b> command creates a new top-level window (given
+by the <i class="i">pathName</i> argument) and makes it into a menu widget.
+Additional
+options, described above, may be specified on the command line
+or in the option database
+to configure aspects of the menu such as its colors and font.
+The <b class="b">menu</b> command returns its
+<i class="i">pathName</i> argument.  At the time this command is invoked,
+there must not exist a window named <i class="i">pathName</i>, but
+<i class="i">pathName</i>&rsquo;s parent must exist.
+</p>
+<p>A menu is a widget that displays a collection of one-line entries arranged
+in a column.  There exist several different types of entries,
+each with different properties.  Entries of different types may be
+combined in a single menu.  Menu entries are not the same as
+entry widgets.  In fact, menu entries are not even distinct widgets;
+the entire menu is one widget.
+</p>
+<p>Menu entries are displayed with up to three
+separate fields.  The main field is a label in the form of text or
+a bitmap, which is determined by the <b class="b">:label</b><span class="r"> or </span><b class="b">:bitmap</b>
+option for the entry.
+If the  <b class="b">:accelerator</b> option is specified for an entry then a second
+textual field is displayed to the right of the label.  The accelerator
+typically describes a keystroke sequence that may be typed in the
+application to cause the same result as invoking the menu entry.
+The third field is a <i class="i">selector</i>.  The selector is present only for
+check-button or radio-button entries.  It indicates whether the entry
+is selected or not, and is displayed to the left of the entry&rsquo;s
+string.
+</p>
+<p>In normal use, an entry becomes active (displays itself differently)
+whenever the mouse pointer is over the entry.  If a mouse
+button is released over the entry then the entry is <i class="i">invoked</i>.
+The effect of invocation is different for each type of entry;
+these effects are described below in the sections on individual
+entries.
+</p>
+<p>Entries may be <i class="i">disabled</i>, which causes their labels
+and accelerators to be displayed
+with dimmer colors.  A disabled entry cannot be activated or invoked.
+Disabled entries may be re-enabled, at which point it becomes
+possible to activate and invoke them again.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Command-Entries">
+<h4 class="unnumberedsubsec"><span>Command Entries<a class="copiable-link" href="#Command-Entries"> &para;</a></span></h4>
+
+<p>The most common kind of menu entry is a command entry, which
+behaves much like a button widget.  When a command entry is
+invoked, a Tcl command is executed.  The Tcl
+command is specified with the <b class="b">:command</b> option.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Separator-Entries">
+<h4 class="unnumberedsubsec"><span>Separator Entries<a class="copiable-link" href="#Separator-Entries"> &para;</a></span></h4>
+
+<p>A separator is an entry that is displayed as a horizontal dividing
+line.  A separator may not be activated or invoked, and it has
+no behavior other than its display appearance.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Check_002dButton-Entries">
+<h4 class="unnumberedsubsec"><span>Check-Button Entries<a class="copiable-link" href="#Check_002dButton-Entries"> &para;</a></span></h4>
+
+<p>A check-button menu entry behaves much like a check-button widget.
+When it is invoked it toggles back and forth between the selected
+and deselected states.  When the entry is selected, a particular
+value is stored in a particular global variable (as determined by
+the <b class="b">:onvalue</b><span class="r"> and </span><b class="b">:variable</b> options for the entry);  when
+the entry is deselected another value (determined by the
+<b class="b">:offvalue</b> option) is stored in the global variable.
+A selector box is displayed to the left of the label in a check-button
+entry.  If the entry is selected then the box&rsquo;s center is displayed
+in the color given by the <b class="b">selector</b> option for the menu;
+otherwise the box&rsquo;s center is displayed in the background color for
+the menu.  If a <b class="b">:command</b> option is specified for a check-button
+entry, then its value is evaluated as a Tcl command each time the entry
+is invoked;  this happens after toggling the entry&rsquo;s
+selected state.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Radio_002dButton-Entries">
+<h4 class="unnumberedsubsec"><span>Radio-Button Entries<a class="copiable-link" href="#Radio_002dButton-Entries"> &para;</a></span></h4>
+
+<p>A radio-button menu entry behaves much like a radio-button widget.
+Radio-button entries are organized in groups of which only one
+entry may be selected at a time.  Whenever a particular entry
+becomes selected it stores a particular value into a particular
+global variable (as determined by the <b class="b">:value</b> and
+<b class="b">:variable</b> options for the entry).  This action
+causes any previously-selected entry in the same group
+to deselect itself.
+Once an entry has become selected, any change to the entry&rsquo;s
+associated variable will cause the entry to deselect itself.
+Grouping of radio-button entries is determined by their
+associated variables:  if two entries have the same associated
+variable then they are in the same group.
+A selector diamond is displayed to the left of the label in each
+radio-button entry.  If the entry is selected then the diamond&rsquo;s
+center is displayed in the color given by the <b class="b">selector</b> option
+for the menu;
+otherwise the diamond&rsquo;s center is displayed in the background color for
+the menu.  If a <b class="b">:command</b> option is specified for a radio-button
+entry, then its value is evaluated as a Tcl command each time the entry
+is invoked;  this happens after selecting the entry.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Cascade-Entries">
+<h4 class="unnumberedsubsec"><span>Cascade Entries<a class="copiable-link" href="#Cascade-Entries"> &para;</a></span></h4>
+
+<p>A cascade entry is one with an associated menu (determined
+by the <b class="b">:menu</b> option).  Cascade entries allow the construction
+of cascading menus.  When the entry is activated, the
+associated menu is posted just to the right of the entry;
+that menu remains posted until the higher-level menu is unposted or
+until some other entry is activated in the higher-level menu.
+The associated menu should normally be a child of the menu containing
+the cascade entry, in order for menu traversal to work correctly.
+</p>
+<p>A cascade entry posts its associated menu by invoking a
+Tcl command of the form
+</p>
+<dl class="table">
+<dt><i class="i">menu</i><b class="b"> :post </b><i class="i">x y</i></dt>
+<dd>
+
+
+<p>where <i class="i">menu</i><span class="r"> is the path name of the associated menu, </span><i class="i">x</i>
+and <i class="i">y</i> are the root-window coordinates of the upper-right
+corner of the cascade entry, and <i class="i">group</i> is the name of the
+menu&rsquo;s group (as determined in its last <b class="b">post</b> widget command).
+The lower-level menu is unposted by executing a Tcl command with
+the form
+</p>
+</dd>
+<dt><i class="i">menu</i><b class="b">:unpost</b></dt>
+<dd><p>where <i class="i">menu</i> is the name of the associated menu.
+</p></dd>
+</dl>
+
+<p>If a <b class="b">:command</b> option is specified for a cascade entry then it is
+evaluated as a Tcl command each time the associated menu is posted (the
+evaluation occurs before the menu is posted).
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="A-Menu-Widget_0027s-Arguments">
+<h4 class="unnumberedsubsec"><span>A Menu Widget&rsquo;s Arguments<a class="copiable-link" href="#A-Menu-Widget_0027s-Arguments"> &para;</a></span></h4>
+
+<p>The <b class="b">menu</b> command creates a new Tcl command whose
+name is <i class="i">pathName</i>.  This
+command may be used to invoke various
+operations on the widget.  It has the following general form:
+</p>
+<dl class="table">
+<dt><i class="i">pathName option </i><span class="r">?</span><i class="i">arg arg ...</i>?</dt>
+<dd><p><i class="i">Option</i><span class="r"> and the </span><i class="i">arg</i>s
+determine the exact behavior of the command.
+</p></dd>
+</dl>
+
+<p>Many of the widget commands for a menu take as one argument an
+indicator of which entry of the menu to operate on.  These
+indicators are called <i class="i">index</i>es and may be specified in
+any of the following forms:
+</p>
+<dl class="table">
+<dt><i class="i">number</i></dt>
+<dd><p>Specifies the entry numerically, where 0 corresponds
+to the top-most entry of the menu, 1 to the entry below it, and
+so on.
+</p></dd>
+<dt><b class="b">active</b></dt>
+<dd><p>Indicates the entry that is currently active.  If no entry is
+active then this form is equivalent to <b class="b">none</b>.  This form may
+not be abbreviated.
+</p></dd>
+<dt><b class="b">last</b></dt>
+<dd><p>Indicates the bottommost entry in the menu.  If there are no
+entries in the menu then this form is equivalent to <b class="b">none</b>.
+This form may not be abbreviated.
+</p></dd>
+<dt><b class="b">none</b></dt>
+<dd><p>Indicates &ldquo;no entry at all&rdquo;;  this is used most commonly with
+the <b class="b">activate</b> option to deactivate all the entries in the
+menu.  In most cases the specification of <b class="b">none</b> causes
+nothing to happen in the widget command.
+This form may not be abbreviated.
+</p></dd>
+<dt><b class="b">@</b><i class="i">number</i></dt>
+<dd><p>In this form, <i class="i">number</i> is treated as a y-coordinate in the
+menu&rsquo;s window;  the entry spanning that y-coordinate is used.
+For example, &ldquo;<b class="b">@0</b>&rdquo; indicates the top-most entry in the
+window.  If <i class="i">number</i> is outside the range of the window
+then this form is equivalent to <b class="b">none</b>.
+</p></dd>
+<dt><i class="i">pattern</i></dt>
+<dd><p>If the index doesn&rsquo;t satisfy one of the above forms then this
+form is used.  <i class="i">Pattern</i> is pattern-matched against the label of
+each entry in the menu, in order from the top down, until a
+matching entry is found.  The rules of <b class="b">Tcl_StringMatch</b>
+are used.
+</p>
+<p>The following widget commands are possible for menu widgets:
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:activate </b><i class="i">index</i></dt>
+<dd><p>Change the state of the entry indicated by <i class="i">index</i><span class="r"> to </span><b class="b">active</b>
+and redisplay it using its active colors.
+Any previously-active entry is deactivated.  If <i class="i">index</i>
+is specified as <b class="b">none</b>, or if the specified entry is
+disabled, then the menu ends up with no active entry.
+Returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:add </b><i class="i">type </i><span class="r">?</span><i class="i">option value option value ...</i>?</dt>
+<dd><p>Add a new entry to the bottom of the menu.  The new entry&rsquo;s type
+is given by <i class="i">type</i><span class="r"> and must be one of </span><b class="b">cascade</b>,
+<b class="b">checkbutton</b><span class="r">, </span><b class="b">command</b><span class="r">, </span><b class="b">radiobutton</b><span class="r">, or </span><b class="b">separator</b>,
+or a unique abbreviation of one of the above.  If additional arguments
+are present, they specify any of the following options:
+</p>
+<dl class="table">
+<dt><b class="b">:activebackground </b><i class="i">value</i></dt>
+<dd><p>Specifies a background color to use for displaying this entry when it
+is active.
+If this option is specified as an empty string (the default), then the
+<b class="b">activeBackground</b> option for the overall menu is used.
+This option is not available for separator entries.
+</p></dd>
+<dt><b class="b">:accelerator </b><i class="i">value</i></dt>
+<dd><p>Specifies a string to display at the right side of the menu entry.
+Normally describes an accelerator keystroke sequence that may be
+typed to invoke the same function as the menu entry.  This option
+is not available for separator entries.
+</p></dd>
+<dt><b class="b">:background </b><i class="i">value</i></dt>
+<dd><p>Specifies a background color to use for displaying this entry when it
+is in the normal state (neither active nor disabled).
+If this option is specified as an empty string (the default), then the
+<b class="b">background</b> option for the overall menu is used.
+This option is not available for separator entries.
+</p></dd>
+<dt><b class="b">:bitmap </b><i class="i">value</i></dt>
+<dd><p>Specifies a bitmap to display in the menu instead of a textual
+label, in any of the forms accepted by <b class="b">Tk_GetBitmap</b>.
+This option overrides the <b class="b">:label</b> option but may be reset
+to an empty string to enable a textual label to be displayed.
+This option is not available for separator entries.
+</p></dd>
+<dt><b class="b">:command </b><i class="i">value</i></dt>
+<dd><p>For command, checkbutton, and radiobutton entries, specifies a
+Tcl command to execute when the menu entry is invoked.
+For cascade entries, specifies a Tcl command to execute
+when the entry is activated (i.e. just before its submenu is
+posted).
+Not available for separator entries.
+</p></dd>
+<dt><b class="b">:font </b><i class="i">value</i></dt>
+<dd><p>Specifies the font to use when drawing the label or accelerator
+string in this entry.
+If this option is specified as an empty string (the default) then
+the <b class="b">font</b> option for the overall menu is used.
+This option is not available for separator entries.
+</p></dd>
+<dt><b class="b">:label </b><i class="i">value</i></dt>
+<dd><p>Specifies a string to display as an identifying label in the menu
+entry.  Not available for separator entries.
+</p></dd>
+<dt><b class="b">:menu </b><i class="i">value</i></dt>
+<dd><p>Available only for cascade entries.  Specifies the path name of
+the menu associated with this entry.
+</p></dd>
+<dt><b class="b">:offvalue </b><i class="i">value</i></dt>
+<dd><p>Available only for check-button entries.  Specifies the value to
+store in the entry&rsquo;s associated variable when the entry is
+deselected.
+</p></dd>
+<dt><b class="b">:onvalue </b><i class="i">value</i></dt>
+<dd><p>Available only for check-button entries.  Specifies the value to
+store in the entry&rsquo;s associated variable when the entry is selected.
+</p></dd>
+<dt><b class="b">:state </b><i class="i">value</i></dt>
+<dd><p>Specifies one of three states for the entry:  <b class="b">normal</b><span class="r">, </span><b class="b">active</b>,
+or <b class="b">disabled</b>.  In normal state the entry is displayed using the
+<b class="b">foreground</b><span class="r"> option for the menu and the </span><b class="b">background</b>
+option from the entry or the menu.
+The active state is typically used when the pointer is over the entry.
+In active state the entry is displayed using the <b class="b">activeForeground</b>
+option for the menu along with the <b class="b">activebackground</b> option from
+the entry.
+Disabled state means that the entry is insensitive:  it doesn&rsquo;t activate
+and doesn&rsquo;t respond to mouse button presses or releases.
+In this state the entry is displayed according to the 
+<b class="b">disabledForeground</b> option for the menu and the
+<b class="b">background</b> option from the entry.
+This option is not available for separator entries.
+</p></dd>
+<dt><b class="b">:underline </b><i class="i">value</i></dt>
+<dd><p>Specifies the integer index of a character to underline in the entry.
+This option is typically used to indicate keyboard traversal characters.
+0 corresponds to the first character of the text displayed in the entry,
+1 to the next character, and so on.
+If a bitmap is displayed in the entry then this option is ignored.
+This option is not available for separator entries.
+</p></dd>
+<dt><b class="b">:value </b><i class="i">value</i></dt>
+<dd><p>Available only for radio-button entries.  Specifies the value to
+store in the entry&rsquo;s associated variable when the entry is selected.
+</p></dd>
+<dt><b class="b">:variable </b><i class="i">value</i></dt>
+<dd><p>Available only for check-button and radio-button entries.  Specifies
+the name of a global value to set when the entry is selected.
+For check-button entries the variable is also set when the entry
+is deselected.  For radio-button entries, changing the variable
+causes the currently-selected entry to deselect itself.
+</p></dd>
+</dl>
+</dd>
+</dl>
+
+<p>The <b class="b">add</b> widget command returns an empty string.
+</p>
+
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:configure</b><span class="r"> ?</span><i class="i">option</i><span class="r">? ?</span><i class="i">value option value ...</i>?</dt>
+<dd><p>Query or modify the configuration options of the widget.
+If no <i class="i">option</i> is specified, returns a list describing all of
+the available options for <i class="i">pathName</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).  If <i class="i">option</i> is specified
+with no <i class="i">value</i>, then the command returns a list describing the
+one named option (this list will be identical to the corresponding
+sublist of the value returned if no <i class="i">option</i> is specified).  If
+one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given widget option(s) to have the given value(s);  in
+this case the command returns an empty string.
+<i class="i">Option</i><span class="r"> may have any of the values accepted by the </span><b class="b">menu</b>
+command.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:delete </b><i class="i">index1</i><span class="r"> ?</span><i class="i">index2</i>?</dt>
+<dd><p>Delete all of the menu entries between <i class="i">index1</i> and
+<i class="i">index2</i> inclusive.
+If <i class="i">index2</i><span class="r"> is omitted then it defaults to </span><i class="i">index1</i>.
+Returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:disable </b><i class="i">index</i></dt>
+<dd><p>Change the state of the entry given by <i class="i">index</i><span class="r"> to </span><b class="b">disabled</b>
+and redisplay the entry using its disabled colors.
+Returns an empty string.
+This command is obsolete and will eventually be removed;
+use &ldquo;<i class="i">pathName </i><b class="b">:entryconfigure </b><i class="i">index</i><span class="r"> :state disabled</span>&rdquo; instead.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:enable </b><i class="i">index</i></dt>
+<dd><p>Change the state of the entry given by <i class="i">index</i><span class="r"> to </span><b class="b">normal</b>
+and redisplay the entry using its normal colors.
+Returns an empty string.
+This command is obsolete and will eventually be removed;
+use &ldquo;<i class="i">pathName </i><b class="b">:entryconfigure </b><i class="i">index</i><span class="r"> :state normal</span>&rdquo; instead.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:entryconfigure </b><i class="i">index</i><span class="r"> </span><span class="r">?</span><i class="i">options</i>?</dt>
+<dd><p>This command is similar to the <b class="b">configure</b> command, except that
+it applies to the options for an individual entry, whereas <b class="b">configure</b>
+applies to the options for the menu as a whole.
+<i class="i">Options</i><span class="r"> may have any of the values accepted by the </span><b class="b">add</b>
+widget command.  If <i class="i">options</i> are specified, options are modified
+as indicated
+in the command and the command returns an empty string.
+If no <i class="i">options</i> are specified, returns a list describing
+the current options for entry <i class="i">index</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:index </b><i class="i">index</i></dt>
+<dd><p>Returns the numerical index corresponding to <i class="i">index</i>, or
+<b class="b">none</b><span class="r"> if </span><i class="i">index</i><span class="r"> was specified as </span><b class="b">none</b>.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:invoke </b><i class="i">index</i></dt>
+<dd><p>Invoke the action of the menu entry.  See the sections on the
+individual entries above for details on what happens.  If the
+menu entry is disabled then nothing happens.  If the
+entry has a command associated with it then the result of that
+command is returned as the result of the <b class="b">invoke</b> widget
+command.  Otherwise the result is an empty string.  Note:  invoking
+a menu entry does not automatically unpost the menu.  Normally
+the associated menubutton will take care of unposting the menu.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:post </b><i class="i">x y</i></dt>
+<dd><p>Arrange for the menu to be displayed on the screen at the root-window
+coordinates given by <i class="i">x</i><span class="r"> and </span><i class="i">y</i>.  These coordinates are
+adjusted if necessary to guarantee that the entire menu is visible on
+the screen.  This command normally returns an empty string.
+If the <b class="b">:postcommand</b> option has been specified, then its value is
+executed as a Tcl script before posting the menu and the result of
+that script is returned as the result of the <b class="b">post</b> widget
+command.
+If an error returns while executing the command, then the error is
+returned without posting the menu.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:unpost</b></dt>
+<dd><p>Unmap the window so that it is no longer displayed.  If a
+lower-level cascaded menu is posted, unpost that menu.  Returns an
+empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:yposition </b><i class="i">index</i></dt>
+<dd><p>Returns a decimal string giving the y-coordinate within the menu
+window of the topmost pixel in the entry specified by <i class="i">index</i>.
+</p>
+
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Default-Bindings">
+<h4 class="unnumberedsubsec"><span>Default Bindings<a class="copiable-link" href="#Default-Bindings"> &para;</a></span></h4>
+
+
+<p>Tk automatically creates class bindings for menus that give them
+the following default behavior:
+</p><ul class="itemize">
+<li>[1]
+When the mouse cursor enters a menu, the entry underneath the mouse
+cursor is activated;  as the mouse moves around the menu, the active
+entry changes to track the mouse.
+</li><li>[2]
+When button 1 is released over a menu, the active entry (if any) is invoked.
+</li><li>[3]
+A menu can be repositioned on the screen by dragging it with mouse
+button 2.
+</li><li>[4]
+A number of other bindings are created to support keyboard menu traversal.
+See the manual entry for <b class="b">tk_bindForTraversal</b> for details on these
+bindings.
+</li></ul>
+
+<p>Disabled menu entries are non-responsive:  they don&rsquo;t activate and
+ignore mouse button presses and releases.
+</p>
+<p>The behavior of menus can be changed by defining new bindings for
+individual widgets or by redefining the class bindings.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Bugs">
+<h4 class="unnumberedsubsec"><span>Bugs<a class="copiable-link" href="#Bugs"> &para;</a></span></h4>
+
+<p>At present it isn&rsquo;t possible to use the
+option database to specify values for the options to individual
+entries.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-4">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-4"> &para;</a></span></h4>
+<p>menu, widget
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="scrollbar.html">scrollbar</a>, Previous: <a href="canvas.html">canvas</a>, Up: <a href="Widgets.html">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/menubutton.html
@@ -0,0 +1,280 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>menubutton (GCL TK Manual)</title>
+
+<meta name="description" content="menubutton (GCL TK Manual)">
+<meta name="keywords" content="menubutton (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Widgets.html" rel="up" title="Widgets">
+<link href="text.html" rel="next" title="text">
+<link href="checkbutton.html" rel="prev" title="checkbutton">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="menubutton">
+<div class="nav-panel">
+<p>
+Next: <a href="text.html" accesskey="n" rel="next">text</a>, Previous: <a href="checkbutton.html" accesskey="p" rel="prev">checkbutton</a>, Up: <a href="Widgets.html" accesskey="u" rel="up">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="menubutton-1"><span>2.8 menubutton<a class="copiable-link" href="#menubutton-1"> &para;</a></span></h3>
+
+<p>menubutton \- Create and manipulate menubutton widgets
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-7" accesskey="1">Synopsis</a></li>
+<li><a href="#Standard-Options-7" accesskey="2">Standard Options</a></li>
+<li><a href="#Arguments-for-Menubutton" accesskey="3">Arguments for Menubutton</a></li>
+<li><a href="#Introduction-4" accesskey="4">Introduction</a></li>
+<li><a href="#A-Menubutton-Widget_0027s-Arguments" accesskey="5">A Menubutton Widget&rsquo;s Arguments</a></li>
+<li><a href="#g_t_0022Default-Bindings_0022-2" accesskey="6">&quot;Default Bindings&quot;</a></li>
+<li><a href="#Keywords-7" accesskey="7">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-7">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-7"> &para;</a></span></h4>
+<p><b class="b">menubutton</b><i class="i"> </i><i class="i">pathName </i><span class="r">?</span><i class="i">options</i>?
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Standard-Options-7">
+<h4 class="unnumberedsubsec"><span>Standard Options<a class="copiable-link" href="#Standard-Options-7"> &para;</a></span></h4>
+
+
+<div class="example">
+<pre class="example-preformatted">activeBackground  bitmap              font        relief        
+activeForeground  borderWidth         foreground  text          
+anchor            cursor              padX        textVariable  
+background        disabledForeground  padY        underline     
+</pre></div>
+
+
+<p>See <a class="xref" href="options.html">options</a>, for more information.
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Arguments-for-Menubutton">
+<h4 class="unnumberedsubsec"><span>Arguments for Menubutton<a class="copiable-link" href="#Arguments-for-Menubutton"> &para;</a></span></h4>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:height</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">height</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Height</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a desired height for the menu button.
+If a bitmap is being displayed in the menu button then the value is in
+screen units (i.e. any of the forms acceptable to <b class="b">Tk_GetPixels</b>);
+for text it is in lines of text.
+If this option isn&rsquo;t specified, the menu button&rsquo;s desired height is computed
+from the size of the bitmap or text being displayed in it.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:menu</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">menu</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">MenuName</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the path name of the menu associated with this menubutton.
+The menu must be a descendant of the menubutton in order for normal pull-down
+operation to work via the mouse.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:state</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">state</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">State</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies one of three states for the menu button:  <b class="b">normal</b><span class="r">, </span><b class="b">active</b>,
+or <b class="b">disabled</b>.  In normal state the menu button is displayed using the
+<b class="b">foreground</b><span class="r"> and </span><b class="b">background</b> options.  The active state is
+typically used when the pointer is over the menu button.  In active state
+the menu button is displayed using the <b class="b">activeForeground</b> and
+<b class="b">activeBackground</b> options.  Disabled state means that the menu button
+is insensitive:  it doesn&rsquo;t activate and doesn&rsquo;t respond to mouse
+button presses.  In this state the <b class="b">disabledForeground</b> and
+<b class="b">background</b> options determine how the button is displayed.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:width</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">width</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Width</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a desired width for the menu button.
+If a bitmap is being displayed in the menu button then the value is in
+screen units (i.e. any of the forms acceptable to <b class="b">Tk_GetPixels</b>);
+for text it is in characters.
+If this option isn&rsquo;t specified, the menu button&rsquo;s desired width is computed
+from the size of the bitmap or text being displayed in it.
+</p></dd>
+</dl>
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Introduction-4">
+<h4 class="unnumberedsubsec"><span>Introduction<a class="copiable-link" href="#Introduction-4"> &para;</a></span></h4>
+
+<p>The <b class="b">menubutton</b> command creates a new window (given by the
+<i class="i">pathName</i> argument) and makes it into a menubutton widget.
+Additional
+options, described above, may be specified on the command line
+or in the option database
+to configure aspects of the menubutton such as its colors, font,
+text, and initial relief.  The <b class="b">menubutton</b> command returns its
+<i class="i">pathName</i> argument.  At the time this command is invoked,
+there must not exist a window named <i class="i">pathName</i>, but
+<i class="i">pathName</i>&rsquo;s parent must exist.
+</p>
+<p>A menubutton is a widget that displays a
+textual string or bitmap
+and is associated with a menu widget.  In normal usage, pressing
+mouse button 1 over the menubutton causes the associated menu to
+be posted just underneath the menubutton.  If the mouse is moved over
+the menu before releasing the mouse button, the button release
+causes the underlying menu entry to be invoked.  When the button
+is released, the menu is unposted.
+</p>
+<p>Menubuttons are typically organized into groups called menu bars
+that allow scanning:
+if the mouse button is pressed over one menubutton (causing it
+to post its menu) and the mouse is moved over another menubutton
+in the same menu bar without releasing the mouse button, then the
+menu of the first menubutton is unposted and the menu of the
+new menubutton is posted instead.
+The <b class="b">tk-menu-bar</b> procedure is used to set up menu bars for
+scanning; see that procedure for more details.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="A-Menubutton-Widget_0027s-Arguments">
+<h4 class="unnumberedsubsec"><span>A Menubutton Widget&rsquo;s Arguments<a class="copiable-link" href="#A-Menubutton-Widget_0027s-Arguments"> &para;</a></span></h4>
+
+<p>The <b class="b">menubutton</b> command creates a new Tcl command whose
+name is <i class="i">pathName</i>.  This
+command may be used to invoke various
+operations on the widget.  It has the following general form:
+</p>
+<div class="example">
+<pre class="example-preformatted"><i class="i">pathName option </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</pre></div>
+
+<p><i class="i">Option</i><span class="r"> and the </span><i class="i">arg</i>s
+determine the exact behavior of the command.  The following
+commands are possible for menubutton widgets:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:activate</b></dt>
+<dd><p>Change the menu button&rsquo;s state to <b class="b">active</b> and redisplay the menu
+button using its active foreground and background colors instead of normal
+colors.
+The command returns an empty string.
+This command is ignored if the menu button&rsquo;s state is <b class="b">disabled</b>.
+This command is obsolete and will eventually be removed;
+use &ldquo;<i class="i">pathName </i><b class="b">:configure :state active</b>&rdquo; instead.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:configure</b><span class="r"> ?</span><i class="i">option</i><span class="r">? ?</span><i class="i">value option value ...</i>?</dt>
+<dd><p>Query or modify the configuration options of the widget.
+If no <i class="i">option</i> is specified, returns a list describing all of
+the available options for <i class="i">pathName</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).  If <i class="i">option</i> is specified
+with no <i class="i">value</i>, then the command returns a list describing the
+one named option (this list will be identical to the corresponding
+sublist of the value returned if no <i class="i">option</i> is specified).  If
+one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given widget option(s) to have the given value(s);  in
+this case the command returns an empty string.
+<i class="i">Option</i><span class="r"> may have any of the values accepted by the </span><b class="b">menubutton</b>
+command.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:deactivate</b></dt>
+<dd><p>Change the menu button&rsquo;s state to <b class="b">normal</b> and redisplay the menu
+button using its normal foreground and background colors.
+The command returns an empty string.
+This command is ignored if the menu button&rsquo;s state is <b class="b">disabled</b>.
+This command is obsolete and will eventually be removed;
+use &ldquo;<i class="i">pathName </i><b class="b">:configure :state normal</b>&rdquo; instead.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022Default-Bindings_0022-2">
+<h4 class="unnumberedsubsec"><span>&quot;Default Bindings&quot;<a class="copiable-link" href="#g_t_0022Default-Bindings_0022-2"> &para;</a></span></h4>
+
+
+<p>Tk automatically creates class bindings for menu buttons that give them
+the following default behavior:
+</p><ul class="itemize">
+<li>[1]
+A menu button activates whenever the mouse passes over it and deactivates
+whenever the mouse leaves it.
+</li><li>[2]
+A menu button&rsquo;s relief is changed to raised whenever mouse button 1 is
+pressed over it, and the relief is restored to its original value
+when button 1 is later released or the mouse is dragged into another
+menu button in the same menu bar.
+</li><li>[3]
+When mouse button 1 is pressed over a menu button, or when the mouse
+is dragged into a menu button with mouse button 1 pressed, the associated
+menu is posted;  the mouse can be dragged across the menu and released
+over an entry in the menu to invoke that entry.  The menu is unposted
+when button 1 is released outside either the menu or the menu button.
+The menu is also unposted when the mouse is dragged into another
+menu button in the same menu bar.
+</li><li>[4]
+If mouse button 1 is pressed and released within the menu button,
+then the menu stays posted and keyboard traversal is possible as
+described in the manual entry for <b class="b">tk-menu-bar</b>.
+</li><li>[5]
+Menubuttons may also be posted by typing characters on the keyboard.
+See the manual entry for <b class="b">tk-menu-bar</b> for full details on keyboard
+menu traversal.
+</li><li>[6]
+If mouse button 2 is pressed over a menu button then the associated
+menu is posted and also <i class="i">torn off</i>:  it can then be dragged around on
+the screen with button 2 and the menu will not automatically unpost when
+entries in it are invoked.
+To close a torn off menu, click mouse button 1 over the associated
+menu button.
+</li></ul>
+
+<p>If the menu button&rsquo;s state is <b class="b">disabled</b> then none of the above
+actions occur:  the menu button is completely non-responsive.
+</p>
+<p>The behavior of menu buttons can be changed by defining new bindings for
+individual widgets or by redefining the class bindings.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-7">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-7"> &para;</a></span></h4>
+<p>menubutton, widget
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="text.html">text</a>, Previous: <a href="checkbutton.html">checkbutton</a>, Up: <a href="Widgets.html">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/message.html
@@ -0,0 +1,238 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>message (GCL TK Manual)</title>
+
+<meta name="description" content="message (GCL TK Manual)">
+<meta name="keywords" content="message (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Widgets.html" rel="up" title="Widgets">
+<link href="frame.html" rel="next" title="frame">
+<link href="entry.html" rel="prev" title="entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="message">
+<div class="nav-panel">
+<p>
+Next: <a href="frame.html" accesskey="n" rel="next">frame</a>, Previous: <a href="entry.html" accesskey="p" rel="prev">entry</a>, Up: <a href="Widgets.html" accesskey="u" rel="up">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="message-1"><span>2.11 message<a class="copiable-link" href="#message-1"> &para;</a></span></h3>
+
+<p>message \- Create and manipulate message widgets
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-10" accesskey="1">Synopsis</a></li>
+<li><a href="#Standard-Options-10" accesskey="2">Standard Options</a></li>
+<li><a href="#Arguments-for-Message" accesskey="3">Arguments for Message</a></li>
+<li><a href="#Description-7" accesskey="4">Description</a></li>
+<li><a href="#A-Message-Widget_0027s-Arguments" accesskey="5">A Message Widget&rsquo;s Arguments</a></li>
+<li><a href="#g_t_0022Default-Bindings_0022-4" accesskey="6">&quot;Default Bindings&quot;</a></li>
+<li><a href="#Bugs-1" accesskey="7">Bugs</a></li>
+<li><a href="#Keywords-10" accesskey="8">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-10">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-10"> &para;</a></span></h4>
+<p><b class="b">message</b><i class="i"> </i><i class="i">pathName </i><span class="r">?</span><i class="i">options</i>?
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Standard-Options-10">
+<h4 class="unnumberedsubsec"><span>Standard Options<a class="copiable-link" href="#Standard-Options-10"> &para;</a></span></h4>
+
+
+<div class="example">
+<pre class="example-preformatted">anchor            cursor          padX        text              
+background        font            padY        textVariable      
+borderWidth       foreground      relief      width             
+</pre></div>
+
+
+<p>See <a class="xref" href="options.html">options</a>, for more information.
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Arguments-for-Message">
+<h4 class="unnumberedsubsec"><span>Arguments for Message<a class="copiable-link" href="#Arguments-for-Message"> &para;</a></span></h4>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:aspect</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">aspect</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Aspect</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a non-negative integer value indicating desired
+aspect ratio for the text.  The aspect ratio is specified as
+100*width/height.  100 means the text should
+be as wide as it is tall, 200 means the text should
+be twice as wide as it is tall, 50 means the text should
+be twice as tall as it is wide, and so on.
+Used to choose line length for text if <b class="b">width</b> option
+isn&rsquo;t specified.
+Defaults to 150.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:justify</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">justify</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Justify</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies how to justify lines of text.
+Must be one of <b class="b">left</b><span class="r">, </span><b class="b">center</b><span class="r">, or </span><b class="b">right</b>.  Defaults
+to <b class="b">left</b>.
+This option works together with the <b class="b">anchor</b><span class="r">, </span><b class="b">aspect</b>,
+<b class="b">padX</b><span class="r">, </span><b class="b">padY</b><span class="r">, and </span><b class="b">width</b> options to provide a variety
+of arrangements of the text within the window.
+The <b class="b">aspect</b><span class="r"> and </span><b class="b">width</b> options determine the amount of
+screen space needed to display the text.
+The <b class="b">anchor</b><span class="r">, </span><b class="b">padX</b><span class="r">, and </span><b class="b">padY</b> options determine where this
+rectangular area is displayed within the widget&rsquo;s window, and the
+<b class="b">justify</b> option determines how each line is displayed within that
+rectangular region.
+For example, suppose <b class="b">anchor</b><span class="r"> is </span><b class="b">e</b><span class="r"> and </span><b class="b">justify</b> is
+<b class="b">left</b>, and that the message window is much larger than needed
+for the text.
+The the text will displayed so that the left edges of all the lines
+line up and the right edge of the longest line is <b class="b">padX</b> from
+the right side of the window;  the entire text block will be centered
+in the vertical span of the window.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:width</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">width</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Width</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the length of lines in the window.
+The value may have any of the forms acceptable to <b class="b">Tk_GetPixels</b>.
+If this option has a value greater than zero then the <b class="b">aspect</b>
+option is ignored and the <b class="b">width</b> option determines the line
+length.
+If this option has a value less than or equal to zero, then
+the <b class="b">aspect</b> option determines the line length.
+</p></dd>
+</dl>
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-7">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-7"> &para;</a></span></h4>
+
+<p>The <b class="b">message</b> command creates a new window (given by the
+<i class="i">pathName</i> argument) and makes it into a message widget.
+Additional
+options, described above, may be specified on the command line
+or in the option database
+to configure aspects of the message such as its colors, font,
+text, and initial relief.  The <b class="b">message</b> command returns its
+<i class="i">pathName</i> argument.  At the time this command is invoked,
+there must not exist a window named <i class="i">pathName</i>, but
+<i class="i">pathName</i>&rsquo;s parent must exist.
+</p>
+<p>A message is a widget that displays a textual string.  A message
+widget has three special features.  First, it breaks up
+its string into lines in order to produce a given aspect ratio
+for the window.  The line breaks are chosen at word boundaries
+wherever possible (if not even a single word would fit on a
+line, then the word will be split across lines).  Newline characters
+in the string will force line breaks;  they can be used, for example,
+to leave blank lines in the display.
+</p>
+<p>The second feature of a message widget is justification.  The text
+may be displayed left-justified (each line starts at the left side of
+the window), centered on a line-by-line basis, or right-justified
+(each line ends at the right side of the window).
+</p>
+<p>The third feature of a message widget is that it handles control
+characters and non-printing characters specially.  Tab characters
+are replaced with enough blank space to line up on the next
+8-character boundary.  Newlines cause line breaks.  Other control
+characters (ASCII code less than 0x20) and characters not defined
+in the font are displayed as a four-character sequence \fB\ex<i class="i">hh</i> where
+<i class="i">hh</i> is the two-digit hexadecimal number corresponding to
+the character.  In the unusual case where the font doesn&rsquo;t contain
+all of the characters in &ldquo;0123456789abcdef\ex&rdquo; then control
+characters and undefined characters are not displayed at all.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="A-Message-Widget_0027s-Arguments">
+<h4 class="unnumberedsubsec"><span>A Message Widget&rsquo;s Arguments<a class="copiable-link" href="#A-Message-Widget_0027s-Arguments"> &para;</a></span></h4>
+
+<p>The <b class="b">message</b> command creates a new Tcl command whose
+name is <i class="i">pathName</i>.  This
+command may be used to invoke various
+operations on the widget.  It has the following general form:
+</p>
+<div class="example">
+<pre class="example-preformatted"><i class="i">pathName option </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</pre></div>
+
+<p><i class="i">Option</i><span class="r"> and the </span><i class="i">arg</i>s
+determine the exact behavior of the command.  The following
+commands are possible for message widgets:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:configure</b><span class="r"> ?</span><i class="i">option</i><span class="r">? ?</span><i class="i">value option value ...</i>?</dt>
+<dd><p>Query or modify the configuration options of the widget.
+If no <i class="i">option</i> is specified, returns a list describing all of
+the available options for <i class="i">pathName</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).  If <i class="i">option</i> is specified
+with no <i class="i">value</i>, then the command returns a list describing the
+one named option (this list will be identical to the corresponding
+sublist of the value returned if no <i class="i">option</i> is specified).  If
+one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given widget option(s) to have the given value(s);  in
+this case the command returns an empty string.
+<i class="i">Option</i><span class="r"> may have any of the values accepted by the </span><b class="b">message</b>
+command.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022Default-Bindings_0022-4">
+<h4 class="unnumberedsubsec"><span>&quot;Default Bindings&quot;<a class="copiable-link" href="#g_t_0022Default-Bindings_0022-4"> &para;</a></span></h4>
+
+<p>When a new message is created, it has no default event bindings:
+messages are intended for output purposes only.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Bugs-1">
+<h4 class="unnumberedsubsec"><span>Bugs<a class="copiable-link" href="#Bugs-1"> &para;</a></span></h4>
+
+<p>Tabs don&rsquo;t work very well with text that is centered or right-justified.
+The most common result is that the line is justified wrong.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-10">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-10"> &para;</a></span></h4>
+<p>message, widget
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="frame.html">frame</a>, Previous: <a href="entry.html">entry</a>, Up: <a href="Widgets.html">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/option.html
@@ -0,0 +1,141 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>option (GCL TK Manual)</title>
+
+<meta name="description" content="option (GCL TK Manual)">
+<meta name="keywords" content="option (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="options.html" rel="next" title="options">
+<link href="tk_002dmenu_002dbar.html" rel="prev" title="tk-menu-bar">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="option">
+<div class="nav-panel">
+<p>
+Next: <a href="options.html" accesskey="n" rel="next">options</a>, Previous: <a href="tk_002dmenu_002dbar.html" accesskey="p" rel="prev">tk-menu-bar</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="option-1"><span>3.11 option<a class="copiable-link" href="#option-1"> &para;</a></span></h3>
+
+<p>option \- Add/retrieve window options to/from the option database
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-25" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-22" accesskey="2">Description</a></li>
+<li><a href="#Keywords-25" accesskey="3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-25">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-25"> &para;</a></span></h4>
+<p><b class="b">option :add </b><i class="i">pattern value </i><span class="r">?</span><i class="i">priority</i>?
+</p><br>
+<p><b class="b">option :clear</b>
+</p><br>
+<p><b class="b">option :get </b><i class="i">window name class</i>
+</p><br>
+<p><b class="b">option :readfile </b><i class="i">fileName </i><span class="r">?</span><i class="i">priority</i>?
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-22">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-22"> &para;</a></span></h4>
+
+<p>The <b class="b">option</b> command allows you to add entries to the Tk option
+database or to retrieve options from the database.  The <b class="b">add</b>
+form of the command adds a new option to the database.
+<i class="i">Pattern</i> contains
+the option being specified, and consists of names and/or classes
+separated by asterisks or dots, in the usual X format.  <i class="i">Value</i>
+contains a text string to associate with <i class="i">pattern</i>;  this is the
+value that will be returned in calls to <b class="b">Tk_GetOption</b> or by
+invocations of the <b class="b">option :get</b><span class="r"> command.  If </span><i class="i">priority</i>
+is specified, it indicates the priority level for this option (see
+below for legal values);  it defaults to <b class="b">interactive</b>.
+This command always returns an empty string.
+</p>
+<p>The <b class="b">option :clear</b> command clears the option database.  Default
+options (in the
+<b class="b">RESOURCE_MANAGER</b><span class="r"> property or the </span><b class="b">.Xdefaults</b>
+file) will be reloaded automatically the next time an
+option is added to the database or removed from it.  This command
+always returns an empty string.
+</p>
+<p>The <b class="b">option :get</b> command returns the value of the option
+specified for <i class="i">window</i>
+under <i class="i">name</i><span class="r"> and </span><i class="i">class</i>.  If several entries in the option
+database match <i class="i">window</i><span class="r">, </span><i class="i">name</i><span class="r">, and </span><i class="i">class</i>, then
+the command returns whichever was created with highest
+<i class="i">priority</i> level.  If there are several matching
+entries at the same priority level, then it returns whichever entry
+was most recently entered into the option database.  If there are
+no matching entries, then the empty string is returned.
+</p>
+<p>The <b class="b">readfile</b><span class="r"> form of the command reads </span><i class="i">fileName</i>,
+which should have the standard format for an
+X resource database such as <b class="b">.Xdefaults</b>, and adds all the
+options specified in that file to the option database.  If <i class="i">priority</i>
+is specified, it indicates the priority level at which to enter the
+options;  <i class="i">priority</i><span class="r"> defaults to </span><b class="b">interactive</b>.
+</p>
+<p>The <i class="i">priority</i><span class="r"> arguments to the </span><b class="b">option</b> command are
+normally specified symbolically using one of the following values:
+</p>
+<dl class="table">
+<dt><b class="b">widgetDefault</b></dt>
+<dd><p>Level 20.  Used for default values hard-coded into widgets.
+</p></dd>
+<dt><b class="b">startupFile</b></dt>
+<dd><p>Level 40.  Used for options specified in application-specific
+startup files.
+</p></dd>
+<dt><b class="b">userDefault</b></dt>
+<dd><p>Level 60.  Used for options specified in user-specific defaults
+files, such as <b class="b">.Xdefaults</b>, resource databases loaded into
+the X server, or user-specific startup files.
+</p></dd>
+<dt><b class="b">interactive</b></dt>
+<dd><p>Level 80.  Used for options specified interactively after the application
+starts running.  If <i class="i">priority</i> isn&rsquo;t specified, it defaults to
+this level.
+</p></dd>
+</dl>
+
+
+<p>Any of the above keywords may be abbreviated.  In addition, priorities
+may be specified numerically using integers between 0 and 100,
+inclusive.  The numeric form is probably a bad idea except for new priority
+levels other than the ones given above.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-25">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-25"> &para;</a></span></h4>
+<p>database, option, priority, retrieve
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="options.html">options</a>, Previous: <a href="tk_002dmenu_002dbar.html">tk-menu-bar</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/options.html
@@ -0,0 +1,656 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>options (GCL TK Manual)</title>
+
+<meta name="description" content="options (GCL TK Manual)">
+<meta name="keywords" content="options (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="pack_002dold.html" rel="next" title="pack-old">
+<link href="option.html" rel="prev" title="option">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="options">
+<div class="nav-panel">
+<p>
+Next: <a href="pack_002dold.html" accesskey="n" rel="next">pack-old</a>, Previous: <a href="option.html" accesskey="p" rel="prev">option</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="options-1"><span>3.12 options<a class="copiable-link" href="#options-1"> &para;</a></span></h3>
+
+<p>options \- Standard options supported by widgets
+</p>
+<ul class="mini-toc">
+<li><a href="#Description-23" accesskey="1">Description</a></li>
+<li><a href="#Keywords-26" accesskey="2">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Description-23">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-23"> &para;</a></span></h4>
+<p>This manual entry describes the common configuration options supported
+by widgets in the Tk toolkit.  Every widget does not necessarily support
+every option (see the manual entries for individual widgets for a list
+of the standard options supported by that widget), but if a widget does
+support an option with one of the names listed below, then the option
+has exactly the effect described below.
+</p>
+<p>In the descriptions below,
+&ldquo;Name&rdquo; refers to the option&rsquo;s name in the option database (e.g.
+in .Xdefaults files).  &ldquo;Class&rdquo; refers to the option&rsquo;s class value
+in the option database.  &ldquo;Command-Line Switch&rdquo; refers to the
+switch used in widget-creation and <b class="b">configure</b> widget commands to
+set this value.  For example, if an option&rsquo;s command-line switch is
+<b class="b">:foreground</b><span class="r"> and there exists a widget </span><b class="b">.a.b.c</b>, then the
+command
+</p>
+<div class="example">
+<pre class="example-preformatted">
+
+(.a.b.c  :configure  :foreground &quot;black&quot;)<!-- /@w -->
+</pre></div>
+
+<p>may be used to specify the value <b class="b">black</b> for the option in the
+the widget <b class="b">.a.b.c</b>.  Command-line switches may be abbreviated,
+as long as the abbreviation is unambiguous.
+</p>
+
+<dl class="table">
+<dt><code class="code"><b class="b">:activebackground</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">activeBackground</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Foreground</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies background color to use when drawing active elements.
+An element (a widget or portion of a widget) is active if the
+mouse cursor is positioned over the element and pressing a mouse button
+will cause some action to occur.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:activeborderwidth</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">activeBorderWidth</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">BorderWidth</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a non-negative value indicating
+the width of the 3-D border drawn around active elements.  See above for
+definition of active elements.
+The value may have any of the forms acceptable to <b class="b">Tk_GetPixels</b>.
+This option is typically only available in widgets displaying more
+than one element at a time (e.g. menus but not buttons).
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:activeforeground</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">activeForeground</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Background</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies foreground color to use when drawing active elements.
+See above for definition of active elements.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:anchor</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">anchor</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Anchor</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies how the information in a widget (e.g. text or a bitmap)
+is to be displayed in the widget.
+Must be one of the values <b class="b">n</b><span class="r">, </span><b class="b">ne</b><span class="r">, </span><b class="b">e</b><span class="r">, </span><b class="b">se</b>,
+<b class="b">s</b><span class="r">, </span><b class="b">sw</b><span class="r">, </span><b class="b">w</b><span class="r">, </span><b class="b">nw</b><span class="r">, or </span><b class="b">center</b>.
+For example, <b class="b">nw</b> means display the information such that its
+top-left corner is at the top-left corner of the widget.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:background or :bg</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">background</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Background</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the normal background color to use when displaying the
+widget.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:bitmap</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">bitmap</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Bitmap</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a bitmap to display in the widget, in any of the forms
+acceptable to <b class="b">Tk_GetBitmap</b>.
+The exact way in which the bitmap is displayed may be affected by
+other options such as <b class="b">anchor</b><span class="r"> or </span><b class="b">justify</b>.
+Typically, if this option is specified then it overrides other
+options that specify a textual value to display in the widget;
+the <b class="b">bitmap</b> option may be reset to an empty string to re-enable
+a text display.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:borderwidth or :bd</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">borderWidth</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">BorderWidth</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a non-negative value indicating the width
+of the 3-D border to draw around the outside of the widget (if such a
+border is being drawn;  the <b class="b">relief</b> option typically determines
+this).  The value may also be used when drawing 3-D effects in the
+interior of the widget.
+The value may have any of the forms acceptable to <b class="b">Tk_GetPixels</b>.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:cursor</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">cursor</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Cursor</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the mouse cursor to be used for the widget.
+The value may have any of the forms acceptable to <b class="b">Tk_GetCursor</b>.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:cursorbackground</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">cursorBackground</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Foreground</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the color to use as background in the area covered by the
+insertion cursor.  This color will normally override either the normal
+background for the widget (or the selection background if the insertion
+cursor happens to fall in the selection).
+\fIThis option is obsolete and is gradually being replaced by
+the <b class="b">insertBackground</b><span class="r"> option.</span>
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:cursorborderwidth</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">cursorBorderWidth</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">BorderWidth</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a non-negative value indicating the width
+of the 3-D border to draw around the insertion cursor.
+The value may have any of the forms acceptable to <b class="b">Tk_GetPixels</b>.
+\fIThis option is obsolete and is gradually being replaced by
+the <b class="b">insertBorderWidth</b><span class="r"> option.</span>
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:cursorofftime</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">cursorOffTime</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">OffTime</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a non-negative integer value indicating the number of
+milliseconds the cursor should remain &ldquo;off&rdquo; in each blink cycle.
+If this option is zero then the cursor doesn&rsquo;t blink:  it is on
+all the time.
+\fIThis option is obsolete and is gradually being replaced by
+the <b class="b">insertOffTime</b><span class="r"> option.</span>
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:cursorontime</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">cursorOnTime</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">OnTime</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a non-negative integer value indicating the number of
+milliseconds the cursor should remain &ldquo;on&rdquo; in each blink cycle.
+\fIThis option is obsolete and is gradually being replaced by
+the <b class="b">insertOnTime</b><span class="r"> option.</span>
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:cursorwidth</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">cursorWidth</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">CursorWidth</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a  value indicating the total width of the insertion cursor.
+The value may have any of the forms acceptable to <b class="b">Tk_GetPixels</b>.
+If a border has been specified for
+the cursor (using the <b class="b">cursorBorderWidth</b> option), the border
+will be drawn inside the width specified by the <b class="b">cursorWidth</b>
+option.
+\fIThis option is obsolete and is gradually being replaced by
+the <b class="b">insertWidth</b><span class="r"> option.</span>
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:disabledforeground</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">disabledForeground</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">DisabledForeground</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies foreground color to use when drawing a disabled element.
+If the option is specified as an empty string (which is typically the
+case on monochrome displays), disabled elements are drawn with the
+normal fooreground color but they are dimmed by drawing them
+with a stippled fill pattern.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:exportselection</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">exportSelection</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">ExportSelection</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies whether or not a selection in the widget should also be
+the X selection.
+The value may have any of the forms accepted by <b class="b">Tcl_GetBoolean</b>,
+such as <b class="b">true</b><span class="r">, </span><b class="b">false</b><span class="r">, </span><b class="b">0</b><span class="r">, </span><b class="b">1</b><span class="r">, </span><b class="b">yes</b><span class="r">, or </span><b class="b">no</b>.
+If the selection is exported, then selecting in the widget deselects
+the current X selection, selecting outside the widget deselects any
+widget selection, and the widget will respond to selection retrieval
+requests when it has a selection.  The default is usually for widgets
+to export selections.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:font</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">font</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Font</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the font to use when drawing text inside the widget.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:foreground or :fg</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">foreground</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Foreground</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the normal foreground color to use when displaying the widget.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:geometry</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">geometry</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Geometry</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the desired geometry for the widget&rsquo;s window, in the
+form <i class="i">width</i><b class="b">x</b><i class="i">height</i><span class="r">, where </span><i class="i">width</i> is the desired
+width of the window and <i class="i">height</i> is the desired height.  The
+units for <i class="i">width</i><span class="r"> and </span><i class="i">height</i> depend on the particular
+widget.  For widgets displaying text the units are usually the
+size of the characters in the font being displayed;  for other
+widgets the units are usually pixels.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:insertbackground</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">insertBackground</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Foreground</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the color to use as background in the area covered by the
+insertion cursor.  This color will normally override either the normal
+background for the widget (or the selection background if the insertion
+cursor happens to fall in the selection).
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:insertborderwidth</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">insertBorderWidth</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">BorderWidth</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a non-negative value indicating the width
+of the 3-D border to draw around the insertion cursor.
+The value may have any of the forms acceptable to <b class="b">Tk_GetPixels</b>.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:insertofftime</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">insertOffTime</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">OffTime</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a non-negative integer value indicating the number of
+milliseconds the insertion cursor should remain &ldquo;off&rdquo; in each blink cycle.
+If this option is zero then the cursor doesn&rsquo;t blink:  it is on
+all the time.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:insertontime</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">insertOnTime</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">OnTime</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a non-negative integer value indicating the number of
+milliseconds the insertion cursor should remain &ldquo;on&rdquo; in each blink cycle.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:insertwidth</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">insertWidth</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">InsertWidth</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a  value indicating the total width of the insertion cursor.
+The value may have any of the forms acceptable to <b class="b">Tk_GetPixels</b>.
+If a border has been specified for the insertion
+cursor (using the <b class="b">insertBorderWidth</b> option), the border
+will be drawn inside the width specified by the <b class="b">insertWidth</b>
+option.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:orient</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">orient</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Orient</b>&quot;</code>
+</p></div><br>
+
+<p>For widgets that can lay themselves out with either a horizontal
+or vertical orientation, such as scrollbars, this option specifies
+which orientation should be used.  Must be either <b class="b">horizontal</b>
+or <b class="b">vertical</b> or an abbreviation of one of these.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:padx</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">padX</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Pad</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a non-negative value indicating how much extra space
+to request for the widget in the X-direction.
+The value may have any of the forms acceptable to <b class="b">Tk_GetPixels</b>.
+When computing how large a window it needs, the widget will
+add this amount to the width it would normally need (as determined
+by the width of the things displayed in the widget);  if the geometry
+manager can satisfy this request, the widget will end up with extra
+internal space to the left and/or right of what it displays inside.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:pady</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">padY</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Pad</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a non-negative value indicating how much extra space
+to request for the widget in the Y-direction.
+The value may have any of the forms acceptable to <b class="b">Tk_GetPixels</b>.
+When computing how large a window it needs, the widget will add
+this amount to the height it would normally need (as determined by
+the height of the things displayed in the widget);  if the geometry
+manager can satisfy this request, the widget will end up with extra
+internal space above and/or below what it displays inside.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:relief</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">relief</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Relief</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the 3-D effect desired for the widget.  Acceptable
+values are <b class="b">raised</b><span class="r">, </span><b class="b">sunken</b><span class="r">, </span><b class="b">flat</b><span class="r">, </span><b class="b">ridge</b>,
+and <b class="b">groove</b>.
+The value
+indicates how the interior of the widget should appear relative
+to its exterior;  for example, <b class="b">raised</b> means the interior of
+the widget should appear to protrude from the screen, relative to
+the exterior of the widget.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:repeatdelay</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">repeatDelay</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">RepeatDelay</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the number of milliseconds a button or key must be held
+down before it begins to auto-repeat.  Used, for example, on the
+up- and down-arrows in scrollbars.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:repeatinterval</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">repeatInterval</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">RepeatInterval</b>&quot;</code>
+</p></div><br>
+
+<p>Used in conjunction with <b class="b">repeatDelay</b>:  once auto-repeat
+begins, this option determines the number of milliseconds between
+auto-repeats.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:scrollcommand</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">scrollCommand</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">ScrollCommand</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the prefix for a command used to communicate with scrollbar
+widgets.  When the view in the widget&rsquo;s window changes (or
+whenever anything else occurs that could change the display in a
+scrollbar, such as a change in the total size of the widget&rsquo;s
+contents), the widget will
+generate a Tcl command by concatenating the scroll command and four
+numbers.  The four numbers are, in order:  the total size of the
+widget&rsquo;s contents, in unspecified units
+(&ldquo;unit&rdquo; is a widget-specific term;  for widgets
+displaying text, the unit is a line);  the maximum number of units that
+may be displayed at once in the widget&rsquo;s window, given its current size;  the
+index of the top-most or left-most unit currently visible in the window
+(index 0 corresponds to the first unit); and the index of the bottom-most
+or right-most unit currently visible in the window.  This command is
+then passed to the Tcl interpreter for execution.  Typically the
+<b class="b">scrollCommand</b> option consists of the path name of a scrollbar
+widget followed by &ldquo;set&rdquo;, e.g. &ldquo;.x.scrollbar set&rdquo;:  this will cause
+the scrollbar to be updated whenever the view in the window changes.
+If this option is not specified, then no command will be executed.
+</p>
+<p>The <b class="b">scrollCommand</b> option is used for widgets that support scrolling
+in only one direction.
+For widgets that support scrolling in both directions, this
+option is replaced with the <b class="b">xScrollCommand</b><span class="r"> and </span><b class="b">yScrollCommand</b>
+options.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:selectbackground</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">selectBackground</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Foreground</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the background color to use when displaying selected
+items.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:selectborderwidth</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">selectBorderWidth</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">BorderWidth</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a non-negative value indicating the width
+of the 3-D border to draw around selected items.
+The value may have any of the forms acceptable to <b class="b">Tk_GetPixels</b>.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:selectforeground</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">selectForeground</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Background</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the foreground color to use when displaying selected
+items.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:setgrid</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">setGrid</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">SetGrid</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a boolean value that determines whether this widget controls the
+resizing grid for its top-level window.
+This option is typically used in text widgets, where the information
+in the widget has a natural size (the size of a character) and it makes
+sense for the window&rsquo;s dimensions to be integral numbers of these units.
+These natural window sizes form a grid.
+If the <b class="b">setGrid</b> option is set to true then the widget will
+communicate with the window manager so that when the user interactively
+resizes the top-level window that contains the widget, the dimensions of
+the window will be displayed to the user in grid units and the window
+size will be constrained to integral numbers of grid units.
+See the section GRIDDED GEOMETRY MANAGEMENT in the <b class="b">wm</b> manual
+entry for more details.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:text</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">text</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Text</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a string to be displayed inside the widget.  The way in which
+the string is displayed depends on the particular widget and may be
+determined by other options, such as <b class="b">anchor</b><span class="r"> or </span><b class="b">justify</b>.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:textvariable</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">textVariable</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Variable</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the name of a variable.  The value of the variable is a text
+string to be displayed inside the widget;  if the variable value changes
+then the widget will automatically update itself to reflect the new value.
+The way in which the string is displayed in the widget depends on the
+particular widget and may be determined by other options, such as
+<b class="b">anchor</b><span class="r"> or </span><b class="b">justify</b>.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:underline</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">underline</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Underline</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the integer index of a character to underline in the widget.
+This option is typically used to indicate keyboard traversal characters
+in menu buttons and menu entries.  0 corresponds to the first character
+of the text displayed in the widget, 1 to the next character, and so
+on.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:xscrollcommand</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">xScrollCommand</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">ScrollCommand</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the prefix for a command used to communicate with horizontal
+scrollbars.  This option is treated in the same way as the
+<b class="b">scrollCommand</b> option, except that it is used for horizontal
+scrollbars associated with widgets that support both horizontal
+and vertical scrolling.
+See the description of <b class="b">scrollCommand</b> for complete details
+on how this option is used.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:yscrollcommand</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">yScrollCommand</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">ScrollCommand</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the prefix for a command used to communicate with vertical
+scrollbars.  This option is treated in the same way as the
+<b class="b">scrollCommand</b> option, except that it is used for vertical
+scrollbars associated with widgets that support both horizontal
+and vertical scrolling.
+See the description of <b class="b">scrollCommand</b> for complete details
+on how this option is used.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-26">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-26"> &para;</a></span></h4>
+<p>class, name, standard option, switch
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="pack_002dold.html">pack-old</a>, Previous: <a href="option.html">option</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/pack.html
@@ -0,0 +1,337 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pack (GCL TK Manual)</title>
+
+<meta name="description" content="pack (GCL TK Manual)">
+<meta name="keywords" content="pack (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="place.html" rel="next" title="place">
+<link href="pack_002dold.html" rel="prev" title="pack-old">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="pack">
+<div class="nav-panel">
+<p>
+Next: <a href="place.html" accesskey="n" rel="next">place</a>, Previous: <a href="pack_002dold.html" accesskey="p" rel="prev">pack-old</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="pack-1"><span>3.14 pack<a class="copiable-link" href="#pack-1"> &para;</a></span></h3>
+
+<p>pack \- Geometry manager that packs around edges of cavity
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-27" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-25" accesskey="2">Description</a></li>
+<li><a href="#g_t_0022The-Packer-Algorithm_0022" accesskey="3">&quot;The Packer Algorithm&quot;</a></li>
+<li><a href="#g_t_0022Expansion_0022" accesskey="4">&quot;Expansion&quot;</a></li>
+<li><a href="#g_t_0022Geometry-Propagation_0022" accesskey="5">&quot;Geometry Propagation&quot;</a></li>
+<li><a href="#g_t_0022Restrictions-On-Master-Windows_0022" accesskey="6">&quot;Restrictions On Master Windows&quot;</a></li>
+<li><a href="#g_t_0022Packing-Order_0022" accesskey="7">&quot;Packing Order&quot;</a></li>
+<li><a href="#Keywords-28" accesskey="8">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-27">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-27"> &para;</a></span></h4>
+<p><b class="b">pack </b><i class="i">option arg </i><span class="r">?</span><i class="i">arg ...</i>?
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-25">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-25"> &para;</a></span></h4>
+
+<p>The <b class="b">pack</b> command is used to communicate with the packer,
+a geometry manager that arranges the children of a parent by
+packing them in order around the edges of the parent.
+The <b class="b">pack</b> command can have any of several forms, depending
+on the <i class="i">option</i> argument:
+</p>
+<dl class="table">
+<dt><b class="b">pack </b><i class="i">slave </i><span class="r">?</span><i class="i">slave ...</i><span class="r">? ?</span><i class="i">options</i>?</dt>
+<dd><p>If the first argument to <b class="b">pack</b> is a window name (any value
+starting with &ldquo;.&rdquo;), then the command is processed in the same
+way as <b class="b">pack configure</b>.
+</p></dd>
+<dt><b class="b">pack configure </b><i class="i">slave </i><span class="r">?</span><i class="i">slave ...</i><span class="r">? ?</span><i class="i">options</i>?</dt>
+<dd><p>The arguments consist of the names of one or more slave windows
+followed by pairs of arguments that specify how
+to manage the slaves.
+See &ldquo;THE PACKER ALGORITHM&rdquo; below for details on how the options
+are used by the packer.
+The following options are supported:
+</p></dd>
+<dt><b class="b">:after </b><i class="i">other</i></dt>
+<dd><p><i class="i">Other</i> must the name of another window.
+Use its master as the master for the slaves, and insert
+the slaves just after <i class="i">other</i> in the packing order.
+</p></dd>
+<dt><b class="b">:anchor </b><i class="i">anchor</i></dt>
+<dd><p><i class="i">Anchor</i><span class="r"> must be a valid anchor position such as </span><b class="b">n</b>
+or <b class="b">sw</b>; it specifies where to position each slave in its
+parcel.
+Defaults to <b class="b">center</b>.
+</p></dd>
+<dt><b class="b">:before </b><i class="i">other</i></dt>
+<dd><p><i class="i">Other</i> must the name of another window.
+Use its master as the master for the slaves, and insert
+the slaves just before <i class="i">other</i> in the packing order.
+</p></dd>
+<dt><b class="b">:expand </b><i class="i">boolean</i></dt>
+<dd><p>Specifies whether the slaves should be expanded to consume
+extra space in their master.
+<i class="i">Boolean</i><span class="r"> may have any proper boolean value, such as </span><b class="b">1</b>
+or <b class="b">no</b>.
+Defaults to 0.
+</p></dd>
+<dt><b class="b">:fill </b><i class="i">style</i></dt>
+<dd><p>If a slave&rsquo;s parcel is larger than its requested dimensions, this
+option may be used to stretch the slave.
+<i class="i">Style</i> must have one of the following values:
+</p><dl class="table">
+<dt><b class="b">none</b></dt>
+<dd><p>Give the slave its requested dimensions plus any internal padding
+requested with <b class="b">:ipadx</b><span class="r"> or </span><b class="b">:ipady</b>.  This is the default.
+</p></dd>
+<dt><b class="b">x</b></dt>
+<dd><p>Stretch the slave horizontally to fill the entire width of its
+parcel (except leave external padding as specified by <b class="b">:padx</b>).
+</p></dd>
+<dt><b class="b">y</b></dt>
+<dd><p>Stretch the slave vertically to fill the entire height of its
+parcel (except leave external padding as specified by <b class="b">:pady</b>).
+</p></dd>
+<dt><b class="b">both</b></dt>
+<dd><p>Stretch the slave both horizontally and vertically.
+</p></dd>
+</dl>
+</dd>
+<dt><b class="b">:in </b><i class="i">other</i></dt>
+<dd><p>Insert the slave(s) at the end of the packing order for the master
+window given by <i class="i">other</i>.
+</p></dd>
+<dt><b class="b">:ipadx </b><i class="i">amount</i></dt>
+<dd><p><i class="i">Amount</i> specifies how much horizontal internal padding to
+leave on each side of the slave(s).
+<i class="i">Amount</i><span class="r"> must be a valid screen distance, such as </span><b class="b">2</b><span class="r"> or </span><b class="b">.5c</b>.
+It defaults to 0.
+</p></dd>
+<dt><b class="b">:ipady </b><i class="i">amount</i></dt>
+<dd><p><i class="i">Amount</i> specifies how much vertical internal padding to
+leave on each side of the slave(s).
+<i class="i">Amount</i>  defaults to 0.
+</p></dd>
+<dt><b class="b">:padx </b><i class="i">amount</i></dt>
+<dd><p><i class="i">Amount</i> specifies how much horizontal external padding to
+leave on each side of the slave(s).
+<i class="i">Amount</i> defaults to 0.
+</p></dd>
+<dt><b class="b">:pady </b><i class="i">amount</i></dt>
+<dd><p><i class="i">Amount</i> specifies how much vertical external padding to
+leave on each side of the slave(s).
+<i class="i">Amount</i> defaults to 0.
+</p></dd>
+<dt><b class="b">:side </b><i class="i">side</i></dt>
+<dd><p>Specifies which side of the master the slave(s) will be packed against.
+Must be <b class="b">left</b><span class="r">, </span><b class="b">right</b><span class="r">, </span><b class="b">top</b><span class="r">, or </span><b class="b">bottom</b>.
+Defaults to <b class="b">top</b>.
+</p></dd>
+</dl>
+
+
+<p>If no <b class="b">:in</b><span class="r">, </span><b class="b">:after</b><span class="r"> or </span><b class="b">:before</b> option is specified
+then each of the slaves will be inserted at the end of the packing list
+for its parent unless it is already managed by the packer (in which
+case it will be left where it is).
+If one of these options is specified then all the slaves will be
+inserted at the specified point.
+If any of the slaves are already managed by the geometry manager
+then any unspecified options for them retain their previous values rather
+than receiving default values.
+.RE
+</p>
+<dl class="table">
+<dt><b class="b">pack :forget </b><i class="i">slave </i><span class="r">?</span><i class="i">slave ...</i>?</dt>
+<dd><p>Removes each of the <i class="i">slave</i>s from the packing order for its
+master and unmaps their windows.
+The slaves will no longer be managed by the packer.
+</p></dd>
+<dt><b class="b">pack :newinfo </b><i class="i">slave</i></dt>
+<dd><p>Returns a list whose elements are the current configuration state of
+the slave given by <i class="i">slave</i> in the same option-value form that
+might be specified to <b class="b">pack configure</b>.
+The first two elements of the list are &ldquo;<b class="b">:in </b><i class="i">master</i>&rdquo; where
+<i class="i">master</i> is the slave&rsquo;s master.
+Starting with Tk 4.0 this option will be renamed &quot;pack info&quot;.
+</p></dd>
+<dt><b class="b">pack :propagate </b><i class="i">master</i><span class="r"> ?</span><i class="i">boolean</i>?</dt>
+<dd><p>If <i class="i">boolean</i><span class="r"> has a true boolean value such as </span><b class="b">1</b><span class="r"> or </span><b class="b">on</b>
+then propagation is enabled for <i class="i">master</i>, which must be a window
+name (see &ldquo;GEOMETRY PROPAGATION&rdquo; below).
+If <i class="i">boolean</i> has a false boolean value then propagation is
+disabled for <i class="i">master</i>.
+In either of these cases an empty string is returned.
+If <i class="i">boolean</i><span class="r"> is omitted then the command returns </span><b class="b">0</b> or
+<b class="b">1</b> to indicate whether propagation is currently enabled
+for <i class="i">master</i>.
+Propagation is enabled by default.
+</p></dd>
+<dt><b class="b">pack :slaves </b><i class="i">master</i></dt>
+<dd><p>Returns a list of all of the slaves in the packing order for <i class="i">master</i>.
+The order of the slaves in the list is the same as their order in
+the packing order.
+If <i class="i">master</i> has no slaves then an empty string is returned.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022The-Packer-Algorithm_0022">
+<h4 class="unnumberedsubsec"><span>&quot;The Packer Algorithm&quot;<a class="copiable-link" href="#g_t_0022The-Packer-Algorithm_0022"> &para;</a></span></h4>
+
+<p>For each master the packer maintains an ordered list of slaves
+called the <i class="i">packing list</i>.
+The <b class="b">:in</b><span class="r">, </span><b class="b">:after</b><span class="r">, and </span><b class="b">:before</b> configuration
+options are used to specify the master for each slave and the slave&rsquo;s
+position in the packing list.
+If none of these options is given for a slave then the slave
+is added to the end of the packing list for its parent.
+</p>
+<p>The packer arranges the slaves for a master by scanning the
+packing list in order.
+At the time it processes each slave, a rectangular area within
+the master is still unallocated.
+This area is called the <i class="i">cavity</i>;  for the first slave it
+is the entire area of the master.
+</p>
+<p>For each slave the packer carries out the following steps:
+</p><ul class="itemize">
+<li>[1]
+The packer allocates a rectangular <i class="i">parcel</i> for the slave
+along the side of the cavity given by the slave&rsquo;s <b class="b">:side</b> option.
+If the side is top or bottom then the width of the parcel is
+the width of the cavity and its height is the requested height
+of the slave plus the <b class="b">:ipady</b><span class="r"> and </span><b class="b">:pady</b> options.
+For the left or right side the height of the parcel is
+the height of the cavity and the width is the requested width
+of the slave plus the <b class="b">:ipadx</b><span class="r"> and </span><b class="b">:padx</b> options.
+The parcel may be enlarged further because of the <b class="b">:expand</b>
+option (see &ldquo;EXPANSION&rdquo; below)
+</li><li>[2]
+The packer chooses the dimensions of the slave.
+The width will normally be the slave&rsquo;s requested width plus
+twice its <b class="b">:ipadx</b> option and the height will normally be
+the slave&rsquo;s requested height plus twice its <b class="b">:ipady</b>
+option.
+However, if the <b class="b">:fill</b><span class="r"> option is </span><b class="b">x</b><span class="r"> or </span><b class="b">both</b>
+then the width of the slave is expanded to fill the width of the parcel,
+minus twice the <b class="b">:padx</b> option.
+If the <b class="b">:fill</b><span class="r"> option is </span><b class="b">y</b><span class="r"> or </span><b class="b">both</b>
+then the height of the slave is expanded to fill the width of the parcel,
+minus twice the <b class="b">:pady</b> option.
+</li><li>[3]
+The packer positions the slave over its parcel.
+If the slave is smaller than the parcel then the <b class="b">:anchor</b>
+option determines where in the parcel the slave will be placed.
+If <b class="b">:padx</b><span class="r"> or </span><b class="b">:pady</b> is non-zero, then the given
+amount of external padding will always be left between the
+slave and the edges of the parcel.
+</li></ul>
+
+
+<p>Once a given slave has been packed, the area of its parcel
+is subtracted from the cavity, leaving a smaller rectangular
+cavity for the next slave.
+If a slave doesn&rsquo;t use all of its parcel, the unused space
+in the parcel will not be used by subsequent slaves.
+If the cavity should become too small to meet the needs of
+a slave then the slave will be given whatever space is
+left in the cavity.
+If the cavity shrinks to zero size, then all remaining slaves
+on the packing list will be unmapped from the screen until
+the master window becomes large enough to hold them again.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022Expansion_0022">
+<h4 class="unnumberedsubsec"><span>&quot;Expansion&quot;<a class="copiable-link" href="#g_t_0022Expansion_0022"> &para;</a></span></h4>
+
+<p>If a master window is so large that there will be extra space
+left over after all of its slaves have been packed, then the
+extra space is distributed uniformly among all of the slaves
+for which the <b class="b">:expand</b> option is set.
+Extra horizontal space is distributed among the expandable
+slaves whose <b class="b">:side</b><span class="r"> is </span><b class="b">left</b><span class="r"> or </span><b class="b">right</b>,
+and extra vertical space is distributed among the expandable
+slaves whose <b class="b">:side</b><span class="r"> is </span><b class="b">top</b><span class="r"> or </span><b class="b">bottom</b>.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022Geometry-Propagation_0022">
+<h4 class="unnumberedsubsec"><span>&quot;Geometry Propagation&quot;<a class="copiable-link" href="#g_t_0022Geometry-Propagation_0022"> &para;</a></span></h4>
+
+<p>The packer normally computes how large a master must be to
+just exactly meet the needs of its slaves, and it sets the
+requested width and height of the master to these dimensions.
+This causes geometry information to propagate up through a
+window hierarchy to a top-level window so that the entire
+sub-tree sizes itself to fit the needs of the leaf windows.
+However, the <b class="b">pack propagate</b> command may be used to
+turn off propagation for one or more masters.
+If propagation is disabled then the packer will not set
+the requested width and height of the packer.
+This may be useful if, for example, you wish for a master
+window to have a fixed size that you specify.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022Restrictions-On-Master-Windows_0022">
+<h4 class="unnumberedsubsec"><span>&quot;Restrictions On Master Windows&quot;<a class="copiable-link" href="#g_t_0022Restrictions-On-Master-Windows_0022"> &para;</a></span></h4>
+
+<p>The master for each slave must either be the slave&rsquo;s parent
+(the default) or a descendant of the slave&rsquo;s parent.
+This restriction is necessary to guarantee that the
+slave can be placed over any part of its master that is
+visible without danger of the slave being clipped by its parent.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022Packing-Order_0022">
+<h4 class="unnumberedsubsec"><span>&quot;Packing Order&quot;<a class="copiable-link" href="#g_t_0022Packing-Order_0022"> &para;</a></span></h4>
+
+<p>If the master for a slave is not its parent then you must make sure
+that the slave is higher in the stacking order than the master.
+Otherwise the master will obscure the slave and it will appear as
+if the slave hasn&rsquo;t been packed correctly.
+The easiest way to make sure the slave is higher than the master is
+to create the master window first:  the most recently created window
+will be highest in the stacking order.
+Or, you can use the <b class="b">raise</b><span class="r"> and </span><b class="b">lower</b> commands to change
+the stacking order of either the master or the slave.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-28">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-28"> &para;</a></span></h4>
+<p>geometry manager, location, packer, parcel, propagation, size
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="place.html">place</a>, Previous: <a href="pack_002dold.html">pack-old</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/pack_002dold.html
@@ -0,0 +1,269 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pack-old (GCL TK Manual)</title>
+
+<meta name="description" content="pack-old (GCL TK Manual)">
+<meta name="keywords" content="pack-old (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="pack.html" rel="next" title="pack">
+<link href="options.html" rel="prev" title="options">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="pack_002dold">
+<div class="nav-panel">
+<p>
+Next: <a href="pack.html" accesskey="n" rel="next">pack</a>, Previous: <a href="options.html" accesskey="p" rel="prev">options</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="pack_002dold-1"><span>3.13 pack-old<a class="copiable-link" href="#pack_002dold-1"> &para;</a></span></h3>
+
+<p>pack \- Obsolete syntax for packer geometry manager
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-26" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-24" accesskey="2">Description</a></li>
+<li><a href="#Keywords-27" accesskey="3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-26">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-26"> &para;</a></span></h4>
+<p><b class="b">pack after </b><i class="i">sibling </i><i class="i">window options</i><span class="r"> ?</span><i class="i">window options </i>...?
+</p><br>
+<p><b class="b">pack append </b><i class="i">parent </i><i class="i">window options</i><span class="r"> ?</span><i class="i">window options </i>...?
+</p><br>
+<p><b class="b">pack before </b><i class="i">sibling </i><i class="i">window options</i><span class="r"> ?</span><i class="i">window options </i>...?
+</p><br>
+<p><b class="b">pack info </b><i class="i">parent</i>
+</p><br>
+<p><b class="b">pack unpack </b><i class="i">window</i>
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-24">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-24"> &para;</a></span></h4>
+
+<p><i class="i">Note: this manual entry describes the syntax for the </i><b class="b">pack</b>\fI
+command as it before Tk version 3.3.
+Although this syntax continues to be supported for backward
+compatibility, it is obsolete and should not be used anymore.
+At some point in the future it may cease to be supported.
+</p>
+<p>The packer is a geometry manager that arranges the
+children of a parent by packing them in order around the edges of
+the parent.  The first child is placed against one side of
+the window, occupying the entire span of the window along that
+side.  This reduces the space remaining for other children as
+if the side had been moved in by the size of the first child.
+Then the next child is placed against one side of the remaining
+cavity, and so on until all children have been placed or there
+is no space left in the cavity.
+</p>
+<p>The <b class="b">before</b><span class="r">, </span><b class="b">after</b><span class="r">, and </span><b class="b">append</b><span class="r"> forms of the </span><b class="b">pack</b>
+command are used to insert one or more children into the packing order
+for their parent.  The <b class="b">before</b> form inserts the children before
+window <i class="i">sibling</i> in the order;  all of the other windows must be
+siblings of <i class="i">sibling</i><span class="r">.  The </span><b class="b">after</b> form inserts the windows
+after <i class="i">sibling</i><span class="r">, and the </span><b class="b">append</b> form appends one or more
+windows to the end of the packing order for <i class="i">parent</i>.  If a
+<i class="i">window</i> named in any of these commands is already packed in
+its parent, it is removed from its current position in the packing
+order and repositioned as indicated by the command.  All of these
+commands return an empty string as result.
+</p>
+<p>The <b class="b">unpack</b><span class="r"> form of the </span><b class="b">pack</b><span class="r"> command removes </span><i class="i">window</i>
+from the packing order of its parent and unmaps it.  After the
+execution of this command the packer will no longer manage
+<i class="i">window</i>&rsquo;s geometry.
+</p>
+<p>The placement of each child is actually a four-step process;
+the <i class="i">options</i><span class="r"> argument following each </span><i class="i">window</i> consists of
+a list of one or more fields that govern the placement of that
+window.  In the discussion below, the term <i class="i">cavity</i> refers
+to the space left in a parent when a particular child is placed
+(i.e. all the space that wasn&rsquo;t claimed by earlier children in
+the packing order).  The term <i class="i">parcel</i> refers to the space
+allocated to a particular child;  this is not necessarily the
+same as the child window&rsquo;s final geometry.
+</p>
+<p>The first step in placing a child is to determine which side of
+the cavity it will lie against.  Any one of the following options
+may be used to specify a side:
+</p>
+<dl class="table">
+<dt><b class="b">top</b></dt>
+<dd><p>Position the child&rsquo;s parcel against the top of the cavity,
+occupying the full width of the cavity.
+</p></dd>
+<dt><b class="b">bottom</b></dt>
+<dd><p>Position the child&rsquo;s parcel against the bottom of the cavity,
+occupying the full width of the cavity.
+</p></dd>
+<dt><b class="b">left</b></dt>
+<dd><p>Position the child&rsquo;s parcel against the left side of the cavity,
+occupying the full height of the cavity.
+</p></dd>
+<dt><b class="b">right</b></dt>
+<dd><p>Position the child&rsquo;s parcel against the right side of the cavity,
+occupying the full height of the cavity.
+</p></dd>
+</dl>
+
+
+<p>At most one of these options should be specified for any given window.
+If no side is specified, then the default is <b class="b">top</b>.
+</p>
+<p>The second step is to decide on a parcel for the child.  For <b class="b">top</b>
+and <b class="b">bottom</b> windows, the desired parcel width is normally the cavity
+width and the desired parcel height is the window&rsquo;s requested height,
+as passed to <b class="b">Tk_GeometryRequest</b><span class="r">. For </span><b class="b">left</b><span class="r"> and </span><b class="b">right</b>
+windows, the desired parcel height is normally the cavity height and the
+desired width is the window&rsquo;s requested width.  However, extra
+space may be requested for the window using any of the following
+options:
+</p>
+<dl class="table">
+<dt><b class="b">padx </b><i class="i">num</i></dt>
+<dd><p>Add <i class="i">num</i> pixels to the window&rsquo;s requested width before computing
+the parcel size as described above.
+</p></dd>
+<dt><b class="b">pady </b><i class="i">num</i></dt>
+<dd><p>Add <i class="i">num</i> pixels to the window&rsquo;s requested height before computing
+the parcel size as described above.
+</p></dd>
+<dt><b class="b">expand</b></dt>
+<dd><p>This option requests that the window&rsquo;s parcel absorb any extra space left over
+in the parent&rsquo;s cavity after packing all the children.
+The amount of space left over depends on the sizes requested by the
+other children, and may be zero.  If several windows have all specified
+<b class="b">expand</b> then the extra width will be divided equally among all the
+<b class="b">left</b><span class="r"> and </span><b class="b">right</b><span class="r"> windows that specified </span><b class="b">expand</b> and
+the extra height will be divided equally among all the <b class="b">top</b> and
+<b class="b">bottom</b><span class="r"> windows that specified </span><b class="b">expand</b>.
+</p></dd>
+</dl>
+
+
+<p>If the desired width or height for a parcel is larger than the corresponding
+dimension of the cavity, then the cavity&rsquo;s dimension is used instead.
+</p>
+<p>The third step in placing the window is to decide on the window&rsquo;s
+width and height.  The default is for the window to receive either
+its requested width and height or the those of the parcel, whichever
+is smaller.  If the parcel is larger than the window&rsquo;s requested
+size, then the following options may be used to expand the
+window to partially or completely fill the parcel:
+</p>
+<dl class="table">
+<dt><b class="b">fill</b></dt>
+<dd><p>Set the window&rsquo;s size to equal the parcel size.
+</p></dd>
+<dt><b class="b">fillx</b></dt>
+<dd><p>Increase the window&rsquo;s width to equal the parcel&rsquo;s width, but retain
+the window&rsquo;s requested height.
+</p></dd>
+<dt><b class="b">filly</b></dt>
+<dd><p>Increase the window&rsquo;s height to equal the parcel&rsquo;s height, but retain
+the window&rsquo;s requested width.
+</p>
+<p>The last step is to decide the window&rsquo;s location within its parcel.
+If the window&rsquo;s size equals the parcel&rsquo;s size, then the window simply
+fills the entire parcel.  If the parcel is larger than the window,
+then one of
+the following options may be used to specify where the window should
+be positioned within its parcel:
+</p></dd>
+<dt><b class="b">frame center</b></dt>
+<dd><p>Center the window in its parcel.  This is the default if no framing
+option is specified.
+</p></dd>
+<dt><b class="b">frame n</b></dt>
+<dd><p>Position the window with its top edge centered on the top edge of
+the parcel.
+</p></dd>
+<dt><b class="b">frame ne</b></dt>
+<dd><p>Position the window with its upper-right corner at the upper-right corner
+of the parcel.
+</p></dd>
+<dt><b class="b">frame e</b></dt>
+<dd><p>Position the window with its right edge centered on the right edge of
+the parcel.
+</p></dd>
+<dt><b class="b">frame se</b></dt>
+<dd><p>Position the window with its lower-right corner at the lower-right corner
+of the parcel.
+</p></dd>
+<dt><b class="b">frame s</b></dt>
+<dd><p>Position the window with its bottom edge centered on the bottom edge of
+the parcel.
+</p></dd>
+<dt><b class="b">frame sw</b></dt>
+<dd><p>Position the window with its lower-left corner at the lower-left corner
+of the parcel.
+</p></dd>
+<dt><b class="b">frame w</b></dt>
+<dd><p>Position the window with its left edge centered on the left edge of
+the parcel.
+</p></dd>
+<dt><b class="b">frame nw</b></dt>
+<dd><p>Position the window with its upper-left corner at the upper-left corner
+of the parcel.
+</p>
+<p>The <b class="b">pack info</b> command may be used to retrieve information about
+the packing order for a parent.  It returns a list in the form
+</p>
+<div class="example">
+<pre class="example-preformatted"><i class="i">window options window options ...</i>
+</pre></div>
+
+<p>Each <i class="i">window</i><span class="r"> is a name of a window packed in </span><i class="i">parent</i>,
+and the following <i class="i">options</i> describes all of the options for that
+window, just as they would be typed to <b class="b">pack append</b>.
+The order of the list is the same as the packing order for
+<i class="i">parent</i>.
+</p>
+<p>The packer manages the mapped/unmapped state of all the packed
+children windows.  It automatically maps the windows when it packs
+them, and it unmaps any windows for which there was no space left
+in the cavity.
+</p>
+<p>The packer makes geometry requests on behalf of the parent windows
+it manages.  For each parent window it requests a size large enough
+to accommodate all the options specified by all the packed children,
+such that zero space would be leftover for <b class="b">expand</b> options.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-27">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-27"> &para;</a></span></h4>
+<p>geometry manager, location, packer, parcel, size
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="pack.html">pack</a>, Previous: <a href="options.html">options</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/place.html
@@ -0,0 +1,278 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>place (GCL TK Manual)</title>
+
+<meta name="description" content="place (GCL TK Manual)">
+<meta name="keywords" content="place (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="raise.html" rel="next" title="raise">
+<link href="pack.html" rel="prev" title="pack">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="place">
+<div class="nav-panel">
+<p>
+Next: <a href="raise.html" accesskey="n" rel="next">raise</a>, Previous: <a href="pack.html" accesskey="p" rel="prev">pack</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="place-1"><span>3.15 place<a class="copiable-link" href="#place-1"> &para;</a></span></h3>
+
+<p>place \- Geometry manager for fixed or rubber-sheet placement
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-28" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-26" accesskey="2">Description</a></li>
+<li><a href="#g_t_0022Fine-Points_0022" accesskey="3">&quot;Fine Points&quot;</a></li>
+<li><a href="#Keywords-29" accesskey="4">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-28">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-28"> &para;</a></span></h4>
+<p><b class="b">place </b><i class="i">window option value </i><span class="r">?</span><i class="i">option value ...</i>?
+</p><br>
+<p><b class="b">place configure </b><i class="i">window option value </i><span class="r">?</span><i class="i">option value ...</i>?
+</p><br>
+<p><b class="b">place forget </b><i class="i">window</i>
+</p><br>
+<p><b class="b">place info </b><i class="i">window</i>
+</p><br>
+<p><b class="b">place slaves </b><i class="i">window</i>
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-26">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-26"> &para;</a></span></h4>
+
+<p>The placer is a geometry manager for Tk.
+It provides simple fixed placement of windows, where you specify
+the exact size and location of one window, called the <i class="i">slave</i>,
+within another window, called the <i class="i">master</i>.
+The placer also provides rubber-sheet placement, where you specify the
+size and location of the slave in terms of the dimensions of
+the master, so that the slave changes size and location
+in response to changes in the size of the master.
+Lastly, the placer allows you to mix these styles of placement so
+that, for example, the slave has a fixed width and height but is
+centered inside the master.
+</p>
+<p>If the first argument to the <b class="b">place</b> command is a window path
+name or <b class="b">configure</b> then the command arranges for the placer
+to manage the geometry of a slave whose path name is <i class="i">window</i>.
+The remaining arguments consist of one or more <i class="i">option:value</i>
+pairs that specify the way in which <i class="i">window</i>&rsquo;s
+geometry is managed.
+If the placer is already managing <i class="i">window</i>, then the
+<i class="i">option:value</i><span class="r"> pairs modify the configuration for </span><i class="i">window</i>.
+In this form the <b class="b">place</b> command returns an empty string as result.
+The following <i class="i">option:value</i> pairs are supported:
+</p>
+<dl class="table">
+<dt><b class="b">:in </b><i class="i">master</i></dt>
+<dd><p><i class="i">Master</i> specifes the path name of the window relative
+to which <i class="i">window</i> is to be placed.
+<i class="i">Master</i><span class="r"> must either be </span><i class="i">window</i>&rsquo;s parent or a descendant
+of <i class="i">window</i>&rsquo;s parent.
+In addition, <i class="i">master</i><span class="r"> and </span><i class="i">window</i> must both be descendants
+of the same top-level window.
+These restrictions are necessary to guarantee
+that <i class="i">window</i><span class="r"> is visible whenever </span><i class="i">master</i> is visible.
+If this option isn&rsquo;t specified then the master defaults to
+<i class="i">window</i>&rsquo;s parent.
+</p></dd>
+<dt><b class="b">:x </b><i class="i">location</i></dt>
+<dd><p><i class="i">Location</i> specifies the x-coordinate within the master window
+of the anchor point for <i class="i">window</i>.
+The location is specified in screen units (i.e. any of the forms
+accepted by <b class="b">Tk_GetPixels</b>) and need not lie within the bounds
+of the master window.
+</p></dd>
+<dt><b class="b">:relx </b><i class="i">location</i></dt>
+<dd><p><i class="i">Location</i> specifies the x-coordinate within the master window
+of the anchor point for <i class="i">window</i>.
+In this case the location is specified in a relative fashion
+as a floating-point number:  0.0 corresponds to the left edge
+of the master and 1.0 corresponds to the right edge of the master.
+<i class="i">Location</i> need not be in the range 0.0\-1.0.
+</p></dd>
+<dt><b class="b">:y </b><i class="i">location</i></dt>
+<dd><p><i class="i">Location</i> specifies the y-coordinate within the master window
+of the anchor point for <i class="i">window</i>.
+The location is specified in screen units (i.e. any of the forms
+accepted by <b class="b">Tk_GetPixels</b>) and need not lie within the bounds
+of the master window.
+</p></dd>
+<dt><b class="b">:rely </b><i class="i">location</i></dt>
+<dd><p><i class="i">Location</i> specifies the y-coordinate within the master window
+of the anchor point for <i class="i">window</i>.
+In this case the value is specified in a relative fashion
+as a floating-point number:  0.0 corresponds to the top edge
+of the master and 1.0 corresponds to the bottom edge of the master.
+<i class="i">Location</i> need not be in the range 0.0\-1.0.
+</p></dd>
+<dt><b class="b">:anchor </b><i class="i">where</i></dt>
+<dd><p><i class="i">Where</i><span class="r"> specifies which point of </span><i class="i">window</i> is to be positioned
+at the (x,y) location selected by the <b class="b">:x</b><span class="r">, </span><b class="b">:y</b>,
+<b class="b">:relx</b><span class="r">, and </span><b class="b">:rely</b> options.
+The anchor point is in terms of the outer area of <i class="i">window</i>
+including its border, if any.
+Thus if <i class="i">where</i><span class="r"> is </span><b class="b">se</b> then the lower-right corner of
+<i class="i">window</i>&rsquo;s border will appear at the given (x,y) location
+in the master.
+The anchor position defaults to <b class="b">nw</b>.
+</p></dd>
+<dt><b class="b">:width </b><i class="i">size</i></dt>
+<dd><p><i class="i">Size</i><span class="r"> specifies the width for </span><i class="i">window</i> in screen units
+(i.e. any of the forms accepted by <b class="b">Tk_GetPixels</b>).
+The width will be the outer width of <i class="i">window</i> including its
+border, if any.
+If <i class="i">size</i><span class="r"> is an empty string, or if no </span><b class="b">:width</b>
+or <b class="b">:relwidth</b> option is specified, then the width requested
+internally by the window will be used.
+</p></dd>
+<dt><b class="b">:relwidth </b><i class="i">size</i></dt>
+<dd><p><i class="i">Size</i><span class="r"> specifies the width for </span><i class="i">window</i>.
+In this case the width is specified as a floating-point number
+relative to the width of the master: 0.5 means <i class="i">window</i> will
+be half as wide as the master, 1.0 means <i class="i">window</i> will have
+the same width as the master, and so on.
+</p></dd>
+<dt><b class="b">:height </b><i class="i">size</i></dt>
+<dd><p><i class="i">Size</i><span class="r"> specifies the height for </span><i class="i">window</i> in screen units
+(i.e. any of the forms accepted by <b class="b">Tk_GetPixels</b>).
+The height will be the outer dimension of <i class="i">window</i> including its
+border, if any.
+If <i class="i">size</i><span class="r"> is an empty string, or if no </span><b class="b">:height</b> or
+<b class="b">:relheight</b> option is specified, then the height requested
+internally by the window will be used.
+</p></dd>
+<dt><b class="b">:relheight </b><i class="i">size</i></dt>
+<dd><p><i class="i">Size</i><span class="r"> specifies the height for </span><i class="i">window</i>.
+In this case the height is specified as a floating-point number
+relative to the height of the master: 0.5 means <i class="i">window</i> will
+be half as high as the master, 1.0 means <i class="i">window</i> will have
+the same height as the master, and so on.
+</p></dd>
+<dt><b class="b">:bordermode </b><i class="i">mode</i></dt>
+<dd><p><i class="i">Mode</i> determines the degree to which borders within the
+master are used in determining the placement of the slave.
+The default and most common value is <b class="b">inside</b>.
+In this case the placer considers the area of the master to
+be the innermost area of the master, inside any border:
+an option of <b class="b">:x 0</b> corresponds to an x-coordinate just
+inside the border and an option of <b class="b">:relwidth 1.0</b>
+means <i class="i">window</i> will fill the area inside the master&rsquo;s
+border.
+If <i class="i">mode</i><span class="r"> is </span><b class="b">outside</b> then the placer considers
+the area of the master to include its border;
+this mode is typically used when placing <i class="i">window</i>
+outside its master, as with the options <b class="b">:x 0 :y 0 :anchor ne</b>.
+Lastly, <i class="i">mode</i><span class="r"> may be specified as </span><b class="b">ignore</b>, in which
+case borders are ignored:  the area of the master is considered
+to be its official X area, which includes any internal border but
+no external border.  A bordermode of <b class="b">ignore</b> is probably
+not very useful.
+</p>
+<p>If the same value is specified separately with
+two different options, such as <b class="b">:x</b><span class="r"> and </span><b class="b">:relx</b>, then
+the most recent option is used and the older one is ignored.
+</p>
+<p>The <b class="b">place slaves</b> command returns a list of all the slave
+windows for which <i class="i">window</i> is the master.
+If there are no slaves for <i class="i">window</i> then an empty string is
+returned.
+</p>
+<p>The <b class="b">place forget</b> command causes the placer to stop managing
+the geometry of <i class="i">window</i>.  As a side effect of this command
+<i class="i">window</i> will be unmapped so that it doesn&rsquo;t appear on the
+screen.
+If <i class="i">window</i> isn&rsquo;t currently managed by the placer then the
+command has no effect.
+<b class="b">Place forget</b> returns an empty string as result.
+</p>
+<p>The <b class="b">place info</b> command returns a list giving the current
+configuration of <i class="i">window</i>.
+The list consists of <i class="i">option:value</i> pairs in exactly the
+same form as might be specified to the <b class="b">place configure</b>
+command.
+If the configuration of a window has been retrieved with
+<b class="b">place info</b>, that configuration can be restored later by
+first using <b class="b">place forget</b> to erase any existing information
+for the window and then invoking <b class="b">place configure</b> with
+the saved information.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022Fine-Points_0022">
+<h4 class="unnumberedsubsec"><span>&quot;Fine Points&quot;<a class="copiable-link" href="#g_t_0022Fine-Points_0022"> &para;</a></span></h4>
+
+<p>It is not necessary for the master window to be the parent
+of the slave window.
+This feature is useful in at least two situations.
+First, for complex window layouts it means you can create a
+hierarchy of subwindows whose only purpose
+is to assist in the layout of the parent.
+The &ldquo;real children&rdquo; of the parent (i.e. the windows that
+are significant for the application&rsquo;s user interface) can be
+children of the parent yet be placed inside the windows
+of the geometry-management hierarchy.
+This means that the path names of the &ldquo;real children&rdquo;
+don&rsquo;t reflect the geometry-management hierarchy and users
+can specify options for the real children
+without being aware of the structure of the geometry-management
+hierarchy.
+</p>
+<p>A second reason for having a master different than the slave&rsquo;s
+parent is to tie two siblings together.
+For example, the placer can be used to force a window always to
+be positioned centered just below one of its
+siblings by specifying the configuration
+</p>
+<div class="example">
+<pre class="example-preformatted"><b class="b">:in </b><i class="i">sibling</i><b class="b"> :relx 0.5 :rely 1.0 :anchor n :bordermode outside</b>
+</pre></div>
+
+<p>Whenever the sibling is repositioned in the future, the slave
+will be repositioned as well.
+</p>
+<p>Unlike many other geometry managers (such as the packer)
+the placer does not make any attempt to manipulate the geometry of
+the master windows or the parents of slave windows (i.e. it doesn&rsquo;t
+set their requested sizes).
+To control the sizes of these windows, make them windows like
+frames and canvases that provide configuration options for this purpose.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-29">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-29"> &para;</a></span></h4>
+<p>geometry manager, height, location, master, place, rubber sheet, slave, width
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="raise.html">raise</a>, Previous: <a href="pack.html">pack</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/radiobutton.html
@@ -0,0 +1,332 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>radiobutton (GCL TK Manual)</title>
+
+<meta name="description" content="radiobutton (GCL TK Manual)">
+<meta name="keywords" content="radiobutton (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Widgets.html" rel="up" title="Widgets">
+<link href="toplevel.html" rel="next" title="toplevel">
+<link href="label.html" rel="prev" title="label">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="radiobutton">
+<div class="nav-panel">
+<p>
+Next: <a href="toplevel.html" accesskey="n" rel="next">toplevel</a>, Previous: <a href="label.html" accesskey="p" rel="prev">label</a>, Up: <a href="Widgets.html" accesskey="u" rel="up">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="radiobutton-1"><span>2.14 radiobutton<a class="copiable-link" href="#radiobutton-1"> &para;</a></span></h3>
+
+<p>radiobutton \- Create and manipulate radio-button widgets
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-13" accesskey="1">Synopsis</a></li>
+<li><a href="#Standard-Options-13" accesskey="2">Standard Options</a></li>
+<li><a href="#Arguments-for-Radiobutton" accesskey="3">Arguments for Radiobutton</a></li>
+<li><a href="#Description-10" accesskey="4">Description</a></li>
+<li><a href="#A-Radiobutton-Widget_0027s-Arguments" accesskey="5">A Radiobutton Widget&rsquo;s Arguments</a></li>
+<li><a href="#Bindings-7" accesskey="6">Bindings</a></li>
+<li><a href="#Keywords-13" accesskey="7">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-13">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-13"> &para;</a></span></h4>
+<p><b class="b">radiobutton</b><i class="i"> </i><i class="i">pathName </i><span class="r">?</span><i class="i">options</i>?
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Standard-Options-13">
+<h4 class="unnumberedsubsec"><span>Standard Options<a class="copiable-link" href="#Standard-Options-13"> &para;</a></span></h4>
+
+
+<div class="example">
+<pre class="example-preformatted">activeBackground  bitmap              font        relief        
+activeForeground  borderWidth         foreground  text          
+anchor            cursor              padX        textVariable  
+background        disabledForeground  padX        
+</pre></div>
+
+
+<p>See <a class="xref" href="options.html">options</a>, for more information.
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Arguments-for-Radiobutton">
+<h4 class="unnumberedsubsec"><span>Arguments for Radiobutton<a class="copiable-link" href="#Arguments-for-Radiobutton"> &para;</a></span></h4>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:command</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">command</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Command</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a Tcl command to associate with the button.  This command
+is typically invoked when mouse button 1 is released over the button
+window.  The button&rsquo;s global variable (<b class="b">:variable</b> option) will
+be updated before the command is invoked.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:height</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">height</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Height</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a desired height for the button.
+If a bitmap is being displayed in the button then the value is in
+screen units (i.e. any of the forms acceptable to <b class="b">Tk_GetPixels</b>);
+for text it is in lines of text.
+If this option isn&rsquo;t specified, the button&rsquo;s desired height is computed
+from the size of the bitmap or text being displayed in it.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:selector</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">selector</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Foreground</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the color to draw in the selector when this button is
+selected.
+If specified as an empty string then no selector is drawn for the button.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:state</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">state</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">State</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies one of three states for the radio button:  <b class="b">normal</b><span class="r">, </span><b class="b">active</b>,
+or <b class="b">disabled</b>.  In normal state the radio button is displayed using the
+<b class="b">foreground</b><span class="r"> and </span><b class="b">background</b> options.  The active state is
+typically used when the pointer is over the radio button.  In active state
+the radio button is displayed using the <b class="b">activeForeground</b> and
+<b class="b">activeBackground</b> options.  Disabled state means that the radio button
+is insensitive:  it doesn&rsquo;t activate and doesn&rsquo;t respond to mouse
+button presses.  In this state the <b class="b">disabledForeground</b> and
+<b class="b">background</b> options determine how the radio button is displayed.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:value</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">value</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Value</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies value to store in the button&rsquo;s associated variable whenever
+this button is selected.  Defaults to the name of the radio button.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:variable</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">variable</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Variable</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies name of global variable to set whenever this button is
+selected.  Changes in this variable also cause the button to select
+or deselect itself.
+Defaults to the value <b class="b">selectedButton</b>.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:width</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">width</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Width</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a desired width for the button.
+If a bitmap is being displayed in the button then the value is in
+screen units (i.e. any of the forms acceptable to <b class="b">Tk_GetPixels</b>);
+for text it is in characters.
+If this option isn&rsquo;t specified, the button&rsquo;s desired width is computed
+from the size of the bitmap or text being displayed in it.
+</p></dd>
+</dl>
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-10">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-10"> &para;</a></span></h4>
+
+<p>The <b class="b">radiobutton</b> command creates a new window (given by the
+<i class="i">pathName</i> argument) and makes it into a radiobutton widget.
+Additional
+options, described above, may be specified on the command line
+or in the option database
+to configure aspects of the radio button such as its colors, font,
+text, and initial relief.  The <b class="b">radiobutton</b> command returns its
+<i class="i">pathName</i> argument.  At the time this command is invoked,
+there must not exist a window named <i class="i">pathName</i>, but
+<i class="i">pathName</i>&rsquo;s parent must exist.
+</p>
+<p>A radio button is a widget
+that displays a textual string or bitmap
+and a diamond called a <i class="i">selector</i>.
+A radio button has
+all of the behavior of a simple button: it can display itself in either
+of three different ways, according to the <b class="b">state</b> option;
+it can be made to appear
+raised, sunken, or flat; it can be made to flash; and it invokes
+a Tcl command whenever mouse button 1 is clicked over the
+check button.
+</p>
+<p>In addition, radio buttons can be <i class="i">selected</i>.
+If a radio button is selected then a special highlight appears
+in the selector and a Tcl variable associated with the radio button
+is set to a particular value.
+If the radio button is not selected then the selector is drawn
+in a different fashion.
+Typically, several radio buttons share a single variable and the
+value of the variable indicates which radio button is to be selected.
+When a radio button is selected it sets the value of the variable to
+indicate that fact;  each radio button also monitors the value of
+the variable and automatically selects and deselects itself when the
+variable&rsquo;s value changes.
+By default the variable <b class="b">selectedButton</b>
+is used;  its contents give the name of the button that is
+selected, or the empty string if no button associated with that
+variable is selected.
+The name of the variable for a radio button,
+plus the variable to be stored into it, may be modified with options
+on the command line or in the option database.  By default a radio
+button is configured to select itself on button clicks.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="A-Radiobutton-Widget_0027s-Arguments">
+<h4 class="unnumberedsubsec"><span>A Radiobutton Widget&rsquo;s Arguments<a class="copiable-link" href="#A-Radiobutton-Widget_0027s-Arguments"> &para;</a></span></h4>
+
+<p>The <b class="b">radiobutton</b> command creates a new Tcl command whose
+name is <i class="i">pathName</i>.  This
+command may be used to invoke various
+operations on the widget.  It has the following general form:
+</p>
+<div class="example">
+<pre class="example-preformatted"><i class="i">pathName option </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</pre></div>
+
+<p><i class="i">Option</i><span class="r"> and the </span><i class="i">arg</i>s
+determine the exact behavior of the command.  The following
+commands are possible for radio-button widgets:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:activate</b></dt>
+<dd><p>Change the radio button&rsquo;s state to <b class="b">active</b> and redisplay the button
+using its active foreground and background colors instead of normal
+colors.
+This command is ignored if the radio button&rsquo;s state is <b class="b">disabled</b>.
+This command is obsolete and will eventually be removed;
+use &ldquo;<i class="i">pathName </i><b class="b">:configure :state active</b>&rdquo; instead.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:configure</b><span class="r"> ?</span><i class="i">option</i><span class="r">? ?</span><i class="i">value option value ...</i>?</dt>
+<dd><p>Query or modify the configuration options of the widget.
+If no <i class="i">option</i> is specified, returns a list describing all of
+the available options for <i class="i">pathName</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).  If <i class="i">option</i> is specified
+with no <i class="i">value</i>, then the command returns a list describing the
+one named option (this list will be identical to the corresponding
+sublist of the value returned if no <i class="i">option</i> is specified).  If
+one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given widget option(s) to have the given value(s);  in
+this case the command returns an empty string.
+<i class="i">Option</i><span class="r"> may have any of the values accepted by the </span><b class="b">radiobutton</b>
+command.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:deactivate</b></dt>
+<dd><p>Change the radio button&rsquo;s state to <b class="b">normal</b> and redisplay the button
+using its normal foreground and background colors.
+This command is ignored if the radio button&rsquo;s state is <b class="b">disabled</b>.
+This command is obsolete and will eventually be removed;
+use &ldquo;<i class="i">pathName </i><b class="b">:configure :state normal</b>&rdquo; instead.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:deselect</b></dt>
+<dd><p>Deselect the radio button:  redisplay it without a highlight in
+the selector and set the associated variable to an empty string.  If
+this radio button was not currently selected, then the command has
+no effect.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:flash</b></dt>
+<dd><p>Flash the radio button.  This is accomplished by redisplaying the radio button
+several times, alternating between active and normal colors.  At
+the end of the flash the radio button is left in the same normal/active
+state as when the command was invoked.
+This command is ignored if the radio button&rsquo;s state is <b class="b">disabled</b>.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:invoke</b></dt>
+<dd><p>Does just what would have happened if the user invoked the radio button
+with the mouse: select the button and invoke
+its associated Tcl command, if there is one.
+The return value is the return value from the Tcl command, or an
+empty string if there is no command associated with the radio button.
+This command is ignored if the radio button&rsquo;s state is <b class="b">disabled</b>.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:select</b></dt>
+<dd><p>Select the radio button:  display it with a highlighted
+selector and set the associated variable to the value corresponding
+to this widget.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Bindings-7">
+<h4 class="unnumberedsubsec"><span>Bindings<a class="copiable-link" href="#Bindings-7"> &para;</a></span></h4>
+
+<p>Tk automatically creates class bindings for radio buttons that give them
+the following default behavior:
+</p><ul class="itemize">
+<li>[1]
+The radio button activates whenever the mouse passes over it and deactivates
+whenever the mouse leaves the radio button.
+</li><li>[2]
+The radio button&rsquo;s relief is changed to sunken whenever mouse button 1 is
+pressed over it, and the relief is restored to its original
+value when button 1 is later released.
+</li><li>[3]
+If mouse button 1 is pressed over the radio button and later released over
+the radio button, the radio button is invoked (i.e. it is selected
+and the command associated with the button is invoked,
+if there is one).  However, if the mouse is not
+over the radio button when button 1 is released, then no invocation occurs.
+</li></ul>
+
+<p>The behavior of radio buttons can be changed by defining new bindings for
+individual widgets or by redefining the class bindings.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-13">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-13"> &para;</a></span></h4>
+<p>radio button, widget
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="toplevel.html">toplevel</a>, Previous: <a href="label.html">label</a>, Up: <a href="Widgets.html">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/raise.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>raise (GCL TK Manual)</title>
+
+<meta name="description" content="raise (GCL TK Manual)">
+<meta name="keywords" content="raise (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="selection.html" rel="next" title="selection">
+<link href="place.html" rel="prev" title="place">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="raise">
+<div class="nav-panel">
+<p>
+Next: <a href="selection.html" accesskey="n" rel="next">selection</a>, Previous: <a href="place.html" accesskey="p" rel="prev">place</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="raise-1"><span>3.16 raise<a class="copiable-link" href="#raise-1"> &para;</a></span></h3>
+
+<p>raise \- Change a window&rsquo;s position in the stacking order
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-29" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-27" accesskey="2">Description</a></li>
+<li><a href="#Keywords-30" accesskey="3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-29">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-29"> &para;</a></span></h4>
+<p><b class="b">raise </b><i class="i">window </i><span class="r">?</span><i class="i">aboveThis</i>?
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-27">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-27"> &para;</a></span></h4>
+
+<p>If the <i class="i">aboveThis</i> argument is omitted then the command raises
+<i class="i">window</i> so that it is above all of its siblings in the stacking
+order (it will not be obscured by any siblings and will obscure
+any siblings that overlap it).
+If <i class="i">aboveThis</i> is specified then it must be the path name of
+a window that is either a sibling of <i class="i">window</i> or the descendant
+of a sibling of <i class="i">window</i>.
+In this case the <b class="b">raise</b> command will insert
+<i class="i">window</i><span class="r"> into the stacking order just above </span><i class="i">aboveThis</i>
+(or the ancestor of <i class="i">aboveThis</i><span class="r"> that is a sibling of </span><i class="i">window</i>);
+this could end up either raising or lowering <i class="i">window</i>.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-30">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-30"> &para;</a></span></h4>
+<p>obscure, raise, stacking order
+</p></div>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/scale.html
@@ -0,0 +1,327 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>scale (GCL TK Manual)</title>
+
+<meta name="description" content="scale (GCL TK Manual)">
+<meta name="keywords" content="scale (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Widgets.html" rel="up" title="Widgets">
+<link href="canvas.html" rel="next" title="canvas">
+<link href="listbox.html" rel="prev" title="listbox">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="scale">
+<div class="nav-panel">
+<p>
+Next: <a href="canvas.html" accesskey="n" rel="next">canvas</a>, Previous: <a href="listbox.html" accesskey="p" rel="prev">listbox</a>, Up: <a href="Widgets.html" accesskey="u" rel="up">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="scale-1"><span>2.3 scale<a class="copiable-link" href="#scale-1"> &para;</a></span></h3>
+
+<p>scale \- Create and manipulate scale widgets
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-2" accesskey="1">Synopsis</a></li>
+<li><a href="#Standard-Options-2" accesskey="2">Standard Options</a></li>
+<li><a href="#Arguments-for-Scale" accesskey="3">Arguments for Scale</a></li>
+<li><a href="#Description-2" accesskey="4">Description</a></li>
+<li><a href="#A-Scale_0027s_0022Argumentsommand_0022" accesskey="5">A Scale&rsquo;s&quot;Argumentsommand&quot;</a></li>
+<li><a href="#Bindings" accesskey="6">Bindings</a></li>
+<li><a href="#Keywords-2" accesskey="7">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-2">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-2"> &para;</a></span></h4>
+<p><b class="b">scale</b><i class="i"> </i><i class="i">pathName </i><span class="r">?</span><i class="i">options</i>?
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Standard-Options-2">
+<h4 class="unnumberedsubsec"><span>Standard Options<a class="copiable-link" href="#Standard-Options-2"> &para;</a></span></h4>
+
+
+<div class="example">
+<pre class="example-preformatted">activeForeground     borderWidth     font           orient     
+background           cursor          foreground     relief     
+</pre></div>
+
+
+<p>See <a class="xref" href="options.html">options</a>, for more information.
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Arguments-for-Scale">
+<h4 class="unnumberedsubsec"><span>Arguments for Scale<a class="copiable-link" href="#Arguments-for-Scale"> &para;</a></span></h4>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:command</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">command</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Command</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the prefix of a Tcl command to invoke whenever the value of
+the scale is changed interactively.  The actual command consists
+of this option followed by
+a space and a number.  The number indicates the new value of the
+scale.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:from</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">from</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">From</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the value corresponding to the left or top end of the
+scale.  Must be an integer.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:label</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">label</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Label</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a string to displayed  as a label for the scale.  For
+vertical scales the label is displayed just to the right of the
+top end of the scale.  For horizontal scales the label is displayed
+just above the left end of the scale.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:length</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">length</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Length</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the desired long dimension of the scale in screen units,
+that is in any of the forms acceptable to <b class="b">Tk_GetPixels</b>.
+For vertical scales this is the scale&rsquo;s height;  for horizontal scales
+it is the scale&rsquo;s width.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:showvalue</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">showValue</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">ShowValue</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies a boolean value indicating whether or not the current
+value of the scale is to be displayed.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:sliderforeground</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">sliderForeground</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">sliderForeground</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the color to use for drawing the slider under normal conditions.
+When the mouse is in the slider window then the slider&rsquo;s color is
+determined by the <b class="b">activeForeground</b> option.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:sliderlength</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">sliderLength</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">SliderLength</b>&quot;</code>
+</p></div><br>
+
+<p>Specfies the size of the slider, measured in screen units along the slider&rsquo;s
+long dimension.  The value may be specified in any of the forms acceptable
+to <b class="b">Tk_GetPixels</b>.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:state</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">state</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">State</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies one of two states for the scale:  <b class="b">normal</b><span class="r"> or </span><b class="b">disabled</b>.
+If the scale is disabled then the value may not be changed and the scale
+won&rsquo;t activate when the mouse enters it.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:tickinterval</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">tickInterval</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">TickInterval</b>&quot;</code>
+</p></div><br>
+
+<p>Must be an integer value.  Determines the spacing between numerical
+tick-marks displayed below or to the left of the slider.  If specified
+as 0, then no tick-marks will be displayed.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:to</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">to</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">To</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the value corresponding to the right or bottom end of the
+scale.  Must be an integer.  This value may be either less than or
+greater than the <b class="b">from</b> option.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:width</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">width</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Width</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the desired narrow dimension of the scale in screen units
+(i.e. any of the forms acceptable to <b class="b">Tk_GetPixels</b>).
+For vertical scales this is the scale&rsquo;s width;  for horizontal scales
+this is the scale&rsquo;s height.
+</p></dd>
+</dl>
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-2">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-2"> &para;</a></span></h4>
+
+<p>The <b class="b">scale</b> command creates a new window (given by the
+<i class="i">pathName</i> argument) and makes it into a scale widget.
+Additional
+options, described above, may be specified on the command line
+or in the option database
+to configure aspects of the scale such as its colors, orientation,
+and relief.  The <b class="b">scale</b> command returns its
+<i class="i">pathName</i> argument.  At the time this command is invoked,
+there must not exist a window named <i class="i">pathName</i>, but
+<i class="i">pathName</i>&rsquo;s parent must exist.
+</p>
+<p>A scale is a widget that displays a rectangular region and a
+small <i class="i">slider</i>.  The rectangular region corresponds to a range
+of integer values (determined by the <b class="b">from</b><span class="r"> and </span><b class="b">to</b> options),
+and the position of the slider selects a particular integer value.
+The slider&rsquo;s position (and hence the scale&rsquo;s value) may be adjusted
+by clicking or dragging with the mouse as described in the BINDINGS
+section below.  Whenever the scale&rsquo;s value is changed, a Tcl
+command is invoked (using the <b class="b">command</b> option) to notify
+other interested widgets of the change.
+</p>
+<p>Three annotations may be displayed in a scale widget:  a label
+appearing at the top-left of the widget (top-right for vertical
+scales), a number displayed just underneath the slider
+(just to the left of the slider for vertical scales), and a collection
+of numerical tick-marks just underneath the current value (just to the left of
+the current value for vertical scales).  Each of these three
+annotations may be selectively enabled or disabled using the
+configuration options.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="A-Scale_0027s_0022Argumentsommand_0022">
+<h4 class="unnumberedsubsec"><span>A Scale&rsquo;s&quot;Argumentsommand&quot;<a class="copiable-link" href="#A-Scale_0027s_0022Argumentsommand_0022"> &para;</a></span></h4>
+
+<p>The <b class="b">scale</b> command creates a new Tcl command whose
+name is <i class="i">pathName</i>.  This
+command may be used to invoke various
+operations on the widget.  It has the following general form:
+</p>
+<div class="example">
+<pre class="example-preformatted"><i class="i">pathName option </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</pre></div>
+
+<p><i class="i">Option</i><span class="r"> and the </span><i class="i">arg</i>s
+determine the exact behavior of the command.  The following
+commands are possible for scale widgets:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:configure</b><span class="r"> ?</span><i class="i">option</i><span class="r">? ?</span><i class="i">value option value ...</i>?</dt>
+<dd><p>Query or modify the configuration options of the widget.
+If no <i class="i">option</i> is specified, returns a list describing all of
+the available options for <i class="i">pathName</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).  If <i class="i">option</i> is specified
+with no <i class="i">value</i>, then the command returns a list describing the
+one named option (this list will be identical to the corresponding
+sublist of the value returned if no <i class="i">option</i> is specified).  If
+one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given widget option(s) to have the given value(s);  in
+this case the command returns an empty string.
+<i class="i">Option</i><span class="r"> may have any of the values accepted by the </span><b class="b">scale</b>
+command.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:get</b></dt>
+<dd><p>Returns a decimal string giving the current value of the scale.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:set</b><span class="r"> </span><i class="i">value</i></dt>
+<dd><p>This command is invoked to change the current value of the scale,
+and hence the position at which the slider is displayed.  <i class="i">Value</i>
+gives the new value for the scale.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Bindings">
+<h4 class="unnumberedsubsec"><span>Bindings<a class="copiable-link" href="#Bindings"> &para;</a></span></h4>
+
+<p>When a new scale is created, it is given the following initial
+behavior by default:
+</p>
+<dl class="table">
+<dt><b class="b">&lt;Enter&gt;</b></dt>
+<dd><p>Change the slider display to use <b class="b">activeForeground</b> instead of
+<b class="b">sliderForeground</b>.
+</p></dd>
+<dt><b class="b">&lt;Leave&gt;</b></dt>
+<dd><p>Reset the slider display to use <b class="b">sliderForeground</b> instead of
+<b class="b">activeForeground</b>.
+</p></dd>
+<dt><b class="b">&lt;ButtonPress-1&gt;</b></dt>
+<dd><p>Change the slider display so that the slider appears sunken rather
+than raised.  Move the slider (and adjust the scale&rsquo;s value)
+to correspond to the current mouse position.
+</p></dd>
+<dt><b class="b">&lt;Button1-Motion&gt;</b></dt>
+<dd><p>Move the slider (and adjust the scale&rsquo;s value) to correspond to
+the current mouse position.
+</p></dd>
+<dt><b class="b">&lt;ButtonRelease-1&gt;</b></dt>
+<dd><p>Reset the slider display so that the slider appears raised again.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-2">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-2"> &para;</a></span></h4>
+<p>scale, widget
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="canvas.html">canvas</a>, Previous: <a href="listbox.html">listbox</a>, Up: <a href="Widgets.html">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/scrollbar.html
@@ -0,0 +1,257 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>scrollbar (GCL TK Manual)</title>
+
+<meta name="description" content="scrollbar (GCL TK Manual)">
+<meta name="keywords" content="scrollbar (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Widgets.html" rel="up" title="Widgets">
+<link href="checkbutton.html" rel="next" title="checkbutton">
+<link href="menu.html" rel="prev" title="menu">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="scrollbar">
+<div class="nav-panel">
+<p>
+Next: <a href="checkbutton.html" accesskey="n" rel="next">checkbutton</a>, Previous: <a href="menu.html" accesskey="p" rel="prev">menu</a>, Up: <a href="Widgets.html" accesskey="u" rel="up">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="scrollbar-1"><span>2.6 scrollbar<a class="copiable-link" href="#scrollbar-1"> &para;</a></span></h3>
+
+<p>scrollbar \- Create and manipulate scrollbar widgets
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-5" accesskey="1">Synopsis</a></li>
+<li><a href="#Standard-Options-5" accesskey="2">Standard Options</a></li>
+<li><a href="#Arguments-for-Scrollbar" accesskey="3">Arguments for Scrollbar</a></li>
+<li><a href="#Description-3" accesskey="4">Description</a></li>
+<li><a href="#A-Scrollbar-Widget_0027s-Arguments" accesskey="5">A Scrollbar Widget&rsquo;s Arguments</a></li>
+<li><a href="#Bindings-2" accesskey="6">Bindings</a></li>
+<li><a href="#Keywords-5" accesskey="7">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-5">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-5"> &para;</a></span></h4>
+<p><b class="b">scrollbar</b><i class="i"> pathName </i><span class="r">?</span><i class="i">options</i>?
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Standard-Options-5">
+<h4 class="unnumberedsubsec"><span>Standard Options<a class="copiable-link" href="#Standard-Options-5"> &para;</a></span></h4>
+
+
+<div class="example">
+<pre class="example-preformatted">activeForeground       cursor           relief               
+background             foreground       repeatDelay          
+borderWidth            orient           repeatInterval       
+</pre></div>
+
+
+<p>See <a class="xref" href="options.html">options</a>, for more information.
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Arguments-for-Scrollbar">
+<h4 class="unnumberedsubsec"><span>Arguments for Scrollbar<a class="copiable-link" href="#Arguments-for-Scrollbar"> &para;</a></span></h4>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:command</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">command</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Command</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the prefix of a Tcl command to invoke to change the view
+in the widget associated with the scrollbar.  When a user requests
+a view change by manipulating the scrollbar, a Tcl command is
+invoked.  The actual command consists of this option followed by
+a space and a number.  The number indicates the logical unit that
+should appear at the top of the associated window.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:width</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">width</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Width</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the desired narrow dimension of the scrollbar window,
+not including 3-D border, if any.  For vertical
+scrollbars this will be the width and for horizontal scrollbars
+this will be the height.
+The value may have any of the forms acceptable to <b class="b">Tk_GetPixels</b>.
+</p></dd>
+</dl>
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-3">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-3"> &para;</a></span></h4>
+
+<p>The <b class="b">scrollbar</b> command creates a new window (given by the
+<i class="i">pathName</i> argument) and makes it into a scrollbar widget.
+Additional
+options, described above, may be specified on the command line
+or in the option database
+to configure aspects of the scrollbar such as its colors, orientation,
+and relief.  The <b class="b">scrollbar</b> command returns its
+<i class="i">pathName</i> argument.  At the time this command is invoked,
+there must not exist a window named <i class="i">pathName</i>, but
+<i class="i">pathName</i>&rsquo;s parent must exist.
+</p>
+<p>A scrollbar is a widget that displays two arrows, one at each end of
+the scrollbar, and a <i class="i">slider</i> in the middle portion of the
+scrollbar.  A scrollbar is used to provide information about what
+is visible in an <i class="i">associated window</i> that displays an object
+of some sort (such as a file being edited or a drawing).
+The position and size of the slider indicate which portion of the
+object is visible in the associated window.  For example, if the
+slider in a vertical scrollbar covers the top third of the area
+between the two arrows, it means that the associated window displays
+the top third of its object.
+</p>
+<p>Scrollbars can be used to adjust the view in the associated window
+by clicking or dragging with the mouse.  See the BINDINGS section
+below for details.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="A-Scrollbar-Widget_0027s-Arguments">
+<h4 class="unnumberedsubsec"><span>A Scrollbar Widget&rsquo;s Arguments<a class="copiable-link" href="#A-Scrollbar-Widget_0027s-Arguments"> &para;</a></span></h4>
+
+<p>The <b class="b">scrollbar</b> command creates a new Tcl command whose
+name is <i class="i">pathName</i>.  This
+command may be used to invoke various
+operations on the widget.  It has the following general form:
+</p>
+<div class="example">
+<pre class="example-preformatted"><i class="i">pathName option </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</pre></div>
+
+<p><i class="i">Option</i><span class="r"> and the </span><i class="i">arg</i>s
+determine the exact behavior of the command.  The following
+commands are possible for scrollbar widgets:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:configure</b><span class="r"> ?</span><i class="i">option</i><span class="r">? ?</span><i class="i">value option value ...</i>?</dt>
+<dd><p>Query or modify the configuration options of the widget.
+If no <i class="i">option</i> is specified, returns a list describing all of
+the available options for <i class="i">pathName</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).  If <i class="i">option</i> is specified
+with no <i class="i">value</i>, then the command returns a list describing the
+one named option (this list will be identical to the corresponding
+sublist of the value returned if no <i class="i">option</i> is specified).  If
+one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given widget option(s) to have the given value(s);  in
+this case the command returns an empty string.
+<i class="i">Option</i><span class="r"> may have any of the values accepted by the </span><b class="b">scrollbar</b>
+command.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:get</b></dt>
+<dd><p>Returns a Tcl list containing four decimal values, which are
+the current <i class="i">totalUnits</i><span class="r">, </span><i class="i">widnowUnits</i><span class="r">, </span><i class="i">firstUnit</i>,
+and <i class="i">lastUnit</i> values for the scrollbar.  These are the values
+from the most recent <b class="b">set</b> widget command on the scrollbar.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:set</b><span class="r"> </span><i class="i">totalUnits windowUnits firstUnit lastUnit</i></dt>
+<dd><p>This command is invoked to give the scrollbar information about the
+widget associated with the scrollbar.  <i class="i">TotalUnits</i> is an integer
+value giving the total size of the object being displayed in the
+associated widget.  The meaning of one unit depends on the associated
+widget;  for example, in a text editor widget units might
+correspond to lines of
+text.  <i class="i">WindowUnits</i> indicates the total number of units that
+can fit in the associated window at one time.  <i class="i">FirstUnit</i>
+and <i class="i">lastUnit</i> give the indices of the first and last units
+currently visible in the associated window (zero corresponds to the
+first unit of the object).  This command should
+be invoked by the associated widget whenever its object or window
+changes size and whenever it changes the view in its window.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Bindings-2">
+<h4 class="unnumberedsubsec"><span>Bindings<a class="copiable-link" href="#Bindings-2"> &para;</a></span></h4>
+
+<p>The description below assumes a vertically-oriented scrollbar.
+For a horizontally-oriented scrollbar replace the words &ldquo;up&rdquo;, &ldquo;down&rdquo;,
+&ldquo;top&rdquo;, and &ldquo;bottom&rdquo; with &ldquo;left&rdquo;, &ldquo;right&rdquo;, &ldquo;left&rdquo;,
+and &ldquo;right&rdquo;, respectively
+</p>
+<p>A scrollbar widget is divided into five distinct areas.  From top
+to bottom, they are:  the top arrow, the top gap (the empty space
+between the arrow and the slider), the slider, the bottom gap,
+and the bottom arrow.  Pressing mouse button 1 in each area has
+a different effect:
+</p>
+<dl class="table">
+<dt><b class="b">top arrow</b></dt>
+<dd><p>Causes the view in the associated window to shift up by one unit
+(i.e. the object appears to move down one unit in its window).
+If the button is held down the action will auto-repeat.
+</p></dd>
+<dt><b class="b">top gap</b></dt>
+<dd><p>Causes the view in the associated window to shift up by one
+less than the number of units in the window
+(i.e. the portion of the object that used to appear at the very
+top of the window will now appear at the very bottom).
+If the button is held down the action will auto-repeat.
+</p></dd>
+<dt><b class="b">slider</b></dt>
+<dd><p>Pressing button 1 in this area has no immediate effect except to
+cause the slider to appear sunken rather than raised.  However,
+if the mouse is moved with the button down then the slider will
+be dragged, adjusting the view as the mouse is moved.
+</p></dd>
+<dt><b class="b">bottom gap</b></dt>
+<dd><p>Causes the view in the associated window to shift down by one
+less than the number of units in the window
+(i.e. the portion of the object that used to appear at the very
+bottom of the window will now appear at the very top).
+If the button is held down the action will auto-repeat.
+</p></dd>
+<dt><b class="b">bottom arrow</b></dt>
+<dd><p>Causes the view in the associated window to shift down by one unit
+(i.e. the object appears to move up one unit in its window).
+If the button is held down the action will auto-repeat.
+</p>
+<p>Note:  none of the actions described above has an immediate impact
+on the position of the slider in the scrollbar.  It simply invokes
+the command specified in the <b class="b">command</b> option to notify the
+associated widget that a change in view is desired.  If the view is
+actually changed then the associated widget must invoke the
+scrollbar&rsquo;s <b class="b">set</b> widget command to change what is displayed in
+the scrollbar.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-5">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-5"> &para;</a></span></h4>
+<p>scrollbar, widget
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="checkbutton.html">checkbutton</a>, Previous: <a href="menu.html">menu</a>, Up: <a href="Widgets.html">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/selection.html
@@ -0,0 +1,166 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>selection (GCL TK Manual)</title>
+
+<meta name="description" content="selection (GCL TK Manual)">
+<meta name="keywords" content="selection (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="send.html" rel="next" title="send">
+<link href="raise.html" rel="prev" title="raise">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="selection">
+<div class="nav-panel">
+<p>
+Next: <a href="send.html" accesskey="n" rel="next">send</a>, Previous: <a href="raise.html" accesskey="p" rel="prev">raise</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="selection-1"><span>3.17 selection<a class="copiable-link" href="#selection-1"> &para;</a></span></h3>
+
+<p>selection \- Manipulate the X selection
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-30" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-28" accesskey="2">Description</a></li>
+<li><a href="#Keywords-31" accesskey="3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-30">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-30"> &para;</a></span></h4>
+<p><b class="b">selection </b><i class="i">option</i><span class="r"> ?</span><i class="i">arg arg ...</i>?
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-28">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-28"> &para;</a></span></h4>
+
+<p>This command provides a Tcl interface to the X selection mechanism and
+implements the full selection functionality described in the
+X Inter-Client Communication Conventions Manual (ICCCM), except that it
+supports only the primary selection.
+</p>
+<p>The first argument to <b class="b">selection</b> determines the format of the
+rest of the arguments and the behavior of the command.  The following
+forms are currently supported:
+</p>
+<dl class="table">
+<dt><b class="b">selection :clear </b><i class="i">window</i></dt>
+<dd><p>If there is a selection anywhere on <i class="i">window</i>&rsquo;s display, clear it
+so that no window owns the selection anymore.  Returns an empty string.
+</p></dd>
+<dt><b class="b">selection :get </b><span class="r">?</span><i class="i">type</i>?</dt>
+<dd><p>Retrieves the value
+of the primary selection and returns it as a result.
+<b class="b">Type</b> specifies the form in which the selection is to be
+returned (the desired &ldquo;target&rdquo; for conversion, in ICCCM
+terminology), and should be an
+atom name such as STRING or FILE_NAME;  see the Inter-Client
+Communication Conventions Manual for complete details.
+<b class="b">Type</b> defaults to STRING.  The selection :owner may choose to
+return the selection in any of several different representation
+formats, such as STRING, ATOM, INTEGER, etc. (this format is
+different than the selection type;  see the ICCCM for all the
+confusing details).  If the selection is returned in
+a non-string format, such as INTEGER or ATOM, the <b class="b">selection</b>
+command converts it to string format as a collection of fields
+separated by spaces:  atoms are converted to their
+textual names, and anything else is converted to hexadecimal
+integers.
+</p></dd>
+<dt><b class="b">selection :handle </b><i class="i">window command </i><span class="r">?</span><i class="i">type</i><span class="r">? ?</span><i class="i">format</i>?</dt>
+<dd><p>Creates a handler for selection requests, such that <i class="i">command</i> will
+be executed whenever the primary selection is
+owned by <i class="i">window</i> and someone attempts to retrieve it in the form
+given by <i class="i">type</i><span class="r"> (e.g. </span><i class="i">type</i><span class="r"> is specified in the </span><b class="b">selection :get</b>
+command).  <i class="i">Type</i> defaults to STRING.
+If <i class="i">command</i> is an empty string then any existing handler for
+<i class="i">window</i><span class="r"> and </span><i class="i">type</i> is removed.
+</p>
+<p>When the selection is requested and <i class="i">window</i> is the selection :owner
+and <i class="i">type</i><span class="r"> is the requested type, </span><i class="i">command</i> will be executed
+as a Tcl command with two additional numbers appended to it
+(with space separators).  The two additional numbers
+are <i class="i">offset</i><span class="r"> and </span><i class="i">maxBytes</i><span class="r">:  </span><i class="i">offset</i> specifies a starting
+character position in the selection and <i class="i">maxBytes</i> gives the maximum
+number of bytes to retrieve.  The command should return a value consisting
+of at most <i class="i">maxBytes</i> of the selection, starting at position
+<i class="i">offset</i><span class="r">.  For very large selections (larger than </span><i class="i">maxBytes</i>)
+the selection will be retrieved using several invocations of <i class="i">command</i>
+with increasing <i class="i">offset</i><span class="r"> values.  If </span><i class="i">command</i> returns a string
+whose length is less than <i class="i">maxBytes</i>, the return value is assumed to
+include all of the remainder of the selection;  if the length of
+<i class="i">command</i><span class="r">&rsquo;s result is equal to </span><i class="i">maxBytes</i> then
+<i class="i">command</i> will be invoked again, until it eventually
+returns a result shorter than <i class="i">maxBytes</i><span class="r">.  The value of </span><i class="i">maxBytes</i>
+will always be relatively large (thousands of bytes).
+</p>
+<p>If <i class="i">command</i> returns an error then the selection retrieval is rejected
+just as if the selection didn&rsquo;t exist at all.
+</p>
+<p>The <i class="i">format</i> argument specifies the representation that should be
+used to transmit the selection to the requester (the second column of
+Table 2 of the ICCCM), and defaults to STRING.  If <i class="i">format</i> is
+STRING, the selection is transmitted as 8-bit ASCII characters (i.e.
+just in the form returned by <i class="i">command</i><span class="r">).  If </span><i class="i">format</i> is
+ATOM, then the return value from <i class="i">command</i> is divided into fields
+separated by white space;  each field is converted to its atom value,
+and the 32-bit atom value is transmitted instead of the atom name.
+For any other <i class="i">format</i><span class="r">, the return value from </span><i class="i">command</i> is
+divided into fields separated by white space and each field is
+converted to a 32-bit integer;  an array of integers is transmitted
+to the selection requester.
+</p>
+<p>The <i class="i">format</i> argument is needed only for compatibility with
+selection requesters that don&rsquo;t use Tk.  If the Tk toolkit is being
+used to retrieve the selection then the value is converted back to
+a string at the requesting end, so <i class="i">format</i> is
+irrelevant.
+.RE
+</p></dd>
+<dt><b class="b">selection :own </b><span class="r">?</span><i class="i">window</i><span class="r">? ?</span><i class="i">command</i>?</dt>
+<dd><p>If <i class="i">window</i> is specified, then it becomes the new selection :owner
+and the command returns an empty string as result.
+The existing owner, if any, is notified that it has lost the selection.
+If <i class="i">command</i> is specified, it is a Tcl script to execute when
+some other window claims ownership of the selection away from
+<i class="i">window</i>.
+If neither <i class="i">window</i><span class="r"> nor </span><i class="i">command</i> is specified then
+the command returns the path name of the window in this application
+that owns the selection, or an empty string if no window in this
+application owns the selection.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-31">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-31"> &para;</a></span></h4>
+<p>clear, format, handler, ICCCM, own, selection, target, type
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="send.html">send</a>, Previous: <a href="raise.html">raise</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/send.html
@@ -0,0 +1,103 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>send (GCL TK Manual)</title>
+
+<meta name="description" content="send (GCL TK Manual)">
+<meta name="keywords" content="send (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="tk.html" rel="next" title="tk">
+<link href="selection.html" rel="prev" title="selection">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="send">
+<div class="nav-panel">
+<p>
+Next: <a href="tk.html" accesskey="n" rel="next">tk</a>, Previous: <a href="selection.html" accesskey="p" rel="prev">selection</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="send-1"><span>3.18 send<a class="copiable-link" href="#send-1"> &para;</a></span></h3>
+
+<p>send \- Execute a command in a different interpreter
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-31" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-29" accesskey="2">Description</a></li>
+<li><a href="#Security" accesskey="3">Security</a></li>
+<li><a href="#Keywords-32" accesskey="4">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-31">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-31"> &para;</a></span></h4>
+<p><b class="b">send </b><i class="i">interp cmd </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-29">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-29"> &para;</a></span></h4>
+
+<p>This command arranges for <i class="i">cmd</i><span class="r"> (and </span><i class="i">arg</i>s) to be executed in the
+interpreter named by <i class="i">interp</i>.  It returns the result or
+error from that command execution.  <i class="i">Interp</i> must be the
+name of an interpreter registered on the display associated with
+the interpreter in which the command is invoked;  it need not
+be within the same process or application.  If no <i class="i">arg</i>
+arguments are present, then the command to be executed is
+contained entirely within the <i class="i">cmd</i> argument.  If one or
+more <i class="i">arg</i>s are present, they are concatenated to form the
+command to be executed, just as for the <b class="b">eval</b> Tcl command.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Security">
+<h4 class="unnumberedsubsec"><span>Security<a class="copiable-link" href="#Security"> &para;</a></span></h4>
+
+<p>The <b class="b">send</b> command is potentially a serious security loophole,
+since any application that can connect to your X server can send
+scripts to your applications.
+These incoming scripts can use Tcl to read and
+write your files and invoke subprocesses under your name.
+Host-based access control such as that provided by <b class="b">xhost</b>
+is particularly insecure, since it allows anyone with an account
+on particular hosts to connect to your server, and if disabled it
+allows anyone anywhere to connect to your server.
+In order to provide at least a small amount of
+security, Tk checks the access control being used by the server
+and rejects incoming sends unless (a) <b class="b">xhost</b>-style access control
+is enabled (i.e. only certain hosts can establish connections) and (b) the
+list of enabled hosts is empty.
+This means that applications cannot connect to your server unless
+they use some other form of authorization
+such as that provide by <b class="b">xauth</b>.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-32">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-32"> &para;</a></span></h4>
+<p>interpreter, remote execution, security, send
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="tk.html">tk</a>, Previous: <a href="selection.html">selection</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/text.html
@@ -0,0 +1,923 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>text (GCL TK Manual)</title>
+
+<meta name="description" content="text (GCL TK Manual)">
+<meta name="keywords" content="text (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Widgets.html" rel="up" title="Widgets">
+<link href="entry.html" rel="next" title="entry">
+<link href="menubutton.html" rel="prev" title="menubutton">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="text">
+<div class="nav-panel">
+<p>
+Next: <a href="entry.html" accesskey="n" rel="next">entry</a>, Previous: <a href="menubutton.html" accesskey="p" rel="prev">menubutton</a>, Up: <a href="Widgets.html" accesskey="u" rel="up">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="text-1"><span>2.9 text<a class="copiable-link" href="#text-1"> &para;</a></span></h3>
+
+<p>text \- Create and manipulate text widgets
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-8" accesskey="1">Synopsis</a></li>
+<li><a href="#Standard-Options-8" accesskey="2">Standard Options</a></li>
+<li><a href="#Arguments-for-Text" accesskey="3">Arguments for Text</a></li>
+<li><a href="#Description-5" accesskey="4">Description</a></li>
+<li><a href="#Indices-1" accesskey="5">Indices</a></li>
+<li><a href="#Tags" accesskey="6">Tags</a></li>
+<li><a href="#Marks" accesskey="7">Marks</a></li>
+<li><a href="#Windows" accesskey="8">Windows</a></li>
+<li><a href="#The-Selection" accesskey="9">The Selection</a></li>
+<li><a href="#The-Insertion-Cursor">The Insertion Cursor</a></li>
+<li><a href="#A-Text-Widget_0027s-Arguments">A Text Widget&rsquo;s Arguments</a></li>
+<li><a href="#Bindings-4">Bindings</a></li>
+<li><a href="#g_t_0022Performance-Issues_0022">&quot;Performance Issues&quot;</a></li>
+<li><a href="#Keywords-8">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-8">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-8"> &para;</a></span></h4>
+<p><b class="b">text</b><i class="i"> </i><i class="i">pathName </i><span class="r">?</span><i class="i">options</i>?
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Standard-Options-8">
+<h4 class="unnumberedsubsec"><span>Standard Options<a class="copiable-link" href="#Standard-Options-8"> &para;</a></span></h4>
+
+
+<div class="example">
+<pre class="example-preformatted">background      foreground        insertWidth      selectBorderWidth 
+borderWidth     insertBackground  padX             selectForeground  
+cursor          insertBorderWidth padY             setGrid           
+exportSelection insertOffTime     relief           yScrollCommand    
+font            insertOnTime      selectBackground 
+</pre></div>
+
+
+<p>See <a class="xref" href="options.html">options</a>, for more information.
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Arguments-for-Text">
+<h4 class="unnumberedsubsec"><span>Arguments for Text<a class="copiable-link" href="#Arguments-for-Text"> &para;</a></span></h4>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:height</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">height</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Height</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the desired height for the window, in units of characters.
+Must be at least one.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:state</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">state</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">State</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies one of two states for the text:  <b class="b">normal</b><span class="r"> or </span><b class="b">disabled</b>.
+If the text is disabled then characters may not be inserted or deleted
+and no insertion cursor will be displayed, even if the input focus is
+in the widget.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:width</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">width</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Width</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies the desired width for the window in units of characters.
+If the font doesn&rsquo;t have a uniform width then the width of the
+character &ldquo;0&rdquo; is used in translating from character units to
+screen units.
+</p></dd>
+</dl>
+
+
+<dl class="table">
+<dt><code class="code"><b class="b">:wrap</b></code></dt>
+<dd><div class="flushright"><p class="flushright-paragraph">Name=<code class="code">&quot;<b class="b">wrap</b><span class="r">&quot;</span> Class=<code class="code">&quot;</code><b class="b">Wrap</b>&quot;</code>
+</p></div><br>
+
+<p>Specifies how to handle lines in the text that are too long to be
+displayed in a single line of the text&rsquo;s window.
+The value must be <b class="b">none</b><span class="r"> or </span><b class="b">char</b><span class="r"> or </span><b class="b">word</b>.
+A wrap mode of <b class="b">none</b> means that each line of text appears as
+exactly one line on the screen;  extra characters that don&rsquo;t fit
+on the screen are not displayed.
+In the other modes each line of text will be broken up into several
+screen lines if necessary to keep all the characters visible.
+In <b class="b">char</b> mode a screen line break may occur after any character;
+in <b class="b">word</b> mode a line break will only be made at word boundaries.
+</p></dd>
+</dl>
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-5">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-5"> &para;</a></span></h4>
+
+<p>The <b class="b">text</b> command creates a new window (given by the
+<i class="i">pathName</i> argument) and makes it into a text widget.
+Additional
+options, described above, may be specified on the command line
+or in the option database
+to configure aspects of the text such as its default background color
+and relief.  The <b class="b">text</b> command returns the
+path name of the new window.
+</p>
+<p>A text widget displays one or more lines of text and allows that
+text to be edited.
+Text widgets support three different kinds of annotations on the
+text, called tags, marks, and windows.
+Tags allow different portions of the text
+to be displayed with different fonts and colors.
+In addition, Tcl commands can be associated with tags so
+that commands are invoked when particular actions such as keystrokes
+and mouse button presses occur in particular ranges of the text.
+See TAGS below for more details.
+</p>
+<p>The second form of annotation consists of marks, which are floating
+markers in the text.
+Marks are used to keep track of various interesting positions in the
+text as it is edited.
+See MARKS below for more details.
+</p>
+<p>The third form of annotation allows arbitrary windows to be displayed
+in the text widget.
+See WINDOWS below for more details.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Indices-1">
+<h4 class="unnumberedsubsec"><span>Indices<a class="copiable-link" href="#Indices-1"> &para;</a></span></h4>
+
+<p>Many of the widget commands for texts take one or more indices
+as arguments.
+An index is a string used to indicate a particular place within
+a text, such as a place to insert characters or one endpoint of a
+range of characters to delete.
+Indices have the syntax
+</p>
+<p><i class="i">base modifier modifier modifier ...</i>
+</p>
+
+<p>Where <i class="i">base</i><span class="r"> gives a starting point and the </span><i class="i">modifier</i>s
+adjust the index from the starting point (e.g. move forward or
+backward one character).  Every index must contain a <i class="i">base</i>,
+but the <i class="i">modifier</i>s are optional.
+</p>
+
+<p>The <i class="i">base</i> for an index must have one of the following forms:
+</p>
+<dl class="table">
+<dt><i class="i">line</i><b class="b">.</b><i class="i">char</i></dt>
+<dd><p>Indicates <i class="i">char</i><span class="r">&rsquo;th character on line </span><i class="i">line</i>.
+Lines are numbered from 1 for consistency with other UNIX programs
+that use this numbering scheme.
+Within a line, characters are numbered from 0.
+</p></dd>
+<dt><b class="b">@</b><i class="i">x</i><b class="b">,</b><i class="i">y</i></dt>
+<dd><p>Indicates the character that covers the pixel whose x and y coordinates
+within the text&rsquo;s window are <i class="i">x</i><span class="r"> and </span><i class="i">y</i>.
+</p></dd>
+<dt><b class="b">end</b></dt>
+<dd><p>Indicates the last character in the text, which is always a newline
+character.
+</p></dd>
+<dt><i class="i">mark</i></dt>
+<dd><p>Indicates the character just after the mark whose name is <i class="i">mark</i>.
+</p></dd>
+<dt><i class="i">tag</i><b class="b">.first</b></dt>
+<dd><p>Indicates the first character in the text that has been tagged with
+<i class="i">tag</i>.
+This form generates an error if no characters are currently tagged
+with <i class="i">tag</i>.
+</p></dd>
+<dt><i class="i">tag</i><b class="b">.last</b></dt>
+<dd><p>Indicates the character just after the last one in the text that has
+been tagged with <i class="i">tag</i>.
+This form generates an error if no characters are currently tagged
+with <i class="i">tag</i>.
+</p></dd>
+</dl>
+
+
+<p>If modifiers follow the base index, each one of them must have one
+of the forms listed below.  Keywords such as <b class="b">chars</b><span class="r"> and </span><b class="b">wordend</b>
+may be abbreviated as long as the abbreviation is unambiguous.
+</p>
+<dl class="table">
+<dt><b class="b">+ </b><i class="i">count</i><b class="b"> chars</b></dt>
+<dd><p>Adjust the index forward by <i class="i">count</i> characters, moving to later
+lines in the text if necessary.  If there are fewer than <i class="i">count</i>
+characters in the text after the current index, then set the index
+to the last character in the text.
+Spaces on either side of <i class="i">count</i> are optional.
+</p></dd>
+<dt><b class="b">-</b> <i class="i">count</i><b class="b"> chars</b></dt>
+<dd><p>Adjust the index backward by <i class="i">count</i> characters, moving to earlier
+lines in the text if necessary.  If there are fewer than <i class="i">count</i>
+characters in the text before the current index, then set the index
+to the first character in the text.
+Spaces on either side of <i class="i">count</i> are optional.
+</p></dd>
+<dt><b class="b">+ </b><i class="i">count</i><b class="b"> lines</b></dt>
+<dd><p>Adjust the index forward by <i class="i">count</i> lines, retaining the same
+character position within the line.  If there are fewer than <i class="i">count</i>
+lines after the line containing the current index, then set the index
+to refer to the same character position on the last line of the text.
+Then, if the line is not long enough to contain a character at the indicated
+character position, adjust the character position to refer to the last
+character of the line (the newline).
+Spaces on either side of <i class="i">count</i> are optional.
+</p></dd>
+<dt><b class="b">-</b> <i class="i">count</i><b class="b"> lines</b></dt>
+<dd><p>Adjust the index backward by <i class="i">count</i> lines, retaining the same
+character position within the line.  If there are fewer than <i class="i">count</i>
+lines before the line containing the current index, then set the index
+to refer to the same character position on the first line of the text.
+Then, if the line is not long enough to contain a character at the indicated
+character position, adjust the character position to refer to the last
+character of the line (the newline).
+Spaces on either side of <i class="i">count</i> are optional.
+</p></dd>
+<dt><b class="b">linestart</b></dt>
+<dd><p>Adjust the index to refer to the first character on the line.
+</p></dd>
+<dt><b class="b">lineend</b></dt>
+<dd><p>Adjust the index to refer to the last character on the line (the newline).
+</p></dd>
+<dt><b class="b">wordstart</b></dt>
+<dd><p>Adjust the index to refer to the first character of the word containing
+the current index.  A word consists of any number of adjacent characters
+that are letters, digits, or underscores, or a single character that
+is not one of these.
+</p></dd>
+<dt><b class="b">wordend</b></dt>
+<dd><p>Adjust the index to refer to the character just after the last one of the
+word containing the current index.  If the current index refers to the last
+character of the text then it is not modified.
+</p></dd>
+</dl>
+
+
+<p>If more than one modifier is present then they are applied in
+left-to-right order.  For example, the index &ldquo;\fBend \- 1 chars&rdquo;
+refers to the next-to-last character in the text and
+&ldquo;\fBinsert wordstart \- 1 c&rdquo; refers to the character just before
+the first one in the word containing the insertion cursor.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Tags">
+<h4 class="unnumberedsubsec"><span>Tags<a class="copiable-link" href="#Tags"> &para;</a></span></h4>
+
+<p>The first form of annotation in text widgets is a tag.
+A tag is a textual string that is associated with some of the characters
+in a text.
+There may be any number of tags associated with characters in a
+text.
+Each tag may refer to a single character, a range of characters, or
+several ranges of characters.
+An individual character may have any number of tags associated with it.
+</p>
+<p>A priority order is defined among tags, and this order is used in
+implementing some of the tag-related functions described below.
+When a tag is defined (by associating it with characters or setting
+its display options or binding commands to it), it is given
+a priority higher than any existing tag.
+The priority order of tags may be redefined using the
+&ldquo;<i class="i">pathName </i><b class="b">:tag :raise</b><span class="r">&rdquo; and &ldquo;</span><i class="i">pathName </i><b class="b">:tag :lower</b>&rdquo;
+widget commands.
+</p>
+<p>Tags serve three purposes in text widgets.
+First, they control the way information is displayed on the screen.
+By default, characters are displayed as determined by the
+<b class="b">background</b><span class="r">, </span><b class="b">font</b><span class="r">, and </span><b class="b">foreground</b> options for the
+text widget.
+However, display options may be associated with individual tags
+using the &ldquo;<i class="i">pathName </i><b class="b">:tag configure</b>&rdquo; widget command.
+If a character has been tagged, then the display options associated
+with the tag override the default display style.
+The following options are currently supported for tags:
+</p>
+<dl class="table">
+<dt><b class="b">:background </b><i class="i">color</i></dt>
+<dd><p><i class="i">Color</i> specifies the background color to use for characters
+associated with the tag.
+It may have any of the forms accepted by <b class="b">Tk_GetColor</b>.
+</p></dd>
+<dt><b class="b">:bgstipple </b><i class="i">bitmap</i></dt>
+<dd><p><i class="i">Bitmap</i> specifies a bitmap that is used as a stipple pattern
+for the background.
+It may have any of the forms accepted by <b class="b">Tk_GetBitmap</b>.
+If <i class="i">bitmap</i> hasn&rsquo;t been specified, or if it is specified
+as an empty string, then a solid fill will be used for the
+background.
+</p></dd>
+<dt><b class="b">:borderwidth </b><i class="i">pixels</i></dt>
+<dd><p><i class="i">Pixels</i> specifies the width of a 3-D border to draw around
+the background.
+It may have any of the forms accepted by <b class="b">Tk_GetPixels</b>.
+This option is used in conjunction with the <b class="b">:relief</b>
+option to give a 3-D appearance to the background for characters;
+it is ignored unless the <b class="b">:background</b> option
+has been set for the tag.
+</p></dd>
+<dt><b class="b">:fgstipple </b><i class="i">bitmap</i></dt>
+<dd><p><i class="i">Bitmap</i> specifies a bitmap that is used as a stipple pattern
+when drawing text and other foreground information such as
+underlines.
+It may have any of the forms accepted by <b class="b">Tk_GetBitmap</b>.
+If <i class="i">bitmap</i> hasn&rsquo;t been specified, or if it is specified
+as an empty string, then a solid fill will be used.
+</p></dd>
+<dt><b class="b">:font </b><i class="i">fontName</i></dt>
+<dd><p><i class="i">FontName</i> is the name of a font to use for drawing characters.
+It may have any of the forms accepted by <b class="b">Tk_GetFontStruct</b>.
+</p></dd>
+<dt><b class="b">:foreground </b><i class="i">color</i></dt>
+<dd><p><i class="i">Color</i> specifies the color to use when drawing text and other
+foreground information such as underlines.
+It may have any of the forms accepted by <b class="b">Tk_GetColor</b>.
+</p></dd>
+<dt><b class="b">:relief </b><i class="i">relief</i></dt>
+<dd><p>\fIRelief specifies the 3-D relief to use for drawing backgrounds,
+in any of the forms accepted by <b class="b">Tk_GetRelief</b>.
+This option is used in conjunction with the <b class="b">:borderwidth</b>
+option to give a 3-D appearance to the background for characters;
+it is ignored unless the <b class="b">:background</b> option
+has been set for the tag.
+</p></dd>
+<dt><b class="b">:underline </b><i class="i">boolean</i></dt>
+<dd><p><i class="i">Boolean</i> specifies whether or not to draw an underline underneath
+characters.
+It may have any of the forms accepted by <b class="b">Tk_GetBoolean</b>.
+</p>
+<p>If a character has several tags associated with it, and if their
+display options conflict, then the options of the highest priority
+tag are used.
+If a particular display option hasn&rsquo;t been specified for a
+particular tag, or if it is specified as an empty string, then
+that option will never be used;  the next-highest-priority
+tag&rsquo;s option will used instead.
+If no tag specifies a particular display optionl, then the default
+style for the widget will be used.
+</p>
+<p>The second purpose for tags is event bindings.
+You can associate bindings with a tag in much the same way you can
+associate bindings with a widget class:  whenever particular X
+events occur on characters with the given tag, a given
+Tcl command will be executed.
+Tag bindings can be used to give behaviors to ranges of characters;
+among other things, this allows hypertext-like
+features to be implemented.
+For details, see the description of the <b class="b">tag bind</b> widget
+command below.
+</p>
+<p>The third use for tags is in managing the selection.
+See THE SELECTION below.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Marks">
+<h4 class="unnumberedsubsec"><span>Marks<a class="copiable-link" href="#Marks"> &para;</a></span></h4>
+
+<p>The second form of annotation in text widgets is a mark.
+Marks are used for remembering particular places in a text.
+They are something like tags, in that they have names and
+they refer to places in the file, but a mark isn&rsquo;t associated
+with particular characters.
+Instead, a mark is associated with the gap between two characters.
+Only a single position may be associated with a mark at any given
+time.
+If the characters around a mark are deleted the mark will still
+remain;  it will just have new neighbor characters.
+In contrast, if the characters containing a tag are deleted then
+the tag will no longer have an association with characters in
+the file.
+Marks may be manipulated with the &ldquo;<i class="i">pathName </i><b class="b">:mark</b>&rdquo; widget
+command, and their current locations may be determined by using the
+mark name as an index in widget commands.
+</p>
+<p>The name space for marks is different from that for tags:  the
+same name may be used for both a mark and a tag, but they will refer
+to different things.
+</p>
+<p>Two marks have special significance.
+First, the mark <b class="b">insert</b> is associated with the insertion cursor,
+as described under THE INSERTION CURSOR below.
+Second, the mark <b class="b">current</b> is associated with the character
+closest to the mouse and is adjusted automatically to track the
+mouse position and any changes to the text in the widget (one
+exception:  <b class="b">current</b> is not updated in response to mouse
+motions if a mouse button is down;  the update will be deferred
+until all mouse buttons have been released).
+Neither of these special marks may be unset.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Windows">
+<h4 class="unnumberedsubsec"><span>Windows<a class="copiable-link" href="#Windows"> &para;</a></span></h4>
+
+<p>The third form of annotation in text widgets is a window.
+Window support isn&rsquo;t implemented yet, but when it is it will be
+described here.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="The-Selection">
+<h4 class="unnumberedsubsec"><span>The Selection<a class="copiable-link" href="#The-Selection"> &para;</a></span></h4>
+
+<p>Text widgets support the standard X selection.
+Selection support is implemented via tags.
+If the <b class="b">exportSelection</b> option for the text widget is true
+then the <b class="b">sel</b> tag will be associated with the selection:
+</p><ul class="itemize">
+<li>[1]
+Whenever characters are tagged with <b class="b">sel</b> the text widget
+will claim ownership of the selection.
+</li><li>[2]
+Attempts to retrieve the
+selection will be serviced by the text widget, returning all the
+charaters with the <b class="b">sel</b> tag.
+</li><li>[3]
+If the selection is claimed away by another application or by another
+window within this application, then the <b class="b">sel</b> tag will be removed
+from all characters in the text.
+</li></ul>
+
+<p>The <b class="b">sel</b> tag is automatically defined when a text widget is
+created, and it may not be deleted with the &ldquo;<i class="i">pathName </i><b class="b">:tag delete</b>&rdquo;
+widget command.  Furthermore, the <b class="b">selectBackground</b>,
+<b class="b">selectBorderWidth</b><span class="r">, and </span><b class="b">selectForeground</b> options for
+the text widget are tied to the <b class="b">:background</b>,
+<b class="b">:borderwidth</b><span class="r">, and </span><b class="b">:foreground</b><span class="r"> options for the </span><b class="b">sel</b>
+tag:  changes in either will automatically be reflected in the
+other.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="The-Insertion-Cursor">
+<h4 class="unnumberedsubsec"><span>The Insertion Cursor<a class="copiable-link" href="#The-Insertion-Cursor"> &para;</a></span></h4>
+
+<p>The mark named <b class="b">insert</b> has special significance in text widgets.
+It is defined automatically when a text widget is created and it
+may not be unset with the &ldquo;<i class="i">pathName </i><b class="b">:mark unset</b>&rdquo; widget
+command.
+The <b class="b">insert</b> mark represents the position of the insertion
+cursor, and the insertion cursor will automatically be drawn at
+this point whenever the text widget has the input focus.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="A-Text-Widget_0027s-Arguments">
+<h4 class="unnumberedsubsec"><span>A Text Widget&rsquo;s Arguments<a class="copiable-link" href="#A-Text-Widget_0027s-Arguments"> &para;</a></span></h4>
+
+<p>The <b class="b">text</b> command creates a new Tcl command whose
+name is the same as the path name of the text&rsquo;s window.  This
+command may be used to invoke various
+operations on the widget.  It has the following general form:
+</p>
+<div class="example">
+<pre class="example-preformatted"><i class="i">pathName option </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</pre></div>
+
+<p><i class="i">PathName</i> is the name of the command, which is the same as
+the text widget&rsquo;s path name.  <i class="i">Option</i><span class="r"> and the </span><i class="i">arg</i>s
+determine the exact behavior of the command.  The following
+commands are possible for text widgets:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:compare</b><span class="r"> </span><i class="i">index1 op index2</i></dt>
+<dd><p>Compares the indices given by <i class="i">index1</i><span class="r"> and </span><i class="i">index2</i> according
+to the relational operator given by <i class="i">op</i>, and returns 1 if
+the relationship is satisfied and 0 if it isn&rsquo;t.
+<i class="i">Op</i> must be one of the operators &lt;, &lt;=, ==, &gt;=, &gt;, or !=.
+If <i class="i">op</i> is == then 1 is returned if the two indices refer to
+the same character, if <i class="i">op</i><span class="r"> is &lt; then 1 is returned if </span><i class="i">index1</i>
+refers to an earlier character in the text than <i class="i">index2</i>, and
+so on.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:configure</b><span class="r"> ?</span><i class="i">option</i><span class="r">? </span><i class="i">?value option value ...</i>?</dt>
+<dd><p>Query or modify the configuration options of the widget.
+If no <i class="i">option</i> is specified, returns a list describing all of
+the available options for <i class="i">pathName</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).  If <i class="i">option</i> is specified
+with no <i class="i">value</i>, then the command returns a list describing the
+one named option (this list will be identical to the corresponding
+sublist of the value returned if no <i class="i">option</i> is specified).  If
+one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given widget option(s) to have the given value(s);  in
+this case the command returns an empty string.
+<i class="i">Option</i><span class="r"> may have any of the values accepted by the </span><b class="b">text</b>
+command.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:debug </b><span class="r">?</span><i class="i">boolean</i>?</dt>
+<dd><p>If <i class="i">boolean</i> is specified, then it must have one of the true or
+false values accepted by Tcl_GetBoolean.
+If the value is a true one then internal consistency checks will be
+turned on in the B-tree code associated with text widgets.
+If <i class="i">boolean</i> has a false value then the debugging checks will
+be turned off.
+In either case the command returns an empty string.
+If <i class="i">boolean</i><span class="r"> is not specified then the command returns </span><b class="b">on</b>
+or <b class="b">off</b> to indicate whether or not debugging is turned on.
+There is a single debugging switch shared by all text widgets:  turning
+debugging on or off in any widget turns it on or off for all widgets.
+For widgets with large amounts of text, the consistency checks may
+cause a noticeable slow-down.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:delete </b><i class="i">index1 </i><span class="r">?</span><i class="i">index2</i>?</dt>
+<dd><p>Delete a range of characters from the text.
+If both <i class="i">index1</i><span class="r"> and </span><i class="i">index2</i> are specified, then delete
+all the characters starting with the one given by <i class="i">index1</i>
+and stopping just before <i class="i">index2</i> (i.e. the character at
+<i class="i">index2</i> is not deleted).
+If <i class="i">index2</i> doesn&rsquo;t specify a position later in the text
+than <i class="i">index1</i> then no characters are deleted.
+If <i class="i">index2</i> isn&rsquo;t specified then the single character at
+<i class="i">index1</i> is deleted.
+It is not allowable to delete characters in a way that would leave
+the text without a newline as the last character.
+The command returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:get </b><i class="i">index1 </i><span class="r">?</span><i class="i">index2</i>?</dt>
+<dd><p>Return a range of characters from the text.
+The return value will be all the characters in the text starting
+with the one whose index is <i class="i">index1</i> and ending just before
+the one whose index is <i class="i">index2</i><span class="r"> (the character at </span><i class="i">index2</i>
+will not be returned).
+If <i class="i">index2</i><span class="r"> is omitted then the single character at </span><i class="i">index1</i>
+is returned.
+If there are no characters in the specified range (e.g. <i class="i">index1</i>
+is past the end of the file or <i class="i">index2</i> is less than or equal
+to <i class="i">index1</i>) then an empty string is returned.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:index </b><i class="i">index</i></dt>
+<dd><p>Returns the position corresponding to <i class="i">index</i> in the form
+<i class="i">line.char</i><span class="r"> where </span><i class="i">line</i><span class="r"> is the line number and </span><i class="i">char</i>
+is the character number.
+<i class="i">Index</i> may have any of the forms described under INDICES above.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:insert </b>\fIindex chars</dt>
+<dd><p>Inserts <i class="i">chars</i> into the text just before the character at
+<i class="i">index</i> and returns an empty string.
+It is not possible to insert characters after the last newline
+of the text.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:mark </b><i class="i">option </i><span class="r">?</span><i class="i">arg arg ...</i>?</dt>
+<dd><p>This command is used to manipulate marks.  The exact behavior of
+the command depends on the <i class="i">option</i> argument that follows
+the <b class="b">mark</b> argument.  The following forms of the command
+are currently supported:
+</p><dl class="table">
+<dt><i class="i">pathName </i><b class="b">:mark :names</b></dt>
+<dd><p>Returns a list whose elements are the names of all the marks that
+are currently set.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:mark :set </b><i class="i">markName index</i></dt>
+<dd><p>Sets the mark named <i class="i">markName</i> to a position just before the
+character at <i class="i">index</i>.
+If <i class="i">markName</i> already exists, it is moved from its old position;
+if it doesn&rsquo;t exist, a new mark is created.
+This command returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:mark :unset </b><i class="i">markName </i><span class="r">?</span><i class="i">markName markName ...</i>?</dt>
+<dd><p>Remove the mark corresponding to each of the <i class="i">markName</i> arguments.
+The removed marks will not be usable in indices and will not be
+returned by future calls to &ldquo;<i class="i">pathName </i><b class="b">:mark names</b>&rdquo;.
+This command returns an empty string.
+</p></dd>
+</dl>
+
+</dd>
+<dt><i class="i">pathName </i><b class="b">:scan</b><span class="r"> </span><i class="i">option args</i></dt>
+<dd><p>This command is used to implement scanning on texts.  It has
+two forms, depending on <i class="i">option</i>:
+</p><dl class="table">
+<dt><i class="i">pathName </i><b class="b">:scan :mark </b><i class="i">y</i></dt>
+<dd><p>Records <i class="i">y</i> and the current view in the text window;  used in
+conjunction with later <b class="b">scan dragto</b> commands.  Typically this
+command is associated with a mouse button press in the widget.  It
+returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:scan :dragto </b><i class="i">y</i></dt>
+<dd><p>This command computes the difference between its <i class="i">y</i> argument
+and the <i class="i">y</i><span class="r"> argument to the last </span><b class="b">scan mark</b> command for
+the widget.  It then adjusts the view up or down by 10 times the
+difference in y-coordinates.  This command is typically associated
+with mouse motion events in the widget, to produce the effect of
+dragging the text at high speed through the window.  The return
+value is an empty string.
+</p></dd>
+</dl>
+
+</dd>
+<dt><i class="i">pathName </i><b class="b">:tag </b><i class="i">option </i><span class="r">?</span><i class="i">arg arg ...</i>?</dt>
+<dd><p>This command is used to manipulate tags.  The exact behavior of the
+command depends on the <i class="i">option</i> argument that follows the
+<b class="b">tag</b> argument.  The following forms of the command are currently
+supported:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:tag :add </b><i class="i">tagName index1 </i><span class="r">?</span><i class="i">index2</i>?</dt>
+<dd><p>Associate the tag <i class="i">tagName</i> with all of the characters starting
+with <i class="i">index1</i> and ending just before
+<i class="i">index2</i><span class="r"> (the character at </span><i class="i">index2</i> isn&rsquo;t tagged).
+If <i class="i">index2</i> is omitted then the single character at
+<i class="i">index1</i> is tagged.
+If there are no characters in the specified range (e.g. <i class="i">index1</i>
+is past the end of the file or <i class="i">index2</i> is less than or equal
+to <i class="i">index1</i>) then the command has no effect.
+This command returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:tag :bind </b><i class="i">tagName</i><span class="r"> ?</span><i class="i">sequence</i><span class="r">? ?</span><i class="i">command</i>?</dt>
+<dd><p>This command associates <i class="i">command</i> with the tag given by
+<i class="i">tagName</i>.
+Whenever the event sequence given by <i class="i">sequence</i> occurs for a
+character that has been tagged with <i class="i">tagName</i>,
+the command will be invoked.
+This widget command is similar to the <b class="b">bind</b> command except that
+it operates on characters in a text rather than entire widgets.
+See the <b class="b">bind</b> manual entry for complete details
+on the syntax of <i class="i">sequence</i> and the substitutions performed
+on <i class="i">command</i> before invoking it.
+If all arguments are specified then a new binding is created, replacing
+any existing binding for the same <i class="i">sequence</i><span class="r"> and </span><i class="i">tagName</i>
+(if the first character of <i class="i">command</i><span class="r"> is &ldquo;+&rdquo; then </span><i class="i">command</i>
+augments an existing binding rather than replacing it).
+In this case the return value is an empty string.
+If <i class="i">command</i><span class="r"> is omitted then the command returns the </span><i class="i">command</i>
+associated with <i class="i">tagName</i><span class="r"> and </span><i class="i">sequence</i> (an error occurs
+if there is no such binding).
+If both <i class="i">command</i><span class="r"> and </span><i class="i">sequence</i> are omitted then the command
+returns a list of all the sequences for which bindings have been
+defined for <i class="i">tagName</i>.
+</p>
+
+<p>The only events for which bindings may be specified are those related
+to the mouse and keyboard, such as <b class="b">Enter</b><span class="r">, </span><b class="b">Leave</b>,
+<b class="b">ButtonPress</b><span class="r">, </span><b class="b">Motion</b><span class="r">, and </span><b class="b">KeyPress</b>.
+Event bindings for a text widget use the <b class="b">current</b> mark
+described under MARKS above.
+<b class="b">Enter</b> events trigger for a character when it
+becomes the current character (i.e. the <b class="b">current</b> mark moves
+to just in front of that character).
+<b class="b">Leave</b> events trigger for a character when it ceases to be
+the current item (i.e. the <b class="b">current</b> mark moves away from
+that character, or the character is deleted).
+These events are different than <b class="b">Enter</b><span class="r"> and </span><b class="b">Leave</b>
+events for windows.
+Mouse and keyboard events are directed to the current character.
+</p>
+
+<p>It is possible for the current character to have multiple tags,
+and for each of them to have a binding for a particular event
+sequence.
+When this occurs, the binding from the highest priority tag is
+used.
+If a particular tag doesn&rsquo;t have a binding that matches an
+event, then the tag is ignored and tags with lower priority
+will be checked.
+</p>
+
+<p>If bindings are created for the widget as a whole using the
+<b class="b">bind</b> command, then those bindings will supplement the
+tag bindings.
+This means that a single event can trigger two Tcl scripts,
+one for a widget-level binding and one for a tag-level
+binding.
+</p>
+
+</dd>
+<dt><i class="i">pathName </i><b class="b">:tag :configure </b><i class="i">tagName</i><span class="r"> ?</span><i class="i">option</i><span class="r">? ?</span><i class="i">value</i><span class="r">? ?</span><i class="i">option value ...</i>?</dt>
+<dd><p>This command is similar to the <b class="b">configure</b> widget command except
+that it modifies options associated with the tag given by <i class="i">tagName</i>
+instead of modifying options for the overall text widget.
+If no <i class="i">option</i> is specified, the command returns a list describing
+all of the available options for <i class="i">tagName</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b>
+for information on the format of this list).
+If <i class="i">option</i><span class="r"> is specified with no </span><i class="i">value</i>, then the command returns
+a list describing the one named option (this list will be identical to
+the corresponding sublist of the value returned if no <i class="i">option</i>
+is specified).
+If one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given option(s) to have the given value(s) in <i class="i">tagName</i>;
+in this case the command returns an empty string.
+See TAGS above for details on the options available for tags.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:tag :delete </b><i class="i">tagName </i><span class="r">?</span><i class="i">tagName ...</i>?</dt>
+<dd><p>Deletes all tag information for each of the <i class="i">tagName</i>
+arguments.
+The command removes the tags from all characters in the file
+and also deletes any other information associated with the tags,
+such as bindings and display information.
+The command returns an empty string.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:tag :lower </b><i class="i">tagName </i><span class="r">?</span><i class="i">belowThis</i>?</dt>
+<dd><p>Changes the priority of tag <i class="i">tagName</i> so that it is just lower
+in priority than the tag whose name is <i class="i">belowThis</i>.
+If <i class="i">belowThis</i><span class="r"> is omitted, then </span><i class="i">tagName</i>&rsquo;s priority
+is changed to make it lowest priority of all tags.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:tag :names </b><span class="r">?</span><i class="i">index</i>?</dt>
+<dd><p>Returns a list whose elements are the names of all the tags that
+are active at the character position given by <i class="i">index</i>.
+If <i class="i">index</i> is omitted, then the return value will describe
+all of the tags that exist for the text (this includes all tags
+that have been named in a &ldquo;<i class="i">pathName </i><b class="b">:tag</b>&rdquo; widget
+command but haven&rsquo;t been deleted by a &ldquo;<i class="i">pathName </i><b class="b">:tag :delete</b>&rdquo;
+widget command, even if no characters are currently marked with
+the tag).
+The list will be sorted in order from lowest priority to highest
+priority.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:tag :nextrange </b><i class="i">tagName index1 </i><span class="r">?</span><i class="i">index2</i>?</dt>
+<dd><p>This command searches the text for a range of characters tagged
+with <i class="i">tagName</i> where the first character of the range is
+no earlier than the character at <i class="i">index1</i> and no later than
+the character just before <i class="i">index2</i> (a range starting at
+<i class="i">index2</i> will not be considered).
+If several matching ranges exist, the first one is chosen.
+The command&rsquo;s return value is a list containing
+two elements, which are the index of the first character of the
+range and the index of the character just after the last one in
+the range.
+If no matching range is found then the return value is an
+empty string.
+If <i class="i">index2</i> is not given then it defaults to the end of the text.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:tag :raise </b><i class="i">tagName </i><span class="r">?</span><i class="i">aboveThis</i>?</dt>
+<dd><p>Changes the priority of tag <i class="i">tagName</i> so that it is just higher
+in priority than the tag whose name is <i class="i">aboveThis</i>.
+If <i class="i">aboveThis</i><span class="r"> is omitted, then </span><i class="i">tagName</i>&rsquo;s priority
+is changed to make it highest priority of all tags.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:tag :ranges </b><i class="i">tagName</i></dt>
+<dd><p>Returns a list describing all of the ranges of text that have been
+tagged with <i class="i">tagName</i>.
+The first two elements of the list describe the first tagged range
+in the text, the next two elements describe the second range, and
+so on.
+The first element of each pair contains the index of the first
+character of the range, and the second element of the pair contains
+the index of the character just after the last one in the
+range.
+If there are no characters tagged with <i class="i">tag</i> then an
+empty string is returned.
+</p></dd>
+<dt><i class="i">pathName </i><b class="b">:tag :remove </b><i class="i">tagName index1 </i><span class="r">?</span><i class="i">index2</i>?</dt>
+<dd><p>Remove the tag <i class="i">tagName</i> from all of the characters starting
+at <i class="i">index1</i> and ending just before
+<i class="i">index2</i><span class="r"> (the character at </span><i class="i">index2</i> isn&rsquo;t affected).
+If <i class="i">index2</i> is omitted then the single character at
+<i class="i">index1</i> is untagged.
+If there are no characters in the specified range (e.g. <i class="i">index1</i>
+is past the end of the file or <i class="i">index2</i> is less than or equal
+to <i class="i">index1</i>) then the command has no effect.
+This command returns an empty string.
+</p>
+</dd>
+</dl>
+</dd>
+<dt><i class="i">pathName </i><b class="b">:yview </b><span class="r">?</span><b class="b">:pickplace</b><span class="r">? </span><i class="i">what</i></dt>
+<dd><p>This command changes the view in the widget&rsquo;s window so that the line
+given by <i class="i">what</i> is visible in the window.
+<i class="i">What</i> may be either an absolute line number, where 0 corresponds
+to the first line of the file, or an index with any of the forms
+described under INDICES above.
+The first form (absolute line number) is used in the commands issued
+by scrollbars to control the widget&rsquo;s view.
+If the <b class="b">:pickplace</b><span class="r"> option isn&rsquo;t specified then </span><i class="i">what</i> will
+appear at the top of the window.
+If <b class="b">:pickplace</b> is specified then the widget chooses where
+<i class="i">what</i> appears in the window:
+</p><ul class="itemize">
+<li>[1]
+If <i class="i">what</i> is already visible somewhere in the window then the
+command does nothing.
+</li><li>[2]
+If <i class="i">what</i> is only a few lines off-screen above the window then
+it will be positioned at the top of the window.
+</li><li>[3]
+If <i class="i">what</i> is only a few lines off-screen below the window then
+it will be positioned at the bottom of the window.
+</li><li>[4]
+Otherwise, <i class="i">what</i> will be centered in the window.
+</li></ul>
+
+<p>The <b class="b">:pickplace</b> option is typically used after inserting text
+to make sure that the insertion cursor is still visible on the screen.
+This command returns an empty string.
+</p></dd>
+</dl>
+
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Bindings-4">
+<h4 class="unnumberedsubsec"><span>Bindings<a class="copiable-link" href="#Bindings-4"> &para;</a></span></h4>
+
+<p>Tk automatically creates class bindings for texts that give them
+the following default behavior:
+</p><ul class="itemize">
+<li>[1]
+Pressing mouse button 1 in an text positions the insertion cursor
+just before the character underneath the mouse cursor and sets the
+input focus to this widget.
+</li><li>[2]
+Dragging with mouse button 1 strokes out a selection between
+the insertion cursor and the character under the mouse.
+</li><li>[3]
+If you double-press mouse button 1 then the word under the mouse cursor
+will be selected, the insertion cursor will be positioned at the
+beginning of the word, and dragging the mouse will stroke out a selection
+whole words at a time.
+</li><li>[4]
+If you triple-press mouse button 1 then the line under the mouse cursor
+will be selected, the insertion cursor will be positioned at the
+beginning of the line, and dragging the mouse will stroke out a selection
+whole line at a time.
+</li><li>[5]
+The ends of the selection can be adjusted by dragging with mouse
+button 1 while the shift key is down;  this will adjust the end
+of the selection that was nearest to the mouse cursor when button
+1 was pressed.  If the selection was made in word or line mode then
+it will be adjusted in this same mode.
+</li><li>[6]
+The view in the text can be adjusted by dragging with mouse button 2.
+</li><li>[7]
+If the input focus is in a text widget and characters are typed on the
+keyboard, the characters are inserted just before the insertion cursor.
+</li><li>[8]
+Control+h and the Backspace and Delete keys erase the character just
+before the insertion cursor.
+</li><li>[9]
+Control+v inserts the current selection just before the insertion cursor.
+</li><li>[10]
+Control+d deletes the selected characters;  an error occurs if the selection
+is not in this widget.
+</li></ul>
+
+<p>If the text is disabled using the <b class="b">state</b> option, then the text&rsquo;s
+view can still be adjusted and text in the text can still be selected,
+but no insertion cursor will be displayed and no text modifications will
+take place.
+</p>
+<p>The behavior of texts can be changed by defining new bindings for
+individual widgets or by redefining the class bindings.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022Performance-Issues_0022">
+<h4 class="unnumberedsubsec"><span>&quot;Performance Issues&quot;<a class="copiable-link" href="#g_t_0022Performance-Issues_0022"> &para;</a></span></h4>
+
+<p>Text widgets should run efficiently under a variety
+of conditions.  The text widget uses about 2-3 bytes of
+main memory for each byte of text, so texts containing a megabyte
+or more should be practical on most workstations.
+Text is represented internally with a modified B-tree structure
+that makes operations relatively efficient even with large texts.
+Tags are included in the B-tree structure in a way that allows
+tags to span large ranges or have many disjoint smaller ranges
+without loss of efficiency.
+Marks are also implemented in a way that allows large numbers of
+marks.
+The only known mode of operation where a text widget may not run
+efficiently is if it has a very large number of different tags.
+Hundreds of tags should be fine, or even a thousand,
+but tens of thousands of tags will make texts consume a lot of
+memory and run slowly.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-8">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-8"> &para;</a></span></h4>
+<p>text, widget
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="entry.html">entry</a>, Previous: <a href="menubutton.html">menubutton</a>, Up: <a href="Widgets.html">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/tk.html
@@ -0,0 +1,106 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>tk (GCL TK Manual)</title>
+
+<meta name="description" content="tk (GCL TK Manual)">
+<meta name="keywords" content="tk (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="tkerror.html" rel="next" title="tkerror">
+<link href="send.html" rel="prev" title="send">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="tk">
+<div class="nav-panel">
+<p>
+Next: <a href="tkerror.html" accesskey="n" rel="next">tkerror</a>, Previous: <a href="send.html" accesskey="p" rel="prev">send</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="tk-1"><span>3.19 tk<a class="copiable-link" href="#tk-1"> &para;</a></span></h3>
+
+<p>tk \- Manipulate Tk internal state
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-32" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-30" accesskey="2">Description</a></li>
+<li><a href="#Keywords-33" accesskey="3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-32">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-32"> &para;</a></span></h4>
+<p><b class="b">tk</b><span class="r"> </span><i class="i">option </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-30">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-30"> &para;</a></span></h4>
+
+<p>The <b class="b">tk</b> command provides access to miscellaneous
+elements of Tk&rsquo;s internal state.
+Most of the information manipulated by this command pertains to the
+application as a whole, or to a screen or display, rather than to a
+particular window.
+The command can take any of a number of different forms
+depending on the <i class="i">option</i> argument.  The legal forms are:
+</p>
+<dl class="table">
+<dt><b class="b">tk :colormodel </b><i class="i">window</i><span class="r"> ?</span><i class="i">newValue</i>?</dt>
+<dd><p>If <i class="i">newValue</i> isn&rsquo;t specified, this command returns the current
+color model in use for <i class="i">window</i>&rsquo;s screen, which will be either
+<b class="b">color</b><span class="r"> or </span><b class="b">monochrome</b>.
+If <i class="i">newValue</i><span class="r"> is specified, then it must be either </span><b class="b">color</b>
+or <b class="b">monochrome</b> or an abbreviation of one of them;
+the color model for <i class="i">window</i>&rsquo;s screen is set to this value.
+</p></dd>
+</dl>
+
+
+<p>The color model is used by Tk and its widgets to determine whether
+it should display in black and white only or use colors.
+A single color model is shared by all of the windows managed by one
+process on a given screen.
+The color model for a screen is set initially by Tk to <b class="b">monochrome</b>
+if the display has four or fewer bit planes and to <b class="b">color</b> otherwise.
+The color model will automatically be changed from <b class="b">color</b> to
+<b class="b">monochrome</b> if Tk fails to allocate a color because all entries
+in the colormap were in use.
+An application can change its own color model at any time (e.g. it
+might change the model to <b class="b">monochrome</b> in order to conserve
+colormap entries, or it might set the model to <b class="b">color</b>
+to use color on a four-bit display in special circumstances), but
+an application is not allowed to change the color model to <b class="b">color</b>
+unless the screen has at least two bit planes.
+.RE
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-33">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-33"> &para;</a></span></h4>
+<p>color model, internal state
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="tkerror.html">tkerror</a>, Previous: <a href="send.html">send</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/tk_002ddialog.html
@@ -0,0 +1,111 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>tk-dialog (GCL TK Manual)</title>
+
+<meta name="description" content="tk-dialog (GCL TK Manual)">
+<meta name="keywords" content="tk-dialog (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="exit.html" rel="next" title="exit">
+<link href="destroy.html" rel="prev" title="destroy">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="tk_002ddialog">
+<div class="nav-panel">
+<p>
+Next: <a href="exit.html" accesskey="n" rel="next">exit</a>, Previous: <a href="destroy.html" accesskey="p" rel="prev">destroy</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="tk_002ddialog-1"><span>3.4 tk-dialog<a class="copiable-link" href="#tk_002ddialog-1"> &para;</a></span></h3>
+
+<p>tk-dialog \- Create modal dialog and wait for response
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-18" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-15" accesskey="2">Description</a></li>
+<li><a href="#Keywords-18" accesskey="3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-18">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-18"> &para;</a></span></h4>
+<p><b class="b">tk-dialog </b><i class="i">window title text bitmap default string string ...</i>
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-15">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-15"> &para;</a></span></h4>
+
+<p>This procedure is part of the Tk script library.
+Its arguments describe a dialog box:
+</p>
+<dl class="table">
+<dt><i class="i">window</i></dt>
+<dd><p>Name of top-level window to use for dialog.  Any existing window
+by this name is destroyed.
+</p></dd>
+<dt><i class="i">title</i></dt>
+<dd><p>Text to appear in the window manager&rsquo;s title bar for the dialog.
+</p></dd>
+<dt><i class="i">text</i></dt>
+<dd><p>Message to appear in the top portion of the dialog box.
+</p></dd>
+<dt><i class="i">bitmap</i></dt>
+<dd><p>If non-empty, specifies a bitmap to display in the top portion of
+the dialog, to the left of the text.
+If this is an empty string then no bitmap is displayed in the dialog.
+</p></dd>
+<dt><i class="i">default</i></dt>
+<dd><p>If this is an integer greater than or equal to zero, then it gives
+the index of the button that is to be the default button for the dialog
+(0 for the leftmost button, and so on).
+If less than zero or an empty string then there won&rsquo;t be any default
+button.
+</p></dd>
+<dt><i class="i">string</i></dt>
+<dd><p>There will be one button for each of these arguments.
+Each <i class="i">string</i> specifies text to display in a button,
+in order from left to right.
+</p>
+<p>After creating a dialog box, <b class="b">tk-dialog</b> waits for the user to
+select one of the buttons either by clicking on the button with the
+mouse or by typing return to invoke the default button (if any).
+Then it returns the index of the selected button:  0 for the leftmost
+button, 1 for the button next to it, and so on.
+</p>
+<p>While waiting for the user to respond, <b class="b">tk-dialog</b> sets a local
+grab.  This prevents the user from interacting with the application
+in any way except to invoke the dialog box.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-18">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-18"> &para;</a></span></h4>
+<p>bitmap, dialog, modal
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="exit.html">exit</a>, Previous: <a href="destroy.html">destroy</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/tk_002dlistbox_002dsingle_002dselect.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>tk-listbox-single-select (GCL TK Manual)</title>
+
+<meta name="description" content="tk-listbox-single-select (GCL TK Manual)">
+<meta name="keywords" content="tk-listbox-single-select (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="lower.html" rel="next" title="lower">
+<link href="grab.html" rel="prev" title="grab">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="tk_002dlistbox_002dsingle_002dselect">
+<div class="nav-panel">
+<p>
+Next: <a href="lower.html" accesskey="n" rel="next">lower</a>, Previous: <a href="grab.html" accesskey="p" rel="prev">grab</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="tk_002dlistbox_002dsingle_002dselect-1"><span>3.8 tk-listbox-single-select<a class="copiable-link" href="#tk_002dlistbox_002dsingle_002dselect-1"> &para;</a></span></h3>
+
+<p>tk-listbox-single-select \- Allow only one selected element in listbox(es)
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-22" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-19" accesskey="2">Description</a></li>
+<li><a href="#Keywords-22" accesskey="3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-22">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-22"> &para;</a></span></h4>
+<p><b class="b">tk-listbox-single-select </b><i class="i">arg </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-19">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-19"> &para;</a></span></h4>
+
+<p>This command is a Tcl procedure provided as part of the Tk script library.
+It takes as arguments the path names of one or more listbox widgets,
+or the value <b class="b">Listbox</b>.
+For each named widget, <b class="b">tk-listbox-single-select</b> modifies the
+bindings of the widget so that only a single element may be selected
+at a time (the normal configuration allows multiple elements to be
+selected).
+If the keyword <b class="b">Listbox</b><span class="r"> is among the </span><i class="i">window</i> arguments,
+then the class bindings for listboxes are changed so that all
+listboxes have the one-selection-at-a-time behavior.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-22">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-22"> &para;</a></span></h4>
+<p>listbox, selection
+</p></div>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/tk_002dmenu_002dbar.html
@@ -0,0 +1,191 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>tk-menu-bar (GCL TK Manual)</title>
+
+<meta name="description" content="tk-menu-bar (GCL TK Manual)">
+<meta name="keywords" content="tk-menu-bar (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="option.html" rel="next" title="option">
+<link href="lower.html" rel="prev" title="lower">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="tk_002dmenu_002dbar">
+<div class="nav-panel">
+<p>
+Next: <a href="option.html" accesskey="n" rel="next">option</a>, Previous: <a href="lower.html" accesskey="p" rel="prev">lower</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="tk_002dmenu_002dbar-1"><span>3.10 tk-menu-bar<a class="copiable-link" href="#tk_002dmenu_002dbar-1"> &para;</a></span></h3>
+
+<p>tk-menu-bar, tk_bindForTraversal \- Support for menu bars
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-24" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-21" accesskey="2">Description</a></li>
+<li><a href="#g_t_0022Menu-Traversal-Bindings_0022" accesskey="3">&quot;Menu Traversal Bindings&quot;</a></li>
+<li><a href="#Keywords-24" accesskey="4">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-24">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-24"> &para;</a></span></h4>
+<p><b class="b">tk-menu-bar </b><i class="i">frame </i><span class="r">?</span><i class="i">menu menu ...</i>?
+</p><br>
+<p><b class="b">tk_bindForTraversal </b><i class="i">arg arg ... </i>
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-21">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-21"> &para;</a></span></h4>
+
+<p>These two commands are Tcl procedures in the Tk script library.
+They provide support for menu bars.
+A menu bar is a frame that contains a collection of menu buttons that
+work together, so that the user can scan from one menu to another with
+the mouse: if the mouse button is pressed over one menubutton (causing it
+to post its menu) and the mouse is moved over another menubutton
+in the same menu bar without releasing the mouse button, then the
+menu of the first menubutton is unposted and the menu of the
+new menubutton is posted instead.
+Menus in a menu bar can also be accessed using keyboard traversal (i.e.
+by typing keystrokes instead of using the mouse).
+In order for an application to use these procedures, it must do three
+things, which are described in the paragraphs below.
+</p>
+<p>First, each application must call <b class="b">tk-menu-bar</b> to provide information
+about the menubar.
+The <i class="i">frame</i> argument gives the path name of the frame that contains
+all of the menu buttons, and the <i class="i">menu</i> arguments give path names
+for all of the menu buttons associated with the menu bar.
+Normally <i class="i">frame</i><span class="r"> is the parent of each of the </span><i class="i">menu</i>&rsquo;s.
+This need not be the case, but <i class="i">frame</i> must be an ancestor of
+each of the <i class="i">menu</i>&rsquo;s in order for grabs to work correctly when
+the mouse is used to pull down menus.
+The order of the <i class="i">menu</i> arguments determines the traversal order
+for the menu buttons.
+If <b class="b">tk-menu-bar</b><span class="r"> is called without any </span><i class="i">menu</i> arguments, it
+returns a list containing the current menu buttons for <i class="i">frame</i>,
+or an empty string if <i class="i">frame</i> isn&rsquo;t currently set up as a menu bar.
+If <b class="b">tk-menu-bar</b><span class="r"> is called with a single </span><i class="i">menu</i> argument
+consisting of an empty string, any menubar information for <i class="i">frame</i>
+is removed;  from now on the menu buttons will function independently
+without keyboard traversal.
+Only one menu bar may be defined at a time within each top-level window.
+</p>
+<p>The second thing an application must do is to identify the traversal
+characters for menu buttons and menu entries.
+This is done by underlining those characters using the
+<b class="b">:underline</b> options for the widgets.
+The menu traversal system uses this information to traverse the
+menus under keyboard control (see below).
+</p>
+<p>The third thing that an application must do
+is to make sure that the input focus is always in a window that
+has been configured to support menu traversal.
+If the input focus is <b class="b">none</b> then input characters will
+be discarded and no menu traversal will be possible.
+If you have no other place to set the focus, set it to the menubar
+widget:  <b class="b">tk-menu-bar</b><span class="r"> creates bindings for its </span><i class="i">frame</i> argument to
+support menu traversal.
+</p>
+<p>The Tk startup scripts configure all the Tk widget classes with
+bindings to support menu traversal, so menu traversal will be possible
+regardless of which widget has the focus.
+If your application defines new classes of widgets that support the
+input focus, then you should call <b class="b">tk_bindForTraversal</b> for
+each of these classes.
+<b class="b">Tk_bindForTraversal</b> takes any number of arguments, each of
+which is a widget path name or widget class name.
+It sets up bindings for all the named widgets and
+classes so that the menu traversal system will be invoked when
+appropriate keystrokes are typed in those widgets or classes.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022Menu-Traversal-Bindings_0022">
+<h4 class="unnumberedsubsec"><span>&quot;Menu Traversal Bindings&quot;<a class="copiable-link" href="#g_t_0022Menu-Traversal-Bindings_0022"> &para;</a></span></h4>
+
+<p>Once an application has made the three arrangements described
+above, menu traversal will be available.
+At any given time, the only menus available for traversal
+are those associated with the top-level window containing the
+input focus.
+Menu traversal is initiated by one of the following actions:
+</p><ul class="itemize">
+<li>[1]
+If &lt;F10&gt; is typed, then the first menu button in the list for the
+top-level window is posted and the first entry within that
+menu is selected.
+</li><li>[2]
+If &lt;Alt-<i class="i">key</i><span class="r">&gt; is pressed, then the menu button that has </span><i class="i">key</i>
+as its underlined character is posted
+and the first entry within that menu is selected.
+The comparison between <i class="i">key</i> and the underlined characters
+ignores case differences.
+If no menu button matches <i class="i">key</i> then the keystroke has no
+effect.
+</li><li>[3]
+Clicking mouse button 1 on a menu button posts that menu and selects
+its first entry.
+</li></ul>
+
+
+<p>Once a menu has been posted, the input focus is switched to that
+menu and the following actions are possible:
+</p><ul class="itemize">
+<li>[1]
+Typing &lt;ESC&gt; or clicking mouse button 1 outside the menu button or
+its menu will abort the menu traversal.
+</li><li>[2]
+If &lt;Alt-<i class="i">key</i>&gt; is pressed, then the entry in the posted menu
+whose underlined character is <i class="i">key</i> is invoked.
+This causes the menu to be unposted, the entry&rsquo;s action to be
+taken, and the menu traversal to end.
+The comparison between <i class="i">key</i> and underlined characters ignores
+case differences.
+If no menu entry matches <i class="i">key</i> then the keystroke is ignored.
+</li><li>[3]
+The arrow keys may be used to move among entries and menus.
+The left and right arrow keys move circularly among the available
+menus and the up and down arrow keys move circularly among the
+entries in the current menu.
+</li><li>[4]
+If &lt;Return&gt; is pressed, the selected entry in the posted menu is
+invoked, which causes the menu to be unposted, the entry&rsquo;s action
+to be taken, and the menu traversal to end.
+</li></ul>
+
+<p>When a menu traversal completes, the input focus reverts to the
+window that contained it when the traversal started.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-24">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-24"> &para;</a></span></h4>
+<p>keyboard traversal, menu, menu bar, post
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="option.html">option</a>, Previous: <a href="lower.html">lower</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/tkconnect.html
@@ -0,0 +1,101 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>tkconnect (GCL TK Manual)</title>
+
+<meta name="description" content="tkconnect (GCL TK Manual)">
+<meta name="keywords" content="tkconnect (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="General.html" rel="up" title="General">
+<link href="Linked-Variables.html" rel="prev" title="Linked Variables">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="tkconnect">
+<div class="nav-panel">
+<p>
+Previous: <a href="Linked-Variables.html" accesskey="p" rel="prev">Linked Variables</a>, Up: <a href="General.html" accesskey="u" rel="up">General</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="tkconnect-1"><span>1.8 tkconnect<a class="copiable-link" href="#tkconnect-1"> &para;</a></span></h3>
+
+<div class="example">
+<pre class="example-preformatted"><i class="i">tkconnect</i> &amp;key host display can-rsh gcltksrv
+</pre></div>
+
+<p>This function provides a connection to a graphics server process, which
+in turn connects to possibly several graphics display screens.   The
+graphics server process, called <samp class="file">gcltksrv</samp> may or may not run
+on the same machine as the lisp to which it is attached.
+<code class="code">display</code>
+indicates the name of the default display to connect to, and this
+in turn defaults to the value of the environment variable <code class="code">DISPLAY</code>.
+</p>
+<p>When <i class="i">tkconnect</i> is invoked, a socket is opened and it waits for 
+a graphics process to connect to it.  If the host argument is not
+supplied, then a process will be spawned which will connect back to
+the lisp process.   The name of the command for invoking the process
+is the value of the <samp class="file">gcltksrv</samp> argument, which defaults to
+the value of the environment variable <code class="code">GCL_TK_SERVER</code>.   If that variable
+is not set, then the lisp <code class="code">*lib-directory*</code> is searched for
+an entry <samp class="file">gcl-tk/gcltksrv</samp>.
+</p>
+<p>If <code class="code">host</code> is supplied, then a command to run on the remote machine
+will be printed on standard output.   If <code class="code">can-rsh</code> is not nil,
+then the command will not be printed, but rather an attempt will be
+made to rsh to the machine, and to run the command.
+</p>
+<p>Thus
+</p>
+<div class="example">
+<pre class="example-preformatted">(tkconnect)
+</pre></div>
+
+<p>would start the process on the local machine, and use for <code class="code">display</code>
+the value of the environment variable <code class="code">DISPLAY</code>.
+</p>
+<div class="example">
+<pre class="example-preformatted">(tkconnect :host &quot;max.ma.utexas.edu&quot; :can-rsh t)
+</pre></div>
+
+<p>would cause an attempt to rsh to <code class="code">max</code> and to run the command
+there, to connect back to the appropriate port on the localhost.
+</p>
+<p>You may indicate that different <i class="i">toplevel</i> windows be on different
+displays, by using the <code class="code">:display</code> argument when creating the
+window, See <a class="xref" href="toplevel.html">toplevel</a>.
+</p>
+<p>Clearly you must have a copy of the program <samp class="file">gcltksrv</samp> and <b class="b">TK</b>
+libraries installed on the machine where you wish to run the server.
+</p>
+
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Linked-Variables.html">Linked Variables</a>, Up: <a href="General.html">General</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/tkerror.html
@@ -0,0 +1,101 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>tkerror (GCL TK Manual)</title>
+
+<meta name="description" content="tkerror (GCL TK Manual)">
+<meta name="keywords" content="tkerror (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="tkvars.html" rel="next" title="tkvars">
+<link href="tk.html" rel="prev" title="tk">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="tkerror">
+<div class="nav-panel">
+<p>
+Next: <a href="tkvars.html" accesskey="n" rel="next">tkvars</a>, Previous: <a href="tk.html" accesskey="p" rel="prev">tk</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="tkerror-1"><span>3.20 tkerror<a class="copiable-link" href="#tkerror-1"> &para;</a></span></h3>
+
+<p>tkerror \- Command invoked to process background errors
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-33" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-31" accesskey="2">Description</a></li>
+<li><a href="#Keywords-34" accesskey="3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-33">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-33"> &para;</a></span></h4>
+<p><b class="b">tkerror </b><i class="i">message</i>
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-31">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-31"> &para;</a></span></h4>
+
+<p>The <b class="b">tkerror</b> command doesn&rsquo;t exist as built-in part of Tk.  Instead,
+individual applications or users can define a <b class="b">tkerror</b>
+command (e.g. as a Tcl procedure) if they wish to handle background
+errors.
+</p>
+<p>A background error is one that occurs in a command that didn&rsquo;t
+originate with the application.  For example, if an error occurs
+while executing a command specified with a <b class="b">bind</b><span class="r"> of </span><b class="b">after</b>
+command, then it is a background error.  For a non-background error,
+the error can simply be returned up through nested Tcl command
+evaluations until it reaches the top-level code in the application;
+then the application can report the error in whatever way it
+wishes.  When a background error occurs, the unwinding ends in
+the Tk library and there is no obvious way for Tk to report
+the error.
+</p>
+<p>When Tk detects a background error, it invokes the <b class="b">tkerror</b>
+command, passing it the error message as its only argument.
+Tk assumes that the application has implemented the <b class="b">tkerror</b>
+command, and that the command will report the error in a way that
+makes sense for the application.  Tk will ignore any result returned
+by the <b class="b">tkerror</b> command.
+</p>
+<p>If another Tcl error occurs within the <b class="b">tkerror</b> command
+then Tk reports the error itself by writing a message
+to stderr.
+</p>
+<p>The Tk script library includes a default <b class="b">tkerror</b> procedure
+that posts a dialog box containing the error message and offers
+the user a chance to see a stack trace that shows where the
+error occurred.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-34">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-34"> &para;</a></span></h4>
+<p>background error, reporting
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="tkvars.html">tkvars</a>, Previous: <a href="tk.html">tk</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/tkvars.html
@@ -0,0 +1,113 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>tkvars (GCL TK Manual)</title>
+
+<meta name="description" content="tkvars (GCL TK Manual)">
+<meta name="keywords" content="tkvars (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="tkwait.html" rel="next" title="tkwait">
+<link href="tkerror.html" rel="prev" title="tkerror">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="tkvars">
+<div class="nav-panel">
+<p>
+Next: <a href="tkwait.html" accesskey="n" rel="next">tkwait</a>, Previous: <a href="tkerror.html" accesskey="p" rel="prev">tkerror</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="tkvars-1"><span>3.21 tkvars<a class="copiable-link" href="#tkvars-1"> &para;</a></span></h3>
+
+<p>tkvars \- Variables used or set by Tk
+</p>
+<ul class="mini-toc">
+<li><a href="#Description-32" accesskey="1">Description</a></li>
+<li><a href="#Keywords-35" accesskey="2">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Description-32">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-32"> &para;</a></span></h4>
+
+<p>The following Tcl variables are either set or used by Tk at various times
+in its execution:
+</p>
+<dl class="table">
+<dt><b class="b">tk_library</b></dt>
+<dd><p>Tk sets this variable hold the name of a directory containing a library
+of Tcl scripts related to Tk.  These scripts include an initialization
+file that is normally processed whenever a Tk application starts up,
+plus other files containing procedures that implement default behaviors
+for widgets.
+The value of this variable is taken from the TK_LIBRARY environment
+variable, if one exists, or else from a default value compiled into
+Tk.
+</p></dd>
+<dt><b class="b">tk_patchLevel</b></dt>
+<dd><p>Contains a decimal integer giving the current patch level for Tk.
+The patch level is incremented for each new release or patch, and
+it uniquely identifies an official version of Tk.
+</p></dd>
+<dt><b class="b">tk_priv</b></dt>
+<dd><p>This variable is an array containing several pieces of information
+that are private to Tk.  The elements of <b class="b">tk_priv</b> are used by
+Tk library procedures and default bindings.
+They should not be accessed by any code outside Tk.
+</p></dd>
+<dt><b class="b">tk_strictMotif</b></dt>
+<dd><p>This variable is set to zero by default.
+If an application sets it to one, then Tk attempts to adhere as
+closely as possible to Motif look-and-feel standards.
+For example, active elements such as buttons and scrollbar
+sliders will not change color when the pointer passes over them.
+</p></dd>
+<dt><b class="b">tk_version</b></dt>
+<dd><p>Tk sets this variable in the interpreter for each application.
+The variable holds the current version number of the Tk
+library in the form <i class="i">major</i><span class="r">.</span><i class="i">minor</i><span class="r">.  </span><i class="i">Major</i> and
+<i class="i">minor</i> are integers.  The major version number increases in
+any Tk release that includes changes that are not backward compatible
+(i.e. whenever existing Tk applications and scripts may have to change to
+work with the new release).  The minor version number increases with
+each new release of Tk, except that it resets to zero whenever the
+major version number changes.
+</p></dd>
+<dt><b class="b">tkVersion</b></dt>
+<dd><p>Has the same value as <b class="b">tk_version</b>.  This variable is obsolete and
+will be deleted soon.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-35">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-35"> &para;</a></span></h4>
+<p>variables, version
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="tkwait.html">tkwait</a>, Previous: <a href="tkerror.html">tkerror</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/tkwait.html
@@ -0,0 +1,92 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>tkwait (GCL TK Manual)</title>
+
+<meta name="description" content="tkwait (GCL TK Manual)">
+<meta name="keywords" content="tkwait (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="update.html" rel="next" title="update">
+<link href="tkvars.html" rel="prev" title="tkvars">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="tkwait">
+<div class="nav-panel">
+<p>
+Next: <a href="update.html" accesskey="n" rel="next">update</a>, Previous: <a href="tkvars.html" accesskey="p" rel="prev">tkvars</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="tkwait-1"><span>3.22 tkwait<a class="copiable-link" href="#tkwait-1"> &para;</a></span></h3>
+
+<p>tkwait \- Wait for variable to change or window to be destroyed
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-34" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-33" accesskey="2">Description</a></li>
+<li><a href="#Keywords-36" accesskey="3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-34">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-34"> &para;</a></span></h4>
+<br><p><b class="b">tkwait&nbsp;:variable&nbsp;</b><i class="i">name</i><!-- /@w --><br>
+<br><b class="b">tkwait&nbsp;:visibility&nbsp;</b><i class="i">name</i><!-- /@w --><br>
+<b class="b">tkwait :window </b><i class="i">name</i>
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-33">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-33"> &para;</a></span></h4>
+
+<p>The <b class="b">tkwait</b> command waits for one of several things to happen,
+then it returns without taking any other actions.
+The return value is always an empty string.
+If the first argument is <b class="b">:variable</b> (or any abbreviation of
+it) then the second argument is the name of a global variable and the
+command waits for that variable to be modified.
+If the first argument is <b class="b">:visibility</b> (or any abbreviation
+of it) then the second argument is the name of a window and the
+<b class="b">tkwait</b> command waits for a change in its
+visibility state (as indicated by the arrival of a VisibilityNotify
+event).  This form is typically used to wait for a newly-created
+window to appear on the screen before taking some action.
+If the first argument is <b class="b">:window</b> (or any abbreviation
+of it) then the second argument is the name of a window and the
+<b class="b">tkwait</b> command waits for that window to be destroyed.
+This form is typically used to wait for a user to finish interacting
+with a dialog box before using the result of that interaction.
+</p>
+<p>While the <b class="b">tkwait</b> command is waiting it processes events in
+the normal fashion, so the application will continue to respond
+to user interactions.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-36">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-36"> &para;</a></span></h4>
+<p>variable, visibility, wait, window
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="update.html">update</a>, Previous: <a href="tkvars.html">tkvars</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/toplevel.html
@@ -0,0 +1,172 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>toplevel (GCL TK Manual)</title>
+
+<meta name="description" content="toplevel (GCL TK Manual)">
+<meta name="keywords" content="toplevel (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Widgets.html" rel="up" title="Widgets">
+<link href="radiobutton.html" rel="prev" title="radiobutton">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="toplevel">
+<div class="nav-panel">
+<p>
+Previous: <a href="radiobutton.html" accesskey="p" rel="prev">radiobutton</a>, Up: <a href="Widgets.html" accesskey="u" rel="up">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="toplevel-1"><span>2.15 toplevel<a class="copiable-link" href="#toplevel-1"> &para;</a></span></h3>
+
+<p>toplevel \- Create and manipulate toplevel widgets
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-14" accesskey="1">Synopsis</a></li>
+<li><a href="#Standard-Options-14" accesskey="2">Standard Options</a></li>
+<li><a href="#Arguments-for-Toplevel" accesskey="3">Arguments for Toplevel</a></li>
+<li><a href="#Description-11" accesskey="4">Description</a></li>
+<li><a href="#A-Toplevel-Widget_0027s-Arguments" accesskey="5">A Toplevel Widget&rsquo;s Arguments</a></li>
+<li><a href="#Bindings-8" accesskey="6">Bindings</a></li>
+<li><a href="#Keywords-14" accesskey="7">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-14">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-14"> &para;</a></span></h4>
+<p><b class="b">toplevel</b><i class="i"> </i><i class="i">pathName </i><span class="r">?</span><b class="b">:screen </b><i class="i">screenName</i><span class="r">? ?</span><b class="b">:class </b><i class="i">className</i><span class="r">? ?</span><i class="i">options</i>?
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Standard-Options-14">
+<h4 class="unnumberedsubsec"><span>Standard Options<a class="copiable-link" href="#Standard-Options-14"> &para;</a></span></h4>
+
+
+<div class="example">
+<pre class="example-preformatted">background                  geometry                
+borderWidth                 relief                  
+</pre></div>
+
+
+<p>See <a class="xref" href="options.html">options</a>, for more information.
+</p></div>
+<div class="unnumberedsubsec-level-extent" id="Arguments-for-Toplevel">
+<h4 class="unnumberedsubsec"><span>Arguments for Toplevel<a class="copiable-link" href="#Arguments-for-Toplevel"> &para;</a></span></h4>
+
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-11">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-11"> &para;</a></span></h4>
+
+<p>The <b class="b">toplevel</b> command creates a new toplevel widget (given
+by the <i class="i">pathName</i> argument).  Additional
+options, described above, may be specified on the command line
+or in the option database
+to configure aspects of the toplevel such as its background color
+and relief.  The <b class="b">toplevel</b> command returns the
+path name of the new window.
+</p>
+<p>A toplevel is similar to a frame except that it is created as a
+top-level window:  its X parent is the root window of a screen
+rather than the logical parent from its path name.  The primary
+purpose of a toplevel is to serve as a container for dialog boxes
+and other collections of widgets.  The only features
+of a toplevel are its background color and an optional 3-D border
+to make the toplevel appear raised or sunken.
+</p>
+<p>Two special command-line options may be provided to the <b class="b">toplevel</b>
+command:  <b class="b">:class</b><span class="r"> and </span><b class="b">:screen</b><span class="r">.  If </span><b class="b">:class</b>
+is specified, then the new widget&rsquo;s class will be set to
+<i class="i">className</i><span class="r"> instead of </span><b class="b">Toplevel</b>.  Changing the class of
+a toplevel widget may be useful
+in order to use a special class name in database options referring
+to this widget and its children.  The <b class="b">:screen</b> option
+may be used to place the window on a different screen than the
+window&rsquo;s logical parent.  Any valid screen name may be used, even
+one associated with a different display.
+</p>
+<p>Note:  <b class="b">:class</b><span class="r"> and </span><b class="b">:screen</b> are handled
+differently than other command-line options.  They may not be specified
+using the option database (these options must have been processed
+before the new window has been created enough to use the option database;
+in particular, the new class name will affect the lookup of options
+in the database).  In addition, <b class="b">:class</b><span class="r"> and </span><b class="b">:screen</b>
+may not be queried or changed using the <b class="b">config</b> command described
+below.  However, the <b class="b">winfo :class</b> command may be used to query
+the class of a window, and <b class="b">winfo :screen</b> may be used to query
+its screen.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="A-Toplevel-Widget_0027s-Arguments">
+<h4 class="unnumberedsubsec"><span>A Toplevel Widget&rsquo;s Arguments<a class="copiable-link" href="#A-Toplevel-Widget_0027s-Arguments"> &para;</a></span></h4>
+
+<p>The <b class="b">toplevel</b> command creates a new Tcl command whose
+name is the same as the path name of the toplevel&rsquo;s window.  This
+command may be used to invoke various
+operations on the widget.  It has the following general form:
+</p>
+<div class="example">
+<pre class="example-preformatted"><i class="i">pathName option </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</pre></div>
+
+<p><i class="i">PathName</i> is the name of the command, which is the same as
+the toplevel widget&rsquo;s path name.  <i class="i">Option</i><span class="r"> and the </span><i class="i">arg</i>s
+determine the exact behavior of the command.  The following
+commands are possible for toplevel widgets:
+</p>
+<dl class="table">
+<dt><i class="i">pathName </i><b class="b">:configure</b><span class="r"> ?</span><i class="i">option</i><span class="r">? ?</span><i class="i">value option value ...</i>?</dt>
+<dd><p>Query or modify the configuration options of the widget.
+If no <i class="i">option</i> is specified, returns a list describing all of
+the available options for <i class="i">pathName</i><span class="r"> (see </span><b class="b">Tk_ConfigureInfo</b> for
+information on the format of this list).  If <i class="i">option</i> is specified
+with no <i class="i">value</i>, then the command returns a list describing the
+one named option (this list will be identical to the corresponding
+sublist of the value returned if no <i class="i">option</i> is specified).  If
+one or more <i class="i">option:value</i> pairs are specified, then the command
+modifies the given widget option(s) to have the given value(s);  in
+this case the command returns an empty string.
+<i class="i">Option</i><span class="r"> may have any of the values accepted by the </span><b class="b">toplevel</b>
+command.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Bindings-8">
+<h4 class="unnumberedsubsec"><span>Bindings<a class="copiable-link" href="#Bindings-8"> &para;</a></span></h4>
+
+<p>When a new toplevel is created, it has no default event bindings:
+toplevels are not intended to be interactive.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-14">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-14"> &para;</a></span></h4>
+<p>toplevel, widget
+</p>
+
+
+
+</div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="radiobutton.html">radiobutton</a>, Up: <a href="Widgets.html">Widgets</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/update.html
@@ -0,0 +1,94 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>update (GCL TK Manual)</title>
+
+<meta name="description" content="update (GCL TK Manual)">
+<meta name="keywords" content="update (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="winfo.html" rel="next" title="winfo">
+<link href="tkwait.html" rel="prev" title="tkwait">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="update">
+<div class="nav-panel">
+<p>
+Next: <a href="winfo.html" accesskey="n" rel="next">winfo</a>, Previous: <a href="tkwait.html" accesskey="p" rel="prev">tkwait</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="update-1"><span>3.23 update<a class="copiable-link" href="#update-1"> &para;</a></span></h3>
+
+<p>update \- Process pending events and/or when-idle handlers
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-35" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-34" accesskey="2">Description</a></li>
+<li><a href="#Keywords-37" accesskey="3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-35">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-35"> &para;</a></span></h4>
+<p><b class="b">update</b><span class="r"> ?</span><b class="b">:idletasks</b>?
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-34">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-34"> &para;</a></span></h4>
+
+<p>This command is used to bring the entire application world
+&ldquo;up to date.&rdquo;
+It flushes all pending output to the display,  waits for the
+server to process that output and return errors or events,
+handles all pending events of any sort (including when-idle handlers),
+and repeats this set of operations until there are no pending
+events, no pending when-idle handlers, no pending output to the server,
+and no operations still outstanding at the server.  
+</p>
+<p>If the <b class="b">idletasks</b> keyword is specified as an argument to the
+command, then no new events or errors are processed;  only when-idle
+idlers are invoked.
+This causes operations that are normally deferred, such as display
+updates and window layout calculations, to be performed immediately.
+</p>
+<p>The <b class="b">update :idletasks</b> command is useful in scripts where
+changes have been made to the application&rsquo;s state and you want those
+changes to appear on the display immediately, rather than waiting
+for the script to complete.
+The <b class="b">update</b> command with no options is useful in scripts where
+you are performing a long-running computation but you still want
+the application to respond to user interactions;  if you occasionally
+call <b class="b">update</b> then user input will be processed during the
+next call to <b class="b">update</b>.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-37">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-37"> &para;</a></span></h4>
+<p>event, flush, handler, idle, update
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="winfo.html">winfo</a>, Previous: <a href="tkwait.html">tkwait</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/winfo.html
@@ -0,0 +1,291 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>winfo (GCL TK Manual)</title>
+
+<meta name="description" content="winfo (GCL TK Manual)">
+<meta name="keywords" content="winfo (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="wm.html" rel="next" title="wm">
+<link href="update.html" rel="prev" title="update">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="winfo">
+<div class="nav-panel">
+<p>
+Next: <a href="wm.html" accesskey="n" rel="next">wm</a>, Previous: <a href="update.html" accesskey="p" rel="prev">update</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="winfo-1"><span>3.24 winfo<a class="copiable-link" href="#winfo-1"> &para;</a></span></h3>
+
+<p>winfo \- Return window-related information
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-36" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-35" accesskey="2">Description</a></li>
+<li><a href="#Keywords-38" accesskey="3">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-36">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-36"> &para;</a></span></h4>
+<p><b class="b">winfo</b><span class="r"> </span><i class="i">option </i><span class="r">?</span><i class="i">arg arg ...</i>?
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-35">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-35"> &para;</a></span></h4>
+
+<p>The <b class="b">winfo</b> command is used to retrieve information about windows
+managed by Tk.  It can take any of a number of different forms,
+depending on the <i class="i">option</i> argument.  The legal forms are:
+</p>
+<dl class="table">
+<dt><b class="b">winfo :atom </b><i class="i">name</i></dt>
+<dd><p>Returns a decimal string giving the integer identifier for the
+atom whose name is <i class="i">name</i>.  If no atom exists with the name
+<i class="i">name</i> then a new one is created.
+</p></dd>
+<dt><b class="b">winfo :atomname </b><i class="i">id</i></dt>
+<dd><p>Returns the textual name for the atom whose integer identifier is
+<i class="i">id</i>.
+This command is the inverse of the <b class="b">winfo :atom</b> command.
+Generates an error if no such atom exists.
+</p></dd>
+<dt><b class="b">winfo :cells </b><i class="i">window</i></dt>
+<dd><p>Returns a decimal string giving the number of cells in the
+color map for <i class="i">window</i>.
+</p></dd>
+<dt><b class="b">winfo :children </b><i class="i">window</i></dt>
+<dd><p>Returns a list containing the path names of all the children
+of <i class="i">window</i>.  Top-level windows are returned as children
+of their logical parents.
+</p></dd>
+<dt><b class="b">winfo :class </b><i class="i">window</i></dt>
+<dd><p>Returns the class name for <i class="i">window</i>.
+</p></dd>
+<dt><b class="b">winfo :containing </b><i class="i">rootX rootY</i></dt>
+<dd><p>Returns the path name for the window containing the point given
+by <i class="i">rootX</i><span class="r"> and </span><i class="i">rootY</i>.
+<i class="i">RootX</i><span class="r"> and </span><i class="i">rootY</i> are specified in screen units (i.e.
+any form acceptable to <b class="b">Tk_GetPixels</b>) in the coordinate
+system of the root window (if a virtual-root window manager is in
+use then the coordinate system of the virtual root window is used).
+If no window in this application contains the point then an empty
+string is returned.
+In selecting the containing window, children are given higher priority
+than parents and among siblings the highest one in the stacking order is
+chosen.
+</p></dd>
+<dt><b class="b">winfo :depth </b><i class="i">window</i></dt>
+<dd><p>Returns a decimal string giving the depth of <i class="i">window</i> (number
+of bits per pixel).
+</p></dd>
+<dt><b class="b">winfo :exists </b><i class="i">window</i></dt>
+<dd><p>Returns 1 if there exists a window named <i class="i">window</i>, 0 if no such
+window exists.
+</p></dd>
+<dt><b class="b">winfo :fpixels </b><i class="i">window</i><span class="r"> </span><i class="i">number</i></dt>
+<dd><p>Returns a floating-point value giving the number of pixels
+in <i class="i">window</i><span class="r"> corresponding to the distance given by </span><i class="i">number</i>.
+<i class="i">Number</i> may be specified in any of the forms acceptable
+to <b class="b">Tk_GetScreenMM</b>, such as &ldquo;2.0c&rdquo; or &ldquo;1i&rdquo;.
+The return value may be fractional;  for an integer value, use
+<b class="b">winfo :pixels</b>.
+</p></dd>
+<dt><b class="b">winfo :geometry </b><i class="i">window</i></dt>
+<dd><p>Returns the geometry for <i class="i">window</i>, in the form
+<i class="i">width</i><b class="b">x</b><i class="i">height</i><b class="b">+</b><i class="i">x</i><b class="b">+</b><i class="i">y</i>.  All dimensions are
+in pixels.
+</p></dd>
+<dt><b class="b">winfo :height </b><i class="i">window</i></dt>
+<dd><p>Returns a decimal string giving <i class="i">window</i>&rsquo;s height in pixels.
+When a window is first created its height will be 1 pixel;  the
+height will eventually be changed by a geometry manager to fulfill
+the window&rsquo;s needs.
+If you need the true height immediately after creating a widget,
+invoke <b class="b">update</b> to force the geometry manager to arrange it,
+or use <b class="b">winfo :reqheight</b> to get the window&rsquo;s requested height
+instead of its actual height.
+</p></dd>
+<dt><b class="b">winfo :id </b><i class="i">window</i></dt>
+<dd><p>Returns a hexadecimal string indicating the X identifier for <i class="i">window</i>.
+</p></dd>
+<dt><b class="b">winfo :interps</b></dt>
+<dd><p>Returns a list whose members are the names of all Tcl interpreters
+(e.g. all Tk-based applications) currently registered for the
+display of the invoking application.
+</p></dd>
+<dt><b class="b">winfo :ismapped </b><i class="i">window</i></dt>
+<dd><p>Returns <b class="b">1</b><span class="r"> if </span><i class="i">window</i><span class="r"> is currently mapped, </span><b class="b">0</b> otherwise.
+</p></dd>
+<dt><b class="b">winfo :name </b><i class="i">window</i></dt>
+<dd><p>Returns <i class="i">window</i>&rsquo;s name (i.e. its name within its parent, as opposed
+to its full path name).
+The command <b class="b">winfo :name .</b> will return the name of the application.
+</p></dd>
+<dt><b class="b">winfo :parent </b><i class="i">window</i></dt>
+<dd><p>Returns the path name of <i class="i">window</i>&rsquo;s parent, or an empty string
+if <i class="i">window</i> is the main window of the application.
+</p></dd>
+<dt><b class="b">winfo :pathname </b><i class="i">id</i></dt>
+<dd><p>Returns the path name of the window whose X identifier is <i class="i">id</i>.
+<i class="i">Id</i> must be a decimal, hexadecimal, or octal integer and must
+correspond to a window in the invoking application.
+</p></dd>
+<dt><b class="b">winfo :pixels </b><i class="i">window</i><span class="r"> </span><i class="i">number</i></dt>
+<dd><p>Returns the number of pixels in <i class="i">window</i> corresponding
+to the distance given by <i class="i">number</i>.
+<i class="i">Number</i> may be specified in any of the forms acceptable
+to <b class="b">Tk_GetPixels</b>, such as &ldquo;2.0c&rdquo; or &ldquo;1i&rdquo;.
+The result is rounded to the nearest integer value;  for a
+fractional result, use <b class="b">winfo :fpixels</b>.
+</p></dd>
+<dt><b class="b">winfo :reqheight </b><i class="i">window</i></dt>
+<dd><p>Returns a decimal string giving <i class="i">window</i>&rsquo;s requested height,
+in pixels.  This is the value used by <i class="i">window</i>&rsquo;s geometry
+manager to compute its geometry.
+</p></dd>
+<dt><b class="b">winfo :reqwidth </b><i class="i">window</i></dt>
+<dd><p>Returns a decimal string giving <i class="i">window</i>&rsquo;s requested width,
+in pixels.  This is the value used by <i class="i">window</i>&rsquo;s geometry
+manager to compute its geometry.
+</p></dd>
+<dt><b class="b">winfo :rgb </b><i class="i">window color</i></dt>
+<dd><p>Returns a list containing three decimal values, which are the
+red, green, and blue intensities that correspond to <i class="i">color</i> in
+the window given by <i class="i">window</i><span class="r">.  </span><i class="i">Color</i>
+may be specified in any of the forms acceptable for a color
+option.
+</p></dd>
+<dt><b class="b">winfo :rootx </b><i class="i">window</i></dt>
+<dd><p>Returns a decimal string giving the x-coordinate, in the root
+window of the screen, of the
+upper-left corner of <i class="i">window</i><span class="r">&rsquo;s border (or </span><i class="i">window</i> if it
+has no border).
+</p></dd>
+<dt><b class="b">winfo :rooty </b><i class="i">window</i></dt>
+<dd><p>Returns a decimal string giving the y-coordinate, in the root
+window of the screen, of the
+upper-left corner of <i class="i">window</i><span class="r">&rsquo;s border (or </span><i class="i">window</i> if it
+has no border).
+</p></dd>
+<dt><b class="b">winfo :screen </b><i class="i">window</i></dt>
+<dd><p>Returns the name of the screen associated with <i class="i">window</i>, in
+the form <i class="i">displayName</i><span class="r">.</span><i class="i">screenIndex</i>.
+</p></dd>
+<dt><b class="b">winfo :screencells </b><i class="i">window</i></dt>
+<dd><p>Returns a decimal string giving the number of cells in the default
+color map for <i class="i">window</i>&rsquo;s screen.
+</p></dd>
+<dt><b class="b">winfo :screendepth </b><i class="i">window</i></dt>
+<dd><p>Returns a decimal string giving the depth of the root window
+of <i class="i">window</i>&rsquo;s screen (number of bits per pixel).
+</p></dd>
+<dt><b class="b">winfo :screenheight </b><i class="i">window</i></dt>
+<dd><p>Returns a decimal string giving the height of <i class="i">window</i>&rsquo;s screen,
+in pixels.
+</p></dd>
+<dt><b class="b">winfo :screenmmheight </b><i class="i">window</i></dt>
+<dd><p>Returns a decimal string giving the height of <i class="i">window</i>&rsquo;s screen,
+in millimeters.
+</p></dd>
+<dt><b class="b">winfo :screenmmwidth </b><i class="i">window</i></dt>
+<dd><p>Returns a decimal string giving the width of <i class="i">window</i>&rsquo;s screen,
+in millimeters.
+</p></dd>
+<dt><b class="b">winfo :screenvisual </b><i class="i">window</i></dt>
+<dd><p>Returns one of the following strings to indicate the default visual
+type for <i class="i">window</i><span class="r">&rsquo;s screen: </span><b class="b">directcolor</b><span class="r">, </span><b class="b">grayscale</b>,
+<b class="b">pseudocolor</b><span class="r">, </span><b class="b">staticcolor</b><span class="r">, </span><b class="b">staticgray</b>, or
+<b class="b">truecolor</b>.
+</p></dd>
+<dt><b class="b">winfo :screenwidth </b><i class="i">window</i></dt>
+<dd><p>Returns a decimal string giving the width of <i class="i">window</i>&rsquo;s screen,
+in pixels.
+</p></dd>
+<dt><b class="b">winfo :toplevel </b><i class="i">window</i></dt>
+<dd><p>Returns the path name of the top-level window containing <i class="i">window</i>.
+</p></dd>
+<dt><b class="b">winfo :visual </b><i class="i">window</i></dt>
+<dd><p>Returns one of the following strings to indicate the visual
+type for <i class="i">window</i><span class="r">: </span><b class="b">directcolor</b><span class="r">, </span><b class="b">grayscale</b>,
+<b class="b">pseudocolor</b><span class="r">, </span><b class="b">staticcolor</b><span class="r">, </span><b class="b">staticgray</b>, or
+<b class="b">truecolor</b>.
+</p></dd>
+<dt><b class="b">winfo :vrootheight </b><i class="i">window</i></dt>
+<dd><p>Returns the height of the virtual root window associated with <i class="i">window</i>
+if there is one;  otherwise returns the height of <i class="i">window</i>&rsquo;s screen.
+</p></dd>
+<dt><b class="b">winfo :vrootwidth </b><i class="i">window</i></dt>
+<dd><p>Returns the width of the virtual root window associated with <i class="i">window</i>
+if there is one;  otherwise returns the width of <i class="i">window</i>&rsquo;s screen.
+</p></dd>
+<dt><b class="b">winfo :vrootx </b><i class="i">window</i></dt>
+<dd><p>Returns the x-offset of the virtual root window associated with <i class="i">window</i>,
+relative to the root window of its screen.
+This is normally either zero or negative.
+Returns 0 if there is no virtual root window for <i class="i">window</i>.
+</p></dd>
+<dt><b class="b">winfo :vrooty </b><i class="i">window</i></dt>
+<dd><p>Returns the y-offset of the virtual root window associated with <i class="i">window</i>,
+relative to the root window of its screen.
+This is normally either zero or negative.
+Returns 0 if there is no virtual root window for <i class="i">window</i>.
+</p></dd>
+<dt><b class="b">winfo :width </b><i class="i">window</i></dt>
+<dd><p>Returns a decimal string giving <i class="i">window</i>&rsquo;s width in pixels.
+When a window is first created its width will be 1 pixel;  the
+width will eventually be changed by a geometry manager to fulfill
+the window&rsquo;s needs.
+If you need the true width immediately after creating a widget,
+invoke <b class="b">update</b> to force the geometry manager to arrange it,
+or use <b class="b">winfo :reqwidth</b> to get the window&rsquo;s requested width
+instead of its actual width.
+</p></dd>
+<dt><b class="b">winfo :x </b><i class="i">window</i></dt>
+<dd><p>Returns a decimal string giving the x-coordinate, in <i class="i">window</i>&rsquo;s
+parent, of the
+upper-left corner of <i class="i">window</i><span class="r">&rsquo;s border (or </span><i class="i">window</i> if it
+has no border).
+</p></dd>
+<dt><b class="b">winfo :y </b><i class="i">window</i></dt>
+<dd><p>Returns a decimal string giving the y-coordinate, in <i class="i">window</i>&rsquo;s
+parent, of the
+upper-left corner of <i class="i">window</i><span class="r">&rsquo;s border (or </span><i class="i">window</i> if it
+has no border).
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-38">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-38"> &para;</a></span></h4>
+<p>atom, children, class, geometry, height, identifier, information, interpreters,
+mapped, parent, path name, screen, virtual root, width, window
+</p></div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="wm.html">wm</a>, Previous: <a href="update.html">update</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl-tk_html/wm.html
@@ -0,0 +1,572 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>wm (GCL TK Manual)</title>
+
+<meta name="description" content="wm (GCL TK Manual)">
+<meta name="keywords" content="wm (GCL TK Manual)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
+<link href="Control.html" rel="up" title="Control">
+<link href="winfo.html" rel="prev" title="winfo">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="wm">
+<div class="nav-panel">
+<p>
+Previous: <a href="winfo.html" accesskey="p" rel="prev">winfo</a>, Up: <a href="Control.html" accesskey="u" rel="up">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+<hr>
+<h3 class="section" id="wm-1"><span>3.25 wm<a class="copiable-link" href="#wm-1"> &para;</a></span></h3>
+
+<p>wm \- Communicate with window manager
+</p><ul class="mini-toc">
+<li><a href="#Synopsis-37" accesskey="1">Synopsis</a></li>
+<li><a href="#Description-36" accesskey="2">Description</a></li>
+<li><a href="#g_t_0022Sources-Of-Geometry-Information_0022" accesskey="3">&quot;Sources Of Geometry Information&quot;</a></li>
+<li><a href="#g_t_0022Ungridded-Geometry-Management_0022" accesskey="4">&quot;Ungridded Geometry Management&quot;</a></li>
+<li><a href="#g_t_0022Gridded-Geometry-Management_0022" accesskey="5">&quot;Gridded Geometry Management&quot;</a></li>
+<li><a href="#Bugs-3" accesskey="6">Bugs</a></li>
+<li><a href="#Keywords-39" accesskey="7">Keywords</a></li>
+</ul>
+<div class="unnumberedsubsec-level-extent" id="Synopsis-37">
+<h4 class="unnumberedsubsec"><span>Synopsis<a class="copiable-link" href="#Synopsis-37"> &para;</a></span></h4>
+<p><b class="b">wm</b><span class="r"> </span><i class="i">option window </i><span class="r">?</span><i class="i">args</i>?
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Description-36">
+<h4 class="unnumberedsubsec"><span>Description<a class="copiable-link" href="#Description-36"> &para;</a></span></h4>
+
+<p>The <b class="b">wm</b> command is used to interact with window managers in
+order to control such things as the title for a window, its geometry,
+or the increments in terms of which it may be resized.  The <b class="b">wm</b>
+command can take any of a number of different forms, depending on
+the <i class="i">option</i> argument.  All of the forms expect at least one
+additional argument, <i class="i">window</i>, which must be the path name of a
+top-level window.
+</p>
+<p>The legal forms for the <b class="b">wm</b> command are:
+</p>
+<dl class="table">
+<dt><b class="b">wm :aspect </b><i class="i">window</i><span class="r"> ?</span><i class="i">minNumer minDenom maxNumer maxDenom</i>?</dt>
+<dd><p>If <i class="i">minNumer</i><span class="r">, </span><i class="i">minDenom</i><span class="r">, </span><i class="i">maxNumer</i><span class="r">, and </span><i class="i">maxDenom</i>
+are all specified, then they will be passed to the window manager
+and the window manager should use them to enforce a range of
+acceptable aspect ratios for <i class="i">window</i>.  The aspect ratio of
+<i class="i">window</i> (width/length) will be constrained to lie
+between <i class="i">minNumer</i><span class="r">/</span><i class="i">minDenom</i><span class="r"> and </span><i class="i">maxNumer</i><span class="r">/</span><i class="i">maxDenom</i>.
+If <i class="i">minNumer</i> etc. are all specified as empty strings, then
+any existing aspect ratio restrictions are removed.
+If <i class="i">minNumer</i> etc. are specified, then the command returns an
+empty string.  Otherwise, it returns
+a Tcl list containing four elements, which are the current values
+of <i class="i">minNumer</i><span class="r">, </span><i class="i">minDenom</i><span class="r">, </span><i class="i">maxNumer</i><span class="r">, and </span><i class="i">maxDenom</i>
+(if no aspect restrictions are in effect, then an empty string is
+returned).
+</p></dd>
+<dt><b class="b">wm :client </b><i class="i">window</i><span class="r"> ?</span><i class="i">name</i>?</dt>
+<dd><p>If <i class="i">name</i><span class="r"> is specified, this command stores </span><i class="i">name</i> (which
+should be the name of
+the host on which the application is executing) in <i class="i">window</i>&rsquo;s
+<b class="b">WM_CLIENT_MACHINE</b> property for use by the window manager or
+session manager.
+The command returns an empty string in this case.
+If <i class="i">name</i> isn&rsquo;t specified, the command returns the last name
+set in a <b class="b">wm :client</b><span class="r"> command for </span><i class="i">window</i>.
+If <i class="i">name</i> is specified as an empty string, the command deletes the
+<b class="b">WM_CLIENT_MACHINE</b><span class="r"> property from </span><i class="i">window</i>.
+</p></dd>
+<dt><b class="b">wm :command </b><i class="i">window</i><span class="r"> ?</span><i class="i">value</i>?</dt>
+<dd><p>If <i class="i">value</i><span class="r"> is specified, this command stores </span><i class="i">value</i><span class="r"> in </span><i class="i">window</i>&rsquo;s
+<b class="b">WM_COMMAND</b> property for use by the window manager or
+session manager and returns an empty string.
+<i class="i">Value</i> must have proper list structure;  the elements should
+contain the words of the command used to invoke the application.
+If <i class="i">value</i> isn&rsquo;t specified then the command returns the last value
+set in a <b class="b">wm :command</b><span class="r"> command for </span><i class="i">window</i>.
+If <i class="i">value</i> is specified as an empty string, the command
+deletes the <b class="b">WM_COMMAND</b><span class="r"> property from </span><i class="i">window</i>.
+</p></dd>
+<dt><b class="b">wm :deiconify </b><i class="i">window</i></dt>
+<dd><p>Arrange for <i class="i">window</i> to be displayed in normal (non-iconified) form.
+This is done by mapping the window.  If the window has never been
+mapped then this command will not map the window, but it will ensure
+that when the window is first mapped it will be displayed
+in de-iconified form.  Returns an empty string.
+</p></dd>
+<dt><b class="b">wm :focusmodel </b><i class="i">window</i><span class="r"> ?</span><b class="b">active</b><span class="r">|</span><b class="b">passive</b>?</dt>
+<dd><p>If <b class="b">active</b><span class="r"> or </span><b class="b">passive</b> is supplied as an optional argument
+to the command, then it specifies the focus model for <i class="i">window</i>.
+In this case the command returns an empty string.  If no additional
+argument is supplied, then the command returns the current focus
+model for <i class="i">window</i>.
+An <b class="b">active</b><span class="r"> focus model means that </span><i class="i">window</i> will claim the
+input focus for itself or its descendants, even at times when
+the focus is currently in some other application.  <b class="b">Passive</b> means that
+<i class="i">window</i> will never claim the focus for itself:  the window manager
+should give the focus to <i class="i">window</i> at appropriate times.  However,
+once the focus has been given to <i class="i">window</i> or one of its descendants,
+the application may re-assign the focus among <i class="i">window</i>&rsquo;s descendants.
+The focus model defaults to <b class="b">passive</b><span class="r">, and Tk&rsquo;s </span><b class="b">focus</b> command
+assumes a passive model of focussing.
+</p></dd>
+<dt><b class="b">wm :frame </b><i class="i">window</i></dt>
+<dd><p>If <i class="i">window</i> has been reparented by the window manager into a
+decorative frame, the command returns the X window identifier for
+the outermost frame that contains <i class="i">window</i> (the window whose
+parent is the root or virtual root).  If <i class="i">window</i> hasn&rsquo;t been
+reparented by the window manager then the command returns the
+X window identifier for <i class="i">window</i>.
+</p></dd>
+<dt><b class="b">wm :geometry </b><i class="i">window</i><span class="r"> ?</span><i class="i">newGeometry</i>?</dt>
+<dd><p>If <i class="i">newGeometry</i><span class="r"> is specified, then the geometry of </span><i class="i">window</i>
+is changed and an empty string is returned.  Otherwise the current
+geometry for <i class="i">window</i> is returned (this is the most recent
+geometry specified either by manual resizing or
+in a <b class="b">wm :geometry</b><span class="r"> command).  </span><i class="i">NewGeometry</i> has
+the form <b class="b">=</b><i class="i">width</i><b class="b">x</b><i class="i">height</i><b class="b">\(+-</b><i class="i">x</i><b class="b">\(+-</b><i class="i">y</i>, where
+any of <b class="b">=</b><span class="r">, </span><i class="i">width</i><b class="b">x</b><i class="i">height</i><span class="r">, or </span><b class="b">\(+-</b><i class="i">x</i><b class="b">\(+-</b><i class="i">y</i>
+may be omitted.  <i class="i">Width</i><span class="r"> and </span><i class="i">height</i> are positive integers
+specifying the desired dimensions of <i class="i">window</i><span class="r">.  If </span><i class="i">window</i>
+is gridded (see GRIDDED GEOMETRY MANAGEMENT below) then the dimensions
+are specified in grid units;  otherwise they are specified in pixel
+units.  <i class="i">X</i><span class="r"> and </span><i class="i">y</i> specify the desired location of
+<i class="i">window</i> on the screen, in pixels.
+If <i class="i">x</i><span class="r"> is preceded by </span><b class="b">+</b>, it specifies
+the number of pixels between the left edge of the screen and the left
+edge of <i class="i">window</i><span class="r">&rsquo;s border;  if preceded by </span><b class="b">-</b> then
+<i class="i">x</i> specifies the number of pixels
+between the right edge of the screen and the right edge of <i class="i">window</i>&rsquo;s
+border.  If <i class="i">y</i><span class="r"> is preceded by </span><b class="b">+</b> then it specifies the
+number of pixels between the top of the screen and the top
+of <i class="i">window</i><span class="r">&rsquo;s border;  if </span><i class="i">y</i><span class="r"> is preceded by </span><b class="b">-</b> then
+it specifies the number of pixels between the bottom of <i class="i">window</i>&rsquo;s
+border and the bottom of the screen.
+If <i class="i">newGeometry</i> is specified as an empty string then any
+existing user-specified geometry for <i class="i">window</i> is cancelled, and
+the window will revert to the size requested internally by its
+widgets.
+</p></dd>
+<dt><b class="b">wm :grid </b><i class="i">window</i><span class="r"> ?</span><i class="i">baseWidth baseHeight widthInc heightInc</i>?</dt>
+<dd><p>This command indicates that <i class="i">window</i> is to be managed as a
+gridded window.
+It also specifies the relationship between grid units and pixel units.
+<i class="i">BaseWidth</i><span class="r"> and </span><i class="i">baseHeight</i> specify the number of grid
+units corresponding to the pixel dimensions requested internally
+by <i class="i">window</i><span class="r"> using </span><b class="b">Tk_GeometryRequest</b><span class="r">.  </span><i class="i">WidthInc</i>
+and <i class="i">heightInc</i> specify the number of pixels in each horizontal
+and vertical grid unit.
+These four values determine a range of acceptable sizes for
+<i class="i">window</i>, corresponding to grid-based widths and heights
+that are non-negative integers.
+Tk will pass this information to the window manager;  during
+manual resizing, the window manager will restrict the window&rsquo;s size
+to one of these acceptable sizes.
+Furthermore, during manual resizing the window manager will display
+the window&rsquo;s current size in terms of grid units rather than pixels.
+If <i class="i">baseWidth</i> etc. are all specified as empty strings, then
+<i class="i">window</i> will no longer be managed as a gridded window.  If
+<i class="i">baseWidth</i> etc. are specified then the return value is an
+empty string.
+Otherwise the return value is a Tcl list containing
+four elements corresponding to the current <i class="i">baseWidth</i>,
+<i class="i">baseHeight</i><span class="r">, </span><i class="i">widthInc</i><span class="r">, and </span><i class="i">heightInc</i>;  if
+<i class="i">window</i> is not currently gridded, then an empty string
+is returned.
+Note: this command should not be needed very often, since the
+<b class="b">Tk_SetGrid</b><span class="r"> library procedure and the </span><b class="b">setGrid</b> option
+provide easier access to the same functionality.
+</p></dd>
+<dt><b class="b">wm :group </b><i class="i">window</i><span class="r"> ?</span><i class="i">pathName</i>?</dt>
+<dd><p>If <i class="i">pathName</i> is specified, it gives the path name for the leader of
+a group of related windows.  The window manager may use this information,
+for example, to unmap all of the windows in a group when the group&rsquo;s
+leader is iconified.  <i class="i">PathName</i> may be specified as an empty string to
+remove <i class="i">window</i><span class="r"> from any group association.  If </span><i class="i">pathName</i> is
+specified then the command returns an empty string;  otherwise it
+returns the path name of <i class="i">window</i>&rsquo;s current group leader, or an empty
+string if <i class="i">window</i> isn&rsquo;t part of any group.
+</p></dd>
+<dt><b class="b">wm :iconbitmap </b><i class="i">window</i><span class="r"> ?</span><i class="i">bitmap</i>?</dt>
+<dd><p>If <i class="i">bitmap</i> is specified, then it names a bitmap in the standard
+forms accepted by Tk (see the <b class="b">Tk_GetBitmap</b> manual entry for details).
+This bitmap is passed to the window manager to be displayed in
+<i class="i">window</i>&rsquo;s icon, and the command returns an empty string.  If
+an empty string is specified for <i class="i">bitmap</i>, then any current icon
+bitmap is cancelled for <i class="i">window</i>.
+If <i class="i">bitmap</i> is specified then the command returns an empty string.
+Otherwise it returns the name of
+the current icon bitmap associated with <i class="i">window</i>, or an empty
+string if <i class="i">window</i> has no icon bitmap.
+</p></dd>
+<dt><b class="b">wm :iconify </b><i class="i">window</i></dt>
+<dd><p>Arrange for <i class="i">window</i><span class="r"> to be iconified.  It </span><i class="i">window</i> hasn&rsquo;t
+yet been mapped for the first time, this command will arrange for
+it to appear in the iconified state when it is eventually mapped.
+</p></dd>
+<dt><b class="b">wm :iconmask </b><i class="i">window</i><span class="r"> ?</span><i class="i">bitmap</i>?</dt>
+<dd><p>If <i class="i">bitmap</i> is specified, then it names a bitmap in the standard
+forms accepted by Tk (see the <b class="b">Tk_GetBitmap</b> manual entry for details).
+This bitmap is passed to the window manager to be used as a mask
+in conjunction with the <b class="b">iconbitmap</b> option:  where the mask
+has zeroes no icon will be displayed;  where it has ones, the bits
+from the icon bitmap will be displayed.  If
+an empty string is specified for <i class="i">bitmap</i> then any current icon
+mask is cancelled for <i class="i">window</i> (this is equivalent to specifying
+a bitmap of all ones).  If <i class="i">bitmap</i> is specified
+then the command returns an empty string.  Otherwise it
+returns the name of the current icon mask associated with
+<i class="i">window</i>, or an empty string if no mask is in effect.
+</p></dd>
+<dt><b class="b">wm :iconname </b><i class="i">window</i><span class="r"> ?</span><i class="i">newName</i>?</dt>
+<dd><p>If <i class="i">newName</i> is specified, then it is passed to the window
+manager;  the window manager should display <i class="i">newName</i> inside
+the icon associated with <i class="i">window</i>.  In this case an empty
+string is returned as result.  If <i class="i">newName</i> isn&rsquo;t specified
+then the command returns the current icon name for <i class="i">window</i>,
+or an empty string if no icon name has been specified (in this
+case the window manager will normally display the window&rsquo;s title,
+as specified with the <b class="b">wm :title</b> command).
+</p></dd>
+<dt><b class="b">wm :iconposition </b><i class="i">window</i><span class="r"> ?</span><i class="i">x y</i>?</dt>
+<dd><p>If <i class="i">x</i><span class="r"> and </span><i class="i">y</i> are specified, they are passed to the window
+manager as a hint about where to position the icon for <i class="i">window</i>.
+In this case an empty string is returned.  If <i class="i">x</i><span class="r"> and </span><i class="i">y</i> are
+specified as empty strings then any existing icon position hint is cancelled.
+If neither <i class="i">x</i><span class="r"> nor </span><i class="i">y</i> is specified, then the command returns
+a Tcl list containing two values, which are the current icon position
+hints (if no hints are in effect then an empty string is returned).
+</p></dd>
+<dt><b class="b">wm :iconwindow </b><i class="i">window</i><span class="r"> ?</span><i class="i">pathName</i>?</dt>
+<dd><p>If <i class="i">pathName</i> is specified, it is the path name for a window to
+use as icon for <i class="i">window</i><span class="r">: when </span><i class="i">window</i> is iconified then
+<i class="i">pathName</i><span class="r"> should be mapped to serve as icon, and when </span><i class="i">window</i>
+is de-iconified then <i class="i">pathName</i> will be unmapped again.  If
+<i class="i">pathName</i> is specified as an empty string then any existing
+icon window association for <i class="i">window</i> will be cancelled.  If
+the <i class="i">pathName</i> argument is specified then an empty string is
+returned.  Otherwise the command returns the path name of the
+current icon window for <i class="i">window</i>, or an empty string if there
+is no icon window currently specified for <i class="i">window</i>.  Note:
+not all window managers support the notion of an icon window.
+</p></dd>
+<dt><b class="b">wm :maxsize </b><i class="i">window</i><span class="r"> ?</span><i class="i">width height</i>?</dt>
+<dd><p>If <i class="i">width</i><span class="r"> and </span><i class="i">height</i><span class="r"> are specified, then </span><i class="i">window</i>
+becomes resizable and <i class="i">width</i><span class="r"> and </span><i class="i">height</i> give its
+maximum permissible dimensions.
+For gridded windows the dimensions are specified in
+grid units;  otherwise they are specified in pixel units.
+During manual sizing, the window manager
+should restrict the window&rsquo;s dimensions to be less than or
+equal to <i class="i">width</i><span class="r"> and </span><i class="i">height</i>.
+If <i class="i">width</i><span class="r"> and </span><i class="i">height</i> are specified as empty strings,
+then the maximum size option is cancelled for <i class="i">window</i>.
+If <i class="i">width</i><span class="r"> and </span><i class="i">height</i> are
+specified, then the command returns an empty string.  Otherwise
+it returns a Tcl list with two elements, which are the
+maximum width and height currently in effect;  if no maximum
+dimensions are in effect for <i class="i">window</i> then an empty
+string is returned.  See the sections on geometry management
+below for more information.
+</p></dd>
+<dt><b class="b">wm :minsize </b><i class="i">window</i><span class="r"> ?</span><i class="i">width height</i>?</dt>
+<dd><p>If <i class="i">width</i><span class="r"> and </span><i class="i">height</i><span class="r"> are specified, then </span><i class="i">window</i>
+becomes resizable and <i class="i">width</i><span class="r"> and </span><i class="i">height</i> give its
+minimum permissible dimensions.
+For gridded windows the dimensions are specified in
+grid units;  otherwise they are specified in pixel units.
+During manual sizing, the window manager
+should restrict the window&rsquo;s dimensions to be greater than or
+equal to <i class="i">width</i><span class="r"> and </span><i class="i">height</i>.
+If <i class="i">width</i><span class="r"> and </span><i class="i">height</i> are specified as empty strings,
+then the minimum size option is cancelled for <i class="i">window</i>.
+If <i class="i">width</i><span class="r"> and </span><i class="i">height</i> are
+specified, then the command returns an empty string.  Otherwise
+it returns a Tcl list with two elements, which are the
+minimum width and height currently in effect;  if no minimum
+dimensions are in effect for <i class="i">window</i> then an empty
+string is returned.  See the sections on geometry management
+below for more information.
+</p></dd>
+<dt><b class="b">wm :overrideredirect </b><i class="i">window</i><span class="r"> ?</span><i class="i">boolean</i>?</dt>
+<dd><p>If <i class="i">boolean</i> is specified, it must have a proper boolean form and
+the override-redirect flag for <i class="i">window</i> is set to that value.
+If <i class="i">boolean</i><span class="r"> is not specified then </span><b class="b">1</b><span class="r"> or </span><b class="b">0</b> is
+returned to indicate whether or not the override-redirect flag
+is currently set for <i class="i">window</i>.
+Setting the override-redirect flag for a window causes
+it to be ignored by the window manager;  among other things, this means
+that the window will not be reparented from the root window into a
+decorative frame and the user will not be able to manipulate the
+window using the normal window manager mechanisms.
+</p></dd>
+<dt><b class="b">wm :positionfrom </b><i class="i">window</i><span class="r"> ?</span><i class="i">who</i>?</dt>
+<dd><p>If <i class="i">who</i><span class="r"> is specified, it must be either </span><b class="b">program</b> or
+<b class="b">user</b>, or an abbreviation of one of these two.  It indicates
+whether <i class="i">window</i>&rsquo;s current position was requested by the
+program or by the user.  Many window managers ignore program-requested
+initial positions and ask the user to manually position the window;  if
+<b class="b">user</b> is specified then the window manager should position the
+window at the given place without asking the user for assistance.
+If <i class="i">who</i> is specified as an empty string, then the current position
+source is cancelled.
+If <i class="i">who</i> is specified, then the command returns an empty string.
+Otherwise it returns <b class="b">user</b><span class="r"> or </span><b class="b">window</b> to indicate the
+source of the window&rsquo;s current position, or an empty string if
+no source has been specified yet.  Most window managers interpret
+&ldquo;no source&rdquo; as equivalent to <b class="b">program</b>.
+Tk will automatically set the position source to <b class="b">user</b>
+when a <b class="b">wm :geometry</b> command is invoked, unless the source has
+been set explicitly to <b class="b">program</b>.
+</p></dd>
+<dt><b class="b">wm :protocol </b><i class="i">window</i><span class="r"> ?</span><i class="i">name</i><span class="r">? ?</span><i class="i">command</i>?</dt>
+<dd><p>This command is used to manage window manager protocols such as
+<b class="b">WM_DELETE_WINDOW</b>.
+<i class="i">Name</i> is the name of an atom corresponding to a window manager
+protocol, such as <b class="b">WM_DELETE_WINDOW</b><span class="r"> or </span><b class="b">WM_SAVE_YOURSELF</b>
+or <b class="b">WM_TAKE_FOCUS</b>.
+If both <i class="i">name</i><span class="r"> and </span><i class="i">command</i><span class="r"> are specified, then </span><i class="i">command</i>
+is associated with the protocol specified by <i class="i">name</i>.
+<i class="i">Name</i><span class="r"> will be added to </span><i class="i">window</i><span class="r">&rsquo;s </span><b class="b">WM_PROTOCOLS</b>
+property to tell the window manager that the application has a
+protocol handler for <i class="i">name</i><span class="r">, and </span><i class="i">command</i> will
+be invoked in the future whenever the window manager sends a
+message to the client for that protocol.
+In this case the command returns an empty string.
+If <i class="i">name</i><span class="r"> is specified but </span><i class="i">command</i> isn&rsquo;t, then the current
+command for <i class="i">name</i> is returned, or an empty string if there
+is no handler defined for <i class="i">name</i>.
+If <i class="i">command</i> is specified as an empty string then the current
+handler for <i class="i">name</i> is deleted and it is removed from the
+<b class="b">WM_PROTOCOLS</b><span class="r"> property on </span><i class="i">window</i>;  an empty string is
+returned.
+Lastly, if neither <i class="i">name</i><span class="r"> nor </span><i class="i">command</i> is specified, the
+command returns a list of all the protocols for which handlers
+are currently defined for <i class="i">window</i>.
+</p></dd>
+</dl>
+
+
+<p>Tk always defines a protocol handler for <b class="b">WM_DELETE_WINDOW</b>, even if
+you haven&rsquo;t asked for one with <b class="b">wm :protocol</b>.
+If a <b class="b">WM_DELETE_WINDOW</b> message arrives when you haven&rsquo;t defined
+a handler, then Tk handles the message by destroying the window for
+which it was received.
+.RE
+</p>
+<dl class="table">
+<dt><b class="b">wm :sizefrom </b><i class="i">window</i><span class="r"> ?</span><i class="i">who</i>?</dt>
+<dd><p>If <i class="i">who</i><span class="r"> is specified, it must be either </span><b class="b">program</b> or
+<b class="b">user</b>, or an abbreviation of one of these two.  It indicates
+whether <i class="i">window</i>&rsquo;s current size was requested by the
+program or by the user.  Some window managers ignore program-requested
+sizes and ask the user to manually size the window;  if
+<b class="b">user</b> is specified then the window manager should give the
+window its specified size without asking the user for assistance.
+If <i class="i">who</i> is specified as an empty string, then the current size
+source is cancelled.
+If <i class="i">who</i> is specified, then the command returns an empty string.
+Otherwise it returns <b class="b">user</b><span class="r"> or </span><b class="b">window</b> to indicate the
+source of the window&rsquo;s current size, or an empty string if
+no source has been specified yet.  Most window managers interpret
+&ldquo;no source&rdquo; as equivalent to <b class="b">program</b>.
+</p></dd>
+<dt><b class="b">wm :state </b><i class="i">window</i></dt>
+<dd><p>Returns the current state of <i class="i">window</i><span class="r">:  either </span><b class="b">normal</b>,
+<b class="b">iconic</b><span class="r">, or </span><b class="b">withdrawn</b>.
+</p></dd>
+<dt><b class="b">wm :title </b><i class="i">window</i><span class="r"> ?</span><i class="i">string</i>?</dt>
+<dd><p>If <i class="i">string</i> is specified, then it will be passed to the window
+manager for use as the title for <i class="i">window</i> (the window manager
+should display this string in <i class="i">window</i>&rsquo;s title bar).  In this
+case the command returns an empty string.  If <i class="i">string</i> isn&rsquo;t
+specified then the command returns the current title for the
+<i class="i">window</i>.  The title for a window defaults to its name.
+</p></dd>
+<dt><b class="b">wm :transient </b><i class="i">window</i><span class="r"> ?</span><i class="i">master</i>?</dt>
+<dd><p>If <i class="i">master</i> is specified, then the window manager is informed
+that <i class="i">window</i> is a transient window (e.g. pull-down menu) working
+on behalf of <i class="i">master</i><span class="r"> (where </span><i class="i">master</i> is the
+path name for a top-level window).  Some window managers will use
+this information to manage <i class="i">window</i><span class="r"> specially.  If </span><i class="i">master</i>
+is specified as an empty string then <i class="i">window</i> is marked as not
+being a transient window any more.  If <i class="i">master</i> is specified,
+then the command returns an empty string.  Otherwise the command
+returns the path name of <i class="i">window</i>&rsquo;s current master, or an
+empty string if <i class="i">window</i> isn&rsquo;t currently a transient window.
+</p></dd>
+<dt><b class="b">wm :withdraw </b><i class="i">window</i></dt>
+<dd><p>Arranges for <i class="i">window</i> to be withdrawn from the screen.  This
+causes the window to be unmapped and forgotten about by the window
+manager.  If the window
+has never been mapped, then this command
+causes the window to be mapped in the withdrawn state.  Not all
+window managers appear to know how to handle windows that are
+mapped in the withdrawn state.
+Note: it sometimes seems to be necessary to withdraw a
+window and then re-map it (e.g. with <b class="b">wm :deiconify</b>) to get some
+window managers to pay attention to changes in window attributes
+such as group.
+</p>
+</dd>
+</dl>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022Sources-Of-Geometry-Information_0022">
+<h4 class="unnumberedsubsec"><span>&quot;Sources Of Geometry Information&quot;<a class="copiable-link" href="#g_t_0022Sources-Of-Geometry-Information_0022"> &para;</a></span></h4>
+
+<p>Size-related information for top-level windows
+can come from three sources.
+First, geometry requests come from the widgets that are descendants
+of a top-level window.
+Each widget requests a particular size for itself
+by calling <b class="b">Tk_GeometryRequest</b>.  This information is passed to
+geometry managers, which then request large enough sizes for parent
+windows so that they can layout the children properly.
+Geometry information passes upwards through the window hierarchy
+until eventually a particular size is requested for each top-level
+window.
+These requests are called <i class="i">internal requests</i> in the discussion
+below.
+The second source of width and height information is through the
+<b class="b">wm :geometry</b> command.  Third, the user can
+request a particular size for a window using the
+interactive facilities of the window manager.
+The second and third types of geometry requests are called
+<i class="i">external requests</i> in the discussion below;  Tk treats
+these two kinds of requests identically.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022Ungridded-Geometry-Management_0022">
+<h4 class="unnumberedsubsec"><span>&quot;Ungridded Geometry Management&quot;<a class="copiable-link" href="#g_t_0022Ungridded-Geometry-Management_0022"> &para;</a></span></h4>
+
+<p>Tk allows the geometry of a top-level window to be managed in
+either of two general ways: ungridded or gridded.
+The ungridded form occurs if no <b class="b">wm :grid</b> command
+has been issued for a top-level window.
+Ungridded management has several variants.
+In the simplest variant of ungridded windows,
+no <b class="b">wm :geometry</b><span class="r">, </span><b class="b">wm :minsize</b><span class="r">, or </span><b class="b">wm :maxsize</b>
+commands have been invoked either.
+In this case, the window&rsquo;s size is
+determined totally by the internal requests emanating from the
+widgets inside the window:  Tk will ask the window manager not to
+permit the user to resize the window interactively.
+</p>
+<p>If a <b class="b">wm :geometry</b> command is invoked on an ungridded window,
+then the size in that command overrides any size requested by the
+window&rsquo;s widgets;  from now on, the window&rsquo;s size will be determined
+entirely by the most recent information from <b class="b">wm :geometry</b>
+commands.  To go back to using the size requested by the window&rsquo;s
+widgets, issue a <b class="b">wm :geometry</b><span class="r"> command with an empty </span><i class="i">geometry</i>
+string.
+</p>
+<p>To enable interactive resizing of an ungridded window, one or both
+of the <b class="b">wm :maxsize</b>
+and <b class="b">wm :minsize</b> commands must be issued.
+The information from these commands will be passed to the window
+manager, and size changes within the specified range will be permitted.
+For ungridded windows the limits refer to the top-level window&rsquo;s
+dimensions in pixels.
+If only a <b class="b">wm :maxsize</b> command is issued then the minimum
+dimensions default to 1;  if only a <b class="b">wm :minsize</b> command is
+issued then the maximum dimensions default to the size of the display.
+If the size of a window is changed interactively, it has the same
+effect as if <b class="b">wm :geometry</b> had been invoked:  from now on, internal
+geometry requests will be ignored.
+To return to internal control over the window&rsquo;s size, issue a
+<b class="b">wm :geometry</b><span class="r"> command with an empty </span><i class="i">geometry</i> argument.
+If a window has been manually resized or moved, the <b class="b">wm :geometry</b>
+command will return the geometry that was requested interactively.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="g_t_0022Gridded-Geometry-Management_0022">
+<h4 class="unnumberedsubsec"><span>&quot;Gridded Geometry Management&quot;<a class="copiable-link" href="#g_t_0022Gridded-Geometry-Management_0022"> &para;</a></span></h4>
+
+<p>The second style of geometry management is called <i class="i">gridded</i>.
+This approach occurs when one of the widgets of an application
+supports a range of useful sizes.
+This occurs, for example, in a text editor where the scrollbars,
+menus, and other adornments are fixed in size but the edit widget
+can support any number of lines of text or characters per line.
+In this case, it is usually desirable to let the user specify the
+number of lines or characters-per-line, either with the
+<b class="b">wm :geometry</b> command or by interactively resizing the window.
+In the case of text, and in other interesting cases also, only
+discrete sizes of the window make sense, such as integral numbers
+of lines and characters-per-line;  arbitrary pixel sizes are not useful.
+</p>
+<p>Gridded geometry management provides support for this kind of
+application.
+Tk (and the window manager) assume that there is a grid of some
+sort within the application and that the application should be
+resized in terms of <i class="i">grid units</i> rather than pixels.
+Gridded geometry management is typically invoked by turning on
+the <b class="b">setGrid</b> option for a widget;  it can also be invoked
+with the <b class="b">wm :grid</b><span class="r"> command or by calling </span><b class="b">Tk_SetGrid</b>.
+In each of these approaches the particular widget (or sometimes
+code in the application as a whole) specifies the relationship between 
+integral grid sizes for the window and pixel sizes.
+To return to non-gridded geometry management, invoke
+<b class="b">wm :grid</b> with empty argument strings.
+</p>
+<p>When gridded geometry management is enabled then all the dimensions specified
+in <b class="b">wm :minsize</b><span class="r">, </span><b class="b">wm :maxsize</b><span class="r">, and </span><b class="b">wm :geometry</b> commands
+are treated as grid units rather than pixel units.
+Interactive resizing is automatically enabled, and it will be
+carried out in even numbers of grid units rather than pixels.
+By default there are no limits on the minimum or maximum dimensions
+of a gridded window.
+As with ungridded windows, interactive resizing has exactly the
+same effect as invoking the <b class="b">wm :geometry</b> command.
+For gridded windows, internally- and externally-requested dimensions
+work together: the externally-specified width and height determine
+the size of the window in grid units, and the information from the
+last <b class="b">wm :grid</b> command maps from grid units to pixel units.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Bugs-3">
+<h4 class="unnumberedsubsec"><span>Bugs<a class="copiable-link" href="#Bugs-3"> &para;</a></span></h4>
+
+<p>The window manager interactions seem too complicated, especially
+for managing geometry.  Suggestions on how to simplify this would
+be greatly appreciated.
+</p>
+<p>Most existing window managers appear to have bugs that affect the
+operation of the <b class="b">wm</b> command.  For example, some changes won&rsquo;t
+take effect if the window is already active:  the window will have
+to be withdrawn and de-iconified in order to make the change happen.
+</p>
+</div>
+<div class="unnumberedsubsec-level-extent" id="Keywords-39">
+<h4 class="unnumberedsubsec"><span>Keywords<a class="copiable-link" href="#Keywords-39"> &para;</a></span></h4>
+<p>aspect ratio, deiconify, focus model, geometry, grid, group, icon, iconify, increments, position, size, title, top-level window, units, window manager
+</p>
+</div>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="winfo.html">winfo</a>, Up: <a href="Control.html">Control</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/1_002b.html
@@ -0,0 +1,90 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>1+ (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="1+ (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="1+ (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="abs.html" rel="next" title="abs">
+<link href="_002f.html" rel="prev" title="/">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t1_002b">
+<div class="nav-panel">
+<p>
+Next: <a href="abs.html" accesskey="n" rel="next">abs                                                              [Function]</a>, Previous: <a href="_002f.html" accesskey="p" rel="prev">/                                                                [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t1_002b_002c-1_002d-_005bFunction_005d"><span>12.2.28 1+, 1-                                                         [Function]<a class="copiable-link" href="#g_t1_002b_002c-1_002d-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">1</code>  <i class="i">+</i> &rArr;  <i class="i">number</i>
+ <span class="r">successor</span>
+<code class="code">1</code>  <i class="i">-</i> &rArr;  <i class="i">number</i>
+ <span class="r">predecessor</span>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-213"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-213"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">successor</i>, <i class="i">predecessor</i>&mdash;a <i class="i">number</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-293"><span>Description::<a class="copiable-link" href="#Description_003a_003a-293"> &para;</a></span></h4>
+
+<p><b class="b">1+</b> returns a <i class="i">number</i> that is one more than its argument <i class="i">number</i>.
+<b class="b">1-</b> returns a <i class="i">number</i> that is one less than its argument <i class="i">number</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-197"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-197"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (1+ 99) &rArr;  100 
+ (1- 100) &rArr;  99 
+ (1+ (complex 0.0)) &rArr;  #C(1.0 0.0) 
+ (1- 5/3) &rArr;  2/3 
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-88"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-88"> &para;</a></span></h4>
+
+<p>Might signal <b class="b">type-error</b> if its <i class="i">argument</i> is not a <i class="i">number</i>.
+Might signal <b class="b">arithmetic-error</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-247"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-247"> &para;</a></span></h4>
+
+<p><a class="ref" href="incf.html">incf, decf                                                          [Macro]</a>
+, <b class="b">decf</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-147"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-147"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (1+ <i class="i">number</i>) &equiv; (+ <i class="i">number</i> 1)
+ (1- <i class="i">number</i>) &equiv; (- <i class="i">number</i> 1)
+</pre></div>
+
+<p>Implementors are encouraged to make the performance of both the previous
+expressions be the same.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/A-specifier-for-a-rest-parameter.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>A specifier for a rest parameter (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="A specifier for a rest parameter (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="A specifier for a rest parameter (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Ordinary-Lambda-Lists.html" rel="up" title="Ordinary Lambda Lists">
+<link href="Specifiers-for-keyword-parameters.html" rel="next" title="Specifiers for keyword parameters">
+<link href="Specifiers-for-optional-parameters.html" rel="prev" title="Specifiers for optional parameters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="A-specifier-for-a-rest-parameter">
+<div class="nav-panel">
+<p>
+Next: <a href="Specifiers-for-keyword-parameters.html" accesskey="n" rel="next">Specifiers for keyword parameters</a>, Previous: <a href="Specifiers-for-optional-parameters.html" accesskey="p" rel="prev">Specifiers for optional parameters</a>, Up: <a href="Ordinary-Lambda-Lists.html" accesskey="u" rel="up">Ordinary Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="A-specifier-for-a-rest-parameter-1"><span>3.4.1.3 A specifier for a rest parameter<a class="copiable-link" href="#A-specifier-for-a-rest-parameter-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-_0026rest"></a>
+
+<p><b class="b">&amp;rest</b>, if present, must be followed by a single <i class="i">rest parameter</i>
+specifier, which in turn must be followed by another 
+<i class="i">lambda list keyword</i> or the end of the <i class="i">lambda list</i>.  After all
+optional parameter specifiers have been processed, then there may or
+may not be a <i class="i">rest parameter</i>.  If there is a <i class="i">rest parameter</i>, it is
+bound to a <i class="i">list</i> of all as-yet-unprocessed arguments.  If
+no unprocessed arguments remain, the <i class="i">rest parameter</i> is bound to the
+<i class="i">empty list</i>.  If there is no <i class="i">rest parameter</i> and there are no 
+<i class="i">keyword parameters</i>, then an error 
+should be signaled if
+any unprocessed arguments remain; see <a class="ref" href="Error-Checking-in-Function-Calls.html">Error Checking in Function Calls</a>.
+The value of a <i class="i">rest parameter</i>
+is permitted, but not required, to share structure with the
+last argument to <b class="b">apply</b>.
+</p>
+<a class="index-entry-id" id="index-_0026key"></a>
+
+<a class="index-entry-id" id="index-_0026allow_002dother_002dkeys"></a>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/APPLY-Forms-as-Places.html
@@ -0,0 +1,91 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>APPLY Forms as Places (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="APPLY Forms as Places (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="APPLY Forms as Places (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Kinds-of-Places.html" rel="up" title="Kinds of Places">
+<link href="Setf-Expansions-and-Places.html" rel="next" title="Setf Expansions and Places">
+<link href="THE-Forms-as-Places.html" rel="prev" title="THE Forms as Places">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="APPLY-Forms-as-Places">
+<div class="nav-panel">
+<p>
+Next: <a href="Setf-Expansions-and-Places.html" accesskey="n" rel="next">Setf Expansions and Places</a>, Previous: <a href="THE-Forms-as-Places.html" accesskey="p" rel="prev">THE Forms as Places</a>, Up: <a href="Kinds-of-Places.html" accesskey="u" rel="up">Kinds of Places</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="APPLY-Forms-as-Places-1"><span>5.1.2.5 APPLY Forms as Places<a class="copiable-link" href="#APPLY-Forms-as-Places-1"> &para;</a></span></h4>
+
+<p>The following situations involving <b class="b">setf</b> of <b class="b">apply</b> must be supported:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">(setf (apply #'aref <i class="i">array</i>
+				        {<i class="i">subscript</i>}*
+					<i class="i">more-subscripts</i>)
+			  <i class="i">new-element</i>)</code>
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">(setf (apply #'bit <i class="i">array</i> 
+				       {<i class="i">subscript</i>}*
+				       <i class="i">more-subscripts</i>)
+			  <i class="i">new-element</i>)</code>
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">(setf (apply #'sbit <i class="i">array</i> 
+					{<i class="i">subscript</i>}*
+					<i class="i">more-subscripts</i>) 
+			  <i class="i">new-element</i>)</code>
+</p></dd>
+</dl>
+
+<p>In all three cases, the <i class="i">element</i> of <i class="i">array</i> designated
+by the concatenation of <i class="i">subscripts</i> and <i class="i">more-subscripts</i>
+(<i class="i">i.e.</i>, the same <i class="i">element</i> which would be <i class="i">read</i> by the call to
+     <i class="i">apply</i> if it were not part of a <b class="b">setf</b> <i class="i">form</i>)
+is changed to have the <i class="i">value</i> given by <i class="i">new-element</i>.
+</p>
+<p>For these usages, the function name (<b class="b">aref</b>, <b class="b">bit</b>, or <b class="b">sbit</b>)
+must refer to the global function definition, rather than a locally defined
+<i class="i">function</i>.
+</p>
+<p>No other <i class="i">standardized</i> <i class="i">function</i> is required to be supported,
+but an <i class="i">implementation</i> may define such support.
+An <i class="i">implementation</i> may also define support 
+for <i class="i">implementation-defined</i> <i class="i">operators</i>.
+</p>
+<p>If a user-defined <i class="i">function</i> is used in this context,
+the following equivalence is true, except that care is taken
+to preserve proper left-to-right evaluation of argument <i class="i">subforms</i>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setf (apply #'<i class="i">name</i> {<i class="i">arg</i>}*) <i class="i">val</i>)
+ &equiv; (apply #'(setf <i class="i">name</i>) <i class="i">val</i> {<i class="i">arg</i>}*)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Abstract-Classifications-of-Streams-_0028Introduction-to-Streams_0029.html
@@ -0,0 +1,43 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Abstract Classifications of Streams (Introduction to Streams) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Abstract Classifications of Streams (Introduction to Streams) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Abstract Classifications of Streams (Introduction to Streams) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Streams.html" rel="up" title="Introduction to Streams">
+<link href="Input.html" rel="next" title="Input">
+<link href="Introduction-to-Streams.html" rel="prev" title="Introduction to Streams">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Abstract-Classifications-of-Streams-_0028Introduction-to-Streams_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="Input.html" accesskey="n" rel="next">Input, Output, and Bidirectional Streams</a>, Previous: <a href="Introduction-to-Streams.html" accesskey="p" rel="prev">Introduction to Streams</a>, Up: <a href="Introduction-to-Streams.html" accesskey="u" rel="up">Introduction to Streams</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Abstract-Classifications-of-Streams-1"><span>21.1.1.1 Abstract Classifications of Streams<a class="copiable-link" href="#Abstract-Classifications-of-Streams-1"> &para;</a></span></h4>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Abstract-Classifications-of-Streams.html
@@ -0,0 +1,43 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Abstract Classifications of Streams (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Abstract Classifications of Streams (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Abstract Classifications of Streams (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Streams.html" rel="up" title="Introduction to Streams">
+<link href="File-Streams.html" rel="next" title="File Streams">
+<link href="Interactive-Streams.html" rel="prev" title="Interactive Streams">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Abstract-Classifications-of-Streams">
+<div class="nav-panel">
+<p>
+Next: <a href="File-Streams.html" accesskey="n" rel="next">File Streams</a>, Previous: <a href="Interactive-Streams.html" accesskey="p" rel="prev">Interactive Streams</a>, Up: <a href="Introduction-to-Streams.html" accesskey="u" rel="up">Introduction to Streams</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Abstract-Classifications-of-Streams-2"><span>21.1.1.5 Abstract Classifications of Streams<a class="copiable-link" href="#Abstract-Classifications-of-Streams-2"> &para;</a></span></h4>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Accessibility-of-Symbols-in-a-Package.html
@@ -0,0 +1,90 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Accessibility of Symbols in a Package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Accessibility of Symbols in a Package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Accessibility of Symbols in a Package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Packages.html" rel="up" title="Introduction to Packages">
+<link href="Locating-a-Symbol-in-a-Package.html" rel="next" title="Locating a Symbol in a Package">
+<link href="Package-Inheritance.html" rel="prev" title="Package Inheritance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Accessibility-of-Symbols-in-a-Package">
+<div class="nav-panel">
+<p>
+Next: <a href="Locating-a-Symbol-in-a-Package.html" accesskey="n" rel="next">Locating a Symbol in a Package</a>, Previous: <a href="Package-Inheritance.html" accesskey="p" rel="prev">Package Inheritance</a>, Up: <a href="Introduction-to-Packages.html" accesskey="u" rel="up">Introduction to Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Accessibility-of-Symbols-in-a-Package-1"><span>11.1.1.5 Accessibility of Symbols in a Package<a class="copiable-link" href="#Accessibility-of-Symbols-in-a-Package-1"> &para;</a></span></h4>
+
+<p>A <i class="i">symbol</i> becomes <i class="i">accessible</i>
+<a class="index-entry-id" id="index-accessible"></a>
+ in a <i class="i">package</i> 
+    if that is its <i class="i">home package</i> when it is created,
+ or if it is <i class="i">imported</i> into that <i class="i">package</i>,
+ or by inheritance via <b class="b">use-package</b>.
+</p>
+<p>If a <i class="i">symbol</i> is <i class="i">accessible</i> in a <i class="i">package</i>,
+it can be referred to when using the <i class="i">Lisp reader</i>
+without a <i class="i">package prefix</i> when that <i class="i">package</i> is the <i class="i">current package</i>,
+regardless of whether it is <i class="i">present</i> or inherited.
+</p>
+<p><i class="i">Symbols</i> from one <i class="i">package</i> can be made <i class="i">accessible</i> 
+in another <i class="i">package</i> in two ways.
+</p>
+<dl class="table">
+<dt>&ndash;</dt>
+<dd><p>Any individual <i class="i">symbol</i> can be added to a <i class="i">package</i> by use
+of <b class="b">import</b>.  After the call to <b class="b">import</b> the
+<i class="i">symbol</i> is <i class="i">present</i> in the importing <i class="i">package</i>.
+The status of the <i class="i">symbol</i> in the <i class="i">package</i> 
+it came from (if any) is unchanged, and the <i class="i">home package</i> for
+this <i class="i">symbol</i> is unchanged.
+Once <i class="i">imported</i>, a <i class="i">symbol</i> is <i class="i">present</i> in the
+importing <i class="i">package</i>
+and can be removed only by calling <b class="b">unintern</b>.
+</p>
+<p>A <i class="i">symbol</i> is <i class="i">shadowed</i>_3 by another <i class="i">symbol</i> 
+in some <i class="i">package</i> if the first <i class="i">symbol</i> would be <i class="i">accessible</i>
+by inheritance if not for the presence of the second <i class="i">symbol</i>.
+See <b class="b">shadowing-import</b>.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>The second mechanism for making <i class="i">symbols</i> from one <i class="i">package</i>
+<i class="i">accessible</i> in another is provided by <b class="b">use-package</b>.  
+All of the <i class="i">external symbols</i> of the used <i class="i">package</i> are inherited
+by the using <i class="i">package</i>.
+The <i class="i">function</i> <b class="b">unuse-package</b> undoes the effects of a previous <b class="b">use-package</b>.  
+</p></dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Locating-a-Symbol-in-a-Package.html">Locating a Symbol in a Package</a>, Previous: <a href="Package-Inheritance.html">Package Inheritance</a>, Up: <a href="Introduction-to-Packages.html">Introduction to Packages</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Accessing-Slots.html
@@ -0,0 +1,99 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Accessing Slots (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Accessing Slots (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Accessing Slots (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Slots.html" rel="up" title="Slots">
+<link href="Inheritance-of-Slots-and-Slot-Options.html" rel="next" title="Inheritance of Slots and Slot Options">
+<link href="Introduction-to-Slots.html" rel="prev" title="Introduction to Slots">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Accessing-Slots">
+<div class="nav-panel">
+<p>
+Next: <a href="Inheritance-of-Slots-and-Slot-Options.html" accesskey="n" rel="next">Inheritance of Slots and Slot Options</a>, Previous: <a href="Introduction-to-Slots.html" accesskey="p" rel="prev">Introduction to Slots</a>, Up: <a href="Slots.html" accesskey="u" rel="up">Slots</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Accessing-Slots-1"><span>7.5.2 Accessing Slots<a class="copiable-link" href="#Accessing-Slots-1"> &para;</a></span></h4>
+
+<p><i class="i">Slots</i> can be <i class="i">accessed</i> in two ways: by use of the primitive function
+<b class="b">slot-value</b> and by use of <i class="i">generic functions</i> generated by
+the <b class="b">defclass</b> form.
+</p>
+<p>The <i class="i">function</i> <b class="b">slot-value</b> can be used with any of the <i class="i">slot</i>
+names specified in the <b class="b">defclass</b> form to <i class="i">access</i> a specific
+<i class="i">slot</i> <i class="i">accessible</i> in an <i class="i">instance</i> of the given <i class="i">class</i>.
+</p>
+<p>The macro <b class="b">defclass</b> provides syntax for generating <i class="i">methods</i> to
+read and write <i class="i">slots</i>.  If a reader <i class="i">method</i> is requested, 
+a <i class="i">method</i> is automatically generated for reading the value of the
+<i class="i">slot</i>, but no <i class="i">method</i> for storing a value into it is generated.
+If a writer <i class="i">method</i> is requested, a <i class="i">method</i> is automatically 
+generated for storing a value into the <i class="i">slot</i>, but no <i class="i">method</i> 
+for reading its value is generated.  If an accessor <i class="i">method</i> is 
+requested, a <i class="i">method</i> for reading the value of the <i class="i">slot</i> and a
+<i class="i">method</i> for storing a value into the <i class="i">slot</i> are automatically
+generated.  Reader and writer <i class="i">methods</i> are implemented using
+<b class="b">slot-value</b>.
+</p>
+<p>When a reader or writer <i class="i">method</i> is specified for a <i class="i">slot</i>, the
+name of the <i class="i">generic function</i> to which the generated <i class="i">method</i>
+belongs is directly specified.  If the <i class="i">name</i> specified for the writer
+<i class="i">method</i> is the symbol <code class="t">name</code>, the <i class="i">name</i> of the
+<i class="i">generic function</i> for writing the <i class="i">slot</i> is the symbol
+<code class="t">name</code>, and the <i class="i">generic function</i> takes two arguments: the new
+value and the <i class="i">instance</i>, in that order.  If the <i class="i">name</i> specified
+for the accessor <i class="i">method</i> is the symbol <code class="t">name</code>, the <i class="i">name</i> of
+the <i class="i">generic function</i> for reading the <i class="i">slot</i> is the symbol 
+<code class="t">name</code>, and the <i class="i">name</i> of the <i class="i">generic function</i> for writing 
+the <i class="i">slot</i> is the list <code class="t">(setf name)</code>.
+</p>
+<p>A <i class="i">generic function</i> created or modified by supplying <code class="t">:reader</code>,
+<code class="t">:writer</code>, or <code class="t">:accessor</code> <i class="i">slot</i> options can be treated exactly
+as an ordinary <i class="i">generic function</i>.
+</p>
+<p>Note that <b class="b">slot-value</b> can be used to read or write the value of a
+<i class="i">slot</i> whether or not reader or writer <i class="i">methods</i> exist for that
+<i class="i">slot</i>.  When <b class="b">slot-value</b> is used, no reader or writer
+<i class="i">methods</i> are invoked.
+</p>
+<p>The macro <b class="b">with-slots</b> can be used to establish a 
+<i class="i">lexical environment</i> in which specified <i class="i">slots</i> are lexically
+available as if they were variables.  The macro <b class="b">with-slots</b> 
+invokes the <i class="i">function</i> <b class="b">slot-value</b> to <i class="i">access</i> the specified <i class="i">slots</i>.
+</p>
+<p>The macro <b class="b">with-accessors</b> can be used to establish a lexical
+environment in which specified <i class="i">slots</i> are lexically available through
+their accessors as if they were variables.  The macro <b class="b">with-accessors</b>
+invokes the appropriate accessors to <i class="i">access</i> the specified <i class="i">slots</i>. 
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Inheritance-of-Slots-and-Slot-Options.html">Inheritance of Slots and Slot Options</a>, Previous: <a href="Introduction-to-Slots.html">Introduction to Slots</a>, Up: <a href="Slots.html">Slots</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Additional-Constraints-on-Externalizable-Objects.html
@@ -0,0 +1,178 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Additional Constraints on Externalizable Objects (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Additional Constraints on Externalizable Objects (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Additional Constraints on Externalizable Objects (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Literal-Objects-in-Compiled-Files.html" rel="up" title="Literal Objects in Compiled Files">
+<link href="Extensions-to-Similarity-Rules.html" rel="prev" title="Extensions to Similarity Rules">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Additional-Constraints-on-Externalizable-Objects">
+<div class="nav-panel">
+<p>
+Previous: <a href="Extensions-to-Similarity-Rules.html" accesskey="p" rel="prev">Extensions to Similarity Rules</a>, Up: <a href="Literal-Objects-in-Compiled-Files.html" accesskey="u" rel="up">Literal Objects in Compiled Files</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Additional-Constraints-on-Externalizable-Objects-1"><span>3.2.4.6 Additional Constraints on Externalizable Objects<a class="copiable-link" href="#Additional-Constraints-on-Externalizable-Objects-1"> &para;</a></span></h4>
+
+<p>If two <i class="i">literal objects</i> appearing in the source code for a single file
+processed with
+the <i class="i">file compiler</i> 
+are the <i class="i">identical</i>,
+the corresponding <i class="i">objects</i> in the <i class="i">compiled code</i> 
+must also be the <i class="i">identical</i>.
+</p>
+<p>With the exception of <i class="i">symbols</i> and <i class="i">packages</i>, any two
+<i class="i">literal objects</i>
+in <i class="i">code</i> being processed by
+the <i class="i">file compiler</i>
+may be <i class="i">coalesced</i> 
+if and only if they are <i class="i">similar</i>; 
+if they are either both <i class="i">symbols</i> or both <i class="i">packages</i>,
+they may only be <i class="i">coalesced</i> if and only if they are <i class="i">identical</i>.
+</p>
+<p><i class="i">Objects</i> containing circular references can 
+be <i class="i">externalizable objects</i>.
+The <i class="i">file compiler</i> is required to preserve <b class="b">eql</b>ness of 
+substructures within a <i class="i">file</i>.
+Preserving <b class="b">eql</b>ness means that subobjects that are
+the <i class="i">same</i>
+in the <i class="i">source code</i> must 
+be
+the <i class="i">same</i>
+in the corresponding <i class="i">compiled code</i>.
+</p>
+<p>In addition, the following are constraints on the handling of
+<i class="i">literal objects</i> by the <i class="i">file compiler</i>:
+</p>
+<dl class="table">
+<dt><code class="t"></code></dt>
+<dd><p><b class="b">array:</b> If an <i class="i">array</i> in the source code is a
+<i class="i">simple array</i>, then the corresponding <i class="i">array</i>
+in the compiled code will also be a <i class="i">simple array</i>.  If
+an <i class="i">array</i> in the source code is displaced, has a 
+<i class="i">fill pointer</i>, or is <i class="i">actually adjustable</i>, the corresponding 
+<i class="i">array</i> in the compiled code might lack any or all of these
+qualities. If an <i class="i">array</i> in the source code has a fill
+pointer, then the corresponding <i class="i">array</i> in the compiled
+code might be only the size implied by the fill pointer.
+</p>
+</dd>
+<dt><code class="t"></code></dt>
+<dd><p><b class="b">packages:</b> The loader is required to find the
+corresponding <i class="i">package</i> <i class="i">object</i> as if by calling 
+<b class="b">find-package</b> with the package name as an argument.  
+An error of <i class="i">type</i> <b class="b">package-error</b> is signaled if no 
+<i class="i">package</i> of that name exists at load time.
+</p>
+</dd>
+<dt><code class="t"></code></dt>
+<dd><p><b class="b">random-state:</b> A constant <i class="i">random state</i>
+object cannot be used as the state argument 
+to the <i class="i">function</i> <b class="b">random</b> because <b class="b">random</b> modifies this data structure.
+</p>
+</dd>
+<dt><code class="t"></code></dt>
+<dd><p><b class="b">structure, standard-object:</b>
+<i class="i">Objects</i> of <i class="i">type</i> <b class="b">structure-object</b> and <b class="b">standard-object</b>
+may appear in compiled constants if there is an
+appropriate <b class="b">make-load-form</b> method defined for that
+<i class="i">type</i>.
+</p>
+<p>The <i class="i">file compiler</i> calls <b class="b">make-load-form</b> on any <i class="i">object</i>
+that is referenced as a <i class="i">literal object</i> if the <i class="i">object</i> is a
+<i class="i">generalized instance</i> of <b class="b">standard-object</b>,
+<b class="b">structure-object</b>, <b class="b">condition</b>, or any of a 
+(possibly empty) <i class="i">implementation-dependent</i> set of other <i class="i">classes</i>.
+The <i class="i">file compiler</i> only calls <b class="b">make-load-form</b> once for
+any given <i class="i">object</i> within a single <i class="i">file</i>.
+</p>
+</dd>
+<dt><code class="t"></code></dt>
+<dd><p><b class="b">symbol:</b> In order to guarantee that <i class="i">compiled files</i> can be <i class="i">loaded</i>
+  correctly, users must ensure that the <i class="i">packages</i> referenced in those <i class="i">files</i>
+  are defined consistently at compile time and load time.  <i class="i">Conforming programs</i>
+  must satisfy the following requirements:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>The <i class="i">current package</i> when a <i class="i">top level form</i> in the <i class="i">file</i>
+      is processed by <b class="b">compile-file</b> must be the same as the <i class="i">current package</i>
+      when the <i class="i">code</i> corresponding to that <i class="i">top level form</i> in the
+      <i class="i">compiled file</i> is executed by <b class="b">load</b>.  In particular:
+</p>
+<dl class="table">
+<dt>a.</dt>
+<dd><p>Any <i class="i">top level form</i> in a <i class="i">file</i> that alters
+	  the <i class="i">current package</i> must change it to a <i class="i">package</i>
+	  of the same <i class="i">name</i> both at compile time and at load time.
+</p>
+</dd>
+<dt>b.</dt>
+<dd><p>If the first <i class="i">non-atomic</i> <i class="i">top level form</i> in the <i class="i">file</i>
+	  is not an <b class="b">in-package</b> <i class="i">form</i>, then the <i class="i">current package</i>
+	  at the time <b class="b">load</b> is called must be a <i class="i">package</i> with the 
+	  same <i class="i">name</i> as the package that was the <i class="i">current package</i>
+	  at the time <b class="b">compile-file</b> was called.
+</p></dd>
+</dl>
+
+</dd>
+<dt>2.</dt>
+<dd><p>For all <i class="i">symbols</i> 
+      appearing lexically within a <i class="i">top level form</i> that
+      were <i class="i">accessible</i> in the <i class="i">package</i> that was the <i class="i">current package</i>
+      during processing of that <i class="i">top level form</i> at compile time, but
+      whose <i class="i">home package</i> was another <i class="i">package</i>, at load time there must
+      be a <i class="i">symbol</i> with the same <i class="i">name</i> that is <i class="i">accessible</i> in both the
+      load-time <i class="i">current package</i> and in the <i class="i">package</i>
+      with the same <i class="i">name</i> as the
+      compile-time <i class="i">home package</i>. 
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>For all <i class="i">symbols</i> represented in the <i class="i">compiled file</i> 
+      that were <i class="i">external symbols</i> in
+      their <i class="i">home package</i> at compile time, there must be a <i class="i">symbol</i> with the
+      same <i class="i">name</i> that is an <i class="i">external symbol</i> in the <i class="i">package</i> 
+      with the same <i class="i">name</i> at load time.
+</p></dd>
+</dl>
+
+<p>If any of these conditions do not hold, the <i class="i">package</i> in which the <i class="i">loader</i> looks
+  for the affected <i class="i">symbols</i> is unspecified.  <i class="i">Implementations</i> are permitted 
+  to signal an error or to define this behavior.
+</p>
+</dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Extensions-to-Similarity-Rules.html">Extensions to Similarity Rules</a>, Up: <a href="Literal-Objects-in-Compiled-Files.html">Literal Objects in Compiled Files</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Additional-FORMAT-Parameters.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Additional FORMAT Parameters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Additional FORMAT Parameters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Additional FORMAT Parameters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Additional-Information-about-FORMAT-Operations.html" rel="up" title="Additional Information about FORMAT Operations">
+<link href="Undefined-FORMAT-Modifier-Combinations.html" rel="next" title="Undefined FORMAT Modifier Combinations">
+<link href="Missing-and-Additional-FORMAT-Arguments.html" rel="prev" title="Missing and Additional FORMAT Arguments">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Additional-FORMAT-Parameters">
+<div class="nav-panel">
+<p>
+Next: <a href="Undefined-FORMAT-Modifier-Combinations.html" accesskey="n" rel="next">Undefined FORMAT Modifier Combinations</a>, Previous: <a href="Missing-and-Additional-FORMAT-Arguments.html" accesskey="p" rel="prev">Missing and Additional FORMAT Arguments</a>, Up: <a href="Additional-Information-about-FORMAT-Operations.html" accesskey="u" rel="up">Additional Information about FORMAT Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Additional-FORMAT-Parameters-1"><span>22.3.10.3 Additional FORMAT Parameters<a class="copiable-link" href="#Additional-FORMAT-Parameters-1"> &para;</a></span></h4>
+
+<p>The consequences are undefined if a format directive is given more parameters 
+than it is described here as accepting.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Additional-Information-about-FORMAT-Operations.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Additional Information about FORMAT Operations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Additional Information about FORMAT Operations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Additional Information about FORMAT Operations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Formatted-Output.html" rel="up" title="Formatted Output">
+<link href="Examples-of-FORMAT.html" rel="next" title="Examples of FORMAT">
+<link href="FORMAT-Miscellaneous-Pseudo_002dOperations.html" rel="prev" title="FORMAT Miscellaneous Pseudo-Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Additional-Information-about-FORMAT-Operations">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-FORMAT.html" accesskey="n" rel="next">Examples of FORMAT</a>, Previous: <a href="FORMAT-Miscellaneous-Pseudo_002dOperations.html" accesskey="p" rel="prev">FORMAT Miscellaneous Pseudo-Operations</a>, Up: <a href="Formatted-Output.html" accesskey="u" rel="up">Formatted Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Additional-Information-about-FORMAT-Operations-1"><span>22.3.10 Additional Information about FORMAT Operations<a class="copiable-link" href="#Additional-Information-about-FORMAT-Operations-1"> &para;</a></span></h4>
+
+
+<ul class="mini-toc">
+<li><a href="Nesting-of-FORMAT-Operations.html" accesskey="1">Nesting of FORMAT Operations</a></li>
+<li><a href="Missing-and-Additional-FORMAT-Arguments.html" accesskey="2">Missing and Additional FORMAT Arguments</a></li>
+<li><a href="Additional-FORMAT-Parameters.html" accesskey="3">Additional FORMAT Parameters</a></li>
+<li><a href="Undefined-FORMAT-Modifier-Combinations.html" accesskey="4">Undefined FORMAT Modifier Combinations</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Additional-Information-about-Parsing-Logical-Pathname-Namestrings.html
@@ -0,0 +1,43 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Additional Information about Parsing Logical Pathname Namestrings (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Additional Information about Parsing Logical Pathname Namestrings (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Additional Information about Parsing Logical Pathname Namestrings (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Syntax-of-Logical-Pathname-Namestrings.html" rel="up" title="Syntax of Logical Pathname Namestrings">
+<link href="The-Host-part-of-a-Logical-Pathname-Namestring.html" rel="next" title="The Host part of a Logical Pathname Namestring">
+<link href="Syntax-of-Logical-Pathname-Namestrings.html" rel="prev" title="Syntax of Logical Pathname Namestrings">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Additional-Information-about-Parsing-Logical-Pathname-Namestrings">
+<div class="nav-panel">
+<p>
+Next: <a href="The-Host-part-of-a-Logical-Pathname-Namestring.html" accesskey="n" rel="next">The Host part of a Logical Pathname Namestring</a>, Previous: <a href="Syntax-of-Logical-Pathname-Namestrings.html" accesskey="p" rel="prev">Syntax of Logical Pathname Namestrings</a>, Up: <a href="Syntax-of-Logical-Pathname-Namestrings.html" accesskey="u" rel="up">Syntax of Logical Pathname Namestrings</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Additional-Information-about-Parsing-Logical-Pathname-Namestrings-1"><span>19.3.1.1 Additional Information about Parsing Logical Pathname Namestrings<a class="copiable-link" href="#Additional-Information-about-Parsing-Logical-Pathname-Namestrings-1"> &para;</a></span></h4>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Additional-Uses-for-Indirect-Definitions-in-Modified-BNF-Syntax.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Additional Uses for Indirect Definitions in Modified BNF Syntax (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Additional Uses for Indirect Definitions in Modified BNF Syntax (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Additional Uses for Indirect Definitions in Modified BNF Syntax (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Notational-Conventions.html" rel="up" title="Notational Conventions">
+<link href="Special-Symbols.html" rel="next" title="Special Symbols">
+<link href="Indirection-in-Modified-BNF-Syntax.html" rel="prev" title="Indirection in Modified BNF Syntax">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Additional-Uses-for-Indirect-Definitions-in-Modified-BNF-Syntax">
+<div class="nav-panel">
+<p>
+Next: <a href="Special-Symbols.html" accesskey="n" rel="next">Special Symbols</a>, Previous: <a href="Indirection-in-Modified-BNF-Syntax.html" accesskey="p" rel="prev">Indirection in Modified BNF Syntax</a>, Up: <a href="Notational-Conventions.html" accesskey="u" rel="up">Notational Conventions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Additional-Uses-for-Indirect-Definitions-in-Modified-BNF-Syntax-1"><span>1.4.1.5 Additional Uses for Indirect Definitions in Modified BNF Syntax<a class="copiable-link" href="#Additional-Uses-for-Indirect-Definitions-in-Modified-BNF-Syntax-1"> &para;</a></span></h4>
+
+<p>In some cases, an auxiliary definition in the BNF might appear to be unused
+within the BNF, but might still be useful elsewhere.  For example, consider the
+following definitions:
+</p>
+<p><code class="code">case</code>  <i class="i">keyform  {!<i class="i">normal-clause</i>}* <span class="r">[</span>!<i class="i">otherwise-clause</i><span class="r">]</span></i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><code class="code">ccase</code>  <i class="i">keyplace {!<i class="i">normal-clause</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><code class="code">ecase</code>  <i class="i">keyform  {!<i class="i">normal-clause</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><i class="i">normal-clause</i>&nbsp;::=<span class="r">(</span>keys&nbsp;{<i class="i">form</i>}*<span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">otherwise-clause</i>&nbsp;::=<span class="r">(</span>{otherwise&nbsp;|&nbsp;t}&nbsp;{<i class="i">form</i>}*<span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">clause</i>&nbsp;::=normal-clause&nbsp;|&nbsp;otherwise-clause<!-- /@w -->
+</p>
+<p>Here the term &ldquo;<i class="i">clause</i>&rdquo; might appear to be &ldquo;dead&rdquo; in that it
+is not used in the BNF.  However, the purpose of the BNF is not just to guide parsing,
+but also to define useful terms for reference in the descriptive text which follows.
+As such, the term &ldquo;<i class="i">clause</i>&rdquo; might appear in text that follows,
+as shorthand for &ldquo;<i class="i">normal-clause</i> or <i class="i">otherwise-clause</i>.&rdquo;
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Agreement-on-Parameter-Specializers-and-Qualifiers.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Agreement on Parameter Specializers and Qualifiers (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Agreement on Parameter Specializers and Qualifiers (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Agreement on Parameter Specializers and Qualifiers (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Generic-Functions-and-Methods.html" rel="up" title="Generic Functions and Methods">
+<link href="Congruent-Lambda_002dlists-for-all-Methods-of-a-Generic-Function.html" rel="next" title="Congruent Lambda-lists for all Methods of a Generic Function">
+<link href="Introduction-to-Methods.html" rel="prev" title="Introduction to Methods">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Agreement-on-Parameter-Specializers-and-Qualifiers">
+<div class="nav-panel">
+<p>
+Next: <a href="Congruent-Lambda_002dlists-for-all-Methods-of-a-Generic-Function.html" accesskey="n" rel="next">Congruent Lambda-lists for all Methods of a Generic Function</a>, Previous: <a href="Introduction-to-Methods.html" accesskey="p" rel="prev">Introduction to Methods</a>, Up: <a href="Generic-Functions-and-Methods.html" accesskey="u" rel="up">Generic Functions and Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Agreement-on-Parameter-Specializers-and-Qualifiers-1"><span>7.6.3 Agreement on Parameter Specializers and Qualifiers<a class="copiable-link" href="#Agreement-on-Parameter-Specializers-and-Qualifiers-1"> &para;</a></span></h4>
+
+<p>Two <i class="i">methods</i> are said to agree with each other on <i class="i">parameter specializers</i>
+and <i class="i">qualifiers</i> if the following conditions hold:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>Both methods have the same number of required parameters.
+Suppose the <i class="i">parameter specializers</i> of the two methods are
+P_{1,1}... P_{1,n} and P_{2,1}... P_{2,n}.
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p>For each 1&lt;= i&lt;= n, P_{1,i} agrees with P_{2,i}.
+The <i class="i">parameter specializer</i> P_{1,i} agrees with P_{2,i} if
+P_{1,i} and P_{2,i} are the same class or if 
+P_{1,i}=<code class="t">(<b class="b">eql</b> <i class="i">object</i>_1)</code>,
+P_{2,i}=<code class="t">(<b class="b">eql</b> <i class="i">object</i>_2)</code>, and
+<code class="t">(<b class="b">eql</b> <i class="i">object</i>_1 <i class="i">object</i>_2)</code>.
+Otherwise P_{1,i} and P_{2,i} do not agree.
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>The two <i class="i">lists</i> of <i class="i">qualifiers</i> are the <i class="i">same</i> 
+under <b class="b">equal</b>.
+</p>
+</dd>
+</dl>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Alphabetic-Characters.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Alphabetic Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Alphabetic Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Alphabetic Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Categories.html" rel="up" title="Character Categories">
+<link href="Characters-With-Case.html" rel="next" title="Characters With Case">
+<link href="Graphic-Characters.html" rel="prev" title="Graphic Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Alphabetic-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Characters-With-Case.html" accesskey="n" rel="next">Characters With Case</a>, Previous: <a href="Graphic-Characters.html" accesskey="p" rel="prev">Graphic Characters</a>, Up: <a href="Character-Categories.html" accesskey="u" rel="up">Character Categories</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Alphabetic-Characters-1"><span>13.1.4.2 Alphabetic Characters<a class="copiable-link" href="#Alphabetic-Characters-1"> &para;</a></span></h4>
+
+<p>The <i class="i">alphabetic</i>_1 <i class="i">characters</i> are
+a subset of the <i class="i">graphic</i> <i class="i">characters</i>.
+Of the <i class="i">standard characters</i>, only these are the <i class="i">alphabetic</i>_1 <i class="i">characters</i>:
+</p>
+<p><code class="t">A B C D E F G H I J K L M N O P Q R S T U V W X Y Z</code>
+</p>
+<p><code class="t">a b c d e f g h i j k l m n o p q r s t u v w x y z</code>
+</p>
+<p>Any <i class="i">implementation-defined</i> <i class="i">character</i> that has <i class="i">case</i> 
+must be <i class="i">alphabetic</i>_1.
+For each <i class="i">implementation-defined</i> <i class="i">graphic</i> <i class="i">character</i> 
+that has no <i class="i">case</i>,
+it is <i class="i">implementation-defined</i> whether 
+that <i class="i">character</i> is <i class="i">alphabetic</i>_1.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Alphanumeric-Characters.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Alphanumeric Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Alphanumeric Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Alphanumeric Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Categories.html" rel="up" title="Character Categories">
+<link href="Digits-in-a-Radix.html" rel="next" title="Digits in a Radix">
+<link href="Numeric-Characters.html" rel="prev" title="Numeric Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Alphanumeric-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Digits-in-a-Radix.html" accesskey="n" rel="next">Digits in a Radix</a>, Previous: <a href="Numeric-Characters.html" accesskey="p" rel="prev">Numeric Characters</a>, Up: <a href="Character-Categories.html" accesskey="u" rel="up">Character Categories</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Alphanumeric-Characters-1"><span>13.1.4.9 Alphanumeric Characters<a class="copiable-link" href="#Alphanumeric-Characters-1"> &para;</a></span></h4>
+
+<p>The set of <i class="i">alphanumeric</i> <i class="i">characters</i> is the union of 
+    the set of <i class="i">alphabetic</i>_1 <i class="i">characters</i> 
+and the set of <i class="i">numeric</i> <i class="i">characters</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Appendix.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Appendix (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Appendix (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Appendix (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Glossary-_0028Glossary_0029.html" rel="prev" title="Glossary (Glossary)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Appendix">
+<div class="nav-panel">
+<p>
+Previous: <a href="Glossary-_0028Glossary_0029.html" accesskey="p" rel="prev">Glossary</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Appendix-1"><span>27 Appendix<a class="copiable-link" href="#Appendix-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Removed-Language-Features.html" accesskey="1">Removed Language Features</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Applying-method-combination-to-the-sorted-list-of-applicable-methods.html
@@ -0,0 +1,87 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Applying method combination to the sorted list of applicable methods (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Applying method combination to the sorted list of applicable methods (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Applying method combination to the sorted list of applicable methods (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Method-Selection-and-Combination.html" rel="up" title="Method Selection and Combination">
+<link href="Standard-Method-Combination.html" rel="next" title="Standard Method Combination">
+<link href="Sorting-the-Applicable-Methods-by-Precedence-Order.html" rel="prev" title="Sorting the Applicable Methods by Precedence Order">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Applying-method-combination-to-the-sorted-list-of-applicable-methods">
+<div class="nav-panel">
+<p>
+Next: <a href="Standard-Method-Combination.html" accesskey="n" rel="next">Standard Method Combination</a>, Previous: <a href="Sorting-the-Applicable-Methods-by-Precedence-Order.html" accesskey="p" rel="prev">Sorting the Applicable Methods by Precedence Order</a>, Up: <a href="Method-Selection-and-Combination.html" accesskey="u" rel="up">Method Selection and Combination</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Applying-method-combination-to-the-sorted-list-of-applicable-methods-1"><span>7.6.6.4 Applying method combination to the sorted list of applicable methods<a class="copiable-link" href="#Applying-method-combination-to-the-sorted-list-of-applicable-methods-1"> &para;</a></span></h4>
+
+<p>In the simple case&mdash;if standard method combination is used and all
+applicable methods are primary methods&mdash;the 
+effective method is the most specific method.
+That method can call the next most specific
+method by using the <i class="i">function</i> <b class="b">call-next-method</b>.  The method that
+<b class="b">call-next-method</b> will call is referred to as the 
+<i class="i">next method</i>
+<a class="index-entry-id" id="index-next-method"></a>
+.  The predicate <b class="b">next-method-p</b> tests whether a next
+method exists.  If <b class="b">call-next-method</b> is called and there is no
+next most specific method, the generic function <b class="b">no-next-method</b>
+is invoked.
+</p>
+<p>In general, the effective method is some combination of the applicable
+methods.  It is described by a <i class="i">form</i> that contains calls to some or
+all of the applicable methods, returns the value or values that will
+be returned as the value or values of the generic function, and
+optionally makes some of the methods accessible by means of 
+<b class="b">call-next-method</b>.
+</p>
+<p>The role of each method in the effective method is determined by its
+<i class="i">qualifiers</i> and the specificity of the method.  A <i class="i">qualifier</i>
+serves to mark a method, and the meaning of a <i class="i">qualifier</i> is
+determined by the way that these marks are used by this step
+of the procedure.  If an applicable method has an unrecognized
+<i class="i">qualifier</i>, this step signals an error and does not include that method
+in the effective method.
+</p>
+<p>When standard method combination is used together with qualified methods, 
+the effective method is produced as described in <a class="ref" href="Standard-Method-Combination.html">Standard Method Combination</a>.
+</p>
+<p>Another type of method combination can be specified by using the
+<code class="t">:method-combination</code> option of <b class="b">defgeneric</b> or
+of any of the other operators that specify generic function options.  In
+this way this step of the procedure can be customized.
+</p>
+<p>New types of method combination can be defined by using 
+the <b class="b">define-method-combination</b> <i class="i">macro</i>. 
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Standard-Method-Combination.html">Standard Method Combination</a>, Previous: <a href="Sorting-the-Applicable-Methods-by-Precedence-Order.html">Sorting the Applicable Methods by Precedence Order</a>, Up: <a href="Method-Selection-and-Combination.html">Method Selection and Combination</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Argument-Conventions-of-Some-Reader-Functions.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Argument Conventions of Some Reader Functions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Argument Conventions of Some Reader Functions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Argument Conventions of Some Reader Functions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Concepts.html" rel="up" title="Reader Concepts">
+<link href="Effect-of-Readtable-Case-on-the-Lisp-Reader.html" rel="prev" title="Effect of Readtable Case on the Lisp Reader">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Argument-Conventions-of-Some-Reader-Functions">
+<div class="nav-panel">
+<p>
+Previous: <a href="Effect-of-Readtable-Case-on-the-Lisp-Reader.html" accesskey="p" rel="prev">Effect of Readtable Case on the Lisp Reader</a>, Up: <a href="Reader-Concepts.html" accesskey="u" rel="up">Reader Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Argument-Conventions-of-Some-Reader-Functions-1"><span>23.1.3 Argument Conventions of Some Reader Functions<a class="copiable-link" href="#Argument-Conventions-of-Some-Reader-Functions-1"> &para;</a></span></h4>
+
+
+<ul class="mini-toc">
+<li><a href="The-EOF_002dERROR_002dP-argument.html" accesskey="1">The EOF-ERROR-P argument</a></li>
+<li><a href="The-RECURSIVE_002dP-argument.html" accesskey="2">The RECURSIVE-P argument</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Argument-Mismatch-Detection.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Argument Mismatch Detection (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Argument Mismatch Detection (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Argument Mismatch Detection (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Error-Checking-in-Function-Calls.html" rel="up" title="Error Checking in Function Calls">
+<link href="Error-Checking-in-Function-Calls.html" rel="prev" title="Error Checking in Function Calls">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Argument-Mismatch-Detection">
+<div class="nav-panel">
+<p>
+Previous: <a href="Error-Checking-in-Function-Calls.html" accesskey="p" rel="prev">Error Checking in Function Calls</a>, Up: <a href="Error-Checking-in-Function-Calls.html" accesskey="u" rel="up">Error Checking in Function Calls</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Argument-Mismatch-Detection-1"><span>3.5.1 Argument Mismatch Detection<a class="copiable-link" href="#Argument-Mismatch-Detection-1"> &para;</a></span></h4>
+
+
+<ul class="mini-toc">
+<li><a href="Safe-and-Unsafe-Calls.html" accesskey="1">Safe and Unsafe Calls</a></li>
+<li><a href="Error-Detection-Time-in-Safe-Calls.html" accesskey="2">Error Detection Time in Safe Calls</a></li>
+<li><a href="Too-Few-Arguments.html" accesskey="3">Too Few Arguments</a></li>
+<li><a href="Too-Many-Arguments.html" accesskey="4">Too Many Arguments</a></li>
+<li><a href="Unrecognized-Keyword-Arguments.html" accesskey="5">Unrecognized Keyword Arguments</a></li>
+<li><a href="Invalid-Keyword-Arguments.html" accesskey="6">Invalid Keyword Arguments</a></li>
+<li><a href="Odd-Number-of-Keyword-Arguments.html" accesskey="7">Odd Number of Keyword Arguments</a></li>
+<li><a href="Destructuring-Mismatch.html" accesskey="8">Destructuring Mismatch</a></li>
+<li><a href="Errors-When-Calling-a-Next-Method.html" accesskey="9">Errors When Calling a Next Method</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Array-Concepts.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Array Concepts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Array Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Array Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays.html" rel="up" title="Arrays">
+<link href="Arrays-Dictionary.html" rel="next" title="Arrays Dictionary">
+<link href="Arrays.html" rel="prev" title="Arrays">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Array-Concepts">
+<div class="nav-panel">
+<p>
+Next: <a href="Arrays-Dictionary.html" accesskey="n" rel="next">Arrays Dictionary</a>, Previous: <a href="Arrays.html" accesskey="p" rel="prev">Arrays</a>, Up: <a href="Arrays.html" accesskey="u" rel="up">Arrays</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Array-Concepts-1"><span>15.1 Array Concepts<a class="copiable-link" href="#Array-Concepts-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Array-Elements.html" accesskey="1">Array Elements</a></li>
+<li><a href="Specialized-Arrays.html" accesskey="2">Specialized Arrays</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Array-Dimensions.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Array Dimensions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Array Dimensions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Array Dimensions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Array-Elements.html" rel="up" title="Array Elements">
+<link href="Implementation-Limits-on-Individual-Array-Dimensions.html" rel="next" title="Implementation Limits on Individual Array Dimensions">
+<link href="Array-Indices.html" rel="prev" title="Array Indices">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Array-Dimensions">
+<div class="nav-panel">
+<p>
+Next: <a href="Implementation-Limits-on-Individual-Array-Dimensions.html" accesskey="n" rel="next">Implementation Limits on Individual Array Dimensions</a>, Previous: <a href="Array-Indices.html" accesskey="p" rel="prev">Array Indices</a>, Up: <a href="Array-Elements.html" accesskey="u" rel="up">Array Elements</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Array-Dimensions-1"><span>15.1.1.2 Array Dimensions<a class="copiable-link" href="#Array-Dimensions-1"> &para;</a></span></h4>
+
+<p>An axis of an <i class="i">array</i> is called a <i class="i">dimension</i>
+<a class="index-entry-id" id="index-dimension"></a>
+.
+</p>
+<p>Each <i class="i">dimension</i> is a non-negative 
+</p>
+<p><i class="i">fixnum</i>;
+</p>
+<p>if any dimension of an <i class="i">array</i> is zero, the <i class="i">array</i> has no elements.
+It is permissible for a <i class="i">dimension</i> to be zero, 
+in which case the <i class="i">array</i> has no elements, 
+and any attempt to <i class="i">access</i> an <i class="i">element</i>
+is an error.  However, other properties of the <i class="i">array</i>,  
+such as the <i class="i">dimensions</i> themselves, may be used.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Array-Elements.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Array Elements (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Array Elements (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Array Elements (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Array-Concepts.html" rel="up" title="Array Concepts">
+<link href="Specialized-Arrays.html" rel="next" title="Specialized Arrays">
+<link href="Array-Concepts.html" rel="prev" title="Array Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Array-Elements">
+<div class="nav-panel">
+<p>
+Next: <a href="Specialized-Arrays.html" accesskey="n" rel="next">Specialized Arrays</a>, Previous: <a href="Array-Concepts.html" accesskey="p" rel="prev">Array Concepts</a>, Up: <a href="Array-Concepts.html" accesskey="u" rel="up">Array Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Array-Elements-1"><span>15.1.1 Array Elements<a class="copiable-link" href="#Array-Elements-1"> &para;</a></span></h4>
+
+<p>An <i class="i">array</i> contains a set of <i class="i">objects</i> called <i class="i">elements</i>
+that can be referenced individually according to a rectilinear coordinate system.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Array-Indices.html" accesskey="1">Array Indices</a></li>
+<li><a href="Array-Dimensions.html" accesskey="2">Array Dimensions</a></li>
+<li><a href="Implementation-Limits-on-Individual-Array-Dimensions.html" accesskey="3">Implementation Limits on Individual Array Dimensions</a></li>
+<li><a href="Array-Rank.html" accesskey="4">Array Rank</a></li>
+<li><a href="Vectors.html" accesskey="5">Vectors</a></li>
+<li><a href="Fill-Pointers.html" accesskey="6">Fill Pointers</a></li>
+<li><a href="Multidimensional-Arrays.html" accesskey="7">Multidimensional Arrays</a></li>
+<li><a href="Storage-Layout-for-Multidimensional-Arrays.html" accesskey="8">Storage Layout for Multidimensional Arrays</a></li>
+<li><a href="Implementation-Limits-on-Array-Rank.html" accesskey="9">Implementation Limits on Array Rank</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Array-Indices.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Array Indices (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Array Indices (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Array Indices (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Array-Elements.html" rel="up" title="Array Elements">
+<link href="Array-Dimensions.html" rel="next" title="Array Dimensions">
+<link href="Array-Elements.html" rel="prev" title="Array Elements">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Array-Indices">
+<div class="nav-panel">
+<p>
+Next: <a href="Array-Dimensions.html" accesskey="n" rel="next">Array Dimensions</a>, Previous: <a href="Array-Elements.html" accesskey="p" rel="prev">Array Elements</a>, Up: <a href="Array-Elements.html" accesskey="u" rel="up">Array Elements</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Array-Indices-1"><span>15.1.1.1 Array Indices<a class="copiable-link" href="#Array-Indices-1"> &para;</a></span></h4>
+
+<p>An <i class="i">array</i> <i class="i">element</i> is referred to by a (possibly empty) series of indices.
+The length of the series must equal the <i class="i">rank</i> of the <i class="i">array</i>.
+</p>
+<p>Each index must be a non-negative <i class="i">fixnum</i> 
+</p>
+<p>less than the corresponding <i class="i">array</i> <i class="i">dimension</i>.
+<i class="i">Array</i> indexing is zero-origin.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Array-Rank.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Array Rank (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Array Rank (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Array Rank (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Array-Elements.html" rel="up" title="Array Elements">
+<link href="Vectors.html" rel="next" title="Vectors">
+<link href="Implementation-Limits-on-Individual-Array-Dimensions.html" rel="prev" title="Implementation Limits on Individual Array Dimensions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Array-Rank">
+<div class="nav-panel">
+<p>
+Next: <a href="Vectors.html" accesskey="n" rel="next">Vectors</a>, Previous: <a href="Implementation-Limits-on-Individual-Array-Dimensions.html" accesskey="p" rel="prev">Implementation Limits on Individual Array Dimensions</a>, Up: <a href="Array-Elements.html" accesskey="u" rel="up">Array Elements</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Array-Rank-1"><span>15.1.1.4 Array Rank<a class="copiable-link" href="#Array-Rank-1"> &para;</a></span></h4>
+
+<p>An <i class="i">array</i> can have any number of <i class="i">dimensions</i> (including zero).
+The number of <i class="i">dimensions</i> is called the <i class="i">rank</i>
+<a class="index-entry-id" id="index-rank"></a>
+.
+</p>
+<p>If the rank of an <i class="i">array</i> is zero then the <i class="i">array</i> is said to have
+no <i class="i">dimensions</i>, and the product of the dimensions (see <b class="b">array-total-size</b>)
+is then 1; a zero-rank <i class="i">array</i> therefore has a single element.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Array-Upgrading.html
@@ -0,0 +1,84 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Array Upgrading (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Array Upgrading (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Array Upgrading (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Specialized-Arrays.html" rel="up" title="Specialized Arrays">
+<link href="Required-Kinds-of-Specialized-Arrays.html" rel="next" title="Required Kinds of Specialized Arrays">
+<link href="Specialized-Arrays.html" rel="prev" title="Specialized Arrays">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Array-Upgrading">
+<div class="nav-panel">
+<p>
+Next: <a href="Required-Kinds-of-Specialized-Arrays.html" accesskey="n" rel="next">Required Kinds of Specialized Arrays</a>, Previous: <a href="Specialized-Arrays.html" accesskey="p" rel="prev">Specialized Arrays</a>, Up: <a href="Specialized-Arrays.html" accesskey="u" rel="up">Specialized Arrays</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Array-Upgrading-1"><span>15.1.2.1 Array Upgrading<a class="copiable-link" href="#Array-Upgrading-1"> &para;</a></span></h4>
+
+<p>The <i class="i">upgraded array element type</i>
+<a class="index-entry-id" id="index-upgraded-array-element-type"></a>
+ of a <i class="i">type</i> T_1
+is a <i class="i">type</i> T_2 that is a <i class="i">supertype</i> of T_1
+and that is used instead of T_1 whenever T_1
+is used as an <i class="i">array element type</i> 
+for object creation or type discrimination.
+</p>
+<p>During creation of an <i class="i">array</i>,
+the <i class="i">element type</i> that was requested 
+is called the <i class="i">expressed array element type</i>
+<a class="index-entry-id" id="index-expressed-array-element-type"></a>
+.
+The <i class="i">upgraded array element type</i> of the <i class="i">expressed array element type</i>
+becomes the <i class="i">actual array element type</i>
+<a class="index-entry-id" id="index-actual-array-element-type"></a>
+ of the <i class="i">array</i> that is created.
+</p>
+<p><i class="i">Type</i> <i class="i">upgrading</i> implies a movement upwards in the type hierarchy lattice.
+A <i class="i">type</i> is always a <i class="i">subtype</i> of its <i class="i">upgraded array element type</i>.
+Also, if a <i class="i">type</i> T_x is a <i class="i">subtype</i> of another <i class="i">type</i> T_y,
+then
+the <i class="i">upgraded array element type</i> of T_x 
+must be a <i class="i">subtype</i> of
+the <i class="i">upgraded array element type</i> of T_y.
+Two <i class="i">disjoint</i> <i class="i">types</i> can be <i class="i">upgraded</i> to the same <i class="i">type</i>.
+</p>
+<p>The <i class="i">upgraded array element type</i> T_2 of a <i class="i">type</i> T_1
+is a function only of T_1 itself;
+that is, it is independent of any other property of the <i class="i">array</i> 
+for which T_2 will be used,
+such as <i class="i">rank</i>, <i class="i">adjustability</i>, <i class="i">fill pointers</i>, or displacement.
+The <i class="i">function</i> <b class="b">upgraded-array-element-type</b> 
+can be used by <i class="i">conforming programs</i> to predict how the <i class="i">implementation</i>
+will <i class="i">upgrade</i> a given <i class="i">type</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Required-Kinds-of-Specialized-Arrays.html">Required Kinds of Specialized Arrays</a>, Previous: <a href="Specialized-Arrays.html">Specialized Arrays</a>, Up: <a href="Specialized-Arrays.html">Specialized Arrays</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Arrays-Dictionary.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Arrays Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Arrays Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Arrays Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays.html" rel="up" title="Arrays">
+<link href="Array-Concepts.html" rel="prev" title="Array Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Arrays-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Array-Concepts.html" accesskey="p" rel="prev">Array Concepts</a>, Up: <a href="Arrays.html" accesskey="u" rel="up">Arrays</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Arrays-Dictionary-1"><span>15.2 Arrays Dictionary<a class="copiable-link" href="#Arrays-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="array.html" accesskey="1">array                                                        [System Class]</a></li>
+<li><a href="simple_002darray.html" accesskey="2">simple-array                                                         [Type]</a></li>
+<li><a href="vector-_0028System-Class_0029.html" accesskey="3">vector                                                       [System Class]</a></li>
+<li><a href="simple_002dvector.html" accesskey="4">simple-vector                                                        [Type]</a></li>
+<li><a href="bit_002dvector.html" accesskey="5">bit-vector                                                   [System Class]</a></li>
+<li><a href="simple_002dbit_002dvector.html" accesskey="6">simple-bit-vector                                                    [Type]</a></li>
+<li><a href="make_002darray.html" accesskey="7">make-array                                                       [Function]</a></li>
+<li><a href="adjust_002darray.html" accesskey="8">adjust-array                                                     [Function]</a></li>
+<li><a href="adjustable_002darray_002dp.html" accesskey="9">adjustable-array-p                                               [Function]</a></li>
+<li><a href="aref.html">aref                                                             [Accessor]</a></li>
+<li><a href="array_002ddimension.html">array-dimension                                                  [Function]</a></li>
+<li><a href="array_002ddimensions.html">array-dimensions                                                 [Function]</a></li>
+<li><a href="array_002delement_002dtype.html">array-element-type                                               [Function]</a></li>
+<li><a href="array_002dhas_002dfill_002dpointer_002dp.html">array-has-fill-pointer-p                                         [Function]</a></li>
+<li><a href="array_002ddisplacement.html">array-displacement                                               [Function]</a></li>
+<li><a href="array_002din_002dbounds_002dp.html">array-in-bounds-p                                                [Function]</a></li>
+<li><a href="array_002drank.html">array-rank                                                       [Function]</a></li>
+<li><a href="array_002drow_002dmajor_002dindex.html">array-row-major-index                                            [Function]</a></li>
+<li><a href="array_002dtotal_002dsize.html">array-total-size                                                 [Function]</a></li>
+<li><a href="arrayp.html">arrayp                                                           [Function]</a></li>
+<li><a href="fill_002dpointer.html">fill-pointer                                                     [Accessor]</a></li>
+<li><a href="row_002dmajor_002daref.html">row-major-aref                                                   [Accessor]</a></li>
+<li><a href="upgraded_002darray_002delement_002dtype.html">upgraded-array-element-type                                      [Function]</a></li>
+<li><a href="array_002ddimension_002dlimit.html">array-dimension-limit                                   [Constant Variable]</a></li>
+<li><a href="array_002drank_002dlimit.html">array-rank-limit                                        [Constant Variable]</a></li>
+<li><a href="array_002dtotal_002dsize_002dlimit.html">array-total-size-limit                                  [Constant Variable]</a></li>
+<li><a href="simple_002dvector_002dp.html">simple-vector-p                                                  [Function]</a></li>
+<li><a href="svref.html">svref                                                            [Accessor]</a></li>
+<li><a href="vector.html">vector                                                           [Function]</a></li>
+<li><a href="vector_002dpop.html">vector-pop                                                       [Function]</a></li>
+<li><a href="vector_002dpush.html">vector-push, vector-push-extend                                  [Function]</a></li>
+<li><a href="vectorp.html">vectorp                                                          [Function]</a></li>
+<li><a href="bit-_0028Array_0029.html">bit, sbit                                                        [Accessor]</a></li>
+<li><a href="bit_002dand.html">bit-and, bit-andc1, bit-andc2, bit-eqv,</a></li>
+<li><a href="bit_002dvector_002dp.html">bit-vector-p                                                     [Function]</a></li>
+<li><a href="simple_002dbit_002dvector_002dp.html">simple-bit-vector-p                                              [Function]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Arrays.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Arrays (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Arrays (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Arrays (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Strings.html" rel="next" title="Strings">
+<link href="Conses.html" rel="prev" title="Conses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Arrays">
+<div class="nav-panel">
+<p>
+Next: <a href="Strings.html" accesskey="n" rel="next">Strings</a>, Previous: <a href="Conses.html" accesskey="p" rel="prev">Conses</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Arrays-1"><span>15 Arrays<a class="copiable-link" href="#Arrays-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Array-Concepts.html" accesskey="1">Array Concepts</a></li>
+<li><a href="Arrays-Dictionary.html" accesskey="2">Arrays Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Assertions.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Assertions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Assertions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Assertions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Condition-System-Concepts.html" rel="up" title="Condition System Concepts">
+<link href="Notes-about-the-Condition-System_0060s-Background.html" rel="next" title="Notes about the Condition System`s Background">
+<link href="Signaling-and-Handling-Conditions.html" rel="prev" title="Signaling and Handling Conditions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Assertions">
+<div class="nav-panel">
+<p>
+Next: <a href="Notes-about-the-Condition-System_0060s-Background.html" accesskey="n" rel="next">Notes about the Condition System&lsquo;s Background</a>, Previous: <a href="Signaling-and-Handling-Conditions.html" accesskey="p" rel="prev">Signaling and Handling Conditions</a>, Up: <a href="Condition-System-Concepts.html" accesskey="u" rel="up">Condition System Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Assertions-1"><span>9.1.5 Assertions<a class="copiable-link" href="#Assertions-1"> &para;</a></span></h4>
+
+<p>Conditional signaling of <i class="i">conditions</i>
+based on such things as key match, form evaluation,
+and <i class="i">type</i> are handled by assertion <i class="i">operators</i>.
+Figure 9&ndash;7 shows <i class="i">operators</i> relating to assertions.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  assert  check-type  ecase      <!-- /@w -->
+  ccase   ctypecase   etypecase  <!-- /@w -->
+
+  Figure 9&ndash;7: Operators relating to assertions.<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Associating-a-Restart-with-a-Condition.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Associating a Restart with a Condition (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Associating a Restart with a Condition (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Associating a Restart with a Condition (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Signaling-and-Handling-Conditions.html" rel="up" title="Signaling and Handling Conditions">
+<link href="Restart-Tests.html" rel="prev" title="Restart Tests">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Associating-a-Restart-with-a-Condition">
+<div class="nav-panel">
+<p>
+Previous: <a href="Restart-Tests.html" accesskey="p" rel="prev">Restart Tests</a>, Up: <a href="Signaling-and-Handling-Conditions.html" accesskey="u" rel="up">Signaling and Handling Conditions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Associating-a-Restart-with-a-Condition-1"><span>9.1.4.7 Associating a Restart with a Condition<a class="copiable-link" href="#Associating-a-Restart-with-a-Condition-1"> &para;</a></span></h4>
+
+<p>A <i class="i">restart</i> can be &ldquo;associated with&rdquo; a <i class="i">condition</i> explicitly
+by <b class="b">with-condition-restarts</b>, or implicitly by <b class="b">restart-case</b>.
+Such an assocation has <i class="i">dynamic extent</i>.
+</p>
+<p>A single <i class="i">restart</i> may be associated with several <i class="i">conditions</i> 
+at the same time.
+A single <i class="i">condition</i> may have several associated <i class="i">restarts</i>
+at the same time.
+</p>
+<p>Active restarts associated with a particular <i class="i">condition</i> can be detected
+by <i class="i">calling</i> a <i class="i">function</i> such as <b class="b">find-restart</b>, supplying
+that <i class="i">condition</i> as the <i class="i">condition</i> <i class="i">argument</i>.
+Active restarts can also be detected without regard to any associated
+<i class="i">condition</i> by calling such a function without a <i class="i">condition</i> <i class="i">argument</i>,
+or by supplying a value of <b class="b">nil</b> for such an <i class="i">argument</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Associativity-and-Commutativity-in-Numeric-Operations.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Associativity and Commutativity in Numeric Operations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Associativity and Commutativity in Numeric Operations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Associativity and Commutativity in Numeric Operations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numeric-Operations.html" rel="up" title="Numeric Operations">
+<link href="Examples-of-Associativity-and-Commutativity-in-Numeric-Operations.html" rel="next" title="Examples of Associativity and Commutativity in Numeric Operations">
+<link href="Numeric-Operations.html" rel="prev" title="Numeric Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Associativity-and-Commutativity-in-Numeric-Operations">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Associativity-and-Commutativity-in-Numeric-Operations.html" accesskey="n" rel="next">Examples of Associativity and Commutativity in Numeric Operations</a>, Previous: <a href="Numeric-Operations.html" accesskey="p" rel="prev">Numeric Operations</a>, Up: <a href="Numeric-Operations.html" accesskey="u" rel="up">Numeric Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Associativity-and-Commutativity-in-Numeric-Operations-1"><span>12.1.1.1 Associativity and Commutativity in Numeric Operations<a class="copiable-link" href="#Associativity-and-Commutativity-in-Numeric-Operations-1"> &para;</a></span></h4>
+
+<p>For functions that are mathematically associative (and possibly commutative),
+a <i class="i">conforming implementation</i> may process the <i class="i">arguments</i> in any manner 
+consistent with associative (and possibly commutative) rearrangement.  This does not
+affect the order in which the <i class="i">argument</i> <i class="i">forms</i> are <i class="i">evaluated</i>;
+for a discussion of evaluation order, see <a class="ref" href="Function-Forms.html">Function Forms</a>.
+What is unspecified is only the order in which the <i class="i">parameter</i> <i class="i">values</i>
+are processed.  This implies that <i class="i">implementations</i> may differ in which 
+automatic <i class="i">coercions</i> are applied; see <a class="ref" href="Contagion-in-Numeric-Operations.html">Contagion in Numeric Operations</a>.
+</p>
+<p>A <i class="i">conforming program</i> can control the order of processing explicitly by 
+separating the operations into separate (possibly nested) <i class="i">function forms</i>,
+or by writing explicit calls to <i class="i">functions</i> that perform coercions.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Backquote.html
@@ -0,0 +1,199 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Backquote (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Backquote (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Backquote (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standard-Macro-Characters.html" rel="up" title="Standard Macro Characters">
+<link href="Comma.html" rel="next" title="Comma">
+<link href="Double_002dQuote.html" rel="prev" title="Double-Quote">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Backquote">
+<div class="nav-panel">
+<p>
+Next: <a href="Comma.html" accesskey="n" rel="next">Comma</a>, Previous: <a href="Double_002dQuote.html" accesskey="p" rel="prev">Double-Quote</a>, Up: <a href="Standard-Macro-Characters.html" accesskey="u" rel="up">Standard Macro Characters</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Backquote-1"><span>2.4.6 Backquote<a class="copiable-link" href="#Backquote-1"> &para;</a></span></h4>
+
+<p>The <i class="i">backquote</i> introduces a template of a data structure to be built.  
+For example, writing
+</p>
+<div class="example">
+<pre class="example-preformatted"> `(cond ((numberp ,x) ,@y) (t (print ,x) ,@y))
+</pre></div>
+
+<p>is roughly equivalent to writing
+</p>
+<div class="example">
+<pre class="example-preformatted"> (list 'cond 
+       (cons (list 'numberp x) y) 
+       (list* 't (list 'print x) y))
+</pre></div>
+
+<p>Where a comma
+occurs in the template, 
+the <i class="i">expression</i>
+following the comma is to be evaluated to produce an <i class="i">object</i> to
+be inserted at that point.  Assume <code class="t">b</code> has the value 3, for example, then
+evaluating the <i class="i">form</i> denoted by <code class="t">`(a b ,b ,(+ b 1) b)</code> produces
+the result <code class="t">(a b 3 4 b)</code>.
+</p>
+<p>If a comma is immediately followed by an <i class="i">at-sign</i>, 
+then the <i class="i">form</i> following the <i class="i">at-sign</i>
+is evaluated to produce a <i class="i">list</i> of <i class="i">objects</i>.
+These <i class="i">objects</i> are then &ldquo;spliced&rdquo; into place in the template.  For
+example, if <code class="t">x</code> has the value <code class="t">(a b c)</code>, then
+</p>
+<div class="example">
+<pre class="example-preformatted"> `(x ,x ,@x foo ,(cadr x) bar ,(cdr x) baz ,@(cdr x))
+&rArr;  (x (a b c) a b c foo b bar (b c) baz b c)
+</pre></div>
+
+<p>The backquote syntax can be summarized formally as follows.
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">`<i class="i">basic</i></code> is the same as <code class="t">'<i class="i">basic</i></code>,
+that is, <code class="t">(quote <i class="i">basic</i>)</code>, for any <i class="i">expression</i> 
+<i class="i">basic</i> that is not a <i class="i">list</i> or a general <i class="i">vector</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">`,<i class="i">form</i></code> is the same as <i class="i">form</i>, for any <i class="i">form</i>, provided
+that the representation of <i class="i">form</i> does not begin with <i class="i">at-sign</i>
+or <i class="i">dot</i>.  (A similar caveat holds for all occurrences of a form after a <i class="i">comma</i>.)
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">`,@<i class="i">form</i></code> has undefined consequences.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">`(x1 x2 x3 ... xn . atom)</code>
+may be interpreted to mean
+</p>
+<div class="example">
+<pre class="example-preformatted"> (append [ x1 ] [ x2 ] [ x3 ] ... [ xn ] (quote atom))
+</pre></div>
+
+<p>where the brackets are used to indicate
+a transformation of an <i class="i">xj</i> as follows:
+</p>
+<dl class="table">
+<dt>&ndash;</dt>
+<dd><p><code class="t">[<i class="i">form</i>]</code> is interpreted as <code class="t">(list `<i class="i">form</i>)</code>, 
+which contains a backquoted form that must then be further interpreted.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p><code class="t">[,<i class="i">form</i>]</code> is interpreted as <code class="t">(list <i class="i">form</i>)</code>.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p><code class="t">[,@<i class="i">form</i>]</code> is interpreted as <i class="i">form</i>.
+</p></dd>
+</dl>
+
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">`(x1 x2 x3 ... xn)</code> may be interpreted to mean
+the same as the backquoted form
+<code class="t">`(x1 x2 x3 ... xn . <b class="b">nil</b>)</code>,
+thereby reducing it to the previous case.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">`(x1 x2 x3 ... xn . ,form)</code> may be interpreted to mean
+</p>
+<div class="example">
+<pre class="example-preformatted"> (append [ x1 ] [ x2 ] [ x3 ] ... [ xn ] form)
+</pre></div>
+
+<p>where the brackets indicate a transformation of an <code class="t">xj</code> as described above.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">`(x1 x2 x3 ... xn . ,@form)</code> has undefined consequences.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">`#(x1 x2 x3 ... xn)</code> may be interpreted to mean
+<code class="t">(apply #'vector `(x1 x2 x3 ... xn))</code>.
+</p></dd>
+</dl>
+
+<p>Anywhere &ldquo;<code class="t">,@</code>&rdquo; may be used, the syntax &ldquo;<code class="t">,.</code>&rdquo; may be used instead
+to indicate that it is permissible to operate <i class="i">destructively</i> on 
+the <i class="i">list structure</i>  produced by the form following the &ldquo;<code class="t">,.</code>&rdquo; 
+(in effect, to use <b class="b">nconc</b> instead of <b class="b">append</b>).
+</p>
+<p>If the backquote syntax is nested, the innermost backquoted form
+should be expanded first.  This means that if several commas occur
+in a row, the leftmost one belongs to the innermost <i class="i">backquote</i>.
+</p>
+<p>An <i class="i">implementation</i> is free to interpret a backquoted <i class="i">form</i> F_1
+as any <i class="i">form</i> F_2 that, when evaluated, will produce a result that is
+the <i class="i">same</i> under <b class="b">equal</b> as the result implied by the above definition, 
+provided that the side-effect behavior of the substitute <i class="i">form</i> F_2 
+is also consistent with the description given above.
+The constructed
+copy of the template might or might not share <i class="i">list</i> structure with the
+template itself.  As an example, the above definition implies that
+</p>
+<div class="example">
+<pre class="example-preformatted"> `((,a b) ,c ,@d)
+</pre></div>
+
+<p>will be interpreted as if it were
+</p>
+<div class="example">
+<pre class="example-preformatted"> (append (list (append (list a) (list 'b) '<b class="b">nil</b>)) (list c) d '<b class="b">nil</b>)
+</pre></div>
+
+<p>but it could also be legitimately interpreted to mean any of the following:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (append (list (append (list a) (list 'b))) (list c) d)
+ (append (list (append (list a) '(b))) (list c) d)
+ (list* (cons a '(b)) c d)
+ (list* (cons a (list 'b)) c d)
+ (append (list (cons a '(b))) (list c) d)
+ (list* (cons a '(b)) c (copy-list d))
+</pre></div>
+
+
+<ul class="mini-toc">
+<li><a href="Notes-about-Backquote.html" accesskey="1">Notes about Backquote</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Comma.html">Comma</a>, Previous: <a href="Double_002dQuote.html">Double-Quote</a>, Up: <a href="Standard-Macro-Characters.html">Standard Macro Characters</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Boa-Lambda-Lists.html
@@ -0,0 +1,157 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Boa Lambda Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Boa Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Boa Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Lambda-Lists.html" rel="up" title="Lambda Lists">
+<link href="Defsetf-Lambda-Lists.html" rel="next" title="Defsetf Lambda Lists">
+<link href="Destructuring-Lambda-Lists.html" rel="prev" title="Destructuring Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Boa-Lambda-Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Defsetf-Lambda-Lists.html" accesskey="n" rel="next">Defsetf Lambda Lists</a>, Previous: <a href="Destructuring-Lambda-Lists.html" accesskey="p" rel="prev">Destructuring Lambda Lists</a>, Up: <a href="Lambda-Lists.html" accesskey="u" rel="up">Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Boa-Lambda-Lists-1"><span>3.4.6 Boa Lambda Lists<a class="copiable-link" href="#Boa-Lambda-Lists-1"> &para;</a></span></h4>
+
+<p>A <i class="i">boa lambda list</i>
+<a class="index-entry-id" id="index-boa-lambda-list"></a>
+ is a <i class="i">lambda list</i> that is syntactically 
+like an <i class="i">ordinary lambda list</i>, but that is processed in
+&ldquo;<b class="b">b</b>y <b class="b">o</b>rder of <b class="b">a</b>rgument&rdquo; style.
+</p>
+<p>A <i class="i">boa lambda list</i> is used only in a <b class="b">defstruct</b> <i class="i">form</i>,
+when explicitly specifying the <i class="i">lambda list</i> 
+of a constructor <i class="i">function</i> (sometimes called a &ldquo;boa constructor&rdquo;).
+</p>
+<p>The <b class="b">&amp;optional</b>, <b class="b">&amp;rest</b>, <b class="b">&amp;aux</b>,
+</p>
+<p><b class="b">&amp;key</b>, and <b class="b">&amp;allow-other-keys</b>
+</p>
+<p><i class="i">lambda list keywords</i> are recognized in a <i class="i">boa lambda list</i>.
+The way these <i class="i">lambda list keywords</i> differ from their
+use in an <i class="i">ordinary lambda list</i> follows.
+</p>
+<p>Consider this example, which describes how <b class="b">destruct</b> processes
+its <code class="t">:constructor</code> option.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (:constructor create-foo
+         (a &amp;optional b (c 'sea) &amp;rest d &amp;aux e (f 'eff)))
+</pre></div>
+
+<p>This defines <code class="t">create-foo</code> to be a constructor of one or more arguments.
+The first argument is used to initialize the <code class="t">a</code> slot.  The second
+argument is used to initialize the <code class="t">b</code> slot.  If there isn&rsquo;t any
+second argument, then the default value given in the body of the
+<b class="b">defstruct</b> (if given) is used instead.  
+The third argument is used to
+initialize the <code class="t">c</code> slot.  If there isn&rsquo;t any third argument, then the
+symbol <code class="t">sea</code> is used instead.  Any arguments following the third
+argument are collected into a <i class="i">list</i> 
+and used to initialize the <code class="t">d</code>
+slot.  If there are three or fewer arguments, then <b class="b">nil</b> is placed in
+the <code class="t">d</code> slot.  The <code class="t">e</code> slot is not initialized; 
+its initial value is <i class="i">implementation-defined</i>.
+Finally, the <code class="t">f</code> slot is initialized to contain the symbol <code class="t">eff</code>.
+</p>
+<p><b class="b">&amp;key</b> and <b class="b">&amp;allow-other-keys</b> arguments default
+in a manner similar to that of <b class="b">&amp;optional</b> arguments: if no default
+is supplied in the <i class="i">lambda list</i> then the default value 
+given in the body of the <b class="b">defstruct</b> (if given) is used instead.
+For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct (foo (:constructor CREATE-FOO (a &amp;optional b (c 'sea)
+                                             &amp;key (d 2)
+                                             &amp;aux e (f 'eff))))
+   (a 1) (b 2) (c 3) (d 4) (e 5) (f 6))
+
+ (create-foo 10) &rArr;  #S(FOO A 10 B 2 C SEA D 2 E <i class="i">implemention-dependent</i> F EFF)
+ (create-foo 10 'bee 'see :d 'dee) 
+&rArr;  #S(FOO A 10 B BEE C SEE D DEE E <i class="i">implemention-dependent</i> F EFF)
+</pre></div>
+
+<p>If keyword arguments of the form 
+<code class="t">((<i class="i">key</i> <i class="i">var</i>) <span class="r">[</span><i class="i">default</i> <span class="r">[</span><i class="i">svar</i><span class="r">]</span><span class="r">]</span>)</code>
+are specified, the <i class="i">slot</i> <i class="i">name</i> is matched with <i class="i">var</i> 
+(not <i class="i">key</i>).
+</p>
+<p>The actions taken in the <code class="t">b</code> and <code class="t">e</code> cases were carefully
+chosen to allow the user to specify all possible behaviors. 
+The <b class="b">&amp;aux</b> variables can be used to completely override the default
+initializations given in the body.
+</p>
+<p>If no default value is supplied for an <i class="i">aux variable</i> variable,
+the consequences are undefined if an attempt is later made to read
+the corresponding <i class="i">slot</i>&rsquo;s value before a value is explicitly assigned.
+If such a <i class="i">slot</i> has a <code class="t">:type</code> option specified,
+this suppressed initialization does not imply a type mismatch situation;
+the declared type is only required to apply when the <i class="i">slot</i> is finally assigned.
+</p>
+<p>With this definition, the following can be written:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (create-foo 1 2)
+</pre></div>
+
+<p>instead of
+</p>
+<div class="example">
+<pre class="example-preformatted"> (make-foo :a 1 :b 2)
+</pre></div>
+
+<p>and <code class="t">create-foo</code> provides defaulting different
+from that of <code class="t">make-foo</code>.
+</p>
+<p>Additional arguments that do not correspond to slot names but
+are merely present to supply values used in subsequent initialization 
+computations are allowed.
+For example, in the definition
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct (frob (:constructor create-frob
+                  (a &amp;key (b 3 have-b) (c-token 'c) 
+                          (c (list c-token (if have-b 7 2))))))
+         a b c)
+</pre></div>
+
+<p>the <code class="t">c-token</code> argument is used merely to supply a value used in the 
+initialization of the <code class="t">c</code> slot. The <i class="i">supplied-p parameters</i> 
+associated with <i class="i">optional parameters</i> and <i class="i">keyword parameters</i>
+might also be used this way.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Defsetf-Lambda-Lists.html">Defsetf Lambda Lists</a>, Previous: <a href="Destructuring-Lambda-Lists.html">Destructuring Lambda Lists</a>, Up: <a href="Lambda-Lists.html">Lambda Lists</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Built_002din-Method-Combination-Types.html
@@ -0,0 +1,183 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Built-in Method Combination Types (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Built-in Method Combination Types (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Built-in Method Combination Types (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Method-Selection-and-Combination.html" rel="up" title="Method Selection and Combination">
+<link href="Declarative-Method-Combination.html" rel="prev" title="Declarative Method Combination">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.center {text-align:center}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Built_002din-Method-Combination-Types">
+<div class="nav-panel">
+<p>
+Previous: <a href="Declarative-Method-Combination.html" accesskey="p" rel="prev">Declarative Method Combination</a>, Up: <a href="Method-Selection-and-Combination.html" accesskey="u" rel="up">Method Selection and Combination</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Built_002din-Method-Combination-Types-1"><span>7.6.6.7 Built-in Method Combination Types<a class="copiable-link" href="#Built_002din-Method-Combination-Types-1"> &para;</a></span></h4>
+
+<p>The object system provides a set of built-in method combination types.  To
+specify that a generic function is to use one of these method
+combination types, the name of the method combination type is given as
+the argument to the <code class="t">:method-combination</code> option to 
+<b class="b">defgeneric</b> or to the <code class="t">:method-combination</code> option to any of the
+other operators that specify generic function options.
+</p>
+<p>The names of the built-in  method combination types are listed in Figure 7&ndash;3.
+</p>
+<a class="index-entry-id" id="index-_002b"></a>
+
+<a class="index-entry-id" id="index-and"></a>
+
+<a class="index-entry-id" id="index-append"></a>
+
+<a class="index-entry-id" id="index-list-3"></a>
+
+<a class="index-entry-id" id="index-max"></a>
+
+<a class="index-entry-id" id="index-min"></a>
+
+<a class="index-entry-id" id="index-nconc"></a>
+
+<a class="index-entry-id" id="index-or"></a>
+
+<a class="index-entry-id" id="index-progn"></a>
+
+<a class="index-entry-id" id="index-standard-1"></a>
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  +    append  max  nconc  progn     <!-- /@w -->
+  and  list    min  or     standard  <!-- /@w -->
+
+  Figure 7&ndash;3: Built-in Method Combination Types<!-- /@w -->
+
+</pre></div></div>
+
+<p>The semantics of the <b class="b">standard</b> built-in method combination type is
+described in <a class="ref" href="Standard-Method-Combination.html">Standard Method Combination</a>.  The other
+built-in method combination types are called simple built-in method
+combination types.
+</p>
+<p>The simple built-in method combination types act as though they were
+defined by the short form of <b class="b">define-method-combination</b>.  
+They recognize two roles for <i class="i">methods</i>:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>An <i class="i">around method</i> has the keyword symbol 
+<code class="t">:around</code> as its sole <i class="i">qualifier</i>.  The meaning of 
+<code class="t">:around</code> <i class="i">methods</i> is the same as in standard method combination.
+Use of the functions <b class="b">call-next-method</b> and <b class="b">next-method-p</b>
+is supported in <i class="i">around methods</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>A primary method has the name of the method combination
+type as its sole <i class="i">qualifier</i>.  For example, the built-in method
+combination type <code class="t">and</code> recognizes methods whose sole <i class="i">qualifier</i> is
+<code class="t">and</code>; these are primary methods. Use of the functions 
+<b class="b">call-next-method</b> and <b class="b">next-method-p</b> is not supported 
+in <i class="i">primary methods</i>.
+</p>
+</dd>
+</dl>
+
+<p>The semantics of the simple built-in method combination types is as
+follows:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>If there are any <i class="i">around methods</i>, the most specific <i class="i">around method</i>
+is called.   It supplies the value or values of the <i class="i">generic function</i>. 
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Inside the body of an <i class="i">around method</i>, the function
+<b class="b">call-next-method</b> can be used to call the <i class="i">next method</i>.
+The <i class="i">generic function</i> <b class="b">no-next-method</b> is invoked if 
+<b class="b">call-next-method</b> is used and there is no applicable method to call.
+The <i class="i">function</i> <b class="b">next-method-p</b> may be used to determine whether a
+<i class="i">next method</i> exists. When the <i class="i">next method</i> returns, 
+the <i class="i">around method</i> can execute more code,
+perhaps based on the returned value or values.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If an <i class="i">around method</i> invokes <b class="b">call-next-method</b>,
+the next most specific <i class="i">around method</i> is
+called, if one is applicable.  If there are no <i class="i">around methods</i>
+or if <b class="b">call-next-method</b> is called by the least specific
+<i class="i">around method</i>, a Lisp form derived from the name of the built-in
+method combination type and from the list of applicable primary
+methods is evaluated to produce the value of the generic function.
+Suppose the name of the method combination type is <i class="i">operator</i>
+and the call to the generic function is of the form
+</p>
+<div class="center">(<i class="i">generic-function</i> a_1... a_n)
+</div>
+</dd>
+<dt><code class="t"></code></dt>
+<dd><p>Let M_1,...,M_k be the applicable primary methods
+in order; then the derived Lisp form is
+</p>
+<div class="center">(<i class="i">operator</i> &lt; M_1
+</div><p>a_1... a_n&gt;...&lt;
+M_k a_1... a_n&gt;)
+</p>
+</dd>
+<dt><code class="t"></code></dt>
+<dd><p>If the expression &lt; M_i  a_1... a_n&gt; is
+evaluated, the method M_i will be applied to the arguments
+a_1... a_n.  
+For example,
+if <i class="i">operator</i> is <code class="t">or</code>,
+the expression &lt; M_i  a_1... a_n&gt; is
+evaluated only if &lt; M_j  a_1... a_n&gt;,
+1&lt;= j&lt;i, returned <code class="t">nil</code>.
+</p>
+</dd>
+<dt><code class="t"></code></dt>
+<dd><p>The default order for the primary methods is 
+<code class="t">:most-specific-first</code>.  However, the order can be reversed by supplying
+<code class="t">:most-specific-last</code> as the second argument to the <code class="t">:method-combination</code> option.
+</p></dd>
+</dl>
+
+<p>The simple built-in method combination types require exactly one
+<i class="i">qualifier</i> per method.  An error is signaled if there are applicable
+methods with no <i class="i">qualifiers</i> or with <i class="i">qualifiers</i> that are not supported
+by the method combination type. An error is signaled if there are
+applicable <i class="i">around methods</i> and no applicable primary
+methods.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Declarative-Method-Combination.html">Declarative Method Combination</a>, Up: <a href="Method-Selection-and-Combination.html">Method Selection and Combination</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Byte-Operations-on-Integers.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Byte Operations on Integers (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Byte Operations on Integers (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Byte Operations on Integers (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numeric-Operations.html" rel="up" title="Numeric Operations">
+<link href="Logical-Operations-on-Integers.html" rel="prev" title="Logical Operations on Integers">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Byte-Operations-on-Integers">
+<div class="nav-panel">
+<p>
+Previous: <a href="Logical-Operations-on-Integers.html" accesskey="p" rel="prev">Logical Operations on Integers</a>, Up: <a href="Numeric-Operations.html" accesskey="u" rel="up">Numeric Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Byte-Operations-on-Integers-1"><span>12.1.1.6 Byte Operations on Integers<a class="copiable-link" href="#Byte-Operations-on-Integers-1"> &para;</a></span></h4>
+
+<p>The byte-manipulation <i class="i">functions</i> use <i class="i">objects</i> 
+called <i class="i">byte specifiers</i> to designate the size and position
+of a specific <i class="i">byte</i> within an <i class="i">integer</i>.
+The representation of a <i class="i">byte specifier</i> is <i class="i">implementation-dependent</i>;
+it might or might not be a <i class="i">number</i>.
+The <i class="i">function</i> <b class="b">byte</b> will construct a <i class="i">byte specifier</i>,
+which various other byte-manipulation <i class="i">functions</i> will accept.
+</p>
+<p>Figure 12&ndash;6 shows <i class="i">defined names</i> relating to
+manipulating <i class="i">bytes</i> of <i class="i">numbers</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  byte           deposit-field  ldb-test    <!-- /@w -->
+  byte-position  dpb            mask-field  <!-- /@w -->
+  byte-size      ldb                        <!-- /@w -->
+
+  Figure 12&ndash;6: Defined names relating to byte manipulation.<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Capitalization-and-Punctuation-in-Condition-Reports.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Capitalization and Punctuation in Condition Reports (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Capitalization and Punctuation in Condition Reports (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Capitalization and Punctuation in Condition Reports (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printing-Conditions.html" rel="up" title="Printing Conditions">
+<link href="Leading-and-Trailing-Newlines-in-Condition-Reports.html" rel="next" title="Leading and Trailing Newlines in Condition Reports">
+<link href="Recommended-Style-in-Condition-Reporting.html" rel="prev" title="Recommended Style in Condition Reporting">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Capitalization-and-Punctuation-in-Condition-Reports">
+<div class="nav-panel">
+<p>
+Next: <a href="Leading-and-Trailing-Newlines-in-Condition-Reports.html" accesskey="n" rel="next">Leading and Trailing Newlines in Condition Reports</a>, Previous: <a href="Recommended-Style-in-Condition-Reporting.html" accesskey="p" rel="prev">Recommended Style in Condition Reporting</a>, Up: <a href="Printing-Conditions.html" accesskey="u" rel="up">Printing Conditions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Capitalization-and-Punctuation-in-Condition-Reports-1"><span>9.1.3.2 Capitalization and Punctuation in Condition Reports<a class="copiable-link" href="#Capitalization-and-Punctuation-in-Condition-Reports-1"> &para;</a></span></h4>
+
+<p>It is recommended that a <i class="i">report message</i> be a complete sentences, in the
+proper case and correctly punctuated.  In English, for example, this
+means the first letter should be uppercase, and there should be a
+trailing period.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (error &quot;This is a message&quot;)  ; Not recommended
+ (error &quot;this is a message.&quot;) ; Not recommended
+
+ (error &quot;This is a message.&quot;) ; Recommended instead
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Case-in-Pathname-Components.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Case in Pathname Components (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Case in Pathname Components (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Case in Pathname Components (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Local-Case-in-Pathname-Components.html" rel="next" title="Local Case in Pathname Components">
+<link href="Special-Characters-in-Pathname-Components.html" rel="prev" title="Special Characters in Pathname Components">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Case-in-Pathname-Components">
+<div class="nav-panel">
+<p>
+Next: <a href="Local-Case-in-Pathname-Components.html" accesskey="n" rel="next">Local Case in Pathname Components</a>, Previous: <a href="Special-Characters-in-Pathname-Components.html" accesskey="p" rel="prev">Special Characters in Pathname Components</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Case-in-Pathname-Components-1"><span>19.2.2.3 Case in Pathname Components<a class="copiable-link" href="#Case-in-Pathname-Components-1"> &para;</a></span></h4>
+
+<p><i class="i">Namestrings</i> always use local file system <i class="i">case</i> conventions, 
+but <span class="r">Common Lisp</span> <i class="i">functions</i> that manipulate <i class="i">pathname</i> components
+allow the caller to select either of two conventions for representing
+<i class="i">case</i> in component values by supplying a value for the
+<code class="t">:case</code> keyword argument.
+Figure 19&ndash;2 lists the functions 
+relating to <i class="i">pathnames</i> that permit a <code class="t">:case</code> argument:
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  make-pathname    pathname-directory  pathname-name  <!-- /@w -->
+  pathname-device  pathname-host       pathname-type  <!-- /@w -->
+
+  Figure 19&ndash;2: Pathname functions using a :CASE argument<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Case-in-Symbols.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Case in Symbols (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Case in Symbols (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Case in Symbols (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Notational-Conventions.html" rel="up" title="Notational Conventions">
+<link href="Numbers-_0028Objects-with-Multiple-Notations_0029.html" rel="next" title="Numbers (Objects with Multiple Notations)">
+<link href="Objects-with-Multiple-Notations.html" rel="prev" title="Objects with Multiple Notations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Case-in-Symbols">
+<div class="nav-panel">
+<p>
+Next: <a href="Numbers-_0028Objects-with-Multiple-Notations_0029.html" accesskey="n" rel="next">Numbers</a>, Previous: <a href="Objects-with-Multiple-Notations.html" accesskey="p" rel="prev">Objects with Multiple Notations</a>, Up: <a href="Notational-Conventions.html" accesskey="u" rel="up">Notational Conventions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Case-in-Symbols-1"><span>1.4.1.8 Case in Symbols<a class="copiable-link" href="#Case-in-Symbols-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-case-in-symbol-names"></a>
+
+<p>While <i class="i">case</i> is significant in the process of <i class="i">interning</i> a <i class="i">symbol</i>,
+the <i class="i">Lisp reader</i>, by default, attempts to canonicalize the case of a
+<i class="i">symbol</i> prior to interning; see <a class="ref" href="Effect-of-Readtable-Case-on-the-Lisp-Reader.html">Effect of Readtable Case on the Lisp Reader</a>.
+As such, case in <i class="i">symbols</i> is not, by default, significant.
+Throughout this document, except as explicitly noted otherwise,
+the case in which a <i class="i">symbol</i> appears is not significant; 
+that is, <code class="t">HELLO</code>, <code class="t">Hello</code>, <code class="t">hElLo</code>, and <code class="t">hello</code> are
+all equivalent ways to denote a symbol whose name is <code class="t">&quot;HELLO&quot;</code>.
+</p>
+<p>The characters <i class="i">backslash</i> and <i class="i">vertical-bar</i> are used to explicitly
+quote the <i class="i">case</i> and other parsing-related 
+aspects
+of characters.  As such,
+the notations <code class="t">|hello|</code> and <code class="t">\h\e\l\l\o</code> are equivalent ways
+to refer to a symbol whose name is <code class="t">&quot;hello&quot;</code>, and which is <i class="i">distinct</i> from
+any symbol whose name is <code class="t">&quot;HELLO&quot;</code>.
+</p>
+<p>The <i class="i">symbols</i> that correspond to <span class="r">Common Lisp</span> <i class="i">defined names</i>
+have <i class="i">uppercase</i> names even though their names generally appear
+in <i class="i">lowercase</i> in this document.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Case-of-Implementation_002dDefined-Characters.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Case of Implementation-Defined Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Case of Implementation-Defined Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Case of Implementation-Defined Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Categories.html" rel="up" title="Character Categories">
+<link href="Numeric-Characters.html" rel="next" title="Numeric Characters">
+<link href="Corresponding-Characters-in-the-Other-Case.html" rel="prev" title="Corresponding Characters in the Other Case">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Case-of-Implementation_002dDefined-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Numeric-Characters.html" accesskey="n" rel="next">Numeric Characters</a>, Previous: <a href="Corresponding-Characters-in-the-Other-Case.html" accesskey="p" rel="prev">Corresponding Characters in the Other Case</a>, Up: <a href="Character-Categories.html" accesskey="u" rel="up">Character Categories</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Case-of-Implementation_002dDefined-Characters-1"><span>13.1.4.7 Case of Implementation-Defined Characters<a class="copiable-link" href="#Case-of-Implementation_002dDefined-Characters-1"> &para;</a></span></h4>
+
+<p>An <i class="i">implementation</i> may define that other <i class="i">implementation-defined</i>
+<i class="i">graphic</i> <i class="i">characters</i> have <i class="i">case</i>.  Such definitions must always
+be done in pairs&mdash;one <i class="i">uppercase</i> <i class="i">character</i> in one-to-one 
+<i class="i">correspondence</i> with one <i class="i">lowercase</i> <i class="i">character</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Changing-the-Class-of-an-Instance.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Changing the Class of an Instance (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Changing the Class of an Instance (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Changing the Class of an Instance (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects.html" rel="up" title="Objects">
+<link href="Reinitializing-an-Instance.html" rel="next" title="Reinitializing an Instance">
+<link href="Object-Creation-and-Initialization.html" rel="prev" title="Object Creation and Initialization">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Changing-the-Class-of-an-Instance">
+<div class="nav-panel">
+<p>
+Next: <a href="Reinitializing-an-Instance.html" accesskey="n" rel="next">Reinitializing an Instance</a>, Previous: <a href="Object-Creation-and-Initialization.html" accesskey="p" rel="prev">Object Creation and Initialization</a>, Up: <a href="Objects.html" accesskey="u" rel="up">Objects</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Changing-the-Class-of-an-Instance-1"><span>7.2 Changing the Class of an Instance<a class="copiable-link" href="#Changing-the-Class-of-an-Instance-1"> &para;</a></span></h3>
+
+
+<p>The <i class="i">function</i> <b class="b">change-class</b> can be used to change the <i class="i">class</i> 
+of an <i class="i">instance</i> from its current class, C_{<span class="r">from</span>},
+to a different class, C_{<span class="r">to</span>}; it changes the
+structure of the <i class="i">instance</i> to conform to the definition of the class
+C_{<span class="r">to</span>}.
+</p>
+<p>Note that changing the <i class="i">class</i> of an <i class="i">instance</i> may cause
+<i class="i">slots</i> to be added or deleted.  Changing the <i class="i">class</i> of an
+<i class="i">instance</i> does not change its identity as defined by the
+<b class="b">eq</b> function.
+</p>
+<p>When <b class="b">change-class</b> is invoked on an <i class="i">instance</i>, a two-step
+updating process takes place.  The first step modifies the structure of
+the <i class="i">instance</i> by adding new <i class="i">local slots</i> and discarding 
+<i class="i">local slots</i> that are not specified in the new version of the <i class="i">instance</i>.
+The second step initializes the newly added <i class="i">local slots</i> and performs 
+any other user-defined actions. These two steps are further described in the 
+two following sections.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Modifying-the-Structure-of-the-Instance.html" accesskey="1">Modifying the Structure of the Instance</a></li>
+<li><a href="Initializing-Newly-Added-Local-Slots-_0028Changing-the-Class-of-an-Instance_0029.html" accesskey="2">Initializing Newly Added Local Slots</a></li>
+<li><a href="Customizing-the-Change-of-Class-of-an-Instance.html" accesskey="3">Customizing the Change of Class of an Instance</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Character-Attributes.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Character Attributes (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Character Attributes (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Character Attributes (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Concepts.html" rel="up" title="Character Concepts">
+<link href="Character-Categories.html" rel="next" title="Character Categories">
+<link href="Introduction-to-Scripts-and-Repertoires.html" rel="prev" title="Introduction to Scripts and Repertoires">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Character-Attributes">
+<div class="nav-panel">
+<p>
+Next: <a href="Character-Categories.html" accesskey="n" rel="next">Character Categories</a>, Previous: <a href="Introduction-to-Scripts-and-Repertoires.html" accesskey="p" rel="prev">Introduction to Scripts and Repertoires</a>, Up: <a href="Character-Concepts.html" accesskey="u" rel="up">Character Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Character-Attributes-1"><span>13.1.3 Character Attributes<a class="copiable-link" href="#Character-Attributes-1"> &para;</a></span></h4>
+
+<p><i class="i">Characters</i> have only one <i class="i">standardized</i> <i class="i">attribute</i>:
+a <i class="i">code</i>.  A <i class="i">character</i>&rsquo;s <i class="i">code</i> is a non-negative <i class="i">integer</i>.
+This <i class="i">code</i> is composed from a character <i class="i">script</i> and a character label
+in an <i class="i">implementation-dependent</i> way.  See the <i class="i">functions</i> <b class="b">char-code</b> and <b class="b">code-char</b>.
+</p>
+<p>Additional, <i class="i">implementation-defined</i> <i class="i">attributes</i> of <i class="i">characters</i>
+are also permitted
+so that, for example, 
+two <i class="i">characters</i> with the same <i class="i">code</i> may differ 
+in some other, <i class="i">implementation-defined</i> way.
+</p>
+<p>For any <i class="i">implementation-defined</i> <i class="i">attribute</i>
+there is a distinguished value
+called the <i class="i">null</i>
+<a class="index-entry-id" id="index-null"></a>
+ value for that <i class="i">attribute</i>. 
+A <i class="i">character</i> for which each <i class="i">implementation-defined</i> <i class="i">attribute</i>
+has the null value for that <i class="i">attribute</i> is called a <i class="i">simple</i> <i class="i">character</i>.
+If the <i class="i">implementation</i> has no <i class="i">implementation-defined</i> <i class="i">attributes</i>,
+then all <i class="i">characters</i> are <i class="i">simple</i> <i class="i">characters</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Character-Categories.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Character Categories (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Character Categories (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Character Categories (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Concepts.html" rel="up" title="Character Concepts">
+<link href="Identity-of-Characters.html" rel="next" title="Identity of Characters">
+<link href="Character-Attributes.html" rel="prev" title="Character Attributes">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Character-Categories">
+<div class="nav-panel">
+<p>
+Next: <a href="Identity-of-Characters.html" accesskey="n" rel="next">Identity of Characters</a>, Previous: <a href="Character-Attributes.html" accesskey="p" rel="prev">Character Attributes</a>, Up: <a href="Character-Concepts.html" accesskey="u" rel="up">Character Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Character-Categories-1"><span>13.1.4 Character Categories<a class="copiable-link" href="#Character-Categories-1"> &para;</a></span></h4>
+
+<p>There are several (overlapping) categories of <i class="i">characters</i> that have no formally
+associated <i class="i">type</i> but that are nevertheless useful to name. 
+They include
+     <i class="i">graphic</i> <i class="i">characters</i>, 
+     <i class="i">alphabetic</i>_1 <i class="i">characters</i>,
+     <i class="i">characters</i> with <i class="i">case</i> 
+       (<i class="i">uppercase</i> and <i class="i">lowercase</i> <i class="i">characters</i>),
+     <i class="i">numeric</i> <i class="i">characters</i>,
+     <i class="i">alphanumeric</i> <i class="i">characters</i>,
+ and <i class="i">digits</i> (in a given <i class="i">radix</i>).
+</p>
+<p>For each <i class="i">implementation-defined</i> <i class="i">attribute</i> of a <i class="i">character</i>,
+the documentation for that <i class="i">implementation</i> must specify whether 
+<i class="i">characters</i> that differ only in that <i class="i">attribute</i> are permitted to differ
+in whether are not they are members of one of the aforementioned categories.
+</p>
+<p>Note that these terms are defined independently of any special syntax 
+which might have been enabled in the <i class="i">current readtable</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Graphic-Characters.html" accesskey="1">Graphic Characters</a></li>
+<li><a href="Alphabetic-Characters.html" accesskey="2">Alphabetic Characters</a></li>
+<li><a href="Characters-With-Case.html" accesskey="3">Characters With Case</a></li>
+<li><a href="Uppercase-Characters.html" accesskey="4">Uppercase Characters</a></li>
+<li><a href="Lowercase-Characters.html" accesskey="5">Lowercase Characters</a></li>
+<li><a href="Corresponding-Characters-in-the-Other-Case.html" accesskey="6">Corresponding Characters in the Other Case</a></li>
+<li><a href="Case-of-Implementation_002dDefined-Characters.html" accesskey="7">Case of Implementation-Defined Characters</a></li>
+<li><a href="Numeric-Characters.html" accesskey="8">Numeric Characters</a></li>
+<li><a href="Alphanumeric-Characters.html" accesskey="9">Alphanumeric Characters</a></li>
+<li><a href="Digits-in-a-Radix.html">Digits in a Radix</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Character-Concepts.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Character Concepts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Character Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Character Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters.html" rel="up" title="Characters">
+<link href="Characters-Dictionary.html" rel="next" title="Characters Dictionary">
+<link href="Characters.html" rel="prev" title="Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Character-Concepts">
+<div class="nav-panel">
+<p>
+Next: <a href="Characters-Dictionary.html" accesskey="n" rel="next">Characters Dictionary</a>, Previous: <a href="Characters.html" accesskey="p" rel="prev">Characters</a>, Up: <a href="Characters.html" accesskey="u" rel="up">Characters</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Character-Concepts-1"><span>13.1 Character Concepts<a class="copiable-link" href="#Character-Concepts-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Introduction-to-Characters.html" accesskey="1">Introduction to Characters</a></li>
+<li><a href="Introduction-to-Scripts-and-Repertoires.html" accesskey="2">Introduction to Scripts and Repertoires</a></li>
+<li><a href="Character-Attributes.html" accesskey="3">Character Attributes</a></li>
+<li><a href="Character-Categories.html" accesskey="4">Character Categories</a></li>
+<li><a href="Identity-of-Characters.html" accesskey="5">Identity of Characters</a></li>
+<li><a href="Ordering-of-Characters.html" accesskey="6">Ordering of Characters</a></li>
+<li><a href="Character-Names.html" accesskey="7">Character Names</a></li>
+<li><a href="Treatment-of-Newline-during-Input-and-Output.html" accesskey="8">Treatment of Newline during Input and Output</a></li>
+<li><a href="Character-Encodings.html" accesskey="9">Character Encodings</a></li>
+<li><a href="Documentation-of-Implementation_002dDefined-Scripts.html">Documentation of Implementation-Defined Scripts</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Character-Encodings.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Character Encodings (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Character Encodings (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Character Encodings (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Concepts.html" rel="up" title="Character Concepts">
+<link href="Documentation-of-Implementation_002dDefined-Scripts.html" rel="next" title="Documentation of Implementation-Defined Scripts">
+<link href="Treatment-of-Newline-during-Input-and-Output.html" rel="prev" title="Treatment of Newline during Input and Output">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Character-Encodings">
+<div class="nav-panel">
+<p>
+Next: <a href="Documentation-of-Implementation_002dDefined-Scripts.html" accesskey="n" rel="next">Documentation of Implementation-Defined Scripts</a>, Previous: <a href="Treatment-of-Newline-during-Input-and-Output.html" accesskey="p" rel="prev">Treatment of Newline during Input and Output</a>, Up: <a href="Character-Concepts.html" accesskey="u" rel="up">Character Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Character-Encodings-1"><span>13.1.9 Character Encodings<a class="copiable-link" href="#Character-Encodings-1"> &para;</a></span></h4>
+
+<p>A <i class="i">character</i> is sometimes represented merely by its <i class="i">code</i>, and sometimes
+by another <i class="i">integer</i> value which is composed from the <i class="i">code</i> and all 
+<i class="i">implementation-defined</i> <i class="i">attributes</i>
+(in an <i class="i">implementation-defined</i> way
+that might vary between <i class="i">Lisp images</i> even in the same <i class="i">implementation</i>).
+This <i class="i">integer</i>, returned by the function <b class="b">char-int</b>, is called the
+character&rsquo;s &ldquo;encoding.&rdquo;
+There is no corresponding function
+from a character&rsquo;s encoding back to the <i class="i">character</i>, 
+since its primary intended uses include things like hashing where an inverse operation
+is not really called for.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Character-Names.html
@@ -0,0 +1,96 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Character Names (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Character Names (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Character Names (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Concepts.html" rel="up" title="Character Concepts">
+<link href="Treatment-of-Newline-during-Input-and-Output.html" rel="next" title="Treatment of Newline during Input and Output">
+<link href="Ordering-of-Characters.html" rel="prev" title="Ordering of Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Character-Names">
+<div class="nav-panel">
+<p>
+Next: <a href="Treatment-of-Newline-during-Input-and-Output.html" accesskey="n" rel="next">Treatment of Newline during Input and Output</a>, Previous: <a href="Ordering-of-Characters.html" accesskey="p" rel="prev">Ordering of Characters</a>, Up: <a href="Character-Concepts.html" accesskey="u" rel="up">Character Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Character-Names-1"><span>13.1.7 Character Names<a class="copiable-link" href="#Character-Names-1"> &para;</a></span></h4>
+
+<p>The following <i class="i">character</i> <i class="i">names</i> must be present in all 
+<i class="i">conforming implementations</i>:
+</p>
+<dl class="table">
+<dt><code class="t">Newline</code></dt>
+<dd><p>The character that represents the division between lines.
+An implementation must translate between <code class="t">#\Newline</code>, 
+a single-character representation, and whatever external representation(s)
+may be used.
+</p>
+</dd>
+<dt><code class="t">Space</code></dt>
+<dd><p>The space or blank character.
+</p></dd>
+</dl>
+
+<p>The following names are <i class="i">semi-standard</i>; 
+if an <i class="i">implementation</i> supports them,
+they should be used for the described <i class="i">characters</i> and no others.
+</p>
+<dl class="table">
+<dt><code class="t">Rubout</code></dt>
+<dd><p>The rubout or delete character.
+</p>
+</dd>
+<dt><code class="t">Page</code></dt>
+<dd><p>The form-feed or page-separator character.
+</p>
+</dd>
+<dt><code class="t">Tab</code></dt>
+<dd><p>The tabulate character.
+</p>
+</dd>
+<dt><code class="t">Backspace</code></dt>
+<dd><p>The backspace character.
+</p>
+</dd>
+<dt><code class="t">Return</code></dt>
+<dd><p>The carriage return character.
+</p>
+</dd>
+<dt><code class="t">Linefeed</code></dt>
+<dd><p>The line-feed character.
+</p></dd>
+</dl>
+
+<p>In some <i class="i">implementations</i>,
+one or more of these <i class="i">character</i> <i class="i">names</i> 
+might denote a <i class="i">standard character</i>; 
+for example,
+<code class="t">#\Linefeed</code> and <code class="t">#\Newline</code> might be the <i class="i">same</i> <i class="i">character</i>
+in some <i class="i">implementations</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Character-Repertoires.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Character Repertoires (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Character Repertoires (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Character Repertoires (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Scripts-and-Repertoires.html" rel="up" title="Introduction to Scripts and Repertoires">
+<link href="Character-Scripts.html" rel="prev" title="Character Scripts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Character-Repertoires">
+<div class="nav-panel">
+<p>
+Previous: <a href="Character-Scripts.html" accesskey="p" rel="prev">Character Scripts</a>, Up: <a href="Introduction-to-Scripts-and-Repertoires.html" accesskey="u" rel="up">Introduction to Scripts and Repertoires</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Character-Repertoires-1"><span>13.1.2.2 Character Repertoires<a class="copiable-link" href="#Character-Repertoires-1"> &para;</a></span></h4>
+
+<p>A <i class="i">repertoire</i>
+<a class="index-entry-id" id="index-repertoire"></a>
+ is a <i class="i">type specifier</i> for a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">character</b>.
+</p>
+<p>This term is generally used when describing a collection of <i class="i">characters</i>
+independent of their coding.
+<i class="i">Characters</i> in <i class="i">repertoires</i> are only identified
+    by name,
+    by <i class="i">glyph</i>, or
+    by character description.
+</p>
+<p>A <i class="i">repertoire</i> can contain <i class="i">characters</i> from several
+<i class="i">scripts</i>, and a <i class="i">character</i> can appear in more than
+one <i class="i">repertoire</i>.
+</p>
+<p>For some examples of <i class="i">repertoires</i>, see the coded character standards
+ISO 8859/1, ISO 8859/2, and ISO 6937/2.
+Note, however, that although
+the term &ldquo;<i class="i">repertoire</i>&rdquo; is chosen for 
+definitional 
+compatibility with ISO terminology, no <i class="i">conforming implementation</i> 
+is required to use <i class="i">repertoires</i> standardized by ISO or any other 
+standards organization.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Character-Scripts.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Character Scripts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Character Scripts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Character Scripts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Scripts-and-Repertoires.html" rel="up" title="Introduction to Scripts and Repertoires">
+<link href="Character-Repertoires.html" rel="next" title="Character Repertoires">
+<link href="Introduction-to-Scripts-and-Repertoires.html" rel="prev" title="Introduction to Scripts and Repertoires">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Character-Scripts">
+<div class="nav-panel">
+<p>
+Next: <a href="Character-Repertoires.html" accesskey="n" rel="next">Character Repertoires</a>, Previous: <a href="Introduction-to-Scripts-and-Repertoires.html" accesskey="p" rel="prev">Introduction to Scripts and Repertoires</a>, Up: <a href="Introduction-to-Scripts-and-Repertoires.html" accesskey="u" rel="up">Introduction to Scripts and Repertoires</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Character-Scripts-1"><span>13.1.2.1 Character Scripts<a class="copiable-link" href="#Character-Scripts-1"> &para;</a></span></h4>
+
+<p>A <i class="i">script</i> is one of possibly several sets that form an <i class="i">exhaustive partition</i>
+of the type <b class="b">character</b>.
+</p>
+<p>The number of such sets and boundaries between them is <i class="i">implementation-defined</i>.
+<span class="r">Common Lisp</span> does not require these sets to be <i class="i">types</i>, but an <i class="i">implementation</i>
+is permitted to define such <i class="i">types</i> as an extension.  Since no <i class="i">character</i>
+from one <i class="i">script</i> can ever be a member of another <i class="i">script</i>, it is generally
+more useful to speak about <i class="i">character</i> <i class="i">repertoires</i>.
+</p>
+<p>Although
+the term &ldquo;<i class="i">script</i>&rdquo; is chosen for 
+definitional 
+compatibility with ISO terminology, no <i class="i">conforming implementation</i> 
+is required to use any particular <i class="i">scripts</i> standardized by ISO
+or by any other standards organization.
+</p>
+<p>Whether and how the <i class="i">script</i> or <i class="i">scripts</i> used by any given
+<i class="i">implementation</i> are named is <i class="i">implementation-dependent</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Character-Syntax-Types.html
@@ -0,0 +1,144 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Character Syntax Types (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Character Syntax Types (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Character Syntax Types (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Syntax.html" rel="up" title="Character Syntax">
+<link href="Standard-Characters.html" rel="prev" title="Standard Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Character-Syntax-Types">
+<div class="nav-panel">
+<p>
+Previous: <a href="Standard-Characters.html" accesskey="p" rel="prev">Standard Characters</a>, Up: <a href="Character-Syntax.html" accesskey="u" rel="up">Character Syntax</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Character-Syntax-Types-1"><span>2.1.4 Character Syntax Types<a class="copiable-link" href="#Character-Syntax-Types-1"> &para;</a></span></h4>
+
+<p>The <i class="i">Lisp reader</i> constructs an <i class="i">object</i> 
+from the input text by interpreting each <i class="i">character</i> 
+according to its <i class="i">syntax type</i>.
+The <i class="i">Lisp reader</i> cannot accept as input 
+everything that the <i class="i">Lisp printer</i> produces,
+and the <i class="i">Lisp reader</i> has features that are not used by the <i class="i">Lisp printer</i>.
+The <i class="i">Lisp reader</i> can be used as a lexical analyzer 
+for a more general user-written parser.
+</p>
+<p>When the <i class="i">Lisp reader</i> is invoked, it reads a single character from 
+the <i class="i">input</i> <i class="i">stream</i> and dispatches according to the
+<i class="i">syntax type</i>
+<a class="index-entry-id" id="index-syntax-type"></a>
+ of that <i class="i">character</i>.
+Every <i class="i">character</i> that can appear in the <i class="i">input</i> <i class="i">stream</i>
+is of one of the <i class="i">syntax types</i> shown in <i class="i">Figure~2&ndash;6</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <i class="i">constituent</i>  <i class="i">macro character</i>  <i class="i">single escape</i>  <!-- /@w -->
+  <i class="i">invalid</i>      <i class="i">multiple escape</i>  <i class="i">whitespace</i>_2   <!-- /@w -->
+
+  Figure 2&ndash;6: Possible Character Syntax Types <!-- /@w -->
+
+</pre></div></div>
+
+<p>The <i class="i">syntax type</i> of a <i class="i">character</i> in a <i class="i">readtable</i>
+determines how that character is interpreted by the <i class="i">Lisp reader</i>
+while that <i class="i">readtable</i> is the <i class="i">current readtable</i>.
+At any given time, every character has exactly one <i class="i">syntax type</i>.
+</p>
+<p><i class="i">Figure~2&ndash;7</i> 
+lists the <i class="i">syntax type</i> of each <i class="i">character</i> in <i class="i">standard syntax</i>.
+</p>
+
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  character  syntax type                 character  syntax type             <!-- /@w -->
+  Backspace  <i class="i">constituent</i>                 0&ndash;9       <i class="i">constituent</i>             <!-- /@w -->
+  Tab        <i class="i">whitespace</i>_2                :          <i class="i">constituent</i>             <!-- /@w -->
+  Newline    <i class="i">whitespace</i>_2                ;          <i class="i">terminating</i> <i class="i">macro char</i>  <!-- /@w -->
+  Linefeed   <i class="i">whitespace</i>_2                <code class="t">&lt;</code>          <i class="i">constituent</i>             <!-- /@w -->
+  Page       <i class="i">whitespace</i>_2                =          <i class="i">constituent</i>             <!-- /@w -->
+  Return     <i class="i">whitespace</i>_2                <code class="t">&gt;</code>          <i class="i">constituent</i>             <!-- /@w -->
+  Space      <i class="i">whitespace</i>_2                ?          <i class="i">constituent</i>*            <!-- /@w -->
+  !          <i class="i">constituent</i>*                <code class="t">@</code>          <i class="i">constituent</i>             <!-- /@w -->
+  <code class="t">&quot;</code>          <i class="i">terminating</i> <i class="i">macro char</i>      A&ndash;Z       <i class="i">constituent</i>             <!-- /@w -->
+  #          <i class="i">non-terminating</i> <i class="i">macro char</i>  <code class="t">[</code>          <i class="i">constituent</i>*            <!-- /@w -->
+  $         <i class="i">constituent</i>                 <code class="t">\</code>          <i class="i">single escape</i>           <!-- /@w -->
+  %          <i class="i">constituent</i>                 <code class="t">]</code>          <i class="i">constituent</i>*            <!-- /@w -->
+  &amp;          <i class="i">constituent</i>                 <code class="t">^</code>          <i class="i">constituent</i>             <!-- /@w -->
+  &rsquo;          <i class="i">terminating</i> <i class="i">macro char</i>      <code class="t">_</code>          <i class="i">constituent</i>             <!-- /@w -->
+  (          <i class="i">terminating</i> <i class="i">macro char</i>      &lsquo;          <i class="i">terminating</i> <i class="i">macro char</i>  <!-- /@w -->
+  )          <i class="i">terminating</i> <i class="i">macro char</i>      a&ndash;z       <i class="i">constituent</i>             <!-- /@w -->
+  <code class="t">*</code>          <i class="i">constituent</i>                 <code class="t">{</code>          <i class="i">constituent</i>*            <!-- /@w -->
+  +          <i class="i">constituent</i>                 <code class="t">|</code>          <i class="i">multiple escape</i>         <!-- /@w -->
+  ,          <i class="i">terminating</i> <i class="i">macro char</i>      <code class="t">}</code>          <i class="i">constituent</i>*            <!-- /@w -->
+  -          <i class="i">constituent</i>                 <code class="t">~</code>          <i class="i">constituent</i>             <!-- /@w -->
+  .          <i class="i">constituent</i>                 Rubout     <i class="i">constituent</i>             <!-- /@w -->
+  /          <i class="i">constituent</i>                 <!-- /@w -->
+
+            Figure 2&ndash;7: Character Syntax Types in Standard Syntax          <!-- /@w -->
+
+</pre></div></div>
+
+
+<p>The characters marked with an asterisk (*) are initially <i class="i">constituents</i>,
+but they are not used in any standard <span class="r">Common Lisp</span> notations.
+These characters are explicitly reserved to the <i class="i">programmer</i>.
+<code class="t">~</code> is not used in <span class="r">Common Lisp</span>, and reserved to implementors.
+<code class="t">$</code> and <code class="t">%</code> are <i class="i">alphabetic</i>_2 <i class="i">characters</i>,
+but are not used in the names of any standard <span class="r">Common Lisp</span> <i class="i">defined names</i>.
+</p>
+<p><i class="i">Whitespace</i>_2 characters serve as separators but are otherwise
+ignored.  <i class="i">Constituent</i> and <i class="i">escape</i> <i class="i">characters</i> are accumulated
+to make a <i class="i">token</i>, which is then interpreted as a <i class="i">number</i> or <i class="i">symbol</i>.
+<i class="i">Macro characters</i> trigger the invocation of <i class="i">functions</i> (possibly
+user-supplied) that can perform arbitrary parsing actions.
+<i class="i">Macro characters</i> are divided into two kinds,
+<i class="i">terminating</i> and <i class="i">non-terminating</i>,
+depending on whether or not they terminate a <i class="i">token</i>.
+The following are descriptions of each kind of <i class="i">syntax type</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Constituent-Characters.html" accesskey="1">Constituent Characters</a></li>
+<li><a href="Constituent-Traits.html" accesskey="2">Constituent Traits</a></li>
+<li><a href="Invalid-Characters.html" accesskey="3">Invalid Characters</a></li>
+<li><a href="Macro-Characters.html" accesskey="4">Macro Characters</a></li>
+<li><a href="Multiple-Escape-Characters.html" accesskey="5">Multiple Escape Characters</a></li>
+<li><a href="Examples-of-Multiple-Escape-Characters.html" accesskey="6">Examples of Multiple Escape Characters</a></li>
+<li><a href="Single-Escape-Character.html" accesskey="7">Single Escape Character</a></li>
+<li><a href="Examples-of-Single-Escape-Characters.html" accesskey="8">Examples of Single Escape Characters</a></li>
+<li><a href="Whitespace-Characters.html" accesskey="9">Whitespace Characters</a></li>
+<li><a href="Examples-of-Whitespace-Characters.html">Examples of Whitespace Characters</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Standard-Characters.html">Standard Characters</a>, Up: <a href="Character-Syntax.html">Character Syntax</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Character-Syntax.html
@@ -0,0 +1,65 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Character Syntax (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Character Syntax (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Character Syntax (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Syntax.html" rel="up" title="Syntax">
+<link href="Reader-Algorithm.html" rel="next" title="Reader Algorithm">
+<link href="Syntax.html" rel="prev" title="Syntax">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Character-Syntax">
+<div class="nav-panel">
+<p>
+Next: <a href="Reader-Algorithm.html" accesskey="n" rel="next">Reader Algorithm</a>, Previous: <a href="Syntax.html" accesskey="p" rel="prev">Syntax</a>, Up: <a href="Syntax.html" accesskey="u" rel="up">Syntax</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Character-Syntax-1"><span>2.1 Character Syntax<a class="copiable-link" href="#Character-Syntax-1"> &para;</a></span></h3>
+
+
+<p>The <i class="i">Lisp reader</i> takes <i class="i">characters</i> from a <i class="i">stream</i>, 
+interprets them as a printed representation of an <i class="i">object</i>,
+constructs that <i class="i">object</i>, and returns it.
+</p>
+<p>The syntax described by this chapter is called the <i class="i">standard syntax</i>
+<a class="index-entry-id" id="index-standard-syntax"></a>
+.
+Operations are provided by <span class="r">Common Lisp</span> so that
+various aspects of the syntax information represented by a <i class="i">readtable</i> 
+can be modified under program control; see <a class="ref" href="Reader.html">Reader</a>.
+Except as explicitly stated otherwise, 
+the syntax used throughout this document is <i class="i">standard syntax</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Readtables.html" accesskey="1">Readtables</a></li>
+<li><a href="Variables-that-affect-the-Lisp-Reader.html" accesskey="2">Variables that affect the Lisp Reader</a></li>
+<li><a href="Standard-Characters.html" accesskey="3">Standard Characters</a></li>
+<li><a href="Character-Syntax-Types.html" accesskey="4">Character Syntax Types</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Characters-Dictionary.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Characters Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Characters Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Characters Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters.html" rel="up" title="Characters">
+<link href="Character-Concepts.html" rel="prev" title="Character Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Characters-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Character-Concepts.html" accesskey="p" rel="prev">Character Concepts</a>, Up: <a href="Characters.html" accesskey="u" rel="up">Characters</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Characters-Dictionary-1"><span>13.2 Characters Dictionary<a class="copiable-link" href="#Characters-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="character-_0028System-Class_0029.html" accesskey="1">character                                                    [System Class]</a></li>
+<li><a href="base_002dchar.html" accesskey="2">base-char                                                            [Type]</a></li>
+<li><a href="standard_002dchar.html" accesskey="3">standard-char                                                        [Type]</a></li>
+<li><a href="extended_002dchar.html" accesskey="4">extended-char                                                        [Type]</a></li>
+<li><a href="char_003d.html" accesskey="5">char=, char/=, char&lt;, char&gt;, char&lt;=, char&gt;=,</a></li>
+<li><a href="character.html" accesskey="6">character                                                        [Function]</a></li>
+<li><a href="characterp.html" accesskey="7">characterp                                                       [Function]</a></li>
+<li><a href="alpha_002dchar_002dp.html" accesskey="8">alpha-char-p                                                     [Function]</a></li>
+<li><a href="alphanumericp.html" accesskey="9">alphanumericp                                                    [Function]</a></li>
+<li><a href="digit_002dchar.html">digit-char                                                       [Function]</a></li>
+<li><a href="digit_002dchar_002dp.html">digit-char-p                                                     [Function]</a></li>
+<li><a href="graphic_002dchar_002dp.html">graphic-char-p                                                   [Function]</a></li>
+<li><a href="standard_002dchar_002dp.html">standard-char-p                                                  [Function]</a></li>
+<li><a href="char_002dupcase.html">char-upcase, char-downcase                                       [Function]</a></li>
+<li><a href="upper_002dcase_002dp.html">upper-case-p, lower-case-p, both-case-p                          [Function]</a></li>
+<li><a href="char_002dcode.html">char-code                                                        [Function]</a></li>
+<li><a href="char_002dint.html">char-int                                                         [Function]</a></li>
+<li><a href="code_002dchar.html">code-char                                                        [Function]</a></li>
+<li><a href="char_002dcode_002dlimit.html">char-code-limit                                         [Constant Variable]</a></li>
+<li><a href="char_002dname.html">char-name                                                        [Function]</a></li>
+<li><a href="name_002dchar.html">name-char                                                        [Function]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Characters-With-Case.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Characters With Case (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Characters With Case (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Characters With Case (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Categories.html" rel="up" title="Character Categories">
+<link href="Uppercase-Characters.html" rel="next" title="Uppercase Characters">
+<link href="Alphabetic-Characters.html" rel="prev" title="Alphabetic Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Characters-With-Case">
+<div class="nav-panel">
+<p>
+Next: <a href="Uppercase-Characters.html" accesskey="n" rel="next">Uppercase Characters</a>, Previous: <a href="Alphabetic-Characters.html" accesskey="p" rel="prev">Alphabetic Characters</a>, Up: <a href="Character-Categories.html" accesskey="u" rel="up">Character Categories</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Characters-With-Case-1"><span>13.1.4.3 Characters With Case<a class="copiable-link" href="#Characters-With-Case-1"> &para;</a></span></h4>
+
+<p>The <i class="i">characters</i> with <i class="i">case</i> are 
+a subset of the <i class="i">alphabetic</i>_1 <i class="i">characters</i>.
+A <i class="i">character</i> with <i class="i">case</i> has the property of being either
+<i class="i">uppercase</i> or <i class="i">lowercase</i>.
+Every <i class="i">character</i> with <i class="i">case</i> is in one-to-one correspondence
+with some other <i class="i">character</i> with the opposite <i class="i">case</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Characters.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Conses.html" rel="next" title="Conses">
+<link href="Numbers-_0028Numbers_0029.html" rel="prev" title="Numbers (Numbers)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Conses.html" accesskey="n" rel="next">Conses</a>, Previous: <a href="Numbers-_0028Numbers_0029.html" accesskey="p" rel="prev">Numbers</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Characters-1"><span>13 Characters<a class="copiable-link" href="#Characters-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Character-Concepts.html" accesskey="1">Character Concepts</a></li>
+<li><a href="Characters-Dictionary.html" accesskey="2">Characters Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Classes.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Classes (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Classes (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Classes (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes.html" rel="up" title="Types and Classes">
+<link href="Types-and-Classes-Dictionary.html" rel="next" title="Types and Classes Dictionary">
+<link href="Types.html" rel="prev" title="Types">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Classes">
+<div class="nav-panel">
+<p>
+Next: <a href="Types-and-Classes-Dictionary.html" accesskey="n" rel="next">Types and Classes Dictionary</a>, Previous: <a href="Types.html" accesskey="p" rel="prev">Types</a>, Up: <a href="Types-and-Classes.html" accesskey="u" rel="up">Types and Classes</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Classes-1"><span>4.3 Classes<a class="copiable-link" href="#Classes-1"> &para;</a></span></h3>
+
+
+<p>While the object system is general enough to describe all <i class="i">standardized</i> <i class="i">classes</i>
+(including, for example, <b class="b">number</b>, <b class="b">hash-table</b>, and
+<b class="b">symbol</b>), Figure 4&ndash;7 contains a list of <i class="i">classes</i> that are
+especially relevant to understanding the object system.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  built-in-class    method-combination         standard-object   <!-- /@w -->
+  class             standard-class             structure-class   <!-- /@w -->
+  generic-function  standard-generic-function  structure-object  <!-- /@w -->
+  method            standard-method                              <!-- /@w -->
+
+                Figure 4&ndash;7: Object System Classes               <!-- /@w -->
+
+</pre></div></div>
+
+
+<ul class="mini-toc">
+<li><a href="Introduction-to-Classes.html" accesskey="1">Introduction to Classes</a></li>
+<li><a href="Defining-Classes.html" accesskey="2">Defining Classes</a></li>
+<li><a href="Creating-Instances-of-Classes.html" accesskey="3">Creating Instances of Classes</a></li>
+<li><a href="Inheritance.html" accesskey="4">Inheritance</a></li>
+<li><a href="Determining-the-Class-Precedence-List.html" accesskey="5">Determining the Class Precedence List</a></li>
+<li><a href="Redefining-Classes.html" accesskey="6">Redefining Classes</a></li>
+<li><a href="Integrating-Types-and-Classes.html" accesskey="7">Integrating Types and Classes</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Closures-and-Lexical-Binding.html
@@ -0,0 +1,164 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Closures and Lexical Binding (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Closures and Lexical Binding (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Closures and Lexical Binding (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation.html" rel="up" title="Evaluation">
+<link href="Shadowing.html" rel="next" title="Shadowing">
+<link href="Lambda-Expressions.html" rel="prev" title="Lambda Expressions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Closures-and-Lexical-Binding">
+<div class="nav-panel">
+<p>
+Next: <a href="Shadowing.html" accesskey="n" rel="next">Shadowing</a>, Previous: <a href="Lambda-Expressions.html" accesskey="p" rel="prev">Lambda Expressions</a>, Up: <a href="Evaluation.html" accesskey="u" rel="up">Evaluation</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Closures-and-Lexical-Binding-1"><span>3.1.4 Closures and Lexical Binding<a class="copiable-link" href="#Closures-and-Lexical-Binding-1"> &para;</a></span></h4>
+
+<p>A <i class="i">lexical closure</i> is a <i class="i">function</i> that can refer to and alter
+the values of <i class="i">lexical bindings</i> <i class="i">established</i> by <i class="i">binding</i> <i class="i">forms</i>
+that textually include the function definition.
+</p>
+<p>Consider this code, where <code class="t">x</code> is not declared <b class="b">special</b>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun two-funs (x)
+   (list (function (lambda () x))
+         (function (lambda (y) (setq x y)))))
+ (setq funs (two-funs 6))
+ (funcall (car funs)) &rArr;  6
+ (funcall (cadr funs) 43) &rArr;  43
+ (funcall (car funs)) &rArr;  43
+</pre></div>
+
+<p>The <b class="b">function</b> <i class="i">special form</i> coerces a 
+<i class="i">lambda expression</i> into a <i class="i">closure</i> in which the 
+<i class="i">lexical environment</i> in effect when the <i class="i">special form</i> is
+evaluated is captured along with the <i class="i">lambda expression</i>.
+</p>
+<p>The function <code class="t">two-funs</code> returns a <i class="i">list</i> of two 
+<i class="i">functions</i>, each of which refers to the <i class="i">binding</i> of the
+variable <code class="t">x</code> created on entry to the function <code class="t">two-funs</code> when it
+was called.
+This variable has the value <code class="t">6</code>
+initially, but <b class="b">setq</b> can alter this <i class="i">binding</i>.
+The <i class="i">lexical closure</i> created for the first 
+<i class="i">lambda expression</i> does not &ldquo;snapshot&rdquo; the <i class="i">value</i> <code class="t">6</code> for <code class="t">x</code>
+when the <i class="i">closure</i> is created; rather it captures the <i class="i">binding</i> of <code class="t">x</code>.
+The second <i class="i">function</i> can be used to alter the <i class="i">value</i> in the same (captured)
+<i class="i">binding</i> (to <code class="t">43</code>, in the example), and
+this altered variable binding then affects the value returned by the first <i class="i">function</i>.
+</p>
+<p>In situations where a <i class="i">closure</i> of a 
+<i class="i">lambda expression</i> over the same set of <i class="i">bindings</i> may be
+produced more than once, the various resulting <i class="i">closures</i> may
+or may not be <i class="i">identical</i>, at the discretion of the <i class="i">implementation</i>.
+That is, two <i class="i">functions</i> that are behaviorally
+indistinguishable might or might not be <i class="i">identical</i>.
+Two <i class="i">functions</i> that are behaviorally distinguishable are <i class="i">distinct</i>.
+For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((x 5) (funs '()))
+   (dotimes (j 10)                          
+     (push #'(lambda (z)                        
+               (if (null z) (setq x 0) (+ x z)))
+           funs))
+   funs)
+</pre></div>
+
+<p>The result of the above <i class="i">form</i> is a <i class="i">list</i> of ten <i class="i">closures</i>.
+Each requires only the <i class="i">binding</i> of <code class="t">x</code>.
+It is the same <i class="i">binding</i> in each case, 
+but the ten <i class="i">closure</i> <i class="i">objects</i> might or might not be <i class="i">identical</i>.
+On the other hand, the result of the <i class="i">form</i>
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((funs '()))     
+   (dotimes (j 10)
+     (let ((x 5))
+       (push (function (lambda (z)
+                        (if (null z) (setq x 0) (+ x z))))
+             funs)))
+  funs)
+</pre></div>
+
+<p>is also a <i class="i">list</i> of ten <i class="i">closures</i>.
+However, in this case no two of the <i class="i">closure</i> <i class="i">objects</i> can
+be <i class="i">identical</i> because each <i class="i">closure</i> is closed over a distinct
+<i class="i">binding</i> of <code class="t">x</code>, and these <i class="i">bindings</i> can be behaviorally
+distinguished because of the use of <b class="b">setq</b>.
+</p>
+<p>The result of the <i class="i">form</i>
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((funs '()))
+   (dotimes (j 10)
+     (let ((x 5))
+       (push (function (lambda (z) (+ x z)))
+            funs)))
+   funs)
+</pre></div>
+
+<p>is a <i class="i">list</i> of ten <i class="i">closure</i> <i class="i">objects</i> that
+might or might not be <i class="i">identical</i>.
+A different <i class="i">binding</i> of <code class="t">x</code> is involved for
+each <i class="i">closure</i>, but the <i class="i">bindings</i> cannot be distinguished
+because their values are the <i class="i">same</i> and immutable (there being no occurrence
+of <b class="b">setq</b> on <code class="t">x</code>).  A compiler could internally
+transform the <i class="i">form</i> to
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((funs '()))
+   (dotimes (j 10)
+     (push (function (lambda (z) (+ 5 z)))
+           funs))
+  funs)
+</pre></div>
+
+<p>where the <i class="i">closures</i> may be <i class="i">identical</i>.
+</p>
+<p>It is possible that a <i class="i">closure</i> does not
+close over any variable bindings.
+In the code fragment
+</p>
+<div class="example">
+<pre class="example-preformatted"> (mapcar (function (lambda (x) (+ x 2))) y)
+</pre></div>
+
+<p>the function <code class="t">(lambda (x) (+ x 2))</code> contains no references to any outside
+object. In this case, the same <i class="i">closure</i> might be returned
+for all evaluations of the <b class="b">function</b> <i class="i">form</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Shadowing.html">Shadowing</a>, Previous: <a href="Lambda-Expressions.html">Lambda Expressions</a>, Up: <a href="Evaluation.html">Evaluation</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Coercion-of-Streams-to-Pathnames.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Coercion of Streams to Pathnames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Coercion of Streams to Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Coercion of Streams to Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="File-System-Concepts.html" rel="up" title="File System Concepts">
+<link href="File-Operations-on-Open-and-Closed-Streams.html" rel="next" title="File Operations on Open and Closed Streams">
+<link href="File-System-Concepts.html" rel="prev" title="File System Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Coercion-of-Streams-to-Pathnames">
+<div class="nav-panel">
+<p>
+Next: <a href="File-Operations-on-Open-and-Closed-Streams.html" accesskey="n" rel="next">File Operations on Open and Closed Streams</a>, Previous: <a href="File-System-Concepts.html" accesskey="p" rel="prev">File System Concepts</a>, Up: <a href="File-System-Concepts.html" accesskey="u" rel="up">File System Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Coercion-of-Streams-to-Pathnames-1"><span>20.1.1 Coercion of Streams to Pathnames<a class="copiable-link" href="#Coercion-of-Streams-to-Pathnames-1"> &para;</a></span></h4>
+
+<p>A <i class="i">stream associated with a file</i>
+<a class="index-entry-id" id="index-stream-associated-with-a-file"></a>
+ is either a <i class="i">file stream</i>
+or a <i class="i">synonym stream</i> whose target is a <i class="i">stream associated with a file</i>
+<a class="index-entry-id" id="index-stream-associated-with-a-file-1"></a>
+.
+Such streams can be used as <i class="i">pathname designators</i>.
+</p>
+<p>Normally, when a <i class="i">stream associated with a file</i> is used as a
+<i class="i">pathname designator</i>, it denotes the <i class="i">pathname</i> used to 
+open the <i class="i">file</i>; this may be, but is not required to be, the
+actual name of the <i class="i">file</i>.
+</p>
+<p>Some functions, such as <b class="b">truename</b> and <b class="b">delete-file</b>,
+coerce <i class="i">streams</i> to <i class="i">pathnames</i> in a different way that 
+involves referring to the actual <i class="i">file</i> that is open, which might
+or might not be the file whose name was opened originally.  Such special
+situations are always notated specifically and are not the default.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Comma.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Comma (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Comma (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Comma (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standard-Macro-Characters.html" rel="up" title="Standard Macro Characters">
+<link href="Sharpsign.html" rel="next" title="Sharpsign">
+<link href="Backquote.html" rel="prev" title="Backquote">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Comma">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign.html" accesskey="n" rel="next">Sharpsign</a>, Previous: <a href="Backquote.html" accesskey="p" rel="prev">Backquote</a>, Up: <a href="Standard-Macro-Characters.html" accesskey="u" rel="up">Standard Macro Characters</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Comma-1"><span>2.4.7 Comma<a class="copiable-link" href="#Comma-1"> &para;</a></span></h4>
+
+<p>The <i class="i">comma</i> is part of the backquote syntax; see <a class="ref" href="Backquote.html">Backquote</a>.
+<i class="i">Comma</i> is invalid if used other than inside the body of a 
+backquote <i class="i">expression</i> as described above.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Common-Case-in-Pathname-Components.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Common Case in Pathname Components (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Common Case in Pathname Components (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Common Case in Pathname Components (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Special-Pathname-Component-Values.html" rel="next" title="Special Pathname Component Values">
+<link href="Local-Case-in-Pathname-Components.html" rel="prev" title="Local Case in Pathname Components">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Common-Case-in-Pathname-Components">
+<div class="nav-panel">
+<p>
+Next: <a href="Special-Pathname-Component-Values.html" accesskey="n" rel="next">Special Pathname Component Values</a>, Previous: <a href="Local-Case-in-Pathname-Components.html" accesskey="p" rel="prev">Local Case in Pathname Components</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Common-Case-in-Pathname-Components-1"><span>19.2.2.5 Common Case in Pathname Components<a class="copiable-link" href="#Common-Case-in-Pathname-Components-1"> &para;</a></span></h4>
+
+<p>For the functions in <i class="i">Figure~19&ndash;2</i>,
+a value of <code class="t">:common</code>
+ for the <code class="t">:case</code> argument 
+that these <i class="i">functions</i> should receive 
+and yield <i class="i">strings</i> in component values according to the following conventions:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>All <i class="i">uppercase</i> means to use a file system&rsquo;s customary <i class="i">case</i>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>All <i class="i">lowercase</i> means to use the opposite of the customary <i class="i">case</i>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Mixed <i class="i">case</i> represents itself.
+</p></dd>
+</dl>
+
+<p>Note that these conventions have been chosen in such a way that translation
+from <code class="t">:local</code> to <code class="t">:common</code> and back to <code class="t">:local</code> is information-preserving.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Compilation-Semantics.html
@@ -0,0 +1,59 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Compilation Semantics (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Compilation Semantics (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Compilation Semantics (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Compilation.html" rel="up" title="Compilation">
+<link href="File-Compilation.html" rel="next" title="File Compilation">
+<link href="Compiler-Terminology.html" rel="prev" title="Compiler Terminology">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Compilation-Semantics">
+<div class="nav-panel">
+<p>
+Next: <a href="File-Compilation.html" accesskey="n" rel="next">File Compilation</a>, Previous: <a href="Compiler-Terminology.html" accesskey="p" rel="prev">Compiler Terminology</a>, Up: <a href="Compilation.html" accesskey="u" rel="up">Compilation</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Compilation-Semantics-1"><span>3.2.2 Compilation Semantics<a class="copiable-link" href="#Compilation-Semantics-1"> &para;</a></span></h4>
+
+<p>Conceptually, compilation is a process that traverses code, performs
+certain kinds of syntactic and semantic analyses using information
+(such as proclamations and <i class="i">macro</i> definitions) present in the
+<i class="i">compilation environment</i>, and produces equivalent, possibly
+more efficient code.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Compiler-Macros.html" accesskey="1">Compiler Macros</a></li>
+<li><a href="Purpose-of-Compiler-Macros.html" accesskey="2">Purpose of Compiler Macros</a></li>
+<li><a href="Naming-of-Compiler-Macros.html" accesskey="3">Naming of Compiler Macros</a></li>
+<li><a href="When-Compiler-Macros-Are-Used.html" accesskey="4">When Compiler Macros Are Used</a></li>
+<li><a href="Notes-about-the-Implementation-of-Compiler-Macros.html" accesskey="5">Notes about the Implementation of Compiler Macros</a></li>
+<li><a href="Minimal-Compilation.html" accesskey="6">Minimal Compilation</a></li>
+<li><a href="Semantic-Constraints.html" accesskey="7">Semantic Constraints</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Compilation.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Compilation (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Compilation (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Compilation (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation.html" rel="up" title="Evaluation and Compilation">
+<link href="Declarations.html" rel="next" title="Declarations">
+<link href="Evaluation.html" rel="prev" title="Evaluation">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Compilation">
+<div class="nav-panel">
+<p>
+Next: <a href="Declarations.html" accesskey="n" rel="next">Declarations</a>, Previous: <a href="Evaluation.html" accesskey="p" rel="prev">Evaluation</a>, Up: <a href="Evaluation-and-Compilation.html" accesskey="u" rel="up">Evaluation and Compilation</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Compilation-1"><span>3.2 Compilation<a class="copiable-link" href="#Compilation-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Compiler-Terminology.html" accesskey="1">Compiler Terminology</a></li>
+<li><a href="Compilation-Semantics.html" accesskey="2">Compilation Semantics</a></li>
+<li><a href="File-Compilation.html" accesskey="3">File Compilation</a></li>
+<li><a href="Literal-Objects-in-Compiled-Files.html" accesskey="4">Literal Objects in Compiled Files</a></li>
+<li><a href="Exceptional-Situations-in-the-Compiler.html" accesskey="5">Exceptional Situations in the Compiler</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Compiler-Macros.html
@@ -0,0 +1,85 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Compiler Macros (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Compiler Macros (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Compiler Macros (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Compilation-Semantics.html" rel="up" title="Compilation Semantics">
+<link href="Purpose-of-Compiler-Macros.html" rel="next" title="Purpose of Compiler Macros">
+<link href="Compilation-Semantics.html" rel="prev" title="Compilation Semantics">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Compiler-Macros">
+<div class="nav-panel">
+<p>
+Next: <a href="Purpose-of-Compiler-Macros.html" accesskey="n" rel="next">Purpose of Compiler Macros</a>, Previous: <a href="Compilation-Semantics.html" accesskey="p" rel="prev">Compilation Semantics</a>, Up: <a href="Compilation-Semantics.html" accesskey="u" rel="up">Compilation Semantics</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Compiler-Macros-1"><span>3.2.2.1 Compiler Macros<a class="copiable-link" href="#Compiler-Macros-1"> &para;</a></span></h4>
+
+<p>A <i class="i">compiler macro</i> can be defined for a <i class="i">name</i>
+that also names a <i class="i">function</i> or <i class="i">macro</i>.
+That is, it is possible for a
+<i class="i">function name</i> to name both a <i class="i">function</i> and a <i class="i">compiler macro</i>.
+</p>
+<p>A <i class="i">function name</i> names a <i class="i">compiler macro</i> if <b class="b">compiler-macro-function</b>
+is <i class="i">true</i> of the <i class="i">function name</i> in the <i class="i">lexical environment</i> in which
+it appears.  Creating a <i class="i">lexical binding</i> for the <i class="i">function name</i>
+not only creates a new local <i class="i">function</i> or
+<i class="i">macro</i> definition, but also <i class="i">shadows</i>_2 the <i class="i">compiler macro</i>.
+</p>
+<p>The <i class="i">function</i> returned by <b class="b">compiler-macro-function</b>
+is a <i class="i">function</i> of two arguments, called the
+expansion function.  To expand a <i class="i">compiler macro</i>,
+the expansion function is invoked by calling the <i class="i">macroexpand hook</i> with
+      the expansion function as its first argument,
+      the entire compiler macro <i class="i">form</i> as its second argument,
+  and the current compilation <i class="i">environment</i> 
+       (or with the current lexical <i class="i">environment</i>,
+ 	 if the <i class="i">form</i> is being processed by something
+	 other than <b class="b">compile-file</b>) 
+       as its third argument.
+The <i class="i">macroexpand hook</i>, in turn, calls the expansion function with the
+<i class="i">form</i> as its first argument and the <i class="i">environment</i> as its second argument.
+The return value from the expansion function, which is passed through
+by the <i class="i">macroexpand hook</i>, might either be the <i class="i">same</i> <i class="i">form</i>, 
+or else a form that can, at the discretion of the <i class="i">code</i> doing the expansion, 
+be used in place of the original <i class="i">form</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  *macroexpand-hook*  compiler-macro-function  define-compiler-macro  <!-- /@w -->
+
+        Figure 3&ndash;6: Defined names applicable to compiler macros      <!-- /@w -->
+
+</pre></div></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Purpose-of-Compiler-Macros.html">Purpose of Compiler Macros</a>, Previous: <a href="Compilation-Semantics.html">Compilation Semantics</a>, Up: <a href="Compilation-Semantics.html">Compilation Semantics</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Compiler-Terminology.html
@@ -0,0 +1,193 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Compiler Terminology (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Compiler Terminology (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Compiler Terminology (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Compilation.html" rel="up" title="Compilation">
+<link href="Compilation-Semantics.html" rel="next" title="Compilation Semantics">
+<link href="Compilation.html" rel="prev" title="Compilation">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Compiler-Terminology">
+<div class="nav-panel">
+<p>
+Next: <a href="Compilation-Semantics.html" accesskey="n" rel="next">Compilation Semantics</a>, Previous: <a href="Compilation.html" accesskey="p" rel="prev">Compilation</a>, Up: <a href="Compilation.html" accesskey="u" rel="up">Compilation</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Compiler-Terminology-1"><span>3.2.1 Compiler Terminology<a class="copiable-link" href="#Compiler-Terminology-1"> &para;</a></span></h4>
+
+<p>The following terminology is used in this section.
+</p>
+<p>The <i class="i">compiler</i>
+<a class="index-entry-id" id="index-compiler"></a>
+ is a utility that translates code into an
+<i class="i">implementation-dependent</i> form that might be represented or
+executed efficiently.
+The term <i class="i">compiler</i>
+<a class="index-entry-id" id="index-compiler-1"></a>
+ refers to both of the <i class="i">functions</i>
+<b class="b">compile</b> and <b class="b">compile-file</b>.
+</p>
+<p>The term <i class="i">compiled code</i>
+<a class="index-entry-id" id="index-compiled-code"></a>
+ refers to 
+<i class="i">objects</i> representing compiled programs, such as <i class="i">objects</i> constructed
+by <b class="b">compile</b> or by <b class="b">load</b> when <i class="i">loading</i> a <i class="i">compiled file</i>.
+</p>
+<p>The term <i class="i">implicit compilation</i>
+<a class="index-entry-id" id="index-implicit-compilation"></a>
+ refers to <i class="i">compilation</i>
+performed during <i class="i">evaluation</i>.
+</p>
+<p>The term <i class="i">literal object</i>
+<a class="index-entry-id" id="index-literal-object"></a>
+ refers to 
+     a quoted <i class="i">object</i> 
+  or a <i class="i">self-evaluating object</i> 
+  or an <i class="i">object</i> that is a substructure of such an <i class="i">object</i>.
+A <i class="i">constant variable</i> is not itself a <i class="i">literal object</i>.
+</p>
+<p>The term <i class="i">coalesce</i>
+<a class="index-entry-id" id="index-coalesce"></a>
+ is defined as follows.
+Suppose <code class="t">A</code> and <code class="t">B</code> are two <i class="i">literal constants</i> in the <i class="i">source code</i>,
+and that <code class="t">A'</code> and <code class="t">B'</code> are the corresponding <i class="i">objects</i> in the <i class="i">compiled code</i>.
+If <code class="t">A'</code> and <code class="t">B'</code> are <b class="b">eql</b> but
+<code class="t">A</code> and <code class="t">B</code> are not <b class="b">eql</b>, then it is said
+that <code class="t">A</code> and <code class="t">B</code> have been coalesced by the compiler.
+</p>
+<p>The term <i class="i">minimal compilation</i>
+<a class="index-entry-id" id="index-minimal-compilation"></a>
+ refers to actions the compiler
+must take at <i class="i">compile time</i>. These actions are specified in 
+<a class="ref" href="Compilation-Semantics.html">Compilation Semantics</a>.
+</p>
+<p>The verb <i class="i">process</i>
+<a class="index-entry-id" id="index-process"></a>
+ refers to performing <i class="i">minimal compilation</i>,
+determining the time of evaluation for a <i class="i">form</i>,
+and possibly <i class="i">evaluating</i> that <i class="i">form</i> (if required).
+</p>
+<p>The term <i class="i">further compilation</i>
+<a class="index-entry-id" id="index-further-compilation"></a>
+ refers to
+<i class="i">implementation-dependent</i> compilation beyond <i class="i">minimal compilation</i>.
+That is, <i class="i">processing</i> does not imply complete compilation.
+Block compilation and generation of machine-specific instructions are 
+examples of further compilation.
+Further compilation is permitted to take place at <i class="i">run time</i>.
+</p>
+<p>Four different <i class="i">environments</i> relevant to compilation are
+distinguished:
+  the <i class="i">startup environment</i>,
+  the <i class="i">compilation environment</i>,
+  the <i class="i">evaluation environment</i>, and
+  the <i class="i">run-time environment</i>.
+</p>
+<p>The <i class="i">startup environment</i>
+<a class="index-entry-id" id="index-startup-environment"></a>
+ is
+the <i class="i">environment</i> of the <i class="i">Lisp image</i> 
+from which the <i class="i">compiler</i> was invoked.
+</p>
+<p>The <i class="i">compilation environment</i>
+<a class="index-entry-id" id="index-compilation-environment"></a>
+ is maintained by the compiler
+and is used to hold definitions and declarations to be used internally
+by the compiler.  Only those parts of a definition needed for correct
+compilation are saved. The <i class="i">compilation environment</i> is used
+as the <i class="i">environment</i> <i class="i">argument</i> to macro expanders called by
+the compiler. It is unspecified whether a definition available in the
+<i class="i">compilation environment</i> can be used in an <i class="i">evaluation</i>
+initiated in the <i class="i">startup environment</i> or <i class="i">evaluation environment</i>.
+</p>
+<p>The <i class="i">evaluation environment</i>
+<a class="index-entry-id" id="index-evaluation-environment"></a>
+ is a <i class="i">run-time environment</i>
+in which macro expanders and code specified by <b class="b">eval-when</b>
+to be evaluated are evaluated.  All evaluations initiated by the
+<i class="i">compiler</i> take place in the <i class="i">evaluation environment</i>.
+</p>
+<p>The <i class="i">run-time environment</i>
+<a class="index-entry-id" id="index-run_002dtime-environment"></a>
+ is the 
+<i class="i">environment</i> in which the program being compiled will be executed.
+</p>
+<p>The <i class="i">compilation environment</i> inherits from
+the <i class="i">evaluation environment</i>,
+and the <i class="i">compilation environment</i> and <i class="i">evaluation environment</i> 
+might be <i class="i">identical</i>.
+The <i class="i">evaluation environment</i> inherits from
+the <i class="i">startup environment</i>, 
+and the <i class="i">startup environment</i> and <i class="i">evaluation environment</i> 
+might be <i class="i">identical</i>.
+</p>
+<p>The term <i class="i">compile time</i>
+<a class="index-entry-id" id="index-compile-time"></a>
+ refers to the duration of time that
+the compiler is processing <i class="i">source code</i>.
+At <i class="i">compile time</i>,
+only the <i class="i">compilation environment</i> 
+and  the <i class="i">evaluation environment</i>
+are available.
+</p>
+<p>The term <i class="i">compile-time definition</i>
+<a class="index-entry-id" id="index-compile_002dtime-definition"></a>
+ refers to a definition in
+the <i class="i">compilation environment</i>.
+For example, when compiling a file, 
+the definition of a function might be retained in the <i class="i">compilation environment</i> 
+if it is declared <b class="b">inline</b>. 
+This definition might not be available in the <i class="i">evaluation environment</i>.
+</p>
+<p>The term <i class="i">run time</i>
+<a class="index-entry-id" id="index-run-time"></a>
+ refers to the duration of time that the
+loader is loading compiled code or compiled code is being executed.
+At run time, only the <i class="i">run-time environment</i> is available.
+</p>
+<p>The term <i class="i">run-time definition</i>
+<a class="index-entry-id" id="index-run_002dtime-definition"></a>
+ refers to a definition in the
+<i class="i">run-time environment</i>.
+</p>
+<p>The term <i class="i">run-time compiler</i>
+<a class="index-entry-id" id="index-run_002dtime-compiler"></a>
+ refers to the <i class="i">function</i> <b class="b">compile</b>
+or <i class="i">implicit compilation</i>, for which the compilation and run-time 
+<i class="i">environments</i> are maintained in the same <i class="i">Lisp image</i>.
+Note that when the <i class="i">run-time compiler</i> is used,
+the <i class="i">run-time environment</i> 
+and <i class="i">startup environment</i> 
+are the same.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Compilation-Semantics.html">Compilation Semantics</a>, Previous: <a href="Compilation.html">Compilation</a>, Up: <a href="Compilation.html">Compilation</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Compiling-Format-Strings.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Compiling Format Strings (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Compiling Format Strings (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Compiling Format Strings (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Pretty-Printer-Concepts.html" rel="up" title="Pretty Printer Concepts">
+<link href="Pretty-Print-Dispatch-Tables.html" rel="next" title="Pretty Print Dispatch Tables">
+<link href="Format-Directive-Interface.html" rel="prev" title="Format Directive Interface">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Compiling-Format-Strings">
+<div class="nav-panel">
+<p>
+Next: <a href="Pretty-Print-Dispatch-Tables.html" accesskey="n" rel="next">Pretty Print Dispatch Tables</a>, Previous: <a href="Format-Directive-Interface.html" accesskey="p" rel="prev">Format Directive Interface</a>, Up: <a href="Pretty-Printer-Concepts.html" accesskey="u" rel="up">Pretty Printer Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Compiling-Format-Strings-1"><span>22.2.1.3 Compiling Format Strings<a class="copiable-link" href="#Compiling-Format-Strings-1"> &para;</a></span></h4>
+
+<p>A <i class="i">format string</i> is essentially a program in a special-purpose language
+that performs printing, and that is interpreted by the <i class="i">function</i> <b class="b">format</b>.
+The <b class="b">formatter</b> <i class="i">macro</i> provides the efficiency of using a <i class="i">compiled function</i> 
+to do that same printing but without losing the textual compactness of <i class="i">format strings</i>.
+</p>
+<p>A <i class="i">format control</i>
+<a class="index-entry-id" id="index-format-control"></a>
+ is either a <i class="i">format string</i> or a <i class="i">function</i>
+that was returned by the the <b class="b">formatter</b> <i class="i">macro</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Complex-Computations.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Complex Computations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Complex Computations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Complex Computations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Number-Concepts.html" rel="up" title="Number Concepts">
+<link href="Interval-Designators.html" rel="next" title="Interval Designators">
+<link href="Floating_002dpoint-Computations.html" rel="prev" title="Floating-point Computations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Complex-Computations">
+<div class="nav-panel">
+<p>
+Next: <a href="Interval-Designators.html" accesskey="n" rel="next">Interval Designators</a>, Previous: <a href="Floating_002dpoint-Computations.html" accesskey="p" rel="prev">Floating-point Computations</a>, Up: <a href="Number-Concepts.html" accesskey="u" rel="up">Number Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Complex-Computations-1"><span>12.1.5 Complex Computations<a class="copiable-link" href="#Complex-Computations-1"> &para;</a></span></h4>
+
+<p>The following rules apply to <i class="i">complex</i> computations:
+</p>
+
+<ul class="mini-toc">
+<li><a href="Rule-of-Complex-Substitutability.html" accesskey="1">Rule of Complex Substitutability</a></li>
+<li><a href="Rule-of-Complex-Contagion.html" accesskey="2">Rule of Complex Contagion</a></li>
+<li><a href="Rule-of-Canonical-Representation-for-Complex-Rationals.html" accesskey="3">Rule of Canonical Representation for Complex Rationals</a></li>
+<li><a href="Examples-of-Rule-of-Canonical-Representation-for-Complex-Rationals.html" accesskey="4">Examples of Rule of Canonical Representation for Complex Rationals</a></li>
+<li><a href="Principal-Values-and-Branch-Cuts.html" accesskey="5">Principal Values and Branch Cuts</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Condition-Designators.html
@@ -0,0 +1,109 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Condition Designators (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Condition Designators (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Condition Designators (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Creating-Conditions.html" rel="up" title="Creating Conditions">
+<link href="Creating-Conditions.html" rel="prev" title="Creating Conditions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Condition-Designators">
+<div class="nav-panel">
+<p>
+Previous: <a href="Creating-Conditions.html" accesskey="p" rel="prev">Creating Conditions</a>, Up: <a href="Creating-Conditions.html" accesskey="u" rel="up">Creating Conditions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Condition-Designators-1"><span>9.1.2.1 Condition Designators<a class="copiable-link" href="#Condition-Designators-1"> &para;</a></span></h4>
+
+<p>A number of the functions in the condition system take arguments which
+are identified as <i class="i">condition designators</i>
+<a class="index-entry-id" id="index-condition-designator"></a>
+.
+By convention, those arguments are notated as
+</p>
+<p><i class="i">datum</i> <span class="r">&amp;rest</span> <i class="i">arguments</i>
+</p>
+<p>Taken together, the <i class="i">datum</i> and the <i class="i">arguments</i> are 
+&ldquo;<i class="i">designators</i> for a <i class="i">condition</i> of default type <i class="i">default-type</i>.&rdquo;
+How the denoted <i class="i">condition</i> is computed depends on the type of the <i class="i">datum</i>:
+</p>
+<dl class="table">
+<dt><code class="t">*</code> If the <i class="i">datum</i> is a <i class="i">symbol</i></dt>
+<dd><p>naming a <i class="i">condition</i> <i class="i">type</i> ...  
+The denoted <i class="i">condition</i> is the result of
+</p>
+<div class="example">
+<pre class="example-preformatted"> (apply #'make-condition <i class="i">datum</i> <i class="i">arguments</i>)
+</pre></div>
+
+</dd>
+<dt><code class="t">*</code> If the <i class="i">datum</i> is a <i class="i">format control</i> ...</dt>
+<dd>
+<p>The denoted <i class="i">condition</i> is the result of 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (make-condition <i class="i">defaulted-type</i> 
+                 :format-control <i class="i">datum</i>
+                 :format-arguments <i class="i">arguments</i>)
+</pre></div>
+
+<p>where the <i class="i">defaulted-type</i> is a <i class="i">subtype</i> of <i class="i">default-type</i>.
+</p>
+</dd>
+<dt><code class="t">*</code> If the <i class="i">datum</i> is a <i class="i">condition</i> ...</dt>
+<dd><p>The denoted <i class="i">condition</i> is the <i class="i">datum</i> itself.
+In this case, unless otherwise specified by the description of the
+<i class="i">operator</i> in question, the <i class="i">arguments</i> must be <i class="i">null</i>;
+that is, the consequences are undefined if any <i class="i">arguments</i> were supplied. 
+</p>
+</dd>
+</dl>
+
+<p>Note that the <i class="i">default-type</i> gets used only in the case where
+the <i class="i">datum</i> <i class="i">string</i> is supplied.  In the other situations,
+the resulting condition is not necessarily of <i class="i">type</i> <i class="i">default-type</i>.
+</p>
+<p>Here are some illustrations of how different <i class="i">condition designators</i>
+can denote equivalent <i class="i">condition</i> <i class="i">objects</i>:
+</p>
+<div class="example">
+<pre class="example-preformatted">(let ((c (make-condition 'arithmetic-error :operator '/ :operands '(7 0))))
+  (error c))
+&equiv; (error 'arithmetic-error :operator '/ :operands '(7 0))
+
+(error &quot;Bad luck.&quot;)
+&equiv; (error 'simple-error :format-control &quot;Bad luck.&quot; :format-arguments '())
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Creating-Conditions.html">Creating Conditions</a>, Up: <a href="Creating-Conditions.html">Creating Conditions</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Condition-System-Concepts.html
@@ -0,0 +1,140 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Condition System Concepts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Condition System Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Condition System Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions.html" rel="up" title="Conditions">
+<link href="Conditions-Dictionary.html" rel="next" title="Conditions Dictionary">
+<link href="Conditions.html" rel="prev" title="Conditions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Condition-System-Concepts">
+<div class="nav-panel">
+<p>
+Next: <a href="Conditions-Dictionary.html" accesskey="n" rel="next">Conditions Dictionary</a>, Previous: <a href="Conditions.html" accesskey="p" rel="prev">Conditions</a>, Up: <a href="Conditions.html" accesskey="u" rel="up">Conditions</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Condition-System-Concepts-1"><span>9.1 Condition System Concepts<a class="copiable-link" href="#Condition-System-Concepts-1"> &para;</a></span></h3>
+
+
+<p>Common Lisp constructs are described not only in terms of their
+behavior in situations during which they are intended to be used (see
+the &ldquo;Description&rdquo; part of each <i class="i">operator</i> specification),
+but in all other situations (see the &ldquo;Exceptional Situations&rdquo;
+part of each <i class="i">operator</i> specification).
+</p>
+<p>A situation is the evaluation of an expression in a specific context.
+A <i class="i">condition</i> is an <i class="i">object</i> that
+represents a specific situation that has been detected.  
+<i class="i">Conditions</i> are <i class="i">generalized instances</i> of the <i class="i">class</i> <b class="b">condition</b>.
+A hierarchy of <i class="i">condition</i> classes is defined in <span class="r">Common Lisp</span>.  
+A <i class="i">condition</i> has <i class="i">slots</i> that contain data 
+relevant to the situation that the <i class="i">condition</i> represents.
+</p>
+<p>An error is a situation in which normal program execution cannot
+continue correctly without some form of intervention (either
+interactively by the user or under program control).  Not all errors
+are detected.  When an error goes undetected, the effects can be
+<i class="i">implementation-dependent</i>, <i class="i">implementation-defined</i>, unspecified, or
+undefined. See <a class="ref" href="Definitions.html">Definitions</a>.  All detected errors can
+be represented by <i class="i">conditions</i>, but not all 
+<i class="i">conditions</i> represent errors.
+</p>
+<p>Signaling is the process by which a <i class="i">condition</i> can alter
+the flow of control in a program by raising the 
+<i class="i">condition</i> which can then be <i class="i">handled</i>.  The functions
+<b class="b">error</b>, <b class="b">cerror</b>, <b class="b">signal</b>, and
+<b class="b">warn</b> are used to signal <i class="i">conditions</i>.
+</p>
+<p>The process of signaling involves the selection and invocation of a
+<i class="i">handler</i> from a set of <i class="i">active</i> <i class="i">handlers</i>.  
+A <i class="i">handler</i> is a <i class="i">function</i> of one argument (the 
+<i class="i">condition</i>) that is invoked to handle a <i class="i">condition</i>.
+Each <i class="i">handler</i> is associated with a <i class="i">condition</i> <i class="i">type</i>,
+and a <i class="i">handler</i> will be invoked only on a <i class="i">condition</i> of the
+<i class="i">handler</i>&rsquo;s associated <i class="i">type</i>.
+</p>
+<p><i class="i">Active</i> <i class="i">handlers</i> are <i class="i">established</i> dynamically
+(see <b class="b">handler-bind</b> or <b class="b">handler-case</b>).
+<i class="i">Handlers</i> are invoked in a <i class="i">dynamic environment</i> 
+equivalent to that of the signaler,
+except that the set of <i class="i">active</i> <i class="i">handlers</i> 
+is bound in such a way as to include only those that were <i class="i">active</i> 
+at the time the <i class="i">handler</i> being invoked was <i class="i">established</i>.
+Signaling a <i class="i">condition</i> has no side-effect on the <i class="i">condition</i>, 
+and there is no dynamic state contained in a <i class="i">condition</i>.
+</p>
+<p>If a <i class="i">handler</i> is invoked, it can address the <i class="i">situation</i> 
+in one of three ways:
+</p>
+<dl class="table">
+<dt><b class="b">Decline</b></dt>
+<dd><p>It can decline to <i class="i">handle</i> the <i class="i">condition</i>.  It does this by
+simply returning rather than transferring control.
+When this happens, any values returned by the handler are
+ignored and the next most recently established handler is invoked.
+If there is no such handler and the signaling function is <b class="b">error</b>
+or <b class="b">cerror</b>, the debugger is entered in the
+<i class="i">dynamic environment</i> of the signaler. If there is no such
+handler and the signaling function is either <b class="b">signal</b> or
+<b class="b">warn</b>, the signaling function simply returns~<b class="b">nil</b>.
+</p>
+</dd>
+<dt><b class="b">Handle</b></dt>
+<dd><p>It can <i class="i">handle</i> the <i class="i">condition</i> by performing a non-local
+transfer of control.  This can be done either primitively by using
+<b class="b">go</b>, <b class="b">return</b>, <b class="b">throw</b> or more
+abstractly by using a function such as <b class="b">abort</b> or
+<b class="b">invoke-restart</b>.
+</p>
+</dd>
+<dt><b class="b">Defer</b></dt>
+<dd><p>It can put off a decision about whether to <i class="i">handle</i> or <i class="i">decline</i>,
+by any of a number of actions, but most commonly by 
+    signaling another condition,
+    resignaling the same condition,
+ or forcing entry into the debugger.
+</p>
+</dd>
+</dl>
+
+
+<ul class="mini-toc">
+<li><a href="Condition-Types.html" accesskey="1">Condition Types</a></li>
+<li><a href="Creating-Conditions.html" accesskey="2">Creating Conditions</a></li>
+<li><a href="Printing-Conditions.html" accesskey="3">Printing Conditions</a></li>
+<li><a href="Signaling-and-Handling-Conditions.html" accesskey="4">Signaling and Handling Conditions</a></li>
+<li><a href="Assertions.html" accesskey="5">Assertions</a></li>
+<li><a href="Notes-about-the-Condition-System_0060s-Background.html" accesskey="6">Notes about the Condition System&lsquo;s Background</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Conditions-Dictionary.html">Conditions Dictionary</a>, Previous: <a href="Conditions.html">Conditions</a>, Up: <a href="Conditions.html">Conditions</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Condition-Types.html
@@ -0,0 +1,117 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Condition Types (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Condition Types (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Condition Types (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Condition-System-Concepts.html" rel="up" title="Condition System Concepts">
+<link href="Creating-Conditions.html" rel="next" title="Creating Conditions">
+<link href="Condition-System-Concepts.html" rel="prev" title="Condition System Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Condition-Types">
+<div class="nav-panel">
+<p>
+Next: <a href="Creating-Conditions.html" accesskey="n" rel="next">Creating Conditions</a>, Previous: <a href="Condition-System-Concepts.html" accesskey="p" rel="prev">Condition System Concepts</a>, Up: <a href="Condition-System-Concepts.html" accesskey="u" rel="up">Condition System Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Condition-Types-1"><span>9.1.1 Condition Types<a class="copiable-link" href="#Condition-Types-1"> &para;</a></span></h4>
+
+<p>Figure 9&ndash;1 lists the <i class="i">standardized</i> <i class="i">condition</i> <i class="i">types</i>.
+Additional <i class="i">condition</i> <i class="i">types</i> can be defined by using <b class="b">define-condition</b>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted"> arithmetic-error                 floating-point-overflow  simple-type-error  <!-- /@w -->
+ cell-error                       floating-point-underflow simple-warning     <!-- /@w -->
+ condition                        package-error            storage-condition  <!-- /@w -->
+ control-error                    parse-error              stream-error       <!-- /@w -->
+ division-by-zero                 print-not-readable       style-warning      <!-- /@w -->
+ end-of-file                      program-error            type-error         <!-- /@w -->
+ error                            reader-error             unbound-slot       <!-- /@w -->
+ file-error                       serious-condition        unbound-variable   <!-- /@w -->
+ floating-point-inexact           simple-condition         undefined-function <!-- /@w -->
+ floating-point-invalid-operation simple-error             warning            <!-- /@w -->
+
+                    Figure 9&ndash;1: Standardized Condition Types                  <!-- /@w -->
+
+</pre></div></div>
+
+<p>All <i class="i">condition</i> types are <i class="i">subtypes</i> of <i class="i">type</i> <b class="b">condition</b>.  That is,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (typep <i class="i">c</i> 'condition) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<p>if and only if <i class="i">c</i> is a <i class="i">condition</i>.
+</p>
+<p><i class="i">Implementations</i> must define all specified <i class="i">subtype</i> relationships.
+Except where noted, all <i class="i">subtype</i> relationships indicated in 
+this document are not mutually exclusive.
+A <i class="i">condition</i> inherits the structure of its <i class="i">supertypes</i>.
+</p>
+<p>The metaclass of the <i class="i">class</i> <b class="b">condition</b> is not specified.
+<i class="i">Names</i> of <i class="i">condition</i> <i class="i">types</i> may be used to specify
+<i class="i">supertype</i> relationships in <b class="b">define-condition</b>, 
+but the consequences are not specified if an attempt is made to use
+a <i class="i">condition</i> <i class="i">type</i> as a <i class="i">superclass</i> in a <b class="b">defclass</b> <i class="i">form</i>.
+</p>
+<p>Figure 9&ndash;2 shows <i class="i">operators</i> that
+define <i class="i">condition</i> <i class="i">types</i> and creating <i class="i">conditions</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  define-condition  make-condition    <!-- /@w -->
+
+  Figure 9&ndash;2: Operators that define and create conditions.<!-- /@w -->
+
+</pre></div></div>
+
+<p>Figure 9&ndash;3 shows <i class="i">operators</i> that <i class="i">read</i> 
+the <i class="i">value</i> of <i class="i">condition</i> <i class="i">slots</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  arithmetic-error-operands   simple-condition-format-arguments  <!-- /@w -->
+  arithmetic-error-operation  simple-condition-format-control    <!-- /@w -->
+  cell-error-name             stream-error-stream                <!-- /@w -->
+  file-error-pathname         type-error-datum                   <!-- /@w -->
+  package-error-package       type-error-expected-type           <!-- /@w -->
+  print-not-readable-object   unbound-slot-instance              <!-- /@w -->
+
+         Figure 9&ndash;3: Operators that read condition slots.       <!-- /@w -->
+
+</pre></div></div>
+
+
+<ul class="mini-toc">
+<li><a href="Serious-Conditions.html" accesskey="1">Serious Conditions</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Creating-Conditions.html">Creating Conditions</a>, Previous: <a href="Condition-System-Concepts.html">Condition System Concepts</a>, Up: <a href="Condition-System-Concepts.html">Condition System Concepts</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Conditional-Execution-Clauses.html
@@ -0,0 +1,88 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Conditional Execution Clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Conditional Execution Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Conditional Execution Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-LOOP-Facility.html" rel="up" title="The LOOP Facility">
+<link href="Miscellaneous-Clauses.html" rel="next" title="Miscellaneous Clauses">
+<link href="Unconditional-Execution-Clauses.html" rel="prev" title="Unconditional Execution Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Conditional-Execution-Clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Miscellaneous-Clauses.html" accesskey="n" rel="next">Miscellaneous Clauses</a>, Previous: <a href="Unconditional-Execution-Clauses.html" accesskey="p" rel="prev">Unconditional Execution Clauses</a>, Up: <a href="The-LOOP-Facility.html" accesskey="u" rel="up">The LOOP Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Conditional-Execution-Clauses-1"><span>6.1.6 Conditional Execution Clauses<a class="copiable-link" href="#Conditional-Execution-Clauses-1"> &para;</a></span></h4>
+
+<p>The <code class="t">if</code>, <code class="t">when</code>, and <code class="t">unless</code> constructs
+establish conditional control in a <b class="b">loop</b>. If the test
+passes, the succeeding loop clause is executed. If the test does
+not pass, the succeeding clause is skipped, and program control
+moves to the clause that follows the <i class="i">loop keyword</i>
+<code class="t">else</code>. If the test does not pass and no <code class="t">else</code>
+clause is supplied, control is transferred to the clause or
+construct following the entire conditional clause.
+</p>
+<p>If conditional clauses are nested, each <code class="t">else</code> is paired
+with the closest preceding conditional clause that has no
+associated <code class="t">else</code> or <code class="t">end</code>. 
+</p>
+<p>In the <code class="t">if</code> and <code class="t">when</code> clauses, which are
+synonymous, the test passes if the value of <i class="i">form</i> is
+<i class="i">true</i>.
+</p>
+<p>In the <code class="t">unless</code> clause,
+the test passes if the value of <i class="i">form</i> is <i class="i">false</i>.
+</p>
+<p>Clauses that follow the test expression can be grouped by using 
+the <i class="i">loop keyword</i> <code class="t">and</code> to produce a conditional block consisting of 
+a compound clause.
+</p>
+<p>The <i class="i">loop keyword</i> <code class="t">it</code> can be used to refer to the result
+of the test expression in a clause.
+Use the <i class="i">loop keyword</i> <code class="t">it</code> in place of the form in a
+<code class="t">return</code> clause or an <i class="i">accumulation</i> clause that is
+inside a conditional execution clause.
+If multiple clauses are connected with <code class="t">and</code>, the <code class="t">it</code>
+construct must be in the first clause in the block.
+</p>
+<p>The optional <i class="i">loop keyword</i> <code class="t">end</code> marks the end of the clause.  If this
+keyword is not supplied, the next <i class="i">loop keyword</i> marks the end.  The construct
+<code class="t">end</code> can be used to distinguish the scoping of compound clauses.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Examples-of-WHEN-clause.html" accesskey="1">Examples of WHEN clause</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Miscellaneous-Clauses.html">Miscellaneous Clauses</a>, Previous: <a href="Unconditional-Execution-Clauses.html">Unconditional Execution Clauses</a>, Up: <a href="The-LOOP-Facility.html">The LOOP Facility</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Conditions-Dictionary.html
@@ -0,0 +1,92 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Conditions Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Conditions Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Conditions Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions.html" rel="up" title="Conditions">
+<link href="Condition-System-Concepts.html" rel="prev" title="Condition System Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Conditions-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Condition-System-Concepts.html" accesskey="p" rel="prev">Condition System Concepts</a>, Up: <a href="Conditions.html" accesskey="u" rel="up">Conditions</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Conditions-Dictionary-1"><span>9.2 Conditions Dictionary<a class="copiable-link" href="#Conditions-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="condition.html" accesskey="1">condition                                                  [Condition Type]</a></li>
+<li><a href="warning.html" accesskey="2">warning                                                    [Condition Type]</a></li>
+<li><a href="style_002dwarning.html" accesskey="3">style-warning                                              [Condition Type]</a></li>
+<li><a href="serious_002dcondition.html" accesskey="4">serious-condition                                          [Condition Type]</a></li>
+<li><a href="error-_0028Condition-Type_0029.html" accesskey="5">error                                                      [Condition Type]</a></li>
+<li><a href="cell_002derror.html" accesskey="6">cell-error                                                 [Condition Type]</a></li>
+<li><a href="cell_002derror_002dname.html" accesskey="7">cell-error-name                                                  [Function]</a></li>
+<li><a href="parse_002derror.html" accesskey="8">parse-error                                                [Condition Type]</a></li>
+<li><a href="storage_002dcondition.html" accesskey="9">storage-condition                                          [Condition Type]</a></li>
+<li><a href="assert.html">assert                                                              [Macro]</a></li>
+<li><a href="error.html">error                                                            [Function]</a></li>
+<li><a href="cerror.html">cerror                                                           [Function]</a></li>
+<li><a href="check_002dtype.html">check-type                                                          [Macro]</a></li>
+<li><a href="simple_002derror.html">simple-error                                               [Condition Type]</a></li>
+<li><a href="invalid_002dmethod_002derror.html">invalid-method-error                                             [Function]</a></li>
+<li><a href="method_002dcombination_002derror.html">method-combination-error                                         [Function]</a></li>
+<li><a href="signal.html">signal                                                           [Function]</a></li>
+<li><a href="simple_002dcondition.html">simple-condition                                           [Condition Type]</a></li>
+<li><a href="simple_002dcondition_002dformat_002dcontrol.html">simple-condition-format-control, simple-condition-format-arguments</a></li>
+<li><a href="warn.html">warn                                                             [Function]</a></li>
+<li><a href="simple_002dwarning.html">simple-warning                                             [Condition Type]</a></li>
+<li><a href="invoke_002ddebugger.html">invoke-debugger                                                  [Function]</a></li>
+<li><a href="break.html">break                                                            [Function]</a></li>
+<li><a href="_002adebugger_002dhook_002a.html">*debugger-hook*                                                  [Variable]</a></li>
+<li><a href="_002abreak_002don_002dsignals_002a.html">*break-on-signals*                                               [Variable]</a></li>
+<li><a href="handler_002dbind.html">handler-bind                                                        [Macro]</a></li>
+<li><a href="handler_002dcase.html">handler-case                                                        [Macro]</a></li>
+<li><a href="ignore_002derrors.html">ignore-errors                                                       [Macro]</a></li>
+<li><a href="define_002dcondition.html">define-condition                                                    [Macro]</a></li>
+<li><a href="make_002dcondition.html">make-condition                                                   [Function]</a></li>
+<li><a href="restart.html">restart                                                      [System Class]</a></li>
+<li><a href="compute_002drestarts.html">compute-restarts                                                 [Function]</a></li>
+<li><a href="find_002drestart.html">find-restart                                                     [Function]</a></li>
+<li><a href="invoke_002drestart.html">invoke-restart                                                   [Function]</a></li>
+<li><a href="invoke_002drestart_002dinteractively.html">invoke-restart-interactively                                     [Function]</a></li>
+<li><a href="restart_002dbind.html">restart-bind                                                        [Macro]</a></li>
+<li><a href="restart_002dcase.html">restart-case                                                        [Macro]</a></li>
+<li><a href="restart_002dname.html">restart-name                                                     [Function]</a></li>
+<li><a href="with_002dcondition_002drestarts.html">with-condition-restarts                                             [Macro]</a></li>
+<li><a href="with_002dsimple_002drestart.html">with-simple-restart                                                 [Macro]</a></li>
+<li><a href="abort-_0028Restart_0029.html">abort                                                             [Restart]</a></li>
+<li><a href="continue.html">continue                                                          [Restart]</a></li>
+<li><a href="muffle_002dwarning.html">muffle-warning                                                    [Restart]</a></li>
+<li><a href="store_002dvalue.html">store-value                                                       [Restart]</a></li>
+<li><a href="use_002dvalue.html">use-value                                                         [Restart]</a></li>
+<li><a href="abort-_0028Function_0029.html">abort, continue, muffle-warning, store-value, use-value          [Function]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Conditions.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Conditions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Conditions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Conditions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Symbols.html" rel="next" title="Symbols">
+<link href="Structures.html" rel="prev" title="Structures">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Conditions">
+<div class="nav-panel">
+<p>
+Next: <a href="Symbols.html" accesskey="n" rel="next">Symbols</a>, Previous: <a href="Structures.html" accesskey="p" rel="prev">Structures</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Conditions-1"><span>9 Conditions<a class="copiable-link" href="#Conditions-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Condition-System-Concepts.html" accesskey="1">Condition System Concepts</a></li>
+<li><a href="Conditions-Dictionary.html" accesskey="2">Conditions Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Conformance-Statement.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Conformance Statement (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Conformance Statement (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Conformance Statement (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conforming-Implementations.html" rel="up" title="Conforming Implementations">
+<link href="Examples-of-Resolution-of-Apparent-Conflict-in-Exceptional-Situations.html" rel="prev" title="Examples of Resolution of Apparent Conflict in Exceptional Situations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Conformance-Statement">
+<div class="nav-panel">
+<p>
+Previous: <a href="Examples-of-Resolution-of-Apparent-Conflict-in-Exceptional-Situations.html" accesskey="p" rel="prev">Examples of Resolution of Apparent Conflict in Exceptional Situations</a>, Up: <a href="Conforming-Implementations.html" accesskey="u" rel="up">Conforming Implementations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Conformance-Statement-1"><span>1.5.1.7 Conformance Statement<a class="copiable-link" href="#Conformance-Statement-1"> &para;</a></span></h4>
+
+<p>A <i class="i">conforming implementation</i> shall produce a conformance statement 
+as a consequence of using the implementation, or that statement
+shall be included in the accompanying documentation.  If the implementation
+conforms in all respects with this standard, the conformance statement
+shall be
+</p>
+<dl class="table">
+<dt><code class="t"></code></dt>
+<dd><p>&ldquo;&lt;&lt;<i class="i">Implementation</i>&gt;&gt; conforms with the requirements 
+	  of ANSI &lt;&lt;<i class="i">standard number</i>&gt;&gt;&rdquo;
+</p></dd>
+</dl>
+
+<p>If the <i class="i">implementation</i> conforms with some but not all of the requirements of this
+standard, then the conformance statement shall be
+</p>
+<dl class="table">
+<dt><code class="t"></code></dt>
+<dd><p>&ldquo;&lt;&lt;<i class="i">Implementation</i>&gt;&gt; conforms with the requirements of
+	  ANSI &lt;&lt;<i class="i">standard number</i>&gt;&gt; with the following exceptions: 
+	  &lt;&lt;<i class="i">reference to or complete list of the requirements of
+		   the standard with which the implementation does not conform</i>&gt;&gt;.&rdquo;
+</p></dd>
+</dl>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Conformance.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Conformance (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Conformance (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Conformance (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-_0028Introduction_0029.html" rel="up" title="Introduction (Introduction)">
+<link href="Language-Extensions.html" rel="next" title="Language Extensions">
+<link href="Definitions.html" rel="prev" title="Definitions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Conformance">
+<div class="nav-panel">
+<p>
+Next: <a href="Language-Extensions.html" accesskey="n" rel="next">Language Extensions</a>, Previous: <a href="Definitions.html" accesskey="p" rel="prev">Definitions</a>, Up: <a href="Introduction-_0028Introduction_0029.html" accesskey="u" rel="up">Introduction</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Conformance-1"><span>1.5 Conformance<a class="copiable-link" href="#Conformance-1"> &para;</a></span></h3>
+
+
+<p>This standard presents the syntax and semantics to be implemented by a
+<i class="i">conforming implementation</i> (and its accompanying documentation).
+In addition, it imposes requirements on <i class="i">conforming programs</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Conforming-Implementations.html" accesskey="1">Conforming Implementations</a></li>
+<li><a href="Conforming-Programs.html" accesskey="2">Conforming Programs</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Conforming-Implementations.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Conforming Implementations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Conforming Implementations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Conforming Implementations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conformance.html" rel="up" title="Conformance">
+<link href="Conforming-Programs.html" rel="next" title="Conforming Programs">
+<link href="Conformance.html" rel="prev" title="Conformance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Conforming-Implementations">
+<div class="nav-panel">
+<p>
+Next: <a href="Conforming-Programs.html" accesskey="n" rel="next">Conforming Programs</a>, Previous: <a href="Conformance.html" accesskey="p" rel="prev">Conformance</a>, Up: <a href="Conformance.html" accesskey="u" rel="up">Conformance</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Conforming-Implementations-1"><span>1.5.1 Conforming Implementations<a class="copiable-link" href="#Conforming-Implementations-1"> &para;</a></span></h4>
+
+<p>A <i class="i">conforming implementation</i>
+<a class="index-entry-id" id="index-conforming-implementation"></a>
+ shall adhere to the requirements outlined
+in this section.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Required-Language-Features.html" accesskey="1">Required Language Features</a></li>
+<li><a href="Documentation-of-Implementation_002dDependent-Features.html" accesskey="2">Documentation of Implementation-Dependent Features</a></li>
+<li><a href="Documentation-of-Extensions.html" accesskey="3">Documentation of Extensions</a></li>
+<li><a href="Treatment-of-Exceptional-Situations.html" accesskey="4">Treatment of Exceptional Situations</a></li>
+<li><a href="Resolution-of-Apparent-Conflicts-in-Exceptional-Situations.html" accesskey="5">Resolution of Apparent Conflicts in Exceptional Situations</a></li>
+<li><a href="Examples-of-Resolution-of-Apparent-Conflict-in-Exceptional-Situations.html" accesskey="6">Examples of Resolution of Apparent Conflict in Exceptional Situations</a></li>
+<li><a href="Conformance-Statement.html" accesskey="7">Conformance Statement</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Conforming-Programs.html
@@ -0,0 +1,84 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Conforming Programs (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Conforming Programs (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Conforming Programs (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conformance.html" rel="up" title="Conformance">
+<link href="Conforming-Implementations.html" rel="prev" title="Conforming Implementations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Conforming-Programs">
+<div class="nav-panel">
+<p>
+Previous: <a href="Conforming-Implementations.html" accesskey="p" rel="prev">Conforming Implementations</a>, Up: <a href="Conformance.html" accesskey="u" rel="up">Conformance</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Conforming-Programs-1"><span>1.5.2 Conforming Programs<a class="copiable-link" href="#Conforming-Programs-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-conforming-program"></a>
+
+<a class="index-entry-id" id="index-conforming-code"></a>
+
+<p>Code conforming with the requirements of this standard shall adhere to the
+following:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p><i class="i">Conforming code</i> shall use only those features of the
+               language syntax and semantics that are 
+	       either specified in this standard
+		   or defined using the extension mechanisms 
+		      specified in the standard.
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p><i class="i">Conforming code</i> shall not rely on any particular
+              interpretation of <i class="i">implementation-dependent</i> features.
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p><i class="i">Conforming code</i> shall not depend on the consequences
+	      of undefined or unspecified situations.
+</p>
+</dd>
+<dt>4.</dt>
+<dd><p><i class="i">Conforming code</i> does not use any constructions 
+	      that are prohibited by the standard.
+</p>
+</dd>
+<dt>5.</dt>
+<dd><p><i class="i">Conforming code</i> does not depend on extensions 
+	      included in an implementation.
+</p></dd>
+</dl>
+
+
+<ul class="mini-toc">
+<li><a href="Use-of-Implementation_002dDefined-Language-Features.html" accesskey="1">Use of Implementation-Defined Language Features</a></li>
+<li><a href="Use-of-Read_002dTime-Conditionals.html" accesskey="2">Use of Read-Time Conditionals</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Congruent-Lambda_002dlists-for-all-Methods-of-a-Generic-Function.html
@@ -0,0 +1,101 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Congruent Lambda-lists for all Methods of a Generic Function (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Congruent Lambda-lists for all Methods of a Generic Function (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Congruent Lambda-lists for all Methods of a Generic Function (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Generic-Functions-and-Methods.html" rel="up" title="Generic Functions and Methods">
+<link href="Keyword-Arguments-in-Generic-Functions-and-Methods.html" rel="next" title="Keyword Arguments in Generic Functions and Methods">
+<link href="Agreement-on-Parameter-Specializers-and-Qualifiers.html" rel="prev" title="Agreement on Parameter Specializers and Qualifiers">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Congruent-Lambda_002dlists-for-all-Methods-of-a-Generic-Function">
+<div class="nav-panel">
+<p>
+Next: <a href="Keyword-Arguments-in-Generic-Functions-and-Methods.html" accesskey="n" rel="next">Keyword Arguments in Generic Functions and Methods</a>, Previous: <a href="Agreement-on-Parameter-Specializers-and-Qualifiers.html" accesskey="p" rel="prev">Agreement on Parameter Specializers and Qualifiers</a>, Up: <a href="Generic-Functions-and-Methods.html" accesskey="u" rel="up">Generic Functions and Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Congruent-Lambda_002dlists-for-all-Methods-of-a-Generic-Function-1"><span>7.6.4 Congruent Lambda-lists for all Methods of a Generic Function<a class="copiable-link" href="#Congruent-Lambda_002dlists-for-all-Methods-of-a-Generic-Function-1"> &para;</a></span></h4>
+
+<p>These rules define the congruence of a set of <i class="i">lambda lists</i>, including the
+<i class="i">lambda list</i> of each method for a given generic function and the
+<i class="i">lambda list</i> specified for the generic function itself, if given.
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>Each <i class="i">lambda list</i> must have the same number of required
+parameters.
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p>Each <i class="i">lambda list</i> must have the same number of optional
+parameters.  Each method can supply its own default for an optional
+parameter.
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>If any <i class="i">lambda list</i> mentions <b class="b">&amp;rest</b> or <b class="b">&amp;key</b>, each
+<i class="i">lambda list</i> must mention one or both of them.
+</p>
+</dd>
+<dt>4.</dt>
+<dd><p>If the <i class="i">generic function</i> <i class="i">lambda list</i>
+mentions <b class="b">&amp;key</b>, each
+method must accept all of the keyword names mentioned after <b class="b">&amp;key</b>,
+either by accepting them explicitly, by specifying <b class="b">&amp;allow-other-keys</b>,
+or by specifying <b class="b">&amp;rest</b> but not <b class="b">&amp;key</b>.
+Each method can accept additional keyword arguments of its own.  The
+checking of the validity of keyword names is done in the generic
+function, not in each method.
+A method is invoked as if the keyword
+argument pair whose name is <code class="t">:allow-other-keys</code> and whose value
+is <i class="i">true</i> were supplied, though no such argument pair will be passed.
+</p>
+</dd>
+<dt>5.</dt>
+<dd><p>The use of <b class="b">&amp;allow-other-keys</b> need not be consistent
+across <i class="i">lambda lists</i>.  If <b class="b">&amp;allow-other-keys</b> is mentioned in 
+the <i class="i">lambda list</i> of any applicable <i class="i">method</i> or of the <i class="i">generic function</i>,
+any keyword arguments may be mentioned in the call to the <i class="i">generic function</i>.
+</p>
+</dd>
+<dt>6.</dt>
+<dd><p>The use of <b class="b">&amp;aux</b> need not be consistent across methods.
+</p>
+<p>If a <i class="i">method-defining operator</i> that cannot specify <i class="i">generic function</i> options
+creates a <i class="i">generic function</i>, and if the <i class="i">lambda list</i> for the method
+mentions keyword arguments, the <i class="i">lambda list</i> of the generic function
+will mention <b class="b">&amp;key</b> (but no keyword arguments).
+</p>
+</dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Keyword-Arguments-in-Generic-Functions-and-Methods.html">Keyword Arguments in Generic Functions and Methods</a>, Previous: <a href="Agreement-on-Parameter-Specializers-and-Qualifiers.html">Agreement on Parameter Specializers and Qualifiers</a>, Up: <a href="Generic-Functions-and-Methods.html">Generic Functions and Methods</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Cons-Concepts.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Cons Concepts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Cons Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Cons Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses.html" rel="up" title="Conses">
+<link href="Conses-Dictionary.html" rel="next" title="Conses Dictionary">
+<link href="Conses.html" rel="prev" title="Conses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Cons-Concepts">
+<div class="nav-panel">
+<p>
+Next: <a href="Conses-Dictionary.html" accesskey="n" rel="next">Conses Dictionary</a>, Previous: <a href="Conses.html" accesskey="p" rel="prev">Conses</a>, Up: <a href="Conses.html" accesskey="u" rel="up">Conses</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Cons-Concepts-1"><span>14.1 Cons Concepts<a class="copiable-link" href="#Cons-Concepts-1"> &para;</a></span></h3>
+
+
+<p>A <i class="i">cons</i>
+<a class="index-entry-id" id="index-cons"></a>
+ is a compound data <i class="i">object</i> 
+having two components called the <i class="i">car</i> and the <i class="i">cdr</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  car  cons    rplacd  <!-- /@w -->
+  cdr  rplaca          <!-- /@w -->
+
+  Figure 14&ndash;1: Some defined names relating to conses.<!-- /@w -->
+
+</pre></div></div>
+
+<p>Depending on context, a group of connected <i class="i">conses</i> can be viewed
+in a variety of different ways.  A variety of operations is provided to
+support each of these various views.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Conses-as-Trees.html" accesskey="1">Conses as Trees</a></li>
+<li><a href="Conses-as-Lists.html" accesskey="2">Conses as Lists</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Conses-Dictionary.html
@@ -0,0 +1,95 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Conses Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Conses Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Conses Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses.html" rel="up" title="Conses">
+<link href="Cons-Concepts.html" rel="prev" title="Cons Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Conses-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Cons-Concepts.html" accesskey="p" rel="prev">Cons Concepts</a>, Up: <a href="Conses.html" accesskey="u" rel="up">Conses</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Conses-Dictionary-1"><span>14.2 Conses Dictionary<a class="copiable-link" href="#Conses-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="list-_0028System-Class_0029.html" accesskey="1">list                                                         [System Class]</a></li>
+<li><a href="null-_0028System-Class_0029.html" accesskey="2">null                                                         [System Class]</a></li>
+<li><a href="cons-_0028System-Class_0029.html" accesskey="3">cons                                                         [System Class]</a></li>
+<li><a href="atom-_0028Type_0029.html" accesskey="4">atom                                                                 [Type]</a></li>
+<li><a href="cons.html" accesskey="5">cons                                                             [Function]</a></li>
+<li><a href="consp.html" accesskey="6">consp                                                            [Function]</a></li>
+<li><a href="atom.html" accesskey="7">atom                                                             [Function]</a></li>
+<li><a href="rplaca.html" accesskey="8">rplaca, rplacd                                                   [Function]</a></li>
+<li><a href="car.html" accesskey="9">car,    cdr,</a></li>
+<li><a href="copy_002dtree.html">copy-tree                                                        [Function]</a></li>
+<li><a href="sublis.html">sublis, nsublis                                                  [Function]</a></li>
+<li><a href="subst.html">subst, subst-if, subst-if-not, nsubst, nsubst-if, nsubst-if-not</a></li>
+<li><a href="tree_002dequal.html">tree-equal                                                       [Function]</a></li>
+<li><a href="copy_002dlist.html">copy-list                                                        [Function]</a></li>
+<li><a href="list-_0028Function_0029.html">list, list*                                                      [Function]</a></li>
+<li><a href="list_002dlength.html">list-length                                                      [Function]</a></li>
+<li><a href="listp.html">listp                                                            [Function]</a></li>
+<li><a href="make_002dlist.html">make-list                                                        [Function]</a></li>
+<li><a href="push.html">push                                                                [Macro]</a></li>
+<li><a href="pop.html">pop                                                                 [Macro]</a></li>
+<li><a href="first.html">first, second, third, fourth, fifth,</a></li>
+<li><a href="nth.html">nth                                                              [Accessor]</a></li>
+<li><a href="endp.html">endp                                                             [Function]</a></li>
+<li><a href="null.html">null                                                             [Function]</a></li>
+<li><a href="nconc.html">nconc                                                            [Function]</a></li>
+<li><a href="append.html">append                                                           [Function]</a></li>
+<li><a href="revappend.html">revappend, nreconc                                               [Function]</a></li>
+<li><a href="butlast.html">butlast, nbutlast                                                [Function]</a></li>
+<li><a href="last.html">last                                                             [Function]</a></li>
+<li><a href="ldiff.html">ldiff, tailp                                                     [Function]</a></li>
+<li><a href="nthcdr.html">nthcdr                                                           [Function]</a></li>
+<li><a href="rest.html">rest                                                             [Accessor]</a></li>
+<li><a href="member-_0028Function_0029.html">member, member-if, member-if-not                                 [Function]</a></li>
+<li><a href="mapc.html">mapc, mapcar, mapcan, mapl, maplist, mapcon                      [Function]</a></li>
+<li><a href="acons.html">acons                                                            [Function]</a></li>
+<li><a href="assoc.html">assoc, assoc-if, assoc-if-not                                    [Function]</a></li>
+<li><a href="copy_002dalist.html">copy-alist                                                       [Function]</a></li>
+<li><a href="pairlis.html">pairlis                                                          [Function]</a></li>
+<li><a href="rassoc.html">rassoc, rassoc-if, rassoc-if-not                                 [Function]</a></li>
+<li><a href="get_002dproperties.html">get-properties                                                   [Function]</a></li>
+<li><a href="getf.html">getf                                                             [Accessor]</a></li>
+<li><a href="remf.html">remf                                                                [Macro]</a></li>
+<li><a href="intersection.html">intersection, nintersection                                      [Function]</a></li>
+<li><a href="adjoin.html">adjoin                                                           [Function]</a></li>
+<li><a href="pushnew.html">pushnew                                                             [Macro]</a></li>
+<li><a href="set_002ddifference.html">set-difference, nset-difference                                  [Function]</a></li>
+<li><a href="set_002dexclusive_002dor.html">set-exclusive-or, nset-exclusive-or                              [Function]</a></li>
+<li><a href="subsetp.html">subsetp                                                          [Function]</a></li>
+<li><a href="union.html">union, nunion                                                    [Function]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Conses-as-Forms.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Conses as Forms (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Conses as Forms (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Conses as Forms (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Evaluation-Model.html" rel="up" title="The Evaluation Model">
+<link href="Special-Forms.html" rel="next" title="Special Forms">
+<link href="Symbols-Naming-Both-Lexical-and-Dynamic-Variables.html" rel="prev" title="Symbols Naming Both Lexical and Dynamic Variables">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Conses-as-Forms">
+<div class="nav-panel">
+<p>
+Next: <a href="Special-Forms.html" accesskey="n" rel="next">Special Forms</a>, Previous: <a href="Symbols-Naming-Both-Lexical-and-Dynamic-Variables.html" accesskey="p" rel="prev">Symbols Naming Both Lexical and Dynamic Variables</a>, Up: <a href="The-Evaluation-Model.html" accesskey="u" rel="up">The Evaluation Model</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Conses-as-Forms-1"><span>3.1.2.7 Conses as Forms<a class="copiable-link" href="#Conses-as-Forms-1"> &para;</a></span></h4>
+
+<p>A <i class="i">cons</i> that is used as a <i class="i">form</i> is called a <i class="i">compound form</i>.
+</p>
+<p>If the <i class="i">car</i> of that <i class="i">compound form</i> is a <i class="i">symbol</i>, 
+that <i class="i">symbol</i> is the <i class="i">name</i> of an <i class="i">operator</i>,
+and the <i class="i">form</i> is either a <i class="i">special form</i>, a <i class="i">macro form</i>,
+or a <i class="i">function form</i>, depending on the <i class="i">function</i> <i class="i">binding</i> 
+of the <i class="i">operator</i> in the current <i class="i">lexical environment</i>.
+If the <i class="i">operator</i> is neither a <i class="i">special operator</i>
+nor a <i class="i">macro name</i>, it is assumed to be a <i class="i">function name</i>
+(even if there is no definition for such a <i class="i">function</i>).
+</p>
+<p>If the <i class="i">car</i> of the <i class="i">compound form</i> is not a <i class="i">symbol</i>,
+then that <i class="i">car</i> must be a <i class="i">lambda expression</i>,
+in which case the <i class="i">compound form</i> is a <i class="i">lambda form</i>.
+</p>
+<p>How a <i class="i">compound form</i> is processed depends on whether it is 
+classified as a <i class="i">special form</i>, a <i class="i">macro form</i>, 
+a <i class="i">function form</i>, or a <i class="i">lambda form</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Conses-as-Lists.html
@@ -0,0 +1,97 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Conses as Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Conses as Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Conses as Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Cons-Concepts.html" rel="up" title="Cons Concepts">
+<link href="Conses-as-Trees.html" rel="prev" title="Conses as Trees">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Conses-as-Lists">
+<div class="nav-panel">
+<p>
+Previous: <a href="Conses-as-Trees.html" accesskey="p" rel="prev">Conses as Trees</a>, Up: <a href="Cons-Concepts.html" accesskey="u" rel="up">Cons Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Conses-as-Lists-1"><span>14.1.2 Conses as Lists<a class="copiable-link" href="#Conses-as-Lists-1"> &para;</a></span></h4>
+
+<p>A <i class="i">list</i>
+<a class="index-entry-id" id="index-list"></a>
+ is a chain of <i class="i">conses</i> in which the <i class="i">car</i> of each
+<i class="i">cons</i> is an <i class="i">element</i> of the <i class="i">list</i>, 
+and the <i class="i">cdr</i> of each <i class="i">cons</i> is either the next
+link in the chain or a terminating <i class="i">atom</i>.  
+</p>
+<p>A <i class="i">proper list</i>
+<a class="index-entry-id" id="index-proper-list"></a>
+ is a <i class="i">list</i> terminated by the <i class="i">empty list</i>.
+The <i class="i">empty list</i> is a <i class="i">proper list</i>, but is not a <i class="i">cons</i>.
+</p>
+<p>An <i class="i">improper list</i>
+<a class="index-entry-id" id="index-improper-list"></a>
+ is a <i class="i">list</i> that is not a <i class="i">proper list</i>;
+that is, it is a <i class="i">circular list</i> or a <i class="i">dotted list</i>.
+</p>
+<p>A <i class="i">dotted list</i>
+<a class="index-entry-id" id="index-dotted-list"></a>
+ is a <i class="i">list</i> that has a terminating <i class="i">atom</i>
+that is not the <i class="i">empty list</i>.  A <i class="i">non-nil</i> <i class="i">atom</i> by itself
+is not considered to be a <i class="i">list</i> of any kind&mdash;not even a <i class="i">dotted list</i>.
+</p>
+<p>A <i class="i">circular list</i>
+<a class="index-entry-id" id="index-circular-list"></a>
+ is a chain of <i class="i">conses</i> that has no termination 
+because some <i class="i">cons</i> in the chain is the <i class="i">cdr</i> of a later <i class="i">cons</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  append      last           nbutlast  rest       <!-- /@w -->
+  butlast     ldiff          nconc     revappend  <!-- /@w -->
+  copy-alist  list           ninth     second     <!-- /@w -->
+  copy-list   list*          nreconc   seventh    <!-- /@w -->
+  eighth      list-length    nth       sixth      <!-- /@w -->
+  endp        make-list      nthcdr    tailp      <!-- /@w -->
+  fifth       member         pop       tenth      <!-- /@w -->
+  first       member-if      push      third      <!-- /@w -->
+  fourth      member-if-not  pushnew              <!-- /@w -->
+
+  Figure 14&ndash;3: Some defined names relating to lists.<!-- /@w -->
+
+</pre></div></div>
+
+
+<ul class="mini-toc">
+<li><a href="Lists-as-Association-Lists.html" accesskey="1">Lists as Association Lists</a></li>
+<li><a href="Lists-as-Sets.html" accesskey="2">Lists as Sets</a></li>
+<li><a href="General-Restrictions-on-Parameters-that-must-be-Lists.html" accesskey="3">General Restrictions on Parameters that must be Lists</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Conses-as-Trees.html">Conses as Trees</a>, Up: <a href="Cons-Concepts.html">Cons Concepts</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Conses-as-Trees.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Conses as Trees (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Conses as Trees (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Conses as Trees (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Cons-Concepts.html" rel="up" title="Cons Concepts">
+<link href="Conses-as-Lists.html" rel="next" title="Conses as Lists">
+<link href="Cons-Concepts.html" rel="prev" title="Cons Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Conses-as-Trees">
+<div class="nav-panel">
+<p>
+Next: <a href="Conses-as-Lists.html" accesskey="n" rel="next">Conses as Lists</a>, Previous: <a href="Cons-Concepts.html" accesskey="p" rel="prev">Cons Concepts</a>, Up: <a href="Cons-Concepts.html" accesskey="u" rel="up">Cons Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Conses-as-Trees-1"><span>14.1.1 Conses as Trees<a class="copiable-link" href="#Conses-as-Trees-1"> &para;</a></span></h4>
+
+<p>A <i class="i">tree</i>
+<a class="index-entry-id" id="index-tree"></a>
+ is a binary recursive data structure made up of
+<i class="i">conses</i> and <i class="i">atoms</i>:
+the <i class="i">conses</i> are themselves also <i class="i">trees</i>
+(sometimes called &ldquo;subtrees&rdquo; or &ldquo;branches&rdquo;), and the <i class="i">atoms</i>
+are terminal nodes (sometimes called <i class="i">leaves</i>
+<a class="index-entry-id" id="index-leaves"></a>
+). 
+Typically, the <i class="i">leaves</i> represent data while the branches 
+establish some relationship among that data.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  caaaar  caddar  cdar       nsubst         <!-- /@w -->
+  caaadr  cadddr  cddaar     nsubst-if      <!-- /@w -->
+  caaar   caddr   cddadr     nsubst-if-not  <!-- /@w -->
+  caadar  cadr    cddar      nthcdr         <!-- /@w -->
+  caaddr  cdaaar  cdddar     sublis         <!-- /@w -->
+  caadr   cdaadr  cddddr     subst          <!-- /@w -->
+  caar    cdaar   cdddr      subst-if       <!-- /@w -->
+  cadaar  cdadar  cddr       subst-if-not   <!-- /@w -->
+  cadadr  cdaddr  copy-tree  tree-equal     <!-- /@w -->
+  cadar   cdadr   nsublis                   <!-- /@w -->
+
+  Figure 14&ndash;2: Some defined names relating to trees.<!-- /@w -->
+
+</pre></div></div>
+
+
+<ul class="mini-toc">
+<li><a href="General-Restrictions-on-Parameters-that-must-be-Trees.html" accesskey="1">General Restrictions on Parameters that must be Trees</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Conses.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Conses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Conses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Conses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Arrays.html" rel="next" title="Arrays">
+<link href="Characters.html" rel="prev" title="Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Conses">
+<div class="nav-panel">
+<p>
+Next: <a href="Arrays.html" accesskey="n" rel="next">Arrays</a>, Previous: <a href="Characters.html" accesskey="p" rel="prev">Characters</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Conses-1"><span>14 Conses<a class="copiable-link" href="#Conses-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Cons-Concepts.html" accesskey="1">Cons Concepts</a></li>
+<li><a href="Conses-Dictionary.html" accesskey="2">Conses Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Constant-Variables.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Constant Variables (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Constant Variables (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Constant Variables (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Evaluation-Model.html" rel="up" title="The Evaluation Model">
+<link href="Symbols-Naming-Both-Lexical-and-Dynamic-Variables.html" rel="next" title="Symbols Naming Both Lexical and Dynamic Variables">
+<link href="Dynamic-Variables.html" rel="prev" title="Dynamic Variables">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Constant-Variables">
+<div class="nav-panel">
+<p>
+Next: <a href="Symbols-Naming-Both-Lexical-and-Dynamic-Variables.html" accesskey="n" rel="next">Symbols Naming Both Lexical and Dynamic Variables</a>, Previous: <a href="Dynamic-Variables.html" accesskey="p" rel="prev">Dynamic Variables</a>, Up: <a href="The-Evaluation-Model.html" accesskey="u" rel="up">The Evaluation Model</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Constant-Variables-1"><span>3.1.2.5 Constant Variables<a class="copiable-link" href="#Constant-Variables-1"> &para;</a></span></h4>
+
+<p>Certain variables, called <i class="i">constant variables</i>, are reserved as &ldquo;named constants.&rdquo;  
+The consequences are undefined if an attempt is made to 
+    assign a value to,
+ or create
+a <i class="i">binding</i> for a <i class="i">constant variable</i>, 
+except that a &lsquo;compatible&rsquo; redefinition of a <i class="i">constant variable</i>
+using <b class="b">defconstant</b> is permitted; see the <i class="i">macro</i> <b class="b">defconstant</b>.
+</p>
+<p><i class="i">Keywords</i>, 
+<i class="i">symbols</i> defined by <span class="r">Common Lisp</span> or the <i class="i">implementation</i>
+  as constant (such as <b class="b">nil</b>, <b class="b">t</b>, and <b class="b">pi</b>),
+and <i class="i">symbols</i> declared as constant using <b class="b">defconstant</b>
+are <i class="i">constant variables</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Constituent-Characters.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Constituent Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Constituent Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Constituent Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Syntax-Types.html" rel="up" title="Character Syntax Types">
+<link href="Constituent-Traits.html" rel="next" title="Constituent Traits">
+<link href="Character-Syntax-Types.html" rel="prev" title="Character Syntax Types">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Constituent-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Constituent-Traits.html" accesskey="n" rel="next">Constituent Traits</a>, Previous: <a href="Character-Syntax-Types.html" accesskey="p" rel="prev">Character Syntax Types</a>, Up: <a href="Character-Syntax-Types.html" accesskey="u" rel="up">Character Syntax Types</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Constituent-Characters-1"><span>2.1.4.1 Constituent Characters<a class="copiable-link" href="#Constituent-Characters-1"> &para;</a></span></h4>
+
+<p><i class="i">Constituent</i> <i class="i">characters</i> are used in <i class="i">tokens</i>.
+A <i class="i">token</i>
+<a class="index-entry-id" id="index-token"></a>
+ is a representation of a <i class="i">number</i> or a <i class="i">symbol</i>.  
+Examples of <i class="i">constituent</i> <i class="i">characters</i> are letters and digits.
+</p>
+<p>Letters in symbol names are sometimes converted to 
+letters in the opposite <i class="i">case</i> when the name is read;
+see <a class="ref" href="Effect-of-Readtable-Case-on-the-Lisp-Reader.html">Effect of Readtable Case on the Lisp Reader</a>.
+<i class="i">Case</i> conversion can be suppressed by the use 
+of <i class="i">single escape</i> or <i class="i">multiple escape</i> characters.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Constituent-Traits.html
@@ -0,0 +1,127 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Constituent Traits (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Constituent Traits (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Constituent Traits (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Syntax-Types.html" rel="up" title="Character Syntax Types">
+<link href="Invalid-Characters.html" rel="next" title="Invalid Characters">
+<link href="Constituent-Characters.html" rel="prev" title="Constituent Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Constituent-Traits">
+<div class="nav-panel">
+<p>
+Next: <a href="Invalid-Characters.html" accesskey="n" rel="next">Invalid Characters</a>, Previous: <a href="Constituent-Characters.html" accesskey="p" rel="prev">Constituent Characters</a>, Up: <a href="Character-Syntax-Types.html" accesskey="u" rel="up">Character Syntax Types</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Constituent-Traits-1"><span>2.1.4.2 Constituent Traits<a class="copiable-link" href="#Constituent-Traits-1"> &para;</a></span></h4>
+
+<p>Every <i class="i">character</i> has one or more <i class="i">constituent traits</i>
+that define how the <i class="i">character</i> is to be interpreted by the <i class="i">Lisp reader</i>
+when the <i class="i">character</i> is a <i class="i">constituent</i> <i class="i">character</i>.
+These <i class="i">constituent traits</i> are 
+     <i class="i">alphabetic</i>_2,                  
+     digit,
+     <i class="i">package marker</i>,
+     plus sign,
+     minus sign, 
+     dot,
+     decimal point,
+     <i class="i">ratio marker</i>,
+     <i class="i">exponent marker</i>,
+ and <i class="i">invalid</i>.
+<i class="i">Figure~2&ndash;8</i> shows the <i class="i">constituent traits</i>
+of the <i class="i">standard characters</i>
+and of certain <i class="i">semi-standard</i> <i class="i">characters</i>;
+no mechanism is provided for changing the <i class="i">constituent trait</i> of a <i class="i">character</i>.
+Any <i class="i">character</i> with the alphadigit <i class="i">constituent trait</i>
+in that figure is a digit if the <i class="i">current input base</i> is greater
+than that character&rsquo;s digit value,
+otherwise the <i class="i">character</i> is <i class="i">alphabetic</i>_2.  
+Any <i class="i">character</i> quoted by a <i class="i">single escape</i> 
+is treated as an <i class="i">alphabetic</i>_2 constituent, regardless of its normal syntax.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted"> constituent traits         constituent traits                                   <!-- /@w -->
+ character                  character   <!-- /@w -->
+ ________________________________________________________________________________<!-- /@w -->
+ Backspace   <i class="i">invalid</i>        <code class="t">{</code>           <i class="i">alphabetic</i>_2                             <!-- /@w -->
+ Tab         <i class="i">invalid</i>*       <code class="t">}</code>           <i class="i">alphabetic</i>_2                             <!-- /@w -->
+ Newline     <i class="i">invalid</i>*       +           <i class="i">alphabetic</i>_2, plus sign                  <!-- /@w -->
+ Linefeed    <i class="i">invalid</i>*       -           <i class="i">alphabetic</i>_2, minus sign                 <!-- /@w -->
+ Page        <i class="i">invalid</i>*       .           <i class="i">alphabetic</i>_2, dot, decimal point         <!-- /@w -->
+ Return      <i class="i">invalid</i>*       /           <i class="i">alphabetic</i>_2, <i class="i">ratio marker</i>               <!-- /@w -->
+ Space       <i class="i">invalid</i>*       A, a        alphadigit                               <!-- /@w -->
+ !           <i class="i">alphabetic</i>_2   B, b        alphadigit                               <!-- /@w -->
+ <code class="t">&quot;</code>           <i class="i">alphabetic</i>_2*  C, c        alphadigit                               <!-- /@w -->
+ #           <i class="i">alphabetic</i>_2*  D, d        alphadigit, double-float <i class="i">exponent marker</i> <!-- /@w -->
+ $          <i class="i">alphabetic</i>_2   E, e        alphadigit, float <i class="i">exponent marker</i>        <!-- /@w -->
+ %           <i class="i">alphabetic</i>_2   F, f        alphadigit, single-float <i class="i">exponent marker</i> <!-- /@w -->
+ &amp;           <i class="i">alphabetic</i>_2   G, g        alphadigit                               <!-- /@w -->
+ &rsquo;           <i class="i">alphabetic</i>_2*  H, h        alphadigit                               <!-- /@w -->
+ (           <i class="i">alphabetic</i>_2*  I, i        alphadigit                               <!-- /@w -->
+ )           <i class="i">alphabetic</i>_2*  J, j        alphadigit                               <!-- /@w -->
+ <code class="t">*</code>           <i class="i">alphabetic</i>_2   K, k        alphadigit                               <!-- /@w -->
+ ,           <i class="i">alphabetic</i>_2*  L, l        alphadigit, long-float <i class="i">exponent marker</i>   <!-- /@w -->
+ 0-9         alphadigit     M, m        alphadigit                               <!-- /@w -->
+ :           <i class="i">package marker</i> N, n        alphadigit                               <!-- /@w -->
+ ;           <i class="i">alphabetic</i>_2*  O, o        alphadigit                               <!-- /@w -->
+ <code class="t">&lt;</code>           <i class="i">alphabetic</i>_2   P, p        alphadigit                               <!-- /@w -->
+ =           <i class="i">alphabetic</i>_2   Q, q        alphadigit                               <!-- /@w -->
+ <code class="t">&gt;</code>           <i class="i">alphabetic</i>_2   R, r        alphadigit                               <!-- /@w -->
+ ?           <i class="i">alphabetic</i>_2   S, s        alphadigit, short-float <i class="i">exponent marker</i>  <!-- /@w -->
+ <code class="t">@</code>           <i class="i">alphabetic</i>_2   T, t        alphadigit                               <!-- /@w -->
+ <code class="t">[</code>           <i class="i">alphabetic</i>_2   U, u        alphadigit                               <!-- /@w -->
+ <code class="t">\</code>           <i class="i">alphabetic</i>_2*  V, v        alphadigit                               <!-- /@w -->
+ <code class="t">]</code>           <i class="i">alphabetic</i>_2   W, w        alphadigit                               <!-- /@w -->
+ <code class="t">^</code>           <i class="i">alphabetic</i>_2   X, x        alphadigit                               <!-- /@w -->
+ <code class="t">_</code>           <i class="i">alphabetic</i>_2   Y, y        alphadigit                               <!-- /@w -->
+ &lsquo;           <i class="i">alphabetic</i>_2*  Z, z        alphadigit                               <!-- /@w -->
+ <code class="t">|</code>           <i class="i">alphabetic</i>_2*  Rubout      <i class="i">invalid</i>                                  <!-- /@w -->
+ <code class="t">~</code>           <i class="i">alphabetic</i>_2   <!-- /@w -->
+</pre></div></div>
+
+<p>&nbsp;Figure&nbsp;2&ndash;8:&nbsp;Constituent&nbsp;Traits&nbsp;of&nbsp;Standard&nbsp;Characters&nbsp;and&nbsp;Semi-Standard&nbsp;Characters<!-- /@w -->
+</p>
+<p>The interpretations in this table apply only to <i class="i">characters</i>
+whose <i class="i">syntax type</i> is <i class="i">constituent</i>.
+Entries marked with an asterisk (*) are normally <i class="i">shadowed</i>_2 
+because the indicated <i class="i">characters</i> are of <i class="i">syntax type</i>
+<i class="i">whitespace</i>_2,
+<i class="i">macro character</i>,
+<i class="i">single escape</i>,
+or <i class="i">multiple escape</i>;
+these <i class="i">constituent traits</i> apply to them only if their <i class="i">syntax types</i> 
+are changed to <i class="i">constituent</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Invalid-Characters.html">Invalid Characters</a>, Previous: <a href="Constituent-Characters.html">Constituent Characters</a>, Up: <a href="Character-Syntax-Types.html">Character Syntax Types</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Constraints-on-Macros-and-Compiler-Macros.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Constraints on Macros and Compiler Macros (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Constraints on Macros and Compiler Macros (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Constraints on Macros and Compiler Macros (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="File-Compilation.html" rel="up" title="File Compilation">
+<link href="Processing-of-Defining-Macros.html" rel="prev" title="Processing of Defining Macros">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Constraints-on-Macros-and-Compiler-Macros">
+<div class="nav-panel">
+<p>
+Previous: <a href="Processing-of-Defining-Macros.html" accesskey="p" rel="prev">Processing of Defining Macros</a>, Up: <a href="File-Compilation.html" accesskey="u" rel="up">File Compilation</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Constraints-on-Macros-and-Compiler-Macros-1"><span>3.2.3.3 Constraints on Macros and Compiler Macros<a class="copiable-link" href="#Constraints-on-Macros-and-Compiler-Macros-1"> &para;</a></span></h4>
+
+<p>Except where explicitly stated otherwise, no <i class="i">macro</i> defined in
+the <span class="r">Common Lisp</span> standard produces an expansion that could cause any of the
+<i class="i">subforms</i> of the <i class="i">macro form</i> to be treated as 
+<i class="i">top level forms</i>.  If an <i class="i">implementation</i> also provides a
+<i class="i">special operator</i> definition of a <span class="r">Common Lisp</span> <i class="i">macro</i>, 
+the <i class="i">special operator</i> definition must be semantically equivalent
+in this respect.
+</p>
+<p><i class="i">Compiler macro</i> expansions must also have the same
+top level evaluation semantics as the <i class="i">form</i> which they replace.
+This is of concern both to <i class="i">conforming implementations</i> and to
+<i class="i">conforming programs</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Implementations.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Constraints on the COMMON-LISP Package for Conforming Implementations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Constraints on the COMMON-LISP Package for Conforming Implementations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Constraints on the COMMON-LISP Package for Conforming Implementations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standardized-Packages.html" rel="up" title="Standardized Packages">
+<link href="Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs.html" rel="next" title="Constraints on the COMMON-LISP Package for Conforming Programs">
+<link href="The-COMMON_002dLISP-Package.html" rel="prev" title="The COMMON-LISP Package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Implementations">
+<div class="nav-panel">
+<p>
+Next: <a href="Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs.html" accesskey="n" rel="next">Constraints on the COMMON-LISP Package for Conforming Programs</a>, Previous: <a href="The-COMMON_002dLISP-Package.html" accesskey="p" rel="prev">The COMMON-LISP Package</a>, Up: <a href="Standardized-Packages.html" accesskey="u" rel="up">Standardized Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Implementations-1"><span>11.1.2.2 Constraints on the COMMON-LISP Package for Conforming Implementations<a class="copiable-link" href="#Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Implementations-1"> &para;</a></span></h4>
+
+<p>In a <i class="i">conforming implementation</i>,
+an <i class="i">external</i> <i class="i">symbol</i> of the <code class="t">COMMON-LISP</code> <i class="i">package</i> can have
+   a <i class="i">function</i>, <i class="i">macro</i>, or <i class="i">special operator</i> definition, 
+   a <i class="i">global variable</i> definition
+   (or other status as a <i class="i">dynamic variable</i> 
+    due to a <b class="b">special</b> <i class="i">proclamation</i>),
+or a <i class="i">type</i> definition
+only if explicitly permitted in this standard.
+For example,
+  <b class="b">fboundp</b> <i class="i">yields</i> <i class="i">false</i> 
+  for any <i class="i">external symbol</i> of the <code class="t">COMMON-LISP</code> <i class="i">package</i> 
+  that is not the <i class="i">name</i> of a <i class="i">standardized</i> 
+   <i class="i">function</i>, <i class="i">macro</i> or <i class="i">special operator</i>,
+and
+  <b class="b">boundp</b> returns <i class="i">false</i> 
+  for any <i class="i">external symbol</i> of the <code class="t">COMMON-LISP</code> <i class="i">package</i> 
+  that is not the <i class="i">name</i> of a <i class="i">standardized</i> <i class="i">global variable</i>.
+It also follows that
+  <i class="i">conforming programs</i> can use <i class="i">external symbols</i> of the <code class="t">COMMON-LISP</code> <i class="i">package</i> 
+  as the <i class="i">names</i> of local <i class="i">lexical variables</i> 
+  with confidence that those <i class="i">names</i> have not been <i class="i">proclaimed</i> <b class="b">special</b> 
+  by the <i class="i">implementation</i>
+  unless those <i class="i">symbols</i> are
+    <i class="i">names</i> of <i class="i">standardized</i> <i class="i">global variables</i>.
+</p>
+<p>A <i class="i">conforming implementation</i> must not place any <i class="i">property</i> on
+an <i class="i">external symbol</i> of the <code class="t">COMMON-LISP</code> <i class="i">package</i> using a <i class="i">property indicator</i>
+that is either an <i class="i">external symbol</i> of any <i class="i">standardized</i> <i class="i">package</i>
+or a <i class="i">symbol</i> that is otherwise <i class="i">accessible</i> in the <code class="t">COMMON-LISP-USER</code> <i class="i">package</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs.html
@@ -0,0 +1,170 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Constraints on the COMMON-LISP Package for Conforming Programs (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Constraints on the COMMON-LISP Package for Conforming Programs (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Constraints on the COMMON-LISP Package for Conforming Programs (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standardized-Packages.html" rel="up" title="Standardized Packages">
+<link href="Some-Exceptions-to-Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs.html" rel="next" title="Some Exceptions to Constraints on the COMMON-LISP Package for Conforming Programs">
+<link href="Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Implementations.html" rel="prev" title="Constraints on the COMMON-LISP Package for Conforming Implementations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs">
+<div class="nav-panel">
+<p>
+Next: <a href="Some-Exceptions-to-Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs.html" accesskey="n" rel="next">Some Exceptions to Constraints on the COMMON-LISP Package for Conforming Programs</a>, Previous: <a href="Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Implementations.html" accesskey="p" rel="prev">Constraints on the COMMON-LISP Package for Conforming Implementations</a>, Up: <a href="Standardized-Packages.html" accesskey="u" rel="up">Standardized Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs-1"><span>11.1.2.3 Constraints on the COMMON-LISP Package for Conforming Programs<a class="copiable-link" href="#Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-redefinition"></a>
+
+<p>Except where explicitly allowed, the consequences are undefined if any
+of the following actions are performed on an <i class="i">external symbol</i> 
+of the <code class="t">COMMON-LISP</code> <i class="i">package</i>:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p><i class="i">Binding</i> or altering its value (lexically or dynamically).
+	      (Some exceptions are noted below.)
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p>Defining, 
+</p>
+<p>undefining, 
+</p>
+<p>or <i class="i">binding</i> it as a <i class="i">function</i>.
+	      (Some exceptions are noted below.)
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>Defining,
+</p>
+<p>undefining, 
+</p>
+<p>or <i class="i">binding</i> it as a <i class="i">macro</i>
+</p>
+<p>or <i class="i">compiler macro</i>.
+</p>
+<p>(Some exceptions are noted below.)
+</p>
+</dd>
+<dt>4.</dt>
+<dd><p>Defining it as a <i class="i">type specifier</i> 
+	      (via <b class="b">defstruct</b>, 
+		   <b class="b">defclass</b>,
+		   <b class="b">deftype</b>,
+		   <b class="b">define-condition</b>).
+</p>
+</dd>
+<dt>5.</dt>
+<dd><p>Defining it as a structure (via <b class="b">defstruct</b>).
+</p>
+</dd>
+<dt>6.</dt>
+<dd><p>Defining it as a <i class="i">declaration</i> 
+	      with a <b class="b">declaration</b> <i class="i">proclamation</i>.
+</p>
+</dd>
+<dt>7.</dt>
+<dd><p>Defining it as a <i class="i">symbol macro</i>.
+</p>
+</dd>
+<dt>8.</dt>
+<dd><p>Altering its <i class="i">home package</i>.
+</p>
+</dd>
+<dt>9.</dt>
+<dd><p>Tracing it  (via <b class="b">trace</b>).
+</p>
+</dd>
+<dt>10.</dt>
+<dd><p>Declaring or proclaiming it
+	       <b class="b">special</b>
+	       (via <b class="b">declare</b>,
+</p>
+<p><b class="b">declaim</b>,
+</p>
+<p>or <b class="b">proclaim</b>).
+</p>
+</dd>
+<dt>11.</dt>
+<dd><p>Declaring or proclaiming its <b class="b">type</b> or <b class="b">ftype</b>
+	       (via <b class="b">declare</b>,
+</p>
+<p><b class="b">declaim</b>,
+</p>
+<p>or <b class="b">proclaim</b>).
+	       (Some exceptions are noted below.)
+</p>
+</dd>
+<dt>12.</dt>
+<dd><p>Removing it from the <code class="t">COMMON-LISP</code> <i class="i">package</i>.
+</p>
+</dd>
+<dt>13.</dt>
+<dd><p>Defining a <i class="i">setf expander</i> for it 
+	       (via <b class="b">defsetf</b> or <b class="b">define-setf-method</b>).
+</p>
+</dd>
+<dt>14.</dt>
+<dd><p>Defining, undefining, or binding its <i class="i">setf function name</i>.
+</p>
+</dd>
+<dt>15.</dt>
+<dd><p>Defining it as a <i class="i">method combination</i> type 
+		(via <b class="b">define-method-combination</b>).
+</p>
+</dd>
+<dt>16.</dt>
+<dd><p>Using it as the class-name argument 
+	       to <b class="b">setf</b> of <b class="b">find-class</b>.
+</p>
+</dd>
+<dt>17.</dt>
+<dd><p>Binding it as a <i class="i">catch tag</i>.
+</p>
+</dd>
+<dt>18.</dt>
+<dd><p>Binding it as a <i class="i">restart</i> <i class="i">name</i>.
+</p>
+</dd>
+<dt>19.</dt>
+<dd><p>Defining a <i class="i">method</i> 
+	       for a <i class="i">standardized</i> <i class="i">generic function</i> 
+	       which is <i class="i">applicable</i> when all of the <i class="i">arguments</i>
+      	       are <i class="i">direct instances</i> of <i class="i">standardized</i> <i class="i">classes</i>.
+</p>
+</dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Some-Exceptions-to-Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs.html">Some Exceptions to Constraints on the COMMON-LISP Package for Conforming Programs</a>, Previous: <a href="Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Implementations.html">Constraints on the COMMON-LISP Package for Conforming Implementations</a>, Up: <a href="Standardized-Packages.html">Standardized Packages</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Constructing-Numbers-from-Tokens.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Constructing Numbers from Tokens (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Constructing Numbers from Tokens (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Constructing Numbers from Tokens (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpretation-of-Tokens.html" rel="up" title="Interpretation of Tokens">
+<link href="The-Consing-Dot.html" rel="next" title="The Consing Dot">
+<link href="Numbers-as-Tokens.html" rel="prev" title="Numbers as Tokens">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Constructing-Numbers-from-Tokens">
+<div class="nav-panel">
+<p>
+Next: <a href="The-Consing-Dot.html" accesskey="n" rel="next">The Consing Dot</a>, Previous: <a href="Numbers-as-Tokens.html" accesskey="p" rel="prev">Numbers as Tokens</a>, Up: <a href="Interpretation-of-Tokens.html" accesskey="u" rel="up">Interpretation of Tokens</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Constructing-Numbers-from-Tokens-1"><span>2.3.2 Constructing Numbers from Tokens<a class="copiable-link" href="#Constructing-Numbers-from-Tokens-1"> &para;</a></span></h4>
+
+<p>A <i class="i">real</i> is constructed directly from a corresponding numeric <i class="i">token</i>;
+see <i class="i">Figure~2&ndash;9</i>.
+</p>
+<p>A <i class="i">complex</i> is notated as a <code class="t">#C</code> (or <code class="t">#c</code>) followed by a <i class="i">list</i>
+of two <i class="i">reals</i>; see <a class="ref" href="Sharpsign-C.html">Sharpsign C</a>.
+</p>
+<p>The <i class="i">reader macros</i> <code class="t">#B</code>, <code class="t">#O</code>, <code class="t">#X</code>, and <code class="t">#R</code> may also be useful
+in controlling the input <i class="i">radix</i> in which <i class="i">rationals</i> are parsed;
+ see <a class="ref" href="Sharpsign-B.html">Sharpsign B</a>,
+     <a class="ref" href="Sharpsign-O.html">Sharpsign O</a>,
+     <a class="ref" href="Sharpsign-X.html">Sharpsign X</a>,
+ and <a class="ref" href="Sharpsign-R.html">Sharpsign R</a>.
+</p>
+<p>This section summarizes the full syntax for <i class="i">numbers</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Syntax-of-a-Rational.html" accesskey="1">Syntax of a Rational</a></li>
+<li><a href="Syntax-of-an-Integer.html" accesskey="2">Syntax of an Integer</a></li>
+<li><a href="Syntax-of-a-Ratio.html" accesskey="3">Syntax of a Ratio</a></li>
+<li><a href="Syntax-of-a-Float.html" accesskey="4">Syntax of a Float</a></li>
+<li><a href="Syntax-of-a-Complex.html" accesskey="5">Syntax of a Complex</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Contagion-in-Numeric-Operations.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Contagion in Numeric Operations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Contagion in Numeric Operations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Contagion in Numeric Operations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numeric-Operations.html" rel="up" title="Numeric Operations">
+<link href="Viewing-Integers-as-Bits-and-Bytes.html" rel="next" title="Viewing Integers as Bits and Bytes">
+<link href="Examples-of-Associativity-and-Commutativity-in-Numeric-Operations.html" rel="prev" title="Examples of Associativity and Commutativity in Numeric Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Contagion-in-Numeric-Operations">
+<div class="nav-panel">
+<p>
+Next: <a href="Viewing-Integers-as-Bits-and-Bytes.html" accesskey="n" rel="next">Viewing Integers as Bits and Bytes</a>, Previous: <a href="Examples-of-Associativity-and-Commutativity-in-Numeric-Operations.html" accesskey="p" rel="prev">Examples of Associativity and Commutativity in Numeric Operations</a>, Up: <a href="Numeric-Operations.html" accesskey="u" rel="up">Numeric Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Contagion-in-Numeric-Operations-1"><span>12.1.1.3 Contagion in Numeric Operations<a class="copiable-link" href="#Contagion-in-Numeric-Operations-1"> &para;</a></span></h4>
+
+<p>For information about the contagion rules for implicit coercions of <i class="i">arguments</i> 
+in numeric operations, see
+     <a class="ref" href="Rule-of-Float-Precision-Contagion.html">Rule of Float Precision Contagion</a>, 
+     <a class="ref" href="Rule-of-Float-and-Rational-Contagion.html">Rule of Float and Rational Contagion</a>,
+ and <a class="ref" href="Rule-of-Complex-Contagion.html">Rule of Complex Contagion</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Control-Transfer-Clauses.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Control Transfer Clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Control Transfer Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Control Transfer Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Miscellaneous-Clauses.html" rel="up" title="Miscellaneous Clauses">
+<link href="Examples-of-NAMED-clause.html" rel="next" title="Examples of NAMED clause">
+<link href="Miscellaneous-Clauses.html" rel="prev" title="Miscellaneous Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Control-Transfer-Clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-NAMED-clause.html" accesskey="n" rel="next">Examples of NAMED clause</a>, Previous: <a href="Miscellaneous-Clauses.html" accesskey="p" rel="prev">Miscellaneous Clauses</a>, Up: <a href="Miscellaneous-Clauses.html" accesskey="u" rel="up">Miscellaneous Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Control-Transfer-Clauses-1"><span>6.1.7.1 Control Transfer Clauses<a class="copiable-link" href="#Control-Transfer-Clauses-1"> &para;</a></span></h4>
+
+<p>The <code class="t">named</code> construct
+establishes a name for an <i class="i">implicit block</i> surrounding the 
+</p>
+<p>entire
+</p>
+<p><b class="b">loop</b> so that the <b class="b">return-from</b> <i class="i">special operator</i> can be used to return 
+values from or to exit <b class="b">loop</b>.   
+Only one name per <b class="b">loop</b> <i class="i">form</i> can be assigned.
+If used, the <code class="t">named</code> construct must be the first clause in the loop expression.
+</p>
+<p>The <code class="t">return</code> construct takes one <i class="i">form</i>. 
+ Any <i class="i">values</i> returned by the <i class="i">form</i> 
+ are immediately returned by the <b class="b">loop</b> form.
+</p>
+<p>This construct is similar to the <b class="b">return-from</b> <i class="i">special operator</i> and the <b class="b">return</b> <i class="i">macro</i>.
+The <code class="t">return</code> construct 
+</p>
+<p>does not execute any <code class="t">finally</code> clause that 
+</p>
+<p>the <b class="b">loop</b> <i class="i">form</i>
+</p>
+<p>is given.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Corresponding-Characters-in-the-Other-Case.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Corresponding Characters in the Other Case (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Corresponding Characters in the Other Case (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Corresponding Characters in the Other Case (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Categories.html" rel="up" title="Character Categories">
+<link href="Case-of-Implementation_002dDefined-Characters.html" rel="next" title="Case of Implementation-Defined Characters">
+<link href="Lowercase-Characters.html" rel="prev" title="Lowercase Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Corresponding-Characters-in-the-Other-Case">
+<div class="nav-panel">
+<p>
+Next: <a href="Case-of-Implementation_002dDefined-Characters.html" accesskey="n" rel="next">Case of Implementation-Defined Characters</a>, Previous: <a href="Lowercase-Characters.html" accesskey="p" rel="prev">Lowercase Characters</a>, Up: <a href="Character-Categories.html" accesskey="u" rel="up">Character Categories</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Corresponding-Characters-in-the-Other-Case-1"><span>13.1.4.6 Corresponding Characters in the Other Case<a class="copiable-link" href="#Corresponding-Characters-in-the-Other-Case-1"> &para;</a></span></h4>
+
+<p>The <i class="i">uppercase</i> <i class="i">standard characters</i> <code class="t">A</code> through <code class="t">Z</code> mentioned above
+respectively correspond to
+the <i class="i">lowercase</i> <i class="i">standard characters</i> <code class="t">a</code> through <code class="t">z</code> mentioned above.
+For example, the <i class="i">uppercase</i> <i class="i">character</i> <code class="t">E</code> 
+corresponds to the <i class="i">lowercase</i> <i class="i">character</i> <code class="t">e</code>, and vice versa.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Creating-Conditions.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Creating Conditions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Creating Conditions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Creating Conditions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Condition-System-Concepts.html" rel="up" title="Condition System Concepts">
+<link href="Printing-Conditions.html" rel="next" title="Printing Conditions">
+<link href="Condition-Types.html" rel="prev" title="Condition Types">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Creating-Conditions">
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Conditions.html" accesskey="n" rel="next">Printing Conditions</a>, Previous: <a href="Condition-Types.html" accesskey="p" rel="prev">Condition Types</a>, Up: <a href="Condition-System-Concepts.html" accesskey="u" rel="up">Condition System Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Creating-Conditions-1"><span>9.1.2 Creating Conditions<a class="copiable-link" href="#Creating-Conditions-1"> &para;</a></span></h4>
+
+<p>The function <b class="b">make-condition</b> can be used to construct
+a <i class="i">condition</i> <i class="i">object</i> explicitly.  Functions such as <b class="b">error</b>,
+<b class="b">cerror</b>, <b class="b">signal</b>, and <b class="b">warn</b> operate on
+<i class="i">conditions</i> and might create <i class="i">condition</i> <i class="i">objects</i>
+implicitly.  Macros such as <b class="b">ccase</b>, <b class="b">ctypecase</b>,
+<b class="b">ecase</b>, <b class="b">etypecase</b>, <b class="b">check-type</b>, and
+<b class="b">assert</b> might also implicitly create (and <i class="i">signal</i>)
+<i class="i">conditions</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Condition-Designators.html" accesskey="1">Condition Designators</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Creating-Instances-of-Classes.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Creating Instances of Classes (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Creating Instances of Classes (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Creating Instances of Classes (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Classes.html" rel="up" title="Classes">
+<link href="Inheritance.html" rel="next" title="Inheritance">
+<link href="Defining-Classes.html" rel="prev" title="Defining Classes">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Creating-Instances-of-Classes">
+<div class="nav-panel">
+<p>
+Next: <a href="Inheritance.html" accesskey="n" rel="next">Inheritance</a>, Previous: <a href="Defining-Classes.html" accesskey="p" rel="prev">Defining Classes</a>, Up: <a href="Classes.html" accesskey="u" rel="up">Classes</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Creating-Instances-of-Classes-1"><span>4.3.3 Creating Instances of Classes<a class="copiable-link" href="#Creating-Instances-of-Classes-1"> &para;</a></span></h4>
+
+<p>The generic function <b class="b">make-instance</b> creates and returns a new
+<i class="i">instance</i> of a <i class="i">class</i>.  
+The object system provides several mechanisms for
+specifying how a new <i class="i">instance</i> is to be initialized.  For example, it
+is possible to specify the initial values for <i class="i">slots</i> in newly created
+<i class="i">instances</i> 
+either by giving arguments to <b class="b">make-instance</b> or by
+providing default initial values.  Further initialization activities
+can be performed by <i class="i">methods</i> written for <i class="i">generic functions</i> 
+that are
+part of the initialization protocol.  The complete initialization
+protocol is described in <a class="ref" href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Customizing-Class-Redefinition.html
@@ -0,0 +1,59 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Customizing Class Redefinition (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Customizing Class Redefinition (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Customizing Class Redefinition (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Redefining-Classes.html" rel="up" title="Redefining Classes">
+<link href="Initializing-Newly-Added-Local-Slots-_0028Redefining-Classes_0029.html" rel="prev" title="Initializing Newly Added Local Slots (Redefining Classes)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Customizing-Class-Redefinition">
+<div class="nav-panel">
+<p>
+Previous: <a href="Initializing-Newly-Added-Local-Slots-_0028Redefining-Classes_0029.html" accesskey="p" rel="prev">Initializing Newly Added Local Slots</a>, Up: <a href="Redefining-Classes.html" accesskey="u" rel="up">Redefining Classes</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Customizing-Class-Redefinition-1"><span>4.3.6.3 Customizing Class Redefinition<a class="copiable-link" href="#Customizing-Class-Redefinition-1"> &para;</a></span></h4>
+
+<p>[Reviewer Note by Barmar: This description is hard to follow.]
+</p>
+<p><i class="i">Methods</i> for <b class="b">update-instance-for-redefined-class</b> may be 
+defined to specify actions to be taken when an <i class="i">instance</i> is updated.
+If only <i class="i">after methods</i> for <b class="b">update-instance-for-redefined-class</b> are
+defined, they will be run after the system-supplied primary <i class="i">method</i> for
+initialization and therefore will not interfere with the default
+behavior of <b class="b">update-instance-for-redefined-class</b>.  Because no
+initialization arguments are passed to <b class="b">update-instance-for-redefined-class</b>
+when it is called by the system, the 
+<i class="i">initialization forms</i> for <i class="i">slots</i> 
+that are filled by <i class="i">before methods</i> for <b class="b">update-instance-for-redefined-class</b> 
+will not be evaluated by <b class="b">shared-initialize</b>.
+</p>
+<p><i class="i">Methods</i> for <b class="b">shared-initialize</b> may be defined to customize
+<i class="i">class</i> redefinition.  For more information, see <a class="ref" href="Shared_002dInitialize.html">Shared-Initialize</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Customizing-Reinitialization.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Customizing Reinitialization (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Customizing Reinitialization (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Customizing Reinitialization (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reinitializing-an-Instance.html" rel="up" title="Reinitializing an Instance">
+<link href="Reinitializing-an-Instance.html" rel="prev" title="Reinitializing an Instance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Customizing-Reinitialization">
+<div class="nav-panel">
+<p>
+Previous: <a href="Reinitializing-an-Instance.html" accesskey="p" rel="prev">Reinitializing an Instance</a>, Up: <a href="Reinitializing-an-Instance.html" accesskey="u" rel="up">Reinitializing an Instance</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Customizing-Reinitialization-1"><span>7.3.1 Customizing Reinitialization<a class="copiable-link" href="#Customizing-Reinitialization-1"> &para;</a></span></h4>
+
+<p><i class="i">Methods</i> for <b class="b">reinitialize-instance</b> may be defined to specify
+actions to be taken when an <i class="i">instance</i> is updated.  If only
+<i class="i">after methods</i> for <b class="b">reinitialize-instance</b> are defined, 
+they will be run after the system-supplied primary <i class="i">method</i> for 
+initialization and therefore will not interfere with the default behavior of 
+<b class="b">reinitialize-instance</b>.
+</p>
+<p><i class="i">Methods</i> for <b class="b">shared-initialize</b> may be defined to customize 
+<i class="i">class</i> redefinition.  For more information, see <a class="ref" href="Shared_002dInitialize.html">Shared-Initialize</a>.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Customizing-the-Change-of-Class-of-an-Instance.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Customizing the Change of Class of an Instance (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Customizing the Change of Class of an Instance (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Customizing the Change of Class of an Instance (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Changing-the-Class-of-an-Instance.html" rel="up" title="Changing the Class of an Instance">
+<link href="Initializing-Newly-Added-Local-Slots-_0028Changing-the-Class-of-an-Instance_0029.html" rel="prev" title="Initializing Newly Added Local Slots (Changing the Class of an Instance)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Customizing-the-Change-of-Class-of-an-Instance">
+<div class="nav-panel">
+<p>
+Previous: <a href="Initializing-Newly-Added-Local-Slots-_0028Changing-the-Class-of-an-Instance_0029.html" accesskey="p" rel="prev">Initializing Newly Added Local Slots</a>, Up: <a href="Changing-the-Class-of-an-Instance.html" accesskey="u" rel="up">Changing the Class of an Instance</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Customizing-the-Change-of-Class-of-an-Instance-1"><span>7.2.3 Customizing the Change of Class of an Instance<a class="copiable-link" href="#Customizing-the-Change-of-Class-of-an-Instance-1"> &para;</a></span></h4>
+
+<p><i class="i">Methods</i> for <b class="b">update-instance-for-different-class</b> may be defined
+to specify actions to be taken when an <i class="i">instance</i> is updated.  If only
+<i class="i">after methods</i> for <b class="b">update-instance-for-different-class</b> are
+defined, they will be run after the system-supplied primary <i class="i">method</i> for
+initialization and will not interfere with the default behavior of
+<b class="b">update-instance-for-different-class</b>.
+</p>
+<p><i class="i">Methods</i> 
+for <b class="b">shared-initialize</b> may be defined to customize <i class="i">class</i>
+redefinition.  For more information, see <a class="ref" href="Shared_002dInitialize.html">Shared-Initialize</a>.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Data-Type-Definition.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Data Type Definition (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Data Type Definition (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Data Type Definition (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types.html" rel="up" title="Types">
+<link href="Type-Relationships.html" rel="next" title="Type Relationships">
+<link href="Types.html" rel="prev" title="Types">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Data-Type-Definition">
+<div class="nav-panel">
+<p>
+Next: <a href="Type-Relationships.html" accesskey="n" rel="next">Type Relationships</a>, Previous: <a href="Types.html" accesskey="p" rel="prev">Types</a>, Up: <a href="Types.html" accesskey="u" rel="up">Types</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Data-Type-Definition-1"><span>4.2.1 Data Type Definition<a class="copiable-link" href="#Data-Type-Definition-1"> &para;</a></span></h4>
+
+<p>Information about <i class="i">type</i> usage is located in 
+the sections specified in <i class="i">Figure~4&ndash;1</i>. 
+<i class="i">Figure~4&ndash;7</i> lists some <i class="i">classes</i> 
+that are particularly relevant to the object system.
+<i class="i">Figure~9&ndash;1</i> lists the defined <i class="i">condition</i> <i class="i">types</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <b class="b">Section</b>                                Data Type                         <!-- /@w -->
+  _________________________________________________________________________<!-- /@w -->
+  <a class="ref" href="Classes.html">Classes</a>                        Object System types               <!-- /@w -->
+  <a class="ref" href="Slots.html">Slots</a>                          Object System types               <!-- /@w -->
+  <a class="ref" href="Objects.html">Objects</a>                        Object System types               <!-- /@w -->
+  <a class="ref" href="Generic-Functions-and-Methods.html">Generic Functions and Methods</a>  Object System types               <!-- /@w -->
+  <a class="ref" href="Condition-System-Concepts.html">Condition System Concepts</a>      Condition System types            <!-- /@w -->
+  <a class="ref" href="Types-and-Classes.html">Types and Classes</a>              Miscellaneous types               <!-- /@w -->
+  <a class="ref" href="Syntax.html">Syntax</a>                         All types&mdash;read and print syntax  <!-- /@w -->
+  <a class="ref" href="The-Lisp-Printer.html">The Lisp Printer</a>               All types&mdash;print syntax           <!-- /@w -->
+  <a class="ref" href="Compilation.html">Compilation</a>                    All types&mdash;compilation issues     <!-- /@w -->
+
+           Figure 4&ndash;1: Cross-References to Data Type Information          <!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Data-and-Control-Flow-Dictionary.html
@@ -0,0 +1,115 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Data and Control Flow Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Data and Control Flow Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Data and Control Flow Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow.html" rel="up" title="Data and Control Flow">
+<link href="Transfer-of-Control-to-an-Exit-Point.html" rel="prev" title="Transfer of Control to an Exit Point">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Data-and-Control-Flow-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Transfer-of-Control-to-an-Exit-Point.html" accesskey="p" rel="prev">Transfer of Control to an Exit Point</a>, Up: <a href="Data-and-Control-Flow.html" accesskey="u" rel="up">Data and Control Flow</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Data-and-Control-Flow-Dictionary-1"><span>5.3 Data and Control Flow Dictionary<a class="copiable-link" href="#Data-and-Control-Flow-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="apply.html" accesskey="1">apply                                                            [Function]</a></li>
+<li><a href="defun.html" accesskey="2">defun                                                               [Macro]</a></li>
+<li><a href="fdefinition.html" accesskey="3">fdefinition                                                      [Accessor]</a></li>
+<li><a href="fboundp.html" accesskey="4">fboundp                                                          [Function]</a></li>
+<li><a href="fmakunbound.html" accesskey="5">fmakunbound                                                      [Function]</a></li>
+<li><a href="flet.html" accesskey="6">flet, labels, macrolet                                   [Special Operator]</a></li>
+<li><a href="funcall.html" accesskey="7">funcall                                                          [Function]</a></li>
+<li><a href="function-_0028Special-Operator_0029.html" accesskey="8">function                                                 [Special Operator]</a></li>
+<li><a href="function_002dlambda_002dexpression.html" accesskey="9">function-lambda-expression                                       [Function]</a></li>
+<li><a href="functionp.html">functionp                                                        [Function]</a></li>
+<li><a href="compiled_002dfunction_002dp.html">compiled-function-p                                              [Function]</a></li>
+<li><a href="call_002darguments_002dlimit.html">call-arguments-limit                                    [Constant Variable]</a></li>
+<li><a href="lambda_002dlist_002dkeywords.html">lambda-list-keywords                                    [Constant Variable]</a></li>
+<li><a href="lambda_002dparameters_002dlimit.html">lambda-parameters-limit                                 [Constant Variable]</a></li>
+<li><a href="defconstant.html">defconstant                                                         [Macro]</a></li>
+<li><a href="defparameter.html">defparameter, defvar                                                [Macro]</a></li>
+<li><a href="destructuring_002dbind.html">destructuring-bind                                                  [Macro]</a></li>
+<li><a href="let.html">let, let*                                                [Special Operator]</a></li>
+<li><a href="progv.html">progv                                                    [Special Operator]</a></li>
+<li><a href="setq.html">setq                                                         [Special Form]</a></li>
+<li><a href="psetq.html">psetq                                                               [Macro]</a></li>
+<li><a href="block.html">block                                                    [Special Operator]</a></li>
+<li><a href="catch.html">catch                                                    [Special Operator]</a></li>
+<li><a href="go.html">go                                                       [Special Operator]</a></li>
+<li><a href="return_002dfrom.html">return-from                                              [Special Operator]</a></li>
+<li><a href="return.html">return                                                              [Macro]</a></li>
+<li><a href="tagbody.html">tagbody                                                  [Special Operator]</a></li>
+<li><a href="throw.html">throw                                                    [Special Operator]</a></li>
+<li><a href="unwind_002dprotect.html">unwind-protect                                           [Special Operator]</a></li>
+<li><a href="nil.html">nil                                                     [Constant Variable]</a></li>
+<li><a href="not.html">not                                                              [Function]</a></li>
+<li><a href="t.html">t                                                       [Constant Variable]</a></li>
+<li><a href="eq.html">eq                                                               [Function]</a></li>
+<li><a href="eql.html">eql                                                              [Function]</a></li>
+<li><a href="equal.html">equal                                                            [Function]</a></li>
+<li><a href="equalp.html">equalp                                                           [Function]</a></li>
+<li><a href="identity.html">identity                                                         [Function]</a></li>
+<li><a href="complement.html">complement                                                       [Function]</a></li>
+<li><a href="constantly.html">constantly                                                       [Function]</a></li>
+<li><a href="every.html">every, some, notevery, notany                                    [Function]</a></li>
+<li><a href="and.html">and                                                                 [Macro]</a></li>
+<li><a href="cond.html">cond                                                                [Macro]</a></li>
+<li><a href="if.html">if                                                       [Special Operator]</a></li>
+<li><a href="or.html">or                                                                  [Macro]</a></li>
+<li><a href="when.html">when, unless                                                        [Macro]</a></li>
+<li><a href="case.html">case, ccase, ecase                                                  [Macro]</a></li>
+<li><a href="typecase.html">typecase, ctypecase, etypecase                                      [Macro]</a></li>
+<li><a href="multiple_002dvalue_002dbind.html">multiple-value-bind                                                 [Macro]</a></li>
+<li><a href="multiple_002dvalue_002dcall.html">multiple-value-call                                      [Special Operator]</a></li>
+<li><a href="multiple_002dvalue_002dlist.html">multiple-value-list                                                 [Macro]</a></li>
+<li><a href="multiple_002dvalue_002dprog1.html">multiple-value-prog1                                     [Special Operator]</a></li>
+<li><a href="multiple_002dvalue_002dsetq.html">multiple-value-setq                                                 [Macro]</a></li>
+<li><a href="values.html">values                                                           [Accessor]</a></li>
+<li><a href="values_002dlist.html">values-list                                                      [Function]</a></li>
+<li><a href="multiple_002dvalues_002dlimit.html">multiple-values-limit                                   [Constant Variable]</a></li>
+<li><a href="nth_002dvalue.html">nth-value                                                           [Macro]</a></li>
+<li><a href="prog.html">prog, prog*                                                         [Macro]</a></li>
+<li><a href="prog1.html">prog1, prog2                                                        [Macro]</a></li>
+<li><a href="progn.html">progn                                                    [Special Operator]</a></li>
+<li><a href="define_002dmodify_002dmacro.html">define-modify-macro                                                 [Macro]</a></li>
+<li><a href="defsetf.html">defsetf                                                             [Macro]</a></li>
+<li><a href="define_002dsetf_002dexpander.html">define-setf-expander                                                [Macro]</a></li>
+<li><a href="get_002dsetf_002dexpansion.html">get-setf-expansion                                               [Function]</a></li>
+<li><a href="setf.html">setf, psetf                                                         [Macro]</a></li>
+<li><a href="shiftf.html">shiftf                                                              [Macro]</a></li>
+<li><a href="rotatef.html">rotatef                                                             [Macro]</a></li>
+<li><a href="control_002derror.html">control-error                                              [Condition Type]</a></li>
+<li><a href="program_002derror.html">program-error                                              [Condition Type]</a></li>
+<li><a href="undefined_002dfunction.html">undefined-function                                         [Condition Type]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Data-and-Control-Flow.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Data and Control Flow (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Data and Control Flow (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Data and Control Flow (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Iteration.html" rel="next" title="Iteration">
+<link href="Types-and-Classes.html" rel="prev" title="Types and Classes">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Data-and-Control-Flow">
+<div class="nav-panel">
+<p>
+Next: <a href="Iteration.html" accesskey="n" rel="next">Iteration</a>, Previous: <a href="Types-and-Classes.html" accesskey="p" rel="prev">Types and Classes</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Data-and-Control-Flow-1"><span>5 Data and Control Flow<a class="copiable-link" href="#Data-and-Control-Flow-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Generalized-Reference.html" accesskey="1">Generalized Reference</a></li>
+<li><a href="Transfer-of-Control-to-an-Exit-Point.html" accesskey="2">Transfer of Control to an Exit Point</a></li>
+<li><a href="Data-and-Control-Flow-Dictionary.html" accesskey="3">Data and Control Flow Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Data_002ddirected-Destructuring-by-Lambda-Lists.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Data-directed Destructuring by Lambda Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Data-directed Destructuring by Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Data-directed Destructuring by Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Macro-Lambda-Lists.html" rel="up" title="Macro Lambda Lists">
+<link href="Examples-of-Data_002ddirected-Destructuring-by-Lambda-Lists.html" rel="next" title="Examples of Data-directed Destructuring by Lambda Lists">
+<link href="Destructuring-by-Lambda-Lists.html" rel="prev" title="Destructuring by Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Data_002ddirected-Destructuring-by-Lambda-Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Data_002ddirected-Destructuring-by-Lambda-Lists.html" accesskey="n" rel="next">Examples of Data-directed Destructuring by Lambda Lists</a>, Previous: <a href="Destructuring-by-Lambda-Lists.html" accesskey="p" rel="prev">Destructuring by Lambda Lists</a>, Up: <a href="Macro-Lambda-Lists.html" accesskey="u" rel="up">Macro Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Data_002ddirected-Destructuring-by-Lambda-Lists-1"><span>3.4.4.2 Data-directed Destructuring by Lambda Lists<a class="copiable-link" href="#Data_002ddirected-Destructuring-by-Lambda-Lists-1"> &para;</a></span></h4>
+
+<p>In data-directed destructuring,
+the pattern is a sample <i class="i">object</i> of the <i class="i">type</i> to be decomposed.
+Wherever a component is to be extracted, 
+a <i class="i">symbol</i> appears in the pattern; 
+this <i class="i">symbol</i> is the name of the variable whose value will be that component.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Debugging-Utilities.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Debugging Utilities (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Debugging Utilities (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Debugging Utilities (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-External-Environment.html" rel="up" title="The External Environment">
+<link href="Environment-Inquiry.html" rel="next" title="Environment Inquiry">
+<link href="Top-level-loop.html" rel="prev" title="Top level loop">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Debugging-Utilities">
+<div class="nav-panel">
+<p>
+Next: <a href="Environment-Inquiry.html" accesskey="n" rel="next">Environment Inquiry</a>, Previous: <a href="Top-level-loop.html" accesskey="p" rel="prev">Top level loop</a>, Up: <a href="The-External-Environment.html" accesskey="u" rel="up">The External Environment</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Debugging-Utilities-1"><span>25.1.2 Debugging Utilities<a class="copiable-link" href="#Debugging-Utilities-1"> &para;</a></span></h4>
+
+<p>Figure 25&ndash;2 shows <i class="i">defined names</i> relating to
+debugging.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  *debugger-hook*  documentation    step     <!-- /@w -->
+  apropos          dribble          time     <!-- /@w -->
+  apropos-list     ed               trace    <!-- /@w -->
+  break            inspect          untrace  <!-- /@w -->
+  describe         invoke-debugger           <!-- /@w -->
+
+  Figure 25&ndash;2: Defined names relating to debugging<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Declaration-Identifiers.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Declaration Identifiers (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Declaration Identifiers (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Declaration Identifiers (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Declarations.html" rel="up" title="Declarations">
+<link href="Declaration-Scope.html" rel="next" title="Declaration Scope">
+<link href="Declaration-Specifiers.html" rel="prev" title="Declaration Specifiers">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Declaration-Identifiers">
+<div class="nav-panel">
+<p>
+Next: <a href="Declaration-Scope.html" accesskey="n" rel="next">Declaration Scope</a>, Previous: <a href="Declaration-Specifiers.html" accesskey="p" rel="prev">Declaration Specifiers</a>, Up: <a href="Declarations.html" accesskey="u" rel="up">Declarations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Declaration-Identifiers-1"><span>3.3.3 Declaration Identifiers<a class="copiable-link" href="#Declaration-Identifiers-1"> &para;</a></span></h4>
+
+<p>Figure 3&ndash;9 shows a list of all 
+<i class="i">declaration identifiers</i>
+<a class="index-entry-id" id="index-declaration-identifier"></a>
+</p>
+<p>defined by this standard.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  declaration     ignore     special  <!-- /@w -->
+  dynamic-extent  inline     type     <!-- /@w -->
+  ftype           notinline           <!-- /@w -->
+  ignorable       optimize            <!-- /@w -->
+
+  Figure 3&ndash;9: Common Lisp Declaration Identifiers<!-- /@w -->
+
+</pre></div></div>
+
+<p>An implementation is free to support other (<i class="i">implementation-defined</i>)
+<i class="i">declaration identifiers</i> as well.  
+A warning might be issued
+if a <i class="i">declaration identifier</i> 
+is not among those defined above,
+is not defined by the <i class="i">implementation</i>,
+is not a <i class="i">type</i> <i class="i">name</i>, 
+and has not been declared in a <b class="b">declaration</b> <i class="i">proclamation</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Shorthand-notation-for-Type-Declarations.html" accesskey="1">Shorthand notation for Type Declarations</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Declaration-Scope.html
@@ -0,0 +1,113 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Declaration Scope (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Declaration Scope (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Declaration Scope (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Declarations.html" rel="up" title="Declarations">
+<link href="Declaration-Identifiers.html" rel="prev" title="Declaration Identifiers">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Declaration-Scope">
+<div class="nav-panel">
+<p>
+Previous: <a href="Declaration-Identifiers.html" accesskey="p" rel="prev">Declaration Identifiers</a>, Up: <a href="Declarations.html" accesskey="u" rel="up">Declarations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Declaration-Scope-1"><span>3.3.4 Declaration Scope<a class="copiable-link" href="#Declaration-Scope-1"> &para;</a></span></h4>
+
+<p><i class="i">Declarations</i> can be divided into two kinds: those that apply to the
+<i class="i">bindings</i> of <i class="i">variables</i> or <i class="i">functions</i>; and those that
+do not apply to <i class="i">bindings</i>.
+</p>
+<p>A <i class="i">declaration</i> that appears at the head of a binding <i class="i">form</i> 
+and applies to a <i class="i">variable</i> or <i class="i">function</i> <i class="i">binding</i> 
+made by that <i class="i">form</i> is called a <i class="i">bound declaration</i>
+<a class="index-entry-id" id="index-bound-declaration"></a>
+; 
+such a <i class="i">declaration</i> affects both the <i class="i">binding</i> and
+any references within the <i class="i">scope</i> of the <i class="i">declaration</i>.  
+</p>
+<p><i class="i">Declarations</i> that are not <i class="i">bound declarations</i> are called
+<i class="i">free declarations</i>
+<a class="index-entry-id" id="index-free-declaration"></a>
+.
+</p>
+<p>A <i class="i">free declaration</i> in a <i class="i">form</i> F1 that applies to a <i class="i">binding</i>
+for a <i class="i">name</i> N <i class="i">established</i> by some <i class="i">form</i> F2
+of which F1 is a <i class="i">subform</i>
+affects only references to N within F1; it does not to apply to
+other references to N outside of F1, nor does it affect the manner
+in which the <i class="i">binding</i> of N by F2 is <i class="i">established</i>.
+</p>
+<p><i class="i">Declarations</i> that do not apply to <i class="i">bindings</i> can only appear 
+as <i class="i">free declarations</i>.
+</p>
+<p>The <i class="i">scope</i> of a <i class="i">bound declaration</i> is the same as the
+<i class="i">lexical scope</i>
+of the <i class="i">binding</i> to which it applies;
+for <i class="i">special variables</i>,
+this means the <i class="i">scope</i> that the <i class="i">binding</i> 
+would have had had it been a <i class="i">lexical binding</i>.
+</p>
+<p>Unless explicitly stated otherwise, the <i class="i">scope</i> of a 
+<i class="i">free declaration</i> includes only the body <i class="i">subforms</i> of 
+the <i class="i">form</i> at whose head it appears, and no other <i class="i">subforms</i>.
+The <i class="i">scope</i> of <i class="i">free declarations</i> specifically does not
+include <i class="i">initialization forms</i> for <i class="i">bindings</i> established
+by the <i class="i">form</i> containing the <i class="i">declarations</i>.
+</p>
+<p>Some <i class="i">iteration forms</i> include step, end-test, or result 
+<i class="i">subforms</i> that are also included in the <i class="i">scope</i>
+of <i class="i">declarations</i> that appear in the <i class="i">iteration form</i>.
+Specifically, the <i class="i">iteration forms</i> and <i class="i">subforms</i> involved
+are:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">do</b>, <b class="b">do*</b>:  
+  <i class="i">step-forms</i>, <i class="i">end-test-form</i>, and <i class="i">result-forms</i>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">dolist</b>, <b class="b">dotimes</b>:
+  <i class="i">result-form</i>
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">do-all-symbols</b>, <b class="b">do-external-symbols</b>, <b class="b">do-symbols</b>:
+  <i class="i">result-form</i>
+</p></dd>
+</dl>
+
+
+<ul class="mini-toc">
+<li><a href="Examples-of-Declaration-Scope.html" accesskey="1">Examples of Declaration Scope</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Declaration-Identifiers.html">Declaration Identifiers</a>, Up: <a href="Declarations.html">Declarations</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Declaration-Specifiers.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Declaration Specifiers (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Declaration Specifiers (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Declaration Specifiers (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Declarations.html" rel="up" title="Declarations">
+<link href="Declaration-Identifiers.html" rel="next" title="Declaration Identifiers">
+<link href="Minimal-Declaration-Processing-Requirements.html" rel="prev" title="Minimal Declaration Processing Requirements">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Declaration-Specifiers">
+<div class="nav-panel">
+<p>
+Next: <a href="Declaration-Identifiers.html" accesskey="n" rel="next">Declaration Identifiers</a>, Previous: <a href="Minimal-Declaration-Processing-Requirements.html" accesskey="p" rel="prev">Minimal Declaration Processing Requirements</a>, Up: <a href="Declarations.html" accesskey="u" rel="up">Declarations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Declaration-Specifiers-1"><span>3.3.2 Declaration Specifiers<a class="copiable-link" href="#Declaration-Specifiers-1"> &para;</a></span></h4>
+
+<p>A <i class="i">declaration specifier</i>
+<a class="index-entry-id" id="index-declaration-specifier"></a>
+ is an <i class="i">expression</i> that can appear at
+top level of a <b class="b">declare</b> expression or a <b class="b">declaim</b> form, or as 
+the argument to <b class="b">proclaim</b>.
+It is a <i class="i">list</i> whose <i class="i">car</i> is a <i class="i">declaration identifier</i>,
+and whose <i class="i">cdr</i> is data interpreted according to rules specific to
+the <i class="i">declaration identifier</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Declarations.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Declarations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Declarations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Declarations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation.html" rel="up" title="Evaluation and Compilation">
+<link href="Lambda-Lists.html" rel="next" title="Lambda Lists">
+<link href="Compilation.html" rel="prev" title="Compilation">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Declarations">
+<div class="nav-panel">
+<p>
+Next: <a href="Lambda-Lists.html" accesskey="n" rel="next">Lambda Lists</a>, Previous: <a href="Compilation.html" accesskey="p" rel="prev">Compilation</a>, Up: <a href="Evaluation-and-Compilation.html" accesskey="u" rel="up">Evaluation and Compilation</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Declarations-1"><span>3.3 Declarations<a class="copiable-link" href="#Declarations-1"> &para;</a></span></h3>
+
+
+<p><i class="i">Declarations</i>
+<a class="index-entry-id" id="index-declaration"></a>
+ provide a way of specifying information for use by
+program processors, such as the evaluator or the compiler.
+</p>
+<p><i class="i">Local declarations</i>
+<a class="index-entry-id" id="index-local-declaration"></a>
+</p>
+<p>can be embedded in executable code using <b class="b">declare</b>.
+<i class="i">Global declarations</i>
+<a class="index-entry-id" id="index-global-declaration"></a>
+, 
+or <i class="i">proclamations</i>
+<a class="index-entry-id" id="index-proclamation"></a>
+,
+are established by <b class="b">proclaim</b> or <b class="b">declaim</b>.
+</p>
+<p>The <b class="b">the</b> <i class="i">special form</i> provides a shorthand notation for 
+making a <i class="i">local declaration</i> about the <i class="i">type</i> of the
+<i class="i">value</i> of a given <i class="i">form</i>.
+</p>
+<p>The consequences are undefined if a program violates a <i class="i">declaration</i>
+or a <i class="i">proclamation</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Minimal-Declaration-Processing-Requirements.html" accesskey="1">Minimal Declaration Processing Requirements</a></li>
+<li><a href="Declaration-Specifiers.html" accesskey="2">Declaration Specifiers</a></li>
+<li><a href="Declaration-Identifiers.html" accesskey="3">Declaration Identifiers</a></li>
+<li><a href="Declaration-Scope.html" accesskey="4">Declaration Scope</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Declarative-Method-Combination.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Declarative Method Combination (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Declarative Method Combination (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Declarative Method Combination (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Method-Selection-and-Combination.html" rel="up" title="Method Selection and Combination">
+<link href="Built_002din-Method-Combination-Types.html" rel="next" title="Built-in Method Combination Types">
+<link href="Standard-Method-Combination.html" rel="prev" title="Standard Method Combination">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Declarative-Method-Combination">
+<div class="nav-panel">
+<p>
+Next: <a href="Built_002din-Method-Combination-Types.html" accesskey="n" rel="next">Built-in Method Combination Types</a>, Previous: <a href="Standard-Method-Combination.html" accesskey="p" rel="prev">Standard Method Combination</a>, Up: <a href="Method-Selection-and-Combination.html" accesskey="u" rel="up">Method Selection and Combination</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Declarative-Method-Combination-1"><span>7.6.6.6 Declarative Method Combination<a class="copiable-link" href="#Declarative-Method-Combination-1"> &para;</a></span></h4>
+
+<p>The macro <b class="b">define-method-combination</b> defines new forms of method
+combination.  It provides a mechanism for customizing the production
+of the effective method. The default procedure for producing an
+effective method is described in <a class="ref" href="Determining-the-Effective-Method.html">Determining the Effective Method</a>.
+There are two forms of
+<b class="b">define-method-combination</b>.  The short form is a simple facility while
+the long form is more powerful and more verbose.  The long form
+resembles <b class="b">defmacro</b> in that the body is an expression that
+computes a Lisp form; it provides mechanisms for implementing
+arbitrary control structures within method combination and for
+arbitrary processing of method <i class="i">qualifiers</i>.  
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Declaring-the-Validity-of-Initialization-Arguments.html
@@ -0,0 +1,132 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Declaring the Validity of Initialization Arguments (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Declaring the Validity of Initialization Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Declaring the Validity of Initialization Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Object-Creation-and-Initialization.html" rel="up" title="Object Creation and Initialization">
+<link href="Defaulting-of-Initialization-Arguments.html" rel="next" title="Defaulting of Initialization Arguments">
+<link href="Initialization-Arguments.html" rel="prev" title="Initialization Arguments">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Declaring-the-Validity-of-Initialization-Arguments">
+<div class="nav-panel">
+<p>
+Next: <a href="Defaulting-of-Initialization-Arguments.html" accesskey="n" rel="next">Defaulting of Initialization Arguments</a>, Previous: <a href="Initialization-Arguments.html" accesskey="p" rel="prev">Initialization Arguments</a>, Up: <a href="Object-Creation-and-Initialization.html" accesskey="u" rel="up">Object Creation and Initialization</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Declaring-the-Validity-of-Initialization-Arguments-1"><span>7.1.2 Declaring the Validity of Initialization Arguments<a class="copiable-link" href="#Declaring-the-Validity-of-Initialization-Arguments-1"> &para;</a></span></h4>
+
+<p>Initialization arguments are checked for validity in each of the four
+situations that use them.  An initialization argument may be valid in
+one situation and not another. For example, the system-supplied     
+primary <i class="i">method</i> for <b class="b">make-instance</b> defined for 
+the <i class="i">class</i> <b class="b">standard-class</b> checks the validity of its initialization arguments
+and signals an error if an initialization argument is supplied that is
+not declared as valid in that situation.
+</p>
+<p>There are two means for declaring initialization arguments valid.
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>Initialization arguments that fill <i class="i">slots</i> are declared as valid
+by the <code class="t">:initarg</code> slot option to <b class="b">defclass</b>.  The
+<code class="t">:initarg</code> slot option is inherited from <i class="i">superclasses</i>.  Thus
+the set of valid initialization arguments that fill <i class="i">slots</i> for a
+<i class="i">class</i> is the union of the initialization arguments that fill
+<i class="i">slots</i> declared as valid by that <i class="i">class</i> and its
+<i class="i">superclasses</i>.  Initialization arguments that fill <i class="i">slots</i>
+are valid in all four contexts.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Initialization arguments that supply arguments to <i class="i">methods</i> are
+declared as valid by defining those <i class="i">methods</i>.  The keyword name of
+each keyword parameter specified in the <i class="i">method</i>&rsquo;s 
+<i class="i">lambda list</i> becomes an initialization argument for all <i class="i">classes</i> 
+for which the <i class="i">method</i> is applicable.
+</p>
+<p>The presence of <code class="t">&amp;allow-other-keys</code> in the
+<i class="i">lambda list</i> of an applicable method disables validity checking of 
+initialization arguments.
+</p>
+<p>Thus <i class="i">method</i> inheritance
+controls the set of valid initialization arguments that supply arguments
+to <i class="i">methods</i>.  The <i class="i">generic functions</i> for which <i class="i">method</i>
+definitions serve to declare initialization arguments valid are as
+follows:
+</p><dl class="table">
+<dt>&ndash;</dt>
+<dd><p>Making an <i class="i">instance</i> of a <i class="i">class</i>:
+<b class="b">allocate-instance</b>, <b class="b">initialize-instance</b>, and
+<b class="b">shared-initialize</b>.  Initialization arguments declared as valid
+by these <i class="i">methods</i> are valid when making 
+an <i class="i">instance</i> of a <i class="i">class</i>.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>Re-initializing an <i class="i">instance</i>:
+<b class="b">reinitialize-instance</b> and <b class="b">shared-initialize</b>.
+Initialization arguments declared as valid by these <i class="i">methods</i> are
+valid when re-initializing an <i class="i">instance</i>.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>Updating an <i class="i">instance</i> to conform to a redefined <i class="i">class</i>:
+<b class="b">update-instance-for-redefined-class</b> and <b class="b">shared-initialize</b>.
+Initialization arguments declared as valid by these <i class="i">methods</i> are
+valid when updating an <i class="i">instance</i> to conform to a redefined <i class="i">class</i>.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>Updating an <i class="i">instance</i> to conform to the definition of a
+different <i class="i">class</i>:
+<b class="b">update-instance-for-different-class</b> and <b class="b">shared-initialize</b>.
+Initialization arguments declared as valid by these <i class="i">methods</i> are
+valid when updating an <i class="i">instance</i> to conform to the definition
+of a different <i class="i">class</i>.
+</p>
+</dd>
+</dl>
+
+</dd>
+</dl>
+
+<p>The set of valid initialization arguments for a <i class="i">class</i> is the set of
+valid initialization arguments that either fill <i class="i">slots</i> or supply
+arguments to <i class="i">methods</i>, along with the predefined initialization
+argument <code class="t">:allow-other-keys</code>.  The default value for 
+<code class="t">:allow-other-keys</code> is <b class="b">nil</b>.
+</p>
+<p>Validity checking of initialization arguments is disabled if the value of
+the initialization argument <code class="t">:allow-other-keys</code> is <i class="i">true</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Defaulting-of-Initialization-Arguments.html">Defaulting of Initialization Arguments</a>, Previous: <a href="Initialization-Arguments.html">Initialization Arguments</a>, Up: <a href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Decoded-Time.html
@@ -0,0 +1,115 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Decoded Time (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Decoded Time (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Decoded Time (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Time.html" rel="up" title="Time">
+<link href="Universal-Time.html" rel="next" title="Universal Time">
+<link href="Time.html" rel="prev" title="Time">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Decoded-Time">
+<div class="nav-panel">
+<p>
+Next: <a href="Universal-Time.html" accesskey="n" rel="next">Universal Time</a>, Previous: <a href="Time.html" accesskey="p" rel="prev">Time</a>, Up: <a href="Time.html" accesskey="u" rel="up">Time</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Decoded-Time-1"><span>25.1.4.1 Decoded Time<a class="copiable-link" href="#Decoded-Time-1"> &para;</a></span></h4>
+
+<p>A <i class="i">decoded time</i>
+<a class="index-entry-id" id="index-decoded-time"></a>
+ is an ordered series of nine values that, taken together,
+represent a point in calendar time (ignoring <i class="i">leap seconds</i>):
+</p>
+<dl class="table">
+<dt><b class="b">Second</b></dt>
+<dd><p>An <i class="i">integer</i> between 0 and~59, inclusive.
+</p>
+</dd>
+<dt><b class="b">Minute</b></dt>
+<dd><p>An <i class="i">integer</i> between 0 and~59, inclusive.
+</p>
+</dd>
+<dt><b class="b">Hour</b></dt>
+<dd><p>An <i class="i">integer</i> between 0 and~23, inclusive.
+</p>
+</dd>
+<dt><b class="b">Date</b></dt>
+<dd><p>An <i class="i">integer</i> between 1 and~31, inclusive (the upper limit actually
+depends on the month and year, of course).
+</p>
+</dd>
+<dt><b class="b">Month</b></dt>
+<dd><p>An <i class="i">integer</i> between 1 and 12, inclusive;
+1~means January, 2~means February, and so on; 12~means December.
+</p>
+</dd>
+<dt><b class="b">Year</b></dt>
+<dd><p>An <i class="i">integer</i> indicating the year A.D.  However, if this 
+<i class="i">integer</i>
+is between 0 and 99, the &ldquo;obvious&rdquo; year is used; more precisely,
+that year is assumed that is equal to the 
+<i class="i">integer</i> modulo 100 and
+within fifty years of the current year (inclusive backwards
+and exclusive forwards).  
+Thus, in the year 1978, year 28 is 1928
+but year 27 is 2027.  (Functions that return time in this format always return
+a full year number.) 
+</p>
+</dd>
+<dt><b class="b">Day of week</b></dt>
+<dd><p>An <i class="i">integer</i> between~0 and~6, inclusive;
+0~means Monday, 1~means Tuesday, and so on; 6~means Sunday.
+</p>
+</dd>
+<dt><b class="b">Daylight saving time flag</b></dt>
+<dd><p>A <i class="i">generalized boolean</i> that,
+if <i class="i">true</i>, indicates that daylight saving time is in effect.
+</p>
+</dd>
+<dt><b class="b">Time zone</b></dt>
+<dd><p>A <i class="i">time zone</i>.
+</p>
+</dd>
+</dl>
+
+<p>Figure 25&ndash;5 shows <i class="i">defined names</i> relating to <i class="i">decoded time</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  decode-universal-time  get-decoded-time  <!-- /@w -->
+
+  Figure 25&ndash;5: Defined names involving time in Decoded Time.<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Universal-Time.html">Universal Time</a>, Previous: <a href="Time.html">Time</a>, Up: <a href="Time.html">Time</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Default-Print_002dObject-Methods.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Default Print-Object Methods (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Default Print-Object Methods (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Default Print-Object Methods (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Lisp-Printer.html" rel="up" title="The Lisp Printer">
+<link href="Examples-of-Printer-Behavior.html" rel="next" title="Examples of Printer Behavior">
+<link href="Printer-Dispatching.html" rel="prev" title="Printer Dispatching">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Default-Print_002dObject-Methods">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Printer-Behavior.html" accesskey="n" rel="next">Examples of Printer Behavior</a>, Previous: <a href="Printer-Dispatching.html" accesskey="p" rel="prev">Printer Dispatching</a>, Up: <a href="The-Lisp-Printer.html" accesskey="u" rel="up">The Lisp Printer</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Default-Print_002dObject-Methods-1"><span>22.1.3 Default Print-Object Methods<a class="copiable-link" href="#Default-Print_002dObject-Methods-1"> &para;</a></span></h4>
+
+<p>This section describes the default behavior of 
+<b class="b">print-object</b> methods for the <i class="i">standardized</i> <i class="i">types</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Printing-Numbers.html" accesskey="1">Printing Numbers</a></li>
+<li><a href="Printing-Integers.html" accesskey="2">Printing Integers</a></li>
+<li><a href="Printing-Ratios.html" accesskey="3">Printing Ratios</a></li>
+<li><a href="Printing-Floats.html" accesskey="4">Printing Floats</a></li>
+<li><a href="Printing-Complexes.html" accesskey="5">Printing Complexes</a></li>
+<li><a href="Note-about-Printing-Numbers.html" accesskey="6">Note about Printing Numbers</a></li>
+<li><a href="Printing-Characters.html" accesskey="7">Printing Characters</a></li>
+<li><a href="Printing-Symbols.html" accesskey="8">Printing Symbols</a></li>
+<li><a href="Package-Prefixes-for-Symbols.html" accesskey="9">Package Prefixes for Symbols</a></li>
+<li><a href="Effect-of-Readtable-Case-on-the-Lisp-Printer.html">Effect of Readtable Case on the Lisp Printer</a></li>
+<li><a href="Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Printer.html">Examples of Effect of Readtable Case on the Lisp Printer</a></li>
+<li><a href="Printing-Strings.html">Printing Strings</a></li>
+<li><a href="Printing-Lists-and-Conses.html">Printing Lists and Conses</a></li>
+<li><a href="Printing-Bit-Vectors.html">Printing Bit Vectors</a></li>
+<li><a href="Printing-Other-Vectors.html">Printing Other Vectors</a></li>
+<li><a href="Printing-Other-Arrays.html">Printing Other Arrays</a></li>
+<li><a href="Examples-of-Printing-Arrays.html">Examples of Printing Arrays</a></li>
+<li><a href="Printing-Random-States.html">Printing Random States</a></li>
+<li><a href="Printing-Pathnames.html">Printing Pathnames</a></li>
+<li><a href="Printing-Structures.html">Printing Structures</a></li>
+<li><a href="Printing-Other-Objects.html">Printing Other Objects</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Defaulting-of-Initialization-Arguments.html
@@ -0,0 +1,113 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Defaulting of Initialization Arguments (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Defaulting of Initialization Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Defaulting of Initialization Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Object-Creation-and-Initialization.html" rel="up" title="Object Creation and Initialization">
+<link href="Rules-for-Initialization-Arguments.html" rel="next" title="Rules for Initialization Arguments">
+<link href="Declaring-the-Validity-of-Initialization-Arguments.html" rel="prev" title="Declaring the Validity of Initialization Arguments">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Defaulting-of-Initialization-Arguments">
+<div class="nav-panel">
+<p>
+Next: <a href="Rules-for-Initialization-Arguments.html" accesskey="n" rel="next">Rules for Initialization Arguments</a>, Previous: <a href="Declaring-the-Validity-of-Initialization-Arguments.html" accesskey="p" rel="prev">Declaring the Validity of Initialization Arguments</a>, Up: <a href="Object-Creation-and-Initialization.html" accesskey="u" rel="up">Object Creation and Initialization</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Defaulting-of-Initialization-Arguments-1"><span>7.1.3 Defaulting of Initialization Arguments<a class="copiable-link" href="#Defaulting-of-Initialization-Arguments-1"> &para;</a></span></h4>
+
+<p>A default value <i class="i">form</i> can be supplied for an initialization
+argument by using the <code class="t">:default-initargs</code> <i class="i">class</i> option.  If an
+initialization argument is declared valid by some particular <i class="i">class</i>,
+its default  value form might be specified by a different <i class="i">class</i>. 
+In this case <code class="t">:default-initargs</code> is used to supply a default value
+for an inherited initialization argument.
+</p>
+<p>The <code class="t">:default-initargs</code> option is used only to provide default
+values for initialization arguments; it does not declare a <i class="i">symbol</i> 
+as a valid initialization argument name.  Furthermore, 
+the <code class="t">:default-initargs</code> option is used only to provide default values for
+initialization arguments when making an <i class="i">instance</i>.
+</p>
+<p>The argument to the <code class="t">:default-initargs</code> class 
+option is a list of
+alternating initialization argument names and <i class="i">forms</i>.  
+Each <i class="i">form</i> is the
+default  value form for the corresponding initialization
+argument.  The default  value <i class="i">form</i> of an initialization
+argument is used and evaluated only if that initialization argument
+does not appear in the arguments to <b class="b">make-instance</b> and is not
+defaulted by a more specific <i class="i">class</i>.  The default  value <i class="i">form</i> is
+evaluated in the lexical environment of the <b class="b">defclass</b> form that
+supplied it; the resulting value is used as the initialization
+argument&rsquo;s value.
+</p>
+<p>The initialization arguments supplied to <b class="b">make-instance</b> are combined
+with defaulted initialization arguments to produce a 
+<i class="i">defaulted initialization argument list</i>. A 
+<i class="i">defaulted initialization argument list</i>
+is a list of alternating initialization argument names and
+values in which unsupplied initialization arguments are defaulted and in
+which the explicitly supplied initialization arguments appear earlier in
+the list than the defaulted initialization arguments.  Defaulted
+initialization arguments are ordered according to the order in the 
+<i class="i">class precedence list</i> of the <i class="i">classes</i> that supplied the default values.
+</p>
+<p>There is a distinction between the purposes of the 
+<code class="t">:default-initargs</code> and the <code class="t">:initform</code> options with respect to the
+initialization of <i class="i">slots</i>.  The <code class="t">:default-initargs</code> 
+class option
+provides a mechanism for the user to give a default  value <i class="i">form</i>
+for an initialization argument without knowing whether the
+initialization argument initializes a <i class="i">slot</i> 
+or is passed to a <i class="i">method</i>.
+If that initialization argument is not explicitly supplied in a call
+to <b class="b">make-instance</b>, the default  value <i class="i">form</i> is used, just
+as if it had been supplied in the call.  In contrast, the 
+<code class="t">:initform</code> slot option provides a mechanism for the user to give a
+default initial value form for a <i class="i">slot</i>.  An <code class="t">:initform</code> form is
+used to initialize a <i class="i">slot</i> only if no initialization argument
+associated with that <i class="i">slot</i> is given as an argument to 
+<b class="b">make-instance</b> or is defaulted by <code class="t">:default-initargs</code>.
+</p>
+<a class="index-entry-id" id="index-order-of-evaluation-7"></a>
+
+<a class="index-entry-id" id="index-evaluation-order-7"></a>
+
+<p>The order of evaluation of default value <i class="i">forms</i> for initialization
+arguments and the order of evaluation of <code class="t">:initform</code> forms are
+undefined.  If the order of evaluation is important, 
+<b class="b">initialize-instance</b> or <b class="b">shared-initialize</b> <i class="i">methods</i> 
+should be used
+instead.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Rules-for-Initialization-Arguments.html">Rules for Initialization Arguments</a>, Previous: <a href="Declaring-the-Validity-of-Initialization-Arguments.html">Declaring the Validity of Initialization Arguments</a>, Up: <a href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Define_002dmethod_002dcombination-Arguments-Lambda-Lists.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Define-method-combination Arguments Lambda Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Define-method-combination Arguments Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Define-method-combination Arguments Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Lambda-Lists.html" rel="up" title="Lambda Lists">
+<link href="Syntactic-Interaction-of-Documentation-Strings-and-Declarations.html" rel="next" title="Syntactic Interaction of Documentation Strings and Declarations">
+<link href="Define_002dmodify_002dmacro-Lambda-Lists.html" rel="prev" title="Define-modify-macro Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Define_002dmethod_002dcombination-Arguments-Lambda-Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Syntactic-Interaction-of-Documentation-Strings-and-Declarations.html" accesskey="n" rel="next">Syntactic Interaction of Documentation Strings and Declarations</a>, Previous: <a href="Define_002dmodify_002dmacro-Lambda-Lists.html" accesskey="p" rel="prev">Define-modify-macro Lambda Lists</a>, Up: <a href="Lambda-Lists.html" accesskey="u" rel="up">Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Define_002dmethod_002dcombination-Arguments-Lambda-Lists-1"><span>3.4.10 Define-method-combination Arguments Lambda Lists<a class="copiable-link" href="#Define_002dmethod_002dcombination-Arguments-Lambda-Lists-1"> &para;</a></span></h4>
+
+<p>A <i class="i">define-method-combination arguments lambda list</i>
+<a class="index-entry-id" id="index-define_002dmethod_002dcombination-arguments-lambda-list"></a>
+ is used by 
+the <code class="t">:arguments</code> option to <b class="b">define-method-combination</b>.
+</p>
+<p>A <i class="i">define-method-combination arguments lambda list</i> can contain the 
+<i class="i">lambda list keywords</i> shown in Figure 3&ndash;21.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <b class="b">&amp;allow-other-keys</b>  <b class="b">&amp;key</b>       <b class="b">&amp;rest</b>   <!-- /@w -->
+  <b class="b">&amp;aux</b>               <b class="b">&amp;optional</b>  <b class="b">&amp;whole</b>  <!-- /@w -->
+
+  Figure 3&ndash;21: Lambda List Keywords used by Define-method-combination arguments Lambda Lists<!-- /@w -->
+
+</pre></div></div>
+
+<p><i class="i">Define-method-combination arguments lambda lists</i> are similar to 
+<i class="i">ordinary lambda lists</i>, but also permit the use of <b class="b">&amp;whole</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Define_002dmodify_002dmacro-Lambda-Lists.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Define-modify-macro Lambda Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Define-modify-macro Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Define-modify-macro Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Lambda-Lists.html" rel="up" title="Lambda Lists">
+<link href="Define_002dmethod_002dcombination-Arguments-Lambda-Lists.html" rel="next" title="Define-method-combination Arguments Lambda Lists">
+<link href="Deftype-Lambda-Lists.html" rel="prev" title="Deftype Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Define_002dmodify_002dmacro-Lambda-Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Define_002dmethod_002dcombination-Arguments-Lambda-Lists.html" accesskey="n" rel="next">Define-method-combination Arguments Lambda Lists</a>, Previous: <a href="Deftype-Lambda-Lists.html" accesskey="p" rel="prev">Deftype Lambda Lists</a>, Up: <a href="Lambda-Lists.html" accesskey="u" rel="up">Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Define_002dmodify_002dmacro-Lambda-Lists-1"><span>3.4.9 Define-modify-macro Lambda Lists<a class="copiable-link" href="#Define_002dmodify_002dmacro-Lambda-Lists-1"> &para;</a></span></h4>
+
+<p>A <i class="i">define-modify-macro lambda list</i>
+<a class="index-entry-id" id="index-define_002dmodify_002dmacro-lambda-list"></a>
+ is used by 
+<b class="b">define-modify-macro</b>.
+</p>
+<p>A <i class="i">define-modify-macro lambda list</i> can contain the 
+<i class="i">lambda list keywords</i> shown in Figure 3&ndash;20.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <b class="b">&amp;optional</b>  <b class="b">&amp;rest</b>  <!-- /@w -->
+
+  Figure 3&ndash;20: Lambda List Keywords used by Define-modify-macro Lambda Lists<!-- /@w -->
+
+</pre></div></div>
+
+<p><i class="i">Define-modify-macro lambda lists</i> are similar to 
+<i class="i">ordinary lambda lists</i>, but do not support keyword arguments.
+<b class="b">define-modify-macro</b> has no need match keyword arguments, and
+a <i class="i">rest parameter</i> is sufficient.  <i class="i">Aux variables</i> are also
+not supported, since <b class="b">define-modify-macro</b> has no body <i class="i">forms</i>
+which could refer to such <i class="i">bindings</i>.  See the <i class="i">macro</i> <b class="b">define-modify-macro</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Defining-Classes.html
@@ -0,0 +1,123 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Defining Classes (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Defining Classes (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Defining Classes (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Classes.html" rel="up" title="Classes">
+<link href="Creating-Instances-of-Classes.html" rel="next" title="Creating Instances of Classes">
+<link href="Introduction-to-Classes.html" rel="prev" title="Introduction to Classes">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Defining-Classes">
+<div class="nav-panel">
+<p>
+Next: <a href="Creating-Instances-of-Classes.html" accesskey="n" rel="next">Creating Instances of Classes</a>, Previous: <a href="Introduction-to-Classes.html" accesskey="p" rel="prev">Introduction to Classes</a>, Up: <a href="Classes.html" accesskey="u" rel="up">Classes</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Defining-Classes-1"><span>4.3.2 Defining Classes<a class="copiable-link" href="#Defining-Classes-1"> &para;</a></span></h4>
+
+<p>The macro <b class="b">defclass</b> is used to define a new named <i class="i">class</i>.  
+</p>
+<p>The definition of a <i class="i">class</i> includes:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The <i class="i">name</i> of the new <i class="i">class</i>. 
+  For newly-defined <i class="i">classes</i> this <i class="i">name</i> is a <i class="i">proper name</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The list of the direct <i class="i">superclasses</i> of the new <i class="i">class</i>. 
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>A set of <i class="i">slot specifiers</i>
+<a class="index-entry-id" id="index-slot-specifier"></a>
+.
+  Each <i class="i">slot specifier</i> includes the <i class="i">name</i> of the <i class="i">slot</i> 
+  and zero or more <i class="i">slot</i> options.  A <i class="i">slot</i> option pertains 
+  only to a single <i class="i">slot</i>.  If a <i class="i">class</i> definition contains
+  two <i class="i">slot specifiers</i> with the same <i class="i">name</i>, an error is signaled.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>A set of <i class="i">class</i> options.  
+  Each <i class="i">class</i> option pertains to the <i class="i">class</i> as a whole.  
+</p>
+</dd>
+</dl>
+
+<p>The <i class="i">slot</i> options and <i class="i">class</i> options of 
+the <b class="b">defclass</b> form provide mechanisms for the following:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>Supplying a default initial value <i class="i">form</i> 
+for a given <i class="i">slot</i>.  
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Requesting that <i class="i">methods</i> for <i class="i">generic functions</i>
+be automatically generated for reading or writing <i class="i">slots</i>. 
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Controlling whether a given <i class="i">slot</i> is shared by 
+all <i class="i">instances</i>
+of the <i class="i">class</i> or whether each 
+<i class="i">instance</i> of the <i class="i">class</i> has its own <i class="i">slot</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Supplying a set of initialization arguments and initialization
+argument defaults to be used in <i class="i">instance</i> creation.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Indicating that the <i class="i">metaclass</i> is to be other 
+than the default.  The <code class="t">:metaclass</code> option is reserved for future use; 
+an implementation can be extended to make use of the <code class="t">:metaclass</code>
+option.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Indicating the expected <i class="i">type</i> for the value stored
+in the <i class="i">slot</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Indicating the <i class="i">documentation string</i> for the <i class="i">slot</i>.
+</p>
+</dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Creating-Instances-of-Classes.html">Creating Instances of Classes</a>, Previous: <a href="Introduction-to-Classes.html">Introduction to Classes</a>, Up: <a href="Classes.html">Classes</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Definition-of-Similarity.html
@@ -0,0 +1,196 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Definition of Similarity (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Definition of Similarity (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Definition of Similarity (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Literal-Objects-in-Compiled-Files.html" rel="up" title="Literal Objects in Compiled Files">
+<link href="Extensions-to-Similarity-Rules.html" rel="next" title="Extensions to Similarity Rules">
+<link href="Similarity-of-Aggregate-Objects.html" rel="prev" title="Similarity of Aggregate Objects">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Definition-of-Similarity">
+<div class="nav-panel">
+<p>
+Next: <a href="Extensions-to-Similarity-Rules.html" accesskey="n" rel="next">Extensions to Similarity Rules</a>, Previous: <a href="Similarity-of-Aggregate-Objects.html" accesskey="p" rel="prev">Similarity of Aggregate Objects</a>, Up: <a href="Literal-Objects-in-Compiled-Files.html" accesskey="u" rel="up">Literal Objects in Compiled Files</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Definition-of-Similarity-1"><span>3.2.4.4 Definition of Similarity<a class="copiable-link" href="#Definition-of-Similarity-1"> &para;</a></span></h4>
+
+<p>Two <i class="i">objects</i> S (in <i class="i">source code</i>) and C (in <i class="i">compiled code</i>)
+     are defined to be <i class="i">similar</i> if and only if 
+     they are both of one of the <i class="i">types</i> listed here
+      (or defined by the <i class="i">implementation</i>) 
+ and they both satisfy all additional requirements of <i class="i">similarity</i> 
+      indicated for that <i class="i">type</i>.
+</p>
+<dl class="table">
+<dt><b class="b">number</b></dt>
+<dd><p>Two <i class="i">numbers</i> S and C are <i class="i">similar</i> if they are of the same <i class="i">type</i>
+and represent the same mathematical value.
+</p>
+</dd>
+<dt><b class="b">character</b></dt>
+<dd><p>Two <i class="i">simple</i> <i class="i">characters</i> S and C are <i class="i">similar</i> 
+if they have <i class="i">similar</i> <i class="i">code</i> <i class="i">attributes</i>.
+</p>
+<p><i class="i">Implementations</i> providing additional, <i class="i">implementation-defined</i> 
+<i class="i">attributes</i> must define whether and how <i class="i">non-simple</i> <i class="i">characters</i> 
+can be regarded as <i class="i">similar</i>.
+</p>
+</dd>
+<dt><b class="b">symbol</b></dt>
+<dd><p>Two <i class="i">apparently uninterned</i> <i class="i">symbols</i> S and C are <i class="i">similar</i>
+if their
+<i class="i">names</i>
+are <i class="i">similar</i>.
+</p>
+<p>Two <i class="i">interned</i> symbols S and C are <i class="i">similar</i> 
+if their <i class="i">names</i> are <i class="i">similar</i>,
+and if either S is accessible in the <i class="i">current package</i> at compile time
+          and C is accessible in the <i class="i">current package</i> at load time,
+       or C is accessible in the <i class="i">package</i> that is <i class="i">similar</i> to
+          the <i class="i">home package</i> of S.
+</p>
+<p>(Note that <i class="i">similarity</i> of
+<i class="i">symbols</i> is dependent
+on neither the <i class="i">current readtable</i> nor how the <i class="i">function</i> <b class="b">read</b> would
+parse the <i class="i">characters</i> in the <i class="i">name</i> of the <i class="i">symbol</i>.)
+</p>
+</dd>
+<dt><b class="b">package</b></dt>
+<dd><p>Two <i class="i">packages</i> S and C are <i class="i">similar</i> if their <i class="i">names</i> are <i class="i">similar</i>.
+</p>
+<p>Note that although a <i class="i">package</i> <i class="i">object</i> is an <i class="i">externalizable object</i>,
+the programmer is responsible for ensuring that the corresponding <i class="i">package</i> is
+already in existence when code referencing it as a <i class="i">literal</i> <i class="i">object</i> 
+is <i class="i">loaded</i>.  The <i class="i">loader</i> finds the corresponding <i class="i">package</i> <i class="i">object</i>
+as if by calling <b class="b">find-package</b> with that <i class="i">name</i> as an <i class="i">argument</i>.
+An error is signaled by the <i class="i">loader</i> if no <i class="i">package</i> exists at load time.
+</p>
+</dd>
+<dt><b class="b">random-state</b></dt>
+<dd><p>Two <i class="i">random states</i> S and C are <i class="i">similar</i> if S
+would always produce the same sequence of pseudo-random numbers 
+as a <i class="i">copy</i>_5 of C
+when given as the <i class="i">random-state</i> <i class="i">argument</i> to the <i class="i">function</i> <b class="b">random</b>, 
+assuming equivalent <i class="i">limit</i> <i class="i">arguments</i> in each case.
+</p>
+<p>(Note that since C has been processed by the <i class="i">file compiler</i>,
+it cannot be used directly as an <i class="i">argument</i> to <b class="b">random</b>
+because <b class="b">random</b> would perform a side effect.)
+</p>
+</dd>
+<dt><b class="b">cons</b></dt>
+<dd><p>Two <i class="i">conses</i>, S and C, are <i class="i">similar</i> if
+    the <i class="i">car</i>_2 of S is <i class="i">similar</i> to the <i class="i">car</i>_2 of C,
+and the <i class="i">cdr</i>_2 of S is <i class="i">similar</i> to the <i class="i">cdr</i>_2 of C.
+</p>
+</dd>
+<dt><b class="b">array</b></dt>
+<dd><p>Two one-dimensional <i class="i">arrays</i>, S and C, are <i class="i">similar</i> if
+     the <i class="i">length</i> of S is <i class="i">similar</i> to the <i class="i">length</i> of C,
+     the <i class="i">actual array element type</i> of S is <i class="i">similar</i> to
+     the <i class="i">actual array element type</i> of C,
+ and each <i class="i">active</i> <i class="i">element</i> of S is <i class="i">similar</i> to
+      the corresponding <i class="i">element</i> of C.
+</p>
+<p>Two <i class="i">arrays</i> of <i class="i">rank</i> other than one, S and C, are <i class="i">similar</i> if
+     the <i class="i">rank</i> of S is <i class="i">similar</i> to the <i class="i">rank</i> of C,
+     each <i class="i">dimension</i>_1 of S is <i class="i">similar</i> to 
+      the corresponding <i class="i">dimension</i>_1 of C,
+     the <i class="i">actual array element type</i> of S is <i class="i">similar</i> to
+     the <i class="i">actual array element type</i> of C,
+ and each <i class="i">element</i> of S is <i class="i">similar</i> to
+      the corresponding <i class="i">element</i> of C.
+</p>
+<p>In addition,
+if S is a <i class="i">simple array</i>, then C must also be a <i class="i">simple array</i>.
+If S is a <i class="i">displaced array</i>,
+       has a <i class="i">fill pointer</i>,
+    or is <i class="i">actually adjustable</i>, 
+C is permitted to lack any or all of these qualities.
+</p>
+</dd>
+<dt><b class="b">hash-table</b></dt>
+<dd><p>Two <i class="i">hash tables</i> S and C are <i class="i">similar</i> if they meet the following
+three requirements:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>They both have the same test 
+ 	    (<i class="i">e.g.</i>, they are both <b class="b">eql</b> <i class="i">hash tables</i>).
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p>There is a unique one-to-one correspondence between the keys of
+           the two <i class="i">hash tables</i>, such that the corresponding keys are 
+	   <i class="i">similar</i>.
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>For all keys, the values associated with two corresponding keys
+           are <i class="i">similar</i>.
+</p></dd>
+</dl>
+
+<p>If there is more than one possible one-to-one correspondence between
+the keys of S and C, the consequences are unspecified.  
+A <i class="i">conforming program</i> cannot use a table such as S as an
+<i class="i">externalizable constant</i>.
+</p>
+</dd>
+<dt><b class="b">pathname</b></dt>
+<dd><p>Two <i class="i">pathnames</i> S and C are <i class="i">similar</i> if all corresponding 
+<i class="i">pathname components</i> are <i class="i">similar</i>.
+</p>
+</dd>
+<dt><b class="b">function</b></dt>
+<dd>
+<p><i class="i">Functions</i> are not <i class="i">externalizable objects</i>.
+</p>
+</dd>
+<dt><b class="b">structure-object</b> and <b class="b">standard-object</b></dt>
+<dd>
+<p>A general-purpose concept of <i class="i">similarity</i> does not exist for <i class="i">structures</i>
+and <i class="i">standard objects</i>.
+However, a <i class="i">conforming program</i> is permitted to define a <b class="b">make-load-form</b>
+<i class="i">method</i> for any <i class="i">class</i> K defined by that <i class="i">program</i> that is
+a <i class="i">subclass</i> of either <b class="b">structure-object</b> or <b class="b">standard-object</b>.
+The effect of such a <i class="i">method</i> is to define that an <i class="i">object</i> S of <i class="i">type</i> K
+in <i class="i">source code</i> is <i class="i">similar</i> to an <i class="i">object</i> C of <i class="i">type</i> K
+in <i class="i">compiled code</i> if C was constructed from <i class="i">code</i> produced by 
+calling <b class="b">make-load-form</b> on S.
+</p>
+</dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Extensions-to-Similarity-Rules.html">Extensions to Similarity Rules</a>, Previous: <a href="Similarity-of-Aggregate-Objects.html">Similarity of Aggregate Objects</a>, Up: <a href="Literal-Objects-in-Compiled-Files.html">Literal Objects in Compiled Files</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Definitions-of-Make_002dInstance-and-Initialize_002dInstance.html
@@ -0,0 +1,95 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Definitions of Make-Instance and Initialize-Instance (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Definitions of Make-Instance and Initialize-Instance (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Definitions of Make-Instance and Initialize-Instance (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Object-Creation-and-Initialization.html" rel="up" title="Object Creation and Initialization">
+<link href="Initialize_002dInstance.html" rel="prev" title="Initialize-Instance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Definitions-of-Make_002dInstance-and-Initialize_002dInstance">
+<div class="nav-panel">
+<p>
+Previous: <a href="Initialize_002dInstance.html" accesskey="p" rel="prev">Initialize-Instance</a>, Up: <a href="Object-Creation-and-Initialization.html" accesskey="u" rel="up">Object Creation and Initialization</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Definitions-of-Make_002dInstance-and-Initialize_002dInstance-1"><span>7.1.7 Definitions of Make-Instance and Initialize-Instance<a class="copiable-link" href="#Definitions-of-Make_002dInstance-and-Initialize_002dInstance-1"> &para;</a></span></h4>
+
+<p>The generic function <b class="b">make-instance</b> behaves as if it were defined as
+follows, except that certain optimizations are permitted:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmethod make-instance ((class standard-class) &amp;rest initargs)
+   ...
+   (let ((instance (apply #'allocate-instance class initargs)))
+     (apply #'initialize-instance instance initargs)
+     instance))
+
+ (defmethod make-instance ((class-name symbol) &amp;rest initargs)
+   (apply #'make-instance (find-class class-name) initargs))
+</pre></div>
+
+<p>The elided code in the definition of <b class="b">make-instance</b> 
+augments the <code class="t">initargs</code> with any <i class="i">defaulted initialization arguments</i> and
+checks the
+resulting
+initialization arguments to determine whether an initialization
+argument was supplied that neither filled a <i class="i">slot</i> nor supplied an argument
+to an applicable <i class="i">method</i>. 
+</p>
+<p>The generic function <b class="b">initialize-instance</b> behaves as if it were
+defined as follows, except that certain optimizations are permitted:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmethod initialize-instance ((instance standard-object) &amp;rest initargs)
+   (apply #'shared-initialize instance t initargs)))
+</pre></div>
+
+<p>These procedures can be customized.
+</p>
+<p>Customizing at the Programmer Interface level includes using the 
+<code class="t">:initform</code>, <code class="t">:initarg</code>, and <code class="t">:default-initargs</code> options to
+<b class="b">defclass</b>, as well as defining <i class="i">methods</i>
+for <b class="b">make-instance</b>, 
+<b class="b">allocate-instance</b>,
+and <b class="b">initialize-instance</b>.  It is also possible to define
+<i class="i">methods</i> for <b class="b">shared-initialize</b>, which would be invoked by the
+generic functions <b class="b">reinitialize-instance</b>, 
+<b class="b">update-instance-for-redefined-class</b>, 
+<b class="b">update-instance-for-different-class</b>, and 
+<b class="b">initialize-instance</b>.  
+The meta-object level supports additional
+customization.
+</p>
+<p>Implementations are permitted to make certain optimizations to 
+<b class="b">initialize-instance</b> and <b class="b">shared-initialize</b>.  
+The description of <b class="b">shared-initialize</b> in Chapter~7 mentions the
+possible optimizations.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Definitions.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Definitions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Definitions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Definitions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-_0028Introduction_0029.html" rel="up" title="Introduction (Introduction)">
+<link href="Conformance.html" rel="next" title="Conformance">
+<link href="Referenced-Publications.html" rel="prev" title="Referenced Publications">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Definitions">
+<div class="nav-panel">
+<p>
+Next: <a href="Conformance.html" accesskey="n" rel="next">Conformance</a>, Previous: <a href="Referenced-Publications.html" accesskey="p" rel="prev">Referenced Publications</a>, Up: <a href="Introduction-_0028Introduction_0029.html" accesskey="u" rel="up">Introduction</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Definitions-1"><span>1.4 Definitions<a class="copiable-link" href="#Definitions-1"> &para;</a></span></h3>
+
+
+<p>This section contains notational conventions and definitions of terms
+used in this manual.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Notational-Conventions.html" accesskey="1">Notational Conventions</a></li>
+<li><a href="Error-Terminology.html" accesskey="2">Error Terminology</a></li>
+<li><a href="Sections-Not-Formally-Part-Of-This-Standard.html" accesskey="3">Sections Not Formally Part Of This Standard</a></li>
+<li><a href="Interpreting-Dictionary-Entries.html" accesskey="4">Interpreting Dictionary Entries</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Defsetf-Lambda-Lists.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Defsetf Lambda Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Defsetf Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Defsetf Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Lambda-Lists.html" rel="up" title="Lambda Lists">
+<link href="Deftype-Lambda-Lists.html" rel="next" title="Deftype Lambda Lists">
+<link href="Boa-Lambda-Lists.html" rel="prev" title="Boa Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Defsetf-Lambda-Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Deftype-Lambda-Lists.html" accesskey="n" rel="next">Deftype Lambda Lists</a>, Previous: <a href="Boa-Lambda-Lists.html" accesskey="p" rel="prev">Boa Lambda Lists</a>, Up: <a href="Lambda-Lists.html" accesskey="u" rel="up">Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Defsetf-Lambda-Lists-1"><span>3.4.7 Defsetf Lambda Lists<a class="copiable-link" href="#Defsetf-Lambda-Lists-1"> &para;</a></span></h4>
+
+<p>A <i class="i">defsetf lambda list</i>
+<a class="index-entry-id" id="index-defsetf-lambda-list"></a>
+ is used by <b class="b">defsetf</b>.
+</p>
+<p>A <i class="i">defsetf lambda list</i> has the following syntax:
+</p>
+<p><i class="i">lambda-list</i>&nbsp;::=<span class="r">(</span>{<i class="i">var</i>}*<!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;optional</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;		&nbsp;<span class="r">(</span><i class="i">var</i>&nbsp;<span class="r">[</span>init-form&nbsp;<span class="r">[</span>supplied-p-parameter<span class="r">]</span><span class="r">]</span><span class="r">)</span>}*<code class="t">]</code><!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;rest</span>&nbsp;<i class="i">var</i><code class="t">]</code><!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;key</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;		&nbsp;	&nbsp;<span class="r">(</span>{<i class="i">var</i>&nbsp;|&nbsp;					&nbsp;<span class="r">(</span><i class="i">keyword-name</i>&nbsp;<i class="i">var</i><span class="r">)</span>}&nbsp;				&nbsp;	<span class="r">[</span>init-form&nbsp;<span class="r">[</span>supplied-p-parameter<span class="r">]</span><span class="r">]</span><span class="r">)</span>}*&nbsp;pt&nbsp;<span class="r">[</span><code class="t">&amp;allow-other-keys</code><span class="r">]</span><code class="t">]</code><!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;environment</span>&nbsp;<i class="i">var</i><code class="t">]</code><!-- /@w -->
+</p>
+<p>A <i class="i">defsetf lambda list</i> can contain the <i class="i">lambda list keywords</i> shown
+in Figure 3&ndash;19.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <b class="b">&amp;allow-other-keys</b>  <b class="b">&amp;key</b>       <b class="b">&amp;rest</b>  <!-- /@w -->
+  <b class="b">&amp;environment</b>       <b class="b">&amp;optional</b>         <!-- /@w -->
+
+  Figure 3&ndash;19: Lambda List Keywords used by Defsetf Lambda Lists<!-- /@w -->
+
+</pre></div></div>
+
+<p>A <i class="i">defsetf lambda list</i> differs from an <i class="i">ordinary lambda list</i> 
+only in that it does not permit the use of <b class="b">&amp;aux</b>, 
+and that it permits use of <b class="b">&amp;environment</b>, 
+     which introduces an <i class="i">environment parameter</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Deftype-Lambda-Lists.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Deftype Lambda Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Deftype Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Deftype Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Lambda-Lists.html" rel="up" title="Lambda Lists">
+<link href="Define_002dmodify_002dmacro-Lambda-Lists.html" rel="next" title="Define-modify-macro Lambda Lists">
+<link href="Defsetf-Lambda-Lists.html" rel="prev" title="Defsetf Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Deftype-Lambda-Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Define_002dmodify_002dmacro-Lambda-Lists.html" accesskey="n" rel="next">Define-modify-macro Lambda Lists</a>, Previous: <a href="Defsetf-Lambda-Lists.html" accesskey="p" rel="prev">Defsetf Lambda Lists</a>, Up: <a href="Lambda-Lists.html" accesskey="u" rel="up">Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Deftype-Lambda-Lists-1"><span>3.4.8 Deftype Lambda Lists<a class="copiable-link" href="#Deftype-Lambda-Lists-1"> &para;</a></span></h4>
+
+<p>A <i class="i">deftype lambda list</i>
+<a class="index-entry-id" id="index-deftype-lambda-list"></a>
+ is used by <b class="b">deftype</b>.
+</p>
+<p>A <i class="i">deftype lambda list</i> has the same syntax as a <i class="i">macro lambda list</i>,
+and can therefore contain the <i class="i">lambda list keywords</i> as a <i class="i">macro lambda list</i>.
+</p>
+<p>A <i class="i">deftype lambda list</i> differs from a <i class="i">macro lambda list</i> 
+only in that if no <i class="i">init-form</i> is supplied for an <i class="i">optional parameter</i>
+or <i class="i">keyword parameter</i> in the <i class="i">lambda-list</i>, the default <i class="i">value</i> 
+for that <i class="i">parameter</i> is the <i class="i">symbol</i> <b class="b">*</b> (rather than <b class="b">nil</b>).
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Deprecated-Argument-Conventions.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Deprecated Argument Conventions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Deprecated Argument Conventions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Deprecated Argument Conventions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Deprecated-Language-Features.html" rel="up" title="Deprecated Language Features">
+<link href="Deprecated-Variables.html" rel="next" title="Deprecated Variables">
+<link href="Deprecated-Functions.html" rel="prev" title="Deprecated Functions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Deprecated-Argument-Conventions">
+<div class="nav-panel">
+<p>
+Next: <a href="Deprecated-Variables.html" accesskey="n" rel="next">Deprecated Variables</a>, Previous: <a href="Deprecated-Functions.html" accesskey="p" rel="prev">Deprecated Functions</a>, Up: <a href="Deprecated-Language-Features.html" accesskey="u" rel="up">Deprecated Language Features</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Deprecated-Argument-Conventions-1"><span>1.8.2 Deprecated Argument Conventions<a class="copiable-link" href="#Deprecated-Argument-Conventions-1"> &para;</a></span></h4>
+
+<p>The ability to pass a numeric <i class="i">argument</i> to <b class="b">gensym</b> has been deprecated.
+</p>
+<p>The <code class="t">:test-not</code> <i class="i">argument</i> to the <i class="i">functions</i> in Figure 1&ndash;3 are deprecated.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  adjoin             nset-difference    search            <!-- /@w -->
+  assoc              nset-exclusive-or  set-difference    <!-- /@w -->
+  count              nsublis            set-exclusive-or  <!-- /@w -->
+  delete             nsubst             sublis            <!-- /@w -->
+  delete-duplicates  nsubstitute        subsetp           <!-- /@w -->
+  find               nunion             subst             <!-- /@w -->
+  intersection       position           substitute        <!-- /@w -->
+  member             rassoc             tree-equal        <!-- /@w -->
+  mismatch           remove             union             <!-- /@w -->
+  nintersection      remove-duplicates                    <!-- /@w -->
+
+  Figure 1&ndash;3: Functions with Deprecated :TEST-NOT Arguments<!-- /@w -->
+
+</pre></div></div>
+
+<p>The use of the situation names <b class="b">compile</b>, <b class="b">load</b>, and <b class="b">eval</b>
+in <b class="b">eval-when</b> is deprecated.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Deprecated-Functions.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Deprecated Functions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Deprecated Functions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Deprecated Functions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Deprecated-Language-Features.html" rel="up" title="Deprecated Language Features">
+<link href="Deprecated-Argument-Conventions.html" rel="next" title="Deprecated Argument Conventions">
+<link href="Deprecated-Language-Features.html" rel="prev" title="Deprecated Language Features">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Deprecated-Functions">
+<div class="nav-panel">
+<p>
+Next: <a href="Deprecated-Argument-Conventions.html" accesskey="n" rel="next">Deprecated Argument Conventions</a>, Previous: <a href="Deprecated-Language-Features.html" accesskey="p" rel="prev">Deprecated Language Features</a>, Up: <a href="Deprecated-Language-Features.html" accesskey="u" rel="up">Deprecated Language Features</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Deprecated-Functions-1"><span>1.8.1 Deprecated Functions<a class="copiable-link" href="#Deprecated-Functions-1"> &para;</a></span></h4>
+
+<p>The <i class="i">functions</i> in Figure 1&ndash;2 are deprecated.
+</p><div class="format">
+<div class="group"><pre class="format-preformatted">  assoc-if-not   nsubst-if-not       require            <!-- /@w -->
+  count-if-not   nsubstitute-if-not  set                <!-- /@w -->
+  delete-if-not  position-if-not     subst-if-not       <!-- /@w -->
+  find-if-not    provide             substitute-if-not  <!-- /@w -->
+  gentemp        rassoc-if-not                          <!-- /@w -->
+  member-if-not  remove-if-not                          <!-- /@w -->
+
+            Figure 1&ndash;2: Deprecated Functions           <!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Deprecated-Language-Features.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Deprecated Language Features (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Deprecated Language Features (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Deprecated Language Features (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-_0028Introduction_0029.html" rel="up" title="Introduction (Introduction)">
+<link href="Symbols-in-the-COMMON_002dLISP-Package.html" rel="next" title="Symbols in the COMMON-LISP Package">
+<link href="Language-Subsets.html" rel="prev" title="Language Subsets">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Deprecated-Language-Features">
+<div class="nav-panel">
+<p>
+Next: <a href="Symbols-in-the-COMMON_002dLISP-Package.html" accesskey="n" rel="next">Symbols in the COMMON-LISP Package</a>, Previous: <a href="Language-Subsets.html" accesskey="p" rel="prev">Language Subsets</a>, Up: <a href="Introduction-_0028Introduction_0029.html" accesskey="u" rel="up">Introduction</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Deprecated-Language-Features-1"><span>1.8 Deprecated Language Features<a class="copiable-link" href="#Deprecated-Language-Features-1"> &para;</a></span></h3>
+
+
+<p>Deprecated language features are not expected to appear in future <span class="r">Common Lisp</span>
+standards, but are required to be implemented for conformance with this
+standard; see <a class="ref" href="Required-Language-Features.html">Required Language Features</a>.
+</p>
+<p><i class="i">Conforming programs</i> can use deprecated features;
+however, it is considered good programming style to avoid them.
+It is permissible for the compiler to produce <i class="i">style warnings</i> 
+about the use of such features at compile time, 
+but there should be no such warnings at program execution time.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Deprecated-Functions.html" accesskey="1">Deprecated Functions</a></li>
+<li><a href="Deprecated-Argument-Conventions.html" accesskey="2">Deprecated Argument Conventions</a></li>
+<li><a href="Deprecated-Variables.html" accesskey="3">Deprecated Variables</a></li>
+<li><a href="Deprecated-Reader-Syntax.html" accesskey="4">Deprecated Reader Syntax</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Deprecated-Reader-Syntax.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Deprecated Reader Syntax (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Deprecated Reader Syntax (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Deprecated Reader Syntax (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Deprecated-Language-Features.html" rel="up" title="Deprecated Language Features">
+<link href="Deprecated-Variables.html" rel="prev" title="Deprecated Variables">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Deprecated-Reader-Syntax">
+<div class="nav-panel">
+<p>
+Previous: <a href="Deprecated-Variables.html" accesskey="p" rel="prev">Deprecated Variables</a>, Up: <a href="Deprecated-Language-Features.html" accesskey="u" rel="up">Deprecated Language Features</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Deprecated-Reader-Syntax-1"><span>1.8.4 Deprecated Reader Syntax<a class="copiable-link" href="#Deprecated-Reader-Syntax-1"> &para;</a></span></h4>
+
+<p>The <code class="t">#S</code> <i class="i">reader macro</i> forces keyword names into the <code class="t">KEYWORD</code> <i class="i">package</i>;
+see <a class="ref" href="Sharpsign-S.html">Sharpsign S</a>.
+This feature is deprecated;
+in the future, keyword names will be taken in the package they are read in,
+so <i class="i">symbols</i> that are actually in the <code class="t">KEYWORD</code> <i class="i">package</i>
+should be used if that is what is desired.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Deprecated-Variables.html
@@ -0,0 +1,45 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Deprecated Variables (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Deprecated Variables (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Deprecated Variables (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Deprecated-Language-Features.html" rel="up" title="Deprecated Language Features">
+<link href="Deprecated-Reader-Syntax.html" rel="next" title="Deprecated Reader Syntax">
+<link href="Deprecated-Argument-Conventions.html" rel="prev" title="Deprecated Argument Conventions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Deprecated-Variables">
+<div class="nav-panel">
+<p>
+Next: <a href="Deprecated-Reader-Syntax.html" accesskey="n" rel="next">Deprecated Reader Syntax</a>, Previous: <a href="Deprecated-Argument-Conventions.html" accesskey="p" rel="prev">Deprecated Argument Conventions</a>, Up: <a href="Deprecated-Language-Features.html" accesskey="u" rel="up">Deprecated Language Features</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Deprecated-Variables-1"><span>1.8.3 Deprecated Variables<a class="copiable-link" href="#Deprecated-Variables-1"> &para;</a></span></h4>
+
+<p>The <i class="i">variable</i> <b class="b">*modules*</b> is deprecated.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Designators.html
@@ -0,0 +1,101 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Designators (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Designators (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Designators (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Notational-Conventions.html" rel="up" title="Notational Conventions">
+<link href="Nonsense-Words.html" rel="next" title="Nonsense Words">
+<link href="NIL.html" rel="prev" title="NIL">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Designators">
+<div class="nav-panel">
+<p>
+Next: <a href="Nonsense-Words.html" accesskey="n" rel="next">Nonsense Words</a>, Previous: <a href="NIL.html" accesskey="p" rel="prev">NIL</a>, Up: <a href="Notational-Conventions.html" accesskey="u" rel="up">Notational Conventions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Designators-1"><span>1.4.1.12 Designators<a class="copiable-link" href="#Designators-1"> &para;</a></span></h4>
+
+<p>A <i class="i">designator</i>
+<a class="index-entry-id" id="index-designator"></a>
+ is an <i class="i">object</i> that denotes another <i class="i">object</i>.
+</p>
+<p>Where a <i class="i">parameter</i> of an <i class="i">operator</i> is described as a <i class="i">designator</i>,
+the description of the <i class="i">operator</i> is written in a way that assumes that
+the value of the <i class="i">parameter</i> is the denoted <i class="i">object</i>;
+that is, that the <i class="i">parameter</i> is already of the denoted <i class="i">type</i>.
+(The specific nature of the <i class="i">object</i> denoted by
+   a &ldquo;&lt;&lt;<i class="i">type</i>&gt;&gt; <i class="i">designator</i>&rdquo;
+or a &ldquo;<i class="i">designator</i> for a &lt;&lt;<i class="i">type</i>&gt;&gt;&rdquo; 
+can be found in the Glossary entry for &ldquo;&lt;&lt;<i class="i">type</i>&gt;&gt; <i class="i">designator</i>.&rdquo;)
+</p>
+<p>For example, &ldquo;<b class="b">nil</b>&rdquo; and &ldquo;the <i class="i">value</i> of <b class="b">*standard-output*</b>&rdquo; are operationally
+indistinguishable as <i class="i">stream designators</i>.  Similarly, 
+the <i class="i">symbol</i> <code class="t">foo</code> and the <i class="i">string</i> <code class="t">&quot;FOO&quot;</code> 
+are operationally indistinguishable as <i class="i">string designators</i>.  
+</p>
+<p>Except as otherwise noted, in a situation where the denoted <i class="i">object</i> 
+might be used multiple times, it is <i class="i">implementation-dependent</i>
+whether the <i class="i">object</i> is coerced only once or whether the coercion occurs
+each time the <i class="i">object</i> must be used.
+</p>
+<p>For example, <b class="b">mapcar</b> receives a <i class="i">function designator</i> as an argument,
+and its description is written as if this were simply a function.  In fact, it
+is <i class="i">implementation-dependent</i> whether the <i class="i">function designator</i> is 
+coerced right away or whether it is carried around internally in the form that
+it was given as an <i class="i">argument</i> and re-coerced each time it is needed.  In most
+cases, <i class="i">conforming programs</i> cannot detect the distinction, but there are some 
+pathological situations (particularly those involving self-redefining or 
+mutually-redefining functions) which do conform and which can detect this difference.
+The following program is a <i class="i">conforming program</i>, but might or might not have
+portably correct results, depending on whether its correctness depends on one or
+the other of the results:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun add-some (x) 
+   (defun add-some (x) (+ x 2))
+   (+ x 1)) &rArr;  ADD-SOME
+ (mapcar 'add-some '(1 2 3 4))
+&rArr;  (2 3 4 5)
+<i class="i">OR</i>&rArr; (2 4 5 6)
+</pre></div>
+
+<p>In a few rare situations, there may be a need in a dictionary entry
+to refer to the <i class="i">object</i> that was the original <i class="i">designator</i>
+for a <i class="i">parameter</i>.
+Since naming the <i class="i">parameter</i> would refer to the denoted <i class="i">object</i>,
+the phrase &ldquo;the &lt;&lt;<i class="i">parameter-name</i>&gt;&gt; <i class="i">designator</i>&rdquo; 
+can be used to refer to the <i class="i">designator</i> which was the <i class="i">argument</i>
+from which the <i class="i">value</i> of &lt;&lt;<i class="i">parameter-name</i>&gt;&gt; was computed.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Nonsense-Words.html">Nonsense Words</a>, Previous: <a href="NIL.html">NIL</a>, Up: <a href="Notational-Conventions.html">Notational Conventions</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Destructive-Operations.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Destructive Operations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Destructive Operations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Destructive Operations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation.html" rel="up" title="Evaluation and Compilation">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="next" title="Evaluation and Compilation Dictionary">
+<link href="Traversal-Rules-and-Side-Effects.html" rel="prev" title="Traversal Rules and Side Effects">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Destructive-Operations">
+<div class="nav-panel">
+<p>
+Next: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="n" rel="next">Evaluation and Compilation Dictionary</a>, Previous: <a href="Traversal-Rules-and-Side-Effects.html" accesskey="p" rel="prev">Traversal Rules and Side Effects</a>, Up: <a href="Evaluation-and-Compilation.html" accesskey="u" rel="up">Evaluation and Compilation</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Destructive-Operations-1"><span>3.7 Destructive Operations<a class="copiable-link" href="#Destructive-Operations-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Modification-of-Literal-Objects.html" accesskey="1">Modification of Literal Objects</a></li>
+<li><a href="Transfer-of-Control-during-a-Destructive-Operation.html" accesskey="2">Transfer of Control during a Destructive Operation</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Destructuring-Lambda-Lists.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Destructuring Lambda Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Destructuring Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Destructuring Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Lambda-Lists.html" rel="up" title="Lambda Lists">
+<link href="Boa-Lambda-Lists.html" rel="next" title="Boa Lambda Lists">
+<link href="Macro-Lambda-Lists.html" rel="prev" title="Macro Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Destructuring-Lambda-Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Boa-Lambda-Lists.html" accesskey="n" rel="next">Boa Lambda Lists</a>, Previous: <a href="Macro-Lambda-Lists.html" accesskey="p" rel="prev">Macro Lambda Lists</a>, Up: <a href="Lambda-Lists.html" accesskey="u" rel="up">Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Destructuring-Lambda-Lists-1"><span>3.4.5 Destructuring Lambda Lists<a class="copiable-link" href="#Destructuring-Lambda-Lists-1"> &para;</a></span></h4>
+
+<p>A <i class="i">destructuring lambda list</i>
+<a class="index-entry-id" id="index-destructuring-lambda-list"></a>
+ is used by <b class="b">destructuring-bind</b>.
+</p>
+<p><i class="i">Destructuring lambda lists</i> are closely related to 
+<i class="i">macro lambda lists</i>; see <a class="ref" href="Macro-Lambda-Lists.html">Macro Lambda Lists</a>.
+A <i class="i">destructuring lambda list</i> can contain all of the
+<i class="i">lambda list keywords</i> listed for <i class="i">macro lambda lists</i>
+except for <b class="b">&amp;environment</b>, and supports destructuring in the
+same way.  Inner <i class="i">lambda lists</i> nested within a <i class="i">macro lambda list</i>
+have the syntax of <i class="i">destructuring lambda lists</i>.
+</p>
+<p>A <i class="i">destructuring lambda list</i> has the following syntax:
+</p>
+
+<p><i class="i">reqvars</i>&nbsp;::={<i class="i">var</i>&nbsp;|&nbsp;!<i class="i">lambda-list</i>}*<!-- /@w -->
+</p>
+<p><i class="i">optvars</i>&nbsp;::=<code class="t">[</code><span class="r">&amp;optional</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;		&nbsp;<span class="r">(</span>{<i class="i">var</i>&nbsp;|&nbsp;!<i class="i">lambda-list</i>}&nbsp;<span class="r">[</span>init-form&nbsp;<span class="r">[</span>supplied-p-parameter<span class="r">]</span><span class="r">]</span><span class="r">)</span>}*<code class="t">]</code><!-- /@w -->
+</p>
+<p><i class="i">restvar</i>&nbsp;::=<code class="t">[</code>{<code class="t">&amp;rest</code><!-- /@w --> | <code class="t">&amp;body</code>} <i class="i">{<i class="i">var</i> | !<i class="i">lambda-list</i>}<code class="t">]</code></i>
+</p>
+<p><i class="i">keyvars</i>&nbsp;::=<span class="r">[</span><span class="r">&amp;key</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;		&nbsp;	&nbsp;<span class="r">(</span>{<i class="i">var</i>&nbsp;|&nbsp;					&nbsp;<span class="r">(</span><i class="i">keyword-name</i>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;!<i class="i">lambda-list</i>}<span class="r">)</span>}&nbsp;				&nbsp;	<span class="r">[</span>init-form&nbsp;<span class="r">[</span>supplied-p-parameter<span class="r">]</span><span class="r">]</span><span class="r">)</span>}*<!-- /@w -->
+&nbsp;<span class="r">[</span><code class="t">&amp;allow-other-keys</code><span class="r">]</span><span class="r">]</span><!-- /@w -->
+</p>
+
+<p><i class="i">auxvars</i>&nbsp;::=<code class="t">[</code><span class="r">&amp;aux</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;<span class="r">(</span><i class="i">var</i>&nbsp;<span class="r">[</span><i class="i">init-form</i><span class="r">]</span><span class="r">)</span>}*<code class="t">]</code><!-- /@w -->
+</p>
+<p><i class="i">envvar</i>&nbsp;::=<code class="t">[</code><span class="r">&amp;environment</span>&nbsp;<i class="i">var</i><code class="t">]</code><!-- /@w -->
+</p>
+<p><i class="i">wholevar</i>&nbsp;::=<code class="t">[</code><span class="r">&amp;whole</span>&nbsp;<i class="i">var</i><code class="t">]</code><!-- /@w -->
+</p>
+<p><i class="i">lambda-list</i>&nbsp;::=<span class="r">(</span>!<i class="i">wholevar</i>&nbsp;!<i class="i">reqvars</i>&nbsp;!<i class="i">optvars</i>&nbsp;!<i class="i">restvar</i>&nbsp;!<i class="i">keyvars</i>&nbsp;!<i class="i">auxvars</i><span class="r">)</span>&nbsp;|<!-- /@w -->
+&nbsp;<span class="r">(</span>!<i class="i">wholevar</i>&nbsp;!<i class="i">reqvars</i>&nbsp;!<i class="i">optvars</i>&nbsp;<code class="t">.</code>&nbsp;<i class="i">var</i><span class="r">)</span><!-- /@w -->
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Destructuring-Mismatch.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Destructuring Mismatch (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Destructuring Mismatch (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Destructuring Mismatch (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Argument-Mismatch-Detection.html" rel="up" title="Argument Mismatch Detection">
+<link href="Errors-When-Calling-a-Next-Method.html" rel="next" title="Errors When Calling a Next Method">
+<link href="Odd-Number-of-Keyword-Arguments.html" rel="prev" title="Odd Number of Keyword Arguments">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Destructuring-Mismatch">
+<div class="nav-panel">
+<p>
+Next: <a href="Errors-When-Calling-a-Next-Method.html" accesskey="n" rel="next">Errors When Calling a Next Method</a>, Previous: <a href="Odd-Number-of-Keyword-Arguments.html" accesskey="p" rel="prev">Odd Number of Keyword Arguments</a>, Up: <a href="Argument-Mismatch-Detection.html" accesskey="u" rel="up">Argument Mismatch Detection</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Destructuring-Mismatch-1"><span>3.5.1.8 Destructuring Mismatch<a class="copiable-link" href="#Destructuring-Mismatch-1"> &para;</a></span></h4>
+
+<p>When matching a <i class="i">destructuring lambda list</i> against a <i class="i">form</i>,
+the pattern and the <i class="i">form</i> must have compatible <i class="i">tree structure</i>,
+as described in <a class="ref" href="Macro-Lambda-Lists.html">Macro Lambda Lists</a>.
+</p>
+<p>Otherwise, in a <i class="i">safe call</i>,
+an error of <i class="i">type</i> <b class="b">program-error</b> must be signaled;
+and in an <i class="i">unsafe call</i> the <i class="i">situation</i> has undefined consequences.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Destructuring-by-Lambda-Lists.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Destructuring by Lambda Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Destructuring by Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Destructuring by Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Macro-Lambda-Lists.html" rel="up" title="Macro Lambda Lists">
+<link href="Data_002ddirected-Destructuring-by-Lambda-Lists.html" rel="next" title="Data-directed Destructuring by Lambda Lists">
+<link href="Macro-Lambda-Lists.html" rel="prev" title="Macro Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Destructuring-by-Lambda-Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Data_002ddirected-Destructuring-by-Lambda-Lists.html" accesskey="n" rel="next">Data-directed Destructuring by Lambda Lists</a>, Previous: <a href="Macro-Lambda-Lists.html" accesskey="p" rel="prev">Macro Lambda Lists</a>, Up: <a href="Macro-Lambda-Lists.html" accesskey="u" rel="up">Macro Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Destructuring-by-Lambda-Lists-1"><span>3.4.4.1 Destructuring by Lambda Lists<a class="copiable-link" href="#Destructuring-by-Lambda-Lists-1"> &para;</a></span></h4>
+
+<p>Anywhere in a <i class="i">macro lambda list</i> where a parameter
+name can appear, and where <i class="i">ordinary lambda list</i> syntax
+(as described in <a class="ref" href="Ordinary-Lambda-Lists.html">Ordinary Lambda Lists</a>) does not 
+otherwise allow a <i class="i">list</i>, a <i class="i">destructuring lambda list</i> 
+can appear in place
+of the parameter name.  When this is done, then the argument 
+that would match the parameter is treated as a (possibly dotted) <i class="i">list</i>,
+to be used as an argument list for satisfying the
+parameters in the embedded <i class="i">lambda list</i>.
+This is known as destructuring.
+</p>
+<p>Destructuring is the process of decomposing a compound <i class="i">object</i> into
+its component parts, using an abbreviated, declarative syntax, rather
+than writing it out by hand using the primitive component-accessing
+functions.  Each component part is bound to a variable.
+</p>
+<p>A destructuring operation requires an <i class="i">object</i> to be decomposed, 
+a pattern that specifies what components are to be extracted, and the names
+of the variables whose values are to be the components.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Destructuring.html
@@ -0,0 +1,178 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Destructuring (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Destructuring (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Destructuring (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-the-Loop-Facility.html" rel="up" title="Overview of the Loop Facility">
+<link href="Restrictions-on-Side_002dEffects.html" rel="next" title="Restrictions on Side-Effects">
+<link href="Order-of-Execution.html" rel="prev" title="Order of Execution">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Destructuring">
+<div class="nav-panel">
+<p>
+Next: <a href="Restrictions-on-Side_002dEffects.html" accesskey="n" rel="next">Restrictions on Side-Effects</a>, Previous: <a href="Order-of-Execution.html" accesskey="p" rel="prev">Order of Execution</a>, Up: <a href="Overview-of-the-Loop-Facility.html" accesskey="u" rel="up">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Destructuring-1"><span>6.1.1.15 Destructuring<a class="copiable-link" href="#Destructuring-1"> &para;</a></span></h4>
+
+<p>The <i class="i">d-type-spec</i> argument is used for destructuring.
+If the
+<i class="i">d-type-spec</i> argument consists solely of the <i class="i">type</i> <b class="b">fixnum</b>,
+<b class="b">float</b>, <b class="b">t</b>, or <b class="b">nil</b>, the <code class="t">of-type</code> keyword is optional.
+The <code class="t">of-type</code> construct is optional in these cases to provide backwards
+compatibility; thus, the following two expressions are the same:
+</p>
+<div class="example">
+<pre class="example-preformatted">;;; This expression uses the old syntax for type specifiers.
+ (loop for i fixnum upfrom 3 ...)
+
+;;; This expression uses the new syntax for type specifiers.
+ (loop for i of-type fixnum upfrom 3 ...)
+
+;; Declare X and Y to be of type VECTOR and FIXNUM respectively.
+ (loop for (x y) of-type (vector fixnum) 
+       in l do ...)
+</pre></div>
+
+<p>A <i class="i">type specifier</i> for a destructuring pattern is a <i class="i">tree</i> of 
+<i class="i">type specifiers</i> with the same shape as the <i class="i">tree</i> of
+<i class="i">variable</i> <i class="i">names</i>, with the following exceptions:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>When aligning the <i class="i">trees</i>, an <i class="i">atom</i> in the
+<i class="i">tree</i> of <i class="i">type specifiers</i> that matches a <i class="i">cons</i> 
+in the variable tree declares the same <i class="i">type</i> for each variable
+in the subtree rooted at the <i class="i">cons</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>A <i class="i">cons</i> in the <i class="i">tree</i> of <i class="i">type specifiers</i> that 
+matches an <i class="i">atom</i> in the <i class="i">tree</i> of <i class="i">variable</i> <i class="i">names</i>
+is a <i class="i">compound type specifer</i>.
+</p>
+</dd>
+</dl>
+
+<p>Destructuring allows <i class="i">binding</i> of a set of variables to a corresponding
+set of values anywhere that a value can normally be bound to a single
+variable.  During <b class="b">loop</b> expansion, 
+each variable in the variable list
+is matched with the values in the values list.  If there are more variables
+in the variable list than there are values in the values list, the 
+remaining variables are given a value of <b class="b">nil</b>.  If there are more
+values than variables listed, the extra values are discarded.
+</p>
+<p>To assign values from a list to the variables <code class="t">a</code>,
+<code class="t">b</code>, and <code class="t">c</code>, the <code class="t">for</code> clause could be used to
+bind the variable <code class="t">numlist</code> to the 
+<i class="i">car</i> of the supplied <i class="i">form</i>,
+and then another <code class="t">for</code> clause could be used to bind the variables
+<code class="t">a</code>, <code class="t">b</code>, and <code class="t">c</code> <i class="i">sequentially</i>.  
+</p>
+<div class="example">
+<pre class="example-preformatted">;; Collect values by using FOR constructs.
+ (loop for numlist in '((1 2 4.0) (5 6 8.3) (8 9 10.4))
+       for a of-type integer = (first numlist)
+       and b of-type integer = (second numlist)
+       and c of-type float = (third numlist)
+       collect (list c b a))
+&rArr;  ((4.0 2 1) (8.3 6 5) (10.4 9 8))
+</pre></div>
+
+<p>Destructuring makes this process easier by allowing the variables to
+be bound in each loop iteration.  
+<i class="i">Types</i> can be declared by using a 
+list of <i class="i">type-spec</i> arguments.  If 
+all the <i class="i">types</i>
+are the same, a shorthand destructuring syntax can be used, as the second
+example illustrates.
+</p>
+<div class="example">
+<pre class="example-preformatted">;; Destructuring simplifies the process.
+ (loop for (a b c) of-type (integer integer float) in
+       '((1 2 4.0) (5 6 8.3) (8 9 10.4))
+       collect (list c b a))
+&rArr;  ((4.0 2 1) (8.3 6 5) (10.4 9 8))
+
+;; If all the types are the same, this way is even simpler.
+ (loop for (a b c) of-type float in
+       '((1.0 2.0 4.0) (5.0 6.0 8.3) (8.0 9.0 10.4))
+       collect (list c b a))
+&rArr;  ((4.0 2.0 1.0) (8.3 6.0 5.0) (10.4 9.0 8.0))
+</pre></div>
+
+<p>If destructuring is used to declare or initialize a number of groups
+of variables into <i class="i">types</i>, the <i class="i">loop keyword</i> <code class="t">and</code> can be used
+to simplify the process further.
+</p>
+<div class="example">
+<pre class="example-preformatted">;; Initialize and declare variables in parallel by using the AND construct.\kern-7pt
+ (loop with (a b) of-type float = '(1.0 2.0)
+       and (c d) of-type integer = '(3 4)
+       and (e f)
+       return (list a b c d e f))
+&rArr;  (1.0 2.0 3 4 NIL NIL)
+</pre></div>
+
+<p>If <b class="b">nil</b> is used in a destructuring list, no variable is provided for
+its place.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (loop for (a nil b) = '(1 2 3)
+       do (return (list a b)))
+&rArr;  (1 3)
+</pre></div>
+
+<p>Note that 
+<i class="i">dotted lists</i>
+can specify destructuring.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (loop for (x . y) = '(1 . 2)
+       do (return y))
+&rArr;  2
+ (loop for ((a . b) (c . d)) of-type ((float . float) (integer . integer)) in
+       '(((1.2 . 2.4) (3 . 4)) ((3.4 . 4.6) (5 . 6)))
+       collect (list a b c d))
+&rArr;  ((1.2 2.4 3 4) (3.4 4.6 5 6))
+</pre></div>
+
+<p>An error of <i class="i">type</i> <b class="b">program-error</b> is signaled (at macro expansion time)
+if the same variable is bound twice in any variable-binding
+clause of a single <b class="b">loop</b> expression.  Such variables include
+local variables, iteration control variables, and variables found by
+destructuring.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Restrictions-on-Side_002dEffects.html">Restrictions on Side-Effects</a>, Previous: <a href="Order-of-Execution.html">Order of Execution</a>, Up: <a href="Overview-of-the-Loop-Facility.html">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Determining-the-Class-Precedence-List.html
@@ -0,0 +1,102 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Determining the Class Precedence List (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Determining the Class Precedence List (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Determining the Class Precedence List (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Classes.html" rel="up" title="Classes">
+<link href="Redefining-Classes.html" rel="next" title="Redefining Classes">
+<link href="Inheritance.html" rel="prev" title="Inheritance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.center {text-align:center}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Determining-the-Class-Precedence-List">
+<div class="nav-panel">
+<p>
+Next: <a href="Redefining-Classes.html" accesskey="n" rel="next">Redefining Classes</a>, Previous: <a href="Inheritance.html" accesskey="p" rel="prev">Inheritance</a>, Up: <a href="Classes.html" accesskey="u" rel="up">Classes</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Determining-the-Class-Precedence-List-1"><span>4.3.5 Determining the Class Precedence List<a class="copiable-link" href="#Determining-the-Class-Precedence-List-1"> &para;</a></span></h4>
+
+<p>The <b class="b">defclass</b> form for a <i class="i">class</i> provides a total ordering
+on that <i class="i">class</i> and its direct <i class="i">superclasses</i>.  This ordering is
+called the <i class="i">local precedence order</i>
+<a class="index-entry-id" id="index-local-precedence-order-1"></a>
+.  It is an ordered list of the
+<i class="i">class</i> and its direct <i class="i">superclasses</i>. The
+<i class="i">class precedence list</i>
+<a class="index-entry-id" id="index-class-precedence-list-1"></a>
+ for a class C is a total ordering on
+C and its <i class="i">superclasses</i> that is consistent with the
+<i class="i">local precedence orders</i> for each of C and its <i class="i">superclasses</i>.
+</p>
+<p>A <i class="i">class</i> precedes its direct <i class="i">superclasses</i>, 
+and a direct <i class="i">superclass</i> precedes all other 
+direct <i class="i">superclasses</i> specified to its right 
+in the <i class="i">superclasses</i> list of the <b class="b">defclass</b> form.  
+For every class C, define 
+</p><div class="center">R_C={(C,C_1),(C_1,C_2),...,(C_{n-1},C_n)}
+</div><p>where C_1,...,C_n are
+the direct <i class="i">superclasses</i> of C in the order in which
+they are mentioned in the <b class="b">defclass</b> form. These ordered pairs
+generate the total ordering on the class C and its direct
+<i class="i">superclasses</i>.
+</p>
+<p>Let S_C be the set of C and its <i class="i">superclasses</i>. Let R be
+</p>
+<div class="center">R=\bigcup_{c\in S_C }R_c
+</div><p>.
+</p>
+<p>[Reviewer Note by Barmar: &ldquo;Consistent&rdquo; needs to be defined, or maybe we should say
+&ldquo;logically consistent&rdquo;?]
+</p>
+<p>The set R might or might not generate a partial ordering, depending on
+whether the R_c, c\in S_C, are 
+consistent; it is assumed
+that they are consistent and that R generates a partial ordering.
+When the R_c are not consistent, it is said that R is inconsistent.
+</p>
+<p>To compute the <i class="i">class precedence list</i> for~C,
+topologically sort the elements of S_C with respect to the
+partial ordering generated by R.  When the topological
+sort must select a <i class="i">class</i> from a set of two or more 
+<i class="i">classes</i>, none of
+which are preceded by other <i class="i">classes</i> with respect to~R,
+the <i class="i">class</i> selected is chosen deterministically, as described below.
+</p>
+<p>If R is inconsistent, an error is signaled.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Topological-Sorting.html" accesskey="1">Topological Sorting</a></li>
+<li><a href="Examples-of-Class-Precedence-List-Determination.html" accesskey="2">Examples of Class Precedence List Determination</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Redefining-Classes.html">Redefining Classes</a>, Previous: <a href="Inheritance.html">Inheritance</a>, Up: <a href="Classes.html">Classes</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Determining-the-Effective-Method.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Determining the Effective Method (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Determining the Effective Method (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Determining the Effective Method (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Method-Selection-and-Combination.html" rel="up" title="Method Selection and Combination">
+<link href="Selecting-the-Applicable-Methods.html" rel="next" title="Selecting the Applicable Methods">
+<link href="Method-Selection-and-Combination.html" rel="prev" title="Method Selection and Combination">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Determining-the-Effective-Method">
+<div class="nav-panel">
+<p>
+Next: <a href="Selecting-the-Applicable-Methods.html" accesskey="n" rel="next">Selecting the Applicable Methods</a>, Previous: <a href="Method-Selection-and-Combination.html" accesskey="p" rel="prev">Method Selection and Combination</a>, Up: <a href="Method-Selection-and-Combination.html" accesskey="u" rel="up">Method Selection and Combination</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Determining-the-Effective-Method-1"><span>7.6.6.1 Determining the Effective Method<a class="copiable-link" href="#Determining-the-Effective-Method-1"> &para;</a></span></h4>
+
+<p>The effective method is determined by the following three-step procedure:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p><span class="r">Select the applicable methods.</span>
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p><span class="r">Sort the applicable methods by precedence order, putting
+the most specific method first.</span>
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p><span class="r">Apply method combination to the sorted list of
+applicable methods, producing the effective method.</span>
+</p>
+</dd>
+</dl>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Dictionary-Entries-for-Type-Specifiers.html
@@ -0,0 +1,65 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Dictionary Entries for Type Specifiers (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Dictionary Entries for Type Specifiers (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Dictionary Entries for Type Specifiers (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Compound-Type-Specifier-Kind_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Compound Type Specifier Kind&quot; Section of a Dictionary Entry">
+<link href="The-_0022Class-Precedence-List_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Class Precedence List&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Dictionary-Entries-for-Type-Specifiers">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Compound-Type-Specifier-Kind_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Compound Type Specifier Kind&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Class-Precedence-List_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Class Precedence List&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Dictionary-Entries-for-Type-Specifiers-1"><span>1.4.4.6 Dictionary Entries for Type Specifiers<a class="copiable-link" href="#Dictionary-Entries-for-Type-Specifiers-1"> &para;</a></span></h4>
+
+<p>The <i class="i">atomic type specifiers</i> are those <i class="i">defined names</i> 
+listed in <i class="i">Figure~4&ndash;2</i>.
+Such dictionary entries are of kind 
+&ldquo;Class,&rdquo; &ldquo;Condition Type,&rdquo; &ldquo;System Class,&rdquo; or &ldquo;Type.&rdquo;
+A description of how to interpret 
+a <i class="i">symbol</i> naming one of these <i class="i">types</i> or <i class="i">classes</i> 
+as an <i class="i">atomic type specifier</i>
+is found in The &quot;Description&quot; Section of such dictionary entries.
+</p>
+<p>The <i class="i">compound type specifiers</i> are those <i class="i">defined names</i> 
+listed in <i class="i">Figure~4&ndash;3</i>.
+Such dictionary entries are of kind &ldquo;Class,&rdquo; &ldquo;System Class,&rdquo;
+&ldquo;Type,&rdquo; or &ldquo;Type Specifier.&rdquo;
+A description of how to interpret as a <i class="i">compound type specifier</i>
+a <i class="i">list</i> whose <i class="i">car</i> is such a <i class="i">symbol</i>
+is found in the 
+     &ldquo;Compound Type Specifier Kind,&rdquo;
+     &ldquo;Compound Type Specifier Syntax,&rdquo;
+     &ldquo;Compound Type Specifier Arguments,&rdquo;
+ and &ldquo;Compound Type Specifier Description&rdquo;
+sections of such dictionary entries.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Digits-in-a-Radix.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Digits in a Radix (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Digits in a Radix (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Digits in a Radix (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Categories.html" rel="up" title="Character Categories">
+<link href="Alphanumeric-Characters.html" rel="prev" title="Alphanumeric Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Digits-in-a-Radix">
+<div class="nav-panel">
+<p>
+Previous: <a href="Alphanumeric-Characters.html" accesskey="p" rel="prev">Alphanumeric Characters</a>, Up: <a href="Character-Categories.html" accesskey="u" rel="up">Character Categories</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Digits-in-a-Radix-1"><span>13.1.4.10 Digits in a Radix<a class="copiable-link" href="#Digits-in-a-Radix-1"> &para;</a></span></h4>
+
+<p>What qualifies as a <i class="i">digit</i> depends on the <i class="i">radix</i> 
+(an <i class="i">integer</i> between <code class="t">2</code> and <code class="t">36</code>, inclusive).
+The potential <i class="i">digits</i> are:
+</p>
+<p><code class="t">0 1 2 3 4 5 6 7 8 9 A B C D E F G H I J K L M N O P Q R S T U V W X Y Z</code>
+</p>
+<p>Their respective weights are <code class="t">0</code>, <code class="t">1</code>, <code class="t">2</code>, ... <code class="t">35</code>.
+In any given radix n, only the first n potential <i class="i">digits</i> 
+are considered to be <i class="i">digits</i>.
+For example,
+the digits in radix <code class="t">2</code>  are <code class="t">0</code> and <code class="t">1</code>, 
+the digits in radix <code class="t">10</code> are <code class="t">0</code> through <code class="t">9</code>, and
+the digits in radix <code class="t">16</code> are <code class="t">0</code> through <code class="t">F</code>.
+</p>
+<p><i class="i">Case</i> is not significant in <i class="i">digits</i>; 
+for example, in radix <code class="t">16</code>, both <code class="t">F</code> and <code class="t">f</code> 
+are <i class="i">digits</i> with weight <code class="t">15</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Directory-Components-in-Non_002dHierarchical-File-Systems.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Directory Components in Non-Hierarchical File Systems (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Directory Components in Non-Hierarchical File Systems (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Directory Components in Non-Hierarchical File Systems (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Restrictions-on-Examining-a-Pathname-Name-Component.html" rel="next" title="Restrictions on Examining a Pathname Name Component">
+<link href="Restrictions-on-Examining-a-Pathname-Directory-Component.html" rel="prev" title="Restrictions on Examining a Pathname Directory Component">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Directory-Components-in-Non_002dHierarchical-File-Systems">
+<div class="nav-panel">
+<p>
+Next: <a href="Restrictions-on-Examining-a-Pathname-Name-Component.html" accesskey="n" rel="next">Restrictions on Examining a Pathname Name Component</a>, Previous: <a href="Restrictions-on-Examining-a-Pathname-Directory-Component.html" accesskey="p" rel="prev">Restrictions on Examining a Pathname Directory Component</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Directory-Components-in-Non_002dHierarchical-File-Systems-1"><span>19.2.2.16 Directory Components in Non-Hierarchical File Systems<a class="copiable-link" href="#Directory-Components-in-Non_002dHierarchical-File-Systems-1"> &para;</a></span></h4>
+
+<p>In non-hierarchical <i class="i">file systems</i>,
+the only valid <i class="i">list</i> values for the directory component of a <i class="i">pathname</i>
+are <code class="t">(:absolute <i class="i">string</i>)</code> and <code class="t">(:absolute :wild)</code>.
+<code class="t">:relative</code> directories and the keywords
+<code class="t">:wild-inferiors</code>, <code class="t">:up</code>, and <code class="t">:back</code> are not used 
+in non-hierarchical <i class="i">file systems</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Documentation-of-Extensions.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Documentation of Extensions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Documentation of Extensions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Documentation of Extensions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conforming-Implementations.html" rel="up" title="Conforming Implementations">
+<link href="Treatment-of-Exceptional-Situations.html" rel="next" title="Treatment of Exceptional Situations">
+<link href="Documentation-of-Implementation_002dDependent-Features.html" rel="prev" title="Documentation of Implementation-Dependent Features">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Documentation-of-Extensions">
+<div class="nav-panel">
+<p>
+Next: <a href="Treatment-of-Exceptional-Situations.html" accesskey="n" rel="next">Treatment of Exceptional Situations</a>, Previous: <a href="Documentation-of-Implementation_002dDependent-Features.html" accesskey="p" rel="prev">Documentation of Implementation-Dependent Features</a>, Up: <a href="Conforming-Implementations.html" accesskey="u" rel="up">Conforming Implementations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Documentation-of-Extensions-1"><span>1.5.1.3 Documentation of Extensions<a class="copiable-link" href="#Documentation-of-Extensions-1"> &para;</a></span></h4>
+
+<p>A <i class="i">conforming implementation</i> shall be accompanied by a
+document that separately describes any features accepted by the
+<i class="i">implementation</i> that are not specified in this standard, but that do not
+cause any ambiguity or contradiction when added to the language
+standard.  Such extensions shall be described as being &ldquo;extensions to
+<span class="r">Common Lisp</span> as specified by ANSI &lt;&lt;<i class="i">standard number</i>&gt;&gt;.&rdquo;
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Documentation-of-Implementation_002dDefined-Scripts.html
@@ -0,0 +1,89 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Documentation of Implementation-Defined Scripts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Documentation of Implementation-Defined Scripts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Documentation of Implementation-Defined Scripts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Concepts.html" rel="up" title="Character Concepts">
+<link href="Character-Encodings.html" rel="prev" title="Character Encodings">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Documentation-of-Implementation_002dDefined-Scripts">
+<div class="nav-panel">
+<p>
+Previous: <a href="Character-Encodings.html" accesskey="p" rel="prev">Character Encodings</a>, Up: <a href="Character-Concepts.html" accesskey="u" rel="up">Character Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Documentation-of-Implementation_002dDefined-Scripts-1"><span>13.1.10 Documentation of Implementation-Defined Scripts<a class="copiable-link" href="#Documentation-of-Implementation_002dDefined-Scripts-1"> &para;</a></span></h4>
+
+<p>An <i class="i">implementation</i> must document the <i class="i">character</i> <i class="i">scripts</i> 
+   it supports. For each <i class="i">character</i> <i class="i">script</i> supported,
+   the documentation must describe at least the following:
+</p><dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>Character labels, glyphs, and descriptions.
+   Character labels must be uniquely named using only Latin capital letters A&ndash;Z,
+   hyphen (-), and digits 0&ndash;9.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Reader canonicalization.
+   Any mechanisms by which <b class="b">read</b> treats
+   <i class="i">different</i> characters as equivalent must be documented.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The impact on <b class="b">char-upcase</b>,
+		 <b class="b">char-downcase</b>,
+	     and the case-sensitive <i class="i">format directives</i>.
+   In particular, for each <i class="i">character</i> with <i class="i">case</i>,
+   whether it is <i class="i">uppercase</i> or <i class="i">lowercase</i>,
+   and which <i class="i">character</i> is its equivalent in the opposite case.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The behavior of the case-insensitive <i class="i">functions</i>
+     <b class="b">char-equal</b>, <b class="b">char-not-equal</b>,
+     <b class="b">char-lessp</b>, <b class="b">char-greaterp</b>, 
+     <b class="b">char-not-greaterp</b>, and <b class="b">char-not-lessp</b>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The behavior of any <i class="i">character</i> <i class="i">predicates</i>;
+   in particular, the effects of
+   <b class="b">alpha-char-p</b>,
+   <b class="b">lower-case-p</b>,
+   <b class="b">upper-case-p</b>,
+   <b class="b">both-case-p</b>,
+   <b class="b">graphic-char-p</b>, 
+   and
+   <b class="b">alphanumericp</b>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The interaction with file I/O, in particular,
+   the supported coded character sets (for example, ISO8859/1-1987)
+   and external encoding schemes supported are documented.
+</p></dd>
+</dl>
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Documentation-of-Implementation_002dDependent-Features.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Documentation of Implementation-Dependent Features (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Documentation of Implementation-Dependent Features (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Documentation of Implementation-Dependent Features (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conforming-Implementations.html" rel="up" title="Conforming Implementations">
+<link href="Documentation-of-Extensions.html" rel="next" title="Documentation of Extensions">
+<link href="Required-Language-Features.html" rel="prev" title="Required Language Features">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Documentation-of-Implementation_002dDependent-Features">
+<div class="nav-panel">
+<p>
+Next: <a href="Documentation-of-Extensions.html" accesskey="n" rel="next">Documentation of Extensions</a>, Previous: <a href="Required-Language-Features.html" accesskey="p" rel="prev">Required Language Features</a>, Up: <a href="Conforming-Implementations.html" accesskey="u" rel="up">Conforming Implementations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Documentation-of-Implementation_002dDependent-Features-1"><span>1.5.1.2 Documentation of Implementation-Dependent Features<a class="copiable-link" href="#Documentation-of-Implementation_002dDependent-Features-1"> &para;</a></span></h4>
+
+<p>A <i class="i">conforming implementation</i> shall be accompanied by a document
+that provides a definition of all <i class="i">implementation-defined</i>
+aspects of the language defined by this specification.
+</p>
+<p>In addition, a <i class="i">conforming implementation</i> is encouraged (but not required) 
+to document items in this standard that are identified as
+<i class="i">implementation-dependent</i>, although in some cases
+such documentation might simply identify the item as &ldquo;undefined.&rdquo;
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Double_002dQuote.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Double-Quote (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Double-Quote (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Double-Quote (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standard-Macro-Characters.html" rel="up" title="Standard Macro Characters">
+<link href="Backquote.html" rel="next" title="Backquote">
+<link href="Semicolon.html" rel="prev" title="Semicolon">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Double_002dQuote">
+<div class="nav-panel">
+<p>
+Next: <a href="Backquote.html" accesskey="n" rel="next">Backquote</a>, Previous: <a href="Semicolon.html" accesskey="p" rel="prev">Semicolon</a>, Up: <a href="Standard-Macro-Characters.html" accesskey="u" rel="up">Standard Macro Characters</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Double_002dQuote-1"><span>2.4.5 Double-Quote<a class="copiable-link" href="#Double_002dQuote-1"> &para;</a></span></h4>
+
+<p><b class="b">Syntax:</b> <code class="t">&quot;&lt;&lt;<i class="i">text</i>&gt;&gt;&quot;</code>
+</p>
+<p>The <i class="i">double-quote</i> is used to begin and end a <i class="i">string</i>.
+When a <i class="i">double-quote</i> is encountered,
+<i class="i">characters</i> are read from the <i class="i">input</i> <i class="i">stream</i> 
+and accumulated until another <i class="i">double-quote</i> is encountered.
+If a <i class="i">single escape</i> <i class="i">character</i> is seen,
+the <i class="i">single escape</i> <i class="i">character</i> is discarded,
+the next <i class="i">character</i> is accumulated, and accumulation continues.
+The accumulated <i class="i">characters</i> 
+up to but not including the matching <i class="i">double-quote</i> 
+are made into a <i class="i">simple string</i> and returned.
+</p>
+<p>It is <i class="i">implementation-dependent</i>
+which <i class="i">attributes</i> of the accumulated characters are removed in this process.
+</p>
+<p>Examples of the use of the <i class="i">double-quote</i> character are in Figure 2&ndash;18. 
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">&quot;Foo&quot;</code>                      ;A string with three characters in it  <!-- /@w -->
+  <code class="t">&quot;&quot;</code>                         ;An empty string                       <!-- /@w -->
+  <code class="t">&quot;\&quot;APL\\360?\&quot; he cried.&quot;</code>  ;A string with twenty characters       <!-- /@w -->
+  <code class="t">&quot;|x| = |-x|&quot;</code>               ;A ten-character string                <!-- /@w -->
+
+          Figure 2&ndash;18: Examples of the use of double-quote         <!-- /@w -->
+
+</pre></div></div>
+
+<p>Note that to place a single escape character or a <i class="i">double-quote</i> into a string,
+such a character must be preceded by a single escape character.
+Note, too, that a multiple escape character need not be quoted by a 
+single escape character within a string.
+</p>
+<p>For information on how the <i class="i">Lisp printer</i> prints <i class="i">strings</i>,
+see <a class="ref" href="Printing-Strings.html">Printing Strings</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Dynamic-Control-of-the-Arrangement-of-Output.html
@@ -0,0 +1,113 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Dynamic Control of the Arrangement of Output (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Dynamic Control of the Arrangement of Output (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Dynamic Control of the Arrangement of Output (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Pretty-Printer-Concepts.html" rel="up" title="Pretty Printer Concepts">
+<link href="Format-Directive-Interface.html" rel="next" title="Format Directive Interface">
+<link href="Pretty-Printer-Concepts.html" rel="prev" title="Pretty Printer Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Dynamic-Control-of-the-Arrangement-of-Output">
+<div class="nav-panel">
+<p>
+Next: <a href="Format-Directive-Interface.html" accesskey="n" rel="next">Format Directive Interface</a>, Previous: <a href="Pretty-Printer-Concepts.html" accesskey="p" rel="prev">Pretty Printer Concepts</a>, Up: <a href="Pretty-Printer-Concepts.html" accesskey="u" rel="up">Pretty Printer Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Dynamic-Control-of-the-Arrangement-of-Output-1"><span>22.2.1.1 Dynamic Control of the Arrangement of Output<a class="copiable-link" href="#Dynamic-Control-of-the-Arrangement-of-Output-1"> &para;</a></span></h4>
+
+<p>The actions of the <i class="i">pretty printer</i> when a piece of output is too
+large to fit in the space available can be precisely controlled.
+Three concepts underlie 
+the way these operations work&mdash;<i class="i">logical blocks</i>
+<a class="index-entry-id" id="index-logical-blocks"></a>
+,
+			        <i class="i">conditional newlines</i>
+<a class="index-entry-id" id="index-conditional-newlines"></a>
+,
+			    and <i class="i">sections</i>
+<a class="index-entry-id" id="index-sections"></a>
+.
+Before proceeding further, it is important to define these terms.
+</p>
+<p>The first line of Figure 22&ndash;3 shows a schematic piece of output.  Each of
+the characters in the output is represented by &ldquo;<code class="t">-</code>&rdquo;.  The positions of
+conditional newlines are indicated by digits.  The beginnings and ends of
+logical blocks are indicated by &ldquo;<code class="t">&lt;</code>&rdquo; and &ldquo;<code class="t">&gt;</code>&rdquo; respectively.
+</p>
+<p>The output as a whole is a logical block and the outermost section.  This
+section is indicated by the <code class="t">0</code>&rsquo;s on the second line of Figure 1.  Logical
+blocks nested within the output are specified by the macro
+<b class="b">pprint-logical-block</b>.  Conditional newline positions are specified 
+by calls to <b class="b">pprint-newline</b>.  Each conditional newline defines 
+two sections (one before it and one after it) and is associated with a 
+third (the section immediately containing it).
+</p>
+<p>The section after a conditional newline consists of: all the output up to,
+but not including, (a) the next conditional newline immediately contained
+in the same logical block; or if (a) is not applicable, (b) the next
+newline that is at a lesser level of nesting in logical blocks; or if (b)
+is not applicable, (c) the end of the output.
+</p>
+<p>The section before a conditional newline consists of: all the output back
+to, but not including, (a) the previous conditional newline that is
+immediately contained in the same logical block; or if (a) is not
+applicable, (b) the beginning of the immediately containing logical block.
+The last four lines in Figure 1 indicate the sections before and after the
+four conditional newlines.
+</p>
+<p>The section immediately containing a conditional newline is the shortest
+section that contains the conditional newline in question.  In Figure 22&ndash;3,
+the first conditional newline is immediately contained in the section
+marked with <code class="t">0</code>&rsquo;s, the second and third conditional newlines are immediately
+contained in the section before the fourth conditional newline, and the
+fourth conditional newline is immediately contained in the section after
+the first conditional newline.
+</p>
+<div class="example">
+<pre class="example-preformatted"> &lt;-1---&lt;--&lt;--2---3-&gt;--4--&gt;-&gt;
+ 000000000000000000000000000
+ 11 111111111111111111111111
+           22 222
+              333 3333
+        44444444444444 44444
+</pre></div>
+
+<p>&nbsp;Figure&nbsp;22&ndash;2:&nbsp;Example&nbsp;of&nbsp;Logical&nbsp;Blocks,&nbsp;Conditional&nbsp;Newlines,&nbsp;and&nbsp;Sections<!-- /@w -->
+</p>
+<p>Whenever possible, the pretty printer displays the entire contents of a
+section on a single line.  However, if the section is too long to fit in
+the space available, line breaks are inserted at conditional newline
+positions within the section.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Format-Directive-Interface.html">Format Directive Interface</a>, Previous: <a href="Pretty-Printer-Concepts.html">Pretty Printer Concepts</a>, Up: <a href="Pretty-Printer-Concepts.html">Pretty Printer Concepts</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Dynamic-Control-of-the-Lisp-Reader.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Dynamic Control of the Lisp Reader (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Dynamic Control of the Lisp Reader (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Dynamic Control of the Lisp Reader (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Concepts.html" rel="up" title="Reader Concepts">
+<link href="Effect-of-Readtable-Case-on-the-Lisp-Reader.html" rel="next" title="Effect of Readtable Case on the Lisp Reader">
+<link href="Reader-Concepts.html" rel="prev" title="Reader Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Dynamic-Control-of-the-Lisp-Reader">
+<div class="nav-panel">
+<p>
+Next: <a href="Effect-of-Readtable-Case-on-the-Lisp-Reader.html" accesskey="n" rel="next">Effect of Readtable Case on the Lisp Reader</a>, Previous: <a href="Reader-Concepts.html" accesskey="p" rel="prev">Reader Concepts</a>, Up: <a href="Reader-Concepts.html" accesskey="u" rel="up">Reader Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Dynamic-Control-of-the-Lisp-Reader-1"><span>23.1.1 Dynamic Control of the Lisp Reader<a class="copiable-link" href="#Dynamic-Control-of-the-Lisp-Reader-1"> &para;</a></span></h4>
+
+<p>Various aspects of the <i class="i">Lisp reader</i> can be controlled dynamically.
+See <a class="ref" href="Readtables.html">Readtables</a> and <a class="ref" href="Variables-that-affect-the-Lisp-Reader.html">Variables that affect the Lisp Reader</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Dynamic-Environments.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Dynamic Environments (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Dynamic Environments (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Dynamic Environments (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Environments.html" rel="up" title="Introduction to Environments">
+<link href="Lexical-Environments.html" rel="next" title="Lexical Environments">
+<link href="The-Global-Environment.html" rel="prev" title="The Global Environment">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Dynamic-Environments">
+<div class="nav-panel">
+<p>
+Next: <a href="Lexical-Environments.html" accesskey="n" rel="next">Lexical Environments</a>, Previous: <a href="The-Global-Environment.html" accesskey="p" rel="prev">The Global Environment</a>, Up: <a href="Introduction-to-Environments.html" accesskey="u" rel="up">Introduction to Environments</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Dynamic-Environments-1"><span>3.1.1.2 Dynamic Environments<a class="copiable-link" href="#Dynamic-Environments-1"> &para;</a></span></h4>
+
+<p>A <i class="i">dynamic environment</i>
+<a class="index-entry-id" id="index-dynamic-environment"></a>
+ for <i class="i">evaluation</i> is that part of an
+<i class="i">environment</i> that contains <i class="i">bindings</i> whose duration
+is bounded by points of <i class="i">establishment</i> and <i class="i">disestablishment</i> 
+within the execution of the <i class="i">form</i> that
+established the <i class="i">binding</i>.
+A <i class="i">dynamic environment</i> contains, among other things, the following:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p><i class="i">bindings</i> for <i class="i">dynamic variables</i>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>information about <i class="i">active</i> <i class="i">catch tags</i>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>information about <i class="i">exit points</i> established by <b class="b">unwind-protect</b>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>information about <i class="i">active</i> <i class="i">handlers</i> and <i class="i">restarts</i>.
+</p></dd>
+</dl>
+
+<p>The <i class="i">dynamic environment</i> that is active at any given point 
+in the <i class="i">execution</i> of a <i class="i">program</i> is referred to by 
+definite reference as &ldquo;the current <i class="i">dynamic environment</i>,&rdquo;
+or sometimes as just &ldquo;the <i class="i">dynamic environment</i>.&rdquo;
+</p>
+<p>Within a given <i class="i">namespace</i>,
+a <i class="i">name</i> is said to be <i class="i">bound</i>
+in a <i class="i">dynamic environment</i> if there is a <i class="i">binding</i> 
+associated with its <i class="i">name</i> in the <i class="i">dynamic environment</i> 
+or, if not, there is a <i class="i">binding</i> 
+associated with its name in the <i class="i">global environment</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Dynamic-Variables.html
@@ -0,0 +1,92 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Dynamic Variables (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Dynamic Variables (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Dynamic Variables (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Evaluation-Model.html" rel="up" title="The Evaluation Model">
+<link href="Constant-Variables.html" rel="next" title="Constant Variables">
+<link href="Lexical-Variables.html" rel="prev" title="Lexical Variables">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Dynamic-Variables">
+<div class="nav-panel">
+<p>
+Next: <a href="Constant-Variables.html" accesskey="n" rel="next">Constant Variables</a>, Previous: <a href="Lexical-Variables.html" accesskey="p" rel="prev">Lexical Variables</a>, Up: <a href="The-Evaluation-Model.html" accesskey="u" rel="up">The Evaluation Model</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Dynamic-Variables-1"><span>3.1.2.4 Dynamic Variables<a class="copiable-link" href="#Dynamic-Variables-1"> &para;</a></span></h4>
+
+<p>A <i class="i">variable</i> is a <i class="i">dynamic variable</i> if one of the following
+conditions hold:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>It is locally declared or globally proclaimed <b class="b">special</b>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>It occurs textually within a <i class="i">form</i> that
+creates a <i class="i">dynamic binding</i> for a <i class="i">variable</i> of the <i class="i">same</i> <i class="i">name</i>,
+and the <i class="i">binding</i> is not <i class="i">shadowed</i>_2 by a <i class="i">form</i>
+that creates a <i class="i">lexical binding</i> of the same <i class="i">variable</i> <i class="i">name</i>.
+</p>
+</dd>
+</dl>
+
+<p>A <i class="i">dynamic variable</i> can be referenced at any time in any <i class="i">program</i>;
+there is no textual limitation on references to <i class="i">dynamic variables</i>.
+At any given time, all <i class="i">dynamic variables</i> with a given name refer to 
+exactly one <i class="i">binding</i>, either in the <i class="i">dynamic environment</i>
+or in the <i class="i">global environment</i>.
+</p>
+<p>The <i class="i">value</i> part of the <i class="i">binding</i> for a <i class="i">dynamic variable</i> might
+be empty; in this case, the <i class="i">dynamic variable</i> is said to have no <i class="i">value</i>,
+or to be <i class="i">unbound</i>.  A <i class="i">dynamic variable</i> can be made <i class="i">unbound</i>
+by using <b class="b">makunbound</b>.
+</p>
+<p>The effect of <i class="i">binding</i> a <i class="i">dynamic variable</i> is to create
+a new <i class="i">binding</i> to which all references to that <i class="i">dynamic variable</i>
+in any <i class="i">program</i> refer for the duration of the <i class="i">evaluation</i> of the <i class="i">form</i>
+that creates the <i class="i">dynamic binding</i>.
+</p>
+<p>A <i class="i">dynamic variable</i> can be referenced outside the <i class="i">dynamic extent</i> of
+a <i class="i">form</i> that <i class="i">binds</i> it.  Such a <i class="i">variable</i> is sometimes called 
+a &ldquo;global variable&rdquo; but is still in all respects just a <i class="i">dynamic variable</i>
+whose <i class="i">binding</i> happens to exist in the <i class="i">global environment</i> rather than in some
+<i class="i">dynamic environment</i>.
+</p>
+<p>A <i class="i">dynamic variable</i> is <i class="i">unbound</i>
+unless and until explicitly assigned a value, except for 
+those variables whose initial value is 
+defined in this specification or by an <i class="i">implementation</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Constant-Variables.html">Constant Variables</a>, Previous: <a href="Lexical-Variables.html">Lexical Variables</a>, Up: <a href="The-Evaluation-Model.html">The Evaluation Model</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Effect-of-Readtable-Case-on-the-Lisp-Printer.html
@@ -0,0 +1,115 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Effect of Readtable Case on the Lisp Printer (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Effect of Readtable Case on the Lisp Printer (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Effect of Readtable Case on the Lisp Printer (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Printer.html" rel="next" title="Examples of Effect of Readtable Case on the Lisp Printer">
+<link href="Package-Prefixes-for-Symbols.html" rel="prev" title="Package Prefixes for Symbols">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Effect-of-Readtable-Case-on-the-Lisp-Printer">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Printer.html" accesskey="n" rel="next">Examples of Effect of Readtable Case on the Lisp Printer</a>, Previous: <a href="Package-Prefixes-for-Symbols.html" accesskey="p" rel="prev">Package Prefixes for Symbols</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Effect-of-Readtable-Case-on-the-Lisp-Printer-1"><span>22.1.3.10 Effect of Readtable Case on the Lisp Printer<a class="copiable-link" href="#Effect-of-Readtable-Case-on-the-Lisp-Printer-1"> &para;</a></span></h4>
+
+<p>When 
+<i class="i">printer escaping</i> is disabled,
+or the characters under consideration are not already 
+quoted specifically by <i class="i">single escape</i> or <i class="i">multiple escape</i>
+syntax,
+</p>
+<p>the <i class="i">readtable case</i> of the <i class="i">current readtable</i> 
+affects the way the <i class="i">Lisp printer</i> writes <i class="i">symbols</i>
+in the following ways:
+</p>
+<dl class="table">
+<dt><code class="t">:upcase</code></dt>
+<dd><p>When the <i class="i">readtable case</i> is <code class="t">:upcase</code>,
+ <i class="i">uppercase</i> <i class="i">characters</i>
+ are printed in the case specified by <b class="b">*print-case*</b>, and
+ <i class="i">lowercase</i> <i class="i">characters</i> are printed in their own case.
+</p>
+</dd>
+<dt><code class="t">:downcase</code></dt>
+<dd><p>When the <i class="i">readtable case</i> is <code class="t">:downcase</code>,
+ <i class="i">uppercase</i> <i class="i">characters</i> are printed in their own case, and
+ <i class="i">lowercase</i> <i class="i">characters</i>
+ are printed in the case specified by <b class="b">*print-case*</b>.
+</p>
+</dd>
+<dt><code class="t">:preserve</code></dt>
+<dd><p>When the <i class="i">readtable case</i> is <code class="t">:preserve</code>,
+ all <i class="i">alphabetic</i> <i class="i">characters</i> are printed in their own case.
+</p>
+</dd>
+<dt><code class="t">:invert</code></dt>
+<dd><p>When the <i class="i">readtable case</i> is <code class="t">:invert</code>,
+ the case of all <i class="i">alphabetic</i> <i class="i">characters</i> 
+ in single case symbol names is inverted.
+ Mixed-case symbol names are printed as is.
+</p></dd>
+</dl>
+
+<p>The rules for escaping <i class="i">alphabetic</i> <i class="i">characters</i> in symbol names are affected by
+the <b class="b">readtable-case</b> 
+</p>
+<p>if <i class="i">printer escaping</i> is enabled.
+</p>
+<p><i class="i">Alphabetic</i> <i class="i">characters</i> are escaped as follows:                
+</p><dl class="table">
+<dt><code class="t">:upcase</code></dt>
+<dd><p>When the <i class="i">readtable case</i> is <code class="t">:upcase</code>,
+all <i class="i">lowercase</i> <i class="i">characters</i> must be escaped.
+</p>
+</dd>
+<dt><code class="t">:downcase</code></dt>
+<dd><p>When the <i class="i">readtable case</i> is <code class="t">:downcase</code>,
+all <i class="i">uppercase</i> <i class="i">characters</i> must be escaped.
+</p>
+</dd>
+<dt><code class="t">:preserve</code></dt>
+<dd><p>When the <i class="i">readtable case</i> is <code class="t">:preserve</code>, 
+no <i class="i">alphabetic</i> <i class="i">characters</i> need be escaped.
+</p>
+</dd>
+<dt><code class="t">:invert</code></dt>
+<dd><p>When the <i class="i">readtable case</i> is <code class="t">:invert</code>,
+no <i class="i">alphabetic</i> <i class="i">characters</i> need be escaped.
+</p>
+</dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Printer.html">Examples of Effect of Readtable Case on the Lisp Printer</a>, Previous: <a href="Package-Prefixes-for-Symbols.html">Package Prefixes for Symbols</a>, Up: <a href="Default-Print_002dObject-Methods.html">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Effect-of-Readtable-Case-on-the-Lisp-Reader.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Effect of Readtable Case on the Lisp Reader (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Effect of Readtable Case on the Lisp Reader (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Effect of Readtable Case on the Lisp Reader (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Concepts.html" rel="up" title="Reader Concepts">
+<link href="Argument-Conventions-of-Some-Reader-Functions.html" rel="next" title="Argument Conventions of Some Reader Functions">
+<link href="Dynamic-Control-of-the-Lisp-Reader.html" rel="prev" title="Dynamic Control of the Lisp Reader">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Effect-of-Readtable-Case-on-the-Lisp-Reader">
+<div class="nav-panel">
+<p>
+Next: <a href="Argument-Conventions-of-Some-Reader-Functions.html" accesskey="n" rel="next">Argument Conventions of Some Reader Functions</a>, Previous: <a href="Dynamic-Control-of-the-Lisp-Reader.html" accesskey="p" rel="prev">Dynamic Control of the Lisp Reader</a>, Up: <a href="Reader-Concepts.html" accesskey="u" rel="up">Reader Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Effect-of-Readtable-Case-on-the-Lisp-Reader-1"><span>23.1.2 Effect of Readtable Case on the Lisp Reader<a class="copiable-link" href="#Effect-of-Readtable-Case-on-the-Lisp-Reader-1"> &para;</a></span></h4>
+
+<p>The <i class="i">readtable case</i> of the <i class="i">current readtable</i> affects the <i class="i">Lisp reader</i>
+in the following ways:
+</p>
+<dl class="table">
+<dt><code class="t">:upcase</code></dt>
+<dd><p>When the <i class="i">readtable case</i> is <code class="t">:upcase</code>,
+ unescaped constituent <i class="i">characters</i> are converted to <i class="i">uppercase</i>,
+ as specified in <a class="ref" href="Reader-Algorithm.html">Reader Algorithm</a>.
+</p>
+</dd>
+<dt><code class="t">:downcase</code></dt>
+<dd><p>When the <i class="i">readtable case</i> is <code class="t">:downcase</code>,
+ unescaped constituent <i class="i">characters</i> are converted to <i class="i">lowercase</i>.
+</p>
+</dd>
+<dt><code class="t">:preserve</code></dt>
+<dd><p>When the <i class="i">readtable case</i> is <code class="t">:preserve</code>,
+ the case of all <i class="i">characters</i> remains unchanged.
+</p>
+</dd>
+<dt><code class="t">:invert</code></dt>
+<dd><p>When the <i class="i">readtable case</i> is <code class="t">:invert</code>,
+ then if all of the unescaped letters in the extended token are of the same <i class="i">case</i>, 
+ those (unescaped) letters are converted to the opposite <i class="i">case</i>.
+</p>
+</dd>
+</dl>
+
+
+<ul class="mini-toc">
+<li><a href="Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Reader.html" accesskey="1">Examples of Effect of Readtable Case on the Lisp Reader</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Embedded-Newlines-in-Condition-Reports.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Embedded Newlines in Condition Reports (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Embedded Newlines in Condition Reports (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Embedded Newlines in Condition Reports (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printing-Conditions.html" rel="up" title="Printing Conditions">
+<link href="Note-about-Tabs-in-Condition-Reports.html" rel="next" title="Note about Tabs in Condition Reports">
+<link href="Leading-and-Trailing-Newlines-in-Condition-Reports.html" rel="prev" title="Leading and Trailing Newlines in Condition Reports">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Embedded-Newlines-in-Condition-Reports">
+<div class="nav-panel">
+<p>
+Next: <a href="Note-about-Tabs-in-Condition-Reports.html" accesskey="n" rel="next">Note about Tabs in Condition Reports</a>, Previous: <a href="Leading-and-Trailing-Newlines-in-Condition-Reports.html" accesskey="p" rel="prev">Leading and Trailing Newlines in Condition Reports</a>, Up: <a href="Printing-Conditions.html" accesskey="u" rel="up">Printing Conditions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Embedded-Newlines-in-Condition-Reports-1"><span>9.1.3.4 Embedded Newlines in Condition Reports<a class="copiable-link" href="#Embedded-Newlines-in-Condition-Reports-1"> &para;</a></span></h4>
+
+<p>Especially if it is long, it is permissible and appropriate for 
+a <i class="i">report message</i> to contain one or more embedded <i class="i">newlines</i>.
+</p>
+<p>If the calling routine conventionally inserts some additional prefix
+(such as &ldquo;<code class="t">Error: </code>&rdquo; or &ldquo;<code class="t">;; Error: </code>&rdquo;) on the first line of
+the message, it must also assure that an appropriate prefix will be
+added to each subsequent line of the output, so that the left edge of
+the message output by the <i class="i">condition reporter</i> will still be properly
+aligned.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun test ()
+   (error &quot;This is an error message.~%It has two lines.&quot;))
+
+ ;; Implementation A
+ (test)
+ This is an error message.
+ It has two lines.
+
+ ;; Implementation B
+ (test)
+ ;; Error: This is an error message.
+ ;;        It has two lines.
+
+ ;; Implementation C
+ (test)
+ &gt;&gt; Error: This is an error message. 
+           It has two lines.
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Environment-Dictionary.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Environment Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Environment Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Environment Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment.html" rel="up" title="Environment">
+<link href="The-External-Environment.html" rel="prev" title="The External Environment">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Environment-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="The-External-Environment.html" accesskey="p" rel="prev">The External Environment</a>, Up: <a href="Environment.html" accesskey="u" rel="up">Environment</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Environment-Dictionary-1"><span>25.2 Environment Dictionary<a class="copiable-link" href="#Environment-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="decode_002duniversal_002dtime.html" accesskey="1">decode-universal-time                                            [Function]</a></li>
+<li><a href="encode_002duniversal_002dtime.html" accesskey="2">encode-universal-time                                            [function]</a></li>
+<li><a href="get_002duniversal_002dtime.html" accesskey="3">get-universal-time, get-decoded-time                             [Function]</a></li>
+<li><a href="sleep.html" accesskey="4">sleep                                                            [Function]</a></li>
+<li><a href="apropos.html" accesskey="5">apropos, apropos-list                                            [Function]</a></li>
+<li><a href="describe.html" accesskey="6">describe                                                         [Function]</a></li>
+<li><a href="describe_002dobject.html" accesskey="7">describe-object                                 [Standard Generic Function]</a></li>
+<li><a href="trace.html" accesskey="8">trace, untrace                                                      [Macro]</a></li>
+<li><a href="step.html" accesskey="9">step                                                                [Macro]</a></li>
+<li><a href="time.html">time                                                                [Macro]</a></li>
+<li><a href="internal_002dtime_002dunits_002dper_002dsecond.html">internal-time-units-per-second                          [Constant Variable]</a></li>
+<li><a href="get_002dinternal_002dreal_002dtime.html">get-internal-real-time                                           [Function]</a></li>
+<li><a href="get_002dinternal_002drun_002dtime.html">get-internal-run-time                                            [Function]</a></li>
+<li><a href="disassemble.html">disassemble                                                      [Function]</a></li>
+<li><a href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a></li>
+<li><a href="room.html">room                                                             [Function]</a></li>
+<li><a href="ed.html">ed                                                               [Function]</a></li>
+<li><a href="inspect.html">inspect                                                          [Function]</a></li>
+<li><a href="dribble.html">dribble                                                          [Function]</a></li>
+<li><a href="_002d-_0028Variable_0029.html">-                                                              [Variable]</a></li>
+<li><a href="_002b-_0028Variable_0029.html">+, ++, +++                                                       [Variable]</a></li>
+<li><a href="_002a-_0028Variable_0029.html">*, **, ***                                                       [Variable]</a></li>
+<li><a href="_002f-_0028Variable_0029.html">/, //, ///                                                       [Variable]</a></li>
+<li><a href="lisp_002dimplementation_002dtype.html">lisp-implementation-type,</a></li>
+<li><a href="short_002dsite_002dname.html">short-site-name, long-site-name                                  [Function]</a></li>
+<li><a href="machine_002dinstance.html">machine-instance                                                 [Function]</a></li>
+<li><a href="machine_002dtype.html">machine-type                                                     [Function]</a></li>
+<li><a href="machine_002dversion.html">machine-version                                                  [Function]</a></li>
+<li><a href="software_002dtype.html">software-type, software-version                                  [Function]</a></li>
+<li><a href="user_002dhomedir_002dpathname.html">user-homedir-pathname                                            [Function]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Environment-Inquiry.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Environment Inquiry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Environment Inquiry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Environment Inquiry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-External-Environment.html" rel="up" title="The External Environment">
+<link href="Time.html" rel="next" title="Time">
+<link href="Debugging-Utilities.html" rel="prev" title="Debugging Utilities">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Environment-Inquiry">
+<div class="nav-panel">
+<p>
+Next: <a href="Time.html" accesskey="n" rel="next">Time</a>, Previous: <a href="Debugging-Utilities.html" accesskey="p" rel="prev">Debugging Utilities</a>, Up: <a href="The-External-Environment.html" accesskey="u" rel="up">The External Environment</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Environment-Inquiry-1"><span>25.1.3 Environment Inquiry<a class="copiable-link" href="#Environment-Inquiry-1"> &para;</a></span></h4>
+
+<p>Environment inquiry <i class="i">defined names</i> provide information about
+the hardware and software configuration on which a <span class="r">Common Lisp</span> program is
+being executed.
+</p>
+<p>Figure 25&ndash;3 shows <i class="i">defined names</i> relating to environment inquiry.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  *features*                   machine-instance  short-site-name   <!-- /@w -->
+  lisp-implementation-type     machine-type      software-type     <!-- /@w -->
+  lisp-implementation-version  machine-version   software-version  <!-- /@w -->
+  long-site-name               room                                <!-- /@w -->
+
+    Figure 25&ndash;3: Defined names relating to environment inquiry.   <!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Environment-Objects.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Environment Objects (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Environment Objects (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Environment Objects (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Environments.html" rel="up" title="Introduction to Environments">
+<link href="The-Null-Lexical-Environment.html" rel="prev" title="The Null Lexical Environment">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Environment-Objects">
+<div class="nav-panel">
+<p>
+Previous: <a href="The-Null-Lexical-Environment.html" accesskey="p" rel="prev">The Null Lexical Environment</a>, Up: <a href="Introduction-to-Environments.html" accesskey="u" rel="up">Introduction to Environments</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Environment-Objects-1"><span>3.1.1.5 Environment Objects<a class="copiable-link" href="#Environment-Objects-1"> &para;</a></span></h4>
+
+<p>Some <i class="i">operators</i> make use of an <i class="i">object</i>, 
+called an <i class="i">environment object</i>
+<a class="index-entry-id" id="index-environment-object"></a>
+,
+that represents the set of <i class="i">lexical bindings</i> needed to perform
+semantic analysis on a <i class="i">form</i> in a given <i class="i">lexical environment</i>.
+The set of <i class="i">bindings</i> in an <i class="i">environment object</i>
+may be a subset of the <i class="i">bindings</i> that would be needed to actually 
+perform an <i class="i">evaluation</i>; for example, <i class="i">values</i> associated with
+<i class="i">variable</i> <i class="i">names</i> and <i class="i">function names</i> in the corresponding
+<i class="i">lexical environment</i> might not be available in an <i class="i">environment object</i>.
+</p>
+<p>The <i class="i">type</i> and nature of an <i class="i">environment object</i> is <i class="i">implementation-dependent</i>.
+The <i class="i">values</i> of <i class="i">environment parameters</i> to <i class="i">macro functions</i>
+are examples of <i class="i">environment objects</i>.
+</p>
+<p>The <i class="i">object</i> <b class="b">nil</b> when used as an <i class="i">environment object</i>
+denotes the <i class="i">null lexical environment</i>;
+see <a class="ref" href="The-Null-Lexical-Environment.html">The Null Lexical Environment</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Environment.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Environment (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Environment (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Environment (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Glossary-_0028Glossary_0029.html" rel="next" title="Glossary (Glossary)">
+<link href="System-Construction.html" rel="prev" title="System Construction">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Environment">
+<div class="nav-panel">
+<p>
+Next: <a href="Glossary-_0028Glossary_0029.html" accesskey="n" rel="next">Glossary</a>, Previous: <a href="System-Construction.html" accesskey="p" rel="prev">System Construction</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Environment-1"><span>25 Environment<a class="copiable-link" href="#Environment-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="The-External-Environment.html" accesskey="1">The External Environment</a></li>
+<li><a href="Environment-Dictionary.html" accesskey="2">Environment Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Error-Checking-in-Function-Calls.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Error Checking in Function Calls (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Error Checking in Function Calls (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Error Checking in Function Calls (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation.html" rel="up" title="Evaluation and Compilation">
+<link href="Traversal-Rules-and-Side-Effects.html" rel="next" title="Traversal Rules and Side Effects">
+<link href="Lambda-Lists.html" rel="prev" title="Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Error-Checking-in-Function-Calls">
+<div class="nav-panel">
+<p>
+Next: <a href="Traversal-Rules-and-Side-Effects.html" accesskey="n" rel="next">Traversal Rules and Side Effects</a>, Previous: <a href="Lambda-Lists.html" accesskey="p" rel="prev">Lambda Lists</a>, Up: <a href="Evaluation-and-Compilation.html" accesskey="u" rel="up">Evaluation and Compilation</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Error-Checking-in-Function-Calls-1"><span>3.5 Error Checking in Function Calls<a class="copiable-link" href="#Error-Checking-in-Function-Calls-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Argument-Mismatch-Detection.html" accesskey="1">Argument Mismatch Detection</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Error-Detection-Time-in-Safe-Calls.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Error Detection Time in Safe Calls (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Error Detection Time in Safe Calls (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Error Detection Time in Safe Calls (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Argument-Mismatch-Detection.html" rel="up" title="Argument Mismatch Detection">
+<link href="Too-Few-Arguments.html" rel="next" title="Too Few Arguments">
+<link href="Safe-and-Unsafe-Calls.html" rel="prev" title="Safe and Unsafe Calls">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Error-Detection-Time-in-Safe-Calls">
+<div class="nav-panel">
+<p>
+Next: <a href="Too-Few-Arguments.html" accesskey="n" rel="next">Too Few Arguments</a>, Previous: <a href="Safe-and-Unsafe-Calls.html" accesskey="p" rel="prev">Safe and Unsafe Calls</a>, Up: <a href="Argument-Mismatch-Detection.html" accesskey="u" rel="up">Argument Mismatch Detection</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Error-Detection-Time-in-Safe-Calls-1"><span>3.5.1.2 Error Detection Time in Safe Calls<a class="copiable-link" href="#Error-Detection-Time-in-Safe-Calls-1"> &para;</a></span></h4>
+
+<p>If an error is signaled in a <i class="i">safe call</i>,
+the exact point of the <i class="i">signal</i> is <i class="i">implementation-dependent</i>.
+In particular, it might be signaled at compile time or at run time,
+and if signaled at run time, 
+it might be prior to, during, or after <i class="i">executing</i> the <i class="i">call</i>.
+However, it is always prior to the execution of the body of the <i class="i">function</i> 
+being <i class="i">called</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Error-Terminology.html
@@ -0,0 +1,273 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Error Terminology (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Error Terminology (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Error Terminology (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Definitions.html" rel="up" title="Definitions">
+<link href="Sections-Not-Formally-Part-Of-This-Standard.html" rel="next" title="Sections Not Formally Part Of This Standard">
+<link href="Notational-Conventions.html" rel="prev" title="Notational Conventions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Error-Terminology">
+<div class="nav-panel">
+<p>
+Next: <a href="Sections-Not-Formally-Part-Of-This-Standard.html" accesskey="n" rel="next">Sections Not Formally Part Of This Standard</a>, Previous: <a href="Notational-Conventions.html" accesskey="p" rel="prev">Notational Conventions</a>, Up: <a href="Definitions.html" accesskey="u" rel="up">Definitions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Error-Terminology-1"><span>1.4.2 Error Terminology<a class="copiable-link" href="#Error-Terminology-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-error-terminology"></a>
+
+<p>Situations in which errors might, should, or must be signaled are described
+in the standard.  The wording used to describe such situations is intended
+to have precise meaning. The following list is a glossary of those meanings.
+</p>
+<dl class="table">
+<dt><b class="b">Safe code</b></dt>
+<dd>
+<a class="index-entry-id" id="index-safe"></a>
+
+<p>This is <i class="i">code</i> processed with the <b class="b">safety</b> optimization 
+at its highest setting (<code class="t">3</code>).  <b class="b">safety</b> is a lexical property
+of code.  The phrase &ldquo;the function <code class="t">F</code> should signal an error&rdquo; 
+means that if <code class="t">F</code> is invoked from code processed with the highest
+<b class="b">safety</b> optimization, an error is signaled.
+It is <i class="i">implementation-dependent</i> whether <code class="t">F</code> or the calling 
+code signals the error.
+</p>
+</dd>
+<dt><b class="b">Unsafe code</b></dt>
+<dd>
+<a class="index-entry-id" id="index-unsafe"></a>
+
+<p>This is code processed with lower safety levels.
+</p>
+<p>Unsafe code might do error checking.  Implementations are permitted to
+treat all code as safe code all the time.
+</p>
+</dd>
+<dt><b class="b">An error is signaled</b></dt>
+<dd>
+<a class="index-entry-id" id="index-signal"></a>
+
+<a class="index-entry-id" id="index-is-signaled"></a>
+
+<a class="index-entry-id" id="index-must-signal"></a>
+
+<p>This means that an error is signaled in both safe and unsafe code.
+<i class="i">Conforming code</i> may rely on the fact that the error is signaled
+in both safe and unsafe code.  Every implementation is required to
+detect the error in both safe and unsafe code. For example, &ldquo;an error
+is signaled if <b class="b">unexport</b> is given a <i class="i">symbol</i>
+not <i class="i">accessible</i> in the <i class="i">current package</i>.&rdquo;
+</p>
+<p>If an explicit error type is not specified, the default is <b class="b">error</b>.
+</p>
+</dd>
+<dt><b class="b">An error should be signaled</b></dt>
+<dd>
+<a class="index-entry-id" id="index-signal-1"></a>
+
+<a class="index-entry-id" id="index-should-signal"></a>
+
+<p>This means that an error is signaled in safe code, and an error
+might be signaled in unsafe code.  <i class="i">Conforming code</i> may rely on the
+fact that the error is signaled in safe code.  Every
+implementation is required to detect the error at least in safe code.
+When the error is not signaled, the &ldquo;consequences are undefined&rdquo;
+(see below).  For example, &ldquo;<b class="b">+</b> should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+if any argument is not of <i class="i">type</i> <b class="b">number</b>.&rdquo;
+</p>
+</dd>
+<dt><b class="b">Should be prepared to signal an error</b></dt>
+<dd>
+<a class="index-entry-id" id="index-signal-2"></a>
+
+<a class="index-entry-id" id="index-prepared-to-signal"></a>
+
+<p>This is similar to &ldquo;should be signaled&rdquo; except that it does not
+imply that &lsquo;extra effort&rsquo; has to be taken on the part of an <i class="i">operator</i>
+to discover an erroneous situation if the normal action of that <i class="i">operator</i>
+can be performed successfully with only &lsquo;lazy&rsquo; checking.
+An <i class="i">implementation</i> is always permitted to signal an error,
+but even in <i class="i">safe</i> <i class="i">code</i>, it is only required to signal the error
+when failing to signal it might lead to incorrect results.
+In <i class="i">unsafe</i> <i class="i">code</i>, the consequences are undefined.
+</p>
+<p>For example, defining that 
+ &ldquo;<b class="b">find</b> should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+   if its second <i class="i">argument</i> is not a <i class="i">proper list</i>&rdquo;
+does not imply that an error is always signaled.  The <i class="i">form</i>
+</p>
+<div class="example">
+<pre class="example-preformatted"> (find 'a '(a b . c))
+</pre></div>
+
+<p>must either signal an error of <i class="i">type</i> <b class="b">type-error</b> in <i class="i">safe</i> <i class="i">code</i>,
+else return <code class="t">A</code>.
+In <i class="i">unsafe</i> <i class="i">code</i>, the consequences are undefined.
+By contrast,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (find 'd '(a b . c))
+</pre></div>
+
+<p>must signal an error of <i class="i">type</i> <b class="b">type-error</b> in <i class="i">safe</i> <i class="i">code</i>.
+In <i class="i">unsafe</i> <i class="i">code</i>, the consequences are undefined.
+Also,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (find 'd '#1=(a b . #1#))
+</pre></div>
+
+<p>in <i class="i">safe code</i>
+   might return <b class="b">nil</b> (as an <i class="i">implementation-defined</i> extension),
+   might never return,
+or might signal an error of <i class="i">type</i> <b class="b">type-error</b>.
+In <i class="i">unsafe</i> <i class="i">code</i>, the consequences are undefined.
+</p>
+<p>Typically, the &ldquo;should be prepared to signal&rdquo; terminology is used in
+type checking situations where there are efficiency considerations that
+make it impractical to detect errors that are not relevant to the
+correct operation of the <i class="i">operator</i>.
+</p>
+</dd>
+<dt><b class="b">The consequences are unspecified</b></dt>
+<dd>
+<a class="index-entry-id" id="index-consequences"></a>
+
+<a class="index-entry-id" id="index-unspecified-consequences"></a>
+
+<p>This means that the consequences are unpredictable but harmless.
+Implementations are permitted to specify the consequences of this
+situation. No <i class="i">conforming code</i> may depend on the results or effects of
+this situation, and all <i class="i">conforming code</i> is required to treat the
+results and effects of this situation as unpredictable but harmless.
+For example, &ldquo;if the second argument to <b class="b">shared-initialize</b>
+specifies a name that does not correspond to any <i class="i">slots</i>
+<i class="i">accessible</i> in the <i class="i">object</i>, the results are unspecified.&rdquo;
+</p>
+</dd>
+<dt><b class="b">The consequences are undefined</b></dt>
+<dd>
+<a class="index-entry-id" id="index-consequences-1"></a>
+
+<a class="index-entry-id" id="index-undefined-consequences"></a>
+
+<p>This means that the consequences are unpredictable. The consequences
+may range from harmless to fatal.  No <i class="i">conforming code</i> may depend on
+the results or effects. <i class="i">Conforming code</i> must treat the consequences as
+unpredictable.  In places where the words &ldquo;must,&rdquo; &ldquo;must not,&rdquo; or
+&ldquo;may not&rdquo; are used, then &ldquo;the consequences are undefined&rdquo; if the
+stated requirement is not met and no specific consequence is
+explicitly stated.  An implementation is permitted to signal an error
+in this case.
+</p>
+<p>For example: &ldquo;Once a name has been declared by <b class="b">defconstant</b>
+to be constant, any further assignment or binding of that
+variable has undefined consequences.&rdquo;
+</p>
+</dd>
+<dt><b class="b">An error might be signaled</b></dt>
+<dd>
+<a class="index-entry-id" id="index-signal-3"></a>
+
+<a class="index-entry-id" id="index-might-signal"></a>
+
+<p>This means that the situation has undefined consequences;
+however, if an error is signaled, it is of the specified <i class="i">type</i>.
+For example, &ldquo;<b class="b">open</b> might signal an error of <i class="i">type</i> <b class="b">file-error</b>.&rdquo;
+</p>
+</dd>
+<dt><b class="b">The return values are unspecified</b></dt>
+<dd>
+<a class="index-entry-id" id="index-unspecified-values"></a>
+
+<p>This means that only the number and nature of the return values of a
+<i class="i">form</i> are not specified.  However, the issue of whether or not
+any side-effects or transfer of control occurs is still well-specified.
+</p>
+<p>A program can be well-specified even if it uses a function whose
+returns values are unspecified.  For example, even if the return
+values of some function <code class="t">F</code> are unspecified, an expression such as
+<code class="t">(length (list (F)))</code> is still well-specified because it does not
+rely on any particular aspect of the value or values returned by <code class="t">F</code>.
+</p>
+</dd>
+<dt><b class="b">Implementations may be extended to cover this situation</b></dt>
+<dd>
+<a class="index-entry-id" id="index-extensions"></a>
+
+<p>This means that the <i class="i">situation</i> has undefined consequences;
+however, a <i class="i">conforming implementation</i> is free to treat
+the situation in a more specific way.  
+For example, an <i class="i">implementation</i> might define 
+    that      an error is signaled,
+ or that      an error should be signaled,
+ or even that a certain well-defined non-error behavior occurs.
+</p>
+<p>No <i class="i">conforming code</i> may depend on the consequences of such a <i class="i">situation</i>;
+all <i class="i">conforming code</i> must treat the consequences of the situation
+as undefined. <i class="i">Implementations</i> are required to document how the
+situation is treated.
+</p>
+<p>For example, &ldquo;implementations may be extended to define other type
+specifiers to have a corresponding <i class="i">class</i>.&rdquo;
+</p>
+</dd>
+<dt><b class="b">Implementations are free to extend the syntax</b></dt>
+<dd>
+<a class="index-entry-id" id="index-extensions-1"></a>
+
+<p>This means that in this situation implementations are permitted to
+define unambiguous extensions to the syntax of the <i class="i">form</i> being
+described.  No <i class="i">conforming code</i> may depend on this extension.
+Implementations are required to document each such extension. All
+<i class="i">conforming code</i> is required to treat the syntax as meaningless. The
+standard might disallow certain extensions while allowing others. For
+example, &ldquo;no implementation is free to extend the syntax of
+<b class="b">defclass</b>.&rdquo;
+</p>
+</dd>
+<dt><b class="b">A warning might be issued</b></dt>
+<dd>
+<a class="index-entry-id" id="index-warning"></a>
+
+<p>This means that <i class="i">implementations</i> are encouraged to issue a warning
+if the context is appropriate (<i class="i">e.g.</i>, when compiling).  However, a
+<i class="i">conforming implementation</i> is not required to issue a warning.
+</p>
+</dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Sections-Not-Formally-Part-Of-This-Standard.html">Sections Not Formally Part Of This Standard</a>, Previous: <a href="Notational-Conventions.html">Notational Conventions</a>, Up: <a href="Definitions.html">Definitions</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Errors-When-Calling-a-Next-Method.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Errors When Calling a Next Method (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Errors When Calling a Next Method (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Errors When Calling a Next Method (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Argument-Mismatch-Detection.html" rel="up" title="Argument Mismatch Detection">
+<link href="Destructuring-Mismatch.html" rel="prev" title="Destructuring Mismatch">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Errors-When-Calling-a-Next-Method">
+<div class="nav-panel">
+<p>
+Previous: <a href="Destructuring-Mismatch.html" accesskey="p" rel="prev">Destructuring Mismatch</a>, Up: <a href="Argument-Mismatch-Detection.html" accesskey="u" rel="up">Argument Mismatch Detection</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Errors-When-Calling-a-Next-Method-1"><span>3.5.1.9 Errors When Calling a Next Method<a class="copiable-link" href="#Errors-When-Calling-a-Next-Method-1"> &para;</a></span></h4>
+
+<p>If <b class="b">call-next-method</b> is called with <i class="i">arguments</i>, the ordered
+set of <i class="i">applicable</i> <i class="i">methods</i> for the changed set of <i class="i">arguments</i>
+for <b class="b">call-next-method</b> must be the same as the ordered set of 
+<i class="i">applicable</i> <i class="i">methods</i> for the original <i class="i">arguments</i> to the
+<i class="i">generic function</i>, or else an error should be signaled.
+</p>
+<p>The comparison between the set of methods applicable to the
+new arguments and the set applicable to the original arguments is
+insensitive to order differences among methods with the same
+specializers.
+</p>
+<p>If <b class="b">call-next-method</b> is called with <i class="i">arguments</i> that specify
+a different ordered set of <i class="i">applicable</i> methods and there is no 
+<i class="i">next method</i> available, the test for different methods and the 
+associated error signaling (when present) takes precedence over calling
+<b class="b">no-next-method</b>.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Escape-Characters-and-Potential-Numbers.html
@@ -0,0 +1,59 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Escape Characters and Potential Numbers (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Escape Characters and Potential Numbers (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Escape Characters and Potential Numbers (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-as-Tokens.html" rel="up" title="Numbers as Tokens">
+<link href="Examples-of-Potential-Numbers.html" rel="next" title="Examples of Potential Numbers">
+<link href="Potential-Numbers-as-Tokens.html" rel="prev" title="Potential Numbers as Tokens">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Escape-Characters-and-Potential-Numbers">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Potential-Numbers.html" accesskey="n" rel="next">Examples of Potential Numbers</a>, Previous: <a href="Potential-Numbers-as-Tokens.html" accesskey="p" rel="prev">Potential Numbers as Tokens</a>, Up: <a href="Numbers-as-Tokens.html" accesskey="u" rel="up">Numbers as Tokens</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Escape-Characters-and-Potential-Numbers-1"><span>2.3.1.2 Escape Characters and Potential Numbers<a class="copiable-link" href="#Escape-Characters-and-Potential-Numbers-1"> &para;</a></span></h4>
+
+<p>A <i class="i">potential number</i> cannot contain any <i class="i">escape</i>
+<i class="i">characters</i>.  An <i class="i">escape</i> <i class="i">character</i> robs the following
+<i class="i">character</i> of all syntactic qualities, forcing it to be strictly
+<i class="i">alphabetic</i>_2 and therefore unsuitable for use in a
+<i class="i">potential number</i>.  For example, all of the following
+representations are interpreted as <i class="i">symbols</i>, not <i class="i">numbers</i>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> \256   25\64   1.0\E6   |100|   3\.14159   |3/4|   3\/4   5||
+</pre></div>
+
+<p>In each case, removing the <i class="i">escape</i> <i class="i">character</i> (or <i class="i">characters</i>) 
+would 
+cause the token to be a <i class="i">potential number</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Evaluation-and-Compilation-Dictionary.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Evaluation and Compilation Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Evaluation and Compilation Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Evaluation and Compilation Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation.html" rel="up" title="Evaluation and Compilation">
+<link href="Destructive-Operations.html" rel="prev" title="Destructive Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Evaluation-and-Compilation-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Destructive-Operations.html" accesskey="p" rel="prev">Destructive Operations</a>, Up: <a href="Evaluation-and-Compilation.html" accesskey="u" rel="up">Evaluation and Compilation</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Evaluation-and-Compilation-Dictionary-1"><span>3.8 Evaluation and Compilation Dictionary<a class="copiable-link" href="#Evaluation-and-Compilation-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="lambda-_0028Symbol_0029.html" accesskey="1">lambda                                                             [Symbol]</a></li>
+<li><a href="lambda.html" accesskey="2">lambda                                                              [Macro]</a></li>
+<li><a href="compile.html" accesskey="3">compile                                                          [Function]</a></li>
+<li><a href="eval.html" accesskey="4">eval                                                             [Function]</a></li>
+<li><a href="eval_002dwhen.html" accesskey="5">eval-when                                                [Special Operator]</a></li>
+<li><a href="load_002dtime_002dvalue.html" accesskey="6">load-time-value                                          [Special Operator]</a></li>
+<li><a href="quote.html" accesskey="7">quote                                                    [Special Operator]</a></li>
+<li><a href="compiler_002dmacro_002dfunction.html" accesskey="8">compiler-macro-function                                          [Accessor]</a></li>
+<li><a href="define_002dcompiler_002dmacro.html" accesskey="9">define-compiler-macro                                               [Macro]</a></li>
+<li><a href="defmacro.html">defmacro                                                            [Macro]</a></li>
+<li><a href="macro_002dfunction.html">macro-function                                                   [Accessor]</a></li>
+<li><a href="macroexpand.html">macroexpand, macroexpand-1                                       [Function]</a></li>
+<li><a href="define_002dsymbol_002dmacro.html">define-symbol-macro                                                 [Macro]</a></li>
+<li><a href="symbol_002dmacrolet.html">symbol-macrolet                                          [Special Operator]</a></li>
+<li><a href="_002amacroexpand_002dhook_002a.html">*macroexpand-hook*                                               [Variable]</a></li>
+<li><a href="proclaim.html">proclaim                                                         [Function]</a></li>
+<li><a href="declaim.html">declaim                                                             [Macro]</a></li>
+<li><a href="declare.html">declare                                                            [Symbol]</a></li>
+<li><a href="ignore.html">ignore, ignorable                                             [Declaration]</a></li>
+<li><a href="dynamic_002dextent.html">dynamic-extent                                                [Declaration]</a></li>
+<li><a href="type.html">type                                                          [Declaration]</a></li>
+<li><a href="inline.html">inline, notinline                                             [Declaration]</a></li>
+<li><a href="ftype.html">ftype                                                         [Declaration]</a></li>
+<li><a href="declaration.html">declaration                                                   [Declaration]</a></li>
+<li><a href="optimize.html">optimize                                                      [Declaration]</a></li>
+<li><a href="special.html">special                                                       [Declaration]</a></li>
+<li><a href="locally.html">locally                                                  [Special Operator]</a></li>
+<li><a href="the.html">the                                                      [Special Operator]</a></li>
+<li><a href="special_002doperator_002dp.html">special-operator-p                                               [Function]</a></li>
+<li><a href="constantp.html">constantp                                                        [Function]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Evaluation-and-Compilation.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Evaluation and Compilation (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Evaluation and Compilation (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Evaluation and Compilation (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Types-and-Classes.html" rel="next" title="Types and Classes">
+<link href="Syntax.html" rel="prev" title="Syntax">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Evaluation-and-Compilation">
+<div class="nav-panel">
+<p>
+Next: <a href="Types-and-Classes.html" accesskey="n" rel="next">Types and Classes</a>, Previous: <a href="Syntax.html" accesskey="p" rel="prev">Syntax</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Evaluation-and-Compilation-1"><span>3 Evaluation and Compilation<a class="copiable-link" href="#Evaluation-and-Compilation-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Evaluation.html" accesskey="1">Evaluation</a></li>
+<li><a href="Compilation.html" accesskey="2">Compilation</a></li>
+<li><a href="Declarations.html" accesskey="3">Declarations</a></li>
+<li><a href="Lambda-Lists.html" accesskey="4">Lambda Lists</a></li>
+<li><a href="Error-Checking-in-Function-Calls.html" accesskey="5">Error Checking in Function Calls</a></li>
+<li><a href="Traversal-Rules-and-Side-Effects.html" accesskey="6">Traversal Rules and Side Effects</a></li>
+<li><a href="Destructive-Operations.html" accesskey="7">Destructive Operations</a></li>
+<li><a href="Evaluation-and-Compilation-Dictionary.html" accesskey="8">Evaluation and Compilation Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Evaluation-of-Subforms-to-Places.html
@@ -0,0 +1,146 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Evaluation of Subforms to Places (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Evaluation of Subforms to Places (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Evaluation of Subforms to Places (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-Places-and-Generalized-Reference.html" rel="up" title="Overview of Places and Generalized Reference">
+<link href="Examples-of-Evaluation-of-Subforms-to-Places.html" rel="next" title="Examples of Evaluation of Subforms to Places">
+<link href="Overview-of-Places-and-Generalized-Reference.html" rel="prev" title="Overview of Places and Generalized Reference">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Evaluation-of-Subforms-to-Places">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Evaluation-of-Subforms-to-Places.html" accesskey="n" rel="next">Examples of Evaluation of Subforms to Places</a>, Previous: <a href="Overview-of-Places-and-Generalized-Reference.html" accesskey="p" rel="prev">Overview of Places and Generalized Reference</a>, Up: <a href="Overview-of-Places-and-Generalized-Reference.html" accesskey="u" rel="up">Overview of Places and Generalized Reference</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Evaluation-of-Subforms-to-Places-1"><span>5.1.1.1 Evaluation of Subforms to Places<a class="copiable-link" href="#Evaluation-of-Subforms-to-Places-1"> &para;</a></span></h4>
+
+<p>The following rules apply to the <i class="i">evaluation</i> of <i class="i">subforms</i> in a
+<i class="i">place</i>:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>The evaluation ordering of <i class="i">subforms</i> within a <i class="i">place</i>
+is determined by the order specified by the second value returned by
+</p>
+<p><b class="b">get-setf-expansion</b>. 
+</p>
+<p>For all <i class="i">places</i> defined by this specification
+(<i class="i">e.g.</i>, <b class="b">getf</b>, <b class="b">ldb</b>, ...),
+this order of evaluation is left-to-right.
+</p>
+<a class="index-entry-id" id="index-order-of-evaluation-1"></a>
+
+<a class="index-entry-id" id="index-evaluation-order-1"></a>
+
+<p>When a <i class="i">place</i> is derived from a macro expansion,
+this rule is applied after the macro is expanded to find the appropriate <i class="i">place</i>. 
+</p>
+<p><i class="i">Places</i> defined by using <b class="b">defmacro</b> or
+</p>
+<p><b class="b">define-setf-expander</b>
+</p>
+<p>use the evaluation order defined by those definitions.
+For example, consider the following:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmacro wrong-order (x y) `(getf ,y ,x))
+</pre></div>
+
+<p>This following <i class="i">form</i> evaluates <code class="t">place2</code> first and
+then <code class="t">place1</code> because that is the order they are evaluated in
+the macro expansion:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (push value (wrong-order place1 place2))
+</pre></div>
+
+</dd>
+<dt>2.</dt>
+<dd>
+<p>For the <i class="i">macros</i> that manipulate <i class="i">places</i> 
+  (<b class="b">push</b>,
+   <b class="b">pushnew</b>,
+   <b class="b">remf</b>,
+   <b class="b">incf</b>,
+   <b class="b">decf</b>, 
+   <b class="b">shiftf</b>,
+   <b class="b">rotatef</b>,
+   <b class="b">psetf</b>,
+   <b class="b">setf</b>,
+   <b class="b">pop</b>, and those defined by <b class="b">define-modify-macro</b>)
+the <i class="i">subforms</i> of the macro call are evaluated exactly once
+in left-to-right order, with the <i class="i">subforms</i> of the <i class="i">places</i>
+evaluated in the order specified in (1).
+</p>
+<p><b class="b">push</b>, <b class="b">pushnew</b>, <b class="b">remf</b>, 
+<b class="b">incf</b>, <b class="b">decf</b>, <b class="b">shiftf</b>, <b class="b">rotatef</b>, 
+<b class="b">psetf</b>, <b class="b">pop</b> evaluate all <i class="i">subforms</i> before modifying
+any of the <i class="i">place</i> locations.
+<b class="b">setf</b> (in the case when <b class="b">setf</b> has more than two arguments) 
+performs its operation on each pair in sequence. For example, in 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setf place1 value1 place2 value2 ...)
+</pre></div>
+
+<p>the <i class="i">subforms</i> of <code class="t">place1</code> and <code class="t">value1</code> are evaluated, the location
+specified by 
+<code class="t">place1</code> is modified to contain the value returned by 
+<code class="t">value1</code>, and
+then the rest of the <b class="b">setf</b> form is processed in a like manner.
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>For <b class="b">check-type</b>, <b class="b">ctypecase</b>, and <b class="b">ccase</b>,
+<i class="i">subforms</i> of the <i class="i">place</i> are evaluated once as in (1),
+but might be evaluated again if the
+type check fails in the case of <b class="b">check-type</b> 
+or none of the cases hold in
+<b class="b">ctypecase</b> and <b class="b">ccase</b>.
+</p>
+</dd>
+<dt>4.</dt>
+<dd><p>For <b class="b">assert</b>, the order of evaluation of the generalized 
+references is not specified.
+<a class="index-entry-id" id="index-order-of-evaluation-2"></a>
+</p>
+<a class="index-entry-id" id="index-evaluation-order-2"></a>
+
+</dd>
+</dl>
+
+<p>Rules 2, 3 and 4 cover all <i class="i">standardized</i> <i class="i">macros</i> that manipulate <i class="i">places</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Evaluation-of-Subforms-to-Places.html">Examples of Evaluation of Subforms to Places</a>, Previous: <a href="Overview-of-Places-and-Generalized-Reference.html">Overview of Places and Generalized Reference</a>, Up: <a href="Overview-of-Places-and-Generalized-Reference.html">Overview of Places and Generalized Reference</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Evaluation.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Evaluation (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Evaluation (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Evaluation (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation.html" rel="up" title="Evaluation and Compilation">
+<link href="Compilation.html" rel="next" title="Compilation">
+<link href="Evaluation-and-Compilation.html" rel="prev" title="Evaluation and Compilation">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Evaluation">
+<div class="nav-panel">
+<p>
+Next: <a href="Compilation.html" accesskey="n" rel="next">Compilation</a>, Previous: <a href="Evaluation-and-Compilation.html" accesskey="p" rel="prev">Evaluation and Compilation</a>, Up: <a href="Evaluation-and-Compilation.html" accesskey="u" rel="up">Evaluation and Compilation</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Evaluation-1"><span>3.1 Evaluation<a class="copiable-link" href="#Evaluation-1"> &para;</a></span></h3>
+
+
+<p><i class="i">Execution</i> of <i class="i">code</i> can be accomplished by a variety of means ranging
+from direct interpretation of a <i class="i">form</i> representing a <i class="i">program</i>
+to invocation of <i class="i">compiled code</i> produced by a <i class="i">compiler</i>.
+</p>
+<p><i class="i">Evaluation</i>
+<a class="index-entry-id" id="index-evaluation"></a>
+ is the process by which a <i class="i">program</i> is <i class="i">executed</i> in <span class="r">Common Lisp</span>.
+The mechanism of <i class="i">evaluation</i> is manifested
+ both implicitly through the effect of the <i class="i">Lisp read-eval-print loop</i>,
+ and  explicitly through the presence of the <i class="i">functions</i> 
+       <b class="b">eval</b>,
+       <b class="b">compile</b>,
+       <b class="b">compile-file</b>,
+   and <b class="b">load</b>.
+Any of these facilities might share the same execution strategy, 
+or each might use a different one.
+</p>
+<p>The behavior of a <i class="i">conforming program</i> processed by <b class="b">eval</b>
+and by <b class="b">compile-file</b> might differ; see <a class="ref" href="Semantic-Constraints.html">Semantic Constraints</a>.
+</p>
+<p><i class="i">Evaluation</i> can be understood in terms of a model in which an
+interpreter recursively traverses a <i class="i">form</i> performing each
+step of the computation as it goes.  
+This model, which describes the semantics of <span class="r">Common Lisp</span> <i class="i">programs</i>,
+is described in <a class="ref" href="The-Evaluation-Model.html">The Evaluation Model</a>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Introduction-to-Environments.html" accesskey="1">Introduction to Environments</a></li>
+<li><a href="The-Evaluation-Model.html" accesskey="2">The Evaluation Model</a></li>
+<li><a href="Lambda-Expressions.html" accesskey="3">Lambda Expressions</a></li>
+<li><a href="Closures-and-Lexical-Binding.html" accesskey="4">Closures and Lexical Binding</a></li>
+<li><a href="Shadowing.html" accesskey="5">Shadowing</a></li>
+<li><a href="Extent.html" accesskey="6">Extent</a></li>
+<li><a href="Return-Values.html" accesskey="7">Return Values</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-ALWAYS.html
@@ -0,0 +1,97 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of ALWAYS (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of ALWAYS (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of ALWAYS (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Termination-Test-Clauses.html" rel="up" title="Termination Test Clauses">
+<link href="Examples-of-WHILE-and-UNTIL-clauses.html" rel="next" title="Examples of WHILE and UNTIL clauses">
+<link href="Examples-of-REPEAT-clause.html" rel="prev" title="Examples of REPEAT clause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-ALWAYS">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-WHILE-and-UNTIL-clauses.html" accesskey="n" rel="next">Examples of WHILE and UNTIL clauses</a>, Previous: <a href="Examples-of-REPEAT-clause.html" accesskey="p" rel="prev">Examples of REPEAT clause</a>, Up: <a href="Termination-Test-Clauses.html" accesskey="u" rel="up">Termination Test Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-ALWAYS_002c-NEVER_002c-and-THEREIS-clauses"><span>6.1.4.2 Examples of ALWAYS, NEVER, and THEREIS clauses<a class="copiable-link" href="#Examples-of-ALWAYS_002c-NEVER_002c-and-THEREIS-clauses"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; Make sure I is always less than 11 (two ways).
+;; The FOR construct terminates these loops.
+ (loop for i from 0 to 10
+       always (&lt; i 11))
+&rArr;  T
+ (loop for i from 0 to 10
+       never (&gt; i 11))
+&rArr;  T
+
+;; If I exceeds 10 return I; otherwise, return NIL.
+;; The THEREIS construct terminates this loop.
+ (loop for i from 0
+       thereis (when (&gt; i 10) i) )
+&rArr;  11
+
+;;; The FINALLY clause is not evaluated in these examples.
+ (loop for i from 0 to 10
+       always (&lt; i 9)
+       finally (print &quot;you won't see this&quot;))
+&rArr;  NIL
+ (loop never t
+       finally (print &quot;you won't see this&quot;))
+&rArr;  NIL
+ (loop thereis &quot;Here is my value&quot;
+       finally (print &quot;you won't see this&quot;))
+&rArr;  &quot;Here is my value&quot;
+
+;; The FOR construct terminates this loop, so the FINALLY clause 
+;; is evaluated.
+ (loop for i from 1 to 10
+       thereis (&gt; i 11)
+       finally (prin1 'got-here))
+<code class="t"> |&gt; </code> GOT-HERE
+&rArr;  NIL
+
+;; If this code could be used to find a counterexample to Fermat's
+;; last theorem, it would still not return the value of the
+;; counterexample because all of the THEREIS clauses in this example
+;; only return T.  But if Fermat is right, that won't matter
+;; because this won't terminate.
+
+ (loop for z upfrom 2
+       thereis
+         (loop for n upfrom 3 below (log z 2)
+               thereis
+                 (loop for x below z
+                       thereis
+                         (loop for y below z
+                               thereis (= (+ (expt x n) (expt y n))
+                                          (expt z n))))))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-APPEND-and-NCONC-clauses.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of APPEND and NCONC clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of APPEND and NCONC clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of APPEND and NCONC clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Value-Accumulation-Clauses.html" rel="up" title="Value Accumulation Clauses">
+<link href="Examples-of-COUNT-clause.html" rel="next" title="Examples of COUNT clause">
+<link href="Examples-of-COLLECT-clause.html" rel="prev" title="Examples of COLLECT clause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-APPEND-and-NCONC-clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-COUNT-clause.html" accesskey="n" rel="next">Examples of COUNT clause</a>, Previous: <a href="Examples-of-COLLECT-clause.html" accesskey="p" rel="prev">Examples of COLLECT clause</a>, Up: <a href="Value-Accumulation-Clauses.html" accesskey="u" rel="up">Value Accumulation Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-APPEND-and-NCONC-clauses-1"><span>6.1.3.2 Examples of APPEND and NCONC clauses<a class="copiable-link" href="#Examples-of-APPEND-and-NCONC-clauses-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; Use APPEND to concatenate some sublists.
+  (loop for x in '((a) (b) ((c)))
+        append x)
+&rArr;  (A B (C))
+
+;; NCONC some sublists together.  Note that only lists made by the
+;; call to LIST are modified.
+  (loop for i upfrom 0 
+        as x in '(a b (c))
+        nconc (if (evenp i) (list x) nil))
+&rArr;  (A (C))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Associativity-and-Commutativity-in-Numeric-Operations.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Associativity and Commutativity in Numeric Operations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Associativity and Commutativity in Numeric Operations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Associativity and Commutativity in Numeric Operations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numeric-Operations.html" rel="up" title="Numeric Operations">
+<link href="Contagion-in-Numeric-Operations.html" rel="next" title="Contagion in Numeric Operations">
+<link href="Associativity-and-Commutativity-in-Numeric-Operations.html" rel="prev" title="Associativity and Commutativity in Numeric Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Associativity-and-Commutativity-in-Numeric-Operations">
+<div class="nav-panel">
+<p>
+Next: <a href="Contagion-in-Numeric-Operations.html" accesskey="n" rel="next">Contagion in Numeric Operations</a>, Previous: <a href="Associativity-and-Commutativity-in-Numeric-Operations.html" accesskey="p" rel="prev">Associativity and Commutativity in Numeric Operations</a>, Up: <a href="Numeric-Operations.html" accesskey="u" rel="up">Numeric Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Associativity-and-Commutativity-in-Numeric-Operations-1"><span>12.1.1.2 Examples of Associativity and Commutativity in Numeric Operations<a class="copiable-link" href="#Examples-of-Associativity-and-Commutativity-in-Numeric-Operations-1"> &para;</a></span></h4>
+
+<p>Consider the following expression, in which we assume that <code class="t">1.0</code> and
+<code class="t">1.0e-15</code> both denote <i class="i">single floats</i>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (+ 1/3 2/3 1.0d0 1.0 1.0e-15)
+</pre></div>
+
+<p>One <i class="i">conforming implementation</i> might
+process the <i class="i">arguments</i> from left to right,
+first adding <code class="t">1/3</code> and <code class="t">2/3</code> to get <code class="t">1</code>, 
+then converting that to a <i class="i">double float</i> 
+for combination with <code class="t">1.0d0</code>,
+then successively converting and adding <code class="t">1.0</code> and <code class="t">1.0e-15</code>.
+</p>
+<p>Another <i class="i">conforming implementation</i> might process the <i class="i">arguments</i> from
+right to left, first performing a <i class="i">single float</i> addition of <code class="t">1.0</code> and
+<code class="t">1.0e-15</code> (perhaps losing accuracy in the process), then converting the sum to 
+a <i class="i">double float</i> and adding <code class="t">1.0d0</code>, then converting <code class="t">2/3</code> to a
+<i class="i">double float</i> and adding it, and then converting <code class="t">1/3</code> and adding that.
+</p>
+<p>A third <i class="i">conforming implementation</i> might first scan all the <i class="i">arguments</i>,
+process all the <i class="i">rationals</i> first to keep that part of the computation exact,
+then find an <i class="i">argument</i> of the largest floating-point format among all the
+<i class="i">arguments</i> and add that, and then add in all other <i class="i">arguments</i>, converting
+each in turn (all in a perhaps misguided attempt to make the computation as accurate
+as possible).
+</p>
+<p>In any case, all three strategies are legitimate.
+</p>
+<p>A <i class="i">conforming program</i> could control the order by writing, for example,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (+ (+ 1/3 2/3) (+ 1.0d0 1.0e-15) 1.0)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-COLLECT-clause.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of COLLECT clause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of COLLECT clause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of COLLECT clause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Value-Accumulation-Clauses.html" rel="up" title="Value Accumulation Clauses">
+<link href="Examples-of-APPEND-and-NCONC-clauses.html" rel="next" title="Examples of APPEND and NCONC clauses">
+<link href="Value-Accumulation-Clauses.html" rel="prev" title="Value Accumulation Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-COLLECT-clause">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-APPEND-and-NCONC-clauses.html" accesskey="n" rel="next">Examples of APPEND and NCONC clauses</a>, Previous: <a href="Value-Accumulation-Clauses.html" accesskey="p" rel="prev">Value Accumulation Clauses</a>, Up: <a href="Value-Accumulation-Clauses.html" accesskey="u" rel="up">Value Accumulation Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-COLLECT-clause-1"><span>6.1.3.1 Examples of COLLECT clause<a class="copiable-link" href="#Examples-of-COLLECT-clause-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; Collect all the symbols in a list.
+ (loop for i in '(bird 3 4 turtle (1 . 4) horse cat)
+       when (symbolp i) collect i)
+&rArr;  (BIRD TURTLE HORSE CAT)
+
+;; Collect and return odd numbers.
+ (loop for i from 1 to 10
+       if (oddp i) collect i)
+&rArr;  (1 3 5 7 9)
+
+;; Collect items into local variable, but don't return them.
+ (loop for i in '(a b c d) by #'cddr
+       collect i into my-list
+       finally (print my-list))
+<code class="t"> |&gt; </code> (A C) 
+&rArr;  NIL
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-COUNT-clause.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of COUNT clause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of COUNT clause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of COUNT clause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Value-Accumulation-Clauses.html" rel="up" title="Value Accumulation Clauses">
+<link href="Examples-of-MAXIMIZE-and-MINIMIZE-clauses.html" rel="next" title="Examples of MAXIMIZE and MINIMIZE clauses">
+<link href="Examples-of-APPEND-and-NCONC-clauses.html" rel="prev" title="Examples of APPEND and NCONC clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-COUNT-clause">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-MAXIMIZE-and-MINIMIZE-clauses.html" accesskey="n" rel="next">Examples of MAXIMIZE and MINIMIZE clauses</a>, Previous: <a href="Examples-of-APPEND-and-NCONC-clauses.html" accesskey="p" rel="prev">Examples of APPEND and NCONC clauses</a>, Up: <a href="Value-Accumulation-Clauses.html" accesskey="u" rel="up">Value Accumulation Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-COUNT-clause-1"><span>6.1.3.3 Examples of COUNT clause<a class="copiable-link" href="#Examples-of-COUNT-clause-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (loop for i in '(a b nil c nil d e)
+       count i)
+&rArr;  5
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Class-Precedence-List-Determination.html
@@ -0,0 +1,145 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Class Precedence List Determination (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Class Precedence List Determination (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Class Precedence List Determination (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Determining-the-Class-Precedence-List.html" rel="up" title="Determining the Class Precedence List">
+<link href="Topological-Sorting.html" rel="prev" title="Topological Sorting">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Class-Precedence-List-Determination">
+<div class="nav-panel">
+<p>
+Previous: <a href="Topological-Sorting.html" accesskey="p" rel="prev">Topological Sorting</a>, Up: <a href="Determining-the-Class-Precedence-List.html" accesskey="u" rel="up">Determining the Class Precedence List</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Class-Precedence-List-Determination-1"><span>4.3.5.2 Examples of Class Precedence List Determination<a class="copiable-link" href="#Examples-of-Class-Precedence-List-Determination-1"> &para;</a></span></h4>
+
+<p>This example determines a <i class="i">class precedence list</i> for the
+class <code class="t">pie</code>.  The following <i class="i">classes</i> are defined:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defclass pie (apple cinnamon) ())
+
+ (defclass apple (fruit) ())
+
+ (defclass cinnamon (spice) ())
+
+ (defclass fruit (food) ())
+
+ (defclass spice (food) ())
+
+ (defclass food () ())
+</pre></div>
+
+<p>The set S_{pie}~= {pie, apple, cinnamon, fruit, spice, food,
+standard-object, t }. The set R~= { (pie, apple),
+(apple, cinnamon), (apple, fruit), (cinnamon, spice), \break
+(fruit, food), (spice, food), (food, standard-object), (standard-object,
+t) }.
+</p>
+<p>The class <code class="t">pie</code> is not preceded by anything, so it comes first;
+the result so far is <code class="t">(pie)</code>.  Remove <code class="t">pie</code> from S and pairs
+mentioning <code class="t">pie</code> from R to get S~= {apple, cinnamon,
+fruit, spice, food, standard-object, t } and R~=~{(apple, cinnamon), (apple, fruit), (cinnamon, spice),\break (fruit,
+food), (spice, food), (food, standard-object),
+(standard-object, t) }.
+</p>
+<p>The class <code class="t">apple</code> is not preceded by anything, so it is next; the
+result is <code class="t">(pie apple)</code>. Removing <code class="t">apple</code> and the relevant
+pairs results in S~= { cinnamon, fruit, spice, food,
+standard-object, t } and R~= { (cinnamon, spice),
+(fruit, food), (spice, food), (food, standard-object),\break
+(standard-object, t) }.
+</p>
+<p>The classes <code class="t">cinnamon</code> and <code class="t">fruit</code> are not preceded by
+anything, so the one with a direct <i class="i">subclass</i> rightmost in the 
+<i class="i">class precedence list</i> computed so far goes next.  The class <code class="t">apple</code> is a
+direct <i class="i">subclass</i> of <code class="t">fruit</code>, and the class <code class="t">pie</code> is a direct
+<i class="i">subclass</i> of <code class="t">cinnamon</code>.  Because <code class="t">apple</code> appears to the right
+of <code class="t">pie</code> in the <i class="i">class precedence list</i>, 
+<code class="t">fruit</code> goes next, and the
+result so far is <code class="t">(pie apple fruit)</code>.  S~= { cinnamon,
+spice, food, standard-object, t }; R~= {(cinnamon,
+spice), (spice, food),\break (food, standard-object),
+(standard-object, t) }.
+</p>
+<p>The class <code class="t">cinnamon</code> is next, giving the result so far as <code class="t">(pie apple fruit cinnamon)</code>.  At this point S~= { spice,
+food, standard-object, t }; R~= { (spice, food), (food,
+standard-object), (standard-object, t) }.
+</p>
+<p>The classes <code class="t">spice</code>, <code class="t">food</code>, <b class="b">standard-object</b>, and 
+<b class="b">t</b> are added in that order, and the <i class="i">class precedence list</i> 
+is <code class="t">(pie apple fruit cinnamon spice food standard-object t)</code>.
+</p>
+<p>It is possible to write a set of <i class="i">class</i> definitions that cannot be 
+ordered.   For example: 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defclass new-class (fruit apple) ())
+
+ (defclass apple (fruit) ())
+</pre></div>
+
+<p>The class <code class="t">fruit</code> must precede <code class="t">apple</code> 
+because the local ordering of <i class="i">superclasses</i> must be preserved.
+The class <code class="t">apple</code> must precede <code class="t">fruit</code> 
+because a <i class="i">class</i> always precedes its own <i class="i">superclasses</i>.
+When this situation occurs, an error is signaled, as happens here
+when the system tries to compute the <i class="i">class precedence list</i> 
+of <code class="t">new-class</code>.
+</p>
+<p>The following might appear to be a conflicting set of definitions:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defclass pie (apple cinnamon) ())
+
+ (defclass pastry (cinnamon apple) ())
+
+ (defclass apple () ())
+
+ (defclass cinnamon () ())
+</pre></div>
+
+<p>The <i class="i">class precedence list</i> for <code class="t">pie</code> is 
+<code class="t">(pie apple cinnamon standard-object t)</code>.
+</p>
+<p>The <i class="i">class precedence list</i> for <code class="t">pastry</code> is  
+<code class="t">(pastry cinnamon apple standard-object t)</code>.
+</p>
+<p>It is not a problem for <code class="t">apple</code> to precede <code class="t">cinnamon</code> in the
+ordering of the <i class="i">superclasses</i> of <code class="t">pie</code> but not in the ordering for
+<code class="t">pastry</code>.  However, it is not possible to build a new <i class="i">class</i> that
+has both <code class="t">pie</code> and <code class="t">pastry</code> as <i class="i">superclasses</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Topological-Sorting.html">Topological Sorting</a>, Up: <a href="Determining-the-Class-Precedence-List.html">Determining the Class Precedence List</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Data_002ddirected-Destructuring-by-Lambda-Lists.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Data-directed Destructuring by Lambda Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Data-directed Destructuring by Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Data-directed Destructuring by Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Macro-Lambda-Lists.html" rel="up" title="Macro Lambda Lists">
+<link href="Lambda_002dlist_002ddirected-Destructuring-by-Lambda-Lists.html" rel="next" title="Lambda-list-directed Destructuring by Lambda Lists">
+<link href="Data_002ddirected-Destructuring-by-Lambda-Lists.html" rel="prev" title="Data-directed Destructuring by Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Data_002ddirected-Destructuring-by-Lambda-Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Lambda_002dlist_002ddirected-Destructuring-by-Lambda-Lists.html" accesskey="n" rel="next">Lambda-list-directed Destructuring by Lambda Lists</a>, Previous: <a href="Data_002ddirected-Destructuring-by-Lambda-Lists.html" accesskey="p" rel="prev">Data-directed Destructuring by Lambda Lists</a>, Up: <a href="Macro-Lambda-Lists.html" accesskey="u" rel="up">Macro Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Data_002ddirected-Destructuring-by-Lambda-Lists-1"><span>3.4.4.3 Examples of Data-directed Destructuring by Lambda Lists<a class="copiable-link" href="#Examples-of-Data_002ddirected-Destructuring-by-Lambda-Lists-1"> &para;</a></span></h4>
+
+<p>An example pattern is
+</p>
+<p><code class="t">(a b c)</code>
+</p>
+<p>which destructures a list of three elements.  The variable <code class="t">a</code> is assigned
+to the first element, <code class="t">b</code> to the second, etc.  A more complex example
+is
+</p>
+<p><code class="t">((first . rest) . more)</code>
+</p>
+<p>The important features of data-directed destructuring are its syntactic
+simplicity and the ability to extend it to lambda-list-directed destructuring.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Declaration-Scope.html
@@ -0,0 +1,131 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Declaration Scope (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Declaration Scope (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Declaration Scope (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Declaration-Scope.html" rel="up" title="Declaration Scope">
+<link href="Declaration-Scope.html" rel="prev" title="Declaration Scope">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Declaration-Scope">
+<div class="nav-panel">
+<p>
+Previous: <a href="Declaration-Scope.html" accesskey="p" rel="prev">Declaration Scope</a>, Up: <a href="Declaration-Scope.html" accesskey="u" rel="up">Declaration Scope</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Declaration-Scope-1"><span>3.3.4.1 Examples of Declaration Scope<a class="copiable-link" href="#Examples-of-Declaration-Scope-1"> &para;</a></span></h4>
+
+<p>Here is an example illustrating the <i class="i">scope</i> of <i class="i">bound declarations</i>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((x 1))                ;[1] 1st occurrence of x
+   (declare (special x))     ;[2] 2nd occurrence of x
+   (let ((x 2))              ;[3] 3rd occurrence of x
+     (let ((old-x x)         ;[4] 4th occurrence of x
+           (x 3))            ;[5] 5th occurrence of x
+       (declare (special x)) ;[6] 6th occurrence of x
+       (list old-x x))))     ;[7] 7th occurrence of x
+&rArr;  (2 3)
+</pre></div>
+
+<p>The first occurrence of <code class="t">x</code> <i class="i">establishes</i> a <i class="i">dynamic binding</i>
+of <code class="t">x</code> because of the <b class="b">special</b> <i class="i">declaration</i> for <code class="t">x</code>
+in the second line.  The third occurrence of <code class="t">x</code> <i class="i">establishes</i> a
+<i class="i">lexical binding</i> of <code class="t">x</code> (because there is no <b class="b">special</b>
+<i class="i">declaration</i> in the corresponding <b class="b">let</b> <i class="i">form</i>).
+The fourth occurrence of <code class="t">x</code> <i class="i">x</i> is a reference to the
+<i class="i">lexical binding</i> of <code class="t">x</code> established in the third line.
+The fifth occurrence of <code class="t">x</code> <i class="i">establishes</i> a <i class="i">dynamic binding</i>
+of <i class="i">x</i> for the body of the <b class="b">let</b> <i class="i">form</i> that begins on
+that line because of the <b class="b">special</b> <i class="i">declaration</i> for <code class="t">x</code>
+in the sixth line. The reference to <code class="t">x</code> in the fourth line is not
+affected by the <b class="b">special</b> <i class="i">declaration</i> in the sixth line 
+because that reference is not within the &ldquo;would-be <i class="i">lexical scope</i>&rdquo;
+of the <i class="i">variable</i> <code class="t">x</code> in the fifth line.  The reference to <code class="t">x</code>
+in the seventh line is a reference to the <i class="i">dynamic binding</i> of <i class="i">x</i>
+<i class="i">established</i> in the fifth line.
+</p>
+<p>Here is another example, to illustrate the <i class="i">scope</i> of a
+<i class="i">free declaration</i>.  In the following:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (lambda (&amp;optional (x (foo 1))) ;[1]
+   (declare (notinline foo))     ;[2]
+   (foo x))                      ;[3]
+</pre></div>
+
+<p>the <i class="i">call</i> to <code class="t">foo</code> in the first line might be 
+compiled inline even though the <i class="i">call</i> to <code class="t">foo</code> in
+the third line must not be.  This is because
+the <b class="b">notinline</b> <i class="i">declaration</i>
+for <code class="t">foo</code> in the second line applies only to the body on the
+third line.  In order to suppress inlining for both <i class="i">calls</i>, 
+one might write:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (locally (declare (notinline foo)) ;[1]
+   (lambda (&amp;optional (x (foo 1)))  ;[2]
+     (foo x)))                      ;[3]
+</pre></div>
+
+<p>or, alternatively:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (lambda (&amp;optional                               ;[1]
+            (x (locally (declare (notinline foo)) ;[2]
+                 (foo 1))))                       ;[3]
+   (declare (notinline foo))                      ;[4]
+   (foo x))                                       ;[5]
+</pre></div>
+
+<p>Finally, here is an example that shows the <i class="i">scope</i> of
+<i class="i">declarations</i> in an <i class="i">iteration form</i>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((x  1))                     ;[1]
+   (declare (special x))           ;[2]
+     (let ((x 2))                  ;[3]
+       (dotimes (i x x)            ;[4]
+         (declare (special x)))))  ;[5]
+&rArr;  1
+</pre></div>
+
+<p>In this example, the first reference to <code class="t">x</code> on the fourth line is to
+the <i class="i">lexical binding</i> of <code class="t">x</code> established on the third line.
+However, the second occurrence of <code class="t">x</code> on the fourth line lies within
+the <i class="i">scope</i> of the <i class="i">free declaration</i> on the fifth line
+(because this is the <i class="i">result-form</i> of the <b class="b">dotimes</b>)
+and therefore refers to the <i class="i">dynamic binding</i> of <code class="t">x</code>.
+</p>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Declaration-Scope.html">Declaration Scope</a>, Up: <a href="Declaration-Scope.html">Declaration Scope</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Printer.html
@@ -0,0 +1,106 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Effect of Readtable Case on the Lisp Printer (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Effect of Readtable Case on the Lisp Printer (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Effect of Readtable Case on the Lisp Printer (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Printing-Strings.html" rel="next" title="Printing Strings">
+<link href="Effect-of-Readtable-Case-on-the-Lisp-Printer.html" rel="prev" title="Effect of Readtable Case on the Lisp Printer">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Printer">
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Strings.html" accesskey="n" rel="next">Printing Strings</a>, Previous: <a href="Effect-of-Readtable-Case-on-the-Lisp-Printer.html" accesskey="p" rel="prev">Effect of Readtable Case on the Lisp Printer</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Printer-1"><span>22.1.3.11 Examples of Effect of Readtable Case on the Lisp Printer<a class="copiable-link" href="#Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Printer-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun test-readtable-case-printing ()
+   (let ((*readtable* (copy-readtable nil))
+         (*print-case* *print-case*))
+     (format t &quot;READTABLE-CASE *PRINT-CASE*  Symbol-name  Output~
+              ~
+              ~
+     (dolist (readtable-case '(:upcase :downcase :preserve :invert))
+       (setf (readtable-case *readtable*) readtable-case)
+       (dolist (print-case '(:upcase :downcase :capitalize))
+         (dolist (symbol '(|ZEBRA| |Zebra| |zebra|))
+           (setq *print-case* print-case)
+           (format t &quot;~&amp;:~A~15T:~A~29T~A~42T~A&quot;
+                   (string-upcase readtable-case)
+                   (string-upcase print-case)
+                   (symbol-name symbol)
+                   (prin1-to-string symbol)))))))
+</pre></div>
+
+<p>The output from <code class="t">(test-readtable-case-printing)</code> should be as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted">    READTABLE-CASE *PRINT-CASE*  Symbol-name  Output
+    --------------------------------------------------
+    :UPCASE        :UPCASE       ZEBRA        ZEBRA
+    :UPCASE        :UPCASE       Zebra        |Zebra|
+    :UPCASE        :UPCASE       zebra        |zebra|
+    :UPCASE        :DOWNCASE     ZEBRA        zebra
+    :UPCASE        :DOWNCASE     Zebra        |Zebra|
+    :UPCASE        :DOWNCASE     zebra        |zebra|
+    :UPCASE        :CAPITALIZE   ZEBRA        Zebra
+    :UPCASE        :CAPITALIZE   Zebra        |Zebra|
+    :UPCASE        :CAPITALIZE   zebra        |zebra|
+    :DOWNCASE      :UPCASE       ZEBRA        |ZEBRA|
+    :DOWNCASE      :UPCASE       Zebra        |Zebra|
+    :DOWNCASE      :UPCASE       zebra        ZEBRA
+    :DOWNCASE      :DOWNCASE     ZEBRA        |ZEBRA|
+    :DOWNCASE      :DOWNCASE     Zebra        |Zebra|
+    :DOWNCASE      :DOWNCASE     zebra        zebra
+    :DOWNCASE      :CAPITALIZE   ZEBRA        |ZEBRA|
+    :DOWNCASE      :CAPITALIZE   Zebra        |Zebra|
+    :DOWNCASE      :CAPITALIZE   zebra        Zebra
+    :PRESERVE      :UPCASE       ZEBRA        ZEBRA
+    :PRESERVE      :UPCASE       Zebra        Zebra
+    :PRESERVE      :UPCASE       zebra        zebra
+    :PRESERVE      :DOWNCASE     ZEBRA        ZEBRA
+    :PRESERVE      :DOWNCASE     Zebra        Zebra
+    :PRESERVE      :DOWNCASE     zebra        zebra
+    :PRESERVE      :CAPITALIZE   ZEBRA        ZEBRA
+    :PRESERVE      :CAPITALIZE   Zebra        Zebra
+    :PRESERVE      :CAPITALIZE   zebra        zebra
+    :INVERT        :UPCASE       ZEBRA        zebra
+    :INVERT        :UPCASE       Zebra        Zebra
+    :INVERT        :UPCASE       zebra        ZEBRA
+    :INVERT        :DOWNCASE     ZEBRA        zebra
+    :INVERT        :DOWNCASE     Zebra        Zebra
+    :INVERT        :DOWNCASE     zebra        ZEBRA
+    :INVERT        :CAPITALIZE   ZEBRA        zebra
+    :INVERT        :CAPITALIZE   Zebra        Zebra
+    :INVERT        :CAPITALIZE   zebra        ZEBRA
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Reader.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Effect of Readtable Case on the Lisp Reader (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Effect of Readtable Case on the Lisp Reader (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Effect of Readtable Case on the Lisp Reader (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Effect-of-Readtable-Case-on-the-Lisp-Reader.html" rel="up" title="Effect of Readtable Case on the Lisp Reader">
+<link href="Effect-of-Readtable-Case-on-the-Lisp-Reader.html" rel="prev" title="Effect of Readtable Case on the Lisp Reader">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Reader">
+<div class="nav-panel">
+<p>
+Previous: <a href="Effect-of-Readtable-Case-on-the-Lisp-Reader.html" accesskey="p" rel="prev">Effect of Readtable Case on the Lisp Reader</a>, Up: <a href="Effect-of-Readtable-Case-on-the-Lisp-Reader.html" accesskey="u" rel="up">Effect of Readtable Case on the Lisp Reader</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Reader-1"><span>23.1.2.1 Examples of Effect of Readtable Case on the Lisp Reader<a class="copiable-link" href="#Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Reader-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun test-readtable-case-reading ()
+   (let ((*readtable* (copy-readtable nil)))
+     (format t &quot;READTABLE-CASE  Input   Symbol-name~
+              ~
+              ~
+     (dolist (readtable-case '(:upcase :downcase :preserve :invert))
+       (setf (readtable-case *readtable*) readtable-case)
+       (dolist (input '(&quot;ZEBRA&quot; &quot;Zebra&quot; &quot;zebra&quot;))
+         (format t &quot;~&amp;:~A~16T~A~24T~A&quot;
+                 (string-upcase readtable-case)
+                 input
+                 (symbol-name (read-from-string input)))))))
+</pre></div>
+
+<p>The output from <code class="t">(test-readtable-case-reading)</code> should be as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> READTABLE-CASE     Input Symbol-name
+ -------------------------------------
+    :UPCASE         ZEBRA   ZEBRA
+    :UPCASE         Zebra   ZEBRA
+    :UPCASE         zebra   ZEBRA
+    :DOWNCASE       ZEBRA   zebra
+    :DOWNCASE       Zebra   zebra
+    :DOWNCASE       zebra   zebra
+    :PRESERVE       ZEBRA   ZEBRA
+    :PRESERVE       Zebra   Zebra
+    :PRESERVE       zebra   zebra
+    :INVERT         ZEBRA   zebra
+    :INVERT         Zebra   Zebra
+    :INVERT         zebra   ZEBRA
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Evaluation-of-Subforms-to-Places.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Evaluation of Subforms to Places (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Evaluation of Subforms to Places (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Evaluation of Subforms to Places (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-Places-and-Generalized-Reference.html" rel="up" title="Overview of Places and Generalized Reference">
+<link href="Setf-Expansions.html" rel="next" title="Setf Expansions">
+<link href="Evaluation-of-Subforms-to-Places.html" rel="prev" title="Evaluation of Subforms to Places">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Evaluation-of-Subforms-to-Places">
+<div class="nav-panel">
+<p>
+Next: <a href="Setf-Expansions.html" accesskey="n" rel="next">Setf Expansions</a>, Previous: <a href="Evaluation-of-Subforms-to-Places.html" accesskey="p" rel="prev">Evaluation of Subforms to Places</a>, Up: <a href="Overview-of-Places-and-Generalized-Reference.html" accesskey="u" rel="up">Overview of Places and Generalized Reference</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Evaluation-of-Subforms-to-Places-1"><span>5.1.1.2 Examples of Evaluation of Subforms to Places<a class="copiable-link" href="#Examples-of-Evaluation-of-Subforms-to-Places-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((ref2 (list '())))
+   (push (progn (princ &quot;1&quot;) 'ref-1)
+         (car (progn (princ &quot;2&quot;) ref2)))) 
+<code class="t"> |&gt; </code> 12
+&rArr;  (REF1)
+
+ (let (x)
+    (push (setq x (list 'a))
+          (car (setq x (list 'b))))
+     x)
+&rArr;  (((A) . B))
+</pre></div>
+
+<p><b class="b">push</b> first evaluates <code class="t">(setq x (list 'a)) &rArr;  (a)</code>,
+ then evaluates <code class="t">(setq x (list 'b)) &rArr;  (b)</code>,
+ then modifies the <i class="i">car</i> of this latest value to be <code class="t">((a) . b)</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-FORMAT.html
@@ -0,0 +1,152 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of FORMAT (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of FORMAT (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of FORMAT (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Formatted-Output.html" rel="up" title="Formatted Output">
+<link href="Notes-about-FORMAT.html" rel="next" title="Notes about FORMAT">
+<link href="Additional-Information-about-FORMAT-Operations.html" rel="prev" title="Additional Information about FORMAT Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Examples-of-FORMAT">
+<div class="nav-panel">
+<p>
+Next: <a href="Notes-about-FORMAT.html" accesskey="n" rel="next">Notes about FORMAT</a>, Previous: <a href="Additional-Information-about-FORMAT-Operations.html" accesskey="p" rel="prev">Additional Information about FORMAT Operations</a>, Up: <a href="Formatted-Output.html" accesskey="u" rel="up">Formatted Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Examples-of-FORMAT-1"><span>22.3.11 Examples of FORMAT<a class="copiable-link" href="#Examples-of-FORMAT-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;foo&quot;) &rArr;  &quot;foo&quot;
+ (setq x 5) &rArr;  5
+ (format nil &quot;The answer is ~D.&quot; x) &rArr;  &quot;The answer is 5.&quot;
+ (format nil &quot;The answer is ~3D.&quot; x) &rArr;  &quot;The answer is   5.&quot;
+ (format nil &quot;The answer is ~3,'0D.&quot; x) &rArr;  &quot;The answer is 005.&quot;
+ (format nil &quot;The answer is ~:D.&quot; (expt 47 x))
+&rArr;  &quot;The answer is 229,345,007.&quot;
+ (setq y &quot;elephant&quot;) &rArr;  &quot;elephant&quot;
+ (format nil &quot;Look at the ~A!&quot; y) &rArr;  &quot;Look at the elephant!&quot;
+ (setq n 3) &rArr;  3
+ (format nil &quot;~D item~:P found.&quot; n) &rArr;  &quot;3 items found.&quot;
+ (format nil &quot;~R dog~:[s are~; is~] here.&quot; n (= n 1))
+&rArr;  &quot;three dogs are here.&quot;
+ (format nil &quot;~R dog~:*~[s are~; is~:;s are~] here.&quot; n)
+&rArr;  &quot;three dogs are here.&quot;
+ (format nil &quot;Here ~[are~;is~:;are~] ~:*~R pupp~:@P.&quot; n)
+&rArr;  &quot;Here are three puppies.&quot;
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (defun foo (x)
+   (format nil &quot;~6,2F|~6,2,1,'*F|~6,2,,'?F|~6F|~,2F|~F&quot;
+           x x x x x x)) &rArr;  FOO
+ (foo 3.14159)  &rArr;  &quot;  3.14| 31.42|  3.14|3.1416|3.14|3.14159&quot;
+ (foo -3.14159) &rArr;  &quot; -3.14|-31.42| -3.14|-3.142|-3.14|-3.14159&quot;
+ (foo 100.0)    &rArr;  &quot;100.00|******|100.00| 100.0|100.00|100.0&quot;
+ (foo 1234.0)   &rArr;  &quot;1234.00|******|??????|1234.0|1234.00|1234.0&quot;
+ (foo 0.006)    &rArr;  &quot;  0.01|  0.06|  0.01| 0.006|0.01|0.006&quot;
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (defun foo (x)  
+    (format nil
+           &quot;~9,2,1,,'*E|~10,3,2,2,'?,,'$E|~
+            ~9,3,2,-2,'
+           x x x x))
+ (foo 3.14159)  &rArr;  &quot;  3.14E+0| 31.42$-01|+.003E+03|  3.14E+0&quot;
+ (foo -3.14159) &rArr;  &quot; -3.14E+0|-31.42$-01|-.003E+03| -3.14E+0&quot;
+ (foo 1100.0)   &rArr;  &quot;  1.10E+3| 11.00$+02|+.001E+06|  1.10E+3&quot;
+ (foo 1100.0L0) &rArr;  &quot;  1.10L+3| 11.00$+02|+.001L+06|  1.10L+3&quot;
+ (foo 1.1E13)   &rArr;  &quot;*********| 11.00$+12|+.001E+16| 1.10E+13&quot;
+ (foo 1.1L120)  &rArr;  &quot;*********|??????????|
+ (foo 1.1L1200) &rArr;  &quot;*********|??????????|
+</pre></div>
+
+<p>As an example of the effects of varying the scale factor, the code
+</p>
+<div class="example">
+<pre class="example-preformatted"> (dotimes (k 13)
+   (format t &quot;~
+           (- k 5) (- k 5) 3.14159))
+</pre></div>
+
+<p>produces the following output:
+</p>
+<div class="example">
+<pre class="example-preformatted">Scale factor -5: | 0.000003E+06|
+Scale factor -4: | 0.000031E+05|
+Scale factor -3: | 0.000314E+04|
+Scale factor -2: | 0.003142E+03|
+Scale factor -1: | 0.031416E+02|
+Scale factor  0: | 0.314159E+01|
+Scale factor  1: | 3.141590E+00|
+Scale factor  2: | 31.41590E-01|
+Scale factor  3: | 314.1590E-02|
+Scale factor  4: | 3141.590E-03|
+Scale factor  5: | 31415.90E-04|
+Scale factor  6: | 314159.0E-05|
+Scale factor  7: | 3141590.E-06|
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (defun foo (x)
+   (format nil &quot;~9,2,1,,'*G|~9,3,2,3,'?,,'$G|~9,3,2,0,'
+          x x x x))                                     
+ (foo 0.0314159) &rArr;  &quot;  3.14E-2|314.2$-04|0.314E-01|  3.14E-2&quot;
+ (foo 0.314159)  &rArr;  &quot;  0.31   |0.314    |0.314    | 0.31    &quot;
+ (foo 3.14159)   &rArr;  &quot;   3.1   | 3.14    | 3.14    |  3.1    &quot;
+ (foo 31.4159)   &rArr;  &quot;   31.   | 31.4    | 31.4    |  31.    &quot;
+ (foo 314.159)   &rArr;  &quot;  3.14E+2| 314.    | 314.    |  3.14E+2&quot;
+ (foo 3141.59)   &rArr;  &quot;  3.14E+3|314.2$+01|0.314E+04|  3.14E+3&quot;
+ (foo 3141.59L0) &rArr;  &quot;  3.14L+3|314.2$+01|0.314L+04|  3.14L+3&quot;
+ (foo 3.14E12)   &rArr;  &quot;*********|314.0$+10|0.314E+13| 3.14E+12&quot;
+ (foo 3.14L120)  &rArr;  &quot;*********|?????????|
+ (foo 3.14L1200) &rArr;  &quot;*********|?????????|
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;~10&lt;foo~;bar~&gt;&quot;)   &rArr;  &quot;foo    bar&quot;
+ (format nil &quot;~10:&lt;foo~;bar~&gt;&quot;)  &rArr;  &quot;  foo  bar&quot;
+ (format nil &quot;~10&lt;foobar~&gt;&quot;)     &rArr;  &quot;    foobar&quot;
+ (format nil &quot;~10:&lt;foobar~&gt;&quot;)    &rArr;  &quot;    foobar&quot;
+ (format nil &quot;~10:@&lt;foo~;bar~&gt;&quot;) &rArr;  &quot;  foo bar &quot;
+ (format nil &quot;~10@&lt;foobar~&gt;&quot;)    &rArr;  &quot;foobar    &quot;
+ (format nil &quot;~10:@&lt;foobar~&gt;&quot;)   &rArr;  &quot;  foobar  &quot;
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted">  (FORMAT NIL &quot;Written to ~A.&quot; #P&quot;foo.bin&quot;)
+  &rArr;  &quot;Written to foo.bin.&quot;
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Notes-about-FORMAT.html">Notes about FORMAT</a>, Previous: <a href="Additional-Information-about-FORMAT-Operations.html">Additional Information about FORMAT Operations</a>, Up: <a href="Formatted-Output.html">Formatted Output</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Feature-Expressions.html
@@ -0,0 +1,87 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Feature Expressions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Feature Expressions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Feature Expressions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Features.html" rel="up" title="Features">
+<link href="Feature-Expressions.html" rel="prev" title="Feature Expressions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Feature-Expressions">
+<div class="nav-panel">
+<p>
+Previous: <a href="Feature-Expressions.html" accesskey="p" rel="prev">Feature Expressions</a>, Up: <a href="Features.html" accesskey="u" rel="up">Features</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Feature-Expressions-1"><span>24.1.2.2 Examples of Feature Expressions<a class="copiable-link" href="#Examples-of-Feature-Expressions-1"> &para;</a></span></h4>
+
+<p>For example, suppose that
+ in <i class="i">implementation</i> A, the <i class="i">features</i> <code class="t">spice</code> and <code class="t">perq</code> are <i class="i">present</i>,
+			     but the <i class="i">feature</i> <code class="t">lispm</code> is not <i class="i">present</i>;
+ in <i class="i">implementation</i> B, the feature <code class="t">lispm</code> is <i class="i">present</i>,
+			     but the <i class="i">features</i> <code class="t">spice</code> and <code class="t">perq</code> are
+			      not <i class="i">present</i>;
+ and 
+ in <i class="i">implementation</i> C, none of the features <code class="t">spice</code>, <i class="i">lispm</i>, or <code class="t">perq</code> are
+			     <i class="i">present</i>.
+Figure 24&ndash;1 shows some sample <i class="i">expressions</i>, and how they would be 
+<i class="i">read</i>_2 in these <i class="i">implementations</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">(cons #+spice &quot;Spice&quot; #-spice &quot;Lispm&quot; x)</code> <!-- /@w -->
+  in <i class="i">implementation</i> A ...    <code class="t">(CONS &quot;Spice&quot; X)</code>             <!-- /@w -->
+    in <i class="i">implementation</i> B ...  <code class="t">(CONS &quot;Lispm&quot; X)</code>             <!-- /@w -->
+    in <i class="i">implementation</i> C ...  <code class="t">(CONS &quot;Lispm&quot; X)</code>             <!-- /@w -->
+  <code class="t">(cons #+spice &quot;Spice&quot; #+LispM &quot;Lispm&quot; x)</code> <!-- /@w -->
+  in <i class="i">implementation</i> A ...    <code class="t">(CONS &quot;Spice&quot; X)</code>             <!-- /@w -->
+    in <i class="i">implementation</i> B ...  <code class="t">(CONS &quot;Lispm&quot; X)</code>             <!-- /@w -->
+    in <i class="i">implementation</i> C ...  <code class="t">(CONS X)</code>                     <!-- /@w -->
+  <code class="t">(setq a '(1 2 #+perq 43 #+(not perq) 27))</code> <!-- /@w -->
+  in <i class="i">implementation</i> A ...    <code class="t">(SETQ A '(1 2 43))</code>           <!-- /@w -->
+    in <i class="i">implementation</i> B ...  <code class="t">(SETQ A '(1 2 27))</code>           <!-- /@w -->
+    in <i class="i">implementation</i> C ...  <code class="t">(SETQ A '(1 2 27))</code>           <!-- /@w -->
+  <code class="t">(let ((a 3) #+(or spice lispm) (b 3)) (foo a))</code> <!-- /@w -->
+  in <i class="i">implementation</i> A ...    <code class="t">(LET ((A 3) (B 3)) (FOO A))</code>  <!-- /@w -->
+    in <i class="i">implementation</i> B ...  <code class="t">(LET ((A 3) (B 3)) (FOO A))</code>  <!-- /@w -->
+    in <i class="i">implementation</i> C ...  <code class="t">(LET ((A 3)) (FOO A))</code>        <!-- /@w -->
+  <code class="t">(cons #+Lispm &quot;#+Spice&quot; #+Spice &quot;foo&quot; #-(or Lispm Spice) 7 x)</code> <!-- /@w -->
+  in <i class="i">implementation</i> A ...    <code class="t">(CONS &quot;foo&quot; X)</code>               <!-- /@w -->
+    in <i class="i">implementation</i> B ...  <code class="t">(CONS &quot;#+Spice&quot; X)</code>           <!-- /@w -->
+    in <i class="i">implementation</i> C ...  <code class="t">(CONS 7 X)</code>                   <!-- /@w -->
+
+              Figure 24&ndash;1: Features examples             <!-- /@w -->
+
+</pre></div></div>
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Feature-Expressions.html">Feature Expressions</a>, Up: <a href="Features.html">Features</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Inheritance.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Inheritance (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Inheritance (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Inheritance (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Inheritance.html" rel="up" title="Inheritance">
+<link href="Inheritance-of-Class-Options.html" rel="next" title="Inheritance of Class Options">
+<link href="Inheritance.html" rel="prev" title="Inheritance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Inheritance">
+<div class="nav-panel">
+<p>
+Next: <a href="Inheritance-of-Class-Options.html" accesskey="n" rel="next">Inheritance of Class Options</a>, Previous: <a href="Inheritance.html" accesskey="p" rel="prev">Inheritance</a>, Up: <a href="Inheritance.html" accesskey="u" rel="up">Inheritance</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Inheritance-1"><span>4.3.4.1 Examples of Inheritance<a class="copiable-link" href="#Examples-of-Inheritance-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defclass C1 () 
+     ((S1 :initform 5.4 :type number) 
+      (S2 :allocation :class)))
+
+ (defclass C2 (C1) 
+     ((S1 :initform 5 :type integer)
+      (S2 :allocation :instance)
+      (S3 :accessor C2-S3)))
+</pre></div>
+
+<p><i class="i">Instances</i> of the class <code class="t">C1</code> have a <i class="i">local slot</i> named <code class="t">S1</code>,
+whose default initial value is 5.4 and
+whose <i class="i">value</i> should always be a <i class="i">number</i>.
+The class <code class="t">C1</code> also has a <i class="i">shared slot</i> named <code class="t">S2</code>.
+</p>
+<p>There is a <i class="i">local slot</i> named <code class="t">S1</code> in <i class="i">instances</i> of <code class="t">C2</code>.
+The default initial value of <code class="t">S1</code> is 5.
+The value of <code class="t">S1</code> should always be of type <code class="t">(and integer number)</code>.
+There are also <i class="i">local slots</i> named <code class="t">S2</code> and <code class="t">S3</code> in <i class="i">instances</i> of <code class="t">C2</code>.
+The class <code class="t">C2</code> has a <i class="i">method</i> for <code class="t">C2-S3</code> for reading the value of slot <code class="t">S3</code>;
+there is also a <i class="i">method</i> for <code class="t">(setf C2-S3)</code> that writes the value of <code class="t">S3</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Keyword-Arguments-in-Generic-Functions-and-Methods.html
@@ -0,0 +1,78 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Keyword Arguments in Generic Functions and Methods (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Keyword Arguments in Generic Functions and Methods (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Keyword Arguments in Generic Functions and Methods (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Keyword-Arguments-in-Generic-Functions-and-Methods.html" rel="up" title="Keyword Arguments in Generic Functions and Methods">
+<link href="Keyword-Arguments-in-Generic-Functions-and-Methods.html" rel="prev" title="Keyword Arguments in Generic Functions and Methods">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Keyword-Arguments-in-Generic-Functions-and-Methods">
+<div class="nav-panel">
+<p>
+Previous: <a href="Keyword-Arguments-in-Generic-Functions-and-Methods.html" accesskey="p" rel="prev">Keyword Arguments in Generic Functions and Methods</a>, Up: <a href="Keyword-Arguments-in-Generic-Functions-and-Methods.html" accesskey="u" rel="up">Keyword Arguments in Generic Functions and Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Keyword-Arguments-in-Generic-Functions-and-Methods-1"><span>7.6.5.1 Examples of Keyword Arguments in Generic Functions and Methods<a class="copiable-link" href="#Examples-of-Keyword-Arguments-in-Generic-Functions-and-Methods-1"> &para;</a></span></h4>
+
+<p>For example, suppose there are two methods defined for <code class="t">width</code>
+as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmethod width ((c character-class) &amp;key font) ...)
+
+ (defmethod width ((p picture-class) &amp;key pixel-size) ...)
+</pre></div>
+
+<p>Assume that there are no other methods and no generic
+function definition for <code class="t">width</code>. The evaluation of the
+following form should signal an error because 
+the keyword argument <code class="t">:pixel-size</code> is not accepted by the applicable method.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (width (make-instance `character-class :char #\Q) 
+        :font 'baskerville :pixel-size 10)
+</pre></div>
+
+<p>The evaluation of the following form should signal an error.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (width (make-instance `picture-class :glyph (glyph #\Q)) 
+        :font 'baskerville :pixel-size 10)
+</pre></div>
+
+<p>The evaluation of the following form will not signal an error
+if the class named <code class="t">character-picture-class</code> is a subclass of
+both <code class="t">picture-class</code> and <code class="t">character-class</code>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (width (make-instance `character-picture-class :char #\Q)
+        :font 'baskerville :pixel-size 10)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-MAXIMIZE-and-MINIMIZE-clauses.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of MAXIMIZE and MINIMIZE clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of MAXIMIZE and MINIMIZE clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of MAXIMIZE and MINIMIZE clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Value-Accumulation-Clauses.html" rel="up" title="Value Accumulation Clauses">
+<link href="Examples-of-SUM-clause.html" rel="next" title="Examples of SUM clause">
+<link href="Examples-of-COUNT-clause.html" rel="prev" title="Examples of COUNT clause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-MAXIMIZE-and-MINIMIZE-clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-SUM-clause.html" accesskey="n" rel="next">Examples of SUM clause</a>, Previous: <a href="Examples-of-COUNT-clause.html" accesskey="p" rel="prev">Examples of COUNT clause</a>, Up: <a href="Value-Accumulation-Clauses.html" accesskey="u" rel="up">Value Accumulation Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-MAXIMIZE-and-MINIMIZE-clauses-1"><span>6.1.3.4 Examples of MAXIMIZE and MINIMIZE clauses<a class="copiable-link" href="#Examples-of-MAXIMIZE-and-MINIMIZE-clauses-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (loop for i in '(2 1 5 3 4)
+       maximize i)
+&rArr;  5
+ (loop for i in '(2 1 5 3 4)
+       minimize i)
+&rArr;  1
+
+;; In this example, FIXNUM applies to the internal variable that holds
+;; the maximum value.
+ (setq series '(1.2 4.3 5.7))
+&rArr;  (1.2 4.3 5.7)
+ (loop for v in series 
+       maximize (round v) of-type fixnum)
+&rArr;  6
+
+;; In this example, FIXNUM applies to the variable RESULT.
+ (loop for v of-type float in series
+       minimize (round v) into result of-type fixnum
+       finally (return result))
+&rArr;  1
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Merging-Pathnames.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Merging Pathnames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Merging Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Merging Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Merging-Pathnames.html" rel="up" title="Merging Pathnames">
+<link href="Merging-Pathnames.html" rel="prev" title="Merging Pathnames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Merging-Pathnames">
+<div class="nav-panel">
+<p>
+Previous: <a href="Merging-Pathnames.html" accesskey="p" rel="prev">Merging Pathnames</a>, Up: <a href="Merging-Pathnames.html" accesskey="u" rel="up">Merging Pathnames</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Merging-Pathnames-1"><span>19.2.3.1 Examples of Merging Pathnames<a class="copiable-link" href="#Examples-of-Merging-Pathnames-1"> &para;</a></span></h4>
+
+<p>Although the following examples are possible to execute only in
+<i class="i">implementations</i> which permit <code class="t">:unspecific</code> in the indicated
+position andwhich permit four-letter type components, they serve to illustrate
+the basic concept of <i class="i">pathname</i> merging.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (pathname-type 
+   (merge-pathnames (make-pathname :type &quot;LISP&quot;)
+                    (make-pathname :type &quot;TEXT&quot;)))
+&rArr;  &quot;LISP&quot;
+
+ (pathname-type 
+   (merge-pathnames (make-pathname :type nil)
+                    (make-pathname :type &quot;LISP&quot;)))
+&rArr;  &quot;LISP&quot;
+
+ (pathname-type 
+   (merge-pathnames (make-pathname :type :unspecific)
+                    (make-pathname :type &quot;LISP&quot;)))
+&rArr;  :UNSPECIFIC
+</pre></div>
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Miscellaneous-Loop-Features.html
@@ -0,0 +1,78 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Miscellaneous Loop Features (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Miscellaneous Loop Features (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Miscellaneous Loop Features (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-LOOP-Facility.html" rel="up" title="The LOOP Facility">
+<link href="Notes-about-Loop.html" rel="next" title="Notes about Loop">
+<link href="Miscellaneous-Clauses.html" rel="prev" title="Miscellaneous Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Examples-of-Miscellaneous-Loop-Features">
+<div class="nav-panel">
+<p>
+Next: <a href="Notes-about-Loop.html" accesskey="n" rel="next">Notes about Loop</a>, Previous: <a href="Miscellaneous-Clauses.html" accesskey="p" rel="prev">Miscellaneous Clauses</a>, Up: <a href="The-LOOP-Facility.html" accesskey="u" rel="up">The LOOP Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Examples-of-Miscellaneous-Loop-Features-1"><span>6.1.8 Examples of Miscellaneous Loop Features<a class="copiable-link" href="#Examples-of-Miscellaneous-Loop-Features-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((i 0))                     ; no loop keywords are used
+    (loop (incf i) (if (= i 3) (return i)))) &rArr;  3
+ (let ((i 0)(j 0))
+    (tagbody
+      (loop (incf j 3) (incf i) (if (= i 3) (go exit)))
+      exit)
+    j) &rArr;  9
+</pre></div>
+
+<p>In the following example, the variable <code class="t">x</code> is stepped
+before <code class="t">y</code> is stepped; thus, the value of <code class="t">y</code>
+reflects the updated value of <code class="t">x</code>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (loop for x from 1 to 10 
+       for y = nil then x 
+       collect (list x y))
+&rArr;  ((1 NIL) (2 2) (3 3) (4 4) (5 5) (6 6) (7 7) (8 8) (9 9) (10 10))
+</pre></div>
+
+<p>In this example, <code class="t">x</code> and <code class="t">y</code> are stepped in <i class="i">parallel</i>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (loop for x from 1 to 10 
+       and y = nil then x 
+       collect (list x y))
+&rArr;  ((1 NIL) (2 1) (3 2) (4 3) (5 4) (6 5) (7 6) (8 7) (9 8) (10 9))
+</pre></div>
+
+
+<ul class="mini-toc">
+<li><a href="Examples-of-clause-grouping.html" accesskey="1">Examples of clause grouping</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Multiple-Escape-Characters.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Multiple Escape Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Multiple Escape Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Multiple Escape Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Syntax-Types.html" rel="up" title="Character Syntax Types">
+<link href="Single-Escape-Character.html" rel="next" title="Single Escape Character">
+<link href="Multiple-Escape-Characters.html" rel="prev" title="Multiple Escape Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Multiple-Escape-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Single-Escape-Character.html" accesskey="n" rel="next">Single Escape Character</a>, Previous: <a href="Multiple-Escape-Characters.html" accesskey="p" rel="prev">Multiple Escape Characters</a>, Up: <a href="Character-Syntax-Types.html" accesskey="u" rel="up">Character Syntax Types</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Multiple-Escape-Characters-1"><span>2.1.4.6 Examples of Multiple Escape Characters<a class="copiable-link" href="#Examples-of-Multiple-Escape-Characters-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> ;; The following examples assume the readtable case of *readtable* 
+ ;; and *print-case* are both :upcase.
+ (eq 'abc 'ABC) &rArr;  <i class="i">true</i>
+ (eq 'abc '|ABC|) &rArr;  <i class="i">true</i>
+ (eq 'abc 'a|B|c) &rArr;  <i class="i">true</i>
+ (eq 'abc '|abc|) &rArr;  <i class="i">false</i>
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-NAMED-clause.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of NAMED clause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of NAMED clause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of NAMED clause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Miscellaneous-Clauses.html" rel="up" title="Miscellaneous Clauses">
+<link href="Initial-and-Final-Execution.html" rel="next" title="Initial and Final Execution">
+<link href="Control-Transfer-Clauses.html" rel="prev" title="Control Transfer Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-NAMED-clause">
+<div class="nav-panel">
+<p>
+Next: <a href="Initial-and-Final-Execution.html" accesskey="n" rel="next">Initial and Final Execution</a>, Previous: <a href="Control-Transfer-Clauses.html" accesskey="p" rel="prev">Control Transfer Clauses</a>, Up: <a href="Miscellaneous-Clauses.html" accesskey="u" rel="up">Miscellaneous Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-NAMED-clause-1"><span>6.1.7.2 Examples of NAMED clause<a class="copiable-link" href="#Examples-of-NAMED-clause-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; Just name and return.
+ (loop named max
+       for i from 1 to 10
+       do (print i)
+       do (return-from max 'done))
+<code class="t"> |&gt; </code> 1 
+&rArr;  DONE
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Ordinary-Lambda-Lists.html
@@ -0,0 +1,137 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Ordinary Lambda Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Ordinary Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Ordinary Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Ordinary-Lambda-Lists.html" rel="up" title="Ordinary Lambda Lists">
+<link href="Specifiers-for-_0026aux-variables.html" rel="prev" title="Specifiers for &amp;aux variables">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Ordinary-Lambda-Lists">
+<div class="nav-panel">
+<p>
+Previous: <a href="Specifiers-for-_0026aux-variables.html" accesskey="p" rel="prev">Specifiers for <b class="b">&amp;aux</b> variables</a>, Up: <a href="Ordinary-Lambda-Lists.html" accesskey="u" rel="up">Ordinary Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Ordinary-Lambda-Lists-1"><span>3.4.1.8 Examples of Ordinary Lambda Lists<a class="copiable-link" href="#Examples-of-Ordinary-Lambda-Lists-1"> &para;</a></span></h4>
+
+<p>Here are some examples involving <i class="i">optional parameters</i> and <i class="i">rest parameters</i>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> ((lambda (a b) (+ a (* b 3))) 4 5) &rArr;  19
+ ((lambda (a &amp;optional (b 2)) (+ a (* b 3))) 4 5) &rArr;  19
+ ((lambda (a &amp;optional (b 2)) (+ a (* b 3))) 4) &rArr;  10
+ ((lambda (&amp;optional (a 2 b) (c 3 d) &amp;rest x) (list a b c d x)))
+&rArr;  (2 NIL 3 NIL NIL)
+ ((lambda (&amp;optional (a 2 b) (c 3 d) &amp;rest x) (list a b c d x)) 6)
+&rArr;  (6 T 3 NIL NIL)
+ ((lambda (&amp;optional (a 2 b) (c 3 d) &amp;rest x) (list a b c d x)) 6 3)
+&rArr;  (6 T 3 T NIL)
+ ((lambda (&amp;optional (a 2 b) (c 3 d) &amp;rest x) (list a b c d x)) 6 3 8)
+&rArr;  (6 T 3 T (8))
+ ((lambda (&amp;optional (a 2 b) (c 3 d) &amp;rest x) (list a b c d x))
+  6 3 8 9 10 11)
+&rArr;  (6 t 3 t (8 9 10 11))
+</pre></div>
+
+<p>Here are some examples involving <i class="i">keyword parameters</i>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> ((lambda (a b &amp;key c d) (list a b c d)) 1 2) &rArr;  (1 2 NIL NIL)
+ ((lambda (a b &amp;key c d) (list a b c d)) 1 2 :c 6) &rArr;  (1 2 6 NIL)
+ ((lambda (a b &amp;key c d) (list a b c d)) 1 2 :d 8) &rArr;  (1 2 NIL 8)
+ ((lambda (a b &amp;key c d) (list a b c d)) 1 2 :c 6 :d 8) &rArr;  (1 2 6 8)
+ ((lambda (a b &amp;key c d) (list a b c d)) 1 2 :d 8 :c 6) &rArr;  (1 2 6 8)
+ ((lambda (a b &amp;key c d) (list a b c d)) :a 1 :d 8 :c 6) &rArr;  (:a 1 6 8)
+ ((lambda (a b &amp;key c d) (list a b c d)) :a :b :c :d) &rArr;  (:a :b :d NIL)
+ ((lambda (a b &amp;key ((:sea c)) d) (list a b c d)) 1 2 :sea 6) &rArr;  (1 2 6 NIL)
+ ((lambda (a b &amp;key ((c c)) d) (list a b c d)) 1 2 'c 6) &rArr;  (1 2 6 NIL)
+</pre></div>
+
+<p>Here are some examples involving <i class="i">optional parameters</i>, <i class="i">rest parameters</i>,
+and <i class="i">keyword parameters</i> together:
+</p>
+<div class="example">
+<pre class="example-preformatted"> ((lambda (a &amp;optional (b 3) &amp;rest x &amp;key c (d a))
+    (list a b c d x)) 1)   
+&rArr;  (1 3 NIL 1 ()) 
+ ((lambda (a &amp;optional (b 3) &amp;rest x &amp;key c (d a))
+    (list a b c d x)) 1 2)
+&rArr;  (1 2 NIL 1 ())
+ ((lambda (a &amp;optional (b 3) &amp;rest x &amp;key c (d a))
+    (list a b c d x)) :c 7)
+&rArr;  (:c 7 NIL :c ())
+ ((lambda (a &amp;optional (b 3) &amp;rest x &amp;key c (d a))
+    (list a b c d x)) 1 6 :c 7)
+&rArr;  (1 6 7 1 (:c 7))
+ ((lambda (a &amp;optional (b 3) &amp;rest x &amp;key c (d a))
+    (list a b c d x)) 1 6 :d 8)
+&rArr;  (1 6 NIL 8 (:d 8))
+ ((lambda (a &amp;optional (b 3) &amp;rest x &amp;key c (d a))
+    (list a b c d x)) 1 6 :d 8 :c 9 :d 10)
+&rArr;  (1 6 9 8 (:d 8 :c 9 :d 10))
+</pre></div>
+
+<p>As an example of the use of <b class="b">&amp;allow-other-keys</b> and
+<code class="t">:allow-other-keys</code>, consider a <i class="i">function</i> that takes two named
+arguments of its own and also accepts additional named arguments to be
+passed to <b class="b">make-array</b>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun array-of-strings (str dims &amp;rest named-pairs
+                          &amp;key (start 0) end &amp;allow-other-keys)
+   (apply #'make-array dims
+          :initial-element (subseq str start end)
+          :allow-other-keys t
+          named-pairs))
+</pre></div>
+
+<p>This <i class="i">function</i> takes a <i class="i">string</i> and dimensioning
+information and returns an <i class="i">array</i> of the specified
+dimensions, each of whose elements is the specified 
+<i class="i">string</i>.  However, <code class="t">:start</code> and <code class="t">:end</code> named
+arguments may be used to specify that a substring of the given
+<i class="i">string</i> should be used.  In addition, the presence of
+<b class="b">&amp;allow-other-keys</b> in the <i class="i">lambda list</i> indicates that the
+caller may supply additional named arguments; the <i class="i">rest parameter</i>
+provides access to them.  These additional named arguments are passed
+to <b class="b">make-array</b>.  The <i class="i">function</i> <b class="b">make-array</b>
+normally does not allow the named arguments <code class="t">:start</code> 
+and <code class="t">:end</code> to be used, and an error should be
+signaled if such named arguments are supplied to <b class="b">make-array</b>.
+However, the presence in the call to <b class="b">make-array</b> 
+of the named argument <code class="t">:allow-other-keys</code> with
+a <i class="i">true</i> value causes any extraneous named arguments, including
+<code class="t">:start</code> and <code class="t">:end</code>, to be acceptable and ignored.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Specifiers-for-_0026aux-variables.html">Specifiers for <b class="b">&amp;aux</b> variables</a>, Up: <a href="Ordinary-Lambda-Lists.html">Ordinary Lambda Lists</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Potential-Numbers.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Potential Numbers (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Potential Numbers (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Potential Numbers (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-as-Tokens.html" rel="up" title="Numbers as Tokens">
+<link href="Escape-Characters-and-Potential-Numbers.html" rel="prev" title="Escape Characters and Potential Numbers">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Potential-Numbers">
+<div class="nav-panel">
+<p>
+Previous: <a href="Escape-Characters-and-Potential-Numbers.html" accesskey="p" rel="prev">Escape Characters and Potential Numbers</a>, Up: <a href="Numbers-as-Tokens.html" accesskey="u" rel="up">Numbers as Tokens</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Potential-Numbers-1"><span>2.3.1.3 Examples of Potential Numbers<a class="copiable-link" href="#Examples-of-Potential-Numbers-1"> &para;</a></span></h4>
+
+<p>As examples, the <i class="i">tokens</i> in Figure 2&ndash;10 are <i class="i">potential numbers</i>,
+but they are not actually numbers, and so are reserved <i class="i">tokens</i>;
+a <i class="i">conforming implementation</i> is permitted, but not required,
+to define their meaning.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">1b5000</code>                       <code class="t">777777q</code>                <code class="t">1.7J</code>  <code class="t">-3/4+6.7J</code>  <code class="t">12/25/83</code>  <!-- /@w -->
+  <code class="t">27^19</code>                      <code class="t">3^4/5</code>                <code class="t">6//7</code>  <code class="t">3.1.2.6</code>    <code class="t"><code class="t">^</code>-43<code class="t">^</code></code>   <!-- /@w -->
+  <code class="t">3.141_592_653_589_793_238_4</code>  <code class="t">-3.7+2.6i-6.17j+19.6k</code>  <!-- /@w -->
+
+                     Figure 2&ndash;10: Examples of reserved tokens                   <!-- /@w -->
+
+</pre></div></div>
+
+<p>The <i class="i">tokens</i> in Figure 2&ndash;11 are not <i class="i">potential numbers</i>; 
+they are always treated as <i class="i">symbols</i>:
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">/</code>     <code class="t">/5</code>     <code class="t">+</code>  <code class="t">1+</code>  <code class="t">1-</code>     <!-- /@w -->
+  <code class="t">foo+</code>  <code class="t">ab.cd</code>  <code class="t">_</code>  <code class="t"><code class="t">^</code></code>   <code class="t"><code class="t">^</code>/-</code>  <!-- /@w -->
+
+  Figure 2&ndash;11: Examples of symbols<!-- /@w -->
+
+</pre></div></div>
+
+<p>The <i class="i">tokens</i> in Figure 2&ndash;12 are <i class="i">potential numbers</i>
+if the <i class="i">current input base</i> is <code class="t">16</code>, 
+but they are always treated as <i class="i">symbols</i> if the <i class="i">current input base</i> is <code class="t">10</code>. 
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">bad-face</code>  <code class="t">25-dec-83</code>  <code class="t">a/b</code>  <code class="t">fad_cafe</code>  <code class="t">f<code class="t">^</code></code> <!-- /@w -->
+
+  Figure 2&ndash;12: Examples of symbols or potential numbers<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Printer-Behavior.html
@@ -0,0 +1,97 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Printer Behavior (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Printer Behavior (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Printer Behavior (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Lisp-Printer.html" rel="up" title="The Lisp Printer">
+<link href="Default-Print_002dObject-Methods.html" rel="prev" title="Default Print-Object Methods">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Examples-of-Printer-Behavior">
+<div class="nav-panel">
+<p>
+Previous: <a href="Default-Print_002dObject-Methods.html" accesskey="p" rel="prev">Default Print-Object Methods</a>, Up: <a href="The-Lisp-Printer.html" accesskey="u" rel="up">The Lisp Printer</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Examples-of-Printer-Behavior-1"><span>22.1.4 Examples of Printer Behavior<a class="copiable-link" href="#Examples-of-Printer-Behavior-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((*print-escape* t)) (fresh-line) (write #\a))
+<code class="t"> |&gt; </code> #\a
+&rArr;  #\a
+ (let ((*print-escape* nil) (*print-readably* nil))
+   (fresh-line)
+   (write #\a))
+<code class="t"> |&gt; </code> a
+&rArr;  #\a
+ (progn (fresh-line) (prin1 #\a))
+<code class="t"> |&gt; </code> #\a
+&rArr;  #\a
+ (progn (fresh-line) (print #\a))
+<code class="t"> |&gt; </code> 
+<code class="t"> |&gt; </code> #\a
+&rArr;  #\a
+ (progn (fresh-line) (princ #\a))
+<code class="t"> |&gt; </code> a
+&rArr;  #\a
+
+ (dolist (val '(t nil))
+   (let ((*print-escape* val) (*print-readably* val))
+     (print '#\a) 
+     (prin1 #\a) (write-char #\Space)
+     (princ #\a) (write-char #\Space)
+     (write #\a)))
+<code class="t"> |&gt; </code> #\a #\a a #\a
+<code class="t"> |&gt; </code> #\a #\a a a
+&rArr;  NIL
+
+ (progn (fresh-line) (write '(let ((a 1) (b 2)) (+ a b))))
+<code class="t"> |&gt; </code> (LET ((A 1) (B 2)) (+ A B))
+&rArr;  (LET ((A 1) (B 2)) (+ A B))
+
+ (progn (fresh-line) (pprint '(let ((a 1) (b 2)) (+ a b))))
+<code class="t"> |&gt; </code> (LET ((A 1)
+<code class="t"> |&gt; </code>       (B 2))               
+<code class="t"> |&gt; </code>   (+ A B))
+&rArr;  (LET ((A 1) (B 2)) (+ A B))
+
+ (progn (fresh-line) 
+        (write '(let ((a 1) (b 2)) (+ a b)) :pretty t))
+<code class="t"> |&gt; </code> (LET ((A 1)
+<code class="t"> |&gt; </code>       (B 2))
+<code class="t"> |&gt; </code>   (+ A B))                 
+&rArr;  (LET ((A 1) (B 2)) (+ A B))
+
+ (with-output-to-string (s)  
+    (write 'write :stream s)
+    (prin1 'prin1 s))
+&rArr;  &quot;WRITEPRIN1&quot;
+</pre></div>
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Printing-Arrays.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Printing Arrays (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Printing Arrays (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Printing Arrays (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Printing-Random-States.html" rel="next" title="Printing Random States">
+<link href="Printing-Other-Arrays.html" rel="prev" title="Printing Other Arrays">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Printing-Arrays">
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Random-States.html" accesskey="n" rel="next">Printing Random States</a>, Previous: <a href="Printing-Other-Arrays.html" accesskey="p" rel="prev">Printing Other Arrays</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Printing-Arrays-1"><span>22.1.3.17 Examples of Printing Arrays<a class="copiable-link" href="#Examples-of-Printing-Arrays-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((a (make-array '(3 3)))
+       (*print-pretty* t)
+       (*print-array* t))
+   (dotimes (i 3) (dotimes (j 3) (setf (aref a i j) (format nil &quot;&lt;~D,~D&gt;&quot; i j))))
+   (print a)
+   (print (make-array 9 :displaced-to a)))
+<code class="t"> |&gt; </code> #2A((&quot;&lt;0,0&gt;&quot; &quot;&lt;0,1&gt;&quot; &quot;&lt;0,2&gt;&quot;) 
+<code class="t"> |&gt; </code>     (&quot;&lt;1,0&gt;&quot; &quot;&lt;1,1&gt;&quot; &quot;&lt;1,2&gt;&quot;) 
+<code class="t"> |&gt; </code>     (&quot;&lt;2,0&gt;&quot; &quot;&lt;2,1&gt;&quot; &quot;&lt;2,2&gt;&quot;)) 
+<code class="t"> |&gt; </code> #(&quot;&lt;0,0&gt;&quot; &quot;&lt;0,1&gt;&quot; &quot;&lt;0,2&gt;&quot; &quot;&lt;1,0&gt;&quot; &quot;&lt;1,1&gt;&quot; &quot;&lt;1,2&gt;&quot; &quot;&lt;2,0&gt;&quot; &quot;&lt;2,1&gt;&quot; &quot;&lt;2,2&gt;&quot;) 
+&rArr;  #&lt;ARRAY 9 indirect 36363476&gt;
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-REPEAT-clause.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of REPEAT clause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of REPEAT clause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of REPEAT clause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Termination-Test-Clauses.html" rel="up" title="Termination Test Clauses">
+<link href="Examples-of-ALWAYS.html" rel="next" title="Examples of ALWAYS">
+<link href="Termination-Test-Clauses.html" rel="prev" title="Termination Test Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-REPEAT-clause">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-ALWAYS.html" accesskey="n" rel="next">Examples of ALWAYS, NEVER, and THEREIS clauses</a>, Previous: <a href="Termination-Test-Clauses.html" accesskey="p" rel="prev">Termination Test Clauses</a>, Up: <a href="Termination-Test-Clauses.html" accesskey="u" rel="up">Termination Test Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-REPEAT-clause-1"><span>6.1.4.1 Examples of REPEAT clause<a class="copiable-link" href="#Examples-of-REPEAT-clause-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (loop repeat 3
+       do (format t &quot;~&amp;What I say three times is true.~
+<code class="t"> |&gt; </code> What I say three times is true.
+<code class="t"> |&gt; </code> What I say three times is true.
+<code class="t"> |&gt; </code> What I say three times is true.
+&rArr;  NIL
+ (loop repeat -15
+   do (format t &quot;What you see is what you expect~
+&rArr;  NIL
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Resolution-of-Apparent-Conflict-in-Exceptional-Situations.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Resolution of Apparent Conflict in Exceptional Situations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Resolution of Apparent Conflict in Exceptional Situations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Resolution of Apparent Conflict in Exceptional Situations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conforming-Implementations.html" rel="up" title="Conforming Implementations">
+<link href="Conformance-Statement.html" rel="next" title="Conformance Statement">
+<link href="Resolution-of-Apparent-Conflicts-in-Exceptional-Situations.html" rel="prev" title="Resolution of Apparent Conflicts in Exceptional Situations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Resolution-of-Apparent-Conflict-in-Exceptional-Situations">
+<div class="nav-panel">
+<p>
+Next: <a href="Conformance-Statement.html" accesskey="n" rel="next">Conformance Statement</a>, Previous: <a href="Resolution-of-Apparent-Conflicts-in-Exceptional-Situations.html" accesskey="p" rel="prev">Resolution of Apparent Conflicts in Exceptional Situations</a>, Up: <a href="Conforming-Implementations.html" accesskey="u" rel="up">Conforming Implementations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Resolution-of-Apparent-Conflict-in-Exceptional-Situations-1"><span>1.5.1.6 Examples of Resolution of Apparent Conflict in Exceptional Situations<a class="copiable-link" href="#Examples-of-Resolution-of-Apparent-Conflict-in-Exceptional-Situations-1"> &para;</a></span></h4>
+
+<p>Suppose that function <code class="t">foo</code> is a member of a set S of <i class="i">functions</i> that
+operate on numbers.  Suppose that one passage states that an error must be
+signaled if any <i class="i">function</i> in S is ever given an argument of <code class="t">17</code>.
+Suppose that an apparently conflicting passage states that the consequences 
+are undefined if <code class="t">foo</code> receives an argument of <code class="t">17</code>.  Then the second passage
+(the one specifically about <code class="t">foo</code>) would dominate because the description of
+the situational context is the most specific, and it would not be required that
+<code class="t">foo</code> signal an error on an argument of <code class="t">17</code> even though other functions in 
+the set S would be required to do so.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Rule-of-Canonical-Representation-for-Complex-Rationals.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Rule of Canonical Representation for Complex Rationals (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Rule of Canonical Representation for Complex Rationals (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Rule of Canonical Representation for Complex Rationals (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Complex-Computations.html" rel="up" title="Complex Computations">
+<link href="Principal-Values-and-Branch-Cuts.html" rel="next" title="Principal Values and Branch Cuts">
+<link href="Rule-of-Canonical-Representation-for-Complex-Rationals.html" rel="prev" title="Rule of Canonical Representation for Complex Rationals">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Rule-of-Canonical-Representation-for-Complex-Rationals">
+<div class="nav-panel">
+<p>
+Next: <a href="Principal-Values-and-Branch-Cuts.html" accesskey="n" rel="next">Principal Values and Branch Cuts</a>, Previous: <a href="Rule-of-Canonical-Representation-for-Complex-Rationals.html" accesskey="p" rel="prev">Rule of Canonical Representation for Complex Rationals</a>, Up: <a href="Complex-Computations.html" accesskey="u" rel="up">Complex Computations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Rule-of-Canonical-Representation-for-Complex-Rationals-1"><span>12.1.5.4 Examples of Rule of Canonical Representation for Complex Rationals<a class="copiable-link" href="#Examples-of-Rule-of-Canonical-Representation-for-Complex-Rationals-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> #c(1.0 1.0) &rArr;  #C(1.0 1.0)
+ #c(0.0 0.0) &rArr;  #C(0.0 0.0)
+ #c(1.0 1) &rArr;  #C(1.0 1.0)
+ #c(0.0 0) &rArr;  #C(0.0 0.0)
+ #c(1 1) &rArr;  #C(1 1)
+ #c(0 0) &rArr;  0
+ (typep #c(1 1) '(complex (eql 1))) &rArr;  <i class="i">true</i>
+ (typep #c(0 0) '(complex (eql 0))) &rArr;  <i class="i">false</i>
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Rule-of-Float-and-Rational-Contagion.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Rule of Float and Rational Contagion (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Rule of Float and Rational Contagion (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Rule of Float and Rational Contagion (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Floating_002dpoint-Computations.html" rel="up" title="Floating-point Computations">
+<link href="Rule-of-Float-Approximation.html" rel="next" title="Rule of Float Approximation">
+<link href="Rule-of-Float-and-Rational-Contagion.html" rel="prev" title="Rule of Float and Rational Contagion">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Rule-of-Float-and-Rational-Contagion">
+<div class="nav-panel">
+<p>
+Next: <a href="Rule-of-Float-Approximation.html" accesskey="n" rel="next">Rule of Float Approximation</a>, Previous: <a href="Rule-of-Float-and-Rational-Contagion.html" accesskey="p" rel="prev">Rule of Float and Rational Contagion</a>, Up: <a href="Floating_002dpoint-Computations.html" accesskey="u" rel="up">Floating-point Computations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Rule-of-Float-and-Rational-Contagion-1"><span>12.1.4.2 Examples of Rule of Float and Rational Contagion<a class="copiable-link" href="#Examples-of-Rule-of-Float-and-Rational-Contagion-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> ;;;; Combining rationals with floats.
+ ;;; This example assumes an implementation in which 
+ ;;; (float-radix 0.5) is 2 (as in IEEE) or 16 (as in IBM/360),
+ ;;; or else some other implementation in which 1/2 has an exact 
+ ;;;  representation in floating point.
+ (+ 1/2 0.5) &rArr;  1.0
+ (- 1/2 0.5d0) &rArr;  0.0d0
+ (+ 0.5 -0.5 1/2) &rArr;  0.5
+
+ ;;;; Comparing rationals with floats.
+ ;;; This example assumes an implementation in which the default float 
+ ;;; format is IEEE single-float, IEEE double-float, or some other format
+ ;;; in which 5/7 is rounded upwards by FLOAT.
+ (&lt; 5/7 (float 5/7)) &rArr;  <i class="i">true</i>
+ (&lt; 5/7 (rational (float 5/7))) &rArr;  <i class="i">true</i>
+ (&lt; (float 5/7) (float 5/7)) &rArr;  <i class="i">false</i>
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-SUM-clause.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of SUM clause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of SUM clause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of SUM clause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Value-Accumulation-Clauses.html" rel="up" title="Value Accumulation Clauses">
+<link href="Examples-of-MAXIMIZE-and-MINIMIZE-clauses.html" rel="prev" title="Examples of MAXIMIZE and MINIMIZE clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-SUM-clause">
+<div class="nav-panel">
+<p>
+Previous: <a href="Examples-of-MAXIMIZE-and-MINIMIZE-clauses.html" accesskey="p" rel="prev">Examples of MAXIMIZE and MINIMIZE clauses</a>, Up: <a href="Value-Accumulation-Clauses.html" accesskey="u" rel="up">Value Accumulation Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-SUM-clause-1"><span>6.1.3.5 Examples of SUM clause<a class="copiable-link" href="#Examples-of-SUM-clause-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (loop for i of-type fixnum in '(1 2 3 4 5)
+       sum i)
+&rArr;  15
+ (setq series '(1.2 4.3 5.7))
+&rArr;  (1.2 4.3 5.7)
+ (loop for v in series 
+       sum (* 2.0 v))
+&rArr;  22.4
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Satisfying-a-One_002dArgument-Test.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Satisfying a One-Argument Test (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Satisfying a One-Argument Test (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Satisfying a One-Argument Test (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Satisfying-a-One_002dArgument-Test.html" rel="up" title="Satisfying a One-Argument Test">
+<link href="Satisfying-a-One_002dArgument-Test.html" rel="prev" title="Satisfying a One-Argument Test">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Satisfying-a-One_002dArgument-Test">
+<div class="nav-panel">
+<p>
+Previous: <a href="Satisfying-a-One_002dArgument-Test.html" accesskey="p" rel="prev">Satisfying a One-Argument Test</a>, Up: <a href="Satisfying-a-One_002dArgument-Test.html" accesskey="u" rel="up">Satisfying a One-Argument Test</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Satisfying-a-One_002dArgument-Test-1"><span>17.2.2.1 Examples of Satisfying a One-Argument Test<a class="copiable-link" href="#Examples-of-Satisfying-a-One_002dArgument-Test-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (count-if #'zerop '(1 #C(0.0 0.0) 0 0.0d0 0.0s0 3)) &rArr;  4
+
+ (remove-if-not #'symbolp '(0 1 2 3 4 5 6 7 8 9 A B C D E F))
+&rArr;  (A B C D E F)
+ (remove-if (complement #'symbolp) '(0 1 2 3 4 5 6 7 8 9 A B C D E F))
+&rArr;  (A B C D E F)
+
+ (count-if #'zerop '(&quot;foo&quot; &quot;&quot; &quot;bar&quot; &quot;&quot; &quot;&quot; &quot;baz&quot; &quot;quux&quot;) :key #'length)
+&rArr;  3
+</pre></div>
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Satisfying-a-Two_002dArgument-Test.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Satisfying a Two-Argument Test (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Satisfying a Two-Argument Test (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Satisfying a Two-Argument Test (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Satisfying-a-Two_002dArgument-Test.html" rel="up" title="Satisfying a Two-Argument Test">
+<link href="Satisfying-a-Two_002dArgument-Test.html" rel="prev" title="Satisfying a Two-Argument Test">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Satisfying-a-Two_002dArgument-Test">
+<div class="nav-panel">
+<p>
+Previous: <a href="Satisfying-a-Two_002dArgument-Test.html" accesskey="p" rel="prev">Satisfying a Two-Argument Test</a>, Up: <a href="Satisfying-a-Two_002dArgument-Test.html" accesskey="u" rel="up">Satisfying a Two-Argument Test</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Satisfying-a-Two_002dArgument-Test-1"><span>17.2.1.1 Examples of Satisfying a Two-Argument Test<a class="copiable-link" href="#Examples-of-Satisfying-a-Two_002dArgument-Test-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (remove &quot;FOO&quot; '(foo bar &quot;FOO&quot; &quot;BAR&quot; &quot;foo&quot; &quot;bar&quot;) :test #'equal)
+&rArr;  (foo bar &quot;BAR&quot; &quot;foo&quot; &quot;bar&quot;)
+ (remove &quot;FOO&quot; '(foo bar &quot;FOO&quot; &quot;BAR&quot; &quot;foo&quot; &quot;bar&quot;) :test #'equalp)
+&rArr;  (foo bar &quot;BAR&quot; &quot;bar&quot;)
+ (remove &quot;FOO&quot; '(foo bar &quot;FOO&quot; &quot;BAR&quot; &quot;foo&quot; &quot;bar&quot;) :test #'string-equal)
+&rArr;  (bar &quot;BAR&quot; &quot;bar&quot;)
+ (remove &quot;FOO&quot; '(foo bar &quot;FOO&quot; &quot;BAR&quot; &quot;foo&quot; &quot;bar&quot;) :test #'string=)
+&rArr;  (BAR &quot;BAR&quot; &quot;foo&quot; &quot;bar&quot;)
+
+ (remove 1 '(1 1.0 #C(1.0 0.0) 2 2.0 #C(2.0 0.0)) :test-not #'eql)
+&rArr;  (1)
+ (remove 1 '(1 1.0 #C(1.0 0.0) 2 2.0 #C(2.0 0.0)) :test-not #'=)
+&rArr;  (1 1.0 #C(1.0 0.0))
+ (remove 1 '(1 1.0 #C(1.0 0.0) 2 2.0 #C(2.0 0.0)) :test (complement #'=))
+&rArr;  (1 1.0 #C(1.0 0.0))
+
+ (count 1 '((one 1) (uno 1) (two 2) (dos 2)) :key #'cadr) &rArr;  2
+
+ (count 2.0 '(1 2 3) :test #'eql :key #'float) &rArr;  1
+
+ (count &quot;FOO&quot; (list (make-pathname :name &quot;FOO&quot; :type &quot;X&quot;)  
+                    (make-pathname :name &quot;FOO&quot; :type &quot;Y&quot;))
+        :key #'pathname-name
+        :test #'equal)
+&rArr;  2
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Self_002dEvaluating-Objects.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Self-Evaluating Objects (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Self-Evaluating Objects (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Self-Evaluating Objects (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Evaluation-Model.html" rel="up" title="The Evaluation Model">
+<link href="Self_002dEvaluating-Objects.html" rel="prev" title="Self-Evaluating Objects">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Self_002dEvaluating-Objects">
+<div class="nav-panel">
+<p>
+Previous: <a href="Self_002dEvaluating-Objects.html" accesskey="p" rel="prev">Self-Evaluating Objects</a>, Up: <a href="The-Evaluation-Model.html" accesskey="u" rel="up">The Evaluation Model</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Self_002dEvaluating-Objects-1"><span>3.1.2.13 Examples of Self-Evaluating Objects<a class="copiable-link" href="#Examples-of-Self_002dEvaluating-Objects-1"> &para;</a></span></h4>
+
+<p><i class="i">Numbers</i>, <i class="i">pathnames</i>, and <i class="i">arrays</i> are examples of
+<i class="i">self-evaluating objects</i>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> 3 &rArr;  3
+ #c(2/3 5/8) &rArr;  #C(2/3 5/8)
+ #p&quot;S:[BILL]OTHELLO.TXT&quot; &rArr;  #P&quot;S:[BILL]OTHELLO.TXT&quot;
+ #(a b c) &rArr;  #(A B C)
+ &quot;fred smith&quot; &rArr;  &quot;fred smith&quot;
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Semicolon.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Semicolon (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Semicolon (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Semicolon (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Semicolon.html" rel="up" title="Semicolon">
+<link href="Notes-about-Style-for-Semicolon.html" rel="next" title="Notes about Style for Semicolon">
+<link href="Semicolon.html" rel="prev" title="Semicolon">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Semicolon">
+<div class="nav-panel">
+<p>
+Next: <a href="Notes-about-Style-for-Semicolon.html" accesskey="n" rel="next">Notes about Style for Semicolon</a>, Previous: <a href="Semicolon.html" accesskey="p" rel="prev">Semicolon</a>, Up: <a href="Semicolon.html" accesskey="u" rel="up">Semicolon</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Semicolon-1"><span>2.4.4.1 Examples of Semicolon<a class="copiable-link" href="#Examples-of-Semicolon-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (+ 3 ; three
+    4)
+&rArr;  7    
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Setf-Expansions.html
@@ -0,0 +1,108 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Setf Expansions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Setf Expansions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Setf Expansions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-Places-and-Generalized-Reference.html" rel="up" title="Overview of Places and Generalized Reference">
+<link href="Setf-Expansions.html" rel="prev" title="Setf Expansions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Setf-Expansions">
+<div class="nav-panel">
+<p>
+Previous: <a href="Setf-Expansions.html" accesskey="p" rel="prev">Setf Expansions</a>, Up: <a href="Overview-of-Places-and-Generalized-Reference.html" accesskey="u" rel="up">Overview of Places and Generalized Reference</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Setf-Expansions-1"><span>5.1.1.4 Examples of Setf Expansions<a class="copiable-link" href="#Examples-of-Setf-Expansions-1"> &para;</a></span></h4>
+
+<p>Examples of the contents of the constituents of <i class="i">setf expansions</i>
+follow.
+</p>
+<p>For a variable <i class="i">x</i>:
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">()</code>              ;list of temporary variables  <!-- /@w -->
+  <code class="t">()</code>              ;list of value forms          <!-- /@w -->
+  <code class="t">(g0001)</code>         ;list of store variables      <!-- /@w -->
+  <code class="t">(setq <i class="i">x</i> g0001)</code>  ;storing form                 <!-- /@w -->
+  <i class="i">x</i>               ;accessing form               <!-- /@w -->
+
+  Figure 5&ndash;3: Sample Setf Expansion of a Variable<!-- /@w -->
+
+</pre></div></div>
+
+<p>For <code class="t">(car <i class="i">exp</i>)</code>:
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">(g0002)</code>                             ;list of temporary variables  <!-- /@w -->
+  <code class="t">(<i class="i">exp</i>)</code>                               ;list of value forms          <!-- /@w -->
+  <code class="t">(g0003)</code>                             ;list of store variables      <!-- /@w -->
+  <code class="t">(progn (rplaca g0002 g0003) g0003)</code>  ;storing form                 <!-- /@w -->
+  <code class="t">(car g0002)</code>                         ;accessing form               <!-- /@w -->
+
+           Figure 5&ndash;4: Sample Setf Expansion of a CAR Form         <!-- /@w -->
+
+</pre></div></div>
+
+<p>For <code class="t">(subseq <i class="i">seq</i> <i class="i">s</i> <i class="i">e</i>)</code>:
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">(g0004 g0005 g0006)</code>         ;list of temporary variables  <!-- /@w -->
+  <code class="t">(<i class="i">seq</i> <i class="i">s</i> <i class="i">e</i>)</code>                   ;list of value forms          <!-- /@w -->
+  <code class="t">(g0007)</code>                     ;list of store variables      <!-- /@w -->
+  <code class="t">(progn (replace g0004 g0007 :start1 g0005 :end1 g0006) g0007)</code> <!-- /@w -->
+                              ;storing form                 <!-- /@w -->
+  <code class="t">(subseq g0004 g0005 g0006)</code>  ; accessing form              <!-- /@w -->
+
+     Figure 5&ndash;5: Sample Setf Expansion of a SUBSEQ Form    <!-- /@w -->
+
+</pre></div></div>
+
+<p>In some cases, if a <i class="i">subform</i> of a <i class="i">place</i> is itself
+a <i class="i">place</i>, it is necessary to expand the <i class="i">subform</i>
+in order to compute some of the values in the expansion of the outer
+<i class="i">place</i>.  For <code class="t">(ldb <i class="i">bs</i> (car <i class="i">exp</i>))</code>:
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">(g0001 g0002)</code>            ;list of temporary variables  <!-- /@w -->
+  <code class="t">(<i class="i">bs</i> <i class="i">exp</i>)</code>                 ;list of value forms          <!-- /@w -->
+  <code class="t">(g0003)</code>                  ;list of store variables      <!-- /@w -->
+  <code class="t">(progn (rplaca g0002 (dpb g0003 g0001 (car g0002))) g0003)</code> <!-- /@w -->
+                           ;storing form                 <!-- /@w -->
+  <code class="t">(ldb g0001 (car g0002))</code>  ; accessing form              <!-- /@w -->
+
+     Figure 5&ndash;6: Sample Setf Expansion of a LDB Form    <!-- /@w -->
+
+</pre></div></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Setf-Expansions.html">Setf Expansions</a>, Up: <a href="Overview-of-Places-and-Generalized-Reference.html">Overview of Places and Generalized Reference</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Sharpsign-Asterisk.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Sharpsign Asterisk (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Sharpsign Asterisk (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Sharpsign Asterisk (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-Colon.html" rel="next" title="Sharpsign Colon">
+<link href="Sharpsign-Asterisk.html" rel="prev" title="Sharpsign Asterisk">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Sharpsign-Asterisk">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-Colon.html" accesskey="n" rel="next">Sharpsign Colon</a>, Previous: <a href="Sharpsign-Asterisk.html" accesskey="p" rel="prev">Sharpsign Asterisk</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Sharpsign-Asterisk-1"><span>2.4.8.5 Examples of Sharpsign Asterisk<a class="copiable-link" href="#Examples-of-Sharpsign-Asterisk-1"> &para;</a></span></h4>
+
+<p>For example, 
+</p><div class="example">
+<pre class="example-preformatted">  #*101111
+ #6*101111
+ #6*101
+ #6*1011
+</pre></div>
+
+<p>all mean the same thing: a <i class="i">vector</i> of length <code class="t">6</code>
+with <i class="i">elements</i> <code class="t">1</code>, <code class="t">0</code>, <code class="t">1</code>, <code class="t">1</code>, <code class="t">1</code>, and <code class="t">1</code>.
+</p>
+<p>For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> #*         ;An empty bit-vector
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Sharpsign-Vertical_002dBar.html
@@ -0,0 +1,108 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Sharpsign Vertical-Bar (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Sharpsign Vertical-Bar (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Sharpsign Vertical-Bar (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Notes-about-Style-for-Sharpsign-Vertical_002dBar.html" rel="next" title="Notes about Style for Sharpsign Vertical-Bar">
+<link href="Sharpsign-Vertical_002dBar.html" rel="prev" title="Sharpsign Vertical-Bar">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Sharpsign-Vertical_002dBar">
+<div class="nav-panel">
+<p>
+Next: <a href="Notes-about-Style-for-Sharpsign-Vertical_002dBar.html" accesskey="n" rel="next">Notes about Style for Sharpsign Vertical-Bar</a>, Previous: <a href="Sharpsign-Vertical_002dBar.html" accesskey="p" rel="prev">Sharpsign Vertical-Bar</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Sharpsign-Vertical_002dBar-1"><span>2.4.8.21 Examples of Sharpsign Vertical-Bar<a class="copiable-link" href="#Examples-of-Sharpsign-Vertical_002dBar-1"> &para;</a></span></h4>
+
+<p>The following are some examples that exploit the <code class="t">#|...|#</code> notation:
+</p>
+<div class="example">
+<pre class="example-preformatted">;;; In this example, some debugging code is commented out with #|...|#
+;;; Note that this kind of comment can occur in the middle of a line
+;;; (because a delimiter marks where the end of the comment occurs)
+;;; where a semicolon comment can only occur at the end of a line 
+;;; (because it comments out the rest of the line).
+ (defun add3 (n) #|(format t &quot;~&amp;Adding 3 to ~D.&quot; n)|# (+ n 3))
+
+;;; The examples that follow show issues related to #| ... |# nesting.
+
+;;; In this first example, #| and |# always occur properly paired,
+;;; so nesting works naturally.
+ (defun mention-fun-fact-1a ()
+   (format t &quot;CL uses ; and #|...|# in comments.&quot;))
+&rArr;  MENTION-FUN-FACT-1A
+ (mention-fun-fact-1a)
+<code class="t"> |&gt; </code> CL uses ; and #|...|# in comments.
+&rArr;  NIL
+ #| (defun mention-fun-fact-1b ()
+      (format t &quot;CL uses ; and #|...|# in comments.&quot;)) |#
+ (fboundp 'mention-fun-fact-1b) &rArr;  NIL
+
+;;; In this example, vertical-bar followed by sharpsign needed to appear
+;;; in a string without any matching sharpsign followed by vertical-bar
+;;; having preceded this.  To compensate, the programmer has included a
+;;; slash separating the two characters.  In case 2a, the slash is 
+;;; unnecessary but harmless, but in case 2b, the slash is critical to
+;;; allowing the outer #| ... |# pair match.  If the slash were not present,
+;;; the outer comment would terminate prematurely.
+ (defun mention-fun-fact-2a ()
+   (format t &quot;Don't use |\# unmatched or you'll get in trouble!&quot;))
+&rArr;  MENTION-FUN-FACT-2A
+ (mention-fun-fact-2a)
+<code class="t"> |&gt; </code> Don't use |# unmatched or you'll get in trouble!
+&rArr;  NIL
+ #| (defun mention-fun-fact-2b ()
+      (format t &quot;Don't use |\# unmatched or you'll get in trouble!&quot;) |#
+ (fboundp 'mention-fun-fact-2b) &rArr;  NIL
+
+;;; In this example, the programmer attacks the mismatch problem in a
+;;; different way.  The sharpsign vertical bar in the comment is not needed
+;;; for the correct parsing of the program normally (as in case 3a), but 
+;;; becomes important to avoid premature termination of a comment when such 
+;;; a program is commented out (as in case 3b).
+ (defun mention-fun-fact-3a () ; #|
+   (format t &quot;Don't use |# unmatched or you'll get in trouble!&quot;))
+&rArr;  MENTION-FUN-FACT-3A
+ (mention-fun-fact-3a)
+<code class="t"> |&gt; </code> Don't use |# unmatched or you'll get in trouble!
+&rArr;  NIL
+ #|
+ (defun mention-fun-fact-3b () ; #|
+   (format t &quot;Don't use |# unmatched or you'll get in trouble!&quot;))
+ |#
+ (fboundp 'mention-fun-fact-3b) &rArr;  NIL
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Notes-about-Style-for-Sharpsign-Vertical_002dBar.html">Notes about Style for Sharpsign Vertical-Bar</a>, Previous: <a href="Sharpsign-Vertical_002dBar.html">Sharpsign Vertical-Bar</a>, Up: <a href="Sharpsign.html">Sharpsign</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Single-Escape-Characters.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Single Escape Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Single Escape Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Single Escape Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Syntax-Types.html" rel="up" title="Character Syntax Types">
+<link href="Whitespace-Characters.html" rel="next" title="Whitespace Characters">
+<link href="Single-Escape-Character.html" rel="prev" title="Single Escape Character">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Single-Escape-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Whitespace-Characters.html" accesskey="n" rel="next">Whitespace Characters</a>, Previous: <a href="Single-Escape-Character.html" accesskey="p" rel="prev">Single Escape Character</a>, Up: <a href="Character-Syntax-Types.html" accesskey="u" rel="up">Character Syntax Types</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Single-Escape-Characters-1"><span>2.1.4.8 Examples of Single Escape Characters<a class="copiable-link" href="#Examples-of-Single-Escape-Characters-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> ;; The following examples assume the readtable case of *readtable* 
+ ;; and *print-case* are both :upcase.
+ (eq 'abc '\A\B\C) &rArr;  <i class="i">true</i>
+ (eq 'abc 'a\Bc) &rArr;  <i class="i">true</i>
+ (eq 'abc '\ABC) &rArr;  <i class="i">true</i>
+ (eq 'abc '\abc) &rArr;  <i class="i">false</i>
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Single_002dQuote.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Single-Quote (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Single-Quote (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Single-Quote (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Single_002dQuote.html" rel="up" title="Single-Quote">
+<link href="Single_002dQuote.html" rel="prev" title="Single-Quote">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Single_002dQuote">
+<div class="nav-panel">
+<p>
+Previous: <a href="Single_002dQuote.html" accesskey="p" rel="prev">Single-Quote</a>, Up: <a href="Single_002dQuote.html" accesskey="u" rel="up">Single-Quote</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Single_002dQuote-1"><span>2.4.3.1 Examples of Single-Quote<a class="copiable-link" href="#Examples-of-Single_002dQuote-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> 'foo &rArr;  FOO
+ ''foo &rArr;  (QUOTE FOO)
+ (car ''foo) &rArr;  QUOTE
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Style-for-Semicolon.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Style for Semicolon (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Style for Semicolon (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Style for Semicolon (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Semicolon.html" rel="up" title="Semicolon">
+<link href="Use-of-Quadruple-Semicolon.html" rel="prev" title="Use of Quadruple Semicolon">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Style-for-Semicolon">
+<div class="nav-panel">
+<p>
+Previous: <a href="Use-of-Quadruple-Semicolon.html" accesskey="p" rel="prev">Use of Quadruple Semicolon</a>, Up: <a href="Semicolon.html" accesskey="u" rel="up">Semicolon</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Style-for-Semicolon-1"><span>2.4.4.7 Examples of Style for Semicolon<a class="copiable-link" href="#Examples-of-Style-for-Semicolon-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;;;; Math Utilities
+
+;;; FIB computes the the Fibonacci function in the traditional
+;;; recursive way.
+
+(defun fib (n)
+  (check-type n integer)
+  ;; At this point we're sure we have an integer argument.
+  ;; Now we can get down to some serious computation.
+  (cond ((&lt; n 0)
+         ;; Hey, this is just supposed to be a simple example.
+         ;; Did you really expect me to handle the general case?
+         (error &quot;FIB got ~D as an argument.&quot; n))
+        ((&lt; n 2) n)             ;fib[0]=0 and fib[1]=1
+        ;; The cheap cases didn't work.
+        ;; Nothing more to do but recurse.
+        (t (+ (fib (- n 1))     ;The traditional formula
+              (fib (- n 2)))))) ; is fib[n-1]+fib[n-2].
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Suppressing-Keyword-Argument-Checking.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Suppressing Keyword Argument Checking (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Suppressing Keyword Argument Checking (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Suppressing Keyword Argument Checking (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Ordinary-Lambda-Lists.html" rel="up" title="Ordinary Lambda Lists">
+<link href="Specifiers-for-_0026aux-variables.html" rel="next" title="Specifiers for &amp;aux variables">
+<link href="Suppressing-Keyword-Argument-Checking.html" rel="prev" title="Suppressing Keyword Argument Checking">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Suppressing-Keyword-Argument-Checking">
+<div class="nav-panel">
+<p>
+Next: <a href="Specifiers-for-_0026aux-variables.html" accesskey="n" rel="next">Specifiers for <b class="b">&amp;aux</b> variables</a>, Previous: <a href="Suppressing-Keyword-Argument-Checking.html" accesskey="p" rel="prev">Suppressing Keyword Argument Checking</a>, Up: <a href="Ordinary-Lambda-Lists.html" accesskey="u" rel="up">Ordinary Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Suppressing-Keyword-Argument-Checking-1"><span>3.4.1.6 Examples of Suppressing Keyword Argument Checking<a class="copiable-link" href="#Examples-of-Suppressing-Keyword-Argument-Checking-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;;; The caller can supply :ALLOW-OTHER-KEYS T to suppress checking.
+ ((lambda (&amp;key x) x) :x 1 :y 2 :allow-other-keys t) &rArr;  1
+;;; The callee can use &amp;ALLOW-OTHER-KEYS to suppress checking.
+ ((lambda (&amp;key x &amp;allow-other-keys) x) :x 1 :y 2) &rArr;  1
+;;; :ALLOW-OTHER-KEYS NIL is always permitted.
+ ((lambda (&amp;key) t) :allow-other-keys nil) &rArr;  T
+;;; As with other keyword arguments, only the left-most pair
+;;; named :ALLOW-OTHER-KEYS has any effect.
+ ((lambda (&amp;key x) x) 
+  :x 1 :y 2 :allow-other-keys t :allow-other-keys nil)
+&rArr;  1
+;;; Only the left-most pair named :ALLOW-OTHER-KEYS has any effect,
+;;; so in safe code this signals a PROGRAM-ERROR (and might enter the
+;;; debugger).  In unsafe code, the consequences are undefined.
+ ((lambda (&amp;key x) x)                   ;This call is not valid
+  :x 1 :y 2 :allow-other-keys nil :allow-other-keys t)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Transfer-of-Control-during-a-Destructive-Operation.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Transfer of Control during a Destructive Operation (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Transfer of Control during a Destructive Operation (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Transfer of Control during a Destructive Operation (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Transfer-of-Control-during-a-Destructive-Operation.html" rel="up" title="Transfer of Control during a Destructive Operation">
+<link href="Transfer-of-Control-during-a-Destructive-Operation.html" rel="prev" title="Transfer of Control during a Destructive Operation">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Transfer-of-Control-during-a-Destructive-Operation">
+<div class="nav-panel">
+<p>
+Previous: <a href="Transfer-of-Control-during-a-Destructive-Operation.html" accesskey="p" rel="prev">Transfer of Control during a Destructive Operation</a>, Up: <a href="Transfer-of-Control-during-a-Destructive-Operation.html" accesskey="u" rel="up">Transfer of Control during a Destructive Operation</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Transfer-of-Control-during-a-Destructive-Operation-1"><span>3.7.2.1 Examples of Transfer of Control during a Destructive Operation<a class="copiable-link" href="#Examples-of-Transfer-of-Control-during-a-Destructive-Operation-1"> &para;</a></span></h4>
+
+<p>The following examples illustrate some of the many ways in which the
+<i class="i">implementation-dependent</i> nature of the modification can manifest
+itself.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((a (list 2 1 4 3 7 6 'five)))
+   (ignore-errors (sort a #'&lt;))
+   a)
+&rArr;  (1 2 3 4 6 7 FIVE)
+<i class="i">OR</i>&rArr; (2 1 4 3 7 6 FIVE)
+<i class="i">OR</i>&rArr; (2)
+
+ (prog foo ((a (list 1 2 3 4 5 6 7 8 9 10)))
+   (sort a #'(lambda (x y) (if (zerop (random 5)) (return-from foo a) (&gt; x y)))))
+&rArr;  (1 2 3 4 5 6 7 8 9 10)
+<i class="i">OR</i>&rArr; (3 4 5 6 2 7 8 9 10 1)
+<i class="i">OR</i>&rArr; (1 2 4 3)
+</pre></div>
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Truenames.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Truenames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Truenames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Truenames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Truenames.html" rel="up" title="Truenames">
+<link href="Truenames.html" rel="prev" title="Truenames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Truenames">
+<div class="nav-panel">
+<p>
+Previous: <a href="Truenames.html" accesskey="p" rel="prev">Truenames</a>, Up: <a href="Truenames.html" accesskey="u" rel="up">Truenames</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Truenames-1"><span>20.1.3.1 Examples of Truenames<a class="copiable-link" href="#Examples-of-Truenames-1"> &para;</a></span></h4>
+
+<p>For example, a DEC TOPS-20 system with <i class="i">files</i> <code class="t">PS:&lt;JOE&gt;FOO.TXT.1</code> 
+and <code class="t">PS:&lt;JOE&gt;FOO.TXT.2</code> might permit the second <i class="i">file</i> to be referred
+to as <code class="t">PS:&lt;JOE&gt;FOO.TXT.0</code>, since the &ldquo;<code class="t">.0</code>&rdquo; notation denotes &ldquo;newest&rdquo;
+version of several <i class="i">files</i>.
+In the same <i class="i">file system</i>, a &ldquo;logical device&rdquo; &ldquo;<code class="t">JOE:</code>&rdquo; might be 
+taken to refer to <code class="t">PS:&lt;JOE&gt;</code>&rdquo; and so the names <code class="t">JOE:FOO.TXT.2</code> or
+<code class="t">JOE:FOO.TXT.0</code> might refer to <code class="t">PS:&lt;JOE&gt;FOO.TXT.2</code>.
+In all of these cases, the <i class="i">truename</i> of the file would probably be
+<code class="t">PS:&lt;JOE&gt;FOO.TXT.2</code>.
+</p>
+<p>If a <i class="i">file</i> is a symbolic link to another <i class="i">file</i> (in a <i class="i">file system</i>
+permitting such a thing), it is conventional for the <i class="i">truename</i> to be
+the canonical name of the <i class="i">file</i> after any symbolic links have been followed;
+that is, it is the canonical name of the <i class="i">file</i> whose contents would
+become available if an <i class="i">input</i> <i class="i">stream</i> to that <i class="i">file</i> were 
+opened.
+</p>
+<p>In the case of a <i class="i">file</i> still being created (that is, of an <i class="i">output</i>
+<i class="i">stream</i> open to such a <i class="i">file</i>), the exact <i class="i">truename</i> of the file
+might not be known until the <i class="i">stream</i> is closed.  In this case, 
+the <i class="i">function</i> <b class="b">truename</b> might return different values for such a <i class="i">stream</i>
+before and after it was closed.  In fact, before it is closed, the name returned
+might not even be a valid name in the <i class="i">file system</i>&mdash;for example, while a
+file is being written, it might have version <code class="t">:newest</code> and might only take on 
+a specific numeric value later when the file is closed even in a <i class="i">file system</i>
+where all files have numeric versions.
+</p>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Truenames.html">Truenames</a>, Up: <a href="Truenames.html">Truenames</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-WHEN-clause.html
@@ -0,0 +1,87 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of WHEN clause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of WHEN clause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of WHEN clause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditional-Execution-Clauses.html" rel="up" title="Conditional Execution Clauses">
+<link href="Conditional-Execution-Clauses.html" rel="prev" title="Conditional Execution Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-WHEN-clause">
+<div class="nav-panel">
+<p>
+Previous: <a href="Conditional-Execution-Clauses.html" accesskey="p" rel="prev">Conditional Execution Clauses</a>, Up: <a href="Conditional-Execution-Clauses.html" accesskey="u" rel="up">Conditional Execution Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-WHEN-clause-1"><span>6.1.6.1 Examples of WHEN clause<a class="copiable-link" href="#Examples-of-WHEN-clause-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; Signal an exceptional condition.
+ (loop for item in '(1 2 3 a 4 5)
+       when (not (numberp item))
+        return (cerror &quot;enter new value&quot; &quot;non-numeric value: ~s&quot; item))
+Error: non-numeric value: A
+
+;; The previous example is equivalent to the following one.
+ (loop for item in '(1 2 3 a 4 5)
+       when (not (numberp item))
+        do (return 
+            (cerror &quot;Enter new value&quot; &quot;non-numeric value: ~s&quot; item)))
+Error: non-numeric value: A
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted">;; This example parses a simple printed string representation from 
+;; BUFFER (which is itself a string) and returns the index of the
+;; closing double-quote character.
+ (let ((buffer &quot;\&quot;a\&quot; \&quot;b\&quot;&quot;))
+   (loop initially (unless (char= (char buffer 0) #\&quot;)
+                     (loop-finish))
+         for i of-type fixnum from 1 below (length (the string buffer))
+         when (char= (char buffer i) #\&quot;)
+          return i))
+&rArr;  2
+
+;; The collected value is returned.
+ (loop for i from 1 to 10
+       when (&gt; i 5)
+         collect i
+       finally (prin1 'got-here))
+<code class="t"> |&gt; </code> GOT-HERE
+&rArr;  (6 7 8 9 10) 
+
+;; Return both the count of collected numbers and the numbers.
+ (loop for i from 1 to 10
+       when (&gt; i 5)
+         collect i into number-list
+         and count i into number-count
+       finally (return (values number-count number-list)))
+&rArr;  5, (6 7 8 9 10)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-WHILE-and-UNTIL-clauses.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of WHILE and UNTIL clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of WHILE and UNTIL clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of WHILE and UNTIL clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Termination-Test-Clauses.html" rel="up" title="Termination Test Clauses">
+<link href="Examples-of-ALWAYS.html" rel="prev" title="Examples of ALWAYS">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-WHILE-and-UNTIL-clauses">
+<div class="nav-panel">
+<p>
+Previous: <a href="Examples-of-ALWAYS.html" accesskey="p" rel="prev">Examples of ALWAYS, NEVER, and THEREIS clauses</a>, Up: <a href="Termination-Test-Clauses.html" accesskey="u" rel="up">Termination Test Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-WHILE-and-UNTIL-clauses-1"><span>6.1.4.3 Examples of WHILE and UNTIL clauses<a class="copiable-link" href="#Examples-of-WHILE-and-UNTIL-clauses-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (loop while (hungry-p) do (eat))
+
+;; UNTIL NOT is equivalent to WHILE.
+ (loop until (not (hungry-p)) do (eat))
+
+;; Collect the length and the items of STACK.
+ (let ((stack '(a b c d e f)))
+   (loop for item = (length stack) then (pop stack)
+         collect item
+         while stack))
+&rArr;  (6 A B C D E F)
+
+;; Use WHILE to terminate a loop that otherwise wouldn't terminate.
+;; Note that WHILE occurs after the WHEN.
+ (loop for i fixnum from 3
+       when (oddp i) collect i
+       while (&lt; i 5))
+&rArr;  (3 5)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-WITH-clause.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of WITH clause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of WITH clause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of WITH clause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="up" title="Variable Initialization and Stepping Clauses">
+<link href="Local-Variable-Initializations.html" rel="prev" title="Local Variable Initializations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-WITH-clause">
+<div class="nav-panel">
+<p>
+Previous: <a href="Local-Variable-Initializations.html" accesskey="p" rel="prev">Local Variable Initializations</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="u" rel="up">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-WITH-clause-1"><span>6.1.2.16 Examples of WITH clause<a class="copiable-link" href="#Examples-of-WITH-clause-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; These bindings occur in sequence.
+ (loop with a = 1 
+       with b = (+ a 2) 
+       with c = (+ b 3)
+       return (list a b c))
+&rArr;  (1 3 6)
+
+;; These bindings occur in parallel.
+ (setq a 5 b 10)
+&rArr;  10
+ (loop with a = 1
+       and b = (+ a 2)
+       and c = (+ b 3)
+       return (list a b c))
+&rArr;  (1 7 13)
+
+;; This example shows a shorthand way to declare local variables 
+;; that are of different types.
+ (loop with (a b c) of-type (float integer float)
+       return (format nil &quot;~A ~A ~A&quot; a b c))
+&rArr;  &quot;0.0 0 0.0&quot;
+
+;; This example shows a shorthand way to declare local variables 
+;; that are the same type.
+ (loop with (a b c) of-type float 
+       return (format nil &quot;~A ~A ~A&quot; a b c))
+&rArr;  &quot;0.0 0.0 0.0&quot;
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-Whitespace-Characters.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of Whitespace Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of Whitespace Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of Whitespace Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Syntax-Types.html" rel="up" title="Character Syntax Types">
+<link href="Whitespace-Characters.html" rel="prev" title="Whitespace Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-Whitespace-Characters">
+<div class="nav-panel">
+<p>
+Previous: <a href="Whitespace-Characters.html" accesskey="p" rel="prev">Whitespace Characters</a>, Up: <a href="Character-Syntax-Types.html" accesskey="u" rel="up">Character Syntax Types</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-Whitespace-Characters-1"><span>2.1.4.10 Examples of Whitespace Characters<a class="copiable-link" href="#Examples-of-Whitespace-Characters-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (length '(this-that)) &rArr;  1
+ (length '(this - that)) &rArr;  3
+ (length '(a
+           b)) &rArr;  2
+ (+ 34) &rArr;  34
+ (+ 3 4) &rArr;  7
+</pre></div>
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-clause-grouping.html
@@ -0,0 +1,118 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of clause grouping (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of clause grouping (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of clause grouping (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Examples-of-Miscellaneous-Loop-Features.html" rel="up" title="Examples of Miscellaneous Loop Features">
+<link href="Examples-of-Miscellaneous-Loop-Features.html" rel="prev" title="Examples of Miscellaneous Loop Features">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-clause-grouping">
+<div class="nav-panel">
+<p>
+Previous: <a href="Examples-of-Miscellaneous-Loop-Features.html" accesskey="p" rel="prev">Examples of Miscellaneous Loop Features</a>, Up: <a href="Examples-of-Miscellaneous-Loop-Features.html" accesskey="u" rel="up">Examples of Miscellaneous Loop Features</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-clause-grouping-1"><span>6.1.8.1 Examples of clause grouping<a class="copiable-link" href="#Examples-of-clause-grouping-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; Group conditional clauses.
+ (loop for i in '(1 324 2345 323 2 4 235 252)
+       when (oddp i)
+         do (print i)
+         and collect i into odd-numbers
+         and do (terpri)
+       else                              ; I is even.
+         collect i into even-numbers
+       finally
+         (return (values odd-numbers even-numbers)))
+<code class="t"> |&gt; </code> 1 
+<code class="t"> |&gt; </code> 
+<code class="t"> |&gt; </code> 2345 
+<code class="t"> |&gt; </code> 
+<code class="t"> |&gt; </code> 323 
+<code class="t"> |&gt; </code> 
+<code class="t"> |&gt; </code> 235 
+&rArr;  (1 2345 323 235), (324 2 4 252)
+
+;; Collect numbers larger than 3.
+ (loop for i in '(1 2 3 4 5 6)
+       when (and (&gt; i 3) i)
+       collect it)                      ; IT refers to (and (&gt; i 3) i).
+&rArr;  (4 5 6)
+
+;; Find a number in a list.
+ (loop for i in '(1 2 3 4 5 6)
+       when (and (&gt; i 3) i)
+       return it)
+&rArr;  4
+
+;; The above example is similar to the following one.
+ (loop for i in '(1 2 3 4 5 6)
+       thereis (and (&gt; i 3) i))
+&rArr;  4
+
+;; Nest conditional clauses.
+ (let ((list '(0 3.0 apple 4 5 9.8 orange banana)))
+   (loop for i in list
+         when (numberp i)
+           when (floatp i)
+             collect i into float-numbers
+           else                                  ; Not (floatp i)
+             collect i into other-numbers
+         else                                    ; Not (numberp i)
+           when (symbolp i) 
+             collect i into symbol-list
+           else                                  ; Not (symbolp i)
+             do (error &quot;found a funny value in list ~S, value ~S~
+         finally (return (values float-numbers other-numbers symbol-list))))
+&rArr;  (3.0 9.8), (0 4 5), (APPLE ORANGE BANANA)
+
+;; Without the END preposition, the last AND would apply to the
+;; inner IF rather than the outer one.
+ (loop for x from 0 to 3 
+       do (print x)
+       if (zerop (mod x 2))
+         do (princ &quot; a&quot;)
+          and if (zerop (floor x 2))
+                do (princ &quot; b&quot;)
+                end
+          and do (princ &quot; c&quot;))
+<code class="t"> |&gt; </code> 0  a b c
+<code class="t"> |&gt; </code> 1 
+<code class="t"> |&gt; </code> 2  a c
+<code class="t"> |&gt; </code> 3 
+&rArr;  NIL
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Examples-of-Miscellaneous-Loop-Features.html">Examples of Miscellaneous Loop Features</a>, Up: <a href="Examples-of-Miscellaneous-Loop-Features.html">Examples of Miscellaneous Loop Features</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-for_002das_002dacross-subclause.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of for-as-across subclause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of for-as-across subclause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of for-as-across subclause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="up" title="Variable Initialization and Stepping Clauses">
+<link href="The-for_002das_002dhash-subclause.html" rel="next" title="The for-as-hash subclause">
+<link href="The-for_002das_002dacross-subclause.html" rel="prev" title="The for-as-across subclause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-for_002das_002dacross-subclause">
+<div class="nav-panel">
+<p>
+Next: <a href="The-for_002das_002dhash-subclause.html" accesskey="n" rel="next">The for-as-hash subclause</a>, Previous: <a href="The-for_002das_002dacross-subclause.html" accesskey="p" rel="prev">The for-as-across subclause</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="u" rel="up">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-for_002das_002dacross-subclause-1"><span>6.1.2.11 Examples of for-as-across subclause<a class="copiable-link" href="#Examples-of-for_002das_002dacross-subclause-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (loop for char across (the simple-string (find-message channel))
+       do (write-char char stream))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-for_002das_002darithmetic-subclause.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of for-as-arithmetic subclause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of for-as-arithmetic subclause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of for-as-arithmetic subclause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="up" title="Variable Initialization and Stepping Clauses">
+<link href="The-for_002das_002din_002dlist-subclause.html" rel="next" title="The for-as-in-list subclause">
+<link href="The-for_002das_002darithmetic-subclause.html" rel="prev" title="The for-as-arithmetic subclause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-for_002das_002darithmetic-subclause">
+<div class="nav-panel">
+<p>
+Next: <a href="The-for_002das_002din_002dlist-subclause.html" accesskey="n" rel="next">The for-as-in-list subclause</a>, Previous: <a href="The-for_002das_002darithmetic-subclause.html" accesskey="p" rel="prev">The for-as-arithmetic subclause</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="u" rel="up">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-for_002das_002darithmetic-subclause-1"><span>6.1.2.3 Examples of for-as-arithmetic subclause<a class="copiable-link" href="#Examples-of-for_002das_002darithmetic-subclause-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; Print some numbers.
+ (loop for i from 1 to 3
+       do (print i))
+<code class="t"> |&gt; </code> 1
+<code class="t"> |&gt; </code> 2
+<code class="t"> |&gt; </code> 3
+&rArr;  NIL
+
+;; Print every third number.
+ (loop for i from 10 downto 1 by 3
+       do (print i))
+<code class="t"> |&gt; </code> 10 
+<code class="t"> |&gt; </code> 7 
+<code class="t"> |&gt; </code> 4 
+<code class="t"> |&gt; </code> 1 
+&rArr;  NIL
+
+;; Step incrementally from the default starting value.
+ (loop for i below 3
+       do (print i))
+<code class="t"> |&gt; </code> 0
+<code class="t"> |&gt; </code> 1
+<code class="t"> |&gt; </code> 2
+&rArr;  NIL
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-for_002das_002dequals_002dthen-subclause.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of for-as-equals-then subclause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of for-as-equals-then subclause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of for-as-equals-then subclause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="up" title="Variable Initialization and Stepping Clauses">
+<link href="The-for_002das_002dacross-subclause.html" rel="next" title="The for-as-across subclause">
+<link href="The-for_002das_002dequals_002dthen-subclause.html" rel="prev" title="The for-as-equals-then subclause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-for_002das_002dequals_002dthen-subclause">
+<div class="nav-panel">
+<p>
+Next: <a href="The-for_002das_002dacross-subclause.html" accesskey="n" rel="next">The for-as-across subclause</a>, Previous: <a href="The-for_002das_002dequals_002dthen-subclause.html" accesskey="p" rel="prev">The for-as-equals-then subclause</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="u" rel="up">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-for_002das_002dequals_002dthen-subclause-1"><span>6.1.2.9 Examples of for-as-equals-then subclause<a class="copiable-link" href="#Examples-of-for_002das_002dequals_002dthen-subclause-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; Collect some numbers.
+ (loop for item = 1 then (+ item 10)
+       for iteration from 1 to 5
+       collect item)
+&rArr;  (1 11 21 31 41)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-for_002das_002din_002dlist-subclause.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of for-as-in-list subclause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of for-as-in-list subclause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of for-as-in-list subclause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="up" title="Variable Initialization and Stepping Clauses">
+<link href="The-for_002das_002don_002dlist-subclause.html" rel="next" title="The for-as-on-list subclause">
+<link href="The-for_002das_002din_002dlist-subclause.html" rel="prev" title="The for-as-in-list subclause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-for_002das_002din_002dlist-subclause">
+<div class="nav-panel">
+<p>
+Next: <a href="The-for_002das_002don_002dlist-subclause.html" accesskey="n" rel="next">The for-as-on-list subclause</a>, Previous: <a href="The-for_002das_002din_002dlist-subclause.html" accesskey="p" rel="prev">The for-as-in-list subclause</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="u" rel="up">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-for_002das_002din_002dlist-subclause-1"><span>6.1.2.5 Examples of for-as-in-list subclause<a class="copiable-link" href="#Examples-of-for_002das_002din_002dlist-subclause-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; Print every item in a list.
+ (loop for item in '(1 2 3) do (print item))
+<code class="t"> |&gt; </code> 1
+<code class="t"> |&gt; </code> 2
+<code class="t"> |&gt; </code> 3
+&rArr;  NIL
+
+;; Print every other item in a list.
+ (loop for item in '(1 2 3 4 5) by #'cddr
+       do (print item))
+<code class="t"> |&gt; </code> 1
+<code class="t"> |&gt; </code> 3
+<code class="t"> |&gt; </code> 5
+&rArr;  NIL
+
+;; Destructure a list, and sum the x values using fixnum arithmetic.
+ (loop for (item . x) of-type (t . fixnum) in '((A . 1) (B . 2) (C . 3))
+       unless (eq item 'B) sum x)
+&rArr;  4
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-for_002das_002don_002dlist-subclause.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of for-as-on-list subclause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of for-as-on-list subclause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of for-as-on-list subclause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="up" title="Variable Initialization and Stepping Clauses">
+<link href="The-for_002das_002dequals_002dthen-subclause.html" rel="next" title="The for-as-equals-then subclause">
+<link href="The-for_002das_002don_002dlist-subclause.html" rel="prev" title="The for-as-on-list subclause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-for_002das_002don_002dlist-subclause">
+<div class="nav-panel">
+<p>
+Next: <a href="The-for_002das_002dequals_002dthen-subclause.html" accesskey="n" rel="next">The for-as-equals-then subclause</a>, Previous: <a href="The-for_002das_002don_002dlist-subclause.html" accesskey="p" rel="prev">The for-as-on-list subclause</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="u" rel="up">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-for_002das_002don_002dlist-subclause-1"><span>6.1.2.7 Examples of for-as-on-list subclause<a class="copiable-link" href="#Examples-of-for_002das_002don_002dlist-subclause-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; Collect successive tails of a list.
+ (loop for sublist on '(a b c d)
+       collect sublist)
+&rArr;  ((A B C D) (B C D) (C D) (D))
+
+;; Print a list by using destructuring with the loop keyword ON.
+ (loop for (item) on '(1 2 3)
+       do (print item))
+<code class="t"> |&gt; </code> 1 
+<code class="t"> |&gt; </code> 2 
+<code class="t"> |&gt; </code> 3 
+&rArr;  NIL
+
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-for_002das_002dpackage-subclause.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of for-as-package subclause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of for-as-package subclause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of for-as-package subclause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="up" title="Variable Initialization and Stepping Clauses">
+<link href="Local-Variable-Initializations.html" rel="next" title="Local Variable Initializations">
+<link href="The-for_002das_002dpackage-subclause.html" rel="prev" title="The for-as-package subclause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-for_002das_002dpackage-subclause">
+<div class="nav-panel">
+<p>
+Next: <a href="Local-Variable-Initializations.html" accesskey="n" rel="next">Local Variable Initializations</a>, Previous: <a href="The-for_002das_002dpackage-subclause.html" accesskey="p" rel="prev">The for-as-package subclause</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="u" rel="up">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-for_002das_002dpackage-subclause-1"><span>6.1.2.14 Examples of for-as-package subclause<a class="copiable-link" href="#Examples-of-for_002das_002dpackage-subclause-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((*package* (make-package &quot;TEST-PACKAGE-1&quot;)))
+   ;; For effect, intern some symbols
+   (read-from-string &quot;(THIS IS A TEST)&quot;)
+   (export (intern &quot;THIS&quot;))
+   (loop for x being each present-symbol of *package*
+          do (print x)))
+<code class="t"> |&gt; </code> A 
+<code class="t"> |&gt; </code> TEST 
+<code class="t"> |&gt; </code> THIS
+<code class="t"> |&gt; </code> IS 
+&rArr;  NIL
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-unconditional-execution.html
@@ -0,0 +1,59 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of unconditional execution (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of unconditional execution (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of unconditional execution (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Unconditional-Execution-Clauses.html" rel="up" title="Unconditional Execution Clauses">
+<link href="Unconditional-Execution-Clauses.html" rel="prev" title="Unconditional Execution Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Examples-of-unconditional-execution">
+<div class="nav-panel">
+<p>
+Previous: <a href="Unconditional-Execution-Clauses.html" accesskey="p" rel="prev">Unconditional Execution Clauses</a>, Up: <a href="Unconditional-Execution-Clauses.html" accesskey="u" rel="up">Unconditional Execution Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Examples-of-unconditional-execution-1"><span>6.1.5.1 Examples of unconditional execution<a class="copiable-link" href="#Examples-of-unconditional-execution-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; Print numbers and their squares.
+;; The DO construct applies to multiple forms.
+ (loop for i from 1 to 3
+       do (print i)
+          (print (* i i)))
+<code class="t"> |&gt; </code> 1 
+<code class="t"> |&gt; </code> 1 
+<code class="t"> |&gt; </code> 2 
+<code class="t"> |&gt; </code> 4 
+<code class="t"> |&gt; </code> 3 
+<code class="t"> |&gt; </code> 9 
+&rArr;  NIL
+
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Examples-of-using-the-Pretty-Printer.html
@@ -0,0 +1,378 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Examples of using the Pretty Printer (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Examples of using the Pretty Printer (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Examples of using the Pretty Printer (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Lisp-Pretty-Printer.html" rel="up" title="The Lisp Pretty Printer">
+<link href="Notes-about-the-Pretty-Printer_0060s-Background.html" rel="next" title="Notes about the Pretty Printer`s Background">
+<link href="Pretty-Printer-Concepts.html" rel="prev" title="Pretty Printer Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Examples-of-using-the-Pretty-Printer">
+<div class="nav-panel">
+<p>
+Next: <a href="Notes-about-the-Pretty-Printer_0060s-Background.html" accesskey="n" rel="next">Notes about the Pretty Printer&lsquo;s Background</a>, Previous: <a href="Pretty-Printer-Concepts.html" accesskey="p" rel="prev">Pretty Printer Concepts</a>, Up: <a href="The-Lisp-Pretty-Printer.html" accesskey="u" rel="up">The Lisp Pretty Printer</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Examples-of-using-the-Pretty-Printer-1"><span>22.2.2 Examples of using the Pretty Printer<a class="copiable-link" href="#Examples-of-using-the-Pretty-Printer-1"> &para;</a></span></h4>
+
+<p>As an example of the interaction of logical blocks, conditional newlines,
+and indentation, consider the function <code class="t">simple-pprint-defun</code> below.  This
+function prints out lists whose <i class="i">cars</i> are <b class="b">defun</b> in the 
+standard way assuming that the list has exactly length <code class="t">4</code>.
+</p>
+<div class="example">
+<pre class="example-preformatted">(defun simple-pprint-defun (*standard-output* list)
+  (pprint-logical-block (*standard-output* list :prefix &quot;(&quot; :suffix &quot;)&quot;)
+    (write (first list))
+    (write-char #\Space)
+    (pprint-newline :miser)
+    (pprint-indent :current 0)
+    (write (second list))
+    (write-char #\Space)
+    (pprint-newline :fill)
+    (write (third list))
+    (pprint-indent :block 1)
+    (write-char #\Space)
+    (pprint-newline :linear)
+    (write (fourth list))))
+</pre></div>
+
+<p>Suppose that one evaluates the following:
+</p>
+<div class="example">
+<pre class="example-preformatted">(simple-pprint-defun *standard-output* '(defun prod (x y) (* x y)))
+</pre></div>
+
+<p>If the line width available is greater than or equal to <code class="t">26</code>, then all of the
+output appears on one line.  If the line width available is reduced to <code class="t">25</code>,
+a line break is inserted at the 
+linear-style conditional newline
+<a class="index-entry-id" id="index-linear_002dstyle-conditional-newline"></a>
+</p>
+<p>before the
+<i class="i">expression</i> <code class="t">(* x y)</code>, producing the output shown.  The
+<code class="t">(pprint-indent :block 1)</code> causes <code class="t">(* x y)</code> to be printed at a relative
+indentation of <code class="t">1</code> in the logical block.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (DEFUN PROD (X Y) 
+   (* X Y))
+</pre></div>
+
+<p>If the line width available is <code class="t">15</code>, a line break is also inserted at the
+fill style conditional newline before the argument list.  The call on
+<code class="t">(pprint-indent :current 0)</code> causes the argument list to line up under the
+function name.
+</p>
+<div class="example">
+<pre class="example-preformatted">(DEFUN PROD
+       (X Y)
+  (* X Y))
+</pre></div>
+
+<p>If <b class="b">*print-miser-width*</b> were greater than or equal to 14, the example 
+output above would have been as follows, because all indentation changes 
+are ignored in miser mode and line breaks are inserted at 
+miser-style conditional newlines.
+<a class="index-entry-id" id="index-miser_002dstyle-conditional-newline"></a>
+</p>
+<div class="example">
+<pre class="example-preformatted"> (DEFUN
+  PROD
+  (X Y)
+  (* X Y))
+</pre></div>
+
+<p>As an example of a per-line prefix, consider that evaluating the following
+produces the output shown with a line width of <code class="t">20</code> and
+<b class="b">*print-miser-width*</b> of <b class="b">nil</b>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (pprint-logical-block (*standard-output* nil :per-line-prefix &quot;;;; &quot;)
+   (simple-pprint-defun *standard-output* '(defun prod (x y) (* x y))))
+
+ ;;; (DEFUN PROD
+ ;;;        (X Y)
+ ;;;   (* X Y))
+</pre></div>
+
+<p>As a more complex (and realistic) example, consider the function <code class="t">pprint-let</code>
+below.  This specifies how to print a <b class="b">let</b> <i class="i">form</i> in the traditional
+style.  It is more complex than the example above, because it has to deal with
+nested structure.  Also, unlike the example above it contains complete code to 
+readably print any possible list that begins with the <i class="i">symbol</i> <b class="b">let</b>.
+The outermost <b class="b">pprint-logical-block</b> <i class="i">form</i> handles the printing of
+the input list as a whole and specifies that parentheses should be printed in the
+output.  The second <b class="b">pprint-logical-block</b> <i class="i">form</i> handles the list 
+of binding pairs.  Each pair in the list is itself printed by the innermost
+<b class="b">pprint-logical-block</b>.  (A <b class="b">loop</b> <i class="i">form</i> is used instead of
+merely decomposing the pair into two <i class="i">objects</i> so that readable output will
+be produced no matter whether the list corresponding to the pair has one element,
+two elements, or (being malformed) has more than two elements.)   
+A space and a 
+fill-style conditional newline
+<a class="index-entry-id" id="index-fill_002dstyle-conditional-newline"></a>
+</p>
+<p>are placed after
+each pair except the last.  The loop at the end of the topmost
+<b class="b">pprint-logical-block</b> <i class="i">form</i> prints out the forms in the body
+of the <b class="b">let</b> <i class="i">form</i> separated by spaces and 
+linear-style conditional newlines.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun pprint-let (*standard-output* list)
+   (pprint-logical-block (nil list :prefix &quot;(&quot; :suffix &quot;)&quot;)
+     (write (pprint-pop))
+     (pprint-exit-if-list-exhausted)
+     (write-char #\Space)
+     (pprint-logical-block (nil (pprint-pop) :prefix &quot;(&quot; :suffix &quot;)&quot;)
+       (pprint-exit-if-list-exhausted)
+       (loop (pprint-logical-block (nil (pprint-pop) :prefix &quot;(&quot; :suffix &quot;)&quot;)
+               (pprint-exit-if-list-exhausted)
+               (loop (write (pprint-pop))
+                     (pprint-exit-if-list-exhausted)
+                     (write-char #\Space)
+                     (pprint-newline :linear)))
+             (pprint-exit-if-list-exhausted)
+             (write-char #\Space)
+             (pprint-newline :fill)))
+     (pprint-indent :block 1)
+     (loop (pprint-exit-if-list-exhausted)
+           (write-char #\Space)
+           (pprint-newline :linear)
+           (write (pprint-pop)))))
+</pre></div>
+
+<p>Suppose that one evaluates the following with <b class="b">*print-level*</b> being 4, 
+and <b class="b">*print-circle*</b> being <i class="i">true</i>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (pprint-let *standard-output*
+             '#1=(let (x (*print-length* (f (g 3))) 
+                       (z . 2) (k (car y)))
+                   (setq x (sqrt z)) #1#))
+</pre></div>
+
+<p>If the line length is greater than or equal to <code class="t">77</code>, the output produced
+appears on one line.  However, if the line length is <code class="t">76</code>, line breaks are
+inserted at the linear-style conditional newlines separating the forms in
+the body and the output below is produced.  Note that, the degenerate
+binding pair <code class="t">x</code> is printed readably even though it fails to be a list; a
+depth abbreviation marker is printed in place of <code class="t">(g 3)</code>; the binding pair
+<code class="t">(z . 2)</code> is printed readably even though it is not a proper list; and
+appropriate circularity markers are printed.
+</p>
+<div class="example">
+<pre class="example-preformatted"> #1=(LET (X (*PRINT-LENGTH* (F #)) (Z . 2) (K (CAR Y))) 
+      (SETQ X (SQRT Z))
+      #1#)
+</pre></div>
+
+<p>If the line length is reduced to <code class="t">35</code>, a line break is inserted at one of the
+fill-style conditional newlines separating the binding pairs.
+</p>
+<div class="example">
+<pre class="example-preformatted"> #1=(LET (X (*PRINT-PRETTY* (F #))
+          (Z . 2) (K (CAR Y)))
+      (SETQ X (SQRT Z))
+      #1#)
+</pre></div>
+
+<p>Suppose that the line length is further reduced to <code class="t">22</code> and <b class="b">*print-length*</b> is
+set to <code class="t">3</code>. In this situation, line breaks are inserted after both the first
+and second binding pairs.  In addition, the second binding pair is itself
+broken across two lines.  Clause (b) of the description of fill-style
+conditional newlines (see the <i class="i">function</i> <b class="b">pprint-newline</b>) 
+prevents the binding pair <code class="t">(z . 2)</code> from being printed
+at the end of the third line.  Note that the length abbreviation hides the
+circularity from view and therefore the printing of circularity markers
+disappears.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (LET (X
+       (*PRINT-LENGTH*
+        (F #))
+       (Z . 2) ...)
+   (SETQ X (SQRT Z))
+   ...)
+</pre></div>
+
+<p>The next function prints a vector using &ldquo;<code class="t">#(...)</code>&rdquo; notation.
+</p>
+<div class="example">
+<pre class="example-preformatted">(defun pprint-vector (*standard-output* v)
+  (pprint-logical-block (nil nil :prefix &quot;#(&quot; :suffix &quot;)&quot;)
+    (let ((end (length v)) (i 0))
+      (when (plusp end)
+        (loop (pprint-pop)
+              (write (aref v i))
+              (if (= (incf i) end) (return nil))
+              (write-char #\Space)
+              (pprint-newline :fill))))))
+</pre></div>
+
+<p>Evaluating the following with a line length of 15 produces the output shown.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (pprint-vector *standard-output* '#(12 34 567 8 9012 34 567 89 0 1 23))
+
+ #(12 34 567 8 
+   9012 34 567 
+   89 0 1 23)
+</pre></div>
+
+<p>As examples of the convenience of specifying pretty printing with 
+<i class="i">format strings</i>, consider that the functions <code class="t">simple-pprint-defun</code>
+and <code class="t">pprint-let</code> used as examples above can be compactly defined as follows.
+(The function <code class="t">pprint-vector</code> cannot be defined using <b class="b">format</b>
+because the data structure it traverses is not a list.)
+</p>
+<div class="example">
+<pre class="example-preformatted">(defun simple-pprint-defun (*standard-output* list)
+  (format T &quot;~:&lt;~W ~@_~:I~W ~:_~W~1I ~_~W~:&gt;&quot; list))
+
+(defun pprint-let (*standard-output* list)
+  (format T &quot;~:&lt;~W~<code class="t">^</code>~:&lt;~@{~:&lt;~@{~W~<code class="t">^</code>~_~}~:&gt;~<code class="t">^</code>~:_~}~:&gt;~1I~@{~<code class="t">^</code>~_~W~}~:&gt;&quot; list)) 
+</pre></div>
+
+<p>In the following example, the first <i class="i">form</i> restores
+<b class="b">*print-pprint-dispatch*</b> to the equivalent of its initial value.
+The next two forms then set up a special way to pretty print ratios.
+Note that the more specific <i class="i">type specifier</i> has to be associated
+with a higher priority.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq *print-pprint-dispatch* (copy-pprint-dispatch nil))
+
+ (set-pprint-dispatch 'ratio
+   #'(lambda (s obj)
+       (format s &quot;#.(/ ~W ~W)&quot; 
+                 (numerator obj) (denominator obj))))
+
+ (set-pprint-dispatch '(and ratio (satisfies minusp))
+   #'(lambda (s obj)
+       (format s &quot;#.(- (/ ~W ~W))&quot; 
+               (- (numerator obj)) (denominator obj)))
+   5)
+
+ (pprint '(1/3 -2/3))
+ (#.(/ 1 3) #.(- (/ 2 3)))
+</pre></div>
+
+<p>The following two <i class="i">forms</i> illustrate the definition of 
+pretty printing functions for types of <i class="i">code</i>.  The first
+<i class="i">form</i> illustrates how to specify the traditional method 
+for printing quoted objects using <i class="i">single-quote</i>.  Note
+the care taken to ensure that data lists that happen to begin
+with <b class="b">quote</b> will be printed readably.  The second form 
+specifies that lists beginning with the symbol <code class="t">my-let</code>
+should print the same way that lists beginning with <b class="b">let</b>
+print when the initial <i class="i">pprint dispatch table</i> is in effect.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (set-pprint-dispatch '(cons (member quote)) () 
+   #'(lambda (s list)
+       (if (and (consp (cdr list)) (null (cddr list)))
+          (funcall (formatter &quot;'~W&quot;) s (cadr list))
+          (pprint-fill s list))))
+
+ (set-pprint-dispatch '(cons (member my-let)) 
+                      (pprint-dispatch '(let) nil))
+</pre></div>
+
+<p>The next example specifies a default method for printing lists that do not
+correspond to function calls.  Note that the functions <b class="b">pprint-linear</b>,
+<b class="b">pprint-fill</b>, and <b class="b">pprint-tabular</b> are all defined with
+optional <i class="i">colon-p</i> and <i class="i">at-sign-p</i> arguments so that they can 
+be used as <b class="b">pprint dispatch functions</b> as well as <code class="t">~/.../</code> 
+functions.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (set-pprint-dispatch '(cons (not (and symbol (satisfies fboundp))))
+                      #'pprint-fill -5)
+
+ ;; Assume a line length of 9
+ (pprint '(0 b c d e f g h i j k))
+ (0 b c d
+  e f g h
+  i j k)
+</pre></div>
+
+<p>This final example shows how to define a pretty printing function for a
+user defined data structure.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct family mom kids)
+
+ (set-pprint-dispatch 'family
+   #'(lambda (s f)
+       (funcall (formatter &quot;~@&lt;#&lt;~;~W and ~2I~_~/pprint-fill/~;&gt;~:&gt;&quot;)
+               s (family-mom f) (family-kids f))))
+</pre></div>
+
+<p>The pretty printing function for the structure <code class="t">family</code> specifies how to
+adjust the layout of the output so that it can fit aesthetically into
+a variety of line widths.  In addition, it obeys 
+the printer control variables <b class="b">*print-level*</b>,
+<b class="b">*print-length*</b>, <b class="b">*print-lines*</b>,
+<b class="b">*print-circle*</b>
+and <b class="b">*print-escape*</b>,
+and can tolerate several different kinds of malformity in the data structure.
+The output below shows what is printed out with a right margin of <code class="t">25</code>,
+<b class="b">*print-pretty*</b> being <i class="i">true</i>, <b class="b">*print-escape*</b> being <i class="i">false</i>,
+and a malformed <code class="t">kids</code> list.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (write (list 'principal-family
+              (make-family :mom &quot;Lucy&quot;
+                           :kids '(&quot;Mark&quot; &quot;Bob&quot; . &quot;Dan&quot;)))
+        :right-margin 25 :pretty T :escape nil :miser-width nil)
+ (PRINCIPAL-FAMILY
+  #&lt;Lucy and
+      Mark Bob . Dan&gt;)
+</pre></div>
+
+<p>Note that a pretty printing function for a structure is different from
+the structure&rsquo;s <b class="b">print-object</b> <i class="i">method</i>.
+While
+<b class="b">print-object</b> <i class="i">methods</i>
+are permanently associated with a structure,
+pretty printing functions are stored in 
+<i class="i">pprint dispatch tables</i> and can be rapidly changed to reflect 
+different printing needs.  If there is no pretty printing function for 
+a structure in the current <i class="i">pprint dispatch table</i>,
+its <b class="b">print-object</b> <i class="i">method</i>
+is used instead.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Notes-about-the-Pretty-Printer_0060s-Background.html">Notes about the Pretty Printer&lsquo;s Background</a>, Previous: <a href="Pretty-Printer-Concepts.html">Pretty Printer Concepts</a>, Up: <a href="The-Lisp-Pretty-Printer.html">The Lisp Pretty Printer</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Exceptional-Situations-in-the-Compiler.html
@@ -0,0 +1,89 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Exceptional Situations in the Compiler (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Exceptional Situations in the Compiler (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Exceptional Situations in the Compiler (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Compilation.html" rel="up" title="Compilation">
+<link href="Literal-Objects-in-Compiled-Files.html" rel="prev" title="Literal Objects in Compiled Files">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Exceptional-Situations-in-the-Compiler">
+<div class="nav-panel">
+<p>
+Previous: <a href="Literal-Objects-in-Compiled-Files.html" accesskey="p" rel="prev">Literal Objects in Compiled Files</a>, Up: <a href="Compilation.html" accesskey="u" rel="up">Compilation</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Exceptional-Situations-in-the-Compiler-1"><span>3.2.5 Exceptional Situations in the Compiler<a class="copiable-link" href="#Exceptional-Situations-in-the-Compiler-1"> &para;</a></span></h4>
+
+<p><b class="b">compile</b> and <b class="b">compile-file</b> are permitted to
+signal errors and warnings, including errors due to compile-time
+processing of <code class="t">(eval-when (:compile-toplevel) ...)</code> forms,
+macro expansion, and conditions signaled by the compiler itself.
+</p>
+<p><i class="i">Conditions</i> of <i class="i">type</i> <b class="b">error</b> might be signaled by the compiler
+in situations where the compilation cannot proceed without intervention.  
+</p>
+<p>In addition to situations for which the standard specifies that
+<i class="i">conditions</i> of <i class="i">type</i> <b class="b">warning</b> must or might be signaled,
+warnings might be signaled in situations where the compiler can
+determine that the consequences are undefined or that a run-time
+error will be signaled.  Examples of this situation are as follows: 
+    violating type declarations,
+    altering or assigning the value of a constant defined with <b class="b">defconstant</b>,
+    calling built-in Lisp functions with a wrong number of arguments or malformed keyword
+      argument lists, 
+and using unrecognized declaration specifiers.
+</p>
+<p>The compiler is permitted to issue warnings about matters of
+programming style as conditions of <i class="i">type</i> <b class="b">style-warning</b>.
+Examples of this situation are as follows:
+      redefining a function using a different argument list,
+      calling a function with a wrong number of arguments,
+      not declaring <b class="b">ignore</b> of a local variable that is not referenced,
+  and referencing a variable declared <b class="b">ignore</b>.
+</p>
+<p>Both <b class="b">compile</b> and <b class="b">compile-file</b> are permitted
+(but not required) to <i class="i">establish</i> a <i class="i">handler</i>
+for <i class="i">conditions</i> of <i class="i">type</i> <b class="b">error</b>.  For example, they
+might signal a warning, and restart compilation from some
+<i class="i">implementation-dependent</i> point in order to let the 
+compilation proceed without manual intervention.
+</p>
+<p>Both <b class="b">compile</b> and <b class="b">compile-file</b> return three
+values, the second two indicating whether the source code being compiled
+contained errors and whether style warnings were issued.
+</p>
+<p>Some warnings might be deferred until the end of compilation. 
+See <b class="b">with-compilation-unit</b>.
+</p>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Literal-Objects-in-Compiled-Files.html">Literal Objects in Compiled Files</a>, Up: <a href="Compilation.html">Compilation</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Expanding-Loop-Forms.html
@@ -0,0 +1,115 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Expanding Loop Forms (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Expanding Loop Forms (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Expanding Loop Forms (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-the-Loop-Facility.html" rel="up" title="Overview of the Loop Facility">
+<link href="Summary-of-Loop-Clauses.html" rel="next" title="Summary of Loop Clauses">
+<link href="Parsing-Loop-Clauses.html" rel="prev" title="Parsing Loop Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Expanding-Loop-Forms">
+<div class="nav-panel">
+<p>
+Next: <a href="Summary-of-Loop-Clauses.html" accesskey="n" rel="next">Summary of Loop Clauses</a>, Previous: <a href="Parsing-Loop-Clauses.html" accesskey="p" rel="prev">Parsing Loop Clauses</a>, Up: <a href="Overview-of-the-Loop-Facility.html" accesskey="u" rel="up">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Expanding-Loop-Forms-1"><span>6.1.1.6 Expanding Loop Forms<a class="copiable-link" href="#Expanding-Loop-Forms-1"> &para;</a></span></h4>
+
+<p>A <b class="b">loop</b> <i class="i">macro form</i> expands into a <i class="i">form</i> containing
+one or more binding forms (that <i class="i">establish</i> <i class="i">bindings</i> of loop variables)
+and a <b class="b">block</b> and a <b class="b">tagbody</b> (that express a looping control 
+structure). The variables established in <b class="b">loop</b> are bound as
+if by <b class="b">let</b> or <b class="b">lambda</b>.  
+</p>
+<p>Implementations can interleave the setting of initial values with the <i class="i">bindings</i>.  
+However, the assignment of the initial values is always calculated in the order
+specified by the user.  A variable is thus sometimes bound to a meaningless value 
+of the correct <i class="i">type</i>, and then later in the prologue it is set to the true
+initial value by using <b class="b">setq</b>.
+</p>
+<p>One implication of this interleaving is that it is <i class="i">implementation-dependent</i>
+whether the <i class="i">lexical environment</i> in which the initial value <i class="i">forms</i>
+(variously called the <i class="i">form1</i>, <i class="i">form2</i>, <i class="i">form3</i>, <i class="i">step-fun</i>,
+ <i class="i">vector</i>, <i class="i">hash-table</i>, and <i class="i">package</i>) in any <i class="i">for-as-subclause</i>,
+except <i class="i">for-as-equals-then</i>,
+are <i class="i">evaluated</i> includes only the loop variables preceding that <i class="i">form</i>
+or includes more or all of the loop variables;
+the <i class="i">form1</i> and <i class="i">form2</i> in a <i class="i">for-as-equals-then</i> form
+includes the <i class="i">lexical environment</i> of all the loop variables.
+</p>
+<p>After the <i class="i">form</i> is expanded, it consists of three basic parts in the 
+<b class="b">tagbody</b>: 
+      the loop prologue,
+      the loop body,
+  and the loop epilogue.
+</p>
+<dl class="table">
+<dt><b class="b">Loop prologue</b></dt>
+<dd><p>The loop prologue contains <i class="i">forms</i> 
+that are executed before iteration begins, such as
+any automatic variable initializations prescribed 
+by the <i class="i">variable</i> clauses, along with any <code class="t">initially</code> clauses
+in the order they appear in the source.
+</p>
+</dd>
+<dt><b class="b">Loop body</b></dt>
+<dd><p>The loop body contains those <i class="i">forms</i> that are executed during iteration, 
+including application-specific calculations, termination tests,
+and variable <i class="i">stepping</i>_1.
+</p>
+</dd>
+<dt><b class="b">Loop epilogue</b></dt>
+<dd><p>The loop epilogue contains <i class="i">forms</i> that are executed after iteration 
+terminates, such as <code class="t">finally</code> clauses, if any, along
+with any implicit return value from an <i class="i">accumulation</i> clause or
+an <i class="i">termination-test</i> clause.
+</p>
+</dd>
+</dl>
+
+<p>Some clauses from the source <i class="i">form</i>
+contribute code only to the loop prologue; these clauses must
+  come before other clauses that are in the main body of the <b class="b">loop</b> form.            
+  Others contribute code only to the loop epilogue.
+  All other clauses contribute to the final 
+translated <i class="i">form</i> in the same 
+  order given in the original source <i class="i">form</i> of the <b class="b">loop</b>.
+</p>
+<p>Expansion of the <b class="b">loop</b> macro produces an <i class="i">implicit block</i> named <b class="b">nil</b> 
+</p>
+<p>unless <code class="t">named</code> is supplied.
+</p>
+<p>Thus, <b class="b">return-from</b> (and sometimes <b class="b">return</b>)
+can be used to return values from <b class="b">loop</b> or to exit <b class="b">loop</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Summary-of-Loop-Clauses.html">Summary of Loop Clauses</a>, Previous: <a href="Parsing-Loop-Clauses.html">Parsing Loop Clauses</a>, Up: <a href="Overview-of-the-Loop-Facility.html">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Extended-Loop.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Extended Loop (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Extended Loop (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Extended Loop (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-the-Loop-Facility.html" rel="up" title="Overview of the Loop Facility">
+<link href="Loop-Keywords.html" rel="next" title="Loop Keywords">
+<link href="Simple-Loop.html" rel="prev" title="Simple Loop">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Extended-Loop">
+<div class="nav-panel">
+<p>
+Next: <a href="Loop-Keywords.html" accesskey="n" rel="next">Loop Keywords</a>, Previous: <a href="Simple-Loop.html" accesskey="p" rel="prev">Simple Loop</a>, Up: <a href="Overview-of-the-Loop-Facility.html" accesskey="u" rel="up">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Extended-Loop-1"><span>6.1.1.3 Extended Loop<a class="copiable-link" href="#Extended-Loop-1"> &para;</a></span></h4>
+
+<p>An extended <b class="b">loop</b> <i class="i">form</i> is one that has a body containing
+<i class="i">atomic</i> <i class="i">expressions</i>.  When the <b class="b">loop</b> <i class="i">macro</i> processes such a
+<i class="i">form</i>, it invokes a facility that is commonly called &ldquo;the Loop Facility.&rdquo;
+</p>
+<p>The Loop Facility provides standardized access to mechanisms commonly used 
+in iterations through Loop schemas, which are introduced by <i class="i">loop keywords</i>.
+</p>
+<p>The body of an extended <b class="b">loop</b> <i class="i">form</i> is divided into <b class="b">loop</b> clauses,
+each which is in turn made up of <i class="i">loop keywords</i> and <i class="i">forms</i>. 
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Extensions-to-Similarity-Rules.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Extensions to Similarity Rules (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Extensions to Similarity Rules (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Extensions to Similarity Rules (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Literal-Objects-in-Compiled-Files.html" rel="up" title="Literal Objects in Compiled Files">
+<link href="Additional-Constraints-on-Externalizable-Objects.html" rel="next" title="Additional Constraints on Externalizable Objects">
+<link href="Definition-of-Similarity.html" rel="prev" title="Definition of Similarity">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Extensions-to-Similarity-Rules">
+<div class="nav-panel">
+<p>
+Next: <a href="Additional-Constraints-on-Externalizable-Objects.html" accesskey="n" rel="next">Additional Constraints on Externalizable Objects</a>, Previous: <a href="Definition-of-Similarity.html" accesskey="p" rel="prev">Definition of Similarity</a>, Up: <a href="Literal-Objects-in-Compiled-Files.html" accesskey="u" rel="up">Literal Objects in Compiled Files</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Extensions-to-Similarity-Rules-1"><span>3.2.4.5 Extensions to Similarity Rules<a class="copiable-link" href="#Extensions-to-Similarity-Rules-1"> &para;</a></span></h4>
+
+<p>Some <i class="i">objects</i>, such as <i class="i">streams</i>, <b class="b">readtables</b>, and <b class="b">methods</b>
+are not <i class="i">externalizable objects</i> under the definition of similarity given above.
+That is, such <i class="i">objects</i> may not portably appear as <i class="i">literal</i> <i class="i">objects</i> 
+in <i class="i">code</i> to be processed by the <i class="i">file compiler</i>. 
+</p>
+<p>An <i class="i">implementation</i> is permitted to extend the rules of similarity, 
+so that other kinds of <i class="i">objects</i> are <i class="i">externalizable objects</i>
+for that <i class="i">implementation</i>.
+</p>
+<p>If for some kind of <i class="i">object</i>, <i class="i">similarity</i> is
+neither defined by this specification 
+	    nor by the <i class="i">implementation</i>, 
+then the <i class="i">file compiler</i> must signal an error upon encountering such 
+an <i class="i">object</i> as a <i class="i">literal constant</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Extent.html
@@ -0,0 +1,113 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Extent (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Extent (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Extent (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation.html" rel="up" title="Evaluation">
+<link href="Return-Values.html" rel="next" title="Return Values">
+<link href="Shadowing.html" rel="prev" title="Shadowing">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Extent">
+<div class="nav-panel">
+<p>
+Next: <a href="Return-Values.html" accesskey="n" rel="next">Return Values</a>, Previous: <a href="Shadowing.html" accesskey="p" rel="prev">Shadowing</a>, Up: <a href="Evaluation.html" accesskey="u" rel="up">Evaluation</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Extent-1"><span>3.1.6 Extent<a class="copiable-link" href="#Extent-1"> &para;</a></span></h4>
+
+<p><code class="t">Contorted-example</code> works only because the
+<i class="i">function</i> named by <code class="t">f</code> is invoked during the <i class="i">extent</i> of the 
+<i class="i">exit point</i>.
+Once the flow of execution has left the block,
+the <i class="i">exit point</i> is <i class="i">disestablished</i>.  For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun invalid-example ()
+   (let ((y (block here #'(lambda (z) (return-from here z)))))
+     (if (numberp y) y (funcall y 5))))
+</pre></div>
+
+<p>One might expect the call <code class="t">(invalid-example)</code> to produce <code class="t">5</code>
+by the following incorrect reasoning:
+<b class="b">let</b> binds <code class="t">y</code> to the
+value of <b class="b">block</b>; this value is a <i class="i">function</i> resulting
+from the <i class="i">lambda expression</i>.  Because <code class="t">y</code> is not a number, it is
+invoked on the value <code class="t">5</code>.  The <b class="b">return-from</b> should then
+return this value from the                      
+<i class="i">exit point</i> named <code class="t">here</code>, thereby
+exiting from the block again and giving <code class="t">y</code> the value <code class="t">5</code>
+which, being a number, is then returned as the value of the call
+to <code class="t">invalid-example</code>.
+</p>
+<p>The argument fails only because <i class="i">exit points</i> have 
+<i class="i">dynamic extent</i>.  The argument is correct up to the execution of
+<b class="b">return-from</b>.  The execution of <b class="b">return-from</b>
+should signal an error of <i class="i">type</i> <b class="b">control-error</b>, however, not
+because it cannot refer to the <i class="i">exit point</i>, but because it
+does correctly refer to an <i class="i">exit point</i> and that 
+<i class="i">exit point</i> has been <i class="i">disestablished</i>.
+</p>
+<p>A reference by name to a dynamic <i class="i">exit point</i> binding such as
+a <i class="i">catch tag</i> refers to the most recently 
+<i class="i">established</i> <i class="i">binding</i> of that name that has not been 
+<i class="i">disestablished</i>.  For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun fun1 (x)
+   (catch 'trap (+ 3 (fun2 x))))
+ (defun fun2 (y)
+   (catch 'trap (* 5 (fun3 y))))
+ (defun fun3 (z)
+   (throw 'trap z))
+</pre></div>
+
+<p>Consider the call <code class="t">(fun1 7)</code>.  The result is <code class="t">10</code>.  At the time
+the <b class="b">throw</b> is executed, there are two outstanding catchers with the
+name <code class="t">trap</code>: one established within procedure <code class="t">fun1</code>, and the other
+within procedure <code class="t">fun2</code>.  The latter is the more recent, and so the
+value <code class="t">7</code> is returned from <b class="b">catch</b> in <code class="t">fun2</code>.
+Viewed from within <code class="t">fun3</code>, the <b class="b">catch</b> 
+in <code class="t">fun2</code> shadows the one in <code class="t">fun1</code>.
+Had <code class="t">fun2</code> been defined as
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun fun2 (y)
+   (catch 'snare (* 5 (fun3 y))))
+</pre></div>
+
+<p>then the two <i class="i">exit points</i> 
+would have different <i class="i">names</i>, and therefore the one
+in <code class="t">fun1</code> would not be shadowed.  The result would then have been <code class="t">7</code>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Return-Values.html">Return Values</a>, Previous: <a href="Shadowing.html">Shadowing</a>, Up: <a href="Evaluation.html">Evaluation</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Externalizable-Objects.html
@@ -0,0 +1,84 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Externalizable Objects (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Externalizable Objects (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Externalizable Objects (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Literal-Objects-in-Compiled-Files.html" rel="up" title="Literal Objects in Compiled Files">
+<link href="Similarity-of-Literal-Objects.html" rel="next" title="Similarity of Literal Objects">
+<link href="Literal-Objects-in-Compiled-Files.html" rel="prev" title="Literal Objects in Compiled Files">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Externalizable-Objects">
+<div class="nav-panel">
+<p>
+Next: <a href="Similarity-of-Literal-Objects.html" accesskey="n" rel="next">Similarity of Literal Objects</a>, Previous: <a href="Literal-Objects-in-Compiled-Files.html" accesskey="p" rel="prev">Literal Objects in Compiled Files</a>, Up: <a href="Literal-Objects-in-Compiled-Files.html" accesskey="u" rel="up">Literal Objects in Compiled Files</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Externalizable-Objects-1"><span>3.2.4.1 Externalizable Objects<a class="copiable-link" href="#Externalizable-Objects-1"> &para;</a></span></h4>
+
+<p>The fact that the <i class="i">file compiler</i> represents <i class="i">literal</i> <i class="i">objects</i> 
+externally in a <i class="i">compiled file</i> and must later reconstruct suitable 
+equivalents of those <i class="i">objects</i> when that <i class="i">file</i> is loaded
+imposes a need for constraints on the nature of the <i class="i">objects</i> that can be 
+used as <i class="i">literal</i> <i class="i">objects</i> in <i class="i">code</i> to be processed 
+by the <i class="i">file compiler</i>.
+</p>
+<p>An <i class="i">object</i> that can be used as a <i class="i">literal</i> <i class="i">object</i> 
+in <i class="i">code</i> to be processed by the <i class="i">file compiler</i> is called an
+<i class="i">externalizable object</i>
+<a class="index-entry-id" id="index-externalizable-object"></a>
+.
+</p>
+<p>We define that two <i class="i">objects</i> are <i class="i">similar</i>
+<a class="index-entry-id" id="index-similar"></a>
+ if they satisfy
+a two-place conceptual equivalence predicate (defined below), which is
+independent of the <i class="i">Lisp image</i> so that the two <i class="i">objects</i> in
+different <i class="i">Lisp images</i> can be understood to be equivalent under
+this predicate.  Further, by inspecting the definition of this conceptual
+predicate, the programmer can anticipate what aspects of an <i class="i">object</i>
+are reliably preserved by <i class="i">file compilation</i>.
+</p>
+<p>The <i class="i">file compiler</i> must cooperate with the <i class="i">loader</i> in order to
+assure that in each case where an <i class="i">externalizable object</i> is processed
+as a <i class="i">literal object</i>, the <i class="i">loader</i> will construct a <i class="i">similar</i>
+<i class="i">object</i>.
+</p>
+<p>The set of <i class="i">objects</i> that are <i class="i">externalizable objects</i>
+<a class="index-entry-id" id="index-externalizable-object-1"></a>
+ are those
+for which the new conceptual term &ldquo;<i class="i">similar</i>&rdquo; is defined, such that
+when a <i class="i">compiled file</i> is <i class="i">loaded</i>, an <i class="i">object</i> can be constructed
+which can be shown to be <i class="i">similar</i> to the original <i class="i">object</i> which
+existed at the time the <i class="i">file compiler</i> was operating.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Similarity-of-Literal-Objects.html">Similarity of Literal Objects</a>, Previous: <a href="Literal-Objects-in-Compiled-Files.html">Literal Objects in Compiled Files</a>, Up: <a href="Literal-Objects-in-Compiled-Files.html">Literal Objects in Compiled Files</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/FORMAT-Basic-Output.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>FORMAT Basic Output (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="FORMAT Basic Output (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="FORMAT Basic Output (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Formatted-Output.html" rel="up" title="Formatted Output">
+<link href="FORMAT-Radix-Control.html" rel="next" title="FORMAT Radix Control">
+<link href="Formatted-Output.html" rel="prev" title="Formatted Output">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="FORMAT-Basic-Output">
+<div class="nav-panel">
+<p>
+Next: <a href="FORMAT-Radix-Control.html" accesskey="n" rel="next">FORMAT Radix Control</a>, Previous: <a href="Formatted-Output.html" accesskey="p" rel="prev">Formatted Output</a>, Up: <a href="Formatted-Output.html" accesskey="u" rel="up">Formatted Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="FORMAT-Basic-Output-1"><span>22.3.1 FORMAT Basic Output<a class="copiable-link" href="#FORMAT-Basic-Output-1"> &para;</a></span></h4>
+
+
+<ul class="mini-toc">
+<li><a href="Tilde-C_002d_003e-Character.html" accesskey="1">Tilde C: Character</a></li>
+<li><a href="Tilde-Percent_002d_003e-Newline.html" accesskey="2">Tilde Percent: Newline</a></li>
+<li><a href="Tilde-Ampersand_002d_003e-Fresh_002dLine.html" accesskey="3">Tilde Ampersand: Fresh-Line</a></li>
+<li><a href="Tilde-Vertical_002dBar_002d_003e-Page.html" accesskey="4">Tilde Vertical-Bar: Page</a></li>
+<li><a href="Tilde-Tilde_002d_003e-Tilde.html" accesskey="5">Tilde Tilde: Tilde</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/FORMAT-Control_002dFlow-Operations.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>FORMAT Control-Flow Operations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="FORMAT Control-Flow Operations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="FORMAT Control-Flow Operations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Formatted-Output.html" rel="up" title="Formatted Output">
+<link href="FORMAT-Miscellaneous-Operations.html" rel="next" title="FORMAT Miscellaneous Operations">
+<link href="FORMAT-Layout-Control.html" rel="prev" title="FORMAT Layout Control">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="FORMAT-Control_002dFlow-Operations">
+<div class="nav-panel">
+<p>
+Next: <a href="FORMAT-Miscellaneous-Operations.html" accesskey="n" rel="next">FORMAT Miscellaneous Operations</a>, Previous: <a href="FORMAT-Layout-Control.html" accesskey="p" rel="prev">FORMAT Layout Control</a>, Up: <a href="Formatted-Output.html" accesskey="u" rel="up">Formatted Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="FORMAT-Control_002dFlow-Operations-1"><span>22.3.7 FORMAT Control-Flow Operations<a class="copiable-link" href="#FORMAT-Control_002dFlow-Operations-1"> &para;</a></span></h4>
+
+
+<ul class="mini-toc">
+<li><a href="Tilde-Asterisk_002d_003e-Go_002dTo.html" accesskey="1">Tilde Asterisk: Go-To</a></li>
+<li><a href="Tilde-Left_002dBracket_002d_003e-Conditional-Expression.html" accesskey="2">Tilde Left-Bracket: Conditional Expression</a></li>
+<li><a href="Tilde-Right_002dBracket_002d_003e-End-of-Conditional-Expression.html" accesskey="3">Tilde Right-Bracket: End of Conditional Expression</a></li>
+<li><a href="Tilde-Left_002dBrace_002d_003e-Iteration.html" accesskey="4">Tilde Left-Brace: Iteration</a></li>
+<li><a href="Tilde-Right_002dBrace_002d_003e-End-of-Iteration.html" accesskey="5">Tilde Right-Brace: End of Iteration</a></li>
+<li><a href="Tilde-Question_002dMark_002d_003e-Recursive-Processing.html" accesskey="6">Tilde Question-Mark: Recursive Processing</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/FORMAT-Floating_002dPoint-Printers.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>FORMAT Floating-Point Printers (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="FORMAT Floating-Point Printers (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="FORMAT Floating-Point Printers (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Formatted-Output.html" rel="up" title="Formatted Output">
+<link href="FORMAT-Printer-Operations.html" rel="next" title="FORMAT Printer Operations">
+<link href="FORMAT-Radix-Control.html" rel="prev" title="FORMAT Radix Control">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="FORMAT-Floating_002dPoint-Printers">
+<div class="nav-panel">
+<p>
+Next: <a href="FORMAT-Printer-Operations.html" accesskey="n" rel="next">FORMAT Printer Operations</a>, Previous: <a href="FORMAT-Radix-Control.html" accesskey="p" rel="prev">FORMAT Radix Control</a>, Up: <a href="Formatted-Output.html" accesskey="u" rel="up">Formatted Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="FORMAT-Floating_002dPoint-Printers-1"><span>22.3.3 FORMAT Floating-Point Printers<a class="copiable-link" href="#FORMAT-Floating_002dPoint-Printers-1"> &para;</a></span></h4>
+
+
+<ul class="mini-toc">
+<li><a href="Tilde-F_002d_003e-Fixed_002dFormat-Floating_002dPoint.html" accesskey="1">Tilde F: Fixed-Format Floating-Point</a></li>
+<li><a href="Tilde-E_002d_003e-Exponential-Floating_002dPoint.html" accesskey="2">Tilde E: Exponential Floating-Point</a></li>
+<li><a href="Tilde-G_002d_003e-General-Floating_002dPoint.html" accesskey="3">Tilde G: General Floating-Point</a></li>
+<li><a href="Tilde-Dollarsign_002d_003e-Monetary-Floating_002dPoint.html" accesskey="4">Tilde Dollarsign: Monetary Floating-Point</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/FORMAT-Layout-Control.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>FORMAT Layout Control (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="FORMAT Layout Control (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="FORMAT Layout Control (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Formatted-Output.html" rel="up" title="Formatted Output">
+<link href="FORMAT-Control_002dFlow-Operations.html" rel="next" title="FORMAT Control-Flow Operations">
+<link href="FORMAT-Pretty-Printer-Operations.html" rel="prev" title="FORMAT Pretty Printer Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="FORMAT-Layout-Control">
+<div class="nav-panel">
+<p>
+Next: <a href="FORMAT-Control_002dFlow-Operations.html" accesskey="n" rel="next">FORMAT Control-Flow Operations</a>, Previous: <a href="FORMAT-Pretty-Printer-Operations.html" accesskey="p" rel="prev">FORMAT Pretty Printer Operations</a>, Up: <a href="Formatted-Output.html" accesskey="u" rel="up">Formatted Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="FORMAT-Layout-Control-1"><span>22.3.6 FORMAT Layout Control<a class="copiable-link" href="#FORMAT-Layout-Control-1"> &para;</a></span></h4>
+
+
+<ul class="mini-toc">
+<li><a href="Tilde-T_002d_003e-Tabulate.html" accesskey="1">Tilde T: Tabulate</a></li>
+<li><a href="Tilde-Less_002dThan_002dSign_002d_003e-Justification.html" accesskey="2">Tilde Less-Than-Sign: Justification</a></li>
+<li><a href="Tilde-Greater_002dThan_002dSign_002d_003e-End-of-Justification.html" accesskey="3">Tilde Greater-Than-Sign: End of Justification</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/FORMAT-Miscellaneous-Operations.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>FORMAT Miscellaneous Operations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="FORMAT Miscellaneous Operations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="FORMAT Miscellaneous Operations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Formatted-Output.html" rel="up" title="Formatted Output">
+<link href="FORMAT-Miscellaneous-Pseudo_002dOperations.html" rel="next" title="FORMAT Miscellaneous Pseudo-Operations">
+<link href="FORMAT-Control_002dFlow-Operations.html" rel="prev" title="FORMAT Control-Flow Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="FORMAT-Miscellaneous-Operations">
+<div class="nav-panel">
+<p>
+Next: <a href="FORMAT-Miscellaneous-Pseudo_002dOperations.html" accesskey="n" rel="next">FORMAT Miscellaneous Pseudo-Operations</a>, Previous: <a href="FORMAT-Control_002dFlow-Operations.html" accesskey="p" rel="prev">FORMAT Control-Flow Operations</a>, Up: <a href="Formatted-Output.html" accesskey="u" rel="up">Formatted Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="FORMAT-Miscellaneous-Operations-1"><span>22.3.8 FORMAT Miscellaneous Operations<a class="copiable-link" href="#FORMAT-Miscellaneous-Operations-1"> &para;</a></span></h4>
+
+
+<ul class="mini-toc">
+<li><a href="Tilde-Left_002dParen_002d_003e-Case-Conversion.html" accesskey="1">Tilde Left-Paren: Case Conversion</a></li>
+<li><a href="Tilde-Right_002dParen_002d_003e-End-of-Case-Conversion.html" accesskey="2">Tilde Right-Paren: End of Case Conversion</a></li>
+<li><a href="Tilde-P_002d_003e-Plural.html" accesskey="3">Tilde P: Plural</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/FORMAT-Miscellaneous-Pseudo_002dOperations.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>FORMAT Miscellaneous Pseudo-Operations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="FORMAT Miscellaneous Pseudo-Operations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="FORMAT Miscellaneous Pseudo-Operations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Formatted-Output.html" rel="up" title="Formatted Output">
+<link href="Additional-Information-about-FORMAT-Operations.html" rel="next" title="Additional Information about FORMAT Operations">
+<link href="FORMAT-Miscellaneous-Operations.html" rel="prev" title="FORMAT Miscellaneous Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="FORMAT-Miscellaneous-Pseudo_002dOperations">
+<div class="nav-panel">
+<p>
+Next: <a href="Additional-Information-about-FORMAT-Operations.html" accesskey="n" rel="next">Additional Information about FORMAT Operations</a>, Previous: <a href="FORMAT-Miscellaneous-Operations.html" accesskey="p" rel="prev">FORMAT Miscellaneous Operations</a>, Up: <a href="Formatted-Output.html" accesskey="u" rel="up">Formatted Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="FORMAT-Miscellaneous-Pseudo_002dOperations-1"><span>22.3.9 FORMAT Miscellaneous Pseudo-Operations<a class="copiable-link" href="#FORMAT-Miscellaneous-Pseudo_002dOperations-1"> &para;</a></span></h4>
+
+
+<ul class="mini-toc">
+<li><a href="Tilde-Semicolon_002d_003e-Clause-Separator.html" accesskey="1">Tilde Semicolon: Clause Separator</a></li>
+<li><a href="Tilde-Circumflex_002d_003e-Escape-Upward.html" accesskey="2">Tilde Circumflex: Escape Upward</a></li>
+<li><a href="Tilde-Newline_002d_003e-Ignored-Newline.html" accesskey="3">Tilde Newline: Ignored Newline</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/FORMAT-Pretty-Printer-Operations.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>FORMAT Pretty Printer Operations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="FORMAT Pretty Printer Operations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="FORMAT Pretty Printer Operations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Formatted-Output.html" rel="up" title="Formatted Output">
+<link href="FORMAT-Layout-Control.html" rel="next" title="FORMAT Layout Control">
+<link href="FORMAT-Printer-Operations.html" rel="prev" title="FORMAT Printer Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="FORMAT-Pretty-Printer-Operations">
+<div class="nav-panel">
+<p>
+Next: <a href="FORMAT-Layout-Control.html" accesskey="n" rel="next">FORMAT Layout Control</a>, Previous: <a href="FORMAT-Printer-Operations.html" accesskey="p" rel="prev">FORMAT Printer Operations</a>, Up: <a href="Formatted-Output.html" accesskey="u" rel="up">Formatted Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="FORMAT-Pretty-Printer-Operations-1"><span>22.3.5 FORMAT Pretty Printer Operations<a class="copiable-link" href="#FORMAT-Pretty-Printer-Operations-1"> &para;</a></span></h4>
+
+<p>The following constructs provide access to the <i class="i">pretty printer</i>:
+</p>
+
+<ul class="mini-toc">
+<li><a href="Tilde-Underscore_002d_003e-Conditional-Newline.html" accesskey="1">Tilde Underscore: Conditional Newline</a></li>
+<li><a href="Tilde-Less_002dThan_002dSign_002d_003e-Logical-Block.html" accesskey="2">Tilde Less-Than-Sign: Logical Block</a></li>
+<li><a href="Tilde-I_002d_003e-Indent.html" accesskey="3">Tilde I: Indent</a></li>
+<li><a href="Tilde-Slash_002d_003e-Call-Function.html" accesskey="4">Tilde Slash: Call Function</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/FORMAT-Printer-Operations.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>FORMAT Printer Operations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="FORMAT Printer Operations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="FORMAT Printer Operations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Formatted-Output.html" rel="up" title="Formatted Output">
+<link href="FORMAT-Pretty-Printer-Operations.html" rel="next" title="FORMAT Pretty Printer Operations">
+<link href="FORMAT-Floating_002dPoint-Printers.html" rel="prev" title="FORMAT Floating-Point Printers">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="FORMAT-Printer-Operations">
+<div class="nav-panel">
+<p>
+Next: <a href="FORMAT-Pretty-Printer-Operations.html" accesskey="n" rel="next">FORMAT Pretty Printer Operations</a>, Previous: <a href="FORMAT-Floating_002dPoint-Printers.html" accesskey="p" rel="prev">FORMAT Floating-Point Printers</a>, Up: <a href="Formatted-Output.html" accesskey="u" rel="up">Formatted Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="FORMAT-Printer-Operations-1"><span>22.3.4 FORMAT Printer Operations<a class="copiable-link" href="#FORMAT-Printer-Operations-1"> &para;</a></span></h4>
+
+
+<ul class="mini-toc">
+<li><a href="Tilde-A_002d_003e-Aesthetic.html" accesskey="1">Tilde A: Aesthetic</a></li>
+<li><a href="Tilde-S_002d_003e-Standard.html" accesskey="2">Tilde S: Standard</a></li>
+<li><a href="Tilde-W_002d_003e-Write.html" accesskey="3">Tilde W: Write</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/FORMAT-Radix-Control.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>FORMAT Radix Control (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="FORMAT Radix Control (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="FORMAT Radix Control (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Formatted-Output.html" rel="up" title="Formatted Output">
+<link href="FORMAT-Floating_002dPoint-Printers.html" rel="next" title="FORMAT Floating-Point Printers">
+<link href="FORMAT-Basic-Output.html" rel="prev" title="FORMAT Basic Output">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="FORMAT-Radix-Control">
+<div class="nav-panel">
+<p>
+Next: <a href="FORMAT-Floating_002dPoint-Printers.html" accesskey="n" rel="next">FORMAT Floating-Point Printers</a>, Previous: <a href="FORMAT-Basic-Output.html" accesskey="p" rel="prev">FORMAT Basic Output</a>, Up: <a href="Formatted-Output.html" accesskey="u" rel="up">Formatted Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="FORMAT-Radix-Control-1"><span>22.3.2 FORMAT Radix Control<a class="copiable-link" href="#FORMAT-Radix-Control-1"> &para;</a></span></h4>
+
+
+<ul class="mini-toc">
+<li><a href="Tilde-R_002d_003e-Radix.html" accesskey="1">Tilde R: Radix</a></li>
+<li><a href="Tilde-D_002d_003e-Decimal.html" accesskey="2">Tilde D: Decimal</a></li>
+<li><a href="Tilde-B_002d_003e-Binary.html" accesskey="3">Tilde B: Binary</a></li>
+<li><a href="Tilde-O_002d_003e-Octal.html" accesskey="4">Tilde O: Octal</a></li>
+<li><a href="Tilde-X_002d_003e-Hexadecimal.html" accesskey="5">Tilde X: Hexadecimal</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Feature-Expressions.html
@@ -0,0 +1,78 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Feature Expressions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Feature Expressions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Feature Expressions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Features.html" rel="up" title="Features">
+<link href="Examples-of-Feature-Expressions.html" rel="next" title="Examples of Feature Expressions">
+<link href="Features.html" rel="prev" title="Features">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Feature-Expressions">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Feature-Expressions.html" accesskey="n" rel="next">Examples of Feature Expressions</a>, Previous: <a href="Features.html" accesskey="p" rel="prev">Features</a>, Up: <a href="Features.html" accesskey="u" rel="up">Features</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Feature-Expressions-1"><span>24.1.2.1 Feature Expressions<a class="copiable-link" href="#Feature-Expressions-1"> &para;</a></span></h4>
+
+<p>Boolean combinations of <i class="i">features</i>, called <i class="i">feature expressions</i>
+<a class="index-entry-id" id="index-feature-expression"></a>
+,
+are used by the <code class="t">#+</code> and <code class="t">#-</code> <i class="i">reader macros</i> in order to
+direct conditional <i class="i">reading</i> of <i class="i">expressions</i> by the <i class="i">Lisp reader</i>.
+</p>
+<p>The rules for interpreting a <i class="i">feature expression</i> are as follows:
+</p>
+<dl class="table">
+<dt><i class="i">feature</i></dt>
+<dd><p>If a <i class="i">symbol</i> naming a <i class="i">feature</i> is used as a <i class="i">feature expression</i>,
+the <i class="i">feature expression</i> succeeds if that <i class="i">feature</i> is <i class="i">present</i>;
+otherwise it fails.
+</p>
+</dd>
+<dt><code class="t">(not <i class="i">feature-conditional</i>)</code></dt>
+<dd><p>A <b class="b">not</b> <i class="i">feature expression</i> succeeds 
+if its argument <i class="i">feature-conditional</i> fails;
+otherwise, it succeeds.
+</p>
+</dd>
+<dt><code class="t">(and {<i class="i">feature-conditional</i>}*)</code></dt>
+<dd><p>An <b class="b">and</b> <i class="i">feature expression</i> succeeds 
+if all of its argument <i class="i">feature-conditionals</i> succeed;
+otherwise, it fails.
+</p>
+</dd>
+<dt><code class="t">(or {<i class="i">feature-conditional</i>}*)</code></dt>
+<dd><p>An <b class="b">or</b> <i class="i">feature expression</i> succeeds 
+if any of its argument <i class="i">feature-conditionals</i> succeed;
+otherwise, it fails.
+</p>
+</dd>
+</dl>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Features.html
@@ -0,0 +1,65 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Features (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Features (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Features (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="System-Construction-Concepts.html" rel="up" title="System Construction Concepts">
+<link href="Loading.html" rel="prev" title="Loading">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Features">
+<div class="nav-panel">
+<p>
+Previous: <a href="Loading.html" accesskey="p" rel="prev">Loading</a>, Up: <a href="System-Construction-Concepts.html" accesskey="u" rel="up">System Construction Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Features-1"><span>24.1.2 Features<a class="copiable-link" href="#Features-1"> &para;</a></span></h4>
+
+<p>A <i class="i">feature</i>
+<a class="index-entry-id" id="index-feature"></a>
+ is an aspect or attribute
+     of <span class="r">Common Lisp</span>, 
+     of the <i class="i">implementation</i>,
+  or of the <i class="i">environment</i>.
+A <i class="i">feature</i> is identified by a <i class="i">symbol</i>.
+</p>
+<p>A <i class="i">feature</i> is said to be <i class="i">present</i>
+<a class="index-entry-id" id="index-present-1"></a>
+ in a <i class="i">Lisp image</i>
+if and only if the <i class="i">symbol</i> naming it is an <i class="i">element</i> of the
+<i class="i">list</i> held by the <i class="i">variable</i> <b class="b">*features*</b>, 
+which is called the <i class="i">features list</i>
+<a class="index-entry-id" id="index-features-list"></a>
+.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Feature-Expressions.html" accesskey="1">Feature Expressions</a></li>
+<li><a href="Examples-of-Feature-Expressions.html" accesskey="2">Examples of Feature Expressions</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/File-Compilation.html
@@ -0,0 +1,88 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>File Compilation (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="File Compilation (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="File Compilation (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Compilation.html" rel="up" title="Compilation">
+<link href="Literal-Objects-in-Compiled-Files.html" rel="next" title="Literal Objects in Compiled Files">
+<link href="Compilation-Semantics.html" rel="prev" title="Compilation Semantics">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="File-Compilation">
+<div class="nav-panel">
+<p>
+Next: <a href="Literal-Objects-in-Compiled-Files.html" accesskey="n" rel="next">Literal Objects in Compiled Files</a>, Previous: <a href="Compilation-Semantics.html" accesskey="p" rel="prev">Compilation Semantics</a>, Up: <a href="Compilation.html" accesskey="u" rel="up">Compilation</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="File-Compilation-1"><span>3.2.3 File Compilation<a class="copiable-link" href="#File-Compilation-1"> &para;</a></span></h4>
+
+<p>The <i class="i">function</i> <b class="b">compile-file</b> performs compilation of 
+<i class="i">forms</i> in a file following the rules specified in <a class="ref" href="Compilation-Semantics.html">Compilation Semantics</a>,
+and produces an output file that can be loaded by using <b class="b">load</b>.
+</p>
+<p>Normally, the <i class="i">top level forms</i> appearing in a file compiled with
+<b class="b">compile-file</b> are evaluated only when the resulting
+compiled file is loaded, and not when the file is compiled.  However,
+it is typically the case that some forms in the file need to be evaluated
+at compile time so the
+remainder of the file can be read and compiled correctly.
+</p>
+<p>The <b class="b">eval-when</b> <i class="i">special form</i> can be used to control
+whether a <i class="i">top level form</i> is evaluated at compile time, load
+time, or both.  It is possible to specify any of three situations with
+<b class="b">eval-when</b>, denoted by the symbols <code class="t">:compile-toplevel</code>,
+<code class="t">:load-toplevel</code>, and <code class="t">:execute</code>.  For top level 
+<b class="b">eval-when</b> forms, <code class="t">:compile-toplevel</code> specifies that the
+compiler must evaluate the body at compile time, and <code class="t">:load-toplevel</code> specifies that the compiler must arrange to evaluate
+the body at load time. For non-top level <b class="b">eval-when</b> forms,
+<code class="t">:execute</code> specifies that the body must be executed in the run-time
+<i class="i">environment</i>.
+</p>
+<p>The behavior of this <i class="i">form</i> can be more precisely understood in
+terms of a model of how <b class="b">compile-file</b> processes forms in
+a file to be compiled. There are two processing modes, called
+&ldquo;not-compile-time&rdquo; and &ldquo;compile-time-too&rdquo;.
+</p>
+<p>Successive forms are read from the file by <b class="b">compile-file</b>
+and processed in not-compile-time mode; in this mode, 
+<b class="b">compile-file</b> arranges for forms to be evaluated only at load time
+and not at compile time.  When <b class="b">compile-file</b> is in
+compile-time-too mode, forms are evaluated both at compile time and
+load time.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Processing-of-Top-Level-Forms.html" accesskey="1">Processing of Top Level Forms</a></li>
+<li><a href="Processing-of-Defining-Macros.html" accesskey="2">Processing of Defining Macros</a></li>
+<li><a href="Constraints-on-Macros-and-Compiler-Macros.html" accesskey="3">Constraints on Macros and Compiler Macros</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Literal-Objects-in-Compiled-Files.html">Literal Objects in Compiled Files</a>, Previous: <a href="Compilation-Semantics.html">Compilation Semantics</a>, Up: <a href="Compilation.html">Compilation</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/File-Operations-on-Open-and-Closed-Streams.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>File Operations on Open and Closed Streams (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="File Operations on Open and Closed Streams (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="File Operations on Open and Closed Streams (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="File-System-Concepts.html" rel="up" title="File System Concepts">
+<link href="Truenames.html" rel="next" title="Truenames">
+<link href="Coercion-of-Streams-to-Pathnames.html" rel="prev" title="Coercion of Streams to Pathnames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="File-Operations-on-Open-and-Closed-Streams">
+<div class="nav-panel">
+<p>
+Next: <a href="Truenames.html" accesskey="n" rel="next">Truenames</a>, Previous: <a href="Coercion-of-Streams-to-Pathnames.html" accesskey="p" rel="prev">Coercion of Streams to Pathnames</a>, Up: <a href="File-System-Concepts.html" accesskey="u" rel="up">File System Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="File-Operations-on-Open-and-Closed-Streams-1"><span>20.1.2 File Operations on Open and Closed Streams<a class="copiable-link" href="#File-Operations-on-Open-and-Closed-Streams-1"> &para;</a></span></h4>
+
+<p>Many <i class="i">functions</i> that perform <i class="i">file</i> operations accept either
+<i class="i">open</i> or <i class="i">closed</i> <i class="i">streams</i> as <i class="i">arguments</i>;
+see <a class="ref" href="Stream-Arguments-to-Standardized-Functions.html">Stream Arguments to Standardized Functions</a>.
+</p>
+<p>Of these, the <i class="i">functions</i> in Figure 20&ndash;2 treat <i class="i">open</i> and 
+<i class="i">closed</i> <i class="i">streams</i> differently.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  delete-file  file-author      probe-file  <!-- /@w -->
+  directory    file-write-date  truename    <!-- /@w -->
+
+  Figure 20&ndash;2: File Functions that Treat Open and Closed Streams Differently<!-- /@w -->
+
+</pre></div></div>
+
+<p>Since treatment of <i class="i">open</i> <i class="i">streams</i> by the <i class="i">file system</i> 
+may vary considerably between <i class="i">implementations</i>, however, 
+a <i class="i">closed</i> <i class="i">stream</i> might be the most reliable kind of
+<i class="i">argument</i> for some of these functions&mdash;in particular, those in
+Figure 20&ndash;3.  For example, in some <i class="i">file systems</i>, 
+<i class="i">open</i> <i class="i">files</i> are written under temporary names 
+and not renamed until <i class="i">closed</i>
+and/or are held invisible until <i class="i">closed</i>.
+In general, any code that is intended to be portable should
+use such <i class="i">functions</i> carefully.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  directory  probe-file  truename  <!-- /@w -->
+
+  Figure 20&ndash;3: File Functions where Closed Streams Might Work Best<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/File-Streams.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>File Streams (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="File Streams (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="File Streams (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Streams.html" rel="up" title="Introduction to Streams">
+<link href="Other-Subclasses-of-Stream.html" rel="next" title="Other Subclasses of Stream">
+<link href="Abstract-Classifications-of-Streams.html" rel="prev" title="Abstract Classifications of Streams">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="File-Streams">
+<div class="nav-panel">
+<p>
+Next: <a href="Other-Subclasses-of-Stream.html" accesskey="n" rel="next">Other Subclasses of Stream</a>, Previous: <a href="Abstract-Classifications-of-Streams.html" accesskey="p" rel="prev">Abstract Classifications of Streams</a>, Up: <a href="Introduction-to-Streams.html" accesskey="u" rel="up">Introduction to Streams</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="File-Streams-1"><span>21.1.1.6 File Streams<a class="copiable-link" href="#File-Streams-1"> &para;</a></span></h4>
+
+<p>Some <i class="i">streams</i>, called <i class="i">file streams</i>
+<a class="index-entry-id" id="index-file-stream"></a>
+, provide access to <i class="i">files</i>.
+An <i class="i">object</i> of <i class="i">class</i> <b class="b">file-stream</b> is used to represent a <i class="i">file stream</i>.
+</p>
+<p>The basic operation for opening a <i class="i">file</i> is <b class="b">open</b>,
+which typically returns a <i class="i">file stream</i> 
+(see its dictionary entry for details).
+The basic operation for closing a <i class="i">stream</i> is <b class="b">close</b>.
+The macro <b class="b">with-open-file</b> is useful 
+to express the common idiom of opening a <i class="i">file</i> 
+for the duration of a given body of <i class="i">code</i>, 
+and assuring that the resulting <i class="i">stream</i> is closed upon exit from that body.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/File-System-Concepts.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>File System Concepts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="File System Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="File System Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Files.html" rel="up" title="Files">
+<link href="Files-Dictionary.html" rel="next" title="Files Dictionary">
+<link href="Files.html" rel="prev" title="Files">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="File-System-Concepts">
+<div class="nav-panel">
+<p>
+Next: <a href="Files-Dictionary.html" accesskey="n" rel="next">Files Dictionary</a>, Previous: <a href="Files.html" accesskey="p" rel="prev">Files</a>, Up: <a href="Files.html" accesskey="u" rel="up">Files</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="File-System-Concepts-1"><span>20.1 File System Concepts<a class="copiable-link" href="#File-System-Concepts-1"> &para;</a></span></h3>
+
+
+<p>This section describes the <span class="r">Common Lisp</span> interface to file systems.
+The model used by this interface assumes 
+     that <i class="i">files</i>
+<a class="index-entry-id" id="index-file"></a>
+ are named by <i class="i">filenames</i>
+<a class="index-entry-id" id="index-filename"></a>
+,
+     that a <i class="i">filename</i> can be represented by a <i class="i">pathname</i> <i class="i">object</i>, 
+ and that given a <i class="i">pathname</i> a <i class="i">stream</i>
+<a class="index-entry-id" id="index-stream"></a>
+ can be constructed 
+      that connects to a <i class="i">file</i> whose <i class="i">filename</i> it represents.
+</p>
+<p>For information about opening and closing <i class="i">files</i>,
+and manipulating their contents, see <a class="ref" href="Streams.html">Streams</a>.
+</p>
+<p>Figure 20&ndash;1 lists some <i class="i">operators</i> 
+that are applicable to <i class="i">files</i> and directories.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  compile-file  file-length      open            <!-- /@w -->
+  delete-file   file-position    probe-file      <!-- /@w -->
+  directory     file-write-date  rename-file     <!-- /@w -->
+  file-author   load             with-open-file  <!-- /@w -->
+
+    Figure 20&ndash;1: File and Directory Operations  <!-- /@w -->
+
+</pre></div></div>
+
+
+<ul class="mini-toc">
+<li><a href="Coercion-of-Streams-to-Pathnames.html" accesskey="1">Coercion of Streams to Pathnames</a></li>
+<li><a href="File-Operations-on-Open-and-Closed-Streams.html" accesskey="2">File Operations on Open and Closed Streams</a></li>
+<li><a href="Truenames.html" accesskey="3">Truenames</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Filenames-Dictionary.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Filenames Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Filenames Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Filenames Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames.html" rel="up" title="Filenames">
+<link href="Logical-Pathnames.html" rel="prev" title="Logical Pathnames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Filenames-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Logical-Pathnames.html" accesskey="p" rel="prev">Logical Pathnames</a>, Up: <a href="Filenames.html" accesskey="u" rel="up">Filenames</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Filenames-Dictionary-1"><span>19.4 Filenames Dictionary<a class="copiable-link" href="#Filenames-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="pathname-_0028System-Class_0029.html" accesskey="1">pathname                                                     [System Class]</a></li>
+<li><a href="logical_002dpathname-_0028System-Class_0029.html" accesskey="2">logical-pathname                                             [System Class]</a></li>
+<li><a href="pathname.html" accesskey="3">pathname                                                         [Function]</a></li>
+<li><a href="make_002dpathname.html" accesskey="4">make-pathname                                                    [Function]</a></li>
+<li><a href="pathnamep.html" accesskey="5">pathnamep                                                        [Function]</a></li>
+<li><a href="pathname_002dhost.html" accesskey="6">pathname-host, pathname-device, pathname-directory,</a></li>
+<li><a href="load_002dlogical_002dpathname_002dtranslations.html" accesskey="7">load-logical-pathname-translations                               [Function]</a></li>
+<li><a href="logical_002dpathname_002dtranslations.html" accesskey="8">logical-pathname-translations                                    [Accessor]</a></li>
+<li><a href="logical_002dpathname.html" accesskey="9">logical-pathname                                                 [Function]</a></li>
+<li><a href="_002adefault_002dpathname_002ddefaults_002a.html">*default-pathname-defaults*                                      [Variable]</a></li>
+<li><a href="namestring.html">namestring, file-namestring, directory-namestring,</a></li>
+<li><a href="parse_002dnamestring.html">parse-namestring                                                 [Function]</a></li>
+<li><a href="wild_002dpathname_002dp.html">wild-pathname-p                                                  [Function]</a></li>
+<li><a href="pathname_002dmatch_002dp.html">pathname-match-p                                                 [Function]</a></li>
+<li><a href="translate_002dlogical_002dpathname.html">translate-logical-pathname                                       [Function]</a></li>
+<li><a href="translate_002dpathname.html">translate-pathname                                               [Function]</a></li>
+<li><a href="merge_002dpathnames.html">merge-pathnames                                                  [Function]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Filenames.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Filenames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Filenames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Filenames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Files.html" rel="next" title="Files">
+<link href="Hash-Tables.html" rel="prev" title="Hash Tables">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Filenames">
+<div class="nav-panel">
+<p>
+Next: <a href="Files.html" accesskey="n" rel="next">Files</a>, Previous: <a href="Hash-Tables.html" accesskey="p" rel="prev">Hash Tables</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Filenames-1"><span>19 Filenames<a class="copiable-link" href="#Filenames-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Overview-of-Filenames.html" accesskey="1">Overview of Filenames</a></li>
+<li><a href="Pathnames.html" accesskey="2">Pathnames</a></li>
+<li><a href="Logical-Pathnames.html" accesskey="3">Logical Pathnames</a></li>
+<li><a href="Filenames-Dictionary.html" accesskey="4">Filenames Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Files-Dictionary.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Files Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Files Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Files Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Files.html" rel="up" title="Files">
+<link href="File-System-Concepts.html" rel="prev" title="File System Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Files-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="File-System-Concepts.html" accesskey="p" rel="prev">File System Concepts</a>, Up: <a href="Files.html" accesskey="u" rel="up">Files</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Files-Dictionary-1"><span>20.2 Files Dictionary<a class="copiable-link" href="#Files-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="directory.html" accesskey="1">directory                                                        [Function]</a></li>
+<li><a href="probe_002dfile.html" accesskey="2">probe-file                                                       [Function]</a></li>
+<li><a href="ensure_002ddirectories_002dexist.html" accesskey="3">ensure-directories-exist                                         [Function]</a></li>
+<li><a href="truename.html" accesskey="4">truename                                                         [Function]</a></li>
+<li><a href="file_002dauthor.html" accesskey="5">file-author                                                      [Function]</a></li>
+<li><a href="file_002dwrite_002ddate.html" accesskey="6">file-write-date                                                  [Function]</a></li>
+<li><a href="rename_002dfile.html" accesskey="7">rename-file                                                      [Function]</a></li>
+<li><a href="delete_002dfile.html" accesskey="8">delete-file                                                      [Function]</a></li>
+<li><a href="file_002derror.html" accesskey="9">file-error                                                 [Condition Type]</a></li>
+<li><a href="file_002derror_002dpathname.html">file-error-pathname                                              [Function]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Files.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Files (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Files (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Files (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Streams.html" rel="next" title="Streams">
+<link href="Filenames.html" rel="prev" title="Filenames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Files">
+<div class="nav-panel">
+<p>
+Next: <a href="Streams.html" accesskey="n" rel="next">Streams</a>, Previous: <a href="Filenames.html" accesskey="p" rel="prev">Filenames</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Files-1"><span>20 Files<a class="copiable-link" href="#Files-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="File-System-Concepts.html" accesskey="1">File System Concepts</a></li>
+<li><a href="Files-Dictionary.html" accesskey="2">Files Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Fill-Pointers.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Fill Pointers (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Fill Pointers (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Fill Pointers (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Array-Elements.html" rel="up" title="Array Elements">
+<link href="Multidimensional-Arrays.html" rel="next" title="Multidimensional Arrays">
+<link href="Vectors.html" rel="prev" title="Vectors">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Fill-Pointers">
+<div class="nav-panel">
+<p>
+Next: <a href="Multidimensional-Arrays.html" accesskey="n" rel="next">Multidimensional Arrays</a>, Previous: <a href="Vectors.html" accesskey="p" rel="prev">Vectors</a>, Up: <a href="Array-Elements.html" accesskey="u" rel="up">Array Elements</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Fill-Pointers-1"><span>15.1.1.6 Fill Pointers<a class="copiable-link" href="#Fill-Pointers-1"> &para;</a></span></h4>
+
+<p>A <i class="i">fill pointer</i>
+<a class="index-entry-id" id="index-fill-pointer"></a>
+ is a non-negative <i class="i">integer</i> no
+larger than the total number of <i class="i">elements</i> in a <i class="i">vector</i>.
+Not all <i class="i">vectors</i> have <i class="i">fill pointers</i>.
+See the <i class="i">functions</i> <b class="b">make-array</b> and <b class="b">adjust-array</b>.
+</p>
+<p>An <i class="i">element</i> of a <i class="i">vector</i> is said to be <i class="i">active</i>
+<a class="index-entry-id" id="index-active"></a>
+ if it has
+an index that is greater than or equal to zero, 
+but less than the <i class="i">fill pointer</i> (if any).
+For an <i class="i">array</i> that has no <i class="i">fill pointer</i>,
+all <i class="i">elements</i> are considered <i class="i">active</i>.
+</p>
+<p>Only <i class="i">vectors</i> may have <i class="i">fill pointers</i>; 
+multidimensional <i class="i">arrays</i> may not.
+A multidimensional <i class="i">array</i> that is displaced to a <i class="i">vector</i> 
+that has a <i class="i">fill pointer</i> can be created.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Floating_002dpoint-Computations.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Floating-point Computations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Floating-point Computations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Floating-point Computations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Number-Concepts.html" rel="up" title="Number Concepts">
+<link href="Complex-Computations.html" rel="next" title="Complex Computations">
+<link href="Rational-Computations.html" rel="prev" title="Rational Computations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Floating_002dpoint-Computations">
+<div class="nav-panel">
+<p>
+Next: <a href="Complex-Computations.html" accesskey="n" rel="next">Complex Computations</a>, Previous: <a href="Rational-Computations.html" accesskey="p" rel="prev">Rational Computations</a>, Up: <a href="Number-Concepts.html" accesskey="u" rel="up">Number Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Floating_002dpoint-Computations-1"><span>12.1.4 Floating-point Computations<a class="copiable-link" href="#Floating_002dpoint-Computations-1"> &para;</a></span></h4>
+
+<p>The following rules apply to floating point computations.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Rule-of-Float-and-Rational-Contagion.html" accesskey="1">Rule of Float and Rational Contagion</a></li>
+<li><a href="Examples-of-Rule-of-Float-and-Rational-Contagion.html" accesskey="2">Examples of Rule of Float and Rational Contagion</a></li>
+<li><a href="Rule-of-Float-Approximation.html" accesskey="3">Rule of Float Approximation</a></li>
+<li><a href="Rule-of-Float-Underflow-and-Overflow.html" accesskey="4">Rule of Float Underflow and Overflow</a></li>
+<li><a href="Rule-of-Float-Precision-Contagion.html" accesskey="5">Rule of Float Precision Contagion</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Font-Key.html
@@ -0,0 +1,104 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Font Key (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Font Key (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Font Key (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Notational-Conventions.html" rel="up" title="Notational Conventions">
+<link href="Modified-BNF-Syntax.html" rel="next" title="Modified BNF Syntax">
+<link href="Notational-Conventions.html" rel="prev" title="Notational Conventions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Font-Key">
+<div class="nav-panel">
+<p>
+Next: <a href="Modified-BNF-Syntax.html" accesskey="n" rel="next">Modified BNF Syntax</a>, Previous: <a href="Notational-Conventions.html" accesskey="p" rel="prev">Notational Conventions</a>, Up: <a href="Notational-Conventions.html" accesskey="u" rel="up">Notational Conventions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Font-Key-1"><span>1.4.1.1 Font Key<a class="copiable-link" href="#Font-Key-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-font-key"></a>
+
+<p>Fonts are used in this document to convey information.
+</p>
+<dl class="table">
+<dt><i class="i">name</i></dt>
+<dd><p>Denotes a formal term whose meaning is defined in the Glossary.
+When this font is used, the Glossary definition takes precedence 
+over normal English usage.
+</p>
+<p>Sometimes a glossary term appears subscripted, 
+as in &ldquo;<i class="i">whitespace</i>_2.&rdquo;  
+Such a notation selects one particular Glossary definition out of several,
+in this case the second.
+The subscript notation for Glossary terms is generally used where the
+context might be insufficient to disambiguate among the available definitions.
+</p>
+</dd>
+<dt><a id="index-name"></a><span><i class="i">name</i><a class="copiable-link" href="#index-name"> &para;</a></span></dt>
+<dd>
+<p>Denotes the introduction of a formal term locally to the current text.
+There is still a corresponding glossary entry, and is formally equivalent
+to a use of &ldquo;<i class="i">name</i>,&rdquo; but the hope is that making such uses 
+conspicuous will save the reader a trip to the glossary in some cases.
+</p>
+</dd>
+<dt><b class="b">name</b></dt>
+<dd><p>Denotes a symbol in the <code class="t">COMMON-LISP</code> <i class="i">package</i>.
+For information about <i class="i">case</i> conventions,
+see <a class="ref" href="Case-in-Symbols.html">Case in Symbols</a>.
+</p>
+</dd>
+<dt><code class="t">name</code></dt>
+<dd><p>Denotes a sample <i class="i">name</i> or piece of <i class="i">code</i> that a programmer
+might write in <span class="r">Common Lisp</span>.
+</p>
+<p>This font is also used for certain <i class="i">standardized</i> names that are not
+names of <i class="i">external symbols</i> of the <code class="t">COMMON-LISP</code> <i class="i">package</i>, 
+such as <i class="i">keywords</i>_1,
+        <i class="i">package</i> <i class="i">names</i>,
+    and <i class="i">loop keywords</i>.
+</p>
+</dd>
+<dt><i class="i">name</i></dt>
+<dd><p>Denotes the name of a <i class="i">parameter</i> or <i class="i">value</i>.
+</p>
+<p>In some situations the notation &ldquo;&lt;&lt;<i class="i">name</i>&gt;&gt;&rdquo; (<i class="i">i.e.</i>, the same font,
+but with surrounding &ldquo;angle brackets&rdquo;) is used instead in order to
+provide better visual separation from surrounding characters.  These
+&ldquo;angle brackets&rdquo; are metasyntactic, and never actually appear in program
+input or output.
+</p>
+</dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Modified-BNF-Syntax.html">Modified BNF Syntax</a>, Previous: <a href="Notational-Conventions.html">Notational Conventions</a>, Up: <a href="Notational-Conventions.html">Notational Conventions</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Form-Evaluation.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Form Evaluation (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Form Evaluation (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Form Evaluation (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Evaluation-Model.html" rel="up" title="The Evaluation Model">
+<link href="Symbols-as-Forms.html" rel="next" title="Symbols as Forms">
+<link href="The-Evaluation-Model.html" rel="prev" title="The Evaluation Model">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Form-Evaluation">
+<div class="nav-panel">
+<p>
+Next: <a href="Symbols-as-Forms.html" accesskey="n" rel="next">Symbols as Forms</a>, Previous: <a href="The-Evaluation-Model.html" accesskey="p" rel="prev">The Evaluation Model</a>, Up: <a href="The-Evaluation-Model.html" accesskey="u" rel="up">The Evaluation Model</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Form-Evaluation-1"><span>3.1.2.1 Form Evaluation<a class="copiable-link" href="#Form-Evaluation-1"> &para;</a></span></h4>
+
+<p><i class="i">Forms</i> fall into three categories:
+<i class="i">symbols</i>, <i class="i">conses</i>, and <i class="i">self-evaluating objects</i>.
+The following sections explain these categories.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Format-Directive-Interface.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Format Directive Interface (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Format Directive Interface (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Format Directive Interface (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Pretty-Printer-Concepts.html" rel="up" title="Pretty Printer Concepts">
+<link href="Compiling-Format-Strings.html" rel="next" title="Compiling Format Strings">
+<link href="Dynamic-Control-of-the-Arrangement-of-Output.html" rel="prev" title="Dynamic Control of the Arrangement of Output">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Format-Directive-Interface">
+<div class="nav-panel">
+<p>
+Next: <a href="Compiling-Format-Strings.html" accesskey="n" rel="next">Compiling Format Strings</a>, Previous: <a href="Dynamic-Control-of-the-Arrangement-of-Output.html" accesskey="p" rel="prev">Dynamic Control of the Arrangement of Output</a>, Up: <a href="Pretty-Printer-Concepts.html" accesskey="u" rel="up">Pretty Printer Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Format-Directive-Interface-1"><span>22.2.1.2 Format Directive Interface<a class="copiable-link" href="#Format-Directive-Interface-1"> &para;</a></span></h4>
+
+<p>The primary interface to operations for dynamically determining the
+arrangement of output is provided through the functions and macros of the
+pretty printer.  Figure 22&ndash;3 shows the defined names related to <i class="i">pretty printing</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  *print-lines*            pprint-dispatch                pprint-pop           <!-- /@w -->
+  *print-miser-width*      pprint-exit-if-list-exhausted  pprint-tab           <!-- /@w -->
+  *print-pprint-dispatch*  pprint-fill                    pprint-tabular       <!-- /@w -->
+  *print-right-margin*     pprint-indent                  set-pprint-dispatch  <!-- /@w -->
+  copy-pprint-dispatch     pprint-linear                  write                <!-- /@w -->
+  format                   pprint-logical-block                                <!-- /@w -->
+  formatter                pprint-newline                                      <!-- /@w -->
+
+             Figure 22&ndash;3: Defined names related to pretty printing.           <!-- /@w -->
+
+</pre></div></div>
+
+<p>Figure 22&ndash;4 identifies a set of <i class="i">format directives</i> which serve
+as an alternate interface to the same pretty printing operations in a 
+more textually compact form.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">~I</code>   <code class="t">~W</code>      <code class="t">~&lt;...~:&gt;</code>  <!-- /@w -->
+  <code class="t">~:T</code>  <code class="t">~/.../</code>  <code class="t">~_</code>        <!-- /@w -->
+
+  Figure 22&ndash;4: Format directives related to Pretty Printing<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Formatted-Output.html
@@ -0,0 +1,168 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Formatted Output (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Formatted Output (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Formatted Output (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer.html" rel="up" title="Printer">
+<link href="Printer-Dictionary.html" rel="next" title="Printer Dictionary">
+<link href="The-Lisp-Pretty-Printer.html" rel="prev" title="The Lisp Pretty Printer">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Formatted-Output">
+<div class="nav-panel">
+<p>
+Next: <a href="Printer-Dictionary.html" accesskey="n" rel="next">Printer Dictionary</a>, Previous: <a href="The-Lisp-Pretty-Printer.html" accesskey="p" rel="prev">The Lisp Pretty Printer</a>, Up: <a href="Printer.html" accesskey="u" rel="up">Printer</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Formatted-Output-1"><span>22.3 Formatted Output<a class="copiable-link" href="#Formatted-Output-1"> &para;</a></span></h3>
+
+
+<p>[Editorial Note by KMP: This is transplanted from FORMAT and will need a bit of work before
+ it looks good standing alone. Bear with me.]
+</p>
+<p><b class="b">format</b> is useful for producing nicely formatted text, producing
+good-looking messages, and so on.  <b class="b">format</b> can generate and return
+a <i class="i">string</i> or output to <i class="i">destination</i>.
+</p>
+<p>The <i class="i">control-string</i> argument to <b class="b">format</b> is actually a <i class="i">format control</i>.
+That is, it can be either a <i class="i">format string</i> or a <i class="i">function</i>,
+for example a <i class="i">function</i> returned
+by the <b class="b">formatter</b> <i class="i">macro</i>.
+</p>
+<p>If it is a <i class="i">function</i>, the <i class="i">function</i> is called with the appropriate
+output stream as its first argument and the data arguments to <b class="b">format</b>
+as its remaining arguments.  The function should perform whatever output is 
+necessary and return the unused tail of the arguments (if any).
+</p>
+<p>The compilation process performed by <b class="b">formatter</b> produces a <i class="i">function</i>
+that would do with its <i class="i">arguments</i> as the <b class="b">format</b> interpreter
+would do with those <i class="i">arguments</i>.
+</p>
+<p>The remainder of this section describes what happens if the <i class="i">control-string</i>
+is a <i class="i">format string</i>.  
+</p>
+<p><i class="i">Control-string</i> is composed of simple text (<i class="i">characters</i>) 
+and embedded directives.
+</p>
+<p><b class="b">format</b> writes the simple text as is;
+each embedded directive specifies further text output 
+that is to appear at the corresponding point within the simple text.  
+Most directives use one or more elements of <i class="i">args</i> to
+create their output.
+</p>
+<p>A directive consists of a <i class="i">tilde</i>,
+optional prefix parameters
+separated by commas, optional <i class="i">colon</i> and <i class="i">at-sign</i> modifiers,
+and a single character indicating what kind of directive this is.
+</p>
+<p>There is no required ordering between the <i class="i">at-sign</i> and <i class="i">colon</i> modifier.
+</p>
+<p>The <i class="i">case</i> of the directive character is ignored.
+Prefix parameters are notated as signed (sign is optional) decimal numbers,
+or as a <i class="i">single-quote</i> followed by a character.
+For example, <code class="t">~5,'0d</code> can be used
+to print an <i class="i">integer</i> 
+in decimal radix in five columns with leading zeros,
+or <code class="t">~5,'*d</code> to get leading asterisks.
+</p>
+<p>In place of a prefix parameter to a directive, <code class="t">V</code> (or <code class="t">v</code>) can be used. 
+In this case, <b class="b">format</b> takes an argument from <i class="i">args</i> as a parameter to
+the directive.  The argument should be an <i class="i">integer</i> or <i class="i">character</i>.
+If the <i class="i">arg</i> used by a <code class="t">V</code> parameter is <b class="b">nil</b>,
+the effect is as if the parameter had been omitted.
+<code class="t">#</code> can be used in place of a prefix parameter; it
+represents the number of <i class="i">args</i> remaining to be processed.
+When used within a recursive format, in the context of <code class="t">~?</code> or <code class="t">~{</code>,
+the <code class="t">#</code> prefix parameter represents the number of <i class="i">format arguments</i>
+remaining within the recursive call.
+</p>
+<p>Examples of <i class="i">format strings</i>:
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">&quot;~S&quot;</code>        ;This is an S directive with no parameters or modifiers.  <!-- /@w -->
+  <code class="t">&quot;~3,-4:@s&quot;</code>  ;This is an S directive with two parameters, <code class="t">3</code> and <code class="t">-4</code>,    <!-- /@w -->
+              ; and both the <i class="i">colon</i> and <i class="i">at-sign</i> flags.                   <!-- /@w -->
+  <code class="t">&quot;~,+4S&quot;</code>     ;Here the first prefix parameter is omitted and takes     <!-- /@w -->
+              ; on its default value, while the second parameter is <code class="t">4</code>.  <!-- /@w -->
+
+             Figure 22&ndash;5: Examples of format control strings           <!-- /@w -->
+
+</pre></div></div>
+
+<p><b class="b">format</b> sends the output to <i class="i">destination</i>.
+If <i class="i">destination</i> is <b class="b">nil</b>,
+<b class="b">format</b> creates and returns a <i class="i">string</i> 
+containing the output from <i class="i">control-string</i>.
+If <i class="i">destination</i> is <i class="i">non-nil</i>, 
+it must be a <i class="i">string</i> with a <i class="i">fill pointer</i>, 
+a <i class="i">stream</i>, or the symbol <b class="b">t</b>.
+If <i class="i">destination</i> is a <i class="i">string</i> with a <i class="i">fill pointer</i>, 
+the output is added to the end of the <i class="i">string</i>. 
+If <i class="i">destination</i> is a <i class="i">stream</i>, 
+the output is sent to that <i class="i">stream</i>. 
+If <i class="i">destination</i> is <b class="b">t</b>,
+the output is sent to <i class="i">standard output</i>.
+</p>
+<p>In the description of the directives that follows,
+the term <i class="i">arg</i> in general
+refers to the next item of the set of <i class="i">args</i> to be processed.
+The word or phrase at the beginning of each description is a mnemonic
+for the directive.
+</p>
+<p><b class="b">format</b> directives do not bind any of the printer control
+variables (<b class="b">*print-...*</b>) except as specified in the following
+descriptions.
+   Implementations may specify the binding of new, implementation-specific 
+printer control variables for each <b class="b">format</b> directive, but they
+    may neither bind any standard printer control variables not
+    specified in description of a <b class="b">format</b> 
+directive nor fail to bind
+    any standard printer control variables as specified in the
+    description.
+</p>
+
+<ul class="mini-toc">
+<li><a href="FORMAT-Basic-Output.html" accesskey="1">FORMAT Basic Output</a></li>
+<li><a href="FORMAT-Radix-Control.html" accesskey="2">FORMAT Radix Control</a></li>
+<li><a href="FORMAT-Floating_002dPoint-Printers.html" accesskey="3">FORMAT Floating-Point Printers</a></li>
+<li><a href="FORMAT-Printer-Operations.html" accesskey="4">FORMAT Printer Operations</a></li>
+<li><a href="FORMAT-Pretty-Printer-Operations.html" accesskey="5">FORMAT Pretty Printer Operations</a></li>
+<li><a href="FORMAT-Layout-Control.html" accesskey="6">FORMAT Layout Control</a></li>
+<li><a href="FORMAT-Control_002dFlow-Operations.html" accesskey="7">FORMAT Control-Flow Operations</a></li>
+<li><a href="FORMAT-Miscellaneous-Operations.html" accesskey="8">FORMAT Miscellaneous Operations</a></li>
+<li><a href="FORMAT-Miscellaneous-Pseudo_002dOperations.html" accesskey="9">FORMAT Miscellaneous Pseudo-Operations</a></li>
+<li><a href="Additional-Information-about-FORMAT-Operations.html">Additional Information about FORMAT Operations</a></li>
+<li><a href="Examples-of-FORMAT.html">Examples of FORMAT</a></li>
+<li><a href="Notes-about-FORMAT.html">Notes about FORMAT</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Printer-Dictionary.html">Printer Dictionary</a>, Previous: <a href="The-Lisp-Pretty-Printer.html">The Lisp Pretty Printer</a>, Up: <a href="Printer.html">Printer</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Function-Call-Forms-as-Places.html
@@ -0,0 +1,276 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Function Call Forms as Places (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Function Call Forms as Places (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Function Call Forms as Places (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Kinds-of-Places.html" rel="up" title="Kinds of Places">
+<link href="VALUES-Forms-as-Places.html" rel="next" title="VALUES Forms as Places">
+<link href="Variable-Names-as-Places.html" rel="prev" title="Variable Names as Places">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Function-Call-Forms-as-Places">
+<div class="nav-panel">
+<p>
+Next: <a href="VALUES-Forms-as-Places.html" accesskey="n" rel="next">VALUES Forms as Places</a>, Previous: <a href="Variable-Names-as-Places.html" accesskey="p" rel="prev">Variable Names as Places</a>, Up: <a href="Kinds-of-Places.html" accesskey="u" rel="up">Kinds of Places</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Function-Call-Forms-as-Places-1"><span>5.1.2.2 Function Call Forms as Places<a class="copiable-link" href="#Function-Call-Forms-as-Places-1"> &para;</a></span></h4>
+
+<p>A <i class="i">function form</i> can be used as a <i class="i">place</i> if it falls
+into one of the following categories:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>A function call form whose first element is the name of
+any one of the functions in Figure 5&ndash;7.
+</p>
+<p>[Editorial Note by KMP: Note that what are in some places still called &lsquo;condition accessors&rsquo;
+		 are deliberately omitted from this table, and are not labeled as
+		 accessors in their entries.  I have not yet had time to do a full
+	         search for these items and eliminate stray references to them as &lsquo;accessors&rsquo;,
+		 which they are not, but I will do that at some point.]
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  aref    cdadr                    get                            <!-- /@w -->
+  bit     cdar                     gethash                        <!-- /@w -->
+  caaaar  cddaar                   logical-pathname-translations  <!-- /@w -->
+  caaadr  cddadr                   macro-function                 <!-- /@w -->
+  caaar   cddar                    ninth                          <!-- /@w -->
+  caadar  cdddar                   nth                            <!-- /@w -->
+  caaddr  cddddr                   readtable-case                 <!-- /@w -->
+  caadr   cdddr                    rest                           <!-- /@w -->
+  caar    cddr                     row-major-aref                 <!-- /@w -->
+  cadaar  cdr                      sbit                           <!-- /@w -->
+  cadadr  char                     schar                          <!-- /@w -->
+  cadar   class-name               second                         <!-- /@w -->
+  caddar  compiler-macro-function  seventh                        <!-- /@w -->
+  cadddr  documentation            sixth                          <!-- /@w -->
+  caddr   eighth                   slot-value                     <!-- /@w -->
+  cadr    elt                      subseq                         <!-- /@w -->
+  car     fdefinition              svref                          <!-- /@w -->
+  cdaaar  fifth                    symbol-function                <!-- /@w -->
+  cdaadr  fill-pointer             symbol-plist                   <!-- /@w -->
+  cdaar   find-class               symbol-value                   <!-- /@w -->
+  cdadar  first                    tenth                          <!-- /@w -->
+  cdaddr  fourth                   third                          <!-- /@w -->
+
+       Figure 5&ndash;7: Functions that setf can be used with&mdash;1      <!-- /@w -->
+
+</pre></div></div>
+
+<p>In the case of <b class="b">subseq</b>, the replacement value must be a <i class="i">sequence</i>
+whose elements might be contained by the sequence argument to <b class="b">subseq</b>,
+but does not have to be a <i class="i">sequence</i> of the same <i class="i">type</i> 
+as the <i class="i">sequence</i> of which the subsequence is specified.
+If the length of the replacement value does not equal the length of
+the subsequence to be replaced, then the shorter length determines
+the number of elements to be stored, as for <b class="b">replace</b>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>A function call form whose first element is the name of
+a selector function constructed by <b class="b">defstruct</b>.
+</p>
+<p>The function name must refer to the global function definition,
+rather than a locally defined <i class="i">function</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>A function call form whose first element is the name of
+any one of the functions in Figure 5&ndash;8, 
+provided that the supplied argument
+to that function is in turn a <i class="i">place</i> form;
+in this case the new <i class="i">place</i> has stored back into it the
+result of applying the supplied &ldquo;update&rdquo; function.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Function name  Argument that is a <i class="i">place</i>  Update function used      <!-- /@w -->
+  <b class="b">ldb</b>            second                    <b class="b">dpb</b>                       <!-- /@w -->
+  <b class="b">mask-field</b>     second                    <b class="b">deposit-field</b>             <!-- /@w -->
+  <b class="b">getf</b>           first                     <i class="i">implementation-dependent</i>  <!-- /@w -->
+
+         Figure 5&ndash;8: Functions that setf can be used with&mdash;2       <!-- /@w -->
+
+</pre></div></div>
+
+<p>During the <b class="b">setf</b> expansion of these <i class="i">forms</i>, it is necessary to call 
+</p>
+<p><b class="b">get-setf-expansion</b> 
+</p>
+<p>in order to figure out how the inner, nested generalized variable must be treated.  
+</p>
+<p>The information from
+</p>
+<p><b class="b">get-setf-expansion</b>
+</p>
+<p>is used as follows.
+</p><dl class="table">
+<dt><b class="b">ldb</b></dt>
+<dd><p>In a form such as:
+</p>
+<p><code class="t">(setf (ldb <i class="i">byte-spec</i> <i class="i">place-form</i>) <i class="i">value-form</i>)</code>
+</p>
+<p>the place referred to by the <i class="i">place-form</i> must always be both <i class="i">read</i> 
+and <i class="i">written</i>;  note that the update is to the generalized variable 
+specified by <i class="i">place-form</i>, not to any object of <i class="i">type</i> <b class="b">integer</b>.
+</p>
+<p>Thus this <b class="b">setf</b> should generate code to do the following:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>Evaluate <i class="i">byte-spec</i> (and bind it into a temporary variable).
+</p></dd>
+<dt>2.</dt>
+<dd><p>Bind the temporary variables for <i class="i">place-form</i>.
+</p></dd>
+<dt>3.</dt>
+<dd><p>Evaluate <i class="i">value-form</i>  (and bind 
+</p>
+<p>its value or values into the store variable).
+</p>
+</dd>
+<dt>4.</dt>
+<dd><p>Do the <i class="i">read</i> from <i class="i">place-form</i>.
+</p></dd>
+<dt>5.</dt>
+<dd><p>Do the <i class="i">write</i> into <i class="i">place-form</i> with 
+the given bits of the <i class="i">integer</i>
+       fetched in step 4 replaced with the value from step 3.
+</p></dd>
+</dl>
+
+<p>If the evaluation of <i class="i">value-form</i> 
+in step 3 alters what is found in <i class="i">place-form</i>,
+such as setting different bits of <i class="i">integer</i>,
+    then the change of the bits denoted by 
+<i class="i">byte-spec</i> is to that 
+    altered <i class="i">integer</i>, 
+because step 4 is done after the <i class="i">value-form</i>
+    evaluation.  Nevertheless, the 
+    evaluations required for <i class="i">binding</i> 
+the temporary variables are done in steps 1 and 
+    2, and thus the expected left-to-right evaluation order is seen.
+For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq integer #x69) &rArr;  #x69
+ (rotatef (ldb (byte 4 4) integer) 
+          (ldb (byte 4 0) integer))
+ integer &rArr;  #x96
+;;; This example is trying to swap two independent bit fields 
+;;; in an integer.  Note that the generalized variable of 
+;;; interest here is just the (possibly local) program variable
+;;; integer.
+</pre></div>
+
+</dd>
+<dt><b class="b">mask-field</b></dt>
+<dd><p>This case is the same as <b class="b">ldb</b> in all essential aspects.
+</p>
+</dd>
+<dt><b class="b">getf</b></dt>
+<dd><p>In a form such as:
+</p>
+<p><code class="t">(setf (getf <i class="i">place-form</i> <i class="i">ind-form</i>) <i class="i">value-form</i>)</code>
+</p>
+<p>the place referred to by <i class="i">place-form</i> must always be both <i class="i">read</i>
+    and <i class="i">written</i>;  note that the update is to the generalized variable 
+    specified by <i class="i">place-form</i>, not necessarily to the particular 
+<i class="i">list</i>
+that is the property list in question.
+</p>
+<p>Thus this <b class="b">setf</b> should generate code to do the following:
+</p><dl class="table">
+<dt>1.</dt>
+<dd><p>Bind the temporary variables for <i class="i">place-form</i>.
+</p></dd>
+<dt>2.</dt>
+<dd><p>Evaluate <i class="i">ind-form</i> (and bind it into a temporary variable).
+</p></dd>
+<dt>3.</dt>
+<dd><p>Evaluate <i class="i">value-form</i> (and bind 
+</p>
+<p>its value or values into the store variable).
+</p>
+</dd>
+<dt>4.</dt>
+<dd><p>Do the <i class="i">read</i> from <i class="i">place-form</i>.
+</p></dd>
+<dt>5.</dt>
+<dd><p>Do the <i class="i">write</i> into <i class="i">place-form</i> with a possibly-new property list
+       obtained by combining the values from steps 2, 3, and 4.  
+(Note that the phrase &ldquo;possibly-new property list&rdquo; can mean that 
+    the former property list is somehow destructively re-used, or it can 
+    mean partial or full copying of it.  
+Since either copying or destructive re-use can occur, 
+the treatment of the resultant value for the 
+    possibly-new property list must proceed as if it were a different copy
+    needing to be stored back into the generalized variable.)
+</p></dd>
+</dl>
+
+<p>If the evaluation of <i class="i">value-form</i> 
+in step 3 alters what is found in
+<i class="i">place-form</i>, such as setting a different named property in the list,
+    then the change of the property denoted by <i class="i">ind-form</i> 
+is to that 
+    altered list, because step 4 is done after the 
+<i class="i">value-form</i>
+    evaluation.  Nevertheless, the 
+    evaluations required for <i class="i">binding</i> 
+the temporary variables  are done in steps 1 and 
+    2,  and thus the expected left-to-right evaluation order is seen.
+</p>
+<p>For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq s (setq r (list (list 'a 1 'b 2 'c 3)))) &rArr;  ((a 1 b 2 c 3))
+ (setf (getf (car r) 'b) 
+       (progn (setq r nil) 6)) &rArr;  6
+ r &rArr;  NIL
+ s &rArr;  ((A 1 B 6 C 3))
+;;; Note that the (setq r nil) does not affect the actions of 
+;;; the SETF because the value of R had already been saved in 
+;;; a temporary variable as part of the step 1. Only the CAR
+;;; of this value will be retrieved, and subsequently modified 
+;;; after the value computation.
+</pre></div>
+
+</dd>
+</dl>
+
+</dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="VALUES-Forms-as-Places.html">VALUES Forms as Places</a>, Previous: <a href="Variable-Names-as-Places.html">Variable Names as Places</a>, Up: <a href="Kinds-of-Places.html">Kinds of Places</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Function-Forms.html
@@ -0,0 +1,118 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Function Forms (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Function Forms (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Function Forms (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Evaluation-Model.html" rel="up" title="The Evaluation Model">
+<link href="Lambda-Forms.html" rel="next" title="Lambda Forms">
+<link href="Macro-Forms.html" rel="prev" title="Macro Forms">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Function-Forms">
+<div class="nav-panel">
+<p>
+Next: <a href="Lambda-Forms.html" accesskey="n" rel="next">Lambda Forms</a>, Previous: <a href="Macro-Forms.html" accesskey="p" rel="prev">Macro Forms</a>, Up: <a href="The-Evaluation-Model.html" accesskey="u" rel="up">The Evaluation Model</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Function-Forms-1"><span>3.1.2.10 Function Forms<a class="copiable-link" href="#Function-Forms-1"> &para;</a></span></h4>
+
+<p>If the <i class="i">operator</i> is a <i class="i">symbol</i> naming a <i class="i">function</i>,
+the <i class="i">form</i> represents a <i class="i">function form</i>,
+and the <i class="i">cdr</i> of the list contains the <i class="i">forms</i> 
+which when evaluated will supply the arguments passed to the <i class="i">function</i>.
+</p>
+<p>When a <i class="i">function name</i> is not defined, 
+an error of <i class="i">type</i> <b class="b">undefined-function</b> should be signaled at run time;
+see <a class="ref" href="Semantic-Constraints.html">Semantic Constraints</a>.
+</p>
+<p>A <i class="i">function form</i> is evaluated as follows:
+</p>
+<p>The <i class="i">subforms</i> in the <i class="i">cdr</i> of the original <i class="i">form</i>
+are evaluated in left-to-right order in the current lexical and 
+dynamic <i class="i">environments</i>.  The <i class="i">primary value</i> of each
+such <i class="i">evaluation</i> becomes an <i class="i">argument</i> to the named <i class="i">function</i>;
+any additional <i class="i">values</i> returned by the <i class="i">subforms</i> are discarded.
+</p>
+<p>The <i class="i">functional value</i> of the <i class="i">operator</i> 
+is retrieved from the <i class="i">lexical environment</i>,
+and that <i class="i">function</i> is invoked with the indicated arguments.
+</p>
+<p>Although the order of <i class="i">evaluation</i> of 
+the <i class="i">argument</i> <i class="i">subforms</i> themselves is 
+strictly left-to-right, it is not specified whether 
+the definition of the <i class="i">operator</i> in a <i class="i">function form</i> is looked up 
+before the <i class="i">evaluation</i> of the <i class="i">argument</i> <i class="i">subforms</i>,
+after the <i class="i">evaluation</i> of the <i class="i">argument</i> <i class="i">subforms</i>,
+or between the <i class="i">evaluation</i> of any two <i class="i">argument</i> <i class="i">subforms</i> 
+if there is more than one such <i class="i">argument</i> <i class="i">subform</i>.  
+For example, the following might return 23 or~24.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun foo (x) (+ x 3))
+ (defun bar () (setf (symbol-function 'foo) #'(lambda (x) (+ x 4))))
+ (foo (progn (bar) 20))
+</pre></div>
+
+<p>A <i class="i">binding</i> for a <i class="i">function name</i> can be <i class="i">established</i> in 
+one of several ways.  A <i class="i">binding</i> for a <i class="i">function name</i> in 
+the <i class="i">global environment</i> can be <i class="i">established</i> by 
+ <b class="b">defun</b>,
+ <b class="b">setf</b> of <b class="b">fdefinition</b>,
+ <b class="b">setf</b> of <b class="b">symbol-function</b>,
+ <b class="b">ensure-generic-function</b>,
+ <b class="b">defmethod</b> (implicitly, due to <b class="b">ensure-generic-function</b>),
+or
+ <b class="b">defgeneric</b>.
+A <i class="i">binding</i> for a <i class="i">function name</i> in the <i class="i">lexical environment</i>
+can be <i class="i">established</i> by
+   <b class="b">flet</b>
+or <b class="b">labels</b>.
+</p>
+<p>Figure 3&ndash;4 lists some <i class="i">defined names</i> that are applicable to <i class="i">functions</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  apply                 fdefinition  mapcan               <!-- /@w -->
+  call-arguments-limit  flet         mapcar               <!-- /@w -->
+  complement            fmakunbound  mapcon               <!-- /@w -->
+  constantly            funcall      mapl                 <!-- /@w -->
+  defgeneric            function     maplist              <!-- /@w -->
+  defmethod             functionp    multiple-value-call  <!-- /@w -->
+  defun                 labels       reduce               <!-- /@w -->
+  fboundp               map          symbol-function      <!-- /@w -->
+
+      Figure 3&ndash;4: Some function-related defined names    <!-- /@w -->
+
+</pre></div></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Lambda-Forms.html">Lambda Forms</a>, Previous: <a href="Macro-Forms.html">Macro Forms</a>, Up: <a href="The-Evaluation-Model.html">The Evaluation Model</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/General-Restrictions-on-Parameters-that-must-be-Lists.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>General Restrictions on Parameters that must be Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="General Restrictions on Parameters that must be Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="General Restrictions on Parameters that must be Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-as-Lists.html" rel="up" title="Conses as Lists">
+<link href="Lists-as-Sets.html" rel="prev" title="Lists as Sets">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="General-Restrictions-on-Parameters-that-must-be-Lists">
+<div class="nav-panel">
+<p>
+Previous: <a href="Lists-as-Sets.html" accesskey="p" rel="prev">Lists as Sets</a>, Up: <a href="Conses-as-Lists.html" accesskey="u" rel="up">Conses as Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="General-Restrictions-on-Parameters-that-must-be-Lists-1"><span>14.1.2.3 General Restrictions on Parameters that must be Lists<a class="copiable-link" href="#General-Restrictions-on-Parameters-that-must-be-Lists-1"> &para;</a></span></h4>
+
+<p>Except as explicitly specified otherwise,
+any <i class="i">standardized</i> <i class="i">function</i> that takes a <i class="i">parameter</i>
+that is required to be a <i class="i">list</i> should be prepared to signal 
+an error of <i class="i">type</i> <b class="b">type-error</b> if the <i class="i">value</i> received is a <i class="i">dotted list</i>.
+</p>
+<p>Except as explicitly specified otherwise,
+for any <i class="i">standardized</i> <i class="i">function</i> that takes a <i class="i">parameter</i>
+that is required to be a <i class="i">list</i>, 
+the consequences are undefined 
+if that <i class="i">list</i> is <i class="i">circular</i>.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/General-Restrictions-on-Parameters-that-must-be-Sequences.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>General Restrictions on Parameters that must be Sequences (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="General Restrictions on Parameters that must be Sequences (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="General Restrictions on Parameters that must be Sequences (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequence-Concepts.html" rel="up" title="Sequence Concepts">
+<link href="Sequence-Concepts.html" rel="prev" title="Sequence Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="General-Restrictions-on-Parameters-that-must-be-Sequences">
+<div class="nav-panel">
+<p>
+Previous: <a href="Sequence-Concepts.html" accesskey="p" rel="prev">Sequence Concepts</a>, Up: <a href="Sequence-Concepts.html" accesskey="u" rel="up">Sequence Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="General-Restrictions-on-Parameters-that-must-be-Sequences-1"><span>17.1.1 General Restrictions on Parameters that must be Sequences<a class="copiable-link" href="#General-Restrictions-on-Parameters-that-must-be-Sequences-1"> &para;</a></span></h4>
+
+<p>In general, <i class="i">lists</i> (including <i class="i">association lists</i> and <i class="i">property lists</i>)
+that are treated as <i class="i">sequences</i> must be <i class="i">proper lists</i>.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/General-Restrictions-on-Parameters-that-must-be-Trees.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>General Restrictions on Parameters that must be Trees (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="General Restrictions on Parameters that must be Trees (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="General Restrictions on Parameters that must be Trees (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-as-Trees.html" rel="up" title="Conses as Trees">
+<link href="Conses-as-Trees.html" rel="prev" title="Conses as Trees">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="General-Restrictions-on-Parameters-that-must-be-Trees">
+<div class="nav-panel">
+<p>
+Previous: <a href="Conses-as-Trees.html" accesskey="p" rel="prev">Conses as Trees</a>, Up: <a href="Conses-as-Trees.html" accesskey="u" rel="up">Conses as Trees</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="General-Restrictions-on-Parameters-that-must-be-Trees-1"><span>14.1.1.1 General Restrictions on Parameters that must be Trees<a class="copiable-link" href="#General-Restrictions-on-Parameters-that-must-be-Trees-1"> &para;</a></span></h4>
+
+<p>Except as explicitly stated otherwise,
+for any <i class="i">standardized</i> <i class="i">function</i> that takes a <i class="i">parameter</i>
+that is required to be a <i class="i">tree</i>,
+the consequences are undefined
+if that <i class="i">tree</i> is circular.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Generalized-Reference.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Generalized Reference (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Generalized Reference (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Generalized Reference (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow.html" rel="up" title="Data and Control Flow">
+<link href="Transfer-of-Control-to-an-Exit-Point.html" rel="next" title="Transfer of Control to an Exit Point">
+<link href="Data-and-Control-Flow.html" rel="prev" title="Data and Control Flow">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Generalized-Reference">
+<div class="nav-panel">
+<p>
+Next: <a href="Transfer-of-Control-to-an-Exit-Point.html" accesskey="n" rel="next">Transfer of Control to an Exit Point</a>, Previous: <a href="Data-and-Control-Flow.html" accesskey="p" rel="prev">Data and Control Flow</a>, Up: <a href="Data-and-Control-Flow.html" accesskey="u" rel="up">Data and Control Flow</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Generalized-Reference-1"><span>5.1 Generalized Reference<a class="copiable-link" href="#Generalized-Reference-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Overview-of-Places-and-Generalized-Reference.html" accesskey="1">Overview of Places and Generalized Reference</a></li>
+<li><a href="Kinds-of-Places.html" accesskey="2">Kinds of Places</a></li>
+<li><a href="Treatment-of-Other-Macros-Based-on-SETF.html" accesskey="3">Treatment of Other Macros Based on SETF</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Generic-Function-Lambda-Lists.html
@@ -0,0 +1,91 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Generic Function Lambda Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Generic Function Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Generic Function Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Lambda-Lists.html" rel="up" title="Lambda Lists">
+<link href="Specialized-Lambda-Lists.html" rel="next" title="Specialized Lambda Lists">
+<link href="Ordinary-Lambda-Lists.html" rel="prev" title="Ordinary Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Generic-Function-Lambda-Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Specialized-Lambda-Lists.html" accesskey="n" rel="next">Specialized Lambda Lists</a>, Previous: <a href="Ordinary-Lambda-Lists.html" accesskey="p" rel="prev">Ordinary Lambda Lists</a>, Up: <a href="Lambda-Lists.html" accesskey="u" rel="up">Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Generic-Function-Lambda-Lists-1"><span>3.4.2 Generic Function Lambda Lists<a class="copiable-link" href="#Generic-Function-Lambda-Lists-1"> &para;</a></span></h4>
+
+<p>A <i class="i">generic function lambda list</i>
+<a class="index-entry-id" id="index-generic-function-lambda-list"></a>
+ is used to describe the overall shape of
+the argument list to be accepted by a <i class="i">generic function</i>.
+Individual <i class="i">method</i> <i class="i">signatures</i> might contribute additional 
+<i class="i">keyword parameters</i> to the <i class="i">lambda list</i> of the <i class="i">effective method</i>.
+</p>
+<p>A <i class="i">generic function lambda list</i> is used by <b class="b">defgeneric</b>.
+</p>
+<p>A <i class="i">generic function lambda list</i> has the following syntax:
+</p>
+<p><i class="i">lambda-list</i>&nbsp;::=<span class="r">(</span>{<i class="i">var</i>}*<!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;optional</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;<span class="r">(</span><i class="i">var</i><span class="r">)</span>}*<code class="t">]</code><!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;rest</span>&nbsp;<i class="i">var</i><code class="t">]</code><!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;key</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;<span class="r">(</span>{<i class="i">var</i>&nbsp;|&nbsp;					&nbsp;<span class="r">(</span><i class="i">keyword-name</i>&nbsp;<i class="i">var</i><span class="r">)</span>}<span class="r">)</span>}*&nbsp;pt&nbsp;<span class="r">[</span><code class="t">&amp;allow-other-keys</code><span class="r">]</span><code class="t">]</code><span class="r">)</span><!-- /@w -->
+&nbsp;<!-- /@w -->
+</p>
+<p>A <i class="i">generic function lambda list</i> can contain the <i class="i">lambda list keywords</i> shown
+in Figure 3&ndash;14.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <b class="b">&amp;allow-other-keys</b>  <b class="b">&amp;optional</b>    <!-- /@w -->
+  <b class="b">&amp;key</b>               <b class="b">&amp;rest</b>        <!-- /@w -->
+
+  Figure 3&ndash;14: Lambda List Keywords used by Generic Function Lambda Lists<!-- /@w -->
+
+</pre></div></div>
+
+<p>A <i class="i">generic function lambda list</i> differs from an <i class="i">ordinary lambda list</i> 
+in the following ways:
+</p>
+<dl class="table">
+<dt>Required arguments</dt>
+<dd><p>Zero or more <i class="i">required parameters</i> must be specified.
+</p>
+</dd>
+<dt>Optional and keyword arguments</dt>
+<dd><p><i class="i">Optional parameters</i> and <i class="i">keyword parameters</i> may not have 
+default initial value forms nor use supplied-p parameters.
+</p>
+</dd>
+<dt>Use of <b class="b">&amp;aux</b></dt>
+<dd><p>The use of <b class="b">&amp;aux</b> is not allowed. 
+</p></dd>
+</dl>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Generic-Functions-and-Methods.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Generic Functions and Methods (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Generic Functions and Methods (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Generic Functions and Methods (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects.html" rel="up" title="Objects">
+<link href="Objects-Dictionary.html" rel="next" title="Objects Dictionary">
+<link href="Slots.html" rel="prev" title="Slots">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Generic-Functions-and-Methods">
+<div class="nav-panel">
+<p>
+Next: <a href="Objects-Dictionary.html" accesskey="n" rel="next">Objects Dictionary</a>, Previous: <a href="Slots.html" accesskey="p" rel="prev">Slots</a>, Up: <a href="Objects.html" accesskey="u" rel="up">Objects</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Generic-Functions-and-Methods-1"><span>7.6 Generic Functions and Methods<a class="copiable-link" href="#Generic-Functions-and-Methods-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Introduction-to-Generic-Functions.html" accesskey="1">Introduction to Generic Functions</a></li>
+<li><a href="Introduction-to-Methods.html" accesskey="2">Introduction to Methods</a></li>
+<li><a href="Agreement-on-Parameter-Specializers-and-Qualifiers.html" accesskey="3">Agreement on Parameter Specializers and Qualifiers</a></li>
+<li><a href="Congruent-Lambda_002dlists-for-all-Methods-of-a-Generic-Function.html" accesskey="4">Congruent Lambda-lists for all Methods of a Generic Function</a></li>
+<li><a href="Keyword-Arguments-in-Generic-Functions-and-Methods.html" accesskey="5">Keyword Arguments in Generic Functions and Methods</a></li>
+<li><a href="Method-Selection-and-Combination.html" accesskey="6">Method Selection and Combination</a></li>
+<li><a href="Inheritance-of-Methods.html" accesskey="7">Inheritance of Methods</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Glossary-_0028Glossary_0029.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Glossary (Glossary) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Glossary (Glossary) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Glossary (Glossary) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Appendix.html" rel="next" title="Appendix">
+<link href="Environment.html" rel="prev" title="Environment">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Glossary-_0028Glossary_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="Appendix.html" accesskey="n" rel="next">Appendix</a>, Previous: <a href="Environment.html" accesskey="p" rel="prev">Environment</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Glossary-1"><span>26 Glossary<a class="copiable-link" href="#Glossary-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Glossary.html" accesskey="1">Glossary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Glossary.html
@@ -0,0 +1,6054 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Glossary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Glossary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Glossary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Glossary-_0028Glossary_0029.html" rel="up" title="Glossary (Glossary)">
+<link href="Glossary-_0028Glossary_0029.html" rel="prev" title="Glossary (Glossary)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Glossary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Glossary-_0028Glossary_0029.html" accesskey="p" rel="prev">Glossary</a>, Up: <a href="Glossary-_0028Glossary_0029.html" accesskey="u" rel="up">Glossary</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Glossary-2"><span>26.1 Glossary<a class="copiable-link" href="#Glossary-2"> &para;</a></span></h3>
+
+
+<p>Each entry in this glossary has the following parts:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>the term being defined, set in boldface.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>optional pronunciation, enclosed in square brackets and
+set in boldface, as in the following example:
+pronounced &rsquo;a ,list .  The pronunciation key follows
+<i class="i">Webster&rsquo;s Third New International Dictionary
+ the English Language, Unabridged</i>,
+  except that &ldquo;e&rdquo; is used to notate the schwa (upside-down &ldquo;e&rdquo;) character.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>the part or parts of speech, set in italics.  If a term
+can be used as several parts of speech, there is a separate definition
+for each part of speech.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>one or more definitions, organized as follows:
+</p>
+<dl class="table">
+<dt>&ndash;</dt>
+<dd><p>an optional number, present if there are several
+definitions. Lowercase letters might also be used in cases where subdefinitions of
+a numbered definition are necessary.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>an optional part of speech, set in italics, present if the
+term is one of several parts of speech.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>an optional discipline, set in italics, present if the term
+has a standard definition being repeated. For example, &ldquo;Math.&rdquo;
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>an optional context, present if this definition is
+meaningful only in that context. For example, &ldquo;(of a <i class="i">symbol</i>)&rdquo;.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>the definition.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>an optional example sentence. For example,
+           &ldquo;This is an example of an example.&rdquo;
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>optional cross references.
+</p>
+</dd>
+</dl>
+
+</dd>
+</dl>
+
+<p>In addition, some terms have idiomatic usage in the Common Lisp
+community which is not shared by other communities, or which is not
+technically correct.  Definitions labeled &ldquo;Idiom.&rdquo; represent
+such idiomatic usage; these definitions are sometimes followed by an
+explanatory note.
+</p>
+<p>Words in <i class="i">this font</i> are words with entries in the glossary.
+Words in example sentences do not follow this convention.
+</p>
+<p>When an ambiguity arises, the longest matching substring has precedence.
+For example, &ldquo;<i class="i">complex float</i>&rdquo; refers to a single glossary entry 
+for &ldquo;<i class="i">complex float</i>&rdquo; rather than the combined meaning of the 
+glossary terms &ldquo;<i class="i">complex</i>&rdquo; and &ldquo;<i class="i">float</i>.&rdquo;
+</p>
+<p>Subscript notation, as in &ldquo;<i class="i">something</i>_n&rdquo; means that
+the <i class="i">n</i>th definition of &ldquo;<i class="i">something</i>&rdquo; is intended.  This
+notation is used only in situations where the context might be insufficient
+to disambiguate.
+</p>
+<p>The following are abbreviations used in the glossary:
+</p>
+<p>Abbreviation       Meaning
+</p><dl class="table">
+<dt><i class="i">adj.</i></dt>
+<dd><p>adjective
+</p></dd>
+<dt><i class="i">adv.</i></dt>
+<dd><p>adverb
+</p></dd>
+<dt><i class="i">ANSI</i></dt>
+<dd><p>compatible with one or more ANSI standards
+</p></dd>
+<dt><i class="i">Comp.</i></dt>
+<dd><p>computers
+</p></dd>
+<dt><i class="i">Idiom.</i></dt>
+<dd><p>idiomatic
+</p></dd>
+<dt><i class="i">IEEE</i></dt>
+<dd><p>compatible with one or more IEEE standards
+</p></dd>
+<dt><i class="i">ISO</i></dt>
+<dd><p>compatible with one or more ISO standards
+</p></dd>
+<dt><i class="i">Math.</i></dt>
+<dd><p>mathematics
+</p></dd>
+<dt><i class="i">Trad.</i></dt>
+<dd><p>traditional
+</p></dd>
+<dt><i class="i">n.</i></dt>
+<dd><p>noun
+</p></dd>
+<dt><i class="i">v.</i></dt>
+<dd><p>verb
+</p></dd>
+<dt><i class="i">v.t.</i></dt>
+<dd><p>transitive verb
+</p></dd>
+</dl>
+
+
+<h4 class="subheading" id="Non_002dalphabetic"><span><b class="b">Non-alphabetic</b><a class="copiable-link" href="#Non_002dalphabetic"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-_0028_0029-1"></a><span><b class="b">()</b><a class="copiable-link" href="#index-_0028_0029-1"> &para;</a></span></dt>
+<dd><p>pronounced &rsquo;nil , <i class="i">n.</i>
+  an alternative notation for writing the symbol~<b class="b">nil</b>, used to emphasize
+  the use of <i class="i">nil</i> as an <i class="i">empty list</i>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="A"><span><b class="b">A</b><a class="copiable-link" href="#A"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-absolute"></a><span><b class="b">absolute</b><a class="copiable-link" href="#index-absolute"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i>
+  1. (of a <i class="i">time</i>)
+     representing a specific point in time.
+  2. (of a <i class="i">pathname</i>)
+     representing a specific position in a directory hierarchy.
+  See <i class="i">relative</i>.
+</p>
+</dd>
+<dt><a id="index-access"></a><span><b class="b">access</b><a class="copiable-link" href="#index-access"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>, <i class="i">v.t.</i>
+  1. <i class="i">v.t.</i> (a <i class="i">place</i>, or <i class="i">array</i>)
+     to <i class="i">read</i>_1 or <i class="i">write</i>_1 the <i class="i">value</i> of
+         the <i class="i">place</i>
+      or an <i class="i">element</i> of the <i class="i">array</i>.
+  2. <i class="i">n.</i> (of a <i class="i">place</i>)
+     an attempt to <i class="i">access</i>_1 the <i class="i">value</i> of the <i class="i">place</i>.
+</p>
+</dd>
+<dt><a id="index-accessibility"></a><span><b class="b">accessibility</b><a class="copiable-link" href="#index-accessibility"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the state of being <i class="i">accessible</i>.
+</p>
+</dd>
+<dt><a id="index-accessible-1"></a><span><b class="b">accessible</b><a class="copiable-link" href="#index-accessible-1"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  1. (of an <i class="i">object</i>) capable of being <i class="i">referenced</i>.
+  2. (of <i class="i">shared slots</i> or <i class="i">local slots</i> in an <i class="i">instance</i> of 
+     a <i class="i">class</i>) having been defined by the <i class="i">class</i> 
+     of the <i class="i">instance</i> or <i class="i">inherited</i> from a
+     <i class="i">superclass</i> of that <i class="i">class</i>.
+  3. (of a <i class="i">symbol</i> in a <i class="i">package</i>)
+     capable of being <i class="i">referenced</i> without a <i class="i">package prefix</i> 
+     when that <i class="i">package</i> is current, regardless of whether the
+     <i class="i">symbol</i> is <i class="i">present</i> in that <i class="i">package</i> or is <i class="i">inherited</i>.
+</p>
+</dd>
+<dt><a id="index-accessor"></a><span><b class="b">accessor</b><a class="copiable-link" href="#index-accessor"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">operator</i> that performs an <i class="i">access</i>.
+  See <i class="i">reader</i> and <i class="i">writer</i>.
+</p>
+</dd>
+<dt><a id="index-active-1"></a><span><b class="b">active</b><a class="copiable-link" href="#index-active-1"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  1. (of a <i class="i">handler</i>, a <i class="i">restart</i>, or a <i class="i">catch tag</i>)
+     having been <i class="i">established</i> but not yet <i class="i">disestablished</i>.
+  2. (of an <i class="i">element</i> of an <i class="i">array</i>)
+     having an index that is greater than or equal to zero,
+     but less than the <i class="i">fill pointer</i> (if any).
+     For an <i class="i">array</i> that has no <i class="i">fill pointer</i>,
+     all <i class="i">elements</i> are considered <i class="i">active</i>.
+</p>
+</dd>
+<dt><a id="index-actual-adjustability"></a><span><b class="b">actual adjustability</b><a class="copiable-link" href="#index-actual-adjustability"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of an <i class="i">array</i>)
+  a <i class="i">generalized boolean</i> that is associated with the <i class="i">array</i>, 
+  representing whether the <i class="i">array</i> is <i class="i">actually adjustable</i>.
+  See also <i class="i">expressed adjustability</i> and <b class="b">adjustable-array-p</b>.
+</p>
+</dd>
+<dt><a id="index-actual-argument"></a><span><b class="b">actual argument</b><a class="copiable-link" href="#index-actual-argument"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> 
+  an <i class="i">argument</i>.
+</p>
+</dd>
+<dt><a id="index-actual-array-element-type-1"></a><span><b class="b">actual array element type</b><a class="copiable-link" href="#index-actual-array-element-type-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of an <i class="i">array</i>)
+  the <i class="i">type</i> for which the <i class="i">array</i> is actually specialized,
+  which is the <i class="i">upgraded array element type</i> of 
+  the <i class="i">expressed array element type</i> of the <i class="i">array</i>.
+  See the <i class="i">function</i> <b class="b">array-element-type</b>.
+</p>
+</dd>
+<dt><a id="index-actual-complex-part-type"></a><span><b class="b">actual complex part type</b><a class="copiable-link" href="#index-actual-complex-part-type"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">complex</i>)
+  the <i class="i">type</i> in which the real and imaginary parts of the <i class="i">complex</i>
+  are actually represented, which is the <i class="i">upgraded complex part type</i> of the
+  <i class="i">expressed complex part type</i> of the <i class="i">complex</i>.
+</p>
+</dd>
+<dt><a id="index-actual-parameter"></a><span><b class="b">actual parameter</b><a class="copiable-link" href="#index-actual-parameter"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> 
+  an <i class="i">argument</i>.
+</p>
+</dd>
+<dt><a id="index-actually-adjustable"></a><span><b class="b">actually adjustable</b><a class="copiable-link" href="#index-actually-adjustable"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of an <i class="i">array</i>)
+  such that <b class="b">adjust-array</b> can adjust its characteristics
+  by direct modification.
+  A <i class="i">conforming program</i> may depend on
+  an <i class="i">array</i> being <i class="i">actually adjustable</i>
+  only if either that <i class="i">array</i> is known to have been <i class="i">expressly adjustable</i>
+  or if that <i class="i">array</i> has been explicitly tested by <b class="b">adjustable-array-p</b>.
+</p>
+</dd>
+<dt><a id="index-adjustability"></a><span><b class="b">adjustability</b><a class="copiable-link" href="#index-adjustability"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of an <i class="i">array</i>)
+  1. <i class="i">expressed adjustability</i>.
+  2. <i class="i">actual adjustability</i>.
+</p>
+</dd>
+<dt><a id="index-adjustable"></a><span><b class="b">adjustable</b><a class="copiable-link" href="#index-adjustable"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of an <i class="i">array</i>)
+  1. <i class="i">expressly adjustable</i>.
+  2. <i class="i">actually adjustable</i>.
+</p>
+</dd>
+<dt><a id="index-after-method"></a><span><b class="b">after method</b><a class="copiable-link" href="#index-after-method"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">method</i> having the <i class="i">qualifier</i> <code class="t">:after</code>.
+</p>
+</dd>
+<dt><a id="index-alist"></a><span><b class="b">alist</b><a class="copiable-link" href="#index-alist"> &para;</a></span></dt>
+<dd><p>pronounced &rsquo;\=a ,list , <i class="i">n.</i> 
+  an <i class="i">association list</i>.
+</p>
+</dd>
+<dt><a id="index-alphabetic"></a><span><b class="b">alphabetic</b><a class="copiable-link" href="#index-alphabetic"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>, <i class="i">adj.</i>
+  1. <i class="i">adj.</i> (of a <i class="i">character</i>)
+     being one of the <i class="i">standard characters</i> <code class="t">A</code> through <code class="t">Z</code> 
+         or <code class="t">a</code> through <code class="t">z</code>,
+      or being any <i class="i">implementation-defined</i> character that has <i class="i">case</i>,
+      or being some other <i class="i">graphic</i> <i class="i">character</i>
+         defined by the <i class="i">implementation</i> to be <i class="i">alphabetic</i>_1.
+  2. a. <i class="i">n.</i>
+        one of several possible <i class="i">constituent traits</i> of a <i class="i">character</i>.
+        For details, see <a class="ref" href="Constituent-Characters.html">Constituent Characters</a> and <a class="ref" href="Reader-Algorithm.html">Reader Algorithm</a>.
+     b. <i class="i">adj.</i> (of a <i class="i">character</i>)
+        being a <i class="i">character</i> 
+              that has <i class="i">syntax type</i> <i class="i">constituent</i> in the <i class="i">current readtable</i> 
+	  and that has the <i class="i">constituent trait</i> <i class="i">alphabetic</i>_{2a}.
+	See <i class="i">Figure~2&ndash;8</i>.
+</p>
+</dd>
+<dt><a id="index-alphanumeric"></a><span><b class="b">alphanumeric</b><a class="copiable-link" href="#index-alphanumeric"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">character</i>)
+  being either an <i class="i">alphabetic</i>_1 <i class="i">character</i>
+            or a <i class="i">numeric</i> <i class="i">character</i>.
+</p>
+</dd>
+<dt><a id="index-ampersand"></a><span><b class="b">ampersand</b><a class="copiable-link" href="#index-ampersand"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> that is called &ldquo;ampersand&rdquo; (<code class="t">&amp;</code>).
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+<dt><a id="index-anonymous"></a><span><b class="b">anonymous</b><a class="copiable-link" href="#index-anonymous"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  1. (of a <i class="i">class</i> or <i class="i">function</i>) having no <i class="i">name</i>
+  2. (of a <i class="i">restart</i>) having a <i class="i">name</i> of <b class="b">nil</b>.
+</p>
+</dd>
+<dt><a id="index-apparently-uninterned"></a><span><b class="b">apparently uninterned</b><a class="copiable-link" href="#index-apparently-uninterned"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  having a <i class="i">home package</i> of <b class="b">nil</b>.  (An <i class="i">apparently uninterned</i> <i class="i">symbol</i> 
+  might or might not be an <i class="i">uninterned</i> <i class="i">symbol</i>.  <i class="i">Uninterned symbols</i>
+  have a <i class="i">home package</i> of <b class="b">nil</b>, but <i class="i">symbols</i> which have been <i class="i">uninterned</i>
+  from their <i class="i">home package</i> also have a <i class="i">home package</i> of <b class="b">nil</b>,
+  even though they might still be <i class="i">interned</i> in some other <i class="i">package</i>.)
+</p>
+</dd>
+<dt><a id="index-applicable"></a><span><b class="b">applicable</b><a class="copiable-link" href="#index-applicable"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i>
+  1. (of a <i class="i">handler</i>) being an <i class="i">applicable handler</i>.
+  2. (of a <i class="i">method</i>) being an <i class="i">applicable method</i>.
+  3. (of a <i class="i">restart</i>) being an <i class="i">applicable restart</i>.
+</p>
+</dd>
+<dt><a id="index-applicable-handler"></a><span><b class="b">applicable handler</b><a class="copiable-link" href="#index-applicable-handler"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (for a <i class="i">condition</i> being <i class="i">signaled</i>)
+  an <i class="i">active</i> <i class="i">handler</i> for which the associated type contains the
+  <i class="i">condition</i>.
+</p>
+</dd>
+<dt><a id="index-applicable-method"></a><span><b class="b">applicable method</b><a class="copiable-link" href="#index-applicable-method"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">generic function</i>
+				     called with <i class="i">arguments</i>)
+  a <i class="i">method</i> of the <i class="i">generic function</i> for which the
+  <i class="i">arguments</i> satisfy the <i class="i">parameter specializers</i> 
+  of that <i class="i">method</i>.
+  See <a class="ref" href="Selecting-the-Applicable-Methods.html">Selecting the Applicable Methods</a>.
+</p>
+</dd>
+<dt><a id="index-applicable-restart"></a><span><b class="b">applicable restart</b><a class="copiable-link" href="#index-applicable-restart"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. (for a <i class="i">condition</i>)
+     an <i class="i">active</i> <i class="i">handler</i> for which the associated test returns 
+     <i class="i">true</i> when given the <i class="i">condition</i> as an argument.
+  2. (for no particular <i class="i">condition</i>)
+     an <i class="i">active</i> <i class="i">handler</i> for which the associated test returns 
+     <i class="i">true</i> when given <b class="b">nil</b> as an argument.
+</p>
+</dd>
+<dt><a id="index-apply"></a><span><b class="b">apply</b><a class="copiable-link" href="#index-apply"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (a <i class="i">function</i> to a <i class="i">list</i>)
+  to <i class="i">call</i> the <i class="i">function</i> with arguments that are the <i class="i">elements</i>
+  of the <i class="i">list</i>.
+  &ldquo;Applying the function <b class="b">+</b> to a list of integers returns
+	    the sum of the elements of that list.&rdquo;
+</p>
+</dd>
+<dt><a id="index-argument"></a><span><b class="b">argument</b><a class="copiable-link" href="#index-argument"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. (of a <i class="i">function</i>) an <i class="i">object</i> which is offered as data
+     to the <i class="i">function</i> when it is <i class="i">called</i>.
+</p>
+<p>2. (of a <i class="i">format control</i>) a <i class="i">format argument</i>.
+</p>
+</dd>
+<dt><a id="index-argument-evaluation-order"></a><span><b class="b">argument evaluation order</b><a class="copiable-link" href="#index-argument-evaluation-order"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the order in which <i class="i">arguments</i> are evaluated in a function call.
+  &ldquo;The argument evaluation order for Common Lisp is left to right.&rdquo;
+  See <a class="ref" href="Evaluation.html">Evaluation</a>.
+</p>
+</dd>
+<dt><a id="index-argument-precedence-order"></a><span><b class="b">argument precedence order</b><a class="copiable-link" href="#index-argument-precedence-order"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the order in which the <i class="i">arguments</i> to a <i class="i">generic function</i> are
+  considered when sorting the <i class="i">applicable methods</i> into precedence order.
+</p>
+</dd>
+<dt><a id="index-around-method"></a><span><b class="b">around method</b><a class="copiable-link" href="#index-around-method"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">method</i> having the <i class="i">qualifier</i> <code class="t">:around</code>.
+</p>
+</dd>
+<dt><a id="index-array"></a><span><b class="b">array</b><a class="copiable-link" href="#index-array"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">array</b>, which serves as a container for other
+  <i class="i">objects</i> arranged in a Cartesian coordinate system.
+</p>
+</dd>
+<dt><a id="index-array-element-type"></a><span><b class="b">array element type</b><a class="copiable-link" href="#index-array-element-type"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of an <i class="i">array</i>)
+  1. a <i class="i">type</i> associated with the <i class="i">array</i>, 
+     and of which all <i class="i">elements</i> of the <i class="i">array</i> are 
+     constrained to be members.
+  2. the <i class="i">actual array element type</i> of the <i class="i">array</i>.
+  3. the <i class="i">expressed array element type</i> of the <i class="i">array</i>.
+</p>
+</dd>
+<dt><a id="index-array-total-size"></a><span><b class="b">array total size</b><a class="copiable-link" href="#index-array-total-size"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the total number of <i class="i">elements</i> in an <i class="i">array</i>, computed by taking 
+  the product of the <i class="i">dimensions</i> of the <i class="i">array</i>.
+  (The size of a zero-dimensional <i class="i">array</i> is therefore one.)
+</p>
+</dd>
+<dt><a id="index-assign"></a><span><b class="b">assign</b><a class="copiable-link" href="#index-assign"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (a <i class="i">variable</i>)
+  to change the <i class="i">value</i> of the <i class="i">variable</i> in a <i class="i">binding</i>
+  that has already been <i class="i">established</i>.
+  See the <i class="i">special operator</i> <b class="b">setq</b>.
+</p>
+</dd>
+<dt><a id="index-association-list-1"></a><span><b class="b">association list</b><a class="copiable-link" href="#index-association-list-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">list</i> of <i class="i">conses</i> representing an association 
+  of <i class="i">keys</i> with <i class="i">values</i>, where the <i class="i">car</i> of each
+  <i class="i">cons</i> is the <i class="i">key</i> and the <i class="i">cdr</i> is the
+  <i class="i">value</i> associated with that <i class="i">key</i>.
+</p>
+</dd>
+<dt><a id="index-asterisk"></a><span><b class="b">asterisk</b><a class="copiable-link" href="#index-asterisk"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> that is variously called
+      &ldquo;asterisk&rdquo;
+   or &ldquo;star&rdquo; (<code class="t">*</code>).
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+<dt><a id="index-at_002dsign"></a><span><b class="b">at-sign</b><a class="copiable-link" href="#index-at_002dsign"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> that is variously called
+     &ldquo;commercial at&rdquo;
+  or &ldquo;at sign&rdquo; (<code class="t">@</code>).
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+<dt><a id="index-atom"></a><span><b class="b">atom</b><a class="copiable-link" href="#index-atom"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  any <i class="i">object</i> that is not a <i class="i">cons</i>.
+  &ldquo;A vector is an atom.&rdquo;
+</p>
+</dd>
+<dt><a id="index-atomic"></a><span><b class="b">atomic</b><a class="copiable-link" href="#index-atomic"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  being an <i class="i">atom</i>.
+  &ldquo;The number 3, the symbol <code class="t">foo</code>, and <b class="b">nil</b> are atomic.&rdquo;
+</p>
+</dd>
+<dt><a id="index-atomic-type-specifier"></a><span><b class="b">atomic type specifier</b><a class="copiable-link" href="#index-atomic-type-specifier"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">type specifier</i> that is <i class="i">atomic</i>.
+  For every <i class="i">atomic type specifier</i>, <i class="i">x</i>, there is an equivalent
+  <i class="i">compound type specifier</i> with no arguments supplied, <code class="t">(<i class="i">x</i>)</code>.
+</p>
+</dd>
+<dt><a id="index-attribute"></a><span><b class="b">attribute</b><a class="copiable-link" href="#index-attribute"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">character</i>)
+  a program-visible aspect of the <i class="i">character</i>.
+  The only <i class="i">standardized</i> <i class="i">attribute</i> of a <i class="i">character</i>
+  is its <i class="i">code</i>_2, but <i class="i">implementations</i> are permitted to have
+  additional <i class="i">implementation-defined</i> <i class="i">attributes</i>.
+  See <a class="ref" href="Character-Attributes.html">Character Attributes</a>.
+  &ldquo;An implementation that support fonts
+            might make font information an attribute of a character,
+            while others might represent font information separately from characters.&rdquo;
+</p>
+</dd>
+<dt><a id="index-aux-variable"></a><span><b class="b">aux variable</b><a class="copiable-link" href="#index-aux-variable"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">variable</i> that occurs in the part of a <i class="i">lambda list</i>
+  that was introduced by <b class="b">&amp;aux</b>.  Unlike all other <i class="i">variables</i>
+  introduced by a <i class="i">lambda-list</i>, <i class="i">aux variables</i> are not 
+  <i class="i">parameters</i>.
+</p>
+</dd>
+<dt><a id="index-auxiliary-method"></a><span><b class="b">auxiliary method</b><a class="copiable-link" href="#index-auxiliary-method"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a member of one of two sets of <i class="i">methods</i> 
+  (the set of <i class="i">primary methods</i> is the other)
+  that form an exhaustive partition of the set of <i class="i">methods</i>
+  on the <i class="i">method</i>&rsquo;s <i class="i">generic function</i>.
+  How these sets are determined is dependent on the <i class="i">method combination</i> type;
+  see <a class="ref" href="Introduction-to-Methods.html">Introduction to Methods</a>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="B"><span><b class="b">B</b><a class="copiable-link" href="#B"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-backquote"></a><span><b class="b">backquote</b><a class="copiable-link" href="#index-backquote"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> that is variously called
+       &ldquo;grave accent&rdquo; 
+    or &ldquo;backquote&rdquo; (<code class="t">`</code>).
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+<dt><a id="index-backslash"></a><span><b class="b">backslash</b><a class="copiable-link" href="#index-backslash"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> that is variously called
+       &ldquo;reverse solidus&rdquo; 
+    or &ldquo;backslash&rdquo; (<code class="t">\</code>).
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+<dt><a id="index-base-character"></a><span><b class="b">base character</b><a class="copiable-link" href="#index-base-character"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">character</i>
+</p>
+<p>of <i class="i">type</i> <b class="b">base-char</b>.
+</p>
+</dd>
+<dt><a id="index-base-string"></a><span><b class="b">base string</b><a class="copiable-link" href="#index-base-string"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">string</i> of <i class="i">type</i> <b class="b">base-string</b>.
+</p>
+</dd>
+<dt><a id="index-before-method"></a><span><b class="b">before method</b><a class="copiable-link" href="#index-before-method"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">method</i> having the <i class="i">qualifier</i> <code class="t">:before</code>.
+</p>
+</dd>
+<dt><a id="index-bidirectional-1"></a><span><b class="b">bidirectional</b><a class="copiable-link" href="#index-bidirectional-1"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">stream</i>)
+  being both an <i class="i">input</i> <i class="i">stream</i> and an <i class="i">output</i> <i class="i">stream</i>.
+</p>
+</dd>
+<dt><a id="index-binary-1"></a><span><b class="b">binary</b><a class="copiable-link" href="#index-binary-1"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  1. (of a <i class="i">stream</i>)
+     being a <i class="i">stream</i> that has an <i class="i">element type</i> that is a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">integer</b>.
+     The most fundamental operation on a <i class="i">binary</i> <i class="i">input</i> <i class="i">stream</i> 
+     is <b class="b">read-byte</b> and on a <i class="i">binary</i> <i class="i">output</i> <i class="i">stream</i> 
+     is <b class="b">write-byte</b>.
+     See <i class="i">character</i>.
+  2. (of a <i class="i">file</i>)
+     having been created by opening a <i class="i">binary</i> <i class="i">stream</i>.
+     (It is <i class="i">implementation-dependent</i> whether this is an detectable aspect 
+      of the <i class="i">file</i>, or whether any given <i class="i">character</i> <i class="i">file</i> can be
+      treated as a <i class="i">binary</i> <i class="i">file</i>.)
+</p>
+</dd>
+<dt><a id="index-bind"></a><span><b class="b">bind</b><a class="copiable-link" href="#index-bind"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (a <i class="i">variable</i>)
+  to establish a <i class="i">binding</i> for the <i class="i">variable</i>.
+</p>
+</dd>
+<dt><a id="index-binding-1"></a><span><b class="b">binding</b><a class="copiable-link" href="#index-binding-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an association between a <i class="i">name</i> and that which the <i class="i">name</i> 
+  denotes.  
+  &ldquo;A lexical binding is a lexical association between a 
+            name and its value.&rdquo;
+</p>
+</dd>
+<dt><a id="index-bit"></a><span><b class="b">bit</b><a class="copiable-link" href="#index-bit"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">bit</b>; 
+  that is, the <i class="i">integer</i> <code class="t">0</code> or the <i class="i">integer</i> <code class="t">1</code>.
+</p>
+</dd>
+<dt><a id="index-bit-array"></a><span><b class="b">bit array</b><a class="copiable-link" href="#index-bit-array"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a specialized <i class="i">array</i> that is of <i class="i">type</i> <code class="t">(array bit)</code>,
+  and whose elements are of <i class="i">type</i> <b class="b">bit</b>.
+</p>
+</dd>
+<dt><a id="index-bit-vector-1"></a><span><b class="b">bit vector</b><a class="copiable-link" href="#index-bit-vector-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a specialized <i class="i">vector</i> that is of <i class="i">type</i> <b class="b">bit-vector</b>,
+  and whose elements are of <i class="i">type</i> <b class="b">bit</b>.
+</p>
+</dd>
+<dt><a id="index-bit_002dwise-logical-operation-specifier"></a><span><b class="b">bit-wise logical operation specifier</b><a class="copiable-link" href="#index-bit_002dwise-logical-operation-specifier"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> which names one of the sixteen possible bit-wise logical
+  operations that can be performed by the <b class="b">boole</b> function,
+  and which is the <i class="i">value</i> of exactly one of the
+  <i class="i">constant variables</i> 
+  <b class="b">boole-clr</b>,     <b class="b">boole-set</b>,
+  <b class="b">boole-1</b>,       <b class="b">boole-2</b>,
+  <b class="b">boole-c1</b>,      <b class="b">boole-c2</b>,
+  <b class="b">boole-and</b>,     <b class="b">boole-ior</b>,
+  <b class="b">boole-xor</b>,     <b class="b">boole-eqv</b>,
+  <b class="b">boole-nand</b>,    <b class="b">boole-nor</b>,
+  <b class="b">boole-andc1</b>,   <b class="b">boole-andc2</b>,
+  <b class="b">boole-orc1</b>, or <b class="b">boole-orc2</b>.
+</p>
+</dd>
+<dt><a id="index-block"></a><span><b class="b">block</b><a class="copiable-link" href="#index-block"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a named lexical <i class="i">exit point</i>, 
+  <i class="i">established</i> explicitly by <b class="b">block</b>
+  		  or implicitly by <i class="i">operators</i> 
+		       such as <b class="b">loop</b>, <b class="b">do</b> and <b class="b">prog</b>,
+  to which control and values may be transfered by 
+  using a <b class="b">return-from</b> <i class="i">form</i> with the name of the <i class="i">block</i>.
+</p>
+</dd>
+<dt><a id="index-block-tag"></a><span><b class="b">block tag</b><a class="copiable-link" href="#index-block-tag"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the <i class="i">symbol</i> that, within the <i class="i">lexical scope</i> 
+  of a <b class="b">block</b> <i class="i">form</i>, names the <i class="i">block</i>
+  <i class="i">established</i> by that <b class="b">block</b> <i class="i">form</i>.
+  See <b class="b">return</b> or <b class="b">return-from</b>.
+</p>
+</dd>
+<dt><a id="index-boa-lambda-list-1"></a><span><b class="b">boa lambda list</b><a class="copiable-link" href="#index-boa-lambda-list-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">lambda list</i> that is syntactically like an <i class="i">ordinary lambda list</i>,
+  but that is processed in &ldquo;<b class="b">b</b>y <b class="b">o</b>rder of <b class="b">a</b>rgument&rdquo; style.
+  See <a class="ref" href="Boa-Lambda-Lists.html">Boa Lambda Lists</a>.
+</p>
+</dd>
+<dt><a id="index-body-parameter"></a><span><b class="b">body parameter</b><a class="copiable-link" href="#index-body-parameter"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">parameter</i> available in certain <i class="i">lambda lists</i>
+  which from the point of view of <i class="i">conforming programs</i>
+  is like a <i class="i">rest parameter</i> in every way except that it is introduced
+  by <b class="b">&amp;body</b> instead of <b class="b">&amp;rest</b>.  (<i class="i">Implementations</i> are 
+  permitted to provide extensions which distinguish <i class="i">body parameters</i>
+  and <i class="i">rest parameters</i>&mdash;<i class="i">e.g.</i>, the <i class="i">forms</i> for <i class="i">operators</i>
+  which were defined using a <i class="i">body parameter</i> might be pretty printed
+  slightly differently than <i class="i">forms</i> for <i class="i">operators</i> which were 
+  defined using <i class="i">rest parameters</i>.)
+</p>
+</dd>
+<dt><a id="index-boolean"></a><span><b class="b">boolean</b><a class="copiable-link" href="#index-boolean"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">boolean</b>;
+  that is, one of the following <i class="i">objects</i>: 
+       the symbol~<b class="b">t</b>   (representing <i class="i">true</i>),
+    or the symbol~<b class="b">nil</b> (representing <i class="i">false</i>).
+  See <i class="i">generalized boolean</i>.
+</p>
+</dd>
+<dt><a id="index-boolean-equivalent"></a><span><b class="b">boolean equivalent</b><a class="copiable-link" href="#index-boolean-equivalent"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of an <i class="i">object</i> O_1)
+  any <i class="i">object</i> O_2 that has the same truth value as O_1
+  when both O_1 and O_2 are viewed as <i class="i">generalized booleans</i>.
+</p>
+</dd>
+<dt><a id="index-bound"></a><span><b class="b">bound</b><a class="copiable-link" href="#index-bound"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i>, <i class="i">v.t.</i> 
+  1. <i class="i">adj.</i> having an associated denotation in a <i class="i">binding</i>.
+     &ldquo;The variables named by a <b class="b">let</b> are bound within
+               its body.&rdquo;
+     See <i class="i">unbound</i>.
+  2. <i class="i">adj.</i> having a local <i class="i">binding</i> which 
+     <i class="i">shadows</i>_2 another. 
+     &ldquo;The variable <b class="b">*print-escape*</b> is bound while in
+               the <b class="b">princ</b> function.&rdquo;
+  3. <i class="i">v.t.</i> the past tense of <i class="i">bind</i>.
+</p>
+</dd>
+<dt><a id="index-bound-declaration-1"></a><span><b class="b">bound declaration</b><a class="copiable-link" href="#index-bound-declaration-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">declaration</i> that refers to or is associated with a <i class="i">variable</i>
+  or <i class="i">function</i> and that appears within the <i class="i">special form</i> 
+  that <i class="i">establishes</i> the <i class="i">variable</i> or <i class="i">function</i>,
+  but before the body of that <i class="i">special form</i>
+  (specifically, at the head of that <i class="i">form</i>&rsquo;s body).
+  (If a <i class="i">bound declaration</i> refers to a <i class="i">function</i> <i class="i">binding</i> or
+   a <i class="i">lexical variable</i> <i class="i">binding</i>, the <i class="i">scope</i> of
+   the <i class="i">declaration</i> is exactly the <i class="i">scope</i> of that
+   <i class="i">binding</i>.  If the <i class="i">declaration</i> refers to a
+   <i class="i">dynamic variable</i> <i class="i">binding</i>, the <i class="i">scope</i> of
+   the <i class="i">declaration</i> is what the <i class="i">scope</i> of the 
+   <i class="i">binding</i> would have been if it were lexical rather than dynamic.)
+</p>
+</dd>
+<dt><a id="index-bounded"></a><span><b class="b">bounded</b><a class="copiable-link" href="#index-bounded"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">sequence</i> S,
+			      by an ordered pair
+			          of <i class="i">bounding indices</i> i_{start} and i_{end})
+  restricted to a subrange of the <i class="i">elements</i> of S that includes each <i class="i">element</i>
+  beginning with (and including) the one indexed by i_{start} and
+  continuing up to (but not including) the one indexed by i_{end}.
+</p>
+</dd>
+<dt><a id="index-bounding-index"></a><span><b class="b">bounding index</b><a class="copiable-link" href="#index-bounding-index"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">sequence</i> with <i class="i">length</i> n)
+  either of a conceptual pair of <i class="i">integers</i>, i_{start} and i_{end},
+  respectively called the &ldquo;lower bounding index&rdquo; and &ldquo;upper bounding index&rdquo;,
+  such that 0 &lt;= i_{start} &lt;= i_{end} &lt;= n, and which therefore delimit
+  a subrange of the <i class="i">sequence</i> <i class="i">bounded</i> by i_{start} and i_{end}.
+</p>
+</dd>
+<dt><a id="index-bounding-index-designator"></a><span><b class="b">bounding index designator</b><a class="copiable-link" href="#index-bounding-index-designator"> &para;</a></span></dt>
+<dd><p>(for a <i class="i">sequence</i>)
+  one of two <i class="i">objects</i> that, taken together as an ordered pair, 
+  behave as a <i class="i">designator</i> for <i class="i">bounding indices</i> of the <i class="i">sequence</i>; 
+  that is, they denote <i class="i">bounding indices</i> of the <i class="i">sequence</i>,
+  and are either:
+      an <i class="i">integer</i> (denoting itself) and <b class="b">nil</b> 
+       (denoting the <i class="i">length</i> of the <i class="i">sequence</i>),
+   or two <i class="i">integers</i> (each denoting themselves).
+</p>
+</dd>
+<dt><a id="index-break-loop"></a><span><b class="b">break loop</b><a class="copiable-link" href="#index-break-loop"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  A variant of the normal <i class="i">Lisp read-eval-print loop</i> that is recursively
+  entered, usually because the ongoing <i class="i">evaluation</i> of some other <i class="i">form</i>
+  has been suspended for the purpose of debugging.  Often, a <i class="i">break loop</i>
+  provides the ability to exit in such a way as to continue the suspended computation.
+  See the <i class="i">function</i> <b class="b">break</b>.
+</p>
+</dd>
+<dt><a id="index-broadcast-stream"></a><span><b class="b">broadcast stream</b><a class="copiable-link" href="#index-broadcast-stream"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">output</i> <i class="i">stream</i> of <i class="i">type</i> <b class="b">broadcast-stream</b>.
+</p>
+</dd>
+<dt><a id="index-built_002din-class"></a><span><b class="b">built-in class</b><a class="copiable-link" href="#index-built_002din-class"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">class</i> that is a <i class="i">generalized instance</i> of <i class="i">class</i> <b class="b">built-in-class</b>.
+</p>
+</dd>
+<dt><a id="index-built_002din-type"></a><span><b class="b">built-in type</b><a class="copiable-link" href="#index-built_002din-type"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+   one of the <i class="i">types</i> in <i class="i">Figure~4&ndash;2</i>.
+</p>
+</dd>
+<dt><a id="index-byte"></a><span><b class="b">byte</b><a class="copiable-link" href="#index-byte"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. adjacent bits within an <i class="i">integer</i>.
+     (The specific number of bits can vary from point to point in the program;
+      see the <i class="i">function</i> <b class="b">byte</b>.)
+  2. an integer in a specified range.
+     (The specific range can vary from point to point in the program;
+      see the <i class="i">functions</i> <b class="b">open</b> and <b class="b">write-byte</b>.)
+</p>
+</dd>
+<dt><a id="index-byte-specifier"></a><span><b class="b">byte specifier</b><a class="copiable-link" href="#index-byte-specifier"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  An <i class="i">object</i> of <i class="i">implementation-dependent</i> nature 
+  that is returned by the <i class="i">function</i> <b class="b">byte</b> and
+  that specifies the range of bits in an <i class="i">integer</i> to be used
+  as a <i class="i">byte</i> by <i class="i">functions</i> such as <b class="b">ldb</b>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="C"><span><b class="b">C</b><a class="copiable-link" href="#C"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-cadr"></a><span><b class="b">cadr</b><a class="copiable-link" href="#index-cadr"> &para;</a></span></dt>
+<dd><p>pronounced &rsquo;ka ,de r , <i class="i">n.</i> (of an <i class="i">object</i>)
+  the <i class="i">car</i> of the <i class="i">cdr</i> of that <i class="i">object</i>.
+</p>
+</dd>
+<dt><a id="index-call"></a><span><b class="b">call</b><a class="copiable-link" href="#index-call"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i>, <i class="i">n.</i> 
+  1. <i class="i">v.t.</i> (a <i class="i">function</i> with <i class="i">arguments</i>)
+     to cause the <i class="i">code</i> represented by that <i class="i">function</i> to be 
+     <i class="i">executed</i> in an <i class="i">environment</i> where <i class="i">bindings</i> for
+     the <i class="i">values</i> of its <i class="i">parameters</i> have been <i class="i">established</i>
+     based on the <i class="i">arguments</i>.
+     &ldquo;Calling the function <b class="b">+</b> with the arguments 
+               <code class="t">5</code> and <code class="t">1</code> yields a value of <code class="t">6</code>.&rdquo;
+  2. <i class="i">n.</i> a <i class="i">situation</i> in which a <i class="i">function</i> is called.
+</p>
+</dd>
+<dt><a id="index-captured-initialization-form"></a><span><b class="b">captured initialization form</b><a class="copiable-link" href="#index-captured-initialization-form"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">initialization form</i> along with the <i class="i">lexical environment</i>
+  in which the <i class="i">form</i> that defined the <i class="i">initialization form</i>
+  was <i class="i">evaluated</i>.
+  &ldquo;Each newly added shared slot is set to the result of evaluating
+            the captured initialization form for the slot that was specified
+            in the <b class="b">defclass</b> form for the new class.&rdquo;
+</p>
+</dd>
+<dt><a id="index-car"></a><span><b class="b">car</b><a class="copiable-link" href="#index-car"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. a. (of a <i class="i">cons</i>) 
+        the component of a <i class="i">cons</i> corresponding to the first
+        <i class="i">argument</i> to <b class="b">cons</b>; the other component is the
+        <i class="i">cdr</i>.
+	&ldquo;The function <b class="b">rplaca</b> modifies the car of a cons.&rdquo;
+     b. (of a <i class="i">list</i>)
+        the first <i class="i">element</i> of the <i class="i">list</i>, or <b class="b">nil</b> if the
+        <i class="i">list</i> is the <i class="i">empty list</i>.
+  2. the <i class="i">object</i> that is held in the <i class="i">car</i>_1.
+     &ldquo;The function <b class="b">car</b> returns the car of a cons.&rdquo;
+</p>
+</dd>
+<dt><a id="index-case"></a><span><b class="b">case</b><a class="copiable-link" href="#index-case"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">character</i>)
+  the property of being either <i class="i">uppercase</i> or <i class="i">lowercase</i>.
+  Not all <i class="i">characters</i> have <i class="i">case</i>.
+  &ldquo;The characters <code class="t">#\A</code> and <code class="t">#\a</code> have case,
+	    but the character <code class="t">#\$</code> has no case.&rdquo;
+  See <a class="ref" href="Characters-With-Case.html">Characters With Case</a> and the <i class="i">function</i> <b class="b">both-case-p</b>.
+</p>
+</dd>
+<dt><a id="index-case-sensitivity-mode"></a><span><b class="b">case sensitivity mode</b><a class="copiable-link" href="#index-case-sensitivity-mode"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  one of the <i class="i">symbols</i>
+  <code class="t">:upcase</code>, <code class="t">:downcase</code>, <code class="t">:preserve</code>, or <code class="t">:invert</code>.
+</p>
+</dd>
+<dt><a id="index-catch"></a><span><b class="b">catch</b><a class="copiable-link" href="#index-catch"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">exit point</i> which is <i class="i">established</i> by a <b class="b">catch</b>
+  <i class="i">form</i> within the <i class="i">dynamic scope</i> of its body,
+  which is named by a <i class="i">catch tag</i>,
+  and to which control and <i class="i">values</i> may be <i class="i">thrown</i>.
+</p>
+</dd>
+<dt><a id="index-catch-tag"></a><span><b class="b">catch tag</b><a class="copiable-link" href="#index-catch-tag"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> which names an <i class="i">active</i> <i class="i">catch</i>.
+  (If more than one <i class="i">catch</i> is active with the same <i class="i">catch tag</i>,
+   it is only possible to <i class="i">throw</i> to the innermost such <i class="i">catch</i>
+   because the outer one is <i class="i">shadowed</i>_2.)
+</p>
+</dd>
+<dt><a id="index-cddr"></a><span><b class="b">cddr</b><a class="copiable-link" href="#index-cddr"> &para;</a></span></dt>
+<dd><p>pronounced &rsquo;kud e ,de r  or
+	      pronounced &rsquo;ke ,dude r , <i class="i">n.</i> 
+	      (of an <i class="i">object</i>)
+  the <i class="i">cdr</i> of the <i class="i">cdr</i> of that <i class="i">object</i>.
+</p>
+</dd>
+<dt><a id="index-cdr"></a><span><b class="b">cdr</b><a class="copiable-link" href="#index-cdr"> &para;</a></span></dt>
+<dd><p>pronounced &rsquo;ku ,de r , <i class="i">n.</i> 
+  1. a. (of a <i class="i">cons</i>) 
+        the component of a <i class="i">cons</i> corresponding to the second <i class="i">argument</i>
+        to <b class="b">cons</b>; the other component is the <i class="i">car</i>.
+	&ldquo;The function <b class="b">rplacd</b> modifies the cdr of a cons.&rdquo;
+     b. (of a <i class="i">list</i> L_1)
+        either the <i class="i">list</i> L_2 that contains 
+	       the <i class="i">elements</i> of L_1 that follow after the first, 
+	or else <b class="b">nil</b> if L_1 is the <i class="i">empty list</i>.
+  2. the <i class="i">object</i> that is held in the <i class="i">cdr</i>_1.
+     &ldquo;The function <b class="b">cdr</b> returns the cdr of a cons.&rdquo;
+</p>
+</dd>
+<dt><a id="index-cell"></a><span><b class="b">cell</b><a class="copiable-link" href="#index-cell"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> (of an <i class="i">object</i>)
+  a conceptual <i class="i">slot</i> of that <i class="i">object</i>.
+  The <i class="i">dynamic variable</i> and global <i class="i">function</i> <i class="i">bindings</i>
+  of a <i class="i">symbol</i> are sometimes referred to as its <i class="i">value cell</i>
+  and <i class="i">function cell</i>, respectively.
+</p>
+</dd>
+<dt><a id="index-character-2"></a><span><b class="b">character</b><a class="copiable-link" href="#index-character-2"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>, <i class="i">adj.</i>
+  1. <i class="i">n.</i> an <i class="i">object</i> of <i class="i">type</i> <b class="b">character</b>; that is,
+     an <i class="i">object</i> that represents a unitary token in an aggregate quantity of text;
+     see <a class="ref" href="Character-Concepts.html">Character Concepts</a>.
+  2. <i class="i">adj.</i> 
+     a. (of a <i class="i">stream</i>)
+        having an <i class="i">element type</i> that is a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">character</b>.
+        The most fundamental operation on a <i class="i">character</i> <i class="i">input</i> <i class="i">stream</i> 
+        is <b class="b">read-char</b> and on a <i class="i">character</i> <i class="i">output</i> <i class="i">stream</i> 
+        is <b class="b">write-char</b>. See <i class="i">binary</i>.
+     b. (of a <i class="i">file</i>)
+        having been created by opening a <i class="i">character</i> <i class="i">stream</i>.
+        (It is <i class="i">implementation-dependent</i> whether this is an inspectable aspect 
+         of the <i class="i">file</i>, or whether any given <i class="i">binary</i> <i class="i">file</i> can be
+         treated as a <i class="i">character</i> <i class="i">file</i>.)
+</p>
+</dd>
+<dt><a id="index-character-code"></a><span><b class="b">character code</b><a class="copiable-link" href="#index-character-code"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. one of possibly several <i class="i">attributes</i> of a <i class="i">character</i>.
+  2. a non-negative <i class="i">integer</i> less than the <i class="i">value</i> of <b class="b">char-code-limit</b>
+     that is suitable for use as a <i class="i">character code</i>_1.
+</p>
+</dd>
+<dt><a id="index-character-designator"></a><span><b class="b">character designator</b><a class="copiable-link" href="#index-character-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">designator</i> for a <i class="i">character</i>; that is,
+  an <i class="i">object</i> that denotes a <i class="i">character</i> 
+  and that is one of:
+       a <i class="i">designator</i> for a <i class="i">string</i> of <i class="i">length</i> one
+         (denoting the <i class="i">character</i> that is its only <i class="i">element</i>),
+</p>
+<p>or a <i class="i">character</i> (denoting itself).
+</p>
+</dd>
+<dt><a id="index-circular"></a><span><b class="b">circular</b><a class="copiable-link" href="#index-circular"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i>
+  1. (of a <i class="i">list</i>) a <i class="i">circular list</i>.
+  2. (of an arbitrary <i class="i">object</i>)
+     having a <i class="i">component</i>, <i class="i">element</i>, <i class="i">constituent</i>_2, 
+     or <i class="i">subexpression</i> (as appropriate to the context) 
+     that is the <i class="i">object</i> itself.
+</p>
+</dd>
+<dt><a id="index-circular-list-2"></a><span><b class="b">circular list</b><a class="copiable-link" href="#index-circular-list-2"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a chain of <i class="i">conses</i> that has no termination because some
+ <i class="i">cons</i> in the chain is the <i class="i">cdr</i> of a later <i class="i">cons</i>.
+</p>
+</dd>
+<dt><a id="index-class-1"></a><span><b class="b">class</b><a class="copiable-link" href="#index-class-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. an <i class="i">object</i> that uniquely determines the structure and behavior of 
+     a set of other <i class="i">objects</i> called its <i class="i">direct instances</i>, 
+     that contributes structure and behavior to a set of
+     other <i class="i">objects</i> called its <i class="i">indirect instances</i>,
+     and that acts as a <i class="i">type specifier</i> for a set of objects
+     called its <i class="i">generalized instances</i>.
+     &ldquo;The class <b class="b">integer</b> is a subclass of the class <b class="b">number</b>.&rdquo;
+     (Note that the phrase &ldquo;the <i class="i">class</i> <code class="t">foo</code>&rdquo; is often substituted for
+      the more precise phrase &ldquo;the <i class="i">class</i> named <code class="t">foo</code>&rdquo;&mdash;in both
+      cases, a <i class="i">class</i> <i class="i">object</i> (not a <i class="i">symbol</i>) is denoted.)
+  2. (of an <i class="i">object</i>)
+     the uniquely determined <i class="i">class</i> of which the <i class="i">object</i> is
+     a <i class="i">direct instance</i>.
+     See the <i class="i">function</i> <b class="b">class-of</b>.
+     &ldquo;The class of the object returned by <b class="b">gensym</b> 
+ 	       is <b class="b">symbol</b>.&rdquo;
+     (Note that with this usage a phrase such as &ldquo;its <i class="i">class</i> is <code class="t">foo</code>&rdquo; 
+      is often substituted for the more precise phrase
+      &ldquo;its <i class="i">class</i> is the <i class="i">class</i> named <code class="t">foo</code>&rdquo;&mdash;in both
+      cases, a <i class="i">class</i> <i class="i">object</i> (not a <i class="i">symbol</i>) is denoted.)
+</p>
+</dd>
+<dt><a id="index-class-designator"></a><span><b class="b">class designator</b><a class="copiable-link" href="#index-class-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">designator</i> for a <i class="i">class</i>; that is,
+  an <i class="i">object</i> that denotes a <i class="i">class</i> 
+  and that is one of:
+       a <i class="i">symbol</i> (denoting the <i class="i">class</i> named by that <i class="i">symbol</i>;
+		        see the <i class="i">function</i> <b class="b">find-class</b>)
+    or a <i class="i">class</i> (denoting itself).
+</p>
+</dd>
+<dt><a id="index-class-precedence-list-2"></a><span><b class="b">class precedence list</b><a class="copiable-link" href="#index-class-precedence-list-2"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a unique total ordering on a <i class="i">class</i>
+  and its <i class="i">superclasses</i> that is consistent with the
+  <i class="i">local precedence orders</i> for the <i class="i">class</i> and its
+  <i class="i">superclasses</i>.
+  For detailed information, see <a class="ref" href="Determining-the-Class-Precedence-List.html">Determining the Class Precedence List</a>.
+</p>
+</dd>
+<dt><a id="index-close"></a><span><b class="b">close</b><a class="copiable-link" href="#index-close"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (a <i class="i">stream</i>)
+  to terminate usage of the <i class="i">stream</i> as a source or sink of data,
+  permitting the <i class="i">implementation</i> to reclaim its internal data structures,
+  and to free any external resources which might have been locked by the
+ <i class="i">stream</i> when it was opened.
+</p>
+</dd>
+<dt><a id="index-closed-1"></a><span><b class="b">closed</b><a class="copiable-link" href="#index-closed-1"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">stream</i>)
+  having been <i class="i">closed</i> (see <i class="i">close</i>).
+  Some (but not all) operations that are valid on <i class="i">open</i> <i class="i">streams</i> 
+  are not valid on <i class="i">closed</i> <i class="i">streams</i>.
+  See <a class="ref" href="File-Operations-on-Open-and-Closed-Streams.html">File Operations on Open and Closed Streams</a>.
+</p>
+</dd>
+<dt><a id="index-closure"></a><span><b class="b">closure</b><a class="copiable-link" href="#index-closure"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">lexical closure</i>.
+</p>
+</dd>
+<dt><a id="index-coalesce-1"></a><span><b class="b">coalesce</b><a class="copiable-link" href="#index-coalesce-1"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (<i class="i">literal objects</i> that are <i class="i">similar</i>)
+  to consolidate the identity of those <i class="i">objects</i>,
+  such that they become the <i class="i">same</i> 
+  <i class="i">object</i>.
+  See <a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>.
+</p>
+</dd>
+<dt><a id="index-code"></a><span><b class="b">code</b><a class="copiable-link" href="#index-code"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. <i class="i">Trad.</i> 
+     any representation of actions to be performed, whether conceptual
+     or as an actual <i class="i">object</i>, such as
+         <i class="i">forms</i>,
+         <i class="i">lambda expressions</i>,
+         <i class="i">objects</i> of <i class="i">type</i> <i class="i">function</i>, 
+         text in a <i class="i">source file</i>,
+      or instruction sequences in a <i class="i">compiled file</i>.
+      This is a generic term;
+      the specific nature of the representation depends on its context.
+  2. (of a <i class="i">character</i>)
+     a <i class="i">character code</i>.
+</p>
+</dd>
+<dt><a id="index-coerce"></a><span><b class="b">coerce</b><a class="copiable-link" href="#index-coerce"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (an <i class="i">object</i> to a <i class="i">type</i>)
+  to produce an <i class="i">object</i> from the given <i class="i">object</i>,
+  without modifying that <i class="i">object</i>,
+  by following some set of coercion rules that must be specifically 
+  stated for any context in which this term is used.
+  The resulting <i class="i">object</i> is necessarily of the indicated <i class="i">type</i>, 
+  except when that type is a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">complex</b>; in that case,
+  if a <i class="i">complex rational</i> with an imaginary part of zero would result,
+  the result is a <i class="i">rational</i> 
+  rather than a <i class="i">complex</i>&mdash;see <a class="ref" href="Rule-of-Canonical-Representation-for-Complex-Rationals.html">Rule of Canonical Representation for Complex Rationals</a>.
+</p>
+</dd>
+<dt><a id="index-colon"></a><span><b class="b">colon</b><a class="copiable-link" href="#index-colon"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> that is called &ldquo;colon&rdquo; (<code class="t">:</code>).
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+<dt><a id="index-comma"></a><span><b class="b">comma</b><a class="copiable-link" href="#index-comma"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> that is called &ldquo;comma&rdquo; (<code class="t">,</code>).
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+<dt><a id="index-compilation"></a><span><b class="b">compilation</b><a class="copiable-link" href="#index-compilation"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the process of <i class="i">compiling</i> <i class="i">code</i> by the <i class="i">compiler</i>.
+</p>
+</dd>
+<dt><a id="index-compilation-environment-1"></a><span><b class="b">compilation environment</b><a class="copiable-link" href="#index-compilation-environment-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. An <i class="i">environment</i> that represents information known by the
+     <i class="i">compiler</i> about a <i class="i">form</i> that is being <i class="i">compiled</i>.
+     See <a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>.
+  2. An <i class="i">object</i> that represents the
+     <i class="i">compilation environment</i>_1 
+     and that is used as a second argument to a <i class="i">macro function</i>
+     (which supplies a <i class="i">value</i> for any <b class="b">&amp;environment</b> <i class="i">parameter</i>
+      in the <i class="i">macro function</i>&rsquo;s definition).
+</p>
+</dd>
+<dt><a id="index-compilation-unit"></a><span><b class="b">compilation unit</b><a class="copiable-link" href="#index-compilation-unit"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an interval during which a single unit of compilation is occurring.
+  See the <i class="i">macro</i> <b class="b">with-compilation-unit</b>.
+</p>
+</dd>
+<dt><a id="index-compile"></a><span><b class="b">compile</b><a class="copiable-link" href="#index-compile"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> 
+  1. (<i class="i">code</i>)
+     to perform semantic preprocessing of the <i class="i">code</i>, usually optimizing
+     one or more qualities of the code, such as run-time speed of <i class="i">execution</i>
+     or run-time storage usage.  The minimum semantic requirements of compilation are
+     that it must remove all macro calls and arrange for all <i class="i">load time values</i>
+     to be resolved prior to run time.
+  2. (a <i class="i">function</i>)
+     to produce a new <i class="i">object</i> of <i class="i">type</i> <b class="b">compiled-function</b>
+     which represents the result of <i class="i">compiling</i> the <i class="i">code</i> 
+     represented by the <i class="i">function</i>.  See the <i class="i">function</i> <b class="b">compile</b>.
+  3. (a <i class="i">source file</i>)
+     to produce a <i class="i">compiled file</i> from a <i class="i">source file</i>.
+     See the <i class="i">function</i> <b class="b">compile-file</b>.
+</p>
+</dd>
+<dt><a id="index-compile-time-1"></a><span><b class="b">compile time</b><a class="copiable-link" href="#index-compile-time-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the duration of time that the <i class="i">compiler</i> is processing <i class="i">source code</i>.
+</p>
+</dd>
+<dt><a id="index-compile_002dtime-definition-1"></a><span><b class="b">compile-time definition</b><a class="copiable-link" href="#index-compile_002dtime-definition-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a definition in the <i class="i">compilation environment</i>.
+</p>
+</dd>
+<dt><a id="index-compiled-code-2"></a><span><b class="b">compiled code</b><a class="copiable-link" href="#index-compiled-code-2"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. <i class="i">compiled functions</i>.
+  2. <i class="i">code</i> that represents <i class="i">compiled functions</i>,
+     such as the contents of a <i class="i">compiled file</i>.
+</p>
+</dd>
+<dt><a id="index-compiled-file-1"></a><span><b class="b">compiled file</b><a class="copiable-link" href="#index-compiled-file-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">file</i> which represents the results of <i class="i">compiling</i> the 
+  <i class="i">forms</i> which appeared in a corresponding <i class="i">source file</i>,
+  and which can be <i class="i">loaded</i>.  See the <i class="i">function</i> <b class="b">compile-file</b>.
+</p>
+</dd>
+<dt><a id="index-compiled-function"></a><span><b class="b">compiled function</b><a class="copiable-link" href="#index-compiled-function"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">compiled-function</b>, which is a <i class="i">function</i>
+  that has been <i class="i">compiled</i>, which contains no references to <i class="i">macros</i> that
+  must be expanded at run time, and which contains no unresolved references 
+  to <i class="i">load time values</i>.
+</p>
+</dd>
+<dt><a id="index-compiler-2"></a><span><b class="b">compiler</b><a class="copiable-link" href="#index-compiler-2"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a facility that is part of Lisp and that translates <i class="i">code</i>
+  into an <i class="i">implementation-dependent</i> form
+  that might be represented or <i class="i">executed</i> efficiently.
+  The functions <b class="b">compile</b> and <b class="b">compile-file</b>
+  permit programs to invoke the <i class="i">compiler</i>.
+</p>
+</dd>
+<dt><a id="index-compiler-macro-1"></a><span><b class="b">compiler macro</b><a class="copiable-link" href="#index-compiler-macro-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an auxiliary macro definition for a globally defined <i class="i">function</i>
+  or <i class="i">macro</i> which might or might not be called by any given
+  <i class="i">conforming implementation</i> and which must preserve the semantics
+  of the globally defined <i class="i">function</i> or <i class="i">macro</i> but which might
+  perform some additional optimizations.  (Unlike a <i class="i">macro</i>, 
+  a <i class="i">compiler macro</i> does not extend the syntax of <span class="r">Common Lisp</span>; rather, it
+  provides an alternate implementation strategy for some existing syntax
+  or functionality.)
+</p>
+</dd>
+<dt><a id="index-compiler-macro-expansion"></a><span><b class="b">compiler macro expansion</b><a class="copiable-link" href="#index-compiler-macro-expansion"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. the process of translating a <i class="i">form</i> into another <i class="i">form</i>
+     by a <i class="i">compiler macro</i>.
+  2. the <i class="i">form</i> resulting from this process.
+</p>
+</dd>
+<dt><a id="index-compiler-macro-form"></a><span><b class="b">compiler macro form</b><a class="copiable-link" href="#index-compiler-macro-form"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">function form</i> or <i class="i">macro form</i> whose <i class="i">operator</i>
+  has a definition as a <i class="i">compiler macro</i>, 
+  or a <b class="b">funcall</b> <i class="i">form</i> whose first <i class="i">argument</i> is a
+  <b class="b">function</b> <i class="i">form</i> whose <i class="i">argument</i> is the <i class="i">name</i>
+  of a <i class="i">function</i> that has a definition as a <i class="i">compiler macro</i>.
+</p>
+</dd>
+<dt><a id="index-compiler-macro-function"></a><span><b class="b">compiler macro function</b><a class="copiable-link" href="#index-compiler-macro-function"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">function</i> of two arguments, a <i class="i">form</i> and an 
+  <i class="i">environment</i>, that implements <i class="i">compiler macro expansion</i> by
+  producing either a <i class="i">form</i> to be used in place of the original
+  argument <i class="i">form</i> or else <b class="b">nil</b>, indicating that the original <i class="i">form</i>
+  should not be replaced.  See <a class="ref" href="Compiler-Macros.html">Compiler Macros</a>.
+</p>
+</dd>
+<dt><a id="index-complex"></a><span><b class="b">complex</b><a class="copiable-link" href="#index-complex"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">complex</b>.
+</p>
+</dd>
+<dt><a id="index-complex-float"></a><span><b class="b">complex float</b><a class="copiable-link" href="#index-complex-float"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">complex</b> which has a <i class="i">complex part type</i>
+  that is a <i class="i">subtype</i> of <b class="b">float</b>.
+  A <i class="i">complex float</i> is a <i class="i">complex</i>,
+  but it is not a <i class="i">float</i>.
+</p>
+</dd>
+<dt><a id="index-complex-part-type"></a><span><b class="b">complex part type</b><a class="copiable-link" href="#index-complex-part-type"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">complex</i>)
+  1. the <i class="i">type</i> which is used to represent both the real part 
+     and the imaginary part of the <i class="i">complex</i>.
+  2. the <i class="i">actual complex part type</i> of the <i class="i">complex</i>.
+  3. the <i class="i">expressed complex part type</i> of the <i class="i">complex</i>.
+</p>
+</dd>
+<dt><a id="index-complex-rational"></a><span><b class="b">complex rational</b><a class="copiable-link" href="#index-complex-rational"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">complex</b> which has a <i class="i">complex part type</i>
+  that is a <i class="i">subtype</i> of <b class="b">rational</b>.
+  A <i class="i">complex rational</i> is a <i class="i">complex</i>, but it is not a <i class="i">rational</i>.  
+  No <i class="i">complex rational</i> has an imaginary part of zero because such a
+  number is always represented by <span class="r">Common Lisp</span> as an <i class="i">object</i> of <i class="i">type</i> <b class="b">rational</b>;
+  see <a class="ref" href="Rule-of-Canonical-Representation-for-Complex-Rationals.html">Rule of Canonical Representation for Complex Rationals</a>.
+</p>
+</dd>
+<dt><a id="index-complex-single-float"></a><span><b class="b">complex single float</b><a class="copiable-link" href="#index-complex-single-float"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">complex</b> which has a <i class="i">complex part type</i>
+  that is a <i class="i">subtype</i> of <b class="b">single-float</b>.
+  A <i class="i">complex single float</i> is a <i class="i">complex</i>,
+  but it is not a <i class="i">single float</i>.
+</p>
+</dd>
+<dt><a id="index-composite-stream"></a><span><b class="b">composite stream</b><a class="copiable-link" href="#index-composite-stream"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">stream</i> that is composed of one or more other <i class="i">streams</i>.
+  &ldquo;<b class="b">make-synonym-stream</b> creates a composite stream.&rdquo;
+</p>
+</dd>
+<dt><a id="index-compound-form"></a><span><b class="b">compound form</b><a class="copiable-link" href="#index-compound-form"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">non-empty</i> <i class="i">list</i> which is a <i class="i">form</i>:
+  a <i class="i">special form</i>,
+  a <i class="i">lambda form</i>,
+  a <i class="i">macro form</i>, 
+  or a <i class="i">function form</i>.
+</p>
+</dd>
+<dt><a id="index-compound-type-specifier-1"></a><span><b class="b">compound type specifier</b><a class="copiable-link" href="#index-compound-type-specifier-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">type specifier</i> that is a <i class="i">cons</i>;
+  <i class="i">i.e.</i>, a <i class="i">type specifier</i> that is not an <i class="i">atomic type specifier</i>.
+  &ldquo;<code class="t">(vector single-float)</code> is a compound type specifier.&rdquo;
+</p>
+</dd>
+<dt><a id="index-concatenated-stream"></a><span><b class="b">concatenated stream</b><a class="copiable-link" href="#index-concatenated-stream"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">input</i> <i class="i">stream</i> of <i class="i">type</i> <b class="b">concatenated-stream</b>.
+</p>
+</dd>
+<dt><a id="index-condition"></a><span><b class="b">condition</b><a class="copiable-link" href="#index-condition"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. an <i class="i">object</i> which represents a <i class="i">situation</i>&mdash;usually,
+     but not necessarily, during <i class="i">signaling</i>.
+  2. an <i class="i">object</i> of <i class="i">type</i> <b class="b">condition</b>.
+</p>
+</dd>
+<dt><a id="index-condition-designator-1"></a><span><b class="b">condition designator</b><a class="copiable-link" href="#index-condition-designator-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  one or more <i class="i">objects</i> that, taken together, 
+  denote either an existing <i class="i">condition</i> <i class="i">object</i> 
+	     or a <i class="i">condition</i> <i class="i">object</i> to be implicitly created.
+  For details, see <a class="ref" href="Condition-Designators.html">Condition Designators</a>.
+</p>
+</dd>
+<dt><a id="index-condition-handler"></a><span><b class="b">condition handler</b><a class="copiable-link" href="#index-condition-handler"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">function</i> that might be invoked by the act of <i class="i">signaling</i>,
+  that receives the <i class="i">condition</i> being signaled as its only argument,
+  and that is permitted to <i class="i">handle</i> the <i class="i">condition</i> 
+  or to <i class="i">decline</i>.  See <a class="ref" href="Signaling.html">Signaling</a>.
+</p>
+</dd>
+<dt><a id="index-condition-reporter-1"></a><span><b class="b">condition reporter</b><a class="copiable-link" href="#index-condition-reporter-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">function</i> that describes how a <i class="i">condition</i> is to be printed
+  when the <i class="i">Lisp printer</i> is invoked while <b class="b">*print-escape*</b> 
+  is <i class="i">false</i>.  See <a class="ref" href="Printing-Conditions.html">Printing Conditions</a>.
+</p>
+</dd>
+<dt><a id="index-conditional-newline"></a><span><b class="b">conditional newline</b><a class="copiable-link" href="#index-conditional-newline"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a point in output where a <i class="i">newline</i> might be inserted at the
+  discretion of the <i class="i">pretty printer</i>.
+  There are four kinds of <i class="i">conditional newlines</i>,
+  called &ldquo;linear-style,&rdquo;
+	 &ldquo;fill-style,&rdquo;
+	 &ldquo;miser-style,&rdquo;
+     and &ldquo;mandatory-style.&rdquo;
+  See the <i class="i">function</i> <b class="b">pprint-newline</b> and <a class="ref" href="Dynamic-Control-of-the-Arrangement-of-Output.html">Dynamic Control of the Arrangement of Output</a>.
+</p>
+</dd>
+<dt><a id="index-conformance"></a><span><b class="b">conformance</b><a class="copiable-link" href="#index-conformance"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a state achieved by proper and complete adherence to the requirements
+  of this specification.  See <a class="ref" href="Conformance.html">Conformance</a>.
+</p>
+</dd>
+<dt><a id="index-conforming-code-1"></a><span><b class="b">conforming code</b><a class="copiable-link" href="#index-conforming-code-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  <i class="i">code</i> that is all of part of a <i class="i">conforming program</i>.
+</p>
+</dd>
+<dt><a id="index-conforming-implementation-1"></a><span><b class="b">conforming implementation</b><a class="copiable-link" href="#index-conforming-implementation-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">implementation</i>, used to emphasize complete and correct
+  adherance to all conformance criteria.
+  A <i class="i">conforming implementation</i> is capable of 
+      accepting a <i class="i">conforming program</i> as input,
+      preparing that <i class="i">program</i> for <i class="i">execution</i>,
+  and executing the prepared <i class="i">program</i> in accordance with this specification.
+  An <i class="i">implementation</i> which
+  has been extended may still be a <i class="i">conforming implementation</i> 
+  provided that no extension interferes with the correct function of any
+  <i class="i">conforming program</i>.
+</p>
+</dd>
+<dt><a id="index-conforming-processor"></a><span><b class="b">conforming processor</b><a class="copiable-link" href="#index-conforming-processor"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">ANSI</i> 
+  a <i class="i">conforming implementation</i>.
+</p>
+</dd>
+<dt><a id="index-conforming-program-1"></a><span><b class="b">conforming program</b><a class="copiable-link" href="#index-conforming-program-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">program</i>, used to emphasize the fact that the <i class="i">program</i>
+  depends for its correctness only upon documented aspects of <span class="r">Common Lisp</span>, and
+  can therefore be expected to run correctly in any <i class="i">conforming implementation</i>.
+</p>
+</dd>
+<dt><a id="index-congruent"></a><span><b class="b">congruent</b><a class="copiable-link" href="#index-congruent"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  conforming to the rules of <i class="i">lambda list</i> congruency, as detailed in 
+  <a class="ref" href="Congruent-Lambda_002dlists-for-all-Methods-of-a-Generic-Function.html">Congruent Lambda-lists for all Methods of a Generic Function</a>.
+</p>
+</dd>
+<dt><a id="index-cons-1"></a><span><b class="b">cons</b><a class="copiable-link" href="#index-cons-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i><i class="i">v.</i> 
+  1. <i class="i">n.</i> a compound data <i class="i">object</i> having two components called the
+     <i class="i">car</i> and the <i class="i">cdr</i>.
+  2. <i class="i">v.</i> to create such an <i class="i">object</i>.
+  3. <i class="i">v.</i> <i class="i">Idiom.</i> to create any <i class="i">object</i>, or to allocate storage.
+</p>
+</dd>
+<dt><a id="index-constant"></a><span><b class="b">constant</b><a class="copiable-link" href="#index-constant"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. a <i class="i">constant form</i>.
+  2. a <i class="i">constant variable</i>.
+  3. a <i class="i">constant object</i>.
+  4. a <i class="i">self-evaluating object</i>.
+</p>
+</dd>
+<dt><a id="index-constant-form"></a><span><b class="b">constant form</b><a class="copiable-link" href="#index-constant-form"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  any <i class="i">form</i>
+   for which <i class="i">evaluation</i> always <i class="i">yields</i> the same <i class="i">value</i>,
+   that neither affects nor is affected by the <i class="i">environment</i>
+     in which it is <i class="i">evaluated</i> (except that it is permitted to
+     refer to the names of <i class="i">constant variables</i> 
+     defined in the <i class="i">environment</i>),
+   and
+   that neither affects nor is affected by the state of any <i class="i">object</i>
+     except those <i class="i">objects</i> that are <i class="i">otherwise inaccessible parts</i>
+     of <i class="i">objects</i> created by the <i class="i">form</i> itself.
+  &ldquo;A <b class="b">car</b> form in which the argument is a
+            <b class="b">quote</b> form is a constant form.&rdquo;
+</p>
+</dd>
+<dt><a id="index-constant-object"></a><span><b class="b">constant object</b><a class="copiable-link" href="#index-constant-object"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> that is constrained (<i class="i">e.g.</i>, by its context in a <i class="i">program</i>
+  or by the source from which it was obtained) to be <i class="i">immutable</i>.
+  &ldquo;A literal object that has been processed by <b class="b">compile-file</b>
+	    is a constant object.&rdquo;
+</p>
+</dd>
+<dt><a id="index-constant-variable"></a><span><b class="b">constant variable</b><a class="copiable-link" href="#index-constant-variable"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">variable</i>, the <i class="i">value</i> of which can never change;
+  that is, a <i class="i">keyword</i>_1 or a <i class="i">named constant</i>.
+  &ldquo;The symbols <b class="b">t</b>, <b class="b">nil</b>, <code class="t">:direction</code>, and
+            <b class="b">most-positive-fixnum</b> are constant variables.&rdquo;
+</p>
+</dd>
+<dt><a id="index-constituent"></a><span><b class="b">constituent</b><a class="copiable-link" href="#index-constituent"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>, <i class="i">adj.</i>
+  1. a. <i class="i">n.</i> the <i class="i">syntax type</i> of a <i class="i">character</i> that is part of a <i class="i">token</i>.
+         For details, see <a class="ref" href="Constituent-Characters.html">Constituent Characters</a>.
+     b. <i class="i">adj.</i> (of a <i class="i">character</i>)
+        having the <i class="i">constituent</i>_{1a} <i class="i">syntax type</i>_2.
+     c. <i class="i">n.</i> a <i class="i">constituent</i>_{1b} <i class="i">character</i>.
+  2. <i class="i">n.</i> (of a <i class="i">composite stream</i>)
+     one of possibly several <i class="i">objects</i> that collectively comprise
+     the source or sink of that <i class="i">stream</i>.
+</p>
+</dd>
+<dt><a id="index-constituent-trait"></a><span><b class="b">constituent trait</b><a class="copiable-link" href="#index-constituent-trait"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">character</i>)
+  one of several classifications of a <i class="i">constituent</i> <i class="i">character</i>
+  in a <i class="i">readtable</i>.  See <a class="ref" href="Constituent-Characters.html">Constituent Characters</a>.
+</p>
+</dd>
+<dt><a id="index-constructed-stream"></a><span><b class="b">constructed stream</b><a class="copiable-link" href="#index-constructed-stream"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">stream</i> whose source or sink is a Lisp <i class="i">object</i>.
+  Note that since a <i class="i">stream</i> is another Lisp <i class="i">object</i>,
+  <i class="i">composite streams</i> are considered <i class="i">constructed streams</i>.
+  &ldquo;A string stream is a constructed stream.&rdquo;
+</p>
+</dd>
+<dt><a id="index-contagion"></a><span><b class="b">contagion</b><a class="copiable-link" href="#index-contagion"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a process whereby operations on <i class="i">objects</i> of differing <i class="i">types</i>
+  (<i class="i">e.g.</i>, arithmetic on mixed <i class="i">types</i> of <i class="i">numbers</i>) produce a result
+  whose <i class="i">type</i> is controlled by the dominance of one <i class="i">argument</i>&rsquo;s
+  <i class="i">type</i> over the <i class="i">types</i> of the other <i class="i">arguments</i>.
+  See <a class="ref" href="Contagion-in-Numeric-Operations.html">Contagion in Numeric Operations</a>.
+</p>
+</dd>
+<dt><a id="index-continuable"></a><span><b class="b">continuable</b><a class="copiable-link" href="#index-continuable"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of an <i class="i">error</i>)
+  an <i class="i">error</i> that is <i class="i">correctable</i> by the <code class="t">continue</code> restart.
+</p>
+</dd>
+<dt><a id="index-control-form"></a><span><b class="b">control form</b><a class="copiable-link" href="#index-control-form"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. a <i class="i">form</i> that establishes one or more places to which control
+     can be transferred.
+  2. a <i class="i">form</i> that transfers control.
+</p>
+</dd>
+<dt><a id="index-copy"></a><span><b class="b">copy</b><a class="copiable-link" href="#index-copy"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. (of a <i class="i">cons</i> C)
+     a <i class="i">fresh</i> <i class="i">cons</i> with the <i class="i">same</i> <i class="i">car</i> and <i class="i">cdr</i> as C.
+  2. (of a <i class="i">list</i> L)
+     a <i class="i">fresh</i> <i class="i">list</i> with the <i class="i">same</i> <i class="i">elements</i> as L.  
+     (Only the <i class="i">list structure</i> is <i class="i">fresh</i>;
+      the <i class="i">elements</i> are the <i class="i">same</i>.)
+     See the <i class="i">function</i> <b class="b">copy-list</b>.
+  3. (of an <i class="i">association list</i> A with <i class="i">elements</i> A_i)
+     a <i class="i">fresh</i> <i class="i">list</i> B with <i class="i">elements</i> B_i, each of which is
+     <b class="b">nil</b> if A_i is <b class="b">nil</b>, or else a <i class="i">copy</i> of the <i class="i">cons</i> A_i.
+     See the <i class="i">function</i> <b class="b">copy-alist</b>.
+  4. (of a <i class="i">tree</i> T)
+     a <i class="i">fresh</i> <i class="i">tree</i> with the <i class="i">same</i> <i class="i">leaves</i> as T.
+     See the <i class="i">function</i> <b class="b">copy-tree</b>.
+  5. (of a <i class="i">random state</i> R)
+     a <i class="i">fresh</i> <i class="i">random state</i> that, if used as an argument to
+     to the <i class="i">function</i> <b class="b">random</b> would produce the same series of &ldquo;random&rdquo;
+     values as R would produce.
+</p>
+<p>6. (of a <i class="i">structure</i> S)
+     a <i class="i">fresh</i> <i class="i">structure</i> that has the same <i class="i">type</i> as S,
+     and that has slot values, each of which is the <i class="i">same</i> as the 
+     corresponding slot value of S.
+</p>
+<p>(Note that since the difference between a <i class="i">cons</i>, a <i class="i">list</i>, 
+   and a <i class="i">tree</i> is a matter of &ldquo;view&rdquo; or &ldquo;intention,&rdquo;  there can
+   be no general-purpose <i class="i">function</i> which, based solely on the <i class="i">type</i>
+   of an <i class="i">object</i>, can determine which of these distinct meanings is 
+   intended.  The distinction rests solely on the basis of the text description
+   within this document.  For example, phrases like &ldquo;a <i class="i">copy</i> of the
+   given <i class="i">list</i>&rdquo; or &ldquo;copy of the <i class="i">list</i> <i class="i">x</i>&rdquo; imply the
+   second definition.)
+</p>
+</dd>
+<dt><a id="index-correctable"></a><span><b class="b">correctable</b><a class="copiable-link" href="#index-correctable"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of an <i class="i">error</i>)
+  1. (by a <i class="i">restart</i> other than <b class="b">abort</b> 
+      that has been associated with the <i class="i">error</i>)
+     capable of being corrected by invoking that <i class="i">restart</i>.
+     &ldquo;The function <b class="b">cerror</b> signals an error 
+	       that is correctable by the <b class="b">continue</b> <i class="i">restart</i>.&rdquo;
+</p>
+<p>(Note that correctability is not a property of an
+      <i class="i">error</i> <i class="i">object</i>, but rather a property of the 
+      <i class="i">dynamic environment</i> that is in effect when the
+      <i class="i">error</i> is <i class="i">signaled</i>.
+      Specifically, the <i class="i">restart</i> is &ldquo;associated with&rdquo; 
+      the <i class="i">error</i> <i class="i">condition</i> <i class="i">object</i>.
+      See <a class="ref" href="Associating-a-Restart-with-a-Condition.html">Associating a Restart with a Condition</a>.)
+</p>
+<p>2. (when no specific <i class="i">restart</i> is mentioned)
+     <i class="i">correctable</i>_1 by at least one <i class="i">restart</i>.
+     &ldquo;<b class="b">import</b> signals a correctable error of <i class="i">type</i> <b class="b">package-error</b>
+	       if any of the imported symbols has the same name as
+	        some distinct symbol already accessible in the package.&rdquo;
+</p>
+</dd>
+<dt><a id="index-current-input-base-1"></a><span><b class="b">current input base</b><a class="copiable-link" href="#index-current-input-base-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (in a <i class="i">dynamic environment</i>)
+  the <i class="i">radix</i> that is the <i class="i">value</i> of <b class="b">*read-base*</b> in that <i class="i">environment</i>, 
+  and that is the default <i class="i">radix</i> employed by the <i class="i">Lisp reader</i>
+  and its related <i class="i">functions</i>.
+</p>
+</dd>
+<dt><a id="index-current-logical-block"></a><span><b class="b">current logical block</b><a class="copiable-link" href="#index-current-logical-block"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the context of the innermost lexically enclosing use of <b class="b">pprint-logical-block</b>.
+</p>
+</dd>
+<dt><a id="index-current-output-base-1"></a><span><b class="b">current output base</b><a class="copiable-link" href="#index-current-output-base-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (in a <i class="i">dynamic environment</i>)
+  the <i class="i">radix</i> that is the <i class="i">value</i> of <b class="b">*print-base*</b> in that <i class="i">environment</i>, 
+  and that is the default <i class="i">radix</i> employed by the <i class="i">Lisp printer</i>
+  and its related <i class="i">functions</i>.
+</p>
+</dd>
+<dt><a id="index-current-package-1"></a><span><b class="b">current package</b><a class="copiable-link" href="#index-current-package-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (in a <i class="i">dynamic environment</i>)
+  the <i class="i">package</i> that is the <i class="i">value</i> of <b class="b">*package*</b> in that <i class="i">environment</i>, 
+  and that is the default <i class="i">package</i> employed by the <i class="i">Lisp reader</i> 
+  and <i class="i">Lisp printer</i>, and their related <i class="i">functions</i>.
+</p>
+</dd>
+<dt><a id="index-current-pprint-dispatch-table-1"></a><span><b class="b">current pprint dispatch table</b><a class="copiable-link" href="#index-current-pprint-dispatch-table-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (in a <i class="i">dynamic environment</i>)
+  the <i class="i">pprint dispatch table</i> that is the <i class="i">value</i> of <b class="b">*print-pprint-dispatch*</b>
+  in that <i class="i">environment</i>, and that is the default <i class="i">pprint dispatch table</i>
+  employed by the <i class="i">pretty printer</i>.
+</p>
+</dd>
+<dt><a id="index-current-random-state"></a><span><b class="b">current random state</b><a class="copiable-link" href="#index-current-random-state"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (in a <i class="i">dynamic environment</i>)
+  the <i class="i">random state</i> that is the <i class="i">value</i> of <b class="b">*random-state*</b> in that <i class="i">environment</i>, 
+  and that is the default <i class="i">random state</i> employed by <b class="b">random</b>.
+</p>
+</dd>
+<dt><a id="index-current-readtable-1"></a><span><b class="b">current readtable</b><a class="copiable-link" href="#index-current-readtable-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (in a <i class="i">dynamic environment</i>)
+  the <i class="i">readtable</i> that is the <i class="i">value</i> of <b class="b">*readtable*</b> in that <i class="i">environment</i>, 
+  and that affects the way in which <i class="i">expressions</i>_2 are parsed 
+  into <i class="i">objects</i> by the <i class="i">Lisp reader</i>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="D"><span><b class="b">D</b><a class="copiable-link" href="#D"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-data-type"></a><span><b class="b">data type</b><a class="copiable-link" href="#index-data-type"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> 
+  a <i class="i">type</i>.
+</p>
+</dd>
+<dt><a id="index-debug-I_002fO"></a><span><b class="b">debug I/O</b><a class="copiable-link" href="#index-debug-I_002fO"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the <i class="i">bidirectional</i> <i class="i">stream</i> 
+  that is the <i class="i">value</i> of the <i class="i">variable</i> <b class="b">*debug-io*</b>.
+</p>
+</dd>
+<dt><a id="index-debugger"></a><span><b class="b">debugger</b><a class="copiable-link" href="#index-debugger"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a facility that allows the <i class="i">user</i> to handle a <i class="i">condition</i> interactively.
+  For example, the <i class="i">debugger</i> might permit interactive
+  selection of a <i class="i">restart</i> from among the <i class="i">active</i> <i class="i">restarts</i>,
+  and it might perform additional <i class="i">implementation-defined</i> services
+  for the purposes of debugging.
+</p>
+</dd>
+<dt><a id="index-declaration-1"></a><span><b class="b">declaration</b><a class="copiable-link" href="#index-declaration-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">global declaration</i> or <i class="i">local declaration</i>.
+</p>
+</dd>
+<dt><a id="index-declaration-identifier-1"></a><span><b class="b">declaration identifier</b><a class="copiable-link" href="#index-declaration-identifier-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  one of the <i class="i">symbols</i>
+     <b class="b">declaration</b>,
+     <b class="b">dynamic-extent</b>,
+     <b class="b">ftype</b>,
+     <b class="b">function</b>,
+     <b class="b">ignore</b>, 
+     <b class="b">inline</b>,  
+     <b class="b">notinline</b>,
+     <b class="b">optimize</b>, 
+     <b class="b">special</b>, 
+  or <b class="b">type</b>;
+  or a <i class="i">symbol</i> which is the <i class="i">name</i> of a <i class="i">type</i>;
+  or a <i class="i">symbol</i> which has been <i class="i">declared</i>
+     to be a <i class="i">declaration identifier</i> by using a <b class="b">declaration</b>
+     <i class="i">declaration</i>.
+</p>
+</dd>
+<dt><a id="index-declaration-specifier-1"></a><span><b class="b">declaration specifier</b><a class="copiable-link" href="#index-declaration-specifier-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">expression</i> that can appear at top level of a <b class="b">declare</b> 
+  expression or a <b class="b">declaim</b> form, or as the argument to <b class="b">proclaim</b>,
+  and which has a <i class="i">car</i> which is a <i class="i">declaration identifier</i>,
+  and which has a <i class="i">cdr</i> that is data interpreted according to rules
+  specific to the <i class="i">declaration identifier</i>.
+</p>
+</dd>
+<dt><a id="index-declare"></a><span><b class="b">declare</b><a class="copiable-link" href="#index-declare"> &para;</a></span></dt>
+<dd><p><i class="i">v.</i> 
+  to <i class="i">establish</i> a <i class="i">declaration</i>.
+  See <b class="b">declare</b>, <b class="b">declaim</b>, or <b class="b">proclaim</b>.
+</p>
+</dd>
+<dt><a id="index-decline"></a><span><b class="b">decline</b><a class="copiable-link" href="#index-decline"> &para;</a></span></dt>
+<dd><p><i class="i">v.</i> (of a <i class="i">handler</i>)
+  to return normally without having <i class="i">handled</i> the <i class="i">condition</i>
+  being <i class="i">signaled</i>, permitting the signaling process to continue
+  as if the <i class="i">handler</i> had not been present.
+</p>
+</dd>
+<dt><a id="index-decoded-time-1"></a><span><b class="b">decoded time</b><a class="copiable-link" href="#index-decoded-time-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  <i class="i">absolute</i> <i class="i">time</i>, represented as an ordered series of
+  nine <i class="i">objects</i> which, taken together, form a description of
+  a point in calendar time, accurate to the nearest second (except
+  that <i class="i">leap seconds</i> are ignored).
+  See <a class="ref" href="Decoded-Time.html">Decoded Time</a>.
+</p>
+</dd>
+<dt><a id="index-default-method-1"></a><span><b class="b">default method</b><a class="copiable-link" href="#index-default-method-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">method</i> having no <i class="i">parameter specializers</i> other than
+  the <i class="i">class</i> <b class="b">t</b>.  Such a <i class="i">method</i> is always an <i class="i">applicable method</i>
+  but might be <i class="i">shadowed</i>_2 by a more specific <i class="i">method</i>.
+</p>
+</dd>
+<dt><a id="index-defaulted-initialization-argument-list"></a><span><b class="b">defaulted initialization argument list</b><a class="copiable-link" href="#index-defaulted-initialization-argument-list"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">list</i> of alternating initialization argument <i class="i">names</i> and
+  <i class="i">values</i> in which unsupplied initialization arguments are
+  defaulted, used in the protocol for initializing and reinitializing 
+  <i class="i">instances</i> of <i class="i">classes</i>.
+</p>
+</dd>
+<dt><a id="index-define_002dmethod_002dcombination-arguments-lambda-list-1"></a><span><b class="b">define-method-combination arguments lambda list</b><a class="copiable-link" href="#index-define_002dmethod_002dcombination-arguments-lambda-list-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">lambda list</i> used by the <code class="t">:arguments</code> option 
+  to <b class="b">define-method-combination</b>.
+  See <a class="ref" href="Define_002dmethod_002dcombination-Arguments-Lambda-Lists.html">Define-method-combination Arguments Lambda Lists</a>.
+</p>
+</dd>
+<dt><a id="index-define_002dmodify_002dmacro-lambda-list-1"></a><span><b class="b">define-modify-macro lambda list</b><a class="copiable-link" href="#index-define_002dmodify_002dmacro-lambda-list-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">lambda list</i> used by <b class="b">define-modify-macro</b>.
+  See <a class="ref" href="Define_002dmodify_002dmacro-Lambda-Lists.html">Define-modify-macro Lambda Lists</a>.
+</p>
+</dd>
+<dt><a id="index-defined-name"></a><span><b class="b">defined name</b><a class="copiable-link" href="#index-defined-name"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">symbol</i> the meaning of which is defined by <span class="r">Common Lisp</span>.
+</p>
+</dd>
+<dt><a id="index-defining-form"></a><span><b class="b">defining form</b><a class="copiable-link" href="#index-defining-form"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">form</i> that has the side-effect of <i class="i">establishing</i> a definition.
+  &ldquo;<b class="b">defun</b> and <b class="b">defparameter</b> are defining forms.&rdquo;
+</p>
+</dd>
+<dt><a id="index-defsetf-lambda-list-1"></a><span><b class="b">defsetf lambda list</b><a class="copiable-link" href="#index-defsetf-lambda-list-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">lambda list</i> that is like an <i class="i">ordinary lambda list</i> 
+  except that it does not permit <b class="b">&amp;aux</b>
+     and that it permits use of <b class="b">&amp;environment</b>.
+  See <a class="ref" href="Defsetf-Lambda-Lists.html">Defsetf Lambda Lists</a>.
+</p>
+</dd>
+<dt><a id="index-deftype-lambda-list-1"></a><span><b class="b">deftype lambda list</b><a class="copiable-link" href="#index-deftype-lambda-list-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">lambda list</i> that is like a <i class="i">macro lambda list</i>
+  except that the default <i class="i">value</i> for unsupplied <i class="i">optional parameters</i>
+  and <i class="i">keyword parameters</i> is the <i class="i">symbol</i> <b class="b">*</b> (rather than <b class="b">nil</b>).
+  See <a class="ref" href="Deftype-Lambda-Lists.html">Deftype Lambda Lists</a>.
+</p>
+</dd>
+<dt><a id="index-denormalized"></a><span><b class="b">denormalized</b><a class="copiable-link" href="#index-denormalized"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i>, <i class="i">ANSI</i>, <i class="i">IEEE</i> (of a <i class="i">float</i>)
+  conforming to the description of &ldquo;denormalized&rdquo; as described by 
+  <i class="i">IEEE Standard for Binary Floating-Point Arithmetic</i>.
+  For example, in an <i class="i">implementation</i> where the minimum possible exponent 
+  was <code class="t">-7</code> but where <code class="t">0.001</code> was a valid mantissa, the number <code class="t">1.0e-10</code>
+  might be representable as <code class="t">0.001e-7</code> internally even if the <i class="i">normalized</i>
+  representation would call for it to be represented instead as <code class="t">1.0e-10</code> 
+  or <code class="t">0.1e-9</code>.  By their nature, <i class="i">denormalized</i> <i class="i">floats</i> generally
+  have less precision than <i class="i">normalized</i> <i class="i">floats</i>.
+</p>
+</dd>
+<dt><a id="index-derived-type"></a><span><b class="b">derived type</b><a class="copiable-link" href="#index-derived-type"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">type specifier</i> which is defined in terms of an expansion into another
+  <i class="i">type specifier</i>.  <b class="b">deftype</b> defines <i class="i">derived types</i>, 
+  and there may be other <i class="i">implementation-defined</i> <i class="i">operators</i>
+  which do so as well.
+</p>
+</dd>
+<dt><a id="index-derived-type-specifier-1"></a><span><b class="b">derived type specifier</b><a class="copiable-link" href="#index-derived-type-specifier-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">type specifier</i> for a <i class="i">derived type</i>.
+</p>
+</dd>
+<dt><a id="index-designator-1"></a><span><b class="b">designator</b><a class="copiable-link" href="#index-designator-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> that denotes another <i class="i">object</i>.
+  In the dictionary entry for an <i class="i">operator</i>
+  if a <i class="i">parameter</i> is described as a <i class="i">designator</i> for a <i class="i">type</i>,
+  the description of the <i class="i">operator</i> is written in a way
+  that assumes that appropriate coercion to that <i class="i">type</i> has already occurred;
+  that is, that the <i class="i">parameter</i> is already of the denoted <i class="i">type</i>.
+  For more detailed information, see <a class="ref" href="Designators.html">Designators</a>.
+</p>
+</dd>
+<dt><a id="index-destructive"></a><span><b class="b">destructive</b><a class="copiable-link" href="#index-destructive"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of an <i class="i">operator</i>)
+  capable of modifying some program-visible aspect of one or more
+  <i class="i">objects</i> that are either explicit <i class="i">arguments</i> to the
+  <i class="i">operator</i> or that can be obtained directly or indirectly 
+  from the <i class="i">global environment</i> by the <i class="i">operator</i>.
+</p>
+</dd>
+<dt><a id="index-destructuring-lambda-list-1"></a><span><b class="b">destructuring lambda list</b><a class="copiable-link" href="#index-destructuring-lambda-list-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">extended lambda list</i> used in <b class="b">destructuring-bind</b> and
+  nested within <i class="i">macro lambda lists</i>.  
+  See <a class="ref" href="Destructuring-Lambda-Lists.html">Destructuring Lambda Lists</a>.
+</p>
+</dd>
+<dt><a id="index-different"></a><span><b class="b">different</b><a class="copiable-link" href="#index-different"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  not the <i class="i">same</i>
+  &ldquo;The strings <code class="t">&quot;FOO&quot;</code> and <code class="t">&quot;foo&quot;</code> are different under
+	    <b class="b">equal</b> but not under <b class="b">equalp</b>.&rdquo;
+</p>
+</dd>
+<dt><a id="index-digit"></a><span><b class="b">digit</b><a class="copiable-link" href="#index-digit"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (in a <i class="i">radix</i>)
+  a <i class="i">character</i> that is among the possible digits (<code class="t">0</code> to <code class="t">9</code>,
+  <code class="t">A</code> to <code class="t">Z</code>, and <code class="t">a</code> to <code class="t">z</code>) and that is defined to have an 
+  associated numeric weight as a digit in that <i class="i">radix</i>.
+  See <a class="ref" href="Digits-in-a-Radix.html">Digits in a Radix</a>.
+</p>
+</dd>
+<dt><a id="index-dimension-1"></a><span><b class="b">dimension</b><a class="copiable-link" href="#index-dimension-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. a non-negative <i class="i">integer</i> indicating the number of
+     <i class="i">objects</i> an <i class="i">array</i> can hold along one axis.
+     If the <i class="i">array</i> is a <i class="i">vector</i> with a <i class="i">fill pointer</i>,
+     the <i class="i">fill pointer</i> is ignored.
+     &ldquo;The second dimension of that array is 7.&rdquo;
+  2. an axis of an array.
+     &ldquo;This array has six dimensions.&rdquo;
+</p>
+</dd>
+<dt><a id="index-direct-instance"></a><span><b class="b">direct instance</b><a class="copiable-link" href="#index-direct-instance"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">class</i> C)
+  an <i class="i">object</i> whose <i class="i">class</i> is C itself,
+  rather than some <i class="i">subclass</i> of C.
+  &ldquo;The function <b class="b">make-instance</b> always returns a 
+  	    direct instance of the class which is (or is named by)
+	    its first argument.&rdquo;
+</p>
+</dd>
+<dt><a id="index-direct-subclass-1"></a><span><b class="b">direct subclass</b><a class="copiable-link" href="#index-direct-subclass-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">class</i> C_1)
+  a <i class="i">class</i> C_2,
+  such that C_1 is a <i class="i">direct superclass</i> of C_2.
+</p>
+</dd>
+<dt><a id="index-direct-superclass-1"></a><span><b class="b">direct superclass</b><a class="copiable-link" href="#index-direct-superclass-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">class</i> C_1)
+  a <i class="i">class</i> C_2 which was explicitly designated as 
+  a <i class="i">superclass</i> of C_1 in the definition of C_1.
+</p>
+</dd>
+<dt><a id="index-disestablish"></a><span><b class="b">disestablish</b><a class="copiable-link" href="#index-disestablish"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> 
+  to withdraw the <i class="i">establishment</i> of 
+      an <i class="i">object</i>,
+      a  <i class="i">binding</i>,
+      an <i class="i">exit point</i>, 
+      a  <i class="i">tag</i>,
+      a  <i class="i">handler</i>,
+      a  <i class="i">restart</i>, 
+   or an <i class="i">environment</i>.
+</p>
+</dd>
+<dt><a id="index-disjoint"></a><span><b class="b">disjoint</b><a class="copiable-link" href="#index-disjoint"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of <i class="i">types</i>)
+  having no <i class="i">elements</i> in common.
+</p>
+</dd>
+<dt><a id="index-dispatching-macro-character"></a><span><b class="b">dispatching macro character</b><a class="copiable-link" href="#index-dispatching-macro-character"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">macro character</i> that has an associated table that specifies 
+  the <i class="i">function</i> to be called for each <i class="i">character</i> that is
+  seen following the <i class="i">dispatching macro character</i>.
+  See the <i class="i">function</i> <b class="b">make-dispatch-macro-character</b>.
+</p>
+</dd>
+<dt><a id="index-displaced-array"></a><span><b class="b">displaced array</b><a class="copiable-link" href="#index-displaced-array"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">array</i> which has no storage of its own, but which is instead
+  indirected to the storage of another <i class="i">array</i>, called its
+  <i class="i">target</i>, at a specified offset, in such a way that any attempt
+  to <i class="i">access</i> the <i class="i">displaced array</i> implicitly references the 
+  <i class="i">target</i> <i class="i">array</i>.
+</p>
+</dd>
+<dt><a id="index-distinct"></a><span><b class="b">distinct</b><a class="copiable-link" href="#index-distinct"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i>
+  not <i class="i">identical</i>.
+</p>
+</dd>
+<dt><a id="index-documentation-string"></a><span><b class="b">documentation string</b><a class="copiable-link" href="#index-documentation-string"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (in a defining <i class="i">form</i>) 
+  A <i class="i">literal</i> <i class="i">string</i> which because of the context in which
+  it appears (rather than because of some intrinsically observable 
+  aspect of the <i class="i">string</i>) is taken as documentation.
+  In some cases, the <i class="i">documentation string</i> is saved in such a
+  way that it can later be obtained by supplying either an <i class="i">object</i>, 
+  or by supplying a <i class="i">name</i> and a &ldquo;kind&rdquo; to the <i class="i">function</i> <b class="b">documentation</b>.
+  &ldquo;The body of code in a <b class="b">defmacro</b> form can be preceded 
+	    by a documentation string of kind <b class="b">function</b>.&rdquo;
+</p>
+</dd>
+<dt><a id="index-dot"></a><span><b class="b">dot</b><a class="copiable-link" href="#index-dot"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> that is variously called
+     &ldquo;full stop,&rdquo;
+     &ldquo;period,&rdquo;
+  or &ldquo;dot&rdquo; (<code class="t">.</code>).
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+<dt><a id="index-dotted-list-2"></a><span><b class="b">dotted list</b><a class="copiable-link" href="#index-dotted-list-2"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">list</i> which has a terminating <i class="i">atom</i> that is not <b class="b">nil</b>.
+  (An <i class="i">atom</i> by itself is not a <i class="i">dotted list</i>, however.)
+</p>
+</dd>
+<dt><a id="index-dotted-pair"></a><span><b class="b">dotted pair</b><a class="copiable-link" href="#index-dotted-pair"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. a <i class="i">cons</i> whose <i class="i">cdr</i> is a <i class="i">non-list</i>.
+  2. any <i class="i">cons</i>, used to emphasize the use of the <i class="i">cons</i>
+     as a symmetric data pair.
+</p>
+</dd>
+<dt><a id="index-double-float"></a><span><b class="b">double float</b><a class="copiable-link" href="#index-double-float"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">double-float</b>.
+</p>
+</dd>
+<dt><a id="index-double_002dquote"></a><span><b class="b">double-quote</b><a class="copiable-link" href="#index-double_002dquote"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> that is variously called
+      &ldquo;quotation mark&rdquo;
+   or &ldquo;double quote&rdquo; (<code class="t">&quot;</code>).
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+<dt><a id="index-dynamic-binding"></a><span><b class="b">dynamic binding</b><a class="copiable-link" href="#index-dynamic-binding"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">binding</i> in a <i class="i">dynamic environment</i>.
+</p>
+</dd>
+<dt><a id="index-dynamic-environment-1"></a><span><b class="b">dynamic environment</b><a class="copiable-link" href="#index-dynamic-environment-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  that part of an <i class="i">environment</i> that contains <i class="i">bindings</i> 
+  with <i class="i">dynamic extent</i>.  A <i class="i">dynamic environment</i> contains,
+  among other things:
+    <i class="i">exit points</i> established by <b class="b">unwind-protect</b>,
+  and 
+    <i class="i">bindings</i> of
+      <i class="i">dynamic variables</i>,
+      <i class="i">exit points</i> established by <b class="b">catch</b>,
+      <i class="i">condition handlers</i>,
+    and
+      <i class="i">restarts</i>.  
+</p>
+</dd>
+<dt><a id="index-dynamic-extent"></a><span><b class="b">dynamic extent</b><a class="copiable-link" href="#index-dynamic-extent"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">extent</i> whose duration is bounded by points of 
+  <i class="i">establishment</i> and <i class="i">disestablishment</i> within the execution
+  of a particular <i class="i">form</i>.  See <i class="i">indefinite extent</i>.
+  &ldquo;Dynamic variable bindings have dynamic extent.&rdquo;
+</p>
+</dd>
+<dt><a id="index-dynamic-scope"></a><span><b class="b">dynamic scope</b><a class="copiable-link" href="#index-dynamic-scope"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  <i class="i">indefinite scope</i> along with <i class="i">dynamic extent</i>.
+</p>
+</dd>
+<dt><a id="index-dynamic-variable"></a><span><b class="b">dynamic variable</b><a class="copiable-link" href="#index-dynamic-variable"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">variable</i> the <i class="i">binding</i> for which is in the <i class="i">dynamic environment</i>.
+  See <b class="b">special</b>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="E"><span><b class="b">E</b><a class="copiable-link" href="#E"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-echo-stream"></a><span><b class="b">echo stream</b><a class="copiable-link" href="#index-echo-stream"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">stream</i> of <i class="i">type</i> <b class="b">echo-stream</b>.
+</p>
+</dd>
+<dt><a id="index-effective-method-1"></a><span><b class="b">effective method</b><a class="copiable-link" href="#index-effective-method-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the combination of <i class="i">applicable methods</i> that are executed
+  when a <i class="i">generic function</i> is invoked with a particular sequence
+  of <i class="i">arguments</i>.
+</p>
+</dd>
+<dt><a id="index-element"></a><span><b class="b">element</b><a class="copiable-link" href="#index-element"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. (of a <i class="i">list</i>) 
+     an <i class="i">object</i> that is the <i class="i">car</i> of one of the <i class="i">conses</i>
+     that comprise the <i class="i">list</i>.
+  2. (of an <i class="i">array</i>)
+     an <i class="i">object</i> that is stored in the <i class="i">array</i>.
+  3. (of a <i class="i">sequence</i>)
+     an <i class="i">object</i> that is an <i class="i">element</i> of the <i class="i">list</i> or <i class="i">array</i>
+     that is the <i class="i">sequence</i>.
+  4. (of a <i class="i">type</i>)
+     an <i class="i">object</i> that is a member of the set of <i class="i">objects</i>
+     designated by the <i class="i">type</i>.
+  5. (of an <i class="i">input</i> <i class="i">stream</i>)
+     a <i class="i">character</i> or <i class="i">number</i> (as appropriate to the
+     <i class="i">element type</i> of the <i class="i">stream</i>)
+     that is among the ordered series of <i class="i">objects</i> that can be 
+     read from the <i class="i">stream</i> (using <b class="b">read-char</b> or <b class="b">read-byte</b>,
+     as appropriate to the <i class="i">stream</i>).
+  6. (of an <i class="i">output</i> <i class="i">stream</i>)
+     a <i class="i">character</i> or <i class="i">number</i> (as appropriate to the
+     <i class="i">element type</i> of the <i class="i">stream</i>)
+     that is among the ordered series of <i class="i">objects</i> that has been
+     or will be written to the <i class="i">stream</i> (using <b class="b">write-char</b> 
+     or <b class="b">write-byte</b>, as appropriate to the <i class="i">stream</i>).
+  7. (of a <i class="i">class</i>) a <i class="i">generalized instance</i> of the <i class="i">class</i>.
+</p>
+</dd>
+<dt><a id="index-element-type"></a><span><b class="b">element type</b><a class="copiable-link" href="#index-element-type"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. (of an <i class="i">array</i>) the <i class="i">array element type</i> of the <i class="i">array</i>.
+  2. (of a <i class="i">stream</i>) the <i class="i">stream element type</i> of the <i class="i">stream</i>.
+</p>
+</dd>
+<dt><a id="index-em"></a><span><b class="b">em</b><a class="copiable-link" href="#index-em"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> 
+  a context-dependent unit of measure commonly used in typesetting,
+  equal to the displayed width of of a letter &ldquo;M&rdquo; in the current font.
+  (The letter &ldquo;M&rdquo; is traditionally chosen because it is typically 
+   represented by the widest <i class="i">glyph</i> in the font, and other characters&rsquo; 
+   widths are typically fractions of an <i class="i">em</i>.  In implementations providing 
+   non-Roman characters with wider characters than &ldquo;M,&rdquo; it is permissible 
+   for another character to be the <i class="i">implementation-defined</i> reference character
+   for this measure, and for &ldquo;M&rdquo; to be only a fraction of an <i class="i">em</i>
+   wide.)  
+  In a fixed width font, a line with <i class="i">n</i> characters is <i class="i">n</i> 
+  <i class="i">ems</i> wide; in a variable width font, <i class="i">n</i> <i class="i">ems</i> is the
+  expected upper bound on the width of such a line.
+</p>
+</dd>
+<dt><a id="index-empty-list-1"></a><span><b class="b">empty list</b><a class="copiable-link" href="#index-empty-list-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">list</i> containing no <i class="i">elements</i>. See <i class="i">()</i>.
+</p>
+</dd>
+<dt><a id="index-empty-type"></a><span><b class="b">empty type</b><a class="copiable-link" href="#index-empty-type"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">type</i> that contains no <i class="i">elements</i>, and that is
+  a <i class="i">subtype</i> of all <i class="i">types</i> (including itself).
+  See <i class="i">nil</i>.
+</p>
+</dd>
+<dt><a id="index-end-of-file"></a><span><b class="b">end of file</b><a class="copiable-link" href="#index-end-of-file"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. the point in an <i class="i">input</i> <i class="i">stream</i> beyond which there is
+     no further data.
+     Whether or not there is such a point on an <i class="i">interactive stream</i> 
+     is <i class="i">implementation-defined</i>.
+  2. a <i class="i">situation</i> that occurs upon an attempt to obtain data from an
+     <i class="i">input stream</i> that is at the <i class="i">end of file</i>_1.
+</p>
+</dd>
+<dt><a id="index-environment-1"></a><span><b class="b">environment</b><a class="copiable-link" href="#index-environment-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. a set of <i class="i">bindings</i>. See <a class="ref" href="Introduction-to-Environments.html">Introduction to Environments</a>.
+  2. an <i class="i">environment object</i>.
+     &ldquo;<b class="b">macroexpand</b> takes an optional environment argument.&rdquo;
+</p>
+</dd>
+<dt><a id="index-environment-object-1"></a><span><b class="b">environment object</b><a class="copiable-link" href="#index-environment-object-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> representing a set of <i class="i">lexical bindings</i>,
+     used in the processing of a <i class="i">form</i> to provide meanings for
+     <i class="i">names</i> within that <i class="i">form</i>.
+     &ldquo;<b class="b">macroexpand</b> takes an optional environment argument.&rdquo;
+     (The <i class="i">object</i> <b class="b">nil</b> when used as an <i class="i">environment object</i>
+      denotes the <i class="i">null lexical environment</i>;
+      the <i class="i">values</i> of <i class="i">environment parameters</i> 
+      to <i class="i">macro functions</i> are <i class="i">objects</i>
+      of <i class="i">implementation-dependent</i> nature which represent the 
+      <i class="i">environment</i>_1 in which the corresponding <i class="i">macro form</i>
+      is to be expanded.)
+     See <a class="ref" href="Environment-Objects.html">Environment Objects</a>.
+</p>
+</dd>
+<dt><a id="index-environment-parameter"></a><span><b class="b">environment parameter</b><a class="copiable-link" href="#index-environment-parameter"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  A <i class="i">parameter</i> in a <i class="i">defining form</i> f for which there is no corresponding
+  <i class="i">argument</i>; instead, this <i class="i">parameter</i> receives as its value an
+  <i class="i">environment</i> <i class="i">object</i> which corresponds to the
+  <i class="i">lexical environment</i> in which the <i class="i">defining form</i> f appeared.
+</p>
+</dd>
+<dt><a id="index-error"></a><span><b class="b">error</b><a class="copiable-link" href="#index-error"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. (only in the phrase &ldquo;is an error&rdquo;)
+     a <i class="i">situation</i> in which the semantics of a program are not specified, 
+     and in which the consequences are undefined.
+  2. a <i class="i">condition</i> which represents an <i class="i">error</i> <i class="i">situation</i>.
+     See <a class="ref" href="Error-Terminology.html">Error Terminology</a>.
+  3. an <i class="i">object</i> of <i class="i">type</i> <b class="b">error</b>.
+</p>
+</dd>
+<dt><a id="index-error-output"></a><span><b class="b">error output</b><a class="copiable-link" href="#index-error-output"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the <i class="i">output</i> <i class="i">stream</i> which is the <i class="i">value</i> of the <i class="i">dynamic variable</i>
+  <b class="b">*error-output*</b>.
+</p>
+</dd>
+<dt><a id="index-escape"></a><span><b class="b">escape</b><a class="copiable-link" href="#index-escape"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>, <i class="i">adj.</i>
+  1. <i class="i">n.</i> a <i class="i">single escape</i> or a <i class="i">multiple escape</i>.
+  2. <i class="i">adj.</i> <i class="i">single escape</i> or <i class="i">multiple escape</i>.
+</p>
+</dd>
+<dt><a id="index-establish"></a><span><b class="b">establish</b><a class="copiable-link" href="#index-establish"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> 
+  to build or bring into being 
+      a  <i class="i">binding</i>,
+      a  <i class="i">declaration</i>,
+      an <i class="i">exit point</i>,
+      a  <i class="i">tag</i>,
+      a  <i class="i">handler</i>, 
+      a <i class="i">restart</i>,
+   or an <i class="i">environment</i>. 
+  &ldquo;<b class="b">let</b> establishes lexical bindings.&rdquo;
+</p>
+</dd>
+<dt><a id="index-evaluate"></a><span><b class="b">evaluate</b><a class="copiable-link" href="#index-evaluate"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (a <i class="i">form</i> or an <i class="i">implicit progn</i>)
+  to <i class="i">execute</i> the <i class="i">code</i> represented by the <i class="i">form</i>
+  (or the series of <i class="i">forms</i> making up the <i class="i">implicit progn</i>)
+  by applying the rules of <i class="i">evaluation</i>,
+  returning zero or more values.
+</p>
+</dd>
+<dt><a id="index-evaluation-1"></a><span><b class="b">evaluation</b><a class="copiable-link" href="#index-evaluation-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a model whereby <i class="i">forms</i> are <i class="i">executed</i>, returning zero or more values.
+  Such execution might be implemented directly in one step by an interpreter
+  or in two steps by first <i class="i">compiling</i> the <i class="i">form</i> and then
+  <i class="i">executing</i> the <i class="i">compiled</i> <i class="i">code</i>; this choice is 
+  dependent both on context and the nature of the <i class="i">implementation</i>, 
+  but in any case is not in general detectable by any program.  The evaluation
+  model is designed in such a way that a <i class="i">conforming implementation</i> 
+  might legitimately have only a compiler and no interpreter, or vice versa.
+  See <a class="ref" href="The-Evaluation-Model.html">The Evaluation Model</a>.
+</p>
+</dd>
+<dt><a id="index-evaluation-environment-1"></a><span><b class="b">evaluation environment</b><a class="copiable-link" href="#index-evaluation-environment-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">run-time environment</i> in which macro expanders 
+  and code specified by <b class="b">eval-when</b> to be evaluated
+  are evaluated.  All evaluations initiated by the <i class="i">compiler</i> 
+  take place in the <i class="i">evaluation environment</i>.
+</p>
+</dd>
+<dt><a id="index-execute"></a><span><b class="b">execute</b><a class="copiable-link" href="#index-execute"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> <i class="i">Trad.</i> (<i class="i">code</i>)
+  to perform the imperative actions represented by the <i class="i">code</i>.
+</p>
+</dd>
+<dt><a id="index-execution-time"></a><span><b class="b">execution time</b><a class="copiable-link" href="#index-execution-time"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the duration of time that <i class="i">compiled code</i> is being <i class="i">executed</i>.
+</p>
+</dd>
+<dt><a id="index-exhaustive-partition"></a><span><b class="b">exhaustive partition</b><a class="copiable-link" href="#index-exhaustive-partition"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">type</i>)
+  a set of <i class="i">pairwise</i> <i class="i">disjoint</i> <i class="i">types</i> that form an 
+  <i class="i">exhaustive union</i>.
+</p>
+</dd>
+<dt><a id="index-exhaustive-union"></a><span><b class="b">exhaustive union</b><a class="copiable-link" href="#index-exhaustive-union"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">type</i>)
+  a set of <i class="i">subtypes</i> of the <i class="i">type</i>,
+  whose union contains all <i class="i">elements</i> of that <i class="i">type</i>.
+</p>
+</dd>
+<dt><a id="index-exit-point"></a><span><b class="b">exit point</b><a class="copiable-link" href="#index-exit-point"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a point in a <i class="i">control form</i>
+       from which (<i class="i">e.g.</i>, <b class="b">block</b>),
+       through which (<i class="i">e.g.</i>, <b class="b">unwind-protect</b>),
+    or to which (<i class="i">e.g.</i>, <b class="b">tagbody</b>)
+  control and possibly <i class="i">values</i> can be transferred both actively by using 
+  another <i class="i">control form</i> and passively through the normal control and
+  data flow of <i class="i">evaluation</i>.
+  &ldquo;<b class="b">catch</b> and <b class="b">block</b> establish bindings for
+            exit points to which <b class="b">throw</b> and <b class="b">return-from</b>,
+	    respectively, can transfer control and values;
+	    <b class="b">tagbody</b> establishes a binding for an exit point
+	    with lexical extent to which <b class="b">go</b> can transfer control;
+	    and <b class="b">unwind-protect</b> establishes an exit point 
+	    through which control might be transferred by 
+	    operators such as <b class="b">throw</b>, <b class="b">return-from</b>,
+            and <b class="b">go</b>.&rdquo;
+</p>
+</dd>
+<dt><a id="index-explicit-return"></a><span><b class="b">explicit return</b><a class="copiable-link" href="#index-explicit-return"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the act of transferring control (and possibly <i class="i">values</i>) 
+  to a <i class="i">block</i> by using <b class="b">return-from</b> (or <b class="b">return</b>).
+</p>
+</dd>
+<dt><a id="index-explicit-use"></a><span><b class="b">explicit use</b><a class="copiable-link" href="#index-explicit-use"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">variable</i> V in a <i class="i">form</i> F)
+  a reference to V that is directly apparent in the normal semantics of F;
+  <i class="i">i.e.</i>, that does not expose any undocumented details of the
+      <i class="i">macro expansion</i> of the <i class="i">form</i> itself.
+  References to V exposed by expanding <i class="i">subforms</i> of F are, however,
+  considered to be <i class="i">explicit uses</i> of V.
+</p>
+</dd>
+<dt><a id="index-exponent-marker"></a><span><b class="b">exponent marker</b><a class="copiable-link" href="#index-exponent-marker"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a character that is used in the textual notation for a <i class="i">float</i>
+  to separate the mantissa from the exponent.
+  The characters defined as <i class="i">exponent markers</i> in the <i class="i">standard readtable</i>
+  are shown in Figure 26&ndash;1.
+  For more information, see <a class="ref" href="Character-Syntax.html">Character Syntax</a>.
+  &ldquo;The exponent marker &lsquo;d&rsquo; in &lsquo;3.0d7&rsquo; indicates
+	    that this number is to be represented as a double float.&rdquo;
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Marker  Meaning                                  <!-- /@w -->
+  <code class="t">D</code> or <code class="t">d</code>  <b class="b">double-float</b>                             <!-- /@w -->
+  <code class="t">E</code> or <code class="t">e</code>  <b class="b">float</b> (see <b class="b">*read-default-float-format*</b>)  <!-- /@w -->
+  <code class="t">F</code> or <code class="t">f</code>  <b class="b">single-float</b>                             <!-- /@w -->
+  <code class="t">L</code> or <code class="t">l</code>  <b class="b">long-float</b>                               <!-- /@w -->
+  <code class="t">S</code> or <code class="t">s</code>  <b class="b">short-float</b>                              <!-- /@w -->
+
+           Figure 26&ndash;1: Exponent Markers          <!-- /@w -->
+
+</pre></div></div>
+
+</dd>
+<dt><a id="index-export"></a><span><b class="b">export</b><a class="copiable-link" href="#index-export"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (a <i class="i">symbol</i> in a <i class="i">package</i>)
+  to add the <i class="i">symbol</i> to the list of <i class="i">external symbols</i> of the
+  <i class="i">package</i>.
+</p>
+</dd>
+<dt><a id="index-exported"></a><span><b class="b">exported</b><a class="copiable-link" href="#index-exported"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">symbol</i> in a <i class="i">package</i>)
+  being an <i class="i">external symbol</i> of the <i class="i">package</i>.
+</p>
+</dd>
+<dt><a id="index-expressed-adjustability"></a><span><b class="b">expressed adjustability</b><a class="copiable-link" href="#index-expressed-adjustability"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of an <i class="i">array</i>)
+  a <i class="i">generalized boolean</i> that is conceptually (but not necessarily actually)
+  associated with the <i class="i">array</i>, representing whether the <i class="i">array</i>
+  is <i class="i">expressly adjustable</i>.
+  See also <i class="i">actual adjustability</i>.
+</p>
+</dd>
+<dt><a id="index-expressed-array-element-type-1"></a><span><b class="b">expressed array element type</b><a class="copiable-link" href="#index-expressed-array-element-type-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of an <i class="i">array</i>)
+  the <i class="i">type</i> which is the <i class="i">array element type</i>
+  implied by a <i class="i">type declaration</i> for the <i class="i">array</i>, 
+  or which is the requested <i class="i">array element type</i> at its time 
+  of creation, prior to any selection of an <i class="i">upgraded array element type</i>.
+  (<span class="r">Common Lisp</span> does not provide a way of detecting this <i class="i">type</i>
+   directly at run time, but an <i class="i">implementation</i> is permitted 
+   to make assumptions about the <i class="i">array</i>&rsquo;s contents and
+   the operations which may be performed on the <i class="i">array</i> when
+   this <i class="i">type</i> is noted during code analysis, even if those 
+   assumptions would not be valid in general for the
+   <i class="i">upgraded array element type</i> of the
+   <i class="i">expressed array element type</i>.)
+</p>
+</dd>
+<dt><a id="index-expressed-complex-part-type"></a><span><b class="b">expressed complex part type</b><a class="copiable-link" href="#index-expressed-complex-part-type"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">complex</i>)
+  the <i class="i">type</i> which is implied as the <i class="i">complex part type</i>
+  by a <i class="i">type declaration</i> for the <i class="i">complex</i>, 
+  or which is the requested <i class="i">complex part type</i> at its time of
+  creation, prior to any selection of an <i class="i">upgraded complex part type</i>.
+  (<span class="r">Common Lisp</span> does not provide a way of detecting this <i class="i">type</i>
+   directly at run time, but an <i class="i">implementation</i> is permitted 
+   to make assumptions about the operations which may be performed on
+   the <i class="i">complex</i> when this <i class="i">type</i> is noted during code
+   analysis, even if those assumptions would not be valid in general for 
+   the <i class="i">upgraded complex part type</i> of the
+   <i class="i">expressed complex part type</i>.)
+</p>
+</dd>
+<dt><a id="index-expression"></a><span><b class="b">expression</b><a class="copiable-link" href="#index-expression"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. an <i class="i">object</i>, often used to emphasize the use 
+     of the <i class="i">object</i> to encode or represent information in a specialized
+     format, such as program text.
+     &ldquo;The second expression in a <b class="b">let</b> form is a list
+   	       of bindings.&rdquo;
+  2. the textual notation used to notate an <i class="i">object</i> in a source file.
+     &ldquo;The expression <code class="t">'sample</code> is equivalent to <code class="t">(quote sample)</code>.&rdquo;
+</p>
+</dd>
+<dt><a id="index-expressly-adjustable"></a><span><b class="b">expressly adjustable</b><a class="copiable-link" href="#index-expressly-adjustable"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of an <i class="i">array</i>)
+  being <i class="i">actually adjustable</i> by virtue of an explicit request for this
+  characteristic having been made at the time of its creation.
+  All <i class="i">arrays</i> that are <i class="i">expressly adjustable</i> 
+  are <i class="i">actually adjustable</i>,
+  but not necessarily vice versa.
+</p>
+</dd>
+<dt><a id="index-extended-character"></a><span><b class="b">extended character</b><a class="copiable-link" href="#index-extended-character"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">character</i> 
+</p>
+<p>of <i class="i">type</i> <b class="b">extended-char</b>:
+</p>
+<p>a <i class="i">character</i> that is not a <i class="i">base character</i>.
+</p>
+</dd>
+<dt><a id="index-extended-function-designator"></a><span><b class="b">extended function designator</b><a class="copiable-link" href="#index-extended-function-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">designator</i> for a <i class="i">function</i>; that is,
+  an <i class="i">object</i> that denotes a <i class="i">function</i>
+  and that is one of:
+      a <i class="i">function name</i> (denoting the <i class="i">function</i> it names
+                              in the <i class="i">global environment</i>),
+   or a <i class="i">function</i> (denoting itself).
+  The consequences are undefined if 
+  a <i class="i">function name</i> is used as an 
+  <i class="i">extended function designator</i> but
+  it does not have a global definition as a <i class="i">function</i>,
+  or if it is a <i class="i">symbol</i> 
+     that has a global definition as a <i class="i">macro</i> or a <i class="i">special form</i>.
+  See also <i class="i">function designator</i>.
+</p>
+</dd>
+<dt><a id="index-extended-lambda-list"></a><span><b class="b">extended lambda list</b><a class="copiable-link" href="#index-extended-lambda-list"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a list resembling an <i class="i">ordinary lambda list</i> in form and purpose, but 
+  offering additional syntax or functionality not available in an
+  <i class="i">ordinary lambda list</i>.
+  &ldquo;<b class="b">defmacro</b> uses extended lambda lists.&rdquo;
+</p>
+</dd>
+<dt><a id="index-extension"></a><span><b class="b">extension</b><a class="copiable-link" href="#index-extension"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a facility in an <i class="i">implementation</i> of <span class="r">Common Lisp</span> 
+  that is not specified by this standard.
+</p>
+</dd>
+<dt><a id="index-extent"></a><span><b class="b">extent</b><a class="copiable-link" href="#index-extent"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the interval of time during which a <i class="i">reference</i> to 
+      an <i class="i">object</i>,
+      a  <i class="i">binding</i>,
+      an <i class="i">exit point</i>,
+      a  <i class="i">tag</i>,
+      a  <i class="i">handler</i>,
+      a  <i class="i">restart</i>,
+   or an <i class="i">environment</i> is defined.
+</p>
+</dd>
+<dt><a id="index-external-file-format"></a><span><b class="b">external file format</b><a class="copiable-link" href="#index-external-file-format"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> of <i class="i">implementation-dependent</i> nature which determines
+  one of possibly several <i class="i">implementation-dependent</i> ways in which
+  <i class="i">characters</i> are encoded externally in a <i class="i">character</i> <i class="i">file</i>.
+</p>
+</dd>
+<dt><a id="index-external-file-format-designator"></a><span><b class="b">external file format designator</b><a class="copiable-link" href="#index-external-file-format-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">designator</i> for an <i class="i">external file format</i>; that is,
+  an <i class="i">object</i> that denotes an <i class="i">external file format</i>
+  and that is one of:
+      the <i class="i">symbol</i> <code class="t">:default</code> 
+         (denoting an <i class="i">implementation-dependent</i> default 
+          <i class="i">external file format</i> that can accomodate at least
+          the <i class="i">base characters</i>),
+      some other <i class="i">object</i> defined by the <i class="i">implementation</i> to be
+      an <i class="i">external file format designator</i>
+         (denoting an <i class="i">implementation-defined</i> <i class="i">external file format</i>),
+   or some other <i class="i">object</i> defined by the <i class="i">implementation</i> to be
+      an <i class="i">external file format</i> 
+         (denoting itself).
+</p>
+</dd>
+<dt><a id="index-external-symbol-1"></a><span><b class="b">external symbol</b><a class="copiable-link" href="#index-external-symbol-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">package</i>)
+  a <i class="i">symbol</i> that is part of the &lsquo;external interface&rsquo; to the <i class="i">package</i>
+  and that are <i class="i">inherited</i>_3 by any other <i class="i">package</i>
+   that <i class="i">uses</i> the <i class="i">package</i>.
+  When using the <i class="i">Lisp reader</i>, 
+  if a <i class="i">package prefix</i> is used,
+  the <i class="i">name</i> of an <i class="i">external symbol</i> is separated
+    from the <i class="i">package</i> <i class="i">name</i> by a single <i class="i">package marker</i>
+  while
+  the <i class="i">name</i> of an <i class="i">internal symbol</i> is separated
+    from the <i class="i">package</i> <i class="i">name</i> by a double <i class="i">package marker</i>;
+  see <a class="ref" href="Symbols-as-Tokens.html">Symbols as Tokens</a>.
+</p>
+</dd>
+<dt><a id="index-externalizable-object-2"></a><span><b class="b">externalizable object</b><a class="copiable-link" href="#index-externalizable-object-2"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> that can be used as a <i class="i">literal</i> <i class="i">object</i> 
+  in <i class="i">code</i> to be processed by the <i class="i">file compiler</i>.  
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="F"><span><b class="b">F</b><a class="copiable-link" href="#F"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-false"></a><span><b class="b">false</b><a class="copiable-link" href="#index-false"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">symbol</i> <b class="b">nil</b>,
+  used to represent the failure of a <i class="i">predicate</i> test.
+</p>
+</dd>
+<dt><a id="index-fbound"></a><span><b class="b">fbound</b><a class="copiable-link" href="#index-fbound"> &para;</a></span></dt>
+<dd><p>pronounced &rsquo;ef ,baund  <i class="i">adj.</i> 
+							 (of a <i class="i">function name</i>)
+  <i class="i">bound</i> in the <i class="i">function</i> <i class="i">namespace</i>.
+  (The <i class="i">names</i> of <i class="i">macros</i> and <i class="i">special operators</i> are <i class="i">fbound</i>,
+   but the nature and <i class="i">type</i> of the <i class="i">object</i> which is their <i class="i">value</i>
+   is <i class="i">implementation-dependent</i>.
+</p>
+<p>Further, defining a <i class="i">setf expander</i> <i class="i">F</i> does not cause the <i class="i">setf function</i>
+   <code class="t">(setf <i class="i">F</i>)</code> to become defined; as such, if there is a such a definition
+   of a <i class="i">setf expander</i> <i class="i">F</i>, the <i class="i">function</i> <code class="t">(setf <i class="i">F</i>)</code>
+   can be <i class="i">fbound</i> if and only if, by design or coincidence, a
+   function binding for <code class="t">(setf <i class="i">F</i>)</code> has been independently established.)
+</p>
+<p>See the <i class="i">functions</i> <b class="b">fboundp</b> and <b class="b">symbol-function</b>.
+</p>
+</dd>
+<dt><a id="index-feature-1"></a><span><b class="b">feature</b><a class="copiable-link" href="#index-feature-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. an aspect or attribute 
+        of <span class="r">Common Lisp</span>, 
+        of the <i class="i">implementation</i>,
+     or of the <i class="i">environment</i>.
+  2. a <i class="i">symbol</i> that names a <i class="i">feature</i>_1.
+  See <a class="ref" href="Features.html">Features</a>.
+  &ldquo;The <code class="t">:ansi-cl</code> feature is present in all conforming implementations.&rdquo;
+</p>
+</dd>
+<dt><a id="index-feature-expression-1"></a><span><b class="b">feature expression</b><a class="copiable-link" href="#index-feature-expression-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  A boolean combination of <i class="i">features</i> used by the <code class="t">#+</code> and <code class="t">#-</code> 
+  <i class="i">reader macros</i> in order to direct conditional <i class="i">reading</i> of
+  <i class="i">expressions</i> by the <i class="i">Lisp reader</i>.
+  See <a class="ref" href="Feature-Expressions.html">Feature Expressions</a>.
+</p>
+</dd>
+<dt><a id="index-features-list-1"></a><span><b class="b">features list</b><a class="copiable-link" href="#index-features-list-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">list</i> that is the <i class="i">value</i> of <b class="b">*features*</b>.
+</p>
+</dd>
+<dt><a id="index-file-1"></a><span><b class="b">file</b><a class="copiable-link" href="#index-file-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a named entry in a <i class="i">file system</i>,
+  having an <i class="i">implementation-defined</i> nature.
+</p>
+</dd>
+<dt><a id="index-file-compiler"></a><span><b class="b">file compiler</b><a class="copiable-link" href="#index-file-compiler"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  any <i class="i">compiler</i> which <i class="i">compiles</i> <i class="i">source code</i> contained in a <i class="i">file</i>,
+  producing a <i class="i">compiled file</i> as output.  The <b class="b">compile-file</b> 
+  function is the only interface to such a <i class="i">compiler</i> provided by <span class="r">Common Lisp</span>,
+  but there might be other, <i class="i">implementation-defined</i> mechanisms for 
+  invoking the <i class="i">file compiler</i>.
+</p>
+</dd>
+<dt><a id="index-file-position"></a><span><b class="b">file position</b><a class="copiable-link" href="#index-file-position"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (in a <i class="i">stream</i>)
+  a non-negative <i class="i">integer</i> that represents a position in the <i class="i">stream</i>.
+  Not all <i class="i">streams</i> are able to represent the notion of <i class="i">file position</i>;
+  in the description of any <i class="i">operator</i> which manipulates <i class="i">file positions</i>, 
+  the behavior for <i class="i">streams</i> that don&rsquo;t have this notion must be explicitly stated.
+  For <i class="i">binary</i> <i class="i">streams</i>, the <i class="i">file position</i> represents the number 
+  of preceding <i class="i">bytes</i> in the <i class="i">stream</i>.
+  For <i class="i">character</i> <i class="i">streams</i>, the constraint is more relaxed: 
+  <i class="i">file positions</i> must increase monotonically, the amount of the increase
+  between <i class="i">file positions</i> corresponding to any two successive characters
+  in the <i class="i">stream</i> is <i class="i">implementation-dependent</i>.
+</p>
+</dd>
+<dt><a id="index-file-position-designator"></a><span><b class="b">file position designator</b><a class="copiable-link" href="#index-file-position-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (in a <i class="i">stream</i>)
+  a <i class="i">designator</i> for a <i class="i">file position</i> in that <i class="i">stream</i>; that is,
+      the symbol <code class="t">:start</code>  
+        (denoting <code class="t">0</code>, the first <i class="i">file position</i> in that <i class="i">stream</i>),
+      the symbol <code class="t">:end</code>
+	(denoting the last <i class="i">file position</i> in that <i class="i">stream</i>;
+	 <i class="i">i.e.</i>, the position following the last <i class="i">element</i> of the <i class="i">stream</i>),
+   or a <i class="i">file position</i> (denoting itself).
+</p>
+</dd>
+<dt><a id="index-file-stream-1"></a><span><b class="b">file stream</b><a class="copiable-link" href="#index-file-stream-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">file-stream</b>.
+</p>
+</dd>
+<dt><a id="index-file-system"></a><span><b class="b">file system</b><a class="copiable-link" href="#index-file-system"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a facility which permits aggregations of data to be stored in named
+  <i class="i">files</i> on some medium that is external to the <i class="i">Lisp image</i>
+  and that therefore persists from <i class="i">session</i> to <i class="i">session</i>.
+</p>
+</dd>
+<dt><a id="index-filename-1"></a><span><b class="b">filename</b><a class="copiable-link" href="#index-filename-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a handle, not necessarily ever directly represented as an <i class="i">object</i>,
+  that can be used to refer to a <i class="i">file</i> in a <i class="i">file system</i>.
+  <i class="i">Pathnames</i> and <i class="i">namestrings</i> are two kinds of <i class="i">objects</i> 
+  that substitute for <i class="i">filenames</i> in <span class="r">Common Lisp</span>.  
+</p>
+</dd>
+<dt><a id="index-fill-pointer-1"></a><span><b class="b">fill pointer</b><a class="copiable-link" href="#index-fill-pointer-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">vector</i>)
+  an <i class="i">integer</i> associated with a <i class="i">vector</i> that represents the
+  index above which no <i class="i">elements</i> are <i class="i">active</i>.
+  (A <i class="i">fill pointer</i> is a non-negative <i class="i">integer</i> no
+   larger than the total number of <i class="i">elements</i> in the <i class="i">vector</i>.
+   Not all <i class="i">vectors</i> have <i class="i">fill pointers</i>.)
+</p>
+</dd>
+<dt><a id="index-finite"></a><span><b class="b">finite</b><a class="copiable-link" href="#index-finite"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">type</i>)
+  having a finite number of <i class="i">elements</i>.
+  &ldquo;The type specifier <code class="t">(integer 0 5)</code> denotes a finite type,
+	    but the type specifiers <b class="b">integer</b> and <code class="t">(integer 0)</code> do not.&rdquo;
+</p>
+</dd>
+<dt><a id="index-fixnum"></a><span><b class="b">fixnum</b><a class="copiable-link" href="#index-fixnum"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">integer</i> of <i class="i">type</i> <b class="b">fixnum</b>.
+</p>
+</dd>
+<dt><a id="index-float"></a><span><b class="b">float</b><a class="copiable-link" href="#index-float"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">float</b>.
+</p>
+</dd>
+<dt><a id="index-for_002dvalue"></a><span><b class="b">for-value</b><a class="copiable-link" href="#index-for_002dvalue"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">reference</i> to a <i class="i">binding</i>)
+  being a <i class="i">reference</i> that <i class="i">reads</i>_1
+  the <i class="i">value</i> of the <i class="i">binding</i>.
+</p>
+</dd>
+<dt><a id="index-form"></a><span><b class="b">form</b><a class="copiable-link" href="#index-form"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. any <i class="i">object</i> meant to be <i class="i">evaluated</i>.
+  2.    a <i class="i">symbol</i>,
+        a <i class="i">compound form</i>,
+     or a <i class="i">self-evaluating object</i>.
+  3. (for an <i class="i">operator</i>, as in &ldquo;&lt;&lt;<i class="i">operator</i>&gt;&gt; <i class="i">form</i>&rdquo;)
+     a <i class="i">compound form</i> having that <i class="i">operator</i> as its first element.
+     &ldquo;A <b class="b">quote</b> form is a constant form.&rdquo;
+</p>
+</dd>
+<dt><a id="index-formal-argument"></a><span><b class="b">formal argument</b><a class="copiable-link" href="#index-formal-argument"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> 
+  a <i class="i">parameter</i>.
+</p>
+</dd>
+<dt><a id="index-formal-parameter"></a><span><b class="b">formal parameter</b><a class="copiable-link" href="#index-formal-parameter"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> 
+  a <i class="i">parameter</i>.
+</p>
+</dd>
+<dt><a id="index-format"></a><span><b class="b">format</b><a class="copiable-link" href="#index-format"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (a <i class="i">format control</i> and <i class="i">format arguments</i>)
+  to perform output as if by <b class="b">format</b>,
+  using the <i class="i">format string</i> and <i class="i">format arguments</i>.
+</p>
+</dd>
+<dt><a id="index-format-argument"></a><span><b class="b">format argument</b><a class="copiable-link" href="#index-format-argument"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> which is used as data by functions such as <b class="b">format</b>
+  which interpret <i class="i">format controls</i>.
+</p>
+</dd>
+<dt><a id="index-format-control-1"></a><span><b class="b">format control</b><a class="copiable-link" href="#index-format-control-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+     a <i class="i">format string</i>,
+  or a <i class="i">function</i> that obeys the <i class="i">argument</i> conventions
+     for a <i class="i">function</i> returned by the <b class="b">formatter</b> <i class="i">macro</i>.
+  See <a class="ref" href="Compiling-Format-Strings.html">Compiling Format Strings</a>.
+</p>
+</dd>
+<dt><a id="index-format-directive"></a><span><b class="b">format directive</b><a class="copiable-link" href="#index-format-directive"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. a sequence of <i class="i">characters</i> in a <i class="i">format string</i>
+     which is introduced by a <i class="i">tilde</i>, and which is specially 
+     interpreted by <i class="i">code</i> which processes <i class="i">format strings</i>
+     to mean that some special operation should be performed, possibly
+     involving data supplied by the <i class="i">format arguments</i> that 
+     accompanied the <i class="i">format string</i>.  See the <i class="i">function</i> <b class="b">format</b>.
+     &ldquo;In <code class="t">&quot;~D base 10 = ~8R&quot;</code>, the character
+     	       sequences &lsquo;<code class="t">~D</code>&rsquo; and &lsquo;<code class="t">~8R</code>&rsquo; are format directives.&rdquo;
+  2. the conceptual category of all <i class="i">format directives</i>_1
+     which use the same dispatch character.
+     &ldquo;Both <code class="t">&quot;~3d&quot;</code> and <code class="t">&quot;~3,'0D&quot;</code> are valid uses of the
+	       &lsquo;<code class="t">~D</code>&rsquo; format directive.&rdquo;
+</p>
+</dd>
+<dt><a id="index-format-string"></a><span><b class="b">format string</b><a class="copiable-link" href="#index-format-string"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">string</i> which can contain both ordinary text and <i class="i">format directives</i>,
+  and which is used in conjunction with <i class="i">format arguments</i> to describe how 
+  text output should be formatted by certain functions, such as <b class="b">format</b>.
+</p>
+</dd>
+<dt><a id="index-free-declaration-1"></a><span><b class="b">free declaration</b><a class="copiable-link" href="#index-free-declaration-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a declaration that is not a <i class="i">bound declaration</i>.
+  See <b class="b">declare</b>.
+</p>
+</dd>
+<dt><a id="index-fresh"></a><span><b class="b">fresh</b><a class="copiable-link" href="#index-fresh"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  1. (of an <i class="i">object</i> <i class="i">yielded</i> by a <i class="i">function</i>)
+     having been newly-allocated by that <i class="i">function</i>.
+     (The caller of a <i class="i">function</i> that returns a <i class="i">fresh</i> <i class="i">object</i>
+      may freely modify the <i class="i">object</i> without fear that such modification will
+      compromise the future correct behavior of that <i class="i">function</i>.)
+  2. (of a <i class="i">binding</i> for a <i class="i">name</i>)
+     newly-allocated; not shared with other <i class="i">bindings</i> for that <i class="i">name</i>.
+</p>
+</dd>
+<dt><a id="index-freshline"></a><span><b class="b">freshline</b><a class="copiable-link" href="#index-freshline"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a conceptual operation on a <i class="i">stream</i>, implemented by the <i class="i">function</i> <b class="b">fresh-line</b>
+  and by the <i class="i">format directive</i> <code class="t">~&amp;</code>, which advances the display position
+  to the beginning of the next line (as if a <i class="i">newline</i> had been typed, or 
+  the <i class="i">function</i> <b class="b">terpri</b> had been called)
+  unless the <i class="i">stream</i> is already known to be positioned at the beginning of a line.
+  Unlike <i class="i">newline</i>, <i class="i">freshline</i> is not a <i class="i">character</i>.
+</p>
+</dd>
+<dt><a id="index-funbound"></a><span><b class="b">funbound</b><a class="copiable-link" href="#index-funbound"> &para;</a></span></dt>
+<dd><p>pronounced &rsquo;ef unbaund <i class="i">n.</i> (of a <i class="i">function name</i>)
+  not <i class="i">fbound</i>.
+</p>
+</dd>
+<dt><a id="index-function"></a><span><b class="b">function</b><a class="copiable-link" href="#index-function"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+</p>
+<p>1. an <i class="i">object</i> representing code,
+     which can be <i class="i">called</i> with zero or more <i class="i">arguments</i>,
+     and which produces zero or more <i class="i">values</i>.
+  2. an <i class="i">object</i> of <i class="i">type</i> <b class="b">function</b>.
+</p>
+</dd>
+<dt><a id="index-function-block-name"></a><span><b class="b">function block name</b><a class="copiable-link" href="#index-function-block-name"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">function name</i>)
+  The <i class="i">symbol</i> that would be used as the name of an <i class="i">implicit block</i>
+  which surrounds the body of a <i class="i">function</i> having that <i class="i">function name</i>.
+  If the <i class="i">function name</i> is a <i class="i">symbol</i>, its <i class="i">function block name</i> is
+  the <i class="i">function name</i> itself.
+  If the <i class="i">function name</i> is a <i class="i">list</i> whose <i class="i">car</i> is <b class="b">setf</b>
+  and whose <i class="i">cadr</i> is a <i class="i">symbol</i>, its <i class="i">function block name</i> is 
+  the <i class="i">symbol</i> that is the <i class="i">cadr</i> of the <i class="i">function name</i>.
+  An <i class="i">implementation</i> which supports additional kinds of <i class="i">function names</i>
+  must specify for each how the corresponding <i class="i">function block name</i> is computed.
+</p>
+</dd>
+<dt><a id="index-function-cell"></a><span><b class="b">function cell</b><a class="copiable-link" href="#index-function-cell"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> (of a <i class="i">symbol</i>)
+  The <i class="i">place</i> which holds the <i class="i">definition</i> of the
+  global <i class="i">function</i> <i class="i">binding</i>, if any, named by that <i class="i">symbol</i>,
+  and which is <i class="i">accessed</i> by <b class="b">symbol-function</b>.
+  See <i class="i">cell</i>.
+</p>
+</dd>
+<dt><a id="index-function-designator"></a><span><b class="b">function designator</b><a class="copiable-link" href="#index-function-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">designator</i> for a <i class="i">function</i>; that is,
+  an <i class="i">object</i> that denotes a <i class="i">function</i>
+  and that is one of:
+      a <i class="i">symbol</i> (denoting the <i class="i">function</i> named by that <i class="i">symbol</i>
+                       in the <i class="i">global environment</i>),
+   or a <i class="i">function</i> (denoting itself).
+  The consequences are undefined if 
+  a <i class="i">symbol</i> is used as a <i class="i">function designator</i> but
+  it does not have a global definition as a <i class="i">function</i>,
+  or it has a global definition as a <i class="i">macro</i> or a <i class="i">special form</i>.
+  See also <i class="i">extended function designator</i>.
+</p>
+</dd>
+<dt><a id="index-function-form"></a><span><b class="b">function form</b><a class="copiable-link" href="#index-function-form"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">form</i> that is a <i class="i">list</i> and that has a first element 
+  which is the <i class="i">name</i> of a <i class="i">function</i> to be called on
+  <i class="i">arguments</i> which are the result of <i class="i">evaluating</i> subsequent
+  elements of the <i class="i">function form</i>.
+</p>
+</dd>
+<dt><a id="index-function-name"></a><span><b class="b">function name</b><a class="copiable-link" href="#index-function-name"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (in an <i class="i">environment</i>)
+  A <i class="i">symbol</i> or a <i class="i">list</i> <code class="t">(setf <i class="i">symbol</i>)</code> 
+  that is the <i class="i">name</i> of a <i class="i">function</i> in that <i class="i">environment</i>.
+</p>
+</dd>
+<dt><a id="index-functional-evaluation"></a><span><b class="b">functional evaluation</b><a class="copiable-link" href="#index-functional-evaluation"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the process of extracting a <i class="i">functional value</i> from a <i class="i">function name</i>
+  or a <i class="i">lambda expression</i>.
+  The evaluator performs <i class="i">functional evaluation</i> 
+       implicitly when it encounters a <i class="i">function name</i> 
+ 	or a <i class="i">lambda expression</i>
+        in the <i class="i">car</i> of a <i class="i">compound form</i>, 
+    or explicitly when it encounters a <b class="b">function</b> <i class="i">special form</i>.
+  Neither a use of a <i class="i">symbol</i> as a <i class="i">function designator</i> nor a
+  use of the <i class="i">function</i> <b class="b">symbol-function</b> to extract the <i class="i">functional value</i>
+  of a <i class="i">symbol</i> is considered a <i class="i">functional evaluation</i>.
+</p>
+</dd>
+<dt><a id="index-functional-value"></a><span><b class="b">functional value</b><a class="copiable-link" href="#index-functional-value"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. (of a <i class="i">function name</i> N in an <i class="i">environment</i> E)
+     The <i class="i">value</i> of the <i class="i">binding</i> named N
+     in the <i class="i">function</i> <i class="i">namespace</i> for <i class="i">environment</i> E;
+     that is, the contents of the <i class="i">function cell</i> named N in 
+     <i class="i">environment</i> E.
+  2. (of an <i class="i">fbound</i> <i class="i">symbol</i> S)
+     the contents of the <i class="i">symbol</i>&rsquo;s <i class="i">function cell</i>; that is,
+     the <i class="i">value</i> of the <i class="i">binding</i> named S
+     in the <i class="i">function</i> <i class="i">namespace</i> of the <i class="i">global environment</i>.
+     (A <i class="i">name</i> that is a <i class="i">macro name</i> in the <i class="i">global environment</i>
+      or is a <i class="i">special operator</i> might or might not be <i class="i">fbound</i>.
+      But if S is such a <i class="i">name</i> and is <i class="i">fbound</i>, the specific
+      nature of its <i class="i">functional value</i> is <i class="i">implementation-dependent</i>;
+      in particular, it might or might not be a <i class="i">function</i>.)
+</p>
+</dd>
+<dt><a id="index-further-compilation-1"></a><span><b class="b">further compilation</b><a class="copiable-link" href="#index-further-compilation-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  <i class="i">implementation-dependent</i> compilation beyond <i class="i">minimal compilation</i>.
+  Further compilation is permitted to take place at <i class="i">run time</i>.
+  &ldquo;Block compilation and generation of machine-specific instructions
+            are examples of further compilation.&rdquo;  
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="G"><span><b class="b">G</b><a class="copiable-link" href="#G"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-general"></a><span><b class="b">general</b><a class="copiable-link" href="#index-general"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of an <i class="i">array</i>)
+  having <i class="i">element type</i> <b class="b">t</b>,
+   and consequently able to have any <i class="i">object</i> as an <i class="i">element</i>.
+</p>
+</dd>
+<dt><a id="index-generalized-boolean"></a><span><b class="b">generalized boolean</b><a class="copiable-link" href="#index-generalized-boolean"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> used as a truth value, where the symbol~<b class="b">nil</b> 
+  represents <i class="i">false</i> and all other <i class="i">objects</i> represent <i class="i">true</i>.
+  See <i class="i">boolean</i>.
+</p>
+</dd>
+<dt><a id="index-generalized-instance"></a><span><b class="b">generalized instance</b><a class="copiable-link" href="#index-generalized-instance"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">class</i>)
+  an <i class="i">object</i> the <i class="i">class</i> of which is either that <i class="i">class</i> itself,
+  or some subclass of that <i class="i">class</i>.  (Because of the correspondence between
+  types and classes, the term &ldquo;generalized instance of X&rdquo;
+  implies &ldquo;object of type X&rdquo; and in cases where X is a <i class="i">class</i> 
+  (or <i class="i">class name</i>) the reverse is also true.
+  The former terminology emphasizes the view of X as a <i class="i">class</i>
+  while the latter emphasizes the view of X as a <i class="i">type specifier</i>.)
+</p>
+</dd>
+<dt><a id="index-generalized-reference-1"></a><span><b class="b">generalized reference</b><a class="copiable-link" href="#index-generalized-reference-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a reference to a location storing an <i class="i">object</i> as if to a <i class="i">variable</i>.
+  (Such a reference can be either to <i class="i">read</i> or <i class="i">write</i> the location.)
+  See <a class="ref" href="Generalized-Reference.html">Generalized Reference</a>.  See also <i class="i">place</i>.
+</p>
+</dd>
+<dt><a id="index-generalized-synonym-stream"></a><span><b class="b">generalized synonym stream</b><a class="copiable-link" href="#index-generalized-synonym-stream"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (with a <i class="i">synonym stream symbol</i>)
+  1. (to a <i class="i">stream</i>) 
+     a <i class="i">synonym stream</i> to the <i class="i">stream</i>,
+     or a <i class="i">composite stream</i> which has as a target 
+     a <i class="i">generalized synonym stream</i> to the <i class="i">stream</i>.
+  2. (to a <i class="i">symbol</i>)
+     a <i class="i">synonym stream</i> to the <i class="i">symbol</i>,
+     or a <i class="i">composite stream</i> which has as a target 
+     a <i class="i">generalized synonym stream</i> to the <i class="i">symbol</i>.
+</p>
+</dd>
+<dt><a id="index-generic-function-2"></a><span><b class="b">generic function</b><a class="copiable-link" href="#index-generic-function-2"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">function</i> whose behavior depends on the <i class="i">classes</i> or
+  identities of the arguments supplied to it and whose parts include, among
+  other things, a set of <i class="i">methods</i>, a <i class="i">lambda list</i>, and a
+  <i class="i">method combination</i> type.
+</p>
+</dd>
+<dt><a id="index-generic-function-lambda-list-1"></a><span><b class="b">generic function lambda list</b><a class="copiable-link" href="#index-generic-function-lambda-list-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  A <i class="i">lambda list</i> that is used to describe data flow into a <i class="i">generic function</i>.
+  See <a class="ref" href="Generic-Function-Lambda-Lists.html">Generic Function Lambda Lists</a>.
+</p>
+</dd>
+<dt><a id="index-gensym"></a><span><b class="b">gensym</b><a class="copiable-link" href="#index-gensym"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> 
+  an <i class="i">uninterned</i> <i class="i">symbol</i>.
+  See the <i class="i">function</i> <b class="b">gensym</b>.
+</p>
+</dd>
+<dt><a id="index-global-declaration-1"></a><span><b class="b">global declaration</b><a class="copiable-link" href="#index-global-declaration-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">form</i> that makes certain kinds of information about 
+  code globally available; that is, a <b class="b">proclaim</b> <i class="i">form</i> 
+  or a <b class="b">declaim</b> <i class="i">form</i>.
+</p>
+</dd>
+<dt><a id="index-global-environment-1"></a><span><b class="b">global environment</b><a class="copiable-link" href="#index-global-environment-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  that part of an <i class="i">environment</i> that contains <i class="i">bindings</i>
+  with <i class="i">indefinite scope</i> and <i class="i">indefinite extent</i>.
+</p>
+</dd>
+<dt><a id="index-global-variable"></a><span><b class="b">global variable</b><a class="copiable-link" href="#index-global-variable"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">dynamic variable</i> or a <i class="i">constant variable</i>.
+</p>
+</dd>
+<dt><a id="index-glyph"></a><span><b class="b">glyph</b><a class="copiable-link" href="#index-glyph"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a visual representation.
+  &ldquo;Graphic characters have associated glyphs.&rdquo;
+</p>
+</dd>
+<dt><a id="index-go"></a><span><b class="b">go</b><a class="copiable-link" href="#index-go"> &para;</a></span></dt>
+<dd><p><i class="i">v.</i> 
+  to transfer control to a <i class="i">go point</i>.
+  See the <i class="i">special operator</i> <b class="b">go</b>.
+</p>
+</dd>
+<dt><a id="index-go-point"></a><span><b class="b">go point</b><a class="copiable-link" href="#index-go-point"> &para;</a></span></dt>
+<dd>
+<p>one of possibly several <i class="i">exit points</i> that are <i class="i">established</i> 
+  by <b class="b">tagbody</b> (or other abstractions, such as <b class="b">prog</b>, 
+  which are built from <b class="b">tagbody</b>).
+</p>
+</dd>
+<dt><a id="index-go-tag"></a><span><b class="b">go tag</b><a class="copiable-link" href="#index-go-tag"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the <i class="i">symbol</i> or <i class="i">integer</i> that, within the <i class="i">lexical scope</i> 
+  of a <b class="b">tagbody</b> <i class="i">form</i>, names an <i class="i">exit point</i>
+  <i class="i">established</i> by that <b class="b">tagbody</b> <i class="i">form</i>.
+</p>
+</dd>
+<dt><a id="index-graphic-1"></a><span><b class="b">graphic</b><a class="copiable-link" href="#index-graphic-1"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">character</i>)
+  being a &ldquo;printing&rdquo; or &ldquo;displayable&rdquo; <i class="i">character</i> 
+  that has a standard visual representation
+  as a single <i class="i">glyph</i>, such as <code class="t">A</code> or <code class="t">*</code> or <code class="t">=</code>.
+  <i class="i">Space</i> is defined to be <i class="i">graphic</i>.
+  Of the <i class="i">standard characters</i>, all but <i class="i">newline</i> are <i class="i">graphic</i>.
+  See <i class="i">non-graphic</i>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="H"><span><b class="b">H</b><a class="copiable-link" href="#H"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-handle"></a><span><b class="b">handle</b><a class="copiable-link" href="#index-handle"> &para;</a></span></dt>
+<dd><p><i class="i">v.</i> (of a <i class="i">condition</i> being <i class="i">signaled</i>)
+  to perform a non-local transfer of control, terminating the ongoing
+  <i class="i">signaling</i> of the <i class="i">condition</i>.
+</p>
+</dd>
+<dt><a id="index-handler"></a><span><b class="b">handler</b><a class="copiable-link" href="#index-handler"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+</p>
+<p>a <i class="i">condition handler</i>.
+</p>
+</dd>
+<dt><a id="index-hash-table"></a><span><b class="b">hash table</b><a class="copiable-link" href="#index-hash-table"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">hash-table</b>, 
+  which provides a mapping from <i class="i">keys</i> to <i class="i">values</i>.
+</p>
+</dd>
+<dt><a id="index-home-package"></a><span><b class="b">home package</b><a class="copiable-link" href="#index-home-package"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">symbol</i>)
+  the <i class="i">package</i>, if any, which is contents of the <i class="i">package cell</i> 
+  of the <i class="i">symbol</i>, and which dictates how the <i class="i">Lisp printer</i> 
+  prints the <i class="i">symbol</i> when it is not <i class="i">accessible</i> in the
+  <i class="i">current package</i>. (<i class="i">Symbols</i> which have <b class="b">nil</b> in their
+  <i class="i">package cell</i> are said to have no <i class="i">home package</i>, and also
+  to be <i class="i">apparently uninterned</i>.)
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="I"><span><b class="b">I</b><a class="copiable-link" href="#I"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-I_002fO-customization-variable"></a><span><b class="b">I/O customization variable</b><a class="copiable-link" href="#index-I_002fO-customization-variable"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  one of the <i class="i">stream variables</i> in Figure 26&ndash;2, 
+  or some other (<i class="i">implementation-defined</i>) <i class="i">stream variable</i>
+      that is defined by the <i class="i">implementation</i> 
+      to be an <i class="i">I/O customization variable</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  *debug-io*        *error-io*         query-io*       <!-- /@w -->
+  *standard-input*  *standard-output*  *trace-output*  <!-- /@w -->
+
+  Figure 26&ndash;2: Standardized I/O Customization Variables<!-- /@w -->
+
+</pre></div></div>
+
+</dd>
+<dt><a id="index-identical"></a><span><b class="b">identical</b><a class="copiable-link" href="#index-identical"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  the <i class="i">same</i> under <b class="b">eq</b>.
+</p>
+</dd>
+<dt><a id="index-identifier"></a><span><b class="b">identifier</b><a class="copiable-link" href="#index-identifier"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>        
+  1. a <i class="i">symbol</i> used to identify or to distinguish <i class="i">names</i>. 
+  2. a <i class="i">string</i> used the same way.            
+</p>
+</dd>
+<dt><a id="index-immutable"></a><span><b class="b">immutable</b><a class="copiable-link" href="#index-immutable"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i>
+  not subject to change, either because no <i class="i">operator</i> is provided which is
+  capable of effecting such change or because some constraint exists which 
+  prohibits the use of an <i class="i">operator</i> that might otherwise be capable of
+  effecting such a change.  Except as explicitly indicated otherwise,
+  <i class="i">implementations</i> are not required to detect attempts to modify
+  <i class="i">immutable</i> <i class="i">objects</i> or <i class="i">cells</i>; the consequences of attempting
+  to make such modification are undefined.
+  &ldquo;Numbers are immutable.&rdquo;
+</p>
+</dd>
+<dt><a id="index-implementation"></a><span><b class="b">implementation</b><a class="copiable-link" href="#index-implementation"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a system, mechanism, or body of <i class="i">code</i> that implements the semantics of <span class="r">Common Lisp</span>.
+</p>
+</dd>
+<dt><a id="index-implementation-limit"></a><span><b class="b">implementation limit</b><a class="copiable-link" href="#index-implementation-limit"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a restriction imposed by an <i class="i">implementation</i>.
+</p>
+</dd>
+<dt><a id="index-implementation_002ddefined"></a><span><b class="b">implementation-defined</b><a class="copiable-link" href="#index-implementation_002ddefined"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  <i class="i">implementation-dependent</i>, but required by this specification to be
+  defined by each <i class="i">conforming implementation</i> and to be documented by 
+  the corresponding implementor.
+</p>
+</dd>
+<dt><a id="index-implementation_002ddependent"></a><span><b class="b">implementation-dependent</b><a class="copiable-link" href="#index-implementation_002ddependent"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  describing a behavior or aspect of <span class="r">Common Lisp</span> which has been deliberately left
+  unspecified, that might be defined in some <i class="i">conforming implementations</i> 
+  but not in others, and whose details may differ between <i class="i">implementations</i>.
+  A <i class="i">conforming implementation</i> is encouraged (but not required) to 
+  document its treatment of each item in this specification which is
+  marked <i class="i">implementation-dependent</i>, although in some cases
+  such documentation might simply identify the item as &ldquo;undefined.&rdquo;
+</p>
+</dd>
+<dt><a id="index-implementation_002dindependent"></a><span><b class="b">implementation-independent</b><a class="copiable-link" href="#index-implementation_002dindependent"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  used to identify or emphasize a behavior or aspect of <span class="r">Common Lisp</span> which does 
+  not vary between <i class="i">conforming implementations</i>.
+</p>
+</dd>
+<dt><a id="index-implicit-block"></a><span><b class="b">implicit block</b><a class="copiable-link" href="#index-implicit-block"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+ a <i class="i">block</i> introduced by a <i class="i">macro form</i> 
+ rather than by an explicit <b class="b">block</b> <i class="i">form</i>.
+</p>
+</dd>
+<dt><a id="index-implicit-compilation-1"></a><span><b class="b">implicit compilation</b><a class="copiable-link" href="#index-implicit-compilation-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+ <i class="i">compilation</i> performed during <i class="i">evaluation</i>.
+</p>
+</dd>
+<dt><a id="index-implicit-progn"></a><span><b class="b">implicit progn</b><a class="copiable-link" href="#index-implicit-progn"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an ordered set of adjacent <i class="i">forms</i> appearing in another
+  <i class="i">form</i>, and defined by their context in that <i class="i">form</i>
+  to be executed as if within a <b class="b">progn</b>.
+</p>
+</dd>
+<dt><a id="index-implicit-tagbody"></a><span><b class="b">implicit tagbody</b><a class="copiable-link" href="#index-implicit-tagbody"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an ordered set of adjacent <i class="i">forms</i> and/or <i class="i">tags</i> 
+  appearing in another <i class="i">form</i>, and defined by their context 
+  in that <i class="i">form</i> to be executed as if within a <b class="b">tagbody</b>.
+</p>
+</dd>
+<dt><a id="index-import"></a><span><b class="b">import</b><a class="copiable-link" href="#index-import"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (a <i class="i">symbol</i> into a <i class="i">package</i>)
+  to make the <i class="i">symbol</i> be <i class="i">present</i> in the <i class="i">package</i>.
+</p>
+</dd>
+<dt><a id="index-improper-list-1"></a><span><b class="b">improper list</b><a class="copiable-link" href="#index-improper-list-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">list</i> which is not a <i class="i">proper list</i>:  
+  a <i class="i">circular list</i> or a <i class="i">dotted list</i>.
+</p>
+</dd>
+<dt><a id="index-inaccessible"></a><span><b class="b">inaccessible</b><a class="copiable-link" href="#index-inaccessible"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  not <i class="i">accessible</i>.
+</p>
+</dd>
+<dt><a id="index-indefinite-extent"></a><span><b class="b">indefinite extent</b><a class="copiable-link" href="#index-indefinite-extent"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">extent</i> whose duration is unlimited.
+  &ldquo;Most Common Lisp objects have indefinite extent.&rdquo;
+</p>
+</dd>
+<dt><a id="index-indefinite-scope"></a><span><b class="b">indefinite scope</b><a class="copiable-link" href="#index-indefinite-scope"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  <i class="i">scope</i> that is unlimited.
+</p>
+</dd>
+<dt><a id="index-indicator"></a><span><b class="b">indicator</b><a class="copiable-link" href="#index-indicator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">property indicator</i>.
+</p>
+</dd>
+<dt><a id="index-indirect-instance"></a><span><b class="b">indirect instance</b><a class="copiable-link" href="#index-indirect-instance"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">class</i> C_1)
+  an <i class="i">object</i> of <i class="i">class</i> C_2, 
+  where C_2 is a <i class="i">subclass</i> of C_1.
+  &ldquo;An integer is an indirect instance of the class <b class="b">number</b>.&rdquo;
+</p>
+</dd>
+<dt><a id="index-inherit"></a><span><b class="b">inherit</b><a class="copiable-link" href="#index-inherit"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> 
+  1. to receive or acquire a quality, trait, or characteristic; 
+     to gain access to a feature defined elsewhere.
+  2. (a <i class="i">class</i>) to acquire the structure and behavior defined
+     by a <i class="i">superclass</i>.
+  3. (a <i class="i">package</i>) to make <i class="i">symbols</i> <i class="i">exported</i> by another
+     <i class="i">package</i> <i class="i">accessible</i> by using <b class="b">use-package</b>.
+</p>
+</dd>
+<dt><a id="index-initial-pprint-dispatch-table"></a><span><b class="b">initial pprint dispatch table</b><a class="copiable-link" href="#index-initial-pprint-dispatch-table"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">value</i> of <b class="b">*print-pprint-dispatch*</b> at the time the <i class="i">Lisp image</i> is started.
+</p>
+</dd>
+<dt><a id="index-initial-readtable-1"></a><span><b class="b">initial readtable</b><a class="copiable-link" href="#index-initial-readtable-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">value</i> of <b class="b">*readtable*</b> at the time the <i class="i">Lisp image</i> is started.
+</p>
+</dd>
+<dt><a id="index-initialization-argument-list-1"></a><span><b class="b">initialization argument list</b><a class="copiable-link" href="#index-initialization-argument-list-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">property list</i> of initialization argument <i class="i">names</i> and <i class="i">values</i>
+  used in the protocol for initializing and reinitializing <i class="i">instances</i> of <i class="i">classes</i>.
+  See <a class="ref" href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a>.
+</p>
+</dd>
+<dt><a id="index-initialization-form"></a><span><b class="b">initialization form</b><a class="copiable-link" href="#index-initialization-form"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">form</i> used to supply the initial <i class="i">value</i> for a <i class="i">slot</i>
+  or <i class="i">variable</i>.
+  &ldquo;The initialization form for a slot in a <b class="b">defclass</b> form
+            is introduced by the keyword <code class="t">:initform</code>.&rdquo;
+</p>
+</dd>
+<dt><a id="index-input-1"></a><span><b class="b">input</b><a class="copiable-link" href="#index-input-1"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">stream</i>)
+  supporting input operations (<i class="i">i.e.</i>, being a &ldquo;data source&rdquo;).
+  An <i class="i">input</i> <i class="i">stream</i> might also be an <i class="i">output</i> <i class="i">stream</i>,
+  in which case it is sometimes called a <i class="i">bidirectional</i> <i class="i">stream</i>.
+  See the <i class="i">function</i> <b class="b">input-stream-p</b>.
+</p>
+</dd>
+<dt><a id="index-instance-1"></a><span><b class="b">instance</b><a class="copiable-link" href="#index-instance-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. a <i class="i">direct instance</i>.
+  2. a <i class="i">generalized instance</i>.
+  3. an <i class="i">indirect instance</i>.
+</p>
+</dd>
+<dt><a id="index-integer"></a><span><b class="b">integer</b><a class="copiable-link" href="#index-integer"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">integer</b>, which represents a mathematical integer.
+</p>
+</dd>
+<dt><a id="index-interactive-stream-1"></a><span><b class="b">interactive stream</b><a class="copiable-link" href="#index-interactive-stream-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">stream</i> on which it makes sense to perform interactive querying.
+  See <a class="ref" href="Interactive-Streams.html">Interactive Streams</a>.
+</p>
+</dd>
+<dt><a id="index-intern"></a><span><b class="b">intern</b><a class="copiable-link" href="#index-intern"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> 
+  1. (a <i class="i">string</i> in a <i class="i">package</i>)
+     to look up the <i class="i">string</i> in the <i class="i">package</i>, 
+     returning either a <i class="i">symbol</i> with that <i class="i">name</i>
+     which was already <i class="i">accessible</i> in the <i class="i">package</i>
+     or a newly created <i class="i">internal symbol</i> of the <i class="i">package</i> 
+     with that <i class="i">name</i>.
+  2. <i class="i">Idiom.</i> generally, to observe a protocol whereby objects which 
+     are equivalent or have equivalent names under some predicate defined
+     by the protocol are mapped to a single canonical object.
+</p>
+</dd>
+<dt><a id="index-internal-symbol-1"></a><span><b class="b">internal symbol</b><a class="copiable-link" href="#index-internal-symbol-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">package</i>)
+  a symbol which is <i class="i">accessible</i> in the <i class="i">package</i>,
+  but which is not an <i class="i">external symbol</i> of the <i class="i">package</i>.
+</p>
+</dd>
+<dt><a id="index-internal-time-1"></a><span><b class="b">internal time</b><a class="copiable-link" href="#index-internal-time-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  <i class="i">time</i>, represented as an <i class="i">integer</i> number of <i class="i">internal time units</i>.
+  <i class="i">Absolute</i> <i class="i">internal time</i> is measured as an offset 
+  from an arbitrarily chosen, <i class="i">implementation-dependent</i> base.
+  See <a class="ref" href="Internal-Time.html">Internal Time</a>.
+</p>
+</dd>
+<dt><a id="index-internal-time-unit"></a><span><b class="b">internal time unit</b><a class="copiable-link" href="#index-internal-time-unit"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a unit of time equal to 1/n of a second, 
+  for some <i class="i">implementation-defined</i> <i class="i">integer</i> value of n.
+  See the <i class="i">variable</i> <b class="b">internal-time-units-per-second</b>.
+</p>
+</dd>
+<dt><a id="index-interned"></a><span><b class="b">interned</b><a class="copiable-link" href="#index-interned"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> <i class="i">Trad.</i> 
+  1. (of a <i class="i">symbol</i>) <i class="i">accessible</i>_3 in
+     any <i class="i">package</i>.
+  2. (of a <i class="i">symbol</i> in a specific <i class="i">package</i>) 
+     <i class="i">present</i> in that <i class="i">package</i>.
+</p>
+</dd>
+<dt><a id="index-interpreted-function"></a><span><b class="b">interpreted function</b><a class="copiable-link" href="#index-interpreted-function"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">function</i> that is not a <i class="i">compiled function</i>.
+  (It is possible for there to be a <i class="i">conforming implementation</i> which
+   has no <i class="i">interpreted functions</i>, but a <i class="i">conforming program</i>
+   must not assume that all <i class="i">functions</i> are <i class="i">compiled functions</i>.)
+</p>
+</dd>
+<dt><a id="index-interpreted-implementation"></a><span><b class="b">interpreted implementation</b><a class="copiable-link" href="#index-interpreted-implementation"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">implementation</i> that uses an execution strategy for 
+  <i class="i">interpreted functions</i> that does not involve a one-time semantic
+  analysis pre-pass, and instead uses &ldquo;lazy&rdquo; (and sometimes repetitious)
+  semantic analysis of <i class="i">forms</i> as they are encountered during execution.
+</p>
+</dd>
+<dt><a id="index-interval-designator"></a><span><b class="b">interval designator</b><a class="copiable-link" href="#index-interval-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of <i class="i">type</i> T)
+  an ordered pair of <i class="i">objects</i> that describe a <i class="i">subtype</i> of T
+  by delimiting an interval on the real number line.
+  See <a class="ref" href="Interval-Designators.html">Interval Designators</a>.
+</p>
+</dd>
+<dt><a id="index-invalid"></a><span><b class="b">invalid</b><a class="copiable-link" href="#index-invalid"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>, <i class="i">adj.</i>
+  1. <i class="i">n.</i>
+     a possible <i class="i">constituent trait</i> of a <i class="i">character</i>
+     which if present signifies that the <i class="i">character</i> 
+     cannot ever appear in a <i class="i">token</i> 
+     except under the control of a <i class="i">single escape</i> <i class="i">character</i>.
+     For details, see <a class="ref" href="Constituent-Characters.html">Constituent Characters</a>.
+  2. <i class="i">adj.</i> (of a <i class="i">character</i>)
+     being a <i class="i">character</i> that has <i class="i">syntax type</i> <i class="i">constituent</i>
+     in the <i class="i">current readtable</i> and that has the 
+     <i class="i">constituent trait</i> <i class="i">invalid</i>_1.
+     See <i class="i">Figure~2&ndash;8</i>.
+</p>
+</dd>
+<dt><a id="index-iteration-form"></a><span><b class="b">iteration form</b><a class="copiable-link" href="#index-iteration-form"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">compound form</i> whose <i class="i">operator</i> is named in Figure 26&ndash;3,
+  or a <i class="i">compound form</i> that has an <i class="i">implementation-defined</i> <i class="i">operator</i>
+     and that is defined by the <i class="i">implementation</i> to be an <i class="i">iteration form</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  do              do-external-symbols  dotimes  <!-- /@w -->
+  do*             do-symbols           loop     <!-- /@w -->
+  do-all-symbols  dolist                        <!-- /@w -->
+
+    Figure 26&ndash;3: Standardized Iteration Forms  <!-- /@w -->
+
+</pre></div></div>
+
+</dd>
+<dt><a id="index-iteration-variable"></a><span><b class="b">iteration variable</b><a class="copiable-link" href="#index-iteration-variable"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">variable</i> V, the <i class="i">binding</i> for which was created by an
+  <i class="i">explicit use</i> of V in an <i class="i">iteration form</i>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="K"><span><b class="b">K</b><a class="copiable-link" href="#K"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-key"></a><span><b class="b">key</b><a class="copiable-link" href="#index-key"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> used for selection during retrieval. 
+  See <i class="i">association list</i>, <i class="i">property list</i>, and <i class="i">hash table</i>.
+  Also, see <a class="ref" href="Sequence-Concepts.html">Sequence Concepts</a>.
+</p>
+</dd>
+<dt><a id="index-keyword"></a><span><b class="b">keyword</b><a class="copiable-link" href="#index-keyword"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. a <i class="i">symbol</i> the <i class="i">home package</i> of which is the <code class="t">KEYWORD</code> <i class="i">package</i>.
+  2. any <i class="i">symbol</i>, usually but not necessarily in the <code class="t">KEYWORD</code> <i class="i">package</i>,
+     that is used as an identifying marker in keyword-style argument passing.
+     See <b class="b">lambda</b>.
+  3. <i class="i">Idiom.</i> a <i class="i">lambda list keyword</i>.
+</p>
+</dd>
+<dt><a id="index-keyword-parameter"></a><span><b class="b">keyword parameter</b><a class="copiable-link" href="#index-keyword-parameter"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  A <i class="i">parameter</i> for which a corresponding keyword <i class="i">argument</i>
+  is optional.  (There is no such thing as a required keyword <i class="i">argument</i>.)
+  If the <i class="i">argument</i> is not supplied, a default value is used.
+  See also <i class="i">supplied-p parameter</i>.
+</p>
+</dd>
+<dt><a id="index-keyword_002fvalue-pair"></a><span><b class="b">keyword/value pair</b><a class="copiable-link" href="#index-keyword_002fvalue-pair"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  two successive <i class="i">elements</i> (a <i class="i">keyword</i> and a <i class="i">value</i>, 
+  respectively) of a <i class="i">property list</i>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="L"><span><b class="b">L</b><a class="copiable-link" href="#L"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-lambda-combination"></a><span><b class="b">lambda combination</b><a class="copiable-link" href="#index-lambda-combination"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> 
+  a <i class="i">lambda form</i>.
+</p>
+</dd>
+<dt><a id="index-lambda-expression"></a><span><b class="b">lambda expression</b><a class="copiable-link" href="#index-lambda-expression"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">list</i> which can be used in place of a <i class="i">function name</i> in 
+  certain contexts to denote a <i class="i">function</i> by directly describing its
+  behavior rather than indirectly by referring to the name of an
+  <i class="i">established</i> <i class="i">function</i>; its name derives from the fact that its
+  first element is the <i class="i">symbol</i> <code class="t">lambda</code>.
+  See <b class="b">lambda</b>.
+</p>
+</dd>
+<dt><a id="index-lambda-form"></a><span><b class="b">lambda form</b><a class="copiable-link" href="#index-lambda-form"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">form</i> that is a <i class="i">list</i> and that has a first element
+  which is a <i class="i">lambda expression</i> representing a <i class="i">function</i>
+  to be called on <i class="i">arguments</i> which are the result of <i class="i">evaluating</i>
+  subsequent elements of the <i class="i">lambda form</i>.
+</p>
+</dd>
+<dt><a id="index-lambda-list-1"></a><span><b class="b">lambda list</b><a class="copiable-link" href="#index-lambda-list-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">list</i> that specifies a set of <i class="i">parameters</i> 
+  (sometimes called <i class="i">lambda variables</i>)
+  and a protocol for receiving <i class="i">values</i> for those <i class="i">parameters</i>;
+  that is,
+  an <i class="i">ordinary lambda list</i>,
+  an <i class="i">extended lambda list</i>,
+  or a <i class="i">modified lambda list</i>.
+</p>
+</dd>
+<dt><a id="index-lambda-list-keyword"></a><span><b class="b">lambda list keyword</b><a class="copiable-link" href="#index-lambda-list-keyword"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">symbol</i> whose <i class="i">name</i> begins with <i class="i">ampersand</i>
+  and that is specially recognized in a <i class="i">lambda list</i>.
+  Note that no <i class="i">standardized</i> <i class="i">lambda list keyword</i> 
+  is in the <code class="t">KEYWORD</code> <i class="i">package</i>.
+</p>
+</dd>
+<dt><a id="index-lambda-variable"></a><span><b class="b">lambda variable</b><a class="copiable-link" href="#index-lambda-variable"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">formal parameter</i>, used to emphasize the <i class="i">variable</i>&rsquo;s
+  relation to the <i class="i">lambda list</i> that <i class="i">established</i> it.
+</p>
+</dd>
+<dt><a id="index-leaf"></a><span><b class="b">leaf</b><a class="copiable-link" href="#index-leaf"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. an <i class="i">atom</i> in a <i class="i">tree</i>_1.
+  2. a terminal node of a <i class="i">tree</i>_2.
+</p>
+</dd>
+<dt><a id="index-leap-seconds"></a><span><b class="b">leap seconds</b><a class="copiable-link" href="#index-leap-seconds"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  additional one-second intervals of time that are occasionally inserted 
+  into the true calendar by official timekeepers as a correction similar 
+  to &ldquo;leap years.&rdquo;  All <span class="r">Common Lisp</span> <i class="i">time</i> representations ignore 
+  <i class="i">leap seconds</i>; every day is assumed to be exactly 86400 seconds 
+  long.
+</p>
+</dd>
+<dt><a id="index-left_002dparenthesis"></a><span><b class="b">left-parenthesis</b><a class="copiable-link" href="#index-left_002dparenthesis"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> &ldquo;<code class="t">(</code>&rdquo;,
+  that is variously called
+      &ldquo;left parenthesis&rdquo;
+   or &ldquo;open parenthesis&rdquo;
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+<dt><a id="index-length"></a><span><b class="b">length</b><a class="copiable-link" href="#index-length"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">sequence</i>)
+  the number of <i class="i">elements</i> in the <i class="i">sequence</i>.
+  (Note that if the <i class="i">sequence</i> is a <i class="i">vector</i> with a 
+   <i class="i">fill pointer</i>, its <i class="i">length</i> is the same as the 
+   <i class="i">fill pointer</i> even though the total allocated size of
+   the <i class="i">vector</i> might be larger.)
+</p>
+</dd>
+<dt><a id="index-lexical-binding"></a><span><b class="b">lexical binding</b><a class="copiable-link" href="#index-lexical-binding"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">binding</i> in a <i class="i">lexical environment</i>.
+</p>
+</dd>
+<dt><a id="index-lexical-closure"></a><span><b class="b">lexical closure</b><a class="copiable-link" href="#index-lexical-closure"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">function</i> that, when invoked on <i class="i">arguments</i>, executes
+  the body of a <i class="i">lambda expression</i> in the <i class="i">lexical environment</i> 
+  that was captured at the time of the creation of the <i class="i">lexical closure</i>,
+  augmented by <i class="i">bindings</i> of the <i class="i">function</i>&rsquo;s <i class="i">parameters</i>
+  to the corresponding <i class="i">arguments</i>.
+</p>
+</dd>
+<dt><a id="index-lexical-environment-1"></a><span><b class="b">lexical environment</b><a class="copiable-link" href="#index-lexical-environment-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  that part of the <i class="i">environment</i> that contains <i class="i">bindings</i>
+  whose names have <i class="i">lexical scope</i>. A <i class="i">lexical environment</i> 
+  contains, among other things:
+     ordinary <i class="i">bindings</i> of <i class="i">variable</i> <i class="i">names</i> to <i class="i">values</i>,
+     lexically <i class="i">established</i> <i class="i">bindings</i> of <i class="i">function names</i>
+        to <i class="i">functions</i>,
+     <i class="i">macros</i>,
+     <i class="i">symbol macros</i>,
+     <i class="i">blocks</i>,
+     <i class="i">tags</i>,
+  and
+     <i class="i">local declarations</i> (see <b class="b">declare</b>).
+</p>
+</dd>
+<dt><a id="index-lexical-scope"></a><span><b class="b">lexical scope</b><a class="copiable-link" href="#index-lexical-scope"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  <i class="i">scope</i> that is limited to a spatial or textual region within the
+  establishing <i class="i">form</i>.
+  &ldquo;The names of parameters to a function normally are lexically scoped.&rdquo;
+</p>
+</dd>
+<dt><a id="index-lexical-variable"></a><span><b class="b">lexical variable</b><a class="copiable-link" href="#index-lexical-variable"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">variable</i> the <i class="i">binding</i> for which is in the
+  <i class="i">lexical environment</i>.
+</p>
+</dd>
+<dt><a id="index-Lisp-image"></a><span><b class="b">Lisp image</b><a class="copiable-link" href="#index-Lisp-image"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a running instantiation of a <span class="r">Common Lisp</span> <i class="i">implementation</i>.
+  A <i class="i">Lisp image</i> is characterized by a single address space in which any
+  <i class="i">object</i> can directly refer to any another in conformance with this specification,
+  and by a single, common, <i class="i">global environment</i>.
+  (External operating systems sometimes call this a 
+       &ldquo;core image,&rdquo;
+       &ldquo;fork,&rdquo;
+       &ldquo;incarnation,&rdquo; 
+       &ldquo;job,&rdquo;
+    or &ldquo;process.&rdquo;  Note however, that the issue of a &ldquo;process&rdquo; in such 
+    an operating system is technically orthogonal to the issue of a <i class="i">Lisp image</i>
+    being defined here.  Depending on the operating system, a single &ldquo;process&rdquo; 
+    might have multiple <i class="i">Lisp images</i>, and multiple &ldquo;processes&rdquo; might reside
+    in a single <i class="i">Lisp image</i>.  Hence, it is the idea of a fully shared address
+    space for direct reference among all <i class="i">objects</i> which is the defining
+    characteristic.  Note, too, that two &ldquo;processes&rdquo; which have a communication 
+    area that permits the sharing of some but not all <i class="i">objects</i> are considered
+    to be distinct <i class="i">Lisp images</i>.)
+</p>
+</dd>
+<dt><a id="index-Lisp-printer"></a><span><b class="b">Lisp printer</b><a class="copiable-link" href="#index-Lisp-printer"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> 
+  the procedure that prints the character representation of an
+  <i class="i">object</i> onto a <i class="i">stream</i>. (This procedure is implemented
+  by the <i class="i">function</i> <b class="b">write</b>.)
+</p>
+</dd>
+<dt><a id="index-Lisp-read_002deval_002dprint-loop"></a><span><b class="b">Lisp read-eval-print loop</b><a class="copiable-link" href="#index-Lisp-read_002deval_002dprint-loop"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> 
+  an endless loop that <i class="i">reads</i>_2 a <i class="i">form</i>,
+  <i class="i">evaluates</i> it,
+  and prints (<i class="i">i.e.</i>, <i class="i">writes</i>_2) the results.
+  In many <i class="i">implementations</i>,
+  the default mode of interaction with <span class="r">Common Lisp</span> during program development
+  is through such a loop.
+</p>
+</dd>
+<dt><a id="index-Lisp-reader"></a><span><b class="b">Lisp reader</b><a class="copiable-link" href="#index-Lisp-reader"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> 
+  the procedure that parses character representations of <i class="i">objects</i>
+  from a <i class="i">stream</i>, producing <i class="i">objects</i>.
+  (This procedure is implemented by the <i class="i">function</i> <b class="b">read</b>.)
+</p>
+</dd>
+<dt><a id="index-list-2"></a><span><b class="b">list</b><a class="copiable-link" href="#index-list-2"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. a chain of <i class="i">conses</i> in which the <i class="i">car</i> of each
+     <i class="i">cons</i> is an <i class="i">element</i> of the <i class="i">list</i>, 
+     and the <i class="i">cdr</i> of each <i class="i">cons</i> is either the next
+     link in the chain or a terminating <i class="i">atom</i>.  
+     See also <i class="i">proper list</i>,
+	    <i class="i">dotted list</i>, 
+         or <i class="i">circular list</i>.
+  2. the <i class="i">type</i> that is the union of <b class="b">null</b> and <b class="b">cons</b>.
+</p>
+</dd>
+<dt><a id="index-list-designator"></a><span><b class="b">list designator</b><a class="copiable-link" href="#index-list-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">designator</i> for a <i class="i">list</i> of <i class="i">objects</i>; that is,
+  an <i class="i">object</i> that denotes a <i class="i">list</i> 
+  and that is one of:
+       a <i class="i">non-nil</i> <i class="i">atom</i> 
+         (denoting a <i class="i">singleton</i> <i class="i">list</i> 
+          whose <i class="i">element</i> is that <i class="i">non-nil</i> <i class="i">atom</i>)
+       or a <i class="i">proper list</i> (denoting itself).
+</p>
+</dd>
+<dt><a id="index-list-structure"></a><span><b class="b">list structure</b><a class="copiable-link" href="#index-list-structure"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">list</i>)
+  the set of <i class="i">conses</i> that make up the <i class="i">list</i>.
+  Note that while the <i class="i">car</i>_{1b} component of each such <i class="i">cons</i>
+  is part of the <i class="i">list structure</i>, 
+  the <i class="i">objects</i> that are <i class="i">elements</i> of the <i class="i">list</i>
+  (<i class="i">i.e.</i>, the <i class="i">objects</i> that are the <i class="i">cars</i>_2 of each <i class="i">cons</i>
+   in the <i class="i">list</i>)
+  are not themselves part of its <i class="i">list structure</i>, 
+  even if they are <i class="i">conses</i>,
+  except in the (<i class="i">circular</i>_2)
+  case where the <i class="i">list</i> 
+  actually contains one of its <i class="i">tails</i> as an <i class="i">element</i>.
+  (The <i class="i">list structure</i> of a <i class="i">list</i> is sometimes redundantly 
+   referred to as its &ldquo;top-level list structure&rdquo; in order to emphasize
+   that any <i class="i">conses</i> that are <i class="i">elements</i> of the <i class="i">list</i> 
+   are not involved.)
+</p>
+</dd>
+<dt><a id="index-literal"></a><span><b class="b">literal</b><a class="copiable-link" href="#index-literal"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of an <i class="i">object</i>)
+  referenced directly in a program rather than being computed by the program;
+  that is,
+  appearing as data in a <b class="b">quote</b> <i class="i">form</i>, 
+  or, if the <i class="i">object</i> is a <i class="i">self-evaluating object</i>,
+  appearing as unquoted data.
+  &ldquo;In the form <code class="t">(cons &quot;one&quot; '(&quot;two&quot;))</code>, 
+            the expressions <code class="t">&quot;one&quot;</code>, <code class="t">(&quot;two&quot;)</code>, and <code class="t">&quot;two&quot;</code>
+            are literal objects.&rdquo;
+</p>
+</dd>
+<dt><a id="index-load"></a><span><b class="b">load</b><a class="copiable-link" href="#index-load"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (a <i class="i">file</i>)
+  to cause the <i class="i">code</i> contained in the <i class="i">file</i> to be <i class="i">executed</i>.
+  See the <i class="i">function</i> <b class="b">load</b>.
+</p>
+</dd>
+<dt><a id="index-load-time"></a><span><b class="b">load time</b><a class="copiable-link" href="#index-load-time"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the duration of time that the loader is <i class="i">loading</i> <i class="i">compiled code</i>.
+</p>
+</dd>
+<dt><a id="index-load-time-value"></a><span><b class="b">load time value</b><a class="copiable-link" href="#index-load-time-value"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> referred to in <i class="i">code</i> by a <b class="b">load-time-value</b> 
+  <i class="i">form</i>.  The <i class="i">value</i> of such a <i class="i">form</i> is some specific
+  <i class="i">object</i> which can only be computed in the run-time <i class="i">environment</i>.
+  In the case of <i class="i">file</i> <i class="i">compilation</i>, the <i class="i">value</i> is
+  computed once as part of the process of <i class="i">loading</i> the <i class="i">compiled file</i>,
+  and not again.  See the <i class="i">special operator</i> <b class="b">load-time-value</b>.
+</p>
+</dd>
+<dt><a id="index-loader"></a><span><b class="b">loader</b><a class="copiable-link" href="#index-loader"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a facility that is part of Lisp and that <i class="i">loads</i> a <i class="i">file</i>.
+  See the <i class="i">function</i> <b class="b">load</b>.
+</p>
+</dd>
+<dt><a id="index-local-declaration-1"></a><span><b class="b">local declaration</b><a class="copiable-link" href="#index-local-declaration-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">expression</i> which may appear only in specially designated
+  positions of certain <i class="i">forms</i>, and which provides information about
+  the code contained within the containing <i class="i">form</i>; 
+  that is, a <b class="b">declare</b> <i class="i">expression</i>.
+</p>
+</dd>
+<dt><a id="index-local-precedence-order-2"></a><span><b class="b">local precedence order</b><a class="copiable-link" href="#index-local-precedence-order-2"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">class</i>)
+  a <i class="i">list</i> consisting of the <i class="i">class</i> followed by its
+  <i class="i">direct superclasses</i> in the order mentioned in the defining
+  <i class="i">form</i> for the <i class="i">class</i>.
+</p>
+</dd>
+<dt><a id="index-local-slot"></a><span><b class="b">local slot</b><a class="copiable-link" href="#index-local-slot"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">class</i>)
+  a <i class="i">slot</i> <i class="i">accessible</i> in only one <i class="i">instance</i>, 
+  namely the <i class="i">instance</i> in which the <i class="i">slot</i> is allocated.
+</p>
+</dd>
+<dt><a id="index-logical-block"></a><span><b class="b">logical block</b><a class="copiable-link" href="#index-logical-block"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a conceptual grouping of related output used by the <i class="i">pretty printer</i>.
+  See the <i class="i">macro</i> <b class="b">pprint-logical-block</b> and <a class="ref" href="Dynamic-Control-of-the-Arrangement-of-Output.html">Dynamic Control of the Arrangement of Output</a>.
+</p>
+</dd>
+<dt><a id="index-logical-host"></a><span><b class="b">logical host</b><a class="copiable-link" href="#index-logical-host"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> of <i class="i">implementation-dependent</i> nature 
+  that is used as the representation of a &ldquo;host&rdquo; in a <i class="i">logical pathname</i>,
+  and that has an associated set of translation rules for converting
+  <i class="i">logical pathnames</i> belonging to that host into <i class="i">physical pathnames</i>.
+  See <a class="ref" href="Logical-Pathnames.html">Logical Pathnames</a>.
+</p>
+</dd>
+<dt><a id="index-logical-host-designator"></a><span><b class="b">logical host designator</b><a class="copiable-link" href="#index-logical-host-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">designator</i> for a <i class="i">logical host</i>; that is,
+  an <i class="i">object</i> that denotes a <i class="i">logical host</i> 
+  and that is one of:
+       a <i class="i">string</i> (denoting the <i class="i">logical host</i> that it names),
+    or a <i class="i">logical host</i> (denoting itself).
+  (Note that because the representation of a <i class="i">logical host</i> 
+   is <i class="i">implementation-dependent</i>,
+   it is possible that an <i class="i">implementation</i> might represent 
+   a <i class="i">logical host</i> as the <i class="i">string</i> that names it.)
+</p>
+</dd>
+<dt><a id="index-logical-pathname"></a><span><b class="b">logical pathname</b><a class="copiable-link" href="#index-logical-pathname"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">logical-pathname</b>.
+</p>
+</dd>
+<dt><a id="index-long-float"></a><span><b class="b">long float</b><a class="copiable-link" href="#index-long-float"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">long-float</b>.
+</p>
+</dd>
+<dt><a id="index-loop-keyword"></a><span><b class="b">loop keyword</b><a class="copiable-link" href="#index-loop-keyword"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i>
+  a symbol that is a specially recognized part of the syntax of 
+  an extended <b class="b">loop</b> <i class="i">form</i>.  Such symbols are recognized by their
+  <i class="i">name</i> (using <b class="b">string=</b>), not by their identity; as such, they
+  may be in any package.  A <i class="i">loop keyword</i> is not a <i class="i">keyword</i>.
+</p>
+</dd>
+<dt><a id="index-lowercase"></a><span><b class="b">lowercase</b><a class="copiable-link" href="#index-lowercase"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">character</i>)
+     being among <i class="i">standard characters</i> corresponding to
+     the small letters <code class="t">a</code> through <code class="t">z</code>,
+  or being some other <i class="i">implementation-defined</i> <i class="i">character</i>
+      that is defined by the <i class="i">implementation</i> to be <i class="i">lowercase</i>.
+  See <a class="ref" href="Characters-With-Case.html">Characters With Case</a>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="M"><span><b class="b">M</b><a class="copiable-link" href="#M"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-macro-1"></a><span><b class="b">macro</b><a class="copiable-link" href="#index-macro-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. a <i class="i">macro form</i>
+  2. a <i class="i">macro function</i>.
+  3. a <i class="i">macro name</i>.
+</p>
+</dd>
+<dt><a id="index-macro-character"></a><span><b class="b">macro character</b><a class="copiable-link" href="#index-macro-character"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">character</i> which, when encountered by the <i class="i">Lisp reader</i> 
+  in its main dispatch loop, introduces a <i class="i">reader macro</i>_1.
+  (<i class="i">Macro characters</i> have nothing to do with <i class="i">macros</i>.)
+</p>
+</dd>
+<dt><a id="index-macro-expansion"></a><span><b class="b">macro expansion</b><a class="copiable-link" href="#index-macro-expansion"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. the process of translating a <i class="i">macro form</i> into another
+     <i class="i">form</i>.
+  2. the <i class="i">form</i> resulting from this process.
+</p>
+</dd>
+<dt><a id="index-macro-form"></a><span><b class="b">macro form</b><a class="copiable-link" href="#index-macro-form"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">form</i> that stands for another <i class="i">form</i> 
+  (<i class="i">e.g.</i>, for the purposes of abstraction, information hiding, 
+       or syntactic convenience);
+  that is, 
+    either a <i class="i">compound form</i> whose first element is a <i class="i">macro name</i>, 
+    or     a <i class="i">form</i> that is a <i class="i">symbol</i> that names a 
+             <i class="i">symbol macro</i>.
+</p>
+</dd>
+<dt><a id="index-macro-function"></a><span><b class="b">macro function</b><a class="copiable-link" href="#index-macro-function"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">function</i> of two arguments, a <i class="i">form</i> and an 
+  <i class="i">environment</i>, that implements <i class="i">macro expansion</i> by
+  producing a <i class="i">form</i> to be evaluated in place of the original
+  argument <i class="i">form</i>.
+</p>
+</dd>
+<dt><a id="index-macro-lambda-list-1"></a><span><b class="b">macro lambda list</b><a class="copiable-link" href="#index-macro-lambda-list-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">extended lambda list</i> used in <i class="i">forms</i> that <i class="i">establish</i>
+  <i class="i">macro</i> definitions, such as <b class="b">defmacro</b> and <b class="b">macrolet</b>.
+  See <a class="ref" href="Macro-Lambda-Lists.html">Macro Lambda Lists</a>.
+</p>
+</dd>
+<dt><a id="index-macro-name"></a><span><b class="b">macro name</b><a class="copiable-link" href="#index-macro-name"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">name</i> for which <b class="b">macro-function</b> returns <i class="i">true</i>
+  and which when used as the first element of a <i class="i">compound form</i>
+  identifies that <i class="i">form</i> as a <i class="i">macro form</i>.
+</p>
+</dd>
+<dt><a id="index-macroexpand-hook"></a><span><b class="b">macroexpand hook</b><a class="copiable-link" href="#index-macroexpand-hook"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">function</i> that is the <i class="i">value</i> of <b class="b">*macroexpand-hook*</b>.
+</p>
+</dd>
+<dt><a id="index-mapping"></a><span><b class="b">mapping</b><a class="copiable-link" href="#index-mapping"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. a type of iteration in which a <i class="i">function</i> is successively 
+     applied to <i class="i">objects</i> taken from corresponding entries in
+     collections such as <i class="i">sequences</i> or <i class="i">hash tables</i>.
+  2. <i class="i">Math.</i> a relation between two sets in which each element of the
+     first set (the &ldquo;domain&rdquo;) is assigned one element of the second
+     set (the &ldquo;range&rdquo;).
+</p>
+</dd>
+<dt><a id="index-metaclass-2"></a><span><b class="b">metaclass</b><a class="copiable-link" href="#index-metaclass-2"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. a <i class="i">class</i> whose instances are <i class="i">classes</i>.
+  2. (of an <i class="i">object</i>) the <i class="i">class</i> of the <i class="i">class</i> of the <i class="i">object</i>.
+</p>
+</dd>
+<dt><a id="index-Metaobject-Protocol"></a><span><b class="b">Metaobject Protocol</b><a class="copiable-link" href="#index-Metaobject-Protocol"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  one of many possible descriptions of how a <i class="i">conforming implementation</i>
+  might implement various aspects of the object system.  This description is beyond
+  the scope of this document, and no <i class="i">conforming implementation</i> is
+  required to adhere to it except as noted explicitly in this specification.
+  Nevertheless, its existence helps to establish normative practice, 
+  and implementors with no reason to diverge from it are encouraged to
+  consider making their <i class="i">implementation</i> adhere to it where possible.
+  It is described in detail in <i class="i">The Art of the Metaobject Protocol</i>.
+</p>
+</dd>
+<dt><a id="index-method"></a><span><b class="b">method</b><a class="copiable-link" href="#index-method"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> that is part of a <i class="i">generic function</i> and which
+  provides information about how that <i class="i">generic function</i> should 
+  behave when its <i class="i">arguments</i> are <i class="i">objects</i> of certain
+  <i class="i">classes</i> or with certain identities.
+</p>
+</dd>
+<dt><a id="index-method-combination"></a><span><b class="b">method combination</b><a class="copiable-link" href="#index-method-combination"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. generally, the composition of a set of <i class="i">methods</i> to produce an
+     <i class="i">effective method</i> for a <i class="i">generic function</i>.
+  2. an object of <i class="i">type</i> <b class="b">method-combination</b>, which represents the details
+     of how the <i class="i">method combination</i>_1 for one or more 
+     specific <i class="i">generic functions</i> is to be performed.
+</p>
+</dd>
+<dt><a id="index-method_002ddefining-form"></a><span><b class="b">method-defining form</b><a class="copiable-link" href="#index-method_002ddefining-form"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">form</i> that defines a <i class="i">method</i> for a <i class="i">generic function</i>,
+  whether explicitly or implicitly.  
+  See <a class="ref" href="Introduction-to-Generic-Functions.html">Introduction to Generic Functions</a>.
+</p>
+</dd>
+<dt><a id="index-method_002ddefining-operator-1"></a><span><b class="b">method-defining operator</b><a class="copiable-link" href="#index-method_002ddefining-operator-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">operator</i> corresponding to a <i class="i">method-defining</i> <i class="i">form</i>.
+  See <i class="i">Figure~7&ndash;1</i>.
+</p>
+</dd>
+<dt><a id="index-minimal-compilation-1"></a><span><b class="b">minimal compilation</b><a class="copiable-link" href="#index-minimal-compilation-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  actions the <i class="i">compiler</i> must take at compile time. 
+  See <a class="ref" href="Compilation-Semantics.html">Compilation Semantics</a>.
+</p>
+</dd>
+<dt><a id="index-modified-lambda-list"></a><span><b class="b">modified lambda list</b><a class="copiable-link" href="#index-modified-lambda-list"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a list resembling an <i class="i">ordinary lambda list</i> in form and purpose, 
+  but which deviates in syntax or functionality from the definition of an 
+  <i class="i">ordinary lambda list</i>.
+  See <i class="i">ordinary lambda list</i>.
+  &ldquo;<b class="b">deftype</b> uses a modified lambda list.&rdquo;
+</p>
+</dd>
+<dt><a id="index-most-recent"></a><span><b class="b">most recent</b><a class="copiable-link" href="#index-most-recent"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i>
+  innermost;
+  that is, having been <i class="i">established</i> (and not yet <i class="i">disestablished</i>)
+  more recently than any other of its kind.
+</p>
+</dd>
+<dt><a id="index-multiple-escape-1"></a><span><b class="b">multiple escape</b><a class="copiable-link" href="#index-multiple-escape-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>, <i class="i">adj.</i>
+  1. <i class="i">n.</i> the <i class="i">syntax type</i> of a <i class="i">character</i> 
+     that is used in pairs  to indicate that the enclosed <i class="i">characters</i>
+     are to be treated as <i class="i">alphabetic</i>_2 <i class="i">characters</i>
+     with their <i class="i">case</i> preserved.
+     For details, see <a class="ref" href="Multiple-Escape-Characters.html">Multiple Escape Characters</a>.
+  2. <i class="i">adj.</i> (of a <i class="i">character</i>) 
+     having the <i class="i">multiple escape</i> <i class="i">syntax type</i>.
+  3. <i class="i">n.</i> a <i class="i">multiple escape</i>_2 <i class="i">character</i>.
+     (In the <i class="i">standard readtable</i>,
+      <i class="i">vertical-bar</i> is a <i class="i">multiple escape</i> <i class="i">character</i>.)
+</p>
+</dd>
+<dt><a id="index-multiple-values"></a><span><b class="b">multiple values</b><a class="copiable-link" href="#index-multiple-values"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. more than one <i class="i">value</i>.
+     &ldquo;The function <b class="b">truncate</b> returns multiple values.&rdquo;
+  2. a variable number of <i class="i">values</i>, possibly including zero or one.
+     &ldquo;The function <b class="b">values</b> returns multiple values.&rdquo;
+  3. a fixed number of values other than one.
+     &ldquo;The macro <b class="b">multiple-value-bind</b> is among the few
+	       operators in <span class="r">Common Lisp</span> which can detect and manipulate
+ 	       multiple values.&rdquo;
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="N"><span><b class="b">N</b><a class="copiable-link" href="#N"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-name-1"></a><span><b class="b">name</b><a class="copiable-link" href="#index-name-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>, <i class="i">v.t.</i> 
+  1. <i class="i">n.</i> an <i class="i">identifier</i> by which an <i class="i">object</i>,
+     a <i class="i">binding</i>, or an <i class="i">exit point</i>
+     is referred to by association using a <i class="i">binding</i>.
+  2. <i class="i">v.t.</i> to give a <i class="i">name</i> to.
+  3. <i class="i">n.</i> (of an <i class="i">object</i> having a name component) 
+     the <i class="i">object</i> which is that component.  
+     &ldquo;The string which is a symbol&rsquo;s name is returned
+	       by <b class="b">symbol-name</b>.&rdquo;
+  4. <i class="i">n.</i> (of a <i class="i">pathname</i>)
+     a. the name component, returned by <b class="b">pathname-name</b>.
+     b. the entire namestring, returned by <b class="b">namestring</b>.
+  5. <i class="i">n.</i> (of a <i class="i">character</i>)
+     a <i class="i">string</i> that names the <i class="i">character</i>
+     and that has <i class="i">length</i> greater than one.
+     (All <i class="i">non-graphic</i> <i class="i">characters</i> are required to have <i class="i">names</i>
+      unless they have some <i class="i">implementation-defined</i> <i class="i">attribute</i>
+      which is not <i class="i">null</i>.  Whether or not other <i class="i">characters</i>
+      have <i class="i">names</i> is <i class="i">implementation-dependent</i>.)
+</p>
+</dd>
+<dt><a id="index-named-constant"></a><span><b class="b">named constant</b><a class="copiable-link" href="#index-named-constant"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">variable</i> that is defined by <span class="r">Common Lisp</span>,
+				    by the <i class="i">implementation</i>,
+  				 or by user code (see the <i class="i">macro</i> <b class="b">defconstant</b>)
+  to always <i class="i">yield</i> the same <i class="i">value</i> when <i class="i">evaluated</i>.
+  &ldquo;The value of a named constant may not be changed
+            by assignment or by binding.&rdquo;
+</p>
+</dd>
+<dt><a id="index-namespace-1"></a><span><b class="b">namespace</b><a class="copiable-link" href="#index-namespace-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. <i class="i">bindings</i> whose denotations are restricted to a particular kind.
+     &ldquo;The bindings of names to tags is the tag namespace.&rdquo;
+  2. any <i class="i">mapping</i> whose domain is a set of <i class="i">names</i>.
+     &ldquo;A package defines a namespace.&rdquo;
+</p>
+</dd>
+<dt><a id="index-namestring-1"></a><span><b class="b">namestring</b><a class="copiable-link" href="#index-namestring-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">string</i> that represents a <i class="i">filename</i>
+  using either the <i class="i">standardized</i> notation for naming <i class="i">logical pathnames</i>
+         described in <a class="ref" href="Syntax-of-Logical-Pathname-Namestrings.html">Syntax of Logical Pathname Namestrings</a>,
+     or some <i class="i">implementation-defined</i> notation for naming a <i class="i">physical pathname</i>.
+</p>
+</dd>
+<dt><a id="index-newline"></a><span><b class="b">newline</b><a class="copiable-link" href="#index-newline"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> &lt;<i class="i">Newline</i>&gt;,
+  notated for the <i class="i">Lisp reader</i> as <code class="t">#\Newline</code>.
+</p>
+</dd>
+<dt><a id="index-next-method-1"></a><span><b class="b">next method</b><a class="copiable-link" href="#index-next-method-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the next <i class="i">method</i> to be invoked with respect to a given
+  <i class="i">method</i> for a particular set of arguments or argument
+  <i class="i">classes</i>.  
+  See <a class="ref" href="Applying-method-combination-to-the-sorted-list-of-applicable-methods.html">Applying method combination to the sorted list of applicable methods</a>.
+</p>
+</dd>
+<dt><a id="index-nickname"></a><span><b class="b">nickname</b><a class="copiable-link" href="#index-nickname"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">package</i>)
+  one of possibly several <i class="i">names</i> that can be used to refer to
+  the <i class="i">package</i> but that is not the primary <i class="i">name</i> 
+  of the <i class="i">package</i>.
+</p>
+</dd>
+<dt><a id="index-nil-1"></a><span><b class="b">nil</b><a class="copiable-link" href="#index-nil-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the <i class="i">object</i> that is at once
+        the <i class="i">symbol</i> named <code class="t">&quot;NIL&quot;</code> in the <code class="t">COMMON-LISP</code> <i class="i">package</i>,
+        the <i class="i">empty list</i>,
+        the <i class="i">boolean</i> (or <i class="i">generalized boolean</i>) representing <i class="i">false</i>,
+    and the <i class="i">name</i> of the <i class="i">empty type</i>.
+</p>
+</dd>
+<dt><a id="index-non_002datomic"></a><span><b class="b">non-atomic</b><a class="copiable-link" href="#index-non_002datomic"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  being other than an <i class="i">atom</i>; <i class="i">i.e.</i>, being a <i class="i">cons</i>.
+</p>
+</dd>
+<dt><a id="index-non_002dconstant-variable"></a><span><b class="b">non-constant variable</b><a class="copiable-link" href="#index-non_002dconstant-variable"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">variable</i> that is not a <i class="i">constant variable</i>.
+</p>
+</dd>
+<dt><a id="index-non_002dcorrectable"></a><span><b class="b">non-correctable</b><a class="copiable-link" href="#index-non_002dcorrectable"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of an <i class="i">error</i>)
+  not intentionally <i class="i">correctable</i>.
+  (Because of the dynamic nature of <i class="i">restarts</i>,
+   it is neither possible nor generally useful to completely prohibit
+   an <i class="i">error</i> from being <i class="i">correctable</i>.
+   This term is used in order to express an intent that no special effort
+   should be made by <i class="i">code</i> signaling an <i class="i">error</i> to make
+   that <i class="i">error</i> <i class="i">correctable</i>; 
+   however, there is no actual requirement on <i class="i">conforming programs</i>
+   or <i class="i">conforming implementations</i> imposed by this term.)
+</p>
+</dd>
+<dt><a id="index-non_002dempty"></a><span><b class="b">non-empty</b><a class="copiable-link" href="#index-non_002dempty"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i>
+  having at least one <i class="i">element</i>.
+</p>
+</dd>
+<dt><a id="index-non_002dgeneric-function"></a><span><b class="b">non-generic function</b><a class="copiable-link" href="#index-non_002dgeneric-function"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">function</i> that is not a <i class="i">generic function</i>.
+</p>
+</dd>
+<dt><a id="index-non_002dgraphic-1"></a><span><b class="b">non-graphic</b><a class="copiable-link" href="#index-non_002dgraphic-1"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">character</i>)
+  not <i class="i">graphic</i>.
+  See <a class="ref" href="Graphic-Characters.html">Graphic Characters</a>.
+</p>
+</dd>
+<dt><a id="index-non_002dlist"></a><span><b class="b">non-list</b><a class="copiable-link" href="#index-non_002dlist"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>, <i class="i">adj.</i> 
+  other than a <i class="i">list</i>; <i class="i">i.e.</i>, a <i class="i">non-nil</i> <i class="i">atom</i>.
+</p>
+</dd>
+<dt><a id="index-non_002dlocal-exit"></a><span><b class="b">non-local exit</b><a class="copiable-link" href="#index-non_002dlocal-exit"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a transfer of control (and sometimes <i class="i">values</i>) to 
+  an <i class="i">exit point</i> for reasons other than a <i class="i">normal return</i>.
+  &ldquo;The operators <b class="b">go</b>, <b class="b">throw</b>, 
+	    and <b class="b">return-from</b> cause a non-local exit.&rdquo;
+</p>
+</dd>
+<dt><a id="index-non_002dnil"></a><span><b class="b">non-nil</b><a class="copiable-link" href="#index-non_002dnil"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>, <i class="i">adj.</i> 
+  not <b class="b">nil</b>.  Technically, any <i class="i">object</i> which is not <b class="b">nil</b> can be
+  referred to as <i class="i">true</i>, but that would tend to imply a unique view
+  of the <i class="i">object</i> as a <i class="i">generalized boolean</i>.
+  Referring to such an <i class="i">object</i> as <i class="i">non-nil</i> avoids this implication.
+</p>
+</dd>
+<dt><a id="index-non_002dnull-lexical-environment"></a><span><b class="b">non-null lexical environment</b><a class="copiable-link" href="#index-non_002dnull-lexical-environment"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">lexical environment</i> that has additional information not present in
+  the <i class="i">global environment</i>, such as one or more <i class="i">bindings</i>.
+</p>
+</dd>
+<dt><a id="index-non_002dsimple"></a><span><b class="b">non-simple</b><a class="copiable-link" href="#index-non_002dsimple"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i>
+  not <i class="i">simple</i>.
+</p>
+</dd>
+<dt><a id="index-non_002dterminating-1"></a><span><b class="b">non-terminating</b><a class="copiable-link" href="#index-non_002dterminating-1"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">macro character</i>)
+  being such that it is treated as a constituent <i class="i">character</i>
+  when it appears in the middle of an extended token.
+  See <a class="ref" href="Reader-Algorithm.html">Reader Algorithm</a>.
+</p>
+</dd>
+<dt><a id="index-non_002dtop_002dlevel-form"></a><span><b class="b">non-top-level form</b><a class="copiable-link" href="#index-non_002dtop_002dlevel-form"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">form</i> that, by virtue of its position as a <i class="i">subform</i>
+  of another <i class="i">form</i>, is not a <i class="i">top level form</i>.
+  See <a class="ref" href="Processing-of-Top-Level-Forms.html">Processing of Top Level Forms</a>.
+</p>
+</dd>
+<dt><a id="index-normal-return"></a><span><b class="b">normal return</b><a class="copiable-link" href="#index-normal-return"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the natural transfer of control and <i class="i">values</i> which occurs after
+  the complete <i class="i">execution</i> of a <i class="i">form</i>.
+</p>
+</dd>
+<dt><a id="index-normalized"></a><span><b class="b">normalized</b><a class="copiable-link" href="#index-normalized"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i>, <i class="i">ANSI</i>, <i class="i">IEEE</i> (of a <i class="i">float</i>)
+  conforming to the description of &ldquo;normalized&rdquo; as described by <i class="i">IEEE Standard for Binary Floating-Point Arithmetic</i>.
+  See <i class="i">denormalized</i>.
+</p>
+</dd>
+<dt><a id="index-null-1"></a><span><b class="b">null</b><a class="copiable-link" href="#index-null-1"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i>, <i class="i">n.</i> 
+  1. <i class="i">adj.</i> 
+     a. (of a <i class="i">list</i>) having no <i class="i">elements</i>: empty.  See <i class="i">empty list</i>.
+     b. (of a <i class="i">string</i>) having a <i class="i">length</i> of zero.
+	(It is common, both within this document and in observed spoken behavior,
+         to refer to an empty string by an apparent definite reference,
+         as in &ldquo;the <i class="i">null</i> <i class="i">string</i>&rdquo; even though no attempt is made to
+	 <i class="i">intern</i>_2 null strings.  The phrase 
+         &ldquo;a <i class="i">null</i> <i class="i">string</i>&rdquo; is technically more correct, 
+	 but is generally considered awkward by most Lisp programmers.  
+	 As such, the phrase &ldquo;the <i class="i">null</i> <i class="i">string</i>&rdquo; 
+         should be treated as an indefinite reference in all cases 
+	 except for anaphoric references.)
+      c. (of an <i class="i">implementation-defined</i> <i class="i">attribute</i> of a <i class="i">character</i>)
+	 An <i class="i">object</i> to which the value of that <i class="i">attribute</i> defaults 
+	 if no specific value was requested.
+  2. <i class="i">n.</i> an <i class="i">object</i> of <i class="i">type</i> <b class="b">null</b> (the only such <i class="i">object</i> being <b class="b">nil</b>).
+</p>
+</dd>
+<dt><a id="index-null-lexical-environment-1"></a><span><b class="b">null lexical environment</b><a class="copiable-link" href="#index-null-lexical-environment-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the <i class="i">lexical environment</i> which has no <i class="i">bindings</i>.
+</p>
+</dd>
+<dt><a id="index-number"></a><span><b class="b">number</b><a class="copiable-link" href="#index-number"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">number</b>.
+</p>
+</dd>
+<dt><a id="index-numeric"></a><span><b class="b">numeric</b><a class="copiable-link" href="#index-numeric"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">character</i>)
+     being one of the <i class="i">standard characters</i> <code class="t">0</code> through <i class="i">9</i>,
+  or being some other <i class="i">graphic</i> <i class="i">character</i>
+     defined by the <i class="i">implementation</i> to be <i class="i">numeric</i>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="O"><span><b class="b">O</b><a class="copiable-link" href="#O"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-object"></a><span><b class="b">object</b><a class="copiable-link" href="#index-object"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. any Lisp datum. 
+     &ldquo;The function <b class="b">cons</b> creates an object which refers
+               to two other objects.&rdquo;
+  2. (immediately following the name of a <i class="i">type</i>)
+     an <i class="i">object</i> which is of that <i class="i">type</i>, used to emphasize that the
+     <i class="i">object</i> is not just a <i class="i">name</i> for an object of that <i class="i">type</i>
+     but really an <i class="i">element</i> of the <i class="i">type</i> in cases where <i class="i">objects</i>
+     of that <i class="i">type</i> (such as <b class="b">function</b> or <b class="b">class</b>) are commonly
+     referred to by <i class="i">name</i>.
+     &ldquo;The function <b class="b">symbol-function</b> takes a function name 
+	       and returns a function object.&rdquo;
+</p>
+</dd>
+<dt><a id="index-object_002dtraversing"></a><span><b class="b">object-traversing</b><a class="copiable-link" href="#index-object_002dtraversing"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  operating in succession on components of an <i class="i">object</i>.
+  &ldquo;The operators <b class="b">mapcar</b>, <b class="b">maphash</b>, 
+	    <b class="b">with-package-iterator</b> and <b class="b">count</b>
+ 	    perform object-traversing operations.&rdquo;
+</p>
+</dd>
+<dt><a id="index-open-1"></a><span><b class="b">open</b><a class="copiable-link" href="#index-open-1"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i>, <i class="i">v.t.</i> (a <i class="i">file</i>)
+  1. <i class="i">v.t.</i> to create and return a <i class="i">stream</i> to the <i class="i">file</i>.
+  2. <i class="i">adj.</i> (of a <i class="i">stream</i>)
+     having been <i class="i">opened</i>_1, but not yet <i class="i">closed</i>.
+</p>
+</dd>
+<dt><a id="index-operator"></a><span><b class="b">operator</b><a class="copiable-link" href="#index-operator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. a <i class="i">function</i>, <i class="i">macro</i>, or <i class="i">special operator</i>.
+  2. a <i class="i">symbol</i> that names
+     such a <i class="i">function</i>, <i class="i">macro</i>, or <i class="i">special operator</i>.
+  3. (in a <b class="b">function</b> <i class="i">special form</i>)
+     the <i class="i">cadr</i> of the <b class="b">function</b> <i class="i">special form</i>, which 
+     might be either an <i class="i">operator</i>_2 or a <i class="i">lambda expression</i>.
+  4. (of a <i class="i">compound form</i>)
+     the <i class="i">car</i> of the <i class="i">compound form</i>, which might be 
+     either an <i class="i">operator</i>_2
+     or a <i class="i">lambda expression</i>, and which is never <code class="t">(setf <i class="i">symbol</i>)</code>.
+</p>
+</dd>
+<dt><a id="index-optimize-quality"></a><span><b class="b">optimize quality</b><a class="copiable-link" href="#index-optimize-quality"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  one of several aspects of a program that might be optimizable by
+  certain compilers.  Since optimizing one such quality
+  might conflict with optimizing another, relative priorities for
+  qualities can be established in an <b class="b">optimize</b> <i class="i">declaration</i>.
+  The <i class="i">standardized</i> <i class="i">optimize qualities</i> are
+    <code class="t">compilation-speed</code> (speed of the compilation process), 
+</p>
+<p><code class="t">debug</code> (ease of debugging),
+</p>
+<p><code class="t">safety</code> (run-time error checking),
+    <code class="t">space</code> (both code size and run-time space),
+  and
+    <code class="t">speed</code> (of the object code).
+  <i class="i">Implementations</i> may define additional <i class="i">optimize qualities</i>.
+</p>
+</dd>
+<dt><a id="index-optional-parameter"></a><span><b class="b">optional parameter</b><a class="copiable-link" href="#index-optional-parameter"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  A <i class="i">parameter</i> for which a corresponding positional <i class="i">argument</i>
+  is optional.  If the <i class="i">argument</i> is not supplied, a default value
+  is used.  See also <i class="i">supplied-p parameter</i>.
+</p>
+</dd>
+<dt><a id="index-ordinary-function"></a><span><b class="b">ordinary function</b><a class="copiable-link" href="#index-ordinary-function"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">function</i> that is not a <i class="i">generic function</i>.
+</p>
+</dd>
+<dt><a id="index-ordinary-lambda-list-1"></a><span><b class="b">ordinary lambda list</b><a class="copiable-link" href="#index-ordinary-lambda-list-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the kind of <i class="i">lambda list</i> used by <b class="b">lambda</b>.
+  See <i class="i">modified lambda list</i> and <i class="i">extended lambda list</i>.
+  &ldquo;<b class="b">defun</b> uses an ordinary lambda list.&rdquo;
+</p>
+</dd>
+<dt><a id="index-otherwise-inaccessible-part"></a><span><b class="b">otherwise inaccessible part</b><a class="copiable-link" href="#index-otherwise-inaccessible-part"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of an <i class="i">object</i>, O_1)
+  an <i class="i">object</i>, O_2, which would be made <i class="i">inaccessible</i> if 
+  O_1 were made <i class="i">inaccessible</i>.  (Every <i class="i">object</i> is an
+  <i class="i">otherwise inaccessible part</i> of itself.)
+</p>
+</dd>
+<dt><a id="index-output-1"></a><span><b class="b">output</b><a class="copiable-link" href="#index-output-1"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">stream</i>)
+  supporting output operations (<i class="i">i.e.</i>, being a &ldquo;data sink&rdquo;).
+  An <i class="i">output</i> <i class="i">stream</i> might also be an <i class="i">input</i> <i class="i">stream</i>,
+  in which case it is sometimes called a <i class="i">bidirectional</i> <i class="i">stream</i>.
+  See the <i class="i">function</i> <b class="b">output-stream-p</b>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="P"><span><b class="b">P</b><a class="copiable-link" href="#P"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-package-1"></a><span><b class="b">package</b><a class="copiable-link" href="#index-package-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">package</b>.
+</p>
+</dd>
+<dt><a id="index-package-cell"></a><span><b class="b">package cell</b><a class="copiable-link" href="#index-package-cell"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> (of a <i class="i">symbol</i>)
+  The <i class="i">place</i> in a <i class="i">symbol</i> that holds one of
+  possibly several <i class="i">packages</i> in which the <i class="i">symbol</i> is 
+  <i class="i">interned</i>, called the <i class="i">home package</i>, or which holds
+  <b class="b">nil</b> if no such <i class="i">package</i> exists or is known.
+  See the <i class="i">function</i> <b class="b">symbol-package</b>.
+</p>
+</dd>
+<dt><a id="index-package-designator"></a><span><b class="b">package designator</b><a class="copiable-link" href="#index-package-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">designator</i> for a <i class="i">package</i>; that is,
+  an <i class="i">object</i> that denotes a <i class="i">package</i>
+  and that is one of:
+      a <i class="i">string designator</i> 
+		      (denoting the <i class="i">package</i> that has the <i class="i">string</i>
+		       that it designates as its <i class="i">name</i> 
+		       or as one of its <i class="i">nicknames</i>),
+   or a <i class="i">package</i> (denoting itself).
+</p>
+</dd>
+<dt><a id="index-package-marker"></a><span><b class="b">package marker</b><a class="copiable-link" href="#index-package-marker"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a character which is used in the textual notation for a symbol 
+  to separate the package name from the symbol name, and which
+  is <i class="i">colon</i> in the <i class="i">standard readtable</i>.
+  See <a class="ref" href="Character-Syntax.html">Character Syntax</a>.
+</p>
+</dd>
+<dt><a id="index-package-prefix"></a><span><b class="b">package prefix</b><a class="copiable-link" href="#index-package-prefix"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a notation preceding the <i class="i">name</i> of a <i class="i">symbol</i> in text that is
+  processed by the <i class="i">Lisp reader</i>, which uses a <i class="i">package</i> <i class="i">name</i>
+  followed by one or more <i class="i">package markers</i>, and which indicates that
+  the symbol is looked up in the indicated <i class="i">package</i>.
+</p>
+</dd>
+<dt><a id="index-package-registry"></a><span><b class="b">package registry</b><a class="copiable-link" href="#index-package-registry"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  A mapping of <i class="i">names</i> to <i class="i">package</i> <i class="i">objects</i>.
+  It is possible for there to be a <i class="i">package</i> <i class="i">object</i> which is not
+  in this mapping; such a <i class="i">package</i> is called an <i class="i">unregistered package</i>.
+  <i class="i">Operators</i> such as <b class="b">find-package</b> consult this mapping in order
+  to find a <i class="i">package</i> from its <i class="i">name</i>.
+  <i class="i">Operators</i> such as <b class="b">do-all-symbols</b>, <b class="b">find-all-symbols</b>, 
+  and <b class="b">list-all-packages</b> operate only on <i class="i">packages</i> that exist
+  in the <i class="i">package registry</i>.
+</p>
+</dd>
+<dt><a id="index-pairwise"></a><span><b class="b">pairwise</b><a class="copiable-link" href="#index-pairwise"> &para;</a></span></dt>
+<dd><p><i class="i">adv.</i> (of an adjective on a set)
+  applying individually to all possible pairings of elements of the set.
+  &ldquo;The types A, B, and C are pairwise disjoint if 
+            A and B are disjoint,
+            B and C are disjoint, and
+            A and C are disjoint.&rdquo;
+</p>
+</dd>
+<dt><a id="index-parallel"></a><span><b class="b">parallel</b><a class="copiable-link" href="#index-parallel"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> <i class="i">Trad.</i> (of <i class="i">binding</i> or <i class="i">assignment</i>)
+  done in the style of <b class="b">psetq</b>, <b class="b">let</b>, or <b class="b">do</b>;
+  that is, first evaluating all of the <i class="i">forms</i> that produce <i class="i">values</i>,
+  and only then <i class="i">assigning</i> or <i class="i">binding</i> the <i class="i">variables</i> (or <i class="i">places</i>).
+  Note that this does not imply traditional computational &ldquo;parallelism&rdquo; 
+  since the <i class="i">forms</i> that produce <i class="i">values</i> are evaluated <i class="i">sequentially</i>.
+  See <i class="i">sequential</i>.
+</p>
+</dd>
+<dt><a id="index-parameter"></a><span><b class="b">parameter</b><a class="copiable-link" href="#index-parameter"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. (of a <i class="i">function</i>)
+     a <i class="i">variable</i> in the definition of a <i class="i">function</i>
+       which takes on the <i class="i">value</i> of a corresponding <i class="i">argument</i>
+       (or of a <i class="i">list</i> of corresponding arguments)
+       to that <i class="i">function</i> when it is called,
+     or
+       which in some cases is given a default value because there
+       is no corresponding <i class="i">argument</i>.
+  2. (of a <i class="i">format directive</i>)
+     an <i class="i">object</i> received as data flow by a <i class="i">format directive</i>
+     due to a prefix notation within the <i class="i">format string</i> at the 
+     <i class="i">format directive</i>&rsquo;s point of use.
+     See <a class="ref" href="Formatted-Output.html">Formatted Output</a>.
+     &ldquo;In <code class="t">&quot;~3,'0D&quot;</code>, the number <code class="t">3</code> and the character
+	       <code class="t">#\0</code> are parameters to the <code class="t">~D</code> format directive.&rdquo;
+</p>
+</dd>
+<dt><a id="index-parameter-specializer"></a><span><b class="b">parameter specializer</b><a class="copiable-link" href="#index-parameter-specializer"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. (of a <i class="i">method</i>) an <i class="i">expression</i> which constrains the
+     <i class="i">method</i> to be applicable only to <i class="i">argument</i> sequences
+     in which the corresponding <i class="i">argument</i> matches the
+     <i class="i">parameter specializer</i>.
+  2. a <i class="i">class</i>,
+     or a <i class="i">list</i> <code class="t">(eql <i class="i">object</i>)</code>.
+</p>
+</dd>
+<dt><a id="index-parameter-specializer-name"></a><span><b class="b">parameter specializer name</b><a class="copiable-link" href="#index-parameter-specializer-name"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. (of a <i class="i">method</i> definition) an expression used in code to
+     name a <i class="i">parameter specializer</i>. 
+     See <a class="ref" href="Introduction-to-Methods.html">Introduction to Methods</a>.
+  2. a <i class="i">class</i>,
+</p>
+<p>a <i class="i">symbol</i> naming a <i class="i">class</i>,
+</p>
+<p>or a <i class="i">list</i> <code class="t">(eql <i class="i">form</i>)</code>.
+</p>
+</dd>
+<dt><a id="index-pathname-1"></a><span><b class="b">pathname</b><a class="copiable-link" href="#index-pathname-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">pathname</b>, which is a structured representation 
+  of the name of a <i class="i">file</i>.  A <i class="i">pathname</i> has six components:
+    a &ldquo;host,&rdquo;
+    a &ldquo;device,&rdquo;
+    a &ldquo;directory,&rdquo;
+    a &ldquo;name,&rdquo;
+    a &ldquo;type,&rdquo; and
+    a &ldquo;version.&rdquo;
+</p>
+</dd>
+<dt><a id="index-pathname-designator"></a><span><b class="b">pathname designator</b><a class="copiable-link" href="#index-pathname-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">designator</i> for a <i class="i">pathname</i>; that is,
+  an <i class="i">object</i> that denotes a <i class="i">pathname</i>
+  and that is one of:
+</p>
+<p>a <i class="i">pathname</i> <i class="i">namestring</i> 
+</p>
+<p>(denoting the corresponding <i class="i">pathname</i>),
+</p>
+<p>a <i class="i">stream associated with a file</i> 
+         (denoting the <i class="i">pathname</i> used to open the <i class="i">file</i>;
+	  this may be, but is not required to be, the actual name of the <i class="i">file</i>),
+    or a <i class="i">pathname</i> (denoting itself).
+  See <a class="ref" href="File-Operations-on-Open-and-Closed-Streams.html">File Operations on Open and Closed Streams</a>.
+</p>
+</dd>
+<dt><a id="index-physical-pathname"></a><span><b class="b">physical pathname</b><a class="copiable-link" href="#index-physical-pathname"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">pathname</i> that is not a <i class="i">logical pathname</i>.
+</p>
+<p>[Editorial Note by KMP: Still need to reconcile some confusion in the uses of &ldquo;generalized
+		 reference&rdquo; and &ldquo;place.&rdquo; I think one was supposed to refer to the
+	         abstract concept, and the other to an object (a form), but the usages
+		 have become blurred.]
+</p>
+</dd>
+<dt><a id="index-place-1"></a><span><b class="b">place</b><a class="copiable-link" href="#index-place-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. a <i class="i">form</i> which is suitable for use as a <i class="i">generalized reference</i>.
+  2. the conceptual location referred to by such a <i class="i">place</i>_1.
+</p>
+</dd>
+<dt><a id="index-plist"></a><span><b class="b">plist</b><a class="copiable-link" href="#index-plist"> &para;</a></span></dt>
+<dd><p>pronounced &rsquo;p\=e ,list  <i class="i">n.</i> 
+  a <i class="i">property list</i>.
+</p>
+</dd>
+<dt><a id="index-portable"></a><span><b class="b">portable</b><a class="copiable-link" href="#index-portable"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of <i class="i">code</i>)
+  required to produce equivalent results and observable side effects
+  in all <i class="i">conforming implementations</i>.
+</p>
+</dd>
+<dt><a id="index-potential-copy"></a><span><b class="b">potential copy</b><a class="copiable-link" href="#index-potential-copy"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of an <i class="i">object</i> O_1 subject to constriants)
+  an <i class="i">object</i> O_2 that if the specified constraints are satisfied
+  by O_1 without any modification might or might not be <i class="i">identical</i>
+  to O_1, or else that must be a <i class="i">fresh</i> <i class="i">object</i> that
+  resembles a <i class="i">copy</i> of O_1 except that it has been modified as
+  necessary to satisfy the constraints.
+</p>
+</dd>
+<dt><a id="index-potential-number"></a><span><b class="b">potential number</b><a class="copiable-link" href="#index-potential-number"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  A textual notation that might be parsed by the <i class="i">Lisp reader</i> 
+  in some <i class="i">conforming implementation</i> as a <i class="i">number</i> 
+  but is not required to be parsed as a <i class="i">number</i>.
+  No <i class="i">object</i> is a <i class="i">potential number</i>&mdash;either an <i class="i">object</i> is
+  a <i class="i">number</i> or it is not.
+  See <a class="ref" href="Potential-Numbers-as-Tokens.html">Potential Numbers as Tokens</a>.
+</p>
+</dd>
+<dt><a id="index-pprint-dispatch-table-1"></a><span><b class="b">pprint dispatch table</b><a class="copiable-link" href="#index-pprint-dispatch-table-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> that can be the <i class="i">value</i> of <b class="b">*print-pprint-dispatch*</b> 
+  and hence can control how <i class="i">objects</i> are printed when
+  <b class="b">*print-pretty*</b> is <i class="i">true</i>.
+  See <a class="ref" href="Pretty-Print-Dispatch-Tables.html">Pretty Print Dispatch Tables</a>.
+</p>
+</dd>
+<dt><a id="index-predicate"></a><span><b class="b">predicate</b><a class="copiable-link" href="#index-predicate"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">function</i> that returns a <i class="i">generalized boolean</i>
+  as its first value.
+</p>
+</dd>
+<dt><a id="index-present-2"></a><span><b class="b">present</b><a class="copiable-link" href="#index-present-2"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. (of a <i class="i">feature</i> in a <i class="i">Lisp image</i>)
+     a state of being that is in effect if and only if the <i class="i">symbol</i> 
+     naming the <i class="i">feature</i> is an <i class="i">element</i> of the <i class="i">features list</i>.
+  2. (of a <i class="i">symbol</i> in a <i class="i">package</i>)
+     being accessible in that <i class="i">package</i> directly,
+     rather than being inherited from another <i class="i">package</i>.
+</p>
+</dd>
+<dt><a id="index-pretty-print"></a><span><b class="b">pretty print</b><a class="copiable-link" href="#index-pretty-print"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (an <i class="i">object</i>)
+  to invoke the <i class="i">pretty printer</i> on the <i class="i">object</i>.
+</p>
+</dd>
+<dt><a id="index-pretty-printer-1"></a><span><b class="b">pretty printer</b><a class="copiable-link" href="#index-pretty-printer-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the procedure that prints the character representation of an
+  <i class="i">object</i> onto a <i class="i">stream</i> when the <i class="i">value</i> of
+  <b class="b">*print-pretty*</b> is <i class="i">true</i>, 
+  and that uses layout techniques (<i class="i">e.g.</i>, indentation) that
+  tend to highlight the structure of the <i class="i">object</i> in a way that
+  makes it easier for human readers to parse visually.
+  See the <i class="i">variable</i> <b class="b">*print-pprint-dispatch*</b> and <a class="ref" href="The-Lisp-Pretty-Printer.html">The Lisp Pretty Printer</a>.
+</p>
+</dd>
+<dt><a id="index-pretty-printing-stream"></a><span><b class="b">pretty printing stream</b><a class="copiable-link" href="#index-pretty-printing-stream"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">stream</i> that does pretty printing.  Such streams are created by
+  the <i class="i">function</i> <b class="b">pprint-logical-block</b> as a link between the output stream 
+  and the logical block.
+</p>
+</dd>
+<dt><a id="index-primary-method"></a><span><b class="b">primary method</b><a class="copiable-link" href="#index-primary-method"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a member of one of two sets of <i class="i">methods</i> 
+  (the set of <i class="i">auxiliary methods</i> is the other)
+  that form an exhaustive partition of the set of <i class="i">methods</i>
+  on the <i class="i">method</i>&rsquo;s <i class="i">generic function</i>.
+  How these sets are determined is dependent on the <i class="i">method combination</i> type;
+  see <a class="ref" href="Introduction-to-Methods.html">Introduction to Methods</a>.
+</p>
+</dd>
+<dt><a id="index-primary-value"></a><span><b class="b">primary value</b><a class="copiable-link" href="#index-primary-value"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of <i class="i">values</i> resulting from the
+				   <i class="i">evaluation</i> of a <i class="i">form</i>)
+  the first <i class="i">value</i>, if any, or else <b class="b">nil</b> if there are no <i class="i">values</i>.
+  &ldquo;The primary value returned by <b class="b">truncate</b> is an
+            integer quotient, truncated toward zero.&rdquo;
+</p>
+</dd>
+<dt><a id="index-principal"></a><span><b class="b">principal</b><a class="copiable-link" href="#index-principal"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a value returned by a <span class="r">Common Lisp</span> <i class="i">function</i> that
+			        implements a mathematically irrational or transcendental 
+		                function defined in the complex domain)
+  of possibly many (sometimes an infinite number of) correct values for the
+  mathematical function, being the particular <i class="i">value</i> which the corresponding
+  <span class="r">Common Lisp</span> <i class="i">function</i> has been defined to return.
+</p>
+</dd>
+<dt><a id="index-print-name"></a><span><b class="b">print name</b><a class="copiable-link" href="#index-print-name"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> (usually of a <i class="i">symbol</i>)
+  a <i class="i">name</i>_3.
+</p>
+</dd>
+<dt><a id="index-printer-control-variable-1"></a><span><b class="b">printer control variable</b><a class="copiable-link" href="#index-printer-control-variable-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">variable</i> whose specific purpose is to control some action
+  of the <i class="i">Lisp printer</i>; that is, one of the <i class="i">variables</i>
+  in <i class="i">Figure~22&ndash;1</i>,
+  or else some <i class="i">implementation-defined</i> <i class="i">variable</i> which is
+     defined by the <i class="i">implementation</i> to be a <i class="i">printer control variable</i>.
+</p>
+</dd>
+<dt><a id="index-printer-escaping-1"></a><span><b class="b">printer escaping</b><a class="copiable-link" href="#index-printer-escaping-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  The combined state of the <i class="i">printer control variables</i>
+  <b class="b">*print-escape*</b> and <b class="b">*print-readably*</b>.
+  If the value of either <b class="b">*print-readably*</b> or <b class="b">*print-escape*</b> is <i class="i">true</i>, 
+  then <i class="i">printer escaping</i>
+<a class="index-entry-id" id="index-printer-escaping-2"></a>
+ is &ldquo;enabled&rdquo;;
+  otherwise (if the values of both <b class="b">*print-readably*</b> and <b class="b">*print-escape*</b>
+	     are <i class="i">false</i>), 
+  then <i class="i">printer escaping</i> is &ldquo;disabled&rdquo;.
+</p>
+</dd>
+<dt><a id="index-printing"></a><span><b class="b">printing</b><a class="copiable-link" href="#index-printing"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">character</i>)
+  being a <i class="i">graphic</i> <i class="i">character</i> other than <i class="i">space</i>.
+</p>
+</dd>
+<dt><a id="index-process-1"></a><span><b class="b">process</b><a class="copiable-link" href="#index-process-1"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (a <i class="i">form</i> by the <i class="i">compiler</i>)
+  to perform <i class="i">minimal compilation</i>, determining the time of 
+  evaluation for a <i class="i">form</i>, and possibly <i class="i">evaluating</i> that
+  <i class="i">form</i> (if required).
+</p>
+</dd>
+<dt><a id="index-processor"></a><span><b class="b">processor</b><a class="copiable-link" href="#index-processor"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>, <i class="i">ANSI</i>
+  an <i class="i">implementation</i>.
+</p>
+</dd>
+<dt><a id="index-proclaim"></a><span><b class="b">proclaim</b><a class="copiable-link" href="#index-proclaim"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (a <i class="i">proclamation</i>)
+  to <i class="i">establish</i> that <i class="i">proclamation</i>.
+</p>
+</dd>
+<dt><a id="index-proclamation-1"></a><span><b class="b">proclamation</b><a class="copiable-link" href="#index-proclamation-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">global declaration</i>.
+</p>
+</dd>
+<dt><a id="index-prog-tag"></a><span><b class="b">prog tag</b><a class="copiable-link" href="#index-prog-tag"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> 
+  a <i class="i">go tag</i>.
+</p>
+</dd>
+<dt><a id="index-program"></a><span><b class="b">program</b><a class="copiable-link" href="#index-program"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> 
+  <span class="r">Common Lisp</span> <i class="i">code</i>.
+</p>
+</dd>
+<dt><a id="index-programmer"></a><span><b class="b">programmer</b><a class="copiable-link" href="#index-programmer"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an active entity, typically a human, that writes a <i class="i">program</i>,
+  and that might or might not also be a <i class="i">user</i> of the <i class="i">program</i>.
+</p>
+</dd>
+<dt><a id="index-programmer-code"></a><span><b class="b">programmer code</b><a class="copiable-link" href="#index-programmer-code"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  <i class="i">code</i> that is supplied by the programmer;
+  that is, <i class="i">code</i> that is not <i class="i">system code</i>.
+</p>
+</dd>
+<dt><a id="index-proper-list-2"></a><span><b class="b">proper list</b><a class="copiable-link" href="#index-proper-list-2"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  A <i class="i">list</i> terminated by the <i class="i">empty list</i>.
+  (The <i class="i">empty list</i> is a <i class="i">proper list</i>.)
+  See <i class="i">improper list</i>.
+</p>
+</dd>
+<dt><a id="index-proper-name"></a><span><b class="b">proper name</b><a class="copiable-link" href="#index-proper-name"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">class</i>)
+  a <i class="i">symbol</i> that <i class="i">names</i> the <i class="i">class</i> whose <i class="i">name</i>
+  is that <i class="i">symbol</i>. 
+  See the <i class="i">functions</i> <b class="b">class-name</b> and <b class="b">find-class</b>.
+</p>
+</dd>
+<dt><a id="index-proper-sequence"></a><span><b class="b">proper sequence</b><a class="copiable-link" href="#index-proper-sequence"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">sequence</i> which is not an <i class="i">improper list</i>; 
+  that is, a <i class="i">vector</i> or a <i class="i">proper list</i>.
+</p>
+</dd>
+<dt><a id="index-proper-subtype"></a><span><b class="b">proper subtype</b><a class="copiable-link" href="#index-proper-subtype"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">type</i>)
+  a <i class="i">subtype</i> of the <i class="i">type</i> which is not the <i class="i">same</i> <i class="i">type</i>
+  as the <i class="i">type</i> (<i class="i">i.e.</i>, its <i class="i">elements</i> are a &ldquo;proper subset&rdquo; of the 
+  <i class="i">type</i>).
+</p>
+</dd>
+<dt><a id="index-property"></a><span><b class="b">property</b><a class="copiable-link" href="#index-property"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">property list</i>)
+  1. a conceptual pairing of a <i class="i">property indicator</i> and its
+     associated <i class="i">property value</i> on a <i class="i">property list</i>.
+  2. a <i class="i">property value</i>.
+</p>
+</dd>
+<dt><a id="index-property-indicator"></a><span><b class="b">property indicator</b><a class="copiable-link" href="#index-property-indicator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">property list</i>) 
+  the <i class="i">name</i> part of a <i class="i">property</i>, used as a <i class="i">key</i>
+  when looking up a <i class="i">property value</i> on a <i class="i">property list</i>. 
+</p>
+</dd>
+<dt><a id="index-property-list"></a><span><b class="b">property list</b><a class="copiable-link" href="#index-property-list"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+</p>
+<p>1.  a <i class="i">list</i> containing an even number of <i class="i">elements</i> that are
+      alternating <i class="i">names</i>  (sometimes called <i class="i">indicators</i> 
+      or <i class="i">keys</i>) and <i class="i">values</i> (sometimes called <i class="i">properties</i>).
+      When there is more than one <i class="i">name</i> and <i class="i">value</i> pair with
+      the <i class="i">identical</i> <i class="i">name</i> in a <i class="i">property list</i>,
+      the first such pair determines the <i class="i">property</i>.
+</p>
+<p>2. (of a <i class="i">symbol</i>)
+     the component of the <i class="i">symbol</i> containing a <i class="i">property list</i>.
+</p>
+</dd>
+<dt><a id="index-property-value"></a><span><b class="b">property value</b><a class="copiable-link" href="#index-property-value"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">property indicator</i> on 
+				  a <i class="i">property list</i>)
+  the <i class="i">object</i> associated with the <i class="i">property indicator</i>
+  on the <i class="i">property list</i>.
+</p>
+</dd>
+<dt><a id="index-purports-to-conform"></a><span><b class="b">purports to conform</b><a class="copiable-link" href="#index-purports-to-conform"> &para;</a></span></dt>
+<dd><p><i class="i">v.</i>
+  makes a good-faith claim of conformance.  
+  This term expresses intention to conform, regardless of whether the
+  goal of that intention is realized in practice.  
+  For example, language implementations have been known to have bugs,
+  and while an <i class="i">implementation</i> of this specification with bugs
+  might not be a <i class="i">conforming implementation</i>, it can still
+  <i class="i">purport to conform</i>.  This is an important distinction in
+  certain specific cases; <i class="i">e.g.</i>, see the <i class="i">variable</i> <b class="b">*features*</b>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="Q"><span><b class="b">Q</b><a class="copiable-link" href="#Q"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-qualified-method"></a><span><b class="b">qualified method</b><a class="copiable-link" href="#index-qualified-method"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">method</i> that has one or more <i class="i">qualifiers</i>.
+</p>
+</dd>
+<dt><a id="index-qualifier"></a><span><b class="b">qualifier</b><a class="copiable-link" href="#index-qualifier"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">method</i> for a <i class="i">generic function</i>)
+  one of possibly several <i class="i">objects</i> used to annotate the <i class="i">method</i> 
+  in a way that identifies its role in the <i class="i">method combination</i>.  
+  The <i class="i">method combination</i> <i class="i">type</i> determines 
+   how many <i class="i">qualifiers</i> are permitted for each <i class="i">method</i>, 
+   which <i class="i">qualifiers</i> are permitted,
+  and
+   the semantics of those <i class="i">qualifiers</i>.
+</p>
+</dd>
+<dt><a id="index-query-I_002fO"></a><span><b class="b">query I/O</b><a class="copiable-link" href="#index-query-I_002fO"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the <i class="i">bidirectional</i> <i class="i">stream</i>
+  that is the <i class="i">value</i> of the <i class="i">variable</i> <b class="b">*query-io*</b>.
+</p>
+</dd>
+<dt><a id="index-quoted-object"></a><span><b class="b">quoted object</b><a class="copiable-link" href="#index-quoted-object"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> which is the second element of a
+  <b class="b">quote</b> <i class="i">form</i>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="R"><span><b class="b">R</b><a class="copiable-link" href="#R"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-radix"></a><span><b class="b">radix</b><a class="copiable-link" href="#index-radix"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">integer</i> between 2 and 36, inclusive, which can be used 
+  to designate a base with respect to which certain kinds of numeric
+  input or output are performed.  
+  (There are n valid digit characters for any given <i class="i">radix</i> n,
+   and those digits are the first n digits in the sequence
+   <code class="t">0</code>, <code class="t">1</code>, ..., <code class="t">9</code>, <code class="t">A</code>, <code class="t">B</code>, ..., <code class="t">Z</code>,
+   which have the weights   
+   <code class="t">0</code>, <code class="t">1</code>, ..., <code class="t">9</code>, <code class="t">10</code>, <code class="t">11</code>, ..., <code class="t">35</code>,
+   respectively.
+   Case is not significant in parsing numbers of radix greater
+   than <code class="t">10</code>, so &ldquo;9b8a&rdquo; and &ldquo;9B8A&rdquo; denote the same <i class="i">radix</i>
+   <code class="t">16</code> number.)
+</p>
+</dd>
+<dt><a id="index-random-state"></a><span><b class="b">random state</b><a class="copiable-link" href="#index-random-state"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">random-state</b>.
+</p>
+</dd>
+<dt><a id="index-rank-1"></a><span><b class="b">rank</b><a class="copiable-link" href="#index-rank-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a non-negative <i class="i">integer</i> indicating the number of
+  <i class="i">dimensions</i> of an <i class="i">array</i>.
+</p>
+</dd>
+<dt><a id="index-ratio"></a><span><b class="b">ratio</b><a class="copiable-link" href="#index-ratio"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">ratio</b>.
+</p>
+</dd>
+<dt><a id="index-ratio-marker"></a><span><b class="b">ratio marker</b><a class="copiable-link" href="#index-ratio-marker"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a character which is used in the textual notation for a <i class="i">ratio</i>
+  to separate the numerator from the denominator, and which
+  is <i class="i">slash</i> in the <i class="i">standard readtable</i>.
+  See <a class="ref" href="Character-Syntax.html">Character Syntax</a>.
+</p>
+</dd>
+<dt><a id="index-rational"></a><span><b class="b">rational</b><a class="copiable-link" href="#index-rational"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">rational</b>.
+</p>
+</dd>
+<dt><a id="index-read"></a><span><b class="b">read</b><a class="copiable-link" href="#index-read"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> 
+</p>
+<p>1. (a <i class="i">binding</i> or <i class="i">slot</i> or component)
+     to obtain the <i class="i">value</i> of the <i class="i">binding</i> or <i class="i">slot</i>.
+</p>
+<p>2. (an <i class="i">object</i> from a <i class="i">stream</i>)
+     to parse an <i class="i">object</i> from its representation on the <i class="i">stream</i>.
+</p>
+</dd>
+<dt><a id="index-readably"></a><span><b class="b">readably</b><a class="copiable-link" href="#index-readably"> &para;</a></span></dt>
+<dd><p><i class="i">adv.</i> (of a manner of printing an <i class="i">object</i> O_1)
+  in such a way as to permit the <i class="i">Lisp Reader</i> to later <i class="i">parse</i>
+  the printed output into an <i class="i">object</i> O_2 that is <i class="i">similar</i> to O_1.
+</p>
+</dd>
+<dt><a id="index-reader"></a><span><b class="b">reader</b><a class="copiable-link" href="#index-reader"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. a <i class="i">function</i> that <i class="i">reads</i>_1 a <i class="i">variable</i> or <i class="i">slot</i>.
+  2. the <i class="i">Lisp reader</i>.
+</p>
+</dd>
+<dt><a id="index-reader-macro"></a><span><b class="b">reader macro</b><a class="copiable-link" href="#index-reader-macro"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. a textual notation introduced by dispatch on one or two <i class="i">characters</i> 
+     that defines special-purpose syntax for use by the <i class="i">Lisp reader</i>,
+     and that is implemented by a <i class="i">reader macro function</i>.
+     See <a class="ref" href="Reader-Algorithm.html">Reader Algorithm</a>.
+  2. the <i class="i">character</i> or <i class="i">characters</i> that introduce
+     a <i class="i">reader macro</i>_1; that is,
+        a <i class="i">macro character</i>
+     or the conceptual pairing of a <i class="i">dispatching macro character</i> and the
+          <i class="i">character</i> that follows it.
+  (A <i class="i">reader macro</i> is not a kind of <i class="i">macro</i>.)
+</p>
+</dd>
+<dt><a id="index-reader-macro-function-1"></a><span><b class="b">reader macro function</b><a class="copiable-link" href="#index-reader-macro-function-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">function</i> <i class="i">designator</i> that denotes a <i class="i">function</i>
+  that implements a <i class="i">reader macro</i>_2.
+  See the <i class="i">functions</i> <b class="b">set-macro-character</b> and <b class="b">set-dispatch-macro-character</b>.
+</p>
+</dd>
+<dt><a id="index-readtable-1"></a><span><b class="b">readtable</b><a class="copiable-link" href="#index-readtable-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">readtable</b>.
+</p>
+</dd>
+<dt><a id="index-readtable-case"></a><span><b class="b">readtable case</b><a class="copiable-link" href="#index-readtable-case"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an attribute of a <i class="i">readtable</i>
+  whose value is a <i class="i">case sensitivity mode</i>,
+  and that selects the manner in which <i class="i">characters</i>
+       in a <i class="i">symbol</i>&rsquo;s <i class="i">name</i> are to be treated by
+            the <i class="i">Lisp reader</i>
+        and the <i class="i">Lisp printer</i>.
+  See <a class="ref" href="Effect-of-Readtable-Case-on-the-Lisp-Reader.html">Effect of Readtable Case on the Lisp Reader</a> and <a class="ref" href="Effect-of-Readtable-Case-on-the-Lisp-Printer.html">Effect of Readtable Case on the Lisp Printer</a>.
+</p>
+</dd>
+<dt><a id="index-readtable-designator"></a><span><b class="b">readtable designator</b><a class="copiable-link" href="#index-readtable-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">designator</i> for a <i class="i">readtable</i>; that is,
+  an <i class="i">object</i> that denotes a <i class="i">readtable</i>
+  and that is one of:
+       <b class="b">nil</b> (denoting the <i class="i">standard readtable</i>),
+    or a <i class="i">readtable</i> (denoting itself).
+</p>
+</dd>
+<dt><a id="index-recognizable-subtype"></a><span><b class="b">recognizable subtype</b><a class="copiable-link" href="#index-recognizable-subtype"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">type</i>)
+  a <i class="i">subtype</i> of the <i class="i">type</i> which can be reliably detected 
+  to be such by the <i class="i">implementation</i>.
+  See the <i class="i">function</i> <b class="b">subtypep</b>.
+</p>
+</dd>
+<dt><a id="index-reference"></a><span><b class="b">reference</b><a class="copiable-link" href="#index-reference"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>, <i class="i">v.t.</i> 
+  1. <i class="i">n.</i> an act or occurrence of referring to an <i class="i">object</i>,
+     a <i class="i">binding</i>, an <i class="i">exit point</i>, a <i class="i">tag</i>, 
+     or an <i class="i">environment</i>.
+  2. <i class="i">v.t.</i> to refer to an <i class="i">object</i>, a <i class="i">binding</i>, an
+     <i class="i">exit point</i>, a <i class="i">tag</i>, or an <i class="i">environment</i>,
+     usually by <i class="i">name</i>.
+</p>
+</dd>
+<dt><a id="index-registered-package"></a><span><b class="b">registered package</b><a class="copiable-link" href="#index-registered-package"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">package</i> <i class="i">object</i> that is installed in the <i class="i">package registry</i>.
+  (Every <i class="i">registered package</i> has a <i class="i">name</i> that is a <i class="i">string</i>,
+   as well as zero or more <i class="i">string</i> nicknames.
+   All <i class="i">packages</i> that are initially specified by <span class="r">Common Lisp</span> 
+   or created by <b class="b">make-package</b> or <b class="b">defpackage</b>
+   are <i class="i">registered packages</i>.  <i class="i">Registered packages</i> can be turned into
+   <i class="i">unregistered packages</i> by <b class="b">delete-package</b>.)
+</p>
+</dd>
+<dt><a id="index-relative"></a><span><b class="b">relative</b><a class="copiable-link" href="#index-relative"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i>
+  1. (of a <i class="i">time</i>)
+     representing an offset from an <i class="i">absolute</i> <i class="i">time</i>
+     in the units appropriate to that time.
+     For example, 
+     a <i class="i">relative</i> <i class="i">internal time</i> is the difference between
+     two <i class="i">absolute</i> <i class="i">internal times</i>, and is measured in
+     <i class="i">internal time units</i>.
+  2. (of a <i class="i">pathname</i>)
+     representing a position in a directory hierarchy by motion 
+     from a position other than the root, which might therefore vary.
+     &ldquo;The notation <code class="t">#P&quot;../foo.text&quot;</code> denotes a relative
+	       pathname if the host file system is Unix.&rdquo;
+  See <i class="i">absolute</i>.
+</p>
+</dd>
+<dt><a id="index-repertoire-1"></a><span><b class="b">repertoire</b><a class="copiable-link" href="#index-repertoire-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>, <i class="i">ISO</i>
+  a <i class="i">subtype</i> of <b class="b">character</b>.  See <a class="ref" href="Character-Repertoires.html">Character Repertoires</a>.
+</p>
+</dd>
+<dt><a id="index-report"></a><span><b class="b">report</b><a class="copiable-link" href="#index-report"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">condition</i>)
+  to <i class="i">call</i> the <i class="i">function</i> <b class="b">print-object</b> on the <i class="i">condition</i> 
+  in an <i class="i">environment</i> where the <i class="i">value</i> of <b class="b">*print-escape*</b> is <i class="i">false</i>.
+</p>
+</dd>
+<dt><a id="index-report-message-1"></a><span><b class="b">report message</b><a class="copiable-link" href="#index-report-message-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the text that is output by a <i class="i">condition reporter</i>.
+</p>
+</dd>
+<dt><a id="index-required-parameter"></a><span><b class="b">required parameter</b><a class="copiable-link" href="#index-required-parameter"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  A <i class="i">parameter</i> for which a corresponding positional <i class="i">argument</i>
+  must be supplied when <i class="i">calling</i> the <i class="i">function</i>.
+</p>
+</dd>
+<dt><a id="index-rest-list"></a><span><b class="b">rest list</b><a class="copiable-link" href="#index-rest-list"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">function</i> having a <i class="i">rest parameter</i>)
+  The <i class="i">list</i> to which the <i class="i">rest parameter</i> is <i class="i">bound</i> on some
+  particular <i class="i">call</i> to the <i class="i">function</i>.
+</p>
+</dd>
+<dt><a id="index-rest-parameter"></a><span><b class="b">rest parameter</b><a class="copiable-link" href="#index-rest-parameter"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  A <i class="i">parameter</i> which was introduced by <b class="b">&amp;rest</b>.
+</p>
+</dd>
+<dt><a id="index-restart"></a><span><b class="b">restart</b><a class="copiable-link" href="#index-restart"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">restart</b>.
+</p>
+</dd>
+<dt><a id="index-restart-designator"></a><span><b class="b">restart designator</b><a class="copiable-link" href="#index-restart-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">designator</i> for a <i class="i">restart</i>; that is,
+  an <i class="i">object</i> that denotes a <i class="i">restart</i>
+  and that is one of:
+       a <i class="i">non-nil</i> <i class="i">symbol</i> 
+	 (denoting the most recently established <i class="i">active</i>
+	  <i class="i">restart</i> whose <i class="i">name</i> is that <i class="i">symbol</i>),
+    or a <i class="i">restart</i> (denoting itself).
+</p>
+</dd>
+<dt><a id="index-restart-function"></a><span><b class="b">restart function</b><a class="copiable-link" href="#index-restart-function"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">function</i> that invokes a <i class="i">restart</i>, as if by <b class="b">invoke-restart</b>.
+  The primary purpose of a <i class="i">restart function</i> is to provide an alternate
+  interface. By convention, a <i class="i">restart function</i> usually has the same name 
+  as the <i class="i">restart</i> which it invokes. Figure 26&ndash;4 shows a list of the
+  <i class="i">standardized</i> <i class="i">restart functions</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  abort     muffle-warning  use-value  <!-- /@w -->
+  continue  store-value                <!-- /@w -->
+
+  Figure 26&ndash;4: Standardized Restart Functions<!-- /@w -->
+
+</pre></div></div>
+
+</dd>
+<dt><a id="index-return"></a><span><b class="b">return</b><a class="copiable-link" href="#index-return"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (of <i class="i">values</i>)
+  1. (from a <i class="i">block</i>) to transfer control and <i class="i">values</i> from the <i class="i">block</i>;
+     that is, to cause the <i class="i">block</i> to <i class="i">yield</i> the <i class="i">values</i> immediately
+     without doing any further evaluation of the <i class="i">forms</i> in its body.
+  2. (from a <i class="i">form</i>) to <i class="i">yield</i> the <i class="i">values</i>.
+</p>
+</dd>
+<dt><a id="index-return-value"></a><span><b class="b">return value</b><a class="copiable-link" href="#index-return-value"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> 
+  a <i class="i">value</i>_1
+</p>
+</dd>
+<dt><a id="index-right_002dparenthesis"></a><span><b class="b">right-parenthesis</b><a class="copiable-link" href="#index-right_002dparenthesis"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> &ldquo;<code class="t">)</code>&rdquo;,
+  that is variously called
+      &ldquo;right parenthesis&rdquo;
+   or &ldquo;close parenthesis&rdquo;
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+<dt><a id="index-run-time-1"></a><span><b class="b">run time</b><a class="copiable-link" href="#index-run-time-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  1. <i class="i">load time</i>
+  2. <i class="i">execution time</i>
+</p>
+</dd>
+<dt><a id="index-run_002dtime-compiler-1"></a><span><b class="b">run-time compiler</b><a class="copiable-link" href="#index-run_002dtime-compiler-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  refers to the <b class="b">compile</b> function or to <i class="i">implicit compilation</i>, 
+  for which the compilation and run-time <i class="i">environments</i> are maintained 
+  in the same <i class="i">Lisp image</i>.
+</p>
+</dd>
+<dt><a id="index-run_002dtime-definition-1"></a><span><b class="b">run-time definition</b><a class="copiable-link" href="#index-run_002dtime-definition-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a definition in the <i class="i">run-time environment</i>.
+</p>
+</dd>
+<dt><a id="index-run_002dtime-environment-1"></a><span><b class="b">run-time environment</b><a class="copiable-link" href="#index-run_002dtime-environment-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">environment</i> in which a program is <i class="i">executed</i>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="S"><span><b class="b">S</b><a class="copiable-link" href="#S"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-safe-1"></a><span><b class="b">safe</b><a class="copiable-link" href="#index-safe-1"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  1. (of <i class="i">code</i>)
+     processed in a <i class="i">lexical environment</i> where the the highest
+     <b class="b">safety</b> level (<code class="t">3</code>) was in effect. 
+     See <b class="b">optimize</b>.
+  2. (of a <i class="i">call</i>) a <i class="i">safe call</i>.
+</p>
+</dd>
+<dt><a id="index-safe-call-1"></a><span><b class="b">safe call</b><a class="copiable-link" href="#index-safe-call-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">call</i> in which 
+        the <i class="i">call</i>,
+        the <i class="i">function</i> being <i class="i">called</i>,
+    and the point of <i class="i">functional evaluation</i>
+  are all <i class="i">safe</i>_1 <i class="i">code</i>.
+  For more detailed information, see <a class="ref" href="Safe-and-Unsafe-Calls.html">Safe and Unsafe Calls</a>.
+</p>
+</dd>
+<dt><a id="index-same"></a><span><b class="b">same</b><a class="copiable-link" href="#index-same"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  1. (of <i class="i">objects</i> under a specified <i class="i">predicate</i>) 
+     indistinguishable by that <i class="i">predicate</i>.
+     &ldquo;The symbol <code class="t">car</code>, the string <code class="t">&quot;car&quot;</code>, and the string <code class="t">&quot;CAR&quot;</code>
+	       are the <code class="t">same</code> under <b class="b">string-equal</b>&rdquo;.
+  2. (of <i class="i">objects</i> if no predicate is implied by context)
+     indistinguishable by <b class="b">eql</b>.
+     Note that <b class="b">eq</b> might be capable of distinguishing some 
+     <i class="i">numbers</i> and <i class="i">characters</i> which <b class="b">eql</b> cannot 
+     distinguish, but the nature of such, if any, 
+     is <i class="i">implementation-dependent</i>.
+     Since <b class="b">eq</b> is used only rarely in this specification,
+     <b class="b">eql</b> is the default predicate when none is mentioned explicitly.
+     &ldquo;The conses returned by two successive calls to <b class="b">cons</b>
+	       are never the same.&rdquo;
+  3. (of <i class="i">types</i>) having the same set of <i class="i">elements</i>;
+     that is, each <i class="i">type</i> is a <i class="i">subtype</i> of the others.
+     &ldquo;The types specified by <code class="t">(integer 0 1)</code>,
+				      <code class="t">(unsigned-byte 1)</code>,
+				  and <code class="t">bit</code> are the same.&rdquo;
+</p>
+</dd>
+<dt><a id="index-satisfy-the-test-4"></a><span><b class="b">satisfy the test</b><a class="copiable-link" href="#index-satisfy-the-test-4"> &para;</a></span></dt>
+<dd><p><i class="i">v.</i> 
+       (of an <i class="i">object</i> being considered by a <i class="i">sequence function</i>)
+  1. (for a one <i class="i">argument</i> test)
+     to be in a state such that the <i class="i">function</i> which is the
+     <i class="i">predicate</i> <i class="i">argument</i> to the <i class="i">sequence function</i>
+     returns <i class="i">true</i> when given a single <i class="i">argument</i> that is the
+     result of calling the <i class="i">sequence function</i>&rsquo;s <i class="i">key</i> <i class="i">argument</i>
+     on the <i class="i">object</i> being considered.  
+     See <a class="ref" href="Satisfying-a-One_002dArgument-Test.html">Satisfying a One-Argument Test</a>.
+  2. (for a two <i class="i">argument</i> test)
+     to be in a state such that the two-place <i class="i">predicate</i> 
+     which is the <i class="i">sequence function</i>&rsquo;s 
+     <i class="i">test</i> <i class="i">argument</i>
+     returns <i class="i">true</i> when given a first <i class="i">argument</i> that 
+     is
+     the <i class="i">object</i> being considered, 
+     and when given a second <i class="i">argument</i>
+     that is the result of calling the <i class="i">sequence function</i>&rsquo;s 
+     <i class="i">key</i> <i class="i">argument</i> on an <i class="i">element</i> of the
+     <i class="i">sequence function</i>&rsquo;s <i class="i">sequence</i> <i class="i">argument</i> 
+     which is being tested for equality;
+     or to be in a state such that the <i class="i">test-not</i> <i class="i">function</i>
+     returns <i class="i">false</i> given the same <i class="i">arguments</i>.
+     See <a class="ref" href="Satisfying-a-Two_002dArgument-Test.html">Satisfying a Two-Argument Test</a>.
+</p>
+</dd>
+<dt><a id="index-scope"></a><span><b class="b">scope</b><a class="copiable-link" href="#index-scope"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the structural or textual region of code in which <i class="i">references</i> 
+  to an <i class="i">object</i>, a <i class="i">binding</i>, an <i class="i">exit point</i>, 
+  a <i class="i">tag</i>, or an <i class="i">environment</i> (usually by <i class="i">name</i>) 
+  can occur.
+</p>
+</dd>
+<dt><a id="index-script"></a><span><b class="b">script</b><a class="copiable-link" href="#index-script"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">ISO</i>
+  one of possibly several sets that form an <i class="i">exhaustive partition</i>
+  of the type <b class="b">character</b>.  See <a class="ref" href="Character-Scripts.html">Character Scripts</a>.
+</p>
+</dd>
+<dt><a id="index-secondary-value"></a><span><b class="b">secondary value</b><a class="copiable-link" href="#index-secondary-value"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of <i class="i">values</i> resulting from the
+				   <i class="i">evaluation</i> of a <i class="i">form</i>)
+  the second <i class="i">value</i>, if any, 
+  or else <b class="b">nil</b> if there are fewer than two <i class="i">values</i>.
+  &ldquo;The secondary value returned by <b class="b">truncate</b> is a remainder.&rdquo;
+</p>
+</dd>
+<dt><a id="index-section"></a><span><b class="b">section</b><a class="copiable-link" href="#index-section"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a partitioning of output by a <i class="i">conditional newline</i> on a <i class="i">pretty printing stream</i>.
+  See <a class="ref" href="Dynamic-Control-of-the-Arrangement-of-Output.html">Dynamic Control of the Arrangement of Output</a>.
+</p>
+</dd>
+<dt><a id="index-self_002devaluating-object"></a><span><b class="b">self-evaluating object</b><a class="copiable-link" href="#index-self_002devaluating-object"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">object</i> that is neither a <i class="i">symbol</i> nor a
+  <i class="i">cons</i>.
+  If a <i class="i">self-evaluating object</i> is <i class="i">evaluated</i>,
+  it <i class="i">yields</i> itself as its only <i class="i">value</i>.
+  &ldquo;Strings are self-evaluating objects.&rdquo;
+</p>
+</dd>
+<dt><a id="index-semi_002dstandard"></a><span><b class="b">semi-standard</b><a class="copiable-link" href="#index-semi_002dstandard"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a language feature)
+  not required to be implemented by any <i class="i">conforming implementation</i>,
+  but nevertheless recommended as the canonical approach in situations where
+  an <i class="i">implementation</i> does plan to support such a feature.
+  The presence of <i class="i">semi-standard</i> aspects in the language is intended
+  to lessen portability problems and reduce the risk of gratuitous divergence
+  among <i class="i">implementations</i> that might stand in the way of future 
+  standardization.
+</p>
+</dd>
+<dt><a id="index-semicolon"></a><span><b class="b">semicolon</b><a class="copiable-link" href="#index-semicolon"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> that is called &ldquo;semicolon&rdquo; (<code class="t">;</code>).
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+<dt><a id="index-sequence-1"></a><span><b class="b">sequence</b><a class="copiable-link" href="#index-sequence-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. an ordered collection of elements
+  2. a <i class="i">vector</i> or a <i class="i">list</i>.
+</p>
+</dd>
+<dt><a id="index-sequence-function-1"></a><span><b class="b">sequence function</b><a class="copiable-link" href="#index-sequence-function-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  one of the <i class="i">functions</i> in <i class="i">Figure~17&ndash;1</i>,
+  or an <i class="i">implementation-defined</i> <i class="i">function</i> 
+     that operates on one or more <i class="i">sequences</i>.
+     and that is defined by the <i class="i">implementation</i> to be a <i class="i">sequence function</i>.
+</p>
+</dd>
+<dt><a id="index-sequential"></a><span><b class="b">sequential</b><a class="copiable-link" href="#index-sequential"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> <i class="i">Trad.</i> (of <i class="i">binding</i> or <i class="i">assignment</i>)
+  done in the style of <b class="b">setq</b>, <b class="b">let*</b>, or <b class="b">do*</b>;
+  that is, interleaving the evaluation of the <i class="i">forms</i> that produce <i class="i">values</i>
+  with the <i class="i">assignments</i> or <i class="i">bindings</i> of the <i class="i">variables</i> (or <i class="i">places</i>).
+  See <i class="i">parallel</i>.
+</p>
+</dd>
+<dt><a id="index-sequentially"></a><span><b class="b">sequentially</b><a class="copiable-link" href="#index-sequentially"> &para;</a></span></dt>
+<dd><p><i class="i">adv.</i>
+  in a <i class="i">sequential</i> way.
+</p>
+</dd>
+<dt><a id="index-serious-condition"></a><span><b class="b">serious condition</b><a class="copiable-link" href="#index-serious-condition"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">condition</i> of <i class="i">type</i> <b class="b">serious-condition</b>, 
+  which represents a <i class="i">situation</i> that is generally sufficiently 
+  severe that entry into the <i class="i">debugger</i> should be expected if 
+  the <i class="i">condition</i> is <i class="i">signaled</i> but not <i class="i">handled</i>.
+</p>
+</dd>
+<dt><a id="index-session"></a><span><b class="b">session</b><a class="copiable-link" href="#index-session"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the conceptual aggregation of events in a <i class="i">Lisp image</i> from the time
+  it is started to the time it is terminated.
+</p>
+</dd>
+<dt><a id="index-set"></a><span><b class="b">set</b><a class="copiable-link" href="#index-set"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> <i class="i">Trad.</i> (any <i class="i">variable</i>
+				     or a <i class="i">symbol</i> that 
+				        is the <i class="i">name</i> of a <i class="i">dynamic variable</i>)
+  to <i class="i">assign</i> the <i class="i">variable</i>.
+</p>
+</dd>
+<dt><a id="index-setf-expander"></a><span><b class="b">setf expander</b><a class="copiable-link" href="#index-setf-expander"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a function used by <b class="b">setf</b> to compute the <i class="i">setf expansion</i>
+  of a <i class="i">place</i>.
+</p>
+</dd>
+<dt><a id="index-setf-expansion"></a><span><b class="b">setf expansion</b><a class="copiable-link" href="#index-setf-expansion"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a set of five <i class="i">expressions</i>_1 that, taken together, describe 
+       how to store into a <i class="i">place</i> 
+   and which <i class="i">subforms</i> of the macro call associated with the
+       <i class="i">place</i> are evaluated.
+  See <a class="ref" href="Setf-Expansions.html">Setf Expansions</a>.
+</p>
+</dd>
+<dt><a id="index-setf-function"></a><span><b class="b">setf function</b><a class="copiable-link" href="#index-setf-function"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">function</i> whose <i class="i">name</i> is <code class="t">(setf <i class="i">symbol</i>)</code>.
+</p>
+</dd>
+<dt><a id="index-setf-function-name"></a><span><b class="b">setf function name</b><a class="copiable-link" href="#index-setf-function-name"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">symbol</i> <i class="i">S</i>)
+  the <i class="i">list</i> <code class="t">(setf <i class="i">S</i>)</code>.
+</p>
+</dd>
+<dt><a id="index-shadow-2"></a><span><b class="b">shadow</b><a class="copiable-link" href="#index-shadow-2"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> 
+  1. to override the meaning of.
+     &ldquo;That binding of <code class="t">X</code> shadows an outer one.&rdquo; 
+  2. to hide the presence of.
+     &ldquo;That <b class="b">macrolet</b> of <code class="t">F</code> shadows the
+               outer <b class="b">flet</b> of <code class="t">F</code>.&rdquo;
+  3. to replace.
+     &ldquo;That package shadows the symbol <code class="t">cl:car</code> with
+               its own symbol <code class="t">car</code>.&rdquo;
+</p>
+</dd>
+<dt><a id="index-shadowing-symbol-2"></a><span><b class="b">shadowing symbol</b><a class="copiable-link" href="#index-shadowing-symbol-2"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (in a <i class="i">package</i>)
+  an <i class="i">element</i> of the <i class="i">package</i>&rsquo;s <i class="i">shadowing symbols list</i>.
+</p>
+</dd>
+<dt><a id="index-shadowing-symbols-list"></a><span><b class="b">shadowing symbols list</b><a class="copiable-link" href="#index-shadowing-symbols-list"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">package</i>)
+  a <i class="i">list</i>, associated with the <i class="i">package</i>, 
+  of <i class="i">symbols</i> that are to be exempted from &lsquo;symbol conflict errors&rsquo;
+  detected when packages are <i class="i">used</i>.
+  See the <i class="i">function</i> <b class="b">package-shadowing-symbols</b>.
+</p>
+</dd>
+<dt><a id="index-shared-slot"></a><span><b class="b">shared slot</b><a class="copiable-link" href="#index-shared-slot"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">class</i>) 
+  a <i class="i">slot</i> <i class="i">accessible</i> in more than one <i class="i">instance</i> 
+  of a <i class="i">class</i>; specifically, such a <i class="i">slot</i> is <i class="i">accessible</i>
+  in all <i class="i">direct instances</i> of the <i class="i">class</i> and in those 
+  <i class="i">indirect instances</i> whose <i class="i">class</i> does not 
+  <i class="i">shadow</i>_1 the <i class="i">slot</i>.
+</p>
+</dd>
+<dt><a id="index-sharpsign"></a><span><b class="b">sharpsign</b><a class="copiable-link" href="#index-sharpsign"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> that is variously called &ldquo;number sign,&rdquo; &ldquo;sharp,&rdquo;
+  or &ldquo;sharp sign&rdquo; (<code class="t">#</code>).
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+<dt><a id="index-short-float"></a><span><b class="b">short float</b><a class="copiable-link" href="#index-short-float"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">short-float</b>.
+</p>
+</dd>
+<dt><a id="index-sign"></a><span><b class="b">sign</b><a class="copiable-link" href="#index-sign"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  one of the <i class="i">standard characters</i> &ldquo;<code class="t">+</code>&rdquo; or &ldquo;<code class="t">-</code>&rdquo;.
+</p>
+</dd>
+<dt><a id="index-signal-4"></a><span><b class="b">signal</b><a class="copiable-link" href="#index-signal-4"> &para;</a></span></dt>
+<dd><p><i class="i">v.</i> 
+  to announce, using a standard protocol, that a particular situation,
+  represented by a <i class="i">condition</i>, has been detected.  
+  See <a class="ref" href="Condition-System-Concepts.html">Condition System Concepts</a>.
+</p>
+</dd>
+<dt><a id="index-signature"></a><span><b class="b">signature</b><a class="copiable-link" href="#index-signature"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">method</i>)
+  a description of the <i class="i">parameters</i> and
+  <i class="i">parameter specializers</i> for the <i class="i">method</i> which 
+  determines the <i class="i">method</i>&rsquo;s applicability for a given set of
+  required <i class="i">arguments</i>, and which also describes the
+  <i class="i">argument</i> conventions for its other, non-required 
+  <i class="i">arguments</i>.
+</p>
+</dd>
+<dt><a id="index-similar-1"></a><span><b class="b">similar</b><a class="copiable-link" href="#index-similar-1"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of two <i class="i">objects</i>)
+  defined to be equivalent under the <i class="i">similarity</i> relationship.
+</p>
+</dd>
+<dt><a id="index-similarity"></a><span><b class="b">similarity</b><a class="copiable-link" href="#index-similarity"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a two-place conceptual equivalence predicate, 
+  which is independent of the <i class="i">Lisp image</i> 
+  so that two <i class="i">objects</i> in different <i class="i">Lisp images</i> 
+  can be understood to be equivalent under this predicate.
+  See <a class="ref" href="Literal-Objects-in-Compiled-Files.html">Literal Objects in Compiled Files</a>.
+</p>
+</dd>
+<dt><a id="index-simple"></a><span><b class="b">simple</b><a class="copiable-link" href="#index-simple"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i>
+  1. (of an <i class="i">array</i>) being of <i class="i">type</i> <b class="b">simple-array</b>.
+  2. (of a <i class="i">character</i>)
+     having no <i class="i">implementation-defined</i> <i class="i">attributes</i>,
+     or else having <i class="i">implementation-defined</i> <i class="i">attributes</i>
+      each of which has the <i class="i">null</i> value for that <i class="i">attribute</i>.
+</p>
+</dd>
+<dt><a id="index-simple-array"></a><span><b class="b">simple array</b><a class="copiable-link" href="#index-simple-array"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">array</i> of <i class="i">type</i> <b class="b">simple-array</b>.
+</p>
+</dd>
+<dt><a id="index-simple-bit-array"></a><span><b class="b">simple bit array</b><a class="copiable-link" href="#index-simple-bit-array"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">bit array</i> that is a <i class="i">simple array</i>;
+  that is, an <i class="i">object</i> of <i class="i">type</i> <code class="t">(simple-array bit)</code>.
+</p>
+</dd>
+<dt><a id="index-simple-bit-vector"></a><span><b class="b">simple bit vector</b><a class="copiable-link" href="#index-simple-bit-vector"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">bit vector</i> of <i class="i">type</i> <b class="b">simple-bit-vector</b>.
+</p>
+</dd>
+<dt><a id="index-simple-condition"></a><span><b class="b">simple condition</b><a class="copiable-link" href="#index-simple-condition"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">condition</i> of <i class="i">type</i> <b class="b">simple-condition</b>.
+</p>
+</dd>
+<dt><a id="index-simple-general-vector"></a><span><b class="b">simple general vector</b><a class="copiable-link" href="#index-simple-general-vector"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">simple vector</i>.
+</p>
+</dd>
+<dt><a id="index-simple-string"></a><span><b class="b">simple string</b><a class="copiable-link" href="#index-simple-string"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">string</i> of <i class="i">type</i> <b class="b">simple-string</b>.
+</p>
+</dd>
+<dt><a id="index-simple-vector"></a><span><b class="b">simple vector</b><a class="copiable-link" href="#index-simple-vector"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">vector</i> of <i class="i">type</i> <b class="b">simple-vector</b>,
+  sometimes called a &ldquo;<i class="i">simple general vector</i>.&rdquo;
+  Not all <i class="i">vectors</i> that are <i class="i">simple</i> are <i class="i">simple vectors</i>&mdash;only
+  those that have <i class="i">element type</i> <b class="b">t</b>.
+</p>
+</dd>
+<dt><a id="index-single-escape-1"></a><span><b class="b">single escape</b><a class="copiable-link" href="#index-single-escape-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>, <i class="i">adj.</i>
+  1. <i class="i">n.</i> the <i class="i">syntax type</i> of a <i class="i">character</i> 
+     that indicates that the next <i class="i">character</i> is 
+     to be treated as an <i class="i">alphabetic</i>_2 <i class="i">character</i>
+     with its <i class="i">case</i> preserved.
+     For details, see <a class="ref" href="Single-Escape-Character.html">Single Escape Character</a>.
+  2. <i class="i">adj.</i> (of a <i class="i">character</i>)
+     having the <i class="i">single escape</i> <i class="i">syntax type</i>.
+  3. <i class="i">n.</i> a <i class="i">single escape</i>_2 <i class="i">character</i>.
+     (In the <i class="i">standard readtable</i>,
+      <i class="i">slash</i> is the only <i class="i">single escape</i>.)
+</p>
+</dd>
+<dt><a id="index-single-float"></a><span><b class="b">single float</b><a class="copiable-link" href="#index-single-float"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">single-float</b>.
+</p>
+</dd>
+<dt><a id="index-single_002dquote"></a><span><b class="b">single-quote</b><a class="copiable-link" href="#index-single_002dquote"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> that is variously called
+      &ldquo;apostrophe,&rdquo;
+      &ldquo;acute accent,&rdquo;
+      &ldquo;quote,&rdquo;
+   or &ldquo;single quote&rdquo; (<code class="t">'</code>).
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+<dt><a id="index-singleton"></a><span><b class="b">singleton</b><a class="copiable-link" href="#index-singleton"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">sequence</i>)
+  having only one <i class="i">element</i>.
+  &ldquo;<code class="t">(list 'hello)</code> returns a singleton list.&rdquo;
+</p>
+</dd>
+<dt><a id="index-situation"></a><span><b class="b">situation</b><a class="copiable-link" href="#index-situation"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the <i class="i">evaluation</i> of a <i class="i">form</i> in a specific <i class="i">environment</i>.
+</p>
+</dd>
+<dt><a id="index-slash"></a><span><b class="b">slash</b><a class="copiable-link" href="#index-slash"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> that is variously called
+       &ldquo;solidus&rdquo; 
+    or &ldquo;slash&rdquo; (<code class="t">/</code>).
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+<dt><a id="index-slot"></a><span><b class="b">slot</b><a class="copiable-link" href="#index-slot"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a component of an <i class="i">object</i> that can store a <i class="i">value</i>.
+</p>
+</dd>
+<dt><a id="index-slot-specifier-1"></a><span><b class="b">slot specifier</b><a class="copiable-link" href="#index-slot-specifier-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a representation of a <i class="i">slot</i> 
+  that includes the <i class="i">name</i> of the <i class="i">slot</i> and zero or more <i class="i">slot</i> options.
+  A <i class="i">slot</i> option pertains only to a single <i class="i">slot</i>.
+</p>
+</dd>
+<dt><a id="index-source-code-1"></a><span><b class="b">source code</b><a class="copiable-link" href="#index-source-code-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  <i class="i">code</i> representing <i class="i">objects</i> suitable for <i class="i">evaluation</i>
+  (<i class="i">e.g.</i>, <i class="i">objects</i> created by <b class="b">read</b>, 
+       by <i class="i">macro expansion</i>, 
+</p>
+<p>or by <i class="i">compiler macro expansion</i>).
+</p>
+</dd>
+<dt><a id="index-source-file-1"></a><span><b class="b">source file</b><a class="copiable-link" href="#index-source-file-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">file</i> which contains a textual representation of <i class="i">source code</i>,
+  that can be edited, <i class="i">loaded</i>, or <i class="i">compiled</i>.
+</p>
+</dd>
+<dt><a id="index-space"></a><span><b class="b">space</b><a class="copiable-link" href="#index-space"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> &lt;<i class="i">Space</i>&gt;,
+  notated for the <i class="i">Lisp reader</i> as <code class="t">#\Space</code>.
+</p>
+</dd>
+<dt><a id="index-special-form"></a><span><b class="b">special form</b><a class="copiable-link" href="#index-special-form"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">list</i>, other than a <i class="i">macro form</i>, which is a
+  <i class="i">form</i> with special syntax or special <i class="i">evaluation</i> 
+  rules or both, possibly manipulating the <i class="i">evaluation</i> 
+  <i class="i">environment</i> or control flow or both.  The first element of
+  a <i class="i">special form</i> is a <i class="i">special operator</i>.
+</p>
+</dd>
+<dt><a id="index-special-operator"></a><span><b class="b">special operator</b><a class="copiable-link" href="#index-special-operator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  one of a fixed set of <i class="i">symbols</i>, 
+  enumerated in <i class="i">Figure~3&ndash;2</i>,
+  that may appear in the <i class="i">car</i> of
+  a <i class="i">form</i> in order to identify the <i class="i">form</i> as a <i class="i">special form</i>.
+</p>
+</dd>
+<dt><a id="index-special-variable"></a><span><b class="b">special variable</b><a class="copiable-link" href="#index-special-variable"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i>
+  a <i class="i">dynamic variable</i>.
+</p>
+</dd>
+<dt><a id="index-specialize"></a><span><b class="b">specialize</b><a class="copiable-link" href="#index-specialize"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (a <i class="i">generic function</i>)
+  to define a <i class="i">method</i> for the <i class="i">generic function</i>, or in other words,
+  to refine the behavior of the <i class="i">generic function</i> by giving it a specific
+  meaning for a particular set of <i class="i">classes</i> or <i class="i">arguments</i>. 
+</p>
+</dd>
+<dt><a id="index-specialized"></a><span><b class="b">specialized</b><a class="copiable-link" href="#index-specialized"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  1. (of a <i class="i">generic function</i>)
+     having <i class="i">methods</i> which <i class="i">specialize</i> the <i class="i">generic function</i>.
+  2. (of an <i class="i">array</i>)
+     having an <i class="i">actual array element type</i>
+     that is a <i class="i">proper subtype</i> of the <i class="i">type</i> <b class="b">t</b>;
+     see <a class="ref" href="Array-Elements.html">Array Elements</a>.
+     &ldquo;<code class="t">(make-array 5 :element-type 'bit)</code> makes an array of length
+	       five that is specialized for bits.&rdquo;
+</p>
+</dd>
+<dt><a id="index-specialized-lambda-list-1"></a><span><b class="b">specialized lambda list</b><a class="copiable-link" href="#index-specialized-lambda-list-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  an <i class="i">extended lambda list</i> used in <i class="i">forms</i> that <i class="i">establish</i>
+  <i class="i">method</i> definitions, such as <b class="b">defmethod</b>.
+  See <a class="ref" href="Specialized-Lambda-Lists.html">Specialized Lambda Lists</a>.
+</p>
+</dd>
+<dt><a id="index-spreadable-argument-list-designator"></a><span><b class="b">spreadable argument list designator</b><a class="copiable-link" href="#index-spreadable-argument-list-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">designator</i> for a <i class="i">list</i> of <i class="i">objects</i>; that is,
+  an <i class="i">object</i> that denotes a <i class="i">list</i> 
+  and that is a <i class="i">non-null</i> <i class="i">list</i> L1 of length n,
+  whose last element is a <i class="i">list</i> L2 of length m
+  (denoting a list L3 of length m+n-1 whose <i class="i">elements</i> are
+   L1_i for i &lt; n-1 followed by L2_j for j &lt; m).
+  &ldquo;The list (1 2 (3 4 5)) is a spreadable argument list designator for
+	    the list (1 2 3 4 5).&rdquo;
+</p>
+</dd>
+<dt><a id="index-stack-allocate"></a><span><b class="b">stack allocate</b><a class="copiable-link" href="#index-stack-allocate"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> <i class="i">Trad.</i> 
+  to allocate in a non-permanent way, such as on a stack.  Stack-allocation
+  is an optimization technique used in some <i class="i">implementations</i> for
+  allocating certain kinds of <i class="i">objects</i> that have <i class="i">dynamic extent</i>.
+  Such <i class="i">objects</i> are allocated on the stack rather than in the heap
+  so that their storage can be freed as part of unwinding the stack rather
+  than taking up space in the heap until the next garbage collection.
+  What <i class="i">types</i> (if any) can have <i class="i">dynamic extent</i> can vary
+  from <i class="i">implementation</i> to <i class="i">implementation</i>.  No
+  <i class="i">implementation</i> is ever required to perform stack-allocation.
+</p>
+</dd>
+<dt><a id="index-stack_002dallocated"></a><span><b class="b">stack-allocated</b><a class="copiable-link" href="#index-stack_002dallocated"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> <i class="i">Trad.</i> 
+  having been <i class="i">stack allocated</i>.
+</p>
+</dd>
+<dt><a id="index-standard-character-1"></a><span><b class="b">standard character</b><a class="copiable-link" href="#index-standard-character-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">character</i> of <i class="i">type</i> <b class="b">standard-char</b>, which is one of a fixed set of 96
+  such <i class="i">characters</i> required to be present in all <i class="i">conforming implementations</i>.
+  See <a class="ref" href="Standard-Characters.html">Standard Characters</a>.
+</p>
+</dd>
+<dt><a id="index-standard-class"></a><span><b class="b">standard class</b><a class="copiable-link" href="#index-standard-class"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">class</i> that is a <i class="i">generalized instance</i> of <i class="i">class</i> <b class="b">standard-class</b>.
+</p>
+</dd>
+<dt><a id="index-standard-generic-function"></a><span><b class="b">standard generic function</b><a class="copiable-link" href="#index-standard-generic-function"> &para;</a></span></dt>
+<dd>
+<p>a <i class="i">function</i> of <i class="i">type</i> <b class="b">standard-generic-function</b>.
+</p>
+</dd>
+<dt><a id="index-standard-input"></a><span><b class="b">standard input</b><a class="copiable-link" href="#index-standard-input"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the <i class="i">input</i> <i class="i">stream</i> which is the <i class="i">value</i> of the <i class="i">dynamic variable</i>
+  <b class="b">*standard-input*</b>.
+</p>
+</dd>
+<dt><a id="index-standard-method-combination"></a><span><b class="b">standard method combination</b><a class="copiable-link" href="#index-standard-method-combination"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the <i class="i">method combination</i> named <b class="b">standard</b>.
+</p>
+</dd>
+<dt><a id="index-standard-object"></a><span><b class="b">standard object</b><a class="copiable-link" href="#index-standard-object"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> that is 
+  a <i class="i">generalized instance</i> 
+  of <i class="i">class</i> <b class="b">standard-object</b>.
+</p>
+</dd>
+<dt><a id="index-standard-output"></a><span><b class="b">standard output</b><a class="copiable-link" href="#index-standard-output"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the <i class="i">output</i> <i class="i">stream</i> which is the <i class="i">value</i> of the <i class="i">dynamic variable</i>
+  <b class="b">*standard-output*</b>.
+</p>
+</dd>
+<dt><a id="index-standard-pprint-dispatch-table"></a><span><b class="b">standard pprint dispatch table</b><a class="copiable-link" href="#index-standard-pprint-dispatch-table"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  A <i class="i">pprint dispatch table</i> that is <i class="i">different</i> from 
+  the <i class="i">initial pprint dispatch table</i>,
+  that implements <i class="i">pretty printing</i> as described in this specification,
+  and that, unlike other <i class="i">pprint dispatch tables</i>,
+  must never be modified by any program.
+  (Although the definite reference &ldquo;the <i class="i">standard pprint dispatch table</i>&rdquo;
+   is generally used
+   within this document, it is actually <i class="i">implementation-dependent</i> whether a
+   single <i class="i">object</i> fills the role of the <i class="i">standard pprint dispatch table</i>,
+   or whether there might be multiple such objects, any one of which could be used on any
+   given occasion where &ldquo;the <i class="i">standard pprint dispatch table</i>&rdquo; is called for.
+   As such, this phrase should be seen as an indefinite reference 
+   in all cases except for anaphoric references.)
+</p>
+</dd>
+<dt><a id="index-standard-readtable-1"></a><span><b class="b">standard readtable</b><a class="copiable-link" href="#index-standard-readtable-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  A <i class="i">readtable</i> that is <i class="i">different</i> from the <i class="i">initial readtable</i>,
+  that implements the <i class="i">expression</i> syntax defined in this specification,
+  and that, unlike other <i class="i">readtables</i>, must never be modified by any program.
+  (Although the definite reference &ldquo;the <i class="i">standard readtable</i>&rdquo; is generally used
+   within this document, it is actually <i class="i">implementation-dependent</i> whether a
+   single <i class="i">object</i> fills the role of the <i class="i">standard readtable</i>,
+   or whether there might be multiple such objects, any one of which could be used on any
+   given occasion where &ldquo;the <i class="i">standard readtable</i>&rdquo; is called for.
+   As such, this phrase should be seen as an indefinite reference 
+   in all cases except for anaphoric references.)
+</p>
+</dd>
+<dt><a id="index-standard-syntax-1"></a><span><b class="b">standard syntax</b><a class="copiable-link" href="#index-standard-syntax-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the syntax represented by the <i class="i">standard readtable</i> 
+  and used as a reference syntax throughout this document.
+  See <a class="ref" href="Character-Syntax.html">Character Syntax</a>.
+</p>
+</dd>
+<dt><a id="index-standardized"></a><span><b class="b">standardized</b><a class="copiable-link" href="#index-standardized"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">name</i>, <i class="i">object</i>, or definition)
+  having been defined by <span class="r">Common Lisp</span>.
+  &ldquo;All standardized variables that are required to 
+	    hold bidirectional streams have &ldquo;<code class="t">-io*</code>&rdquo; in their name.&rdquo;
+</p>
+</dd>
+<dt><a id="index-startup-environment-1"></a><span><b class="b">startup environment</b><a class="copiable-link" href="#index-startup-environment-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">global environment</i> of the running <i class="i">Lisp image</i> 
+  from which the <i class="i">compiler</i> was invoked.
+</p>
+</dd>
+<dt><a id="index-step"></a><span><b class="b">step</b><a class="copiable-link" href="#index-step"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i>, <i class="i">n.</i> 
+  1. <i class="i">v.t.</i> (an iteration <i class="i">variable</i>) to <i class="i">assign</i> the <i class="i">variable</i>
+     a new <i class="i">value</i> at the end of an iteration, in preparation for a new iteration.
+  2. <i class="i">n.</i> the <i class="i">code</i> that identifies how the next value in an iteration
+     is to be computed.
+  3. <i class="i">v.t.</i> (<i class="i">code</i>) to specially execute the <i class="i">code</i>, pausing at
+     intervals to allow user confirmation or intervention, usually for debugging.
+</p>
+</dd>
+<dt><a id="index-stream-7"></a><span><b class="b">stream</b><a class="copiable-link" href="#index-stream-7"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> that can be used with an input or output function to
+  identify an appropriate source or sink of <i class="i">characters</i> or 
+  <i class="i">bytes</i> for that operation.
+</p>
+</dd>
+<dt><a id="index-stream-associated-with-a-file-2"></a><span><b class="b">stream associated with a file</b><a class="copiable-link" href="#index-stream-associated-with-a-file-2"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">file stream</i>, or a <i class="i">synonym stream</i> the <i class="i">target</i> 
+  of which is a <i class="i">stream associated with a file</i>.
+  Such a <i class="i">stream</i> cannot be created with
+      <b class="b">make-two-way-stream</b>, 
+      <b class="b">make-echo-stream</b>,
+      <b class="b">make-broadcast-stream</b>, 
+      <b class="b">make-concatenated-stream</b>,
+      <b class="b">make-string-input-stream</b>,
+   or <b class="b">make-string-output-stream</b>.
+</p>
+</dd>
+<dt><a id="index-stream-designator"></a><span><b class="b">stream designator</b><a class="copiable-link" href="#index-stream-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">designator</i> for a <i class="i">stream</i>; that is,
+  an <i class="i">object</i> that denotes a <i class="i">stream</i> 
+  and that is one of:
+      <b class="b">t</b> (denoting the <i class="i">value</i> of <b class="b">*terminal-io*</b>), 
+      <b class="b">nil</b> (denoting the <i class="i">value</i> of <b class="b">*standard-input*</b>
+             for <i class="i">input</i> <i class="i">stream designators</i>
+             or denoting the <i class="i">value</i> of <b class="b">*standard-output*</b>
+             for <i class="i">output</i> <i class="i">stream designators</i>),
+   or a <i class="i">stream</i> (denoting itself).
+</p>
+</dd>
+<dt><a id="index-stream-element-type"></a><span><b class="b">stream element type</b><a class="copiable-link" href="#index-stream-element-type"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">stream</i>)
+  the <i class="i">type</i> of data for which the <i class="i">stream</i> is specialized.
+</p>
+</dd>
+<dt><a id="index-stream-variable-1"></a><span><b class="b">stream variable</b><a class="copiable-link" href="#index-stream-variable-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">variable</i> whose <i class="i">value</i> must be a <i class="i">stream</i>.
+</p>
+</dd>
+<dt><a id="index-stream-variable-designator"></a><span><b class="b">stream variable designator</b><a class="copiable-link" href="#index-stream-variable-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">designator</i> for a <i class="i">stream variable</i>; that is,
+  a <i class="i">symbol</i> that denotes a <i class="i">stream variable</i> 
+  and that is one of:
+      <b class="b">t</b> (denoting <b class="b">*terminal-io*</b>), 
+      <b class="b">nil</b> (denoting <b class="b">*standard-input*</b>
+             for <i class="i">input</i> <i class="i">stream variable designators</i>
+             or denoting <b class="b">*standard-output*</b>
+             for <i class="i">output</i> <i class="i">stream variable designators</i>),
+   or some other <i class="i">symbol</i> (denoting itself).
+</p>
+</dd>
+<dt><a id="index-string-1"></a><span><b class="b">string</b><a class="copiable-link" href="#index-string-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a specialized <i class="i">vector</i> that is of <i class="i">type</i> <b class="b">string</b>,
+  and whose elements are of <i class="i">type</i> <b class="b">character</b> or a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">character</b>.
+</p>
+</dd>
+<dt><a id="index-string-designator"></a><span><b class="b">string designator</b><a class="copiable-link" href="#index-string-designator"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">designator</i> for a <i class="i">string</i>; that is,
+  an <i class="i">object</i> that denotes a <i class="i">string</i> 
+  and that is one of:
+       a <i class="i">character</i> (denoting a <i class="i">singleton</i> <i class="i">string</i>
+			   that has the <i class="i">character</i> as its only <i class="i">element</i>),
+       a <i class="i">symbol</i> (denoting the <i class="i">string</i> that is its <i class="i">name</i>),
+    or a <i class="i">string</i> (denoting itself).
+</p>
+<p>The intent is that this term be consistent with the behavior of <b class="b">string</b>;
+  <i class="i">implementations</i> that extend <b class="b">string</b> must extend the meaning of 
+  this term in a compatible way.
+</p>
+</dd>
+<dt><a id="index-string-equal"></a><span><b class="b">string equal</b><a class="copiable-link" href="#index-string-equal"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  the <i class="i">same</i> under <b class="b">string-equal</b>.
+</p>
+</dd>
+<dt><a id="index-string-stream"></a><span><b class="b">string stream</b><a class="copiable-link" href="#index-string-stream"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">stream</i> of <i class="i">type</i> <b class="b">string-stream</b>.
+</p>
+</dd>
+<dt><a id="index-structure"></a><span><b class="b">structure</b><a class="copiable-link" href="#index-structure"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">structure-object</b>.
+</p>
+</dd>
+<dt><a id="index-structure-class"></a><span><b class="b">structure class</b><a class="copiable-link" href="#index-structure-class"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">class</i> that is a <i class="i">generalized instance</i> of <i class="i">class</i> <b class="b">structure-class</b>.
+</p>
+</dd>
+<dt><a id="index-structure-name"></a><span><b class="b">structure name</b><a class="copiable-link" href="#index-structure-name"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">name</i> defined with <b class="b">defstruct</b>.
+  Usually, such a <i class="i">type</i> is also a <i class="i">structure class</i>,
+  but there may be <i class="i">implementation-dependent</i> situations 
+  in which this is not so, if the <code class="t">:type</code> option to <b class="b">defstruct</b> is used.
+</p>
+</dd>
+<dt><a id="index-style-warning"></a><span><b class="b">style warning</b><a class="copiable-link" href="#index-style-warning"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">condition</i> of <i class="i">type</i> <b class="b">style-warning</b>.
+</p>
+</dd>
+<dt><a id="index-subclass-1"></a><span><b class="b">subclass</b><a class="copiable-link" href="#index-subclass-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">class</i> that <i class="i">inherits</i> from another <i class="i">class</i>, 
+  called a <i class="i">superclass</i>.
+  (No <i class="i">class</i> is a <i class="i">subclass</i> of itself.)
+</p>
+</dd>
+<dt><a id="index-subexpression"></a><span><b class="b">subexpression</b><a class="copiable-link" href="#index-subexpression"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of an <i class="i">expression</i>)
+  an <i class="i">expression</i> that is contained within the <i class="i">expression</i>. 
+  (In fact, the state of being a <i class="i">subexpression</i> is not an attribute 
+   of the <i class="i">subexpression</i>, but really an attribute of the containing
+   <i class="i">expression</i> since the <i class="i">same</i> <i class="i">object</i> can at once be
+   a <i class="i">subexpression</i> in one context, and not in another.)
+</p>
+</dd>
+<dt><a id="index-subform"></a><span><b class="b">subform</b><a class="copiable-link" href="#index-subform"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">form</i>)
+  an <i class="i">expression</i> that is a <i class="i">subexpression</i> of the <i class="i">form</i>,
+  and which by virtue of its position in that <i class="i">form</i> is also a
+  <i class="i">form</i>.
+  &ldquo;<code class="t">(f x)</code> and <code class="t">x</code>, but not <code class="t">exit</code>, are subforms of
+	    <code class="t">(return-from exit (f x))</code>.&rdquo;
+</p>
+</dd>
+<dt><a id="index-subrepertoire"></a><span><b class="b">subrepertoire</b><a class="copiable-link" href="#index-subrepertoire"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a subset of a <i class="i">repertoire</i>.
+</p>
+</dd>
+<dt><a id="index-subtype"></a><span><b class="b">subtype</b><a class="copiable-link" href="#index-subtype"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">type</i> whose membership is the same as or a proper subset of the
+  membership of another <i class="i">type</i>, called a <i class="i">supertype</i>.
+  (Every <i class="i">type</i> is a <i class="i">subtype</i> of itself.)
+</p>
+</dd>
+<dt><a id="index-superclass-1"></a><span><b class="b">superclass</b><a class="copiable-link" href="#index-superclass-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">class</i> from which another <i class="i">class</i> 
+  (called a <i class="i">subclass</i>) <i class="i">inherits</i>.
+  (No <i class="i">class</i> is a <i class="i">superclass</i> of itself.)
+  See <i class="i">subclass</i>.
+</p>
+</dd>
+<dt><a id="index-supertype"></a><span><b class="b">supertype</b><a class="copiable-link" href="#index-supertype"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">type</i> whose membership is the same as or a proper superset
+  of the membership of another <i class="i">type</i>, called a <i class="i">subtype</i>.
+  (Every <i class="i">type</i> is a <i class="i">supertype</i> of itself.)
+  See <i class="i">subtype</i>.
+</p>
+</dd>
+<dt><a id="index-supplied_002dp-parameter"></a><span><b class="b">supplied-p parameter</b><a class="copiable-link" href="#index-supplied_002dp-parameter"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">parameter</i> which recieves its <i class="i">generalized boolean</i> value
+  implicitly due to the presence or absence of an <i class="i">argument</i> 
+  corresponding to another <i class="i">parameter</i> 
+  (such as an <i class="i">optional parameter</i> or a <i class="i">rest parameter</i>).
+  See <a class="ref" href="Ordinary-Lambda-Lists.html">Ordinary Lambda Lists</a>.
+</p>
+</dd>
+<dt><a id="index-symbol"></a><span><b class="b">symbol</b><a class="copiable-link" href="#index-symbol"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">object</i> of <i class="i">type</i> <b class="b">symbol</b>.
+</p>
+</dd>
+<dt><a id="index-symbol-macro-1"></a><span><b class="b">symbol macro</b><a class="copiable-link" href="#index-symbol-macro-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">symbol</i> that stands for another <i class="i">form</i>.
+  See the <i class="i">macro</i> <b class="b">symbol-macrolet</b>.
+</p>
+</dd>
+<dt><a id="index-synonym-stream"></a><span><b class="b">synonym stream</b><a class="copiable-link" href="#index-synonym-stream"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. a <i class="i">stream</i> of <i class="i">type</i> <b class="b">synonym-stream</b>, 
+     which is consequently a <i class="i">stream</i> that is an alias for another <i class="i">stream</i>,
+     which is the <i class="i">value</i> of a <i class="i">dynamic variable</i>
+     whose <i class="i">name</i> is the <i class="i">synonym stream symbol</i> of the <i class="i">synonym stream</i>.
+     See the <i class="i">function</i> <b class="b">make-synonym-stream</b>.
+  2. (to a <i class="i">stream</i>)
+     a <i class="i">synonym stream</i> which has the <i class="i">stream</i> as the <i class="i">value</i>
+     of its <i class="i">synonym stream symbol</i>.
+  3. (to a <i class="i">symbol</i>)
+     a <i class="i">synonym stream</i> which has the <i class="i">symbol</i> as its
+     <i class="i">synonym stream symbol</i>.
+</p>
+</dd>
+<dt><a id="index-synonym-stream-symbol"></a><span><b class="b">synonym stream symbol</b><a class="copiable-link" href="#index-synonym-stream-symbol"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">synonym stream</i>)
+  the <i class="i">symbol</i> which names the <i class="i">dynamic variable</i> which has as its
+  <i class="i">value</i> another <i class="i">stream</i> for which the <i class="i">synonym stream</i>
+  is an alias.
+</p>
+</dd>
+<dt><a id="index-syntax-type-1"></a><span><b class="b">syntax type</b><a class="copiable-link" href="#index-syntax-type-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">character</i>)
+  one of several classifications, enumerated in <i class="i">Figure~2&ndash;6</i>,
+  that are used for dispatch during parsing by the <i class="i">Lisp reader</i>.
+  See <a class="ref" href="Character-Syntax-Types.html">Character Syntax Types</a>.
+</p>
+</dd>
+<dt><a id="index-system-class"></a><span><b class="b">system class</b><a class="copiable-link" href="#index-system-class"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">class</i> that may be of <i class="i">type</i> <b class="b">built-in-class</b> in a <i class="i">conforming implementation</i>
+  and hence cannot be inherited by <i class="i">classes</i> defined by <i class="i">conforming programs</i>.
+</p>
+</dd>
+<dt><a id="index-system-code"></a><span><b class="b">system code</b><a class="copiable-link" href="#index-system-code"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  <i class="i">code</i> supplied by the <i class="i">implementation</i> to implement this specification
+  (<i class="i">e.g.</i>, the definition of <b class="b">mapcar</b>)
+  or generated automatically in support of this specification
+  (<i class="i">e.g.</i>, during method combination);
+  that is, <i class="i">code</i> that is not <i class="i">programmer code</i>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="T"><span><b class="b">T</b><a class="copiable-link" href="#T"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-t"></a><span><b class="b">t</b><a class="copiable-link" href="#index-t"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. a. the <i class="i">boolean</i> representing true.
+     b. the canonical <i class="i">generalized boolean</i> representing true.
+        (Although any <i class="i">object</i> other than <b class="b">nil</b> is considered <i class="i">true</i> 
+	 as a <i class="i">generalized boolean</i>,
+         <code class="t">t</code> is generally used when there is no special reason to prefer one 
+         such <i class="i">object</i> over another.)
+  2. the <i class="i">name</i> of the <i class="i">type</i> to which all <i class="i">objects</i> belong&mdash;the
+     <i class="i">supertype</i> of all <i class="i">types</i> (including itself).
+  3. the <i class="i">name</i> of the <i class="i">superclass</i> of all <i class="i">classes</i> except itself.
+</p>
+</dd>
+<dt><a id="index-tag"></a><span><b class="b">tag</b><a class="copiable-link" href="#index-tag"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. a <i class="i">catch tag</i>.
+  2. a <i class="i">go tag</i>.
+</p>
+</dd>
+<dt><a id="index-tail"></a><span><b class="b">tail</b><a class="copiable-link" href="#index-tail"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">list</i>)
+  an <i class="i">object</i> that is the <i class="i">same</i> as either some <i class="i">cons</i>
+  which makes up that <i class="i">list</i> or the <i class="i">atom</i> (if any) which terminates
+  the <i class="i">list</i>.
+  &ldquo;The empty list is a tail of every proper list.&rdquo;
+</p>
+</dd>
+<dt><a id="index-target"></a><span><b class="b">target</b><a class="copiable-link" href="#index-target"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. (of a <i class="i">constructed stream</i>) 
+     a <i class="i">constituent</i> of the <i class="i">constructed stream</i>.
+     &ldquo;The target of a synonym stream is 
+	       the value of its synonym stream symbol.&rdquo;
+  2. (of a <i class="i">displaced array</i>)
+     the <i class="i">array</i> to which the <i class="i">displaced array</i> is displaced.
+  (In the case of a chain of <i class="i">constructed streams</i> or <i class="i">displaced arrays</i>,
+   the unqualified term &ldquo;<i class="i">target</i>&rdquo; always refers to the immediate 
+   <i class="i">target</i> of the first item in the chain, not the immediate target
+   of the last item.)
+</p>
+</dd>
+<dt><a id="index-terminal-I_002fO"></a><span><b class="b">terminal I/O</b><a class="copiable-link" href="#index-terminal-I_002fO"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the <i class="i">bidirectional</i> <i class="i">stream</i>
+  that is the <i class="i">value</i> of the <i class="i">variable</i> <b class="b">*terminal-io*</b>.
+</p>
+</dd>
+<dt><a id="index-terminating-1"></a><span><b class="b">terminating</b><a class="copiable-link" href="#index-terminating-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">macro character</i>)
+  being such that, if it appears while parsing a token, it terminates that token.
+  See <a class="ref" href="Reader-Algorithm.html">Reader Algorithm</a>.
+</p>
+</dd>
+<dt><a id="index-tertiary-value"></a><span><b class="b">tertiary value</b><a class="copiable-link" href="#index-tertiary-value"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of <i class="i">values</i> resulting from the
+				   <i class="i">evaluation</i> of a <i class="i">form</i>)
+  the third <i class="i">value</i>, if any,
+  or else <b class="b">nil</b> if there are fewer than three <i class="i">values</i>.
+</p>
+</dd>
+<dt><a id="index-throw"></a><span><b class="b">throw</b><a class="copiable-link" href="#index-throw"> &para;</a></span></dt>
+<dd><p><i class="i">v.</i> 
+  to transfer control and <i class="i">values</i> to a <i class="i">catch</i>.
+  See the <i class="i">special operator</i> <b class="b">throw</b>.
+</p>
+</dd>
+<dt><a id="index-tilde"></a><span><b class="b">tilde</b><a class="copiable-link" href="#index-tilde"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> that is called &ldquo;tilde&rdquo; (<code class="t">~</code>).
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+<dt><a id="index-time"></a><span><b class="b">time</b><a class="copiable-link" href="#index-time"> &para;</a></span></dt>
+<dd>
+<p>a representation of a point (<i class="i">absolute</i> <i class="i">time</i>) 
+		   or an interval (<i class="i">relative</i> <i class="i">time</i>)
+  on a time line.
+  See <i class="i">decoded time</i>, <i class="i">internal time</i>, and <i class="i">universal time</i>.
+</p>
+</dd>
+<dt><a id="index-time-zone"></a><span><b class="b">time zone</b><a class="copiable-link" href="#index-time-zone"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">rational</i> multiple of <code class="t">1/3600</code> between <code class="t">-24</code> (inclusive)
+  and <code class="t">24</code> (inclusive) that represents a time zone as a number of hours
+  offset from Greenwich Mean Time.  Time zone values increase with motion to the west,
+  so   Massachusetts, U.S.A. is in time zone <code class="t">5</code>,
+       California, U.S.A. is time zone <code class="t">8</code>,
+   and Moscow, Russia is time zone <i class="i">-3</i>.
+   (When &ldquo;daylight savings time&rdquo; is separately represented
+    as an <i class="i">argument</i> or <i class="i">return value</i>, the <i class="i">time zone</i>
+    that accompanies it does not depend on whether daylight savings time
+    is in effect.)
+</p>
+</dd>
+<dt><a id="index-token-1"></a><span><b class="b">token</b><a class="copiable-link" href="#index-token-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a textual representation for a <i class="i">number</i> or a <i class="i">symbol</i>.
+  See <a class="ref" href="Interpretation-of-Tokens.html">Interpretation of Tokens</a>.
+</p>
+</dd>
+<dt><a id="index-top-level-form"></a><span><b class="b">top level form</b><a class="copiable-link" href="#index-top-level-form"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">form</i> which is processed specially by <b class="b">compile-file</b> for
+  the purposes of enabling <i class="i">compile time</i> <i class="i">evaluation</i> of that
+  <i class="i">form</i>.  
+  <i class="i">Top level forms</i> include those <i class="i">forms</i> which 
+  are not <i class="i">subforms</i> of any other <i class="i">form</i>,
+  and certain other cases.  See <a class="ref" href="Processing-of-Top-Level-Forms.html">Processing of Top Level Forms</a>.
+</p>
+</dd>
+<dt><a id="index-trace-output"></a><span><b class="b">trace output</b><a class="copiable-link" href="#index-trace-output"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  the <i class="i">output</i> <i class="i">stream</i> which is the <i class="i">value</i> of the <i class="i">dynamic variable</i>
+  <b class="b">*trace-output*</b>.
+</p>
+</dd>
+<dt><a id="index-tree-1"></a><span><b class="b">tree</b><a class="copiable-link" href="#index-tree-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. a binary recursive data structure made up of <i class="i">conses</i> and
+     <i class="i">atoms</i>:  the <i class="i">conses</i> are themselves also <i class="i">trees</i>
+     (sometimes called &ldquo;subtrees&rdquo; or &ldquo;branches&rdquo;), and the <i class="i">atoms</i>
+     are terminal nodes (sometimes called <i class="i">leaves</i>). Typically,
+     the <i class="i">leaves</i> represent data while the branches establish some 
+     relationship among that data.
+  2. in general, any recursive data structure that has some notion of
+     &ldquo;branches&rdquo; and <i class="i">leaves</i>.
+</p>
+</dd>
+<dt><a id="index-tree-structure"></a><span><b class="b">tree structure</b><a class="copiable-link" href="#index-tree-structure"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">tree</i>_1)
+  the set of <i class="i">conses</i> that make up the <i class="i">tree</i>.
+  Note that while the <i class="i">car</i>_{1b} component of each such <i class="i">cons</i>
+  is part of the <i class="i">tree structure</i>, 
+  the <i class="i">objects</i> that are the <i class="i">cars</i>_2 of each <i class="i">cons</i>
+  in the <i class="i">tree</i>
+  are not themselves part of its <i class="i">tree structure</i> 
+  unless they are also <i class="i">conses</i>.
+</p>
+</dd>
+<dt><a id="index-true"></a><span><b class="b">true</b><a class="copiable-link" href="#index-true"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  any <i class="i">object</i> 
+      that is not <i class="i">false</i>
+  and that is used to represent the success of a <i class="i">predicate</i> test.
+  See <i class="i">t</i>_1.
+</p>
+</dd>
+<dt><a id="index-truename-1"></a><span><b class="b">truename</b><a class="copiable-link" href="#index-truename-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. the canonical <i class="i">filename</i> of a <i class="i">file</i> in the <i class="i">file system</i>.
+     See <a class="ref" href="Truenames.html">Truenames</a>.
+  2. a <i class="i">pathname</i> representing a <i class="i">truename</i>_1.
+</p>
+</dd>
+<dt><a id="index-two_002dway-stream"></a><span><b class="b">two-way stream</b><a class="copiable-link" href="#index-two_002dway-stream"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">stream</i> of <i class="i">type</i> <b class="b">two-way-stream</b>,
+  which is a <i class="i">bidirectional</i> <i class="i">composite stream</i> that 
+       receives its input  from an associated <i class="i">input</i>  <i class="i">stream</i> 
+   and sends    its output to   an associated <i class="i">output</i> <i class="i">stream</i>.
+</p>
+</dd>
+<dt><a id="index-type"></a><span><b class="b">type</b><a class="copiable-link" href="#index-type"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. a set of <i class="i">objects</i>, usually with common structure, behavior, or purpose.
+     (Note that the expression &ldquo;<i class="i">X</i> is of type <i class="i">S_a</i>&rdquo; 
+      naturally implies that &ldquo;<i class="i">X</i> is of type <i class="i">S_b</i>&rdquo; if 
+      <i class="i">S_a</i> is a <i class="i">subtype</i> of <i class="i">S_b</i>.)
+  2. (immediately following the name of a <i class="i">type</i>)
+     a <i class="i">subtype</i> of that <i class="i">type</i>.
+     &ldquo;The type <b class="b">vector</b> is an array type.&rdquo;
+</p>
+</dd>
+<dt><a id="index-type-declaration"></a><span><b class="b">type declaration</b><a class="copiable-link" href="#index-type-declaration"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">declaration</i> that asserts that every reference to a 
+  specified <i class="i">binding</i> within the scope of the <i class="i">declaration</i>
+  results in some <i class="i">object</i> of the specified <i class="i">type</i>.
+</p>
+</dd>
+<dt><a id="index-type-equivalent"></a><span><b class="b">type equivalent</b><a class="copiable-link" href="#index-type-equivalent"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of two <i class="i">types</i> X and Y)
+  having the same <i class="i">elements</i>;
+  that is, X is a <i class="i">subtype</i> of Y 
+       and Y is a <i class="i">subtype</i> of X.
+</p>
+</dd>
+<dt><a id="index-type-expand"></a><span><b class="b">type expand</b><a class="copiable-link" href="#index-type-expand"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  to fully expand a <i class="i">type specifier</i>, removing any references to
+  <i class="i">derived types</i>.  (<span class="r">Common Lisp</span> provides no program interface to cause
+  this to occur, but the semantics of <span class="r">Common Lisp</span> are such that every
+  <i class="i">implementation</i> must be able to do this internally, and some
+  situations involving <i class="i">type specifiers</i> are most easily described
+  in terms of a fully expanded <i class="i">type specifier</i>.)
+</p>
+</dd>
+<dt><a id="index-type-specifier"></a><span><b class="b">type specifier</b><a class="copiable-link" href="#index-type-specifier"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an <i class="i">expression</i> that denotes a <i class="i">type</i>.
+  &ldquo;The symbol <code class="t">random-state</code>, the list <code class="t">(integer 3 5)</code>,
+            the list <code class="t">(and list (not null))</code>, and the class named
+            <code class="t">standard-class</code> are type specifiers.&rdquo;
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="U"><span><b class="b">U</b><a class="copiable-link" href="#U"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-unbound"></a><span><b class="b">unbound</b><a class="copiable-link" href="#index-unbound"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> 
+  not having an associated denotation in a <i class="i">binding</i>.
+  See <i class="i">bound</i>.
+</p>
+</dd>
+<dt><a id="index-unbound-variable"></a><span><b class="b">unbound variable</b><a class="copiable-link" href="#index-unbound-variable"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">name</i> that is syntactically plausible as the name of a
+  <i class="i">variable</i> but which is not <i class="i">bound</i> 
+  in the <i class="i">variable</i> <i class="i">namespace</i>.
+</p>
+</dd>
+<dt><a id="index-undefined-function"></a><span><b class="b">undefined function</b><a class="copiable-link" href="#index-undefined-function"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">name</i> that is syntactically plausible as the name of a
+  <i class="i">function</i> but which is not <i class="i">bound</i>
+  in the <i class="i">function</i> <i class="i">namespace</i>.
+</p>
+</dd>
+<dt><a id="index-unintern"></a><span><b class="b">unintern</b><a class="copiable-link" href="#index-unintern"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (a <i class="i">symbol</i> in a <i class="i">package</i>)
+  to make the <i class="i">symbol</i> not be <i class="i">present</i> in that <i class="i">package</i>.
+  (The <i class="i">symbol</i> might continue to be <i class="i">accessible</i> by inheritance.)
+</p>
+</dd>
+<dt><a id="index-uninterned"></a><span><b class="b">uninterned</b><a class="copiable-link" href="#index-uninterned"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">symbol</i>) 
+  not <i class="i">accessible</i> in any <i class="i">package</i>; <i class="i">i.e.</i>, not <i class="i">interned</i>_1.
+</p>
+</dd>
+<dt><a id="index-universal-time-1"></a><span><b class="b">universal time</b><a class="copiable-link" href="#index-universal-time-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  <i class="i">time</i>, represented as a non-negative <i class="i">integer</i> number of seconds.
+  <i class="i">Absolute</i> <i class="i">universal time</i> is measured as an offset
+  from the beginning of the year 1900 (ignoring <i class="i">leap seconds</i>).
+  See <a class="ref" href="Universal-Time.html">Universal Time</a>.
+</p>
+</dd>
+<dt><a id="index-unqualified-method"></a><span><b class="b">unqualified method</b><a class="copiable-link" href="#index-unqualified-method"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">method</i> with no <i class="i">qualifiers</i>.
+</p>
+</dd>
+<dt><a id="index-unregistered-package"></a><span><b class="b">unregistered package</b><a class="copiable-link" href="#index-unregistered-package"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">package</i> <i class="i">object</i> that is not present in the <i class="i">package registry</i>.
+  An <i class="i">unregistered package</i> has no <i class="i">name</i>; <i class="i">i.e.</i>, its <i class="i">name</i> is <b class="b">nil</b>.
+  See the <i class="i">function</i> <b class="b">delete-package</b>.
+</p>
+</dd>
+<dt><a id="index-unsafe-1"></a><span><b class="b">unsafe</b><a class="copiable-link" href="#index-unsafe-1"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of <i class="i">code</i>)
+  not <i class="i">safe</i>.  (Note that, unless explicitly specified otherwise,
+  if a particular kind of error checking is
+  guaranteed only in a <i class="i">safe</i> context, the same checking might or might not occur
+  in that context if it were <i class="i">unsafe</i>; describing a context as <i class="i">unsafe</i>
+  means that certain kinds of error checking are not reliably enabled
+  but does not guarantee that error checking is definitely disabled.)
+</p>
+</dd>
+<dt><a id="index-unsafe-call-1"></a><span><b class="b">unsafe call</b><a class="copiable-link" href="#index-unsafe-call-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">call</i> that is not a <i class="i">safe call</i>.
+  For more detailed information, see <a class="ref" href="Safe-and-Unsafe-Calls.html">Safe and Unsafe Calls</a>.
+</p>
+</dd>
+<dt><a id="index-upgrade"></a><span><b class="b">upgrade</b><a class="copiable-link" href="#index-upgrade"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (a declared <i class="i">type</i> to an actual <i class="i">type</i>)
+  1. (when creating an <i class="i">array</i>)
+     to substitute an <i class="i">actual array element type</i> 
+     for an <i class="i">expressed array element type</i>
+     when choosing an appropriately <i class="i">specialized</i> <i class="i">array</i> representation.
+     See the <i class="i">function</i> <b class="b">upgraded-array-element-type</b>.
+  2. (when creating a <i class="i">complex</i>)
+     to substitute an <i class="i">actual complex part type</i> 
+     for an <i class="i">expressed complex part type</i>
+     when choosing an appropriately <i class="i">specialized</i> <i class="i">complex</i> representation.
+     See the <i class="i">function</i> <b class="b">upgraded-complex-part-type</b>.
+</p>
+</dd>
+<dt><a id="index-upgraded-array-element-type-1"></a><span><b class="b">upgraded array element type</b><a class="copiable-link" href="#index-upgraded-array-element-type-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">type</i>)
+  a <i class="i">type</i> that is a <i class="i">supertype</i> of the <i class="i">type</i>
+  and that is used instead of the <i class="i">type</i> whenever the
+  <i class="i">type</i> is used as an <i class="i">array element type</i> 
+  for object creation or type discrimination.
+  See <a class="ref" href="Array-Upgrading.html">Array Upgrading</a>.
+</p>
+</dd>
+<dt><a id="index-upgraded-complex-part-type"></a><span><b class="b">upgraded complex part type</b><a class="copiable-link" href="#index-upgraded-complex-part-type"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">type</i>)
+  a <i class="i">type</i> that is a <i class="i">supertype</i> of the <i class="i">type</i>
+  and that is used instead of the <i class="i">type</i> whenever the
+  <i class="i">type</i> is used as a <i class="i">complex part type</i> 
+  for object creation or type discrimination.
+  See the <i class="i">function</i> <b class="b">upgraded-complex-part-type</b>.
+</p>
+</dd>
+<dt><a id="index-uppercase"></a><span><b class="b">uppercase</b><a class="copiable-link" href="#index-uppercase"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i> (of a <i class="i">character</i>)
+     being among <i class="i">standard characters</i> corresponding to
+     the capital letters <code class="t">A</code> through <code class="t">Z</code>,
+  or being some other <i class="i">implementation-defined</i> <i class="i">character</i>
+      that is defined by the <i class="i">implementation</i> to be <i class="i">uppercase</i>.
+  See <a class="ref" href="Characters-With-Case.html">Characters With Case</a>.
+</p>
+</dd>
+<dt><a id="index-use"></a><span><b class="b">use</b><a class="copiable-link" href="#index-use"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (a <i class="i">package</i> P_1)
+  to <i class="i">inherit</i> the <i class="i">external symbols</i> of P_1.
+  (If a package P_2 uses P_1,
+   the <i class="i">external symbols</i> of P_1
+   become <i class="i">internal symbols</i> of P_2 
+   unless they are explicitly <i class="i">exported</i>.)
+  &ldquo;The package <code class="t">CL-USER</code> uses the package <code class="t">CL</code>.&rdquo;
+</p>
+</dd>
+<dt><a id="index-use-list"></a><span><b class="b">use list</b><a class="copiable-link" href="#index-use-list"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">package</i>)
+  a (possibly empty) <i class="i">list</i> associated with each <i class="i">package</i>
+  which determines what other <i class="i">packages</i> are currently being
+  <i class="i">used</i> by that <i class="i">package</i>.
+</p>
+</dd>
+<dt><a id="index-user"></a><span><b class="b">user</b><a class="copiable-link" href="#index-user"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  an active entity, typically a human, that invokes or interacts with a
+  <i class="i">program</i> at run time, but that is not necessarily a <i class="i">programmer</i>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="V"><span><b class="b">V</b><a class="copiable-link" href="#V"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-valid-array-dimension"></a><span><b class="b">valid array dimension</b><a class="copiable-link" href="#index-valid-array-dimension"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">fixnum</i> suitable for use as an <i class="i">array</i> <i class="i">dimension</i>.
+  Such a <i class="i">fixnum</i> must be greater than or equal to zero, 
+  and less than the <i class="i">value</i> of <b class="b">array-dimension-limit</b>.
+  When multiple <i class="i">array</i> <i class="i">dimensions</i> are to be used together to specify a 
+  multi-dimensional <i class="i">array</i>, there is also an implied constraint 
+  that the product of all of the <i class="i">dimensions</i> be less than the <i class="i">value</i> of 
+  <b class="b">array-total-size-limit</b>.
+</p>
+</dd>
+<dt><a id="index-valid-array-index"></a><span><b class="b">valid array index</b><a class="copiable-link" href="#index-valid-array-index"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of an <i class="i">array</i>)
+  a <i class="i">fixnum</i> suitable for use as one of possibly several indices needed
+  to name an <i class="i">element</i> of the <i class="i">array</i> according to a multi-dimensional
+  Cartesian coordinate system. Such a <i class="i">fixnum</i> must
+  be greater than or equal to zero,
+  and must be less than the corresponding <i class="i">dimension</i>_1
+  of the <i class="i">array</i>.
+  (Unless otherwise explicitly specified, 
+   the phrase &ldquo;a <i class="i">list</i> of <i class="i">valid array indices</i>&rdquo; further implies
+   that the <i class="i">length</i> of the <i class="i">list</i> must be the same as the
+   <i class="i">rank</i> of the <i class="i">array</i>.)
+  &ldquo;For a <code class="t">2</code> by~<code class="t">3</code> array,
+	    valid array indices for the first  dimension are <code class="t">0</code> and~<code class="t">1</code>, and
+	    valid array indices for the second dimension are <code class="t">0</code>, <code class="t">1</code> and~<code class="t">2</code>.&rdquo;
+</p>
+</dd>
+<dt><a id="index-valid-array-row_002dmajor-index"></a><span><b class="b">valid array row-major index</b><a class="copiable-link" href="#index-valid-array-row_002dmajor-index"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of an <i class="i">array</i>,
+					     which might have any number 
+					     of <i class="i">dimensions</i>_2)
+  a single <i class="i">fixnum</i> suitable for use in naming any <i class="i">element</i>
+  of the <i class="i">array</i>, by viewing the array&rsquo;s storage as a linear
+  series of <i class="i">elements</i> in row-major order.
+  Such a <i class="i">fixnum</i> must be greater than or equal to zero,
+  and less than the <i class="i">array total size</i> of the <i class="i">array</i>.
+</p>
+</dd>
+<dt><a id="index-valid-fill-pointer"></a><span><b class="b">valid fill pointer</b><a class="copiable-link" href="#index-valid-fill-pointer"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of an <i class="i">array</i>)
+  a <i class="i">fixnum</i> suitable for use as a <i class="i">fill pointer</i> for the <i class="i">array</i>.
+  Such a <i class="i">fixnum</i> must be greater than or equal to zero, 
+  and less than or equal to the <i class="i">array total size</i> of the <i class="i">array</i>.
+</p>
+<p>[Editorial Note by KMP: The &ldquo;valid pathname xxx&rdquo; definitions were taken from 
+		 text found in make-pathname, but look wrong to me.
+		 I&rsquo;ll fix them later.]
+</p>
+</dd>
+<dt><a id="index-valid-logical-pathname-host"></a><span><b class="b">valid logical pathname host</b><a class="copiable-link" href="#index-valid-logical-pathname-host"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">string</i> that has been defined as the name of a <i class="i">logical host</i>.
+  See the <i class="i">function</i> <b class="b">load-logical-pathname-translations</b>.
+</p>
+</dd>
+<dt><a id="index-valid-pathname-device"></a><span><b class="b">valid pathname device</b><a class="copiable-link" href="#index-valid-pathname-device"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+     a <i class="i">string</i>,
+     <b class="b">nil</b>,
+     <code class="t">:unspecific</code>, 
+  or some other <i class="i">object</i> defined by the <i class="i">implementation</i> 
+      to be a <i class="i">valid pathname device</i>.
+</p>
+</dd>
+<dt><a id="index-valid-pathname-directory"></a><span><b class="b">valid pathname directory</b><a class="copiable-link" href="#index-valid-pathname-directory"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+     a <i class="i">string</i>,
+     a <i class="i">list</i> of <i class="i">strings</i>,
+     <b class="b">nil</b>,
+</p>
+<p><code class="t">:wild</code>,
+</p>
+<p><code class="t">:unspecific</code>,
+  or some other <i class="i">object</i> defined by the <i class="i">implementation</i> 
+      to be a <i class="i">valid directory component</i>.
+</p>
+</dd>
+<dt><a id="index-valid-pathname-host"></a><span><b class="b">valid pathname host</b><a class="copiable-link" href="#index-valid-pathname-host"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+     a <i class="i">valid physical pathname host</i>
+  or a <i class="i">valid logical pathname host</i>.
+</p>
+</dd>
+<dt><a id="index-valid-pathname-name"></a><span><b class="b">valid pathname name</b><a class="copiable-link" href="#index-valid-pathname-name"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+     a <i class="i">string</i>,
+     <b class="b">nil</b>,
+     <code class="t">:wild</code>,
+     <code class="t">:unspecific</code>,
+  or some other <i class="i">object</i> defined by the <i class="i">implementation</i> 
+     to be a <i class="i">valid pathname name</i>.
+</p>
+</dd>
+<dt><a id="index-valid-pathname-type"></a><span><b class="b">valid pathname type</b><a class="copiable-link" href="#index-valid-pathname-type"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+     a <i class="i">string</i>,
+     <b class="b">nil</b>,
+     <code class="t">:wild</code>,
+     <code class="t">:unspecific</code>.
+</p>
+</dd>
+<dt><a id="index-valid-pathname-version"></a><span><b class="b">valid pathname version</b><a class="copiable-link" href="#index-valid-pathname-version"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+     a non-negative <i class="i">integer</i>,
+     or one of <code class="t">:wild</code>,
+               <code class="t">:newest</code>,
+ 	       <code class="t">:unspecific</code>,
+   	    or <b class="b">nil</b>.
+ The symbols <code class="t">:oldest</code>, <code class="t">:previous</code>, and <code class="t">:installed</code> are
+ <i class="i">semi-standard</i> special version symbols.
+</p>
+</dd>
+<dt><a id="index-valid-physical-pathname-host"></a><span><b class="b">valid physical pathname host</b><a class="copiable-link" href="#index-valid-physical-pathname-host"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+   any of
+     a <i class="i">string</i>,
+     a <i class="i">list</i> of <i class="i">strings</i>,
+     or the symbol <code class="t">:unspecific</code>,
+   that is recognized by the implementation as the name of a host.
+</p>
+</dd>
+<dt><a id="index-valid-sequence-index"></a><span><b class="b">valid sequence index</b><a class="copiable-link" href="#index-valid-sequence-index"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> (of a <i class="i">sequence</i>)
+  an <i class="i">integer</i> suitable for use to name an <i class="i">element</i> 
+  of the <i class="i">sequence</i>.  Such an <i class="i">integer</i> must 
+  be greater than or equal to zero,
+  and must be less than the <i class="i">length</i> of the <i class="i">sequence</i>.
+</p>
+<p>(If the <i class="i">sequence</i> is an <i class="i">array</i>,
+   the <i class="i">valid sequence index</i> is further constrained to be a <i class="i">fixnum</i>.)
+</p>
+</dd>
+<dt><a id="index-value"></a><span><b class="b">value</b><a class="copiable-link" href="#index-value"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. a. one of possibly several <i class="i">objects</i> that are the result of
+        an <i class="i">evaluation</i>.
+     b. (in a situation where exactly one value is expected from the
+	 <i class="i">evaluation</i> of a <i class="i">form</i>)
+        the <i class="i">primary value</i> returned by the <i class="i">form</i>.
+     c. (of <i class="i">forms</i> in an <i class="i">implicit progn</i>) one of possibly
+        several <i class="i">objects</i> that result from the <i class="i">evaluation</i>
+        of the last <i class="i">form</i>, or <b class="b">nil</b> if there are no <i class="i">forms</i>.
+  2. an <i class="i">object</i> associated with a <i class="i">name</i> in a <i class="i">binding</i>.
+  3. (of a <i class="i">symbol</i>) the <i class="i">value</i> of the <i class="i">dynamic variable</i>
+     named by that symbol.
+  4. an <i class="i">object</i> associated with a <i class="i">key</i> 
+     in an <i class="i">association list</i>, 
+	a  <i class="i">property list</i>,
+     or a  <i class="i">hash table</i>.
+</p>
+</dd>
+<dt><a id="index-value-cell"></a><span><b class="b">value cell</b><a class="copiable-link" href="#index-value-cell"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> <i class="i">Trad.</i> (of a <i class="i">symbol</i>)
+  The <i class="i">place</i> which holds the <i class="i">value</i>, if any, of the
+  <i class="i">dynamic variable</i> named by that <i class="i">symbol</i>,
+  and which is <i class="i">accessed</i> by <b class="b">symbol-value</b>.
+  See <i class="i">cell</i>.
+</p>
+</dd>
+<dt><a id="index-variable"></a><span><b class="b">variable</b><a class="copiable-link" href="#index-variable"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a <i class="i">binding</i> in which a <i class="i">symbol</i> is the <i class="i">name</i>
+  used to refer to an <i class="i">object</i>.
+</p>
+</dd>
+<dt><a id="index-vector-1"></a><span><b class="b">vector</b><a class="copiable-link" href="#index-vector-1"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  a one-dimensional <i class="i">array</i>.
+</p>
+</dd>
+<dt><a id="index-vertical_002dbar"></a><span><b class="b">vertical-bar</b><a class="copiable-link" href="#index-vertical_002dbar"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  the <i class="i">standard character</i> that is called &ldquo;vertical bar&rdquo; (<code class="t">|</code>).
+  See <i class="i">Figure~2&ndash;5</i>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="W"><span><b class="b">W</b><a class="copiable-link" href="#W"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-whitespace"></a><span><b class="b">whitespace</b><a class="copiable-link" href="#index-whitespace"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i> 
+  1. one or more <i class="i">characters</i> that are
+      either the <i class="i">graphic</i> <i class="i">character</i> <code class="t">#\Space</code>
+          or else <i class="i">non-graphic</i> characters such as <code class="t">#\Newline</code> 
+                  that only move the print position.
+  2. a. <i class="i">n.</i> the <i class="i">syntax type</i> of a <i class="i">character</i> 
+         that is a <i class="i">token</i> separator.
+         For details, see <a class="ref" href="Whitespace-Characters.html">Whitespace Characters</a>.
+     b. <i class="i">adj.</i> (of a <i class="i">character</i>)
+        having the <i class="i">whitespace</i>_{2a} <i class="i">syntax type</i>_2.
+     c. <i class="i">n.</i> a <i class="i">whitespace</i>_{2b} <i class="i">character</i>.
+</p>
+</dd>
+<dt><a id="index-wild"></a><span><b class="b">wild</b><a class="copiable-link" href="#index-wild"> &para;</a></span></dt>
+<dd><p><i class="i">adj.</i>
+  1. (of a <i class="i">namestring</i>) using an <i class="i">implementation-defined</i>
+     syntax for naming files, which might &ldquo;match&rdquo; any of possibly several
+     possible <i class="i">filenames</i>, and which can therefore be used to refer to 
+     the aggregate of the <i class="i">files</i> named by those <i class="i">filenames</i>.
+  2. (of a <i class="i">pathname</i>) a structured representation of a name which
+     might &ldquo;match&rdquo; any of possibly several <i class="i">pathnames</i>, and which can
+     therefore be used to refer to the aggregate of the <i class="i">files</i> named by those
+     <i class="i">pathnames</i>.  The set of <i class="i">wild</i> <i class="i">pathnames</i> includes, but
+     is not restricted to, <i class="i">pathnames</i> which have a component which is
+     <code class="t">:wild</code>, or which have a directory component which contains <code class="t">:wild</code> 
+     or <code class="t">:wild-inferors</code>.
+     See the <i class="i">function</i> <b class="b">wild-pathname-p</b>.
+</p>
+</dd>
+<dt><a id="index-write"></a><span><b class="b">write</b><a class="copiable-link" href="#index-write"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> 
+</p>
+<p>1. (a <i class="i">binding</i> or <i class="i">slot</i> or component)
+     to change the <i class="i">value</i> of the <i class="i">binding</i> or <i class="i">slot</i>.
+</p>
+<p>2. (an <i class="i">object</i> to a <i class="i">stream</i>)
+     to output a representation of the <i class="i">object</i> to the <i class="i">stream</i>.
+</p>
+</dd>
+<dt><a id="index-writer"></a><span><b class="b">writer</b><a class="copiable-link" href="#index-writer"> &para;</a></span></dt>
+<dd><p><i class="i">n.</i>
+  a <i class="i">function</i> that <i class="i">writes</i>_1 a <i class="i">variable</i> or <i class="i">slot</i>.
+</p>
+</dd>
+</dl>
+<h4 class="subheading" id="Y"><span><b class="b">Y</b><a class="copiable-link" href="#Y"> &para;</a></span></h4>
+<dl class="table">
+<dt><a id="index-yield"></a><span><b class="b">yield</b><a class="copiable-link" href="#index-yield"> &para;</a></span></dt>
+<dd><p><i class="i">v.t.</i> (<i class="i">values</i>)
+  to produce the <i class="i">values</i> as the result of <i class="i">evaluation</i>.
+  &ldquo;The form <code class="t">(+ 2 3)</code> yields <code class="t">5</code>.&rdquo;
+</p>
+</dd>
+</dl>
+
+
+
+
+
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Glossary-_0028Glossary_0029.html">Glossary</a>, Up: <a href="Glossary-_0028Glossary_0029.html">Glossary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Graphic-Characters.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Graphic Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Graphic Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Graphic Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Categories.html" rel="up" title="Character Categories">
+<link href="Alphabetic-Characters.html" rel="next" title="Alphabetic Characters">
+<link href="Character-Categories.html" rel="prev" title="Character Categories">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Graphic-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Alphabetic-Characters.html" accesskey="n" rel="next">Alphabetic Characters</a>, Previous: <a href="Character-Categories.html" accesskey="p" rel="prev">Character Categories</a>, Up: <a href="Character-Categories.html" accesskey="u" rel="up">Character Categories</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Graphic-Characters-1"><span>13.1.4.1 Graphic Characters<a class="copiable-link" href="#Graphic-Characters-1"> &para;</a></span></h4>
+
+<p><i class="i">Characters</i> that are classified as <i class="i">graphic</i>
+<a class="index-entry-id" id="index-graphic"></a>
+, or displayable, are each
+associated with a glyph, a visual representation of the <i class="i">character</i>.
+</p>
+<p>A <i class="i">graphic</i> <i class="i">character</i> is one that has a standard textual 
+representation as a single <i class="i">glyph</i>, such as <code class="t">A</code> or <code class="t">*</code> or <code class="t">=</code>.
+<i class="i">Space</i>, which effectively has a blank <i class="i">glyph</i>, is defined
+to be a <i class="i">graphic</i>.
+</p>
+<p>Of the <i class="i">standard characters</i>,
+     <i class="i">newline</i> is <i class="i">non-graphic</i> 
+ and all others are <i class="i">graphic</i>; see <a class="ref" href="Standard-Characters.html">Standard Characters</a>.
+</p>
+<p><i class="i">Characters</i> that are not <i class="i">graphic</i> are called <i class="i">non-graphic</i>
+<a class="index-entry-id" id="index-non_002dgraphic"></a>
+.
+</p>
+<p><i class="i">Non-graphic</i> <i class="i">characters</i> are sometimes informally called
+    &ldquo;formatting characters&rdquo; 
+ or &ldquo;control characters.&rdquo;
+</p>
+<p><code class="t">#\Backspace</code>,
+<code class="t">#\Tab</code>,
+<code class="t">#\Rubout</code>,
+<code class="t">#\Linefeed</code>, 
+<code class="t">#\Return</code>, and
+<code class="t">#\Page</code>,
+if they are supported by the <i class="i">implementation</i>,
+are <i class="i">non-graphic</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Hash-Table-Concepts.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Hash Table Concepts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Hash Table Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Hash Table Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Tables.html" rel="up" title="Hash Tables">
+<link href="Hash-Tables-Dictionary.html" rel="next" title="Hash Tables Dictionary">
+<link href="Hash-Tables.html" rel="prev" title="Hash Tables">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Hash-Table-Concepts">
+<div class="nav-panel">
+<p>
+Next: <a href="Hash-Tables-Dictionary.html" accesskey="n" rel="next">Hash Tables Dictionary</a>, Previous: <a href="Hash-Tables.html" accesskey="p" rel="prev">Hash Tables</a>, Up: <a href="Hash-Tables.html" accesskey="u" rel="up">Hash Tables</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Hash-Table-Concepts-1"><span>18.1 Hash Table Concepts<a class="copiable-link" href="#Hash-Table-Concepts-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Hash_002dTable-Operations.html" accesskey="1">Hash-Table Operations</a></li>
+<li><a href="Modifying-Hash-Table-Keys.html" accesskey="2">Modifying Hash Table Keys</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Hash-Tables-Dictionary.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Hash Tables Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Hash Tables Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Hash Tables Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Tables.html" rel="up" title="Hash Tables">
+<link href="Hash-Table-Concepts.html" rel="prev" title="Hash Table Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Hash-Tables-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Hash-Table-Concepts.html" accesskey="p" rel="prev">Hash Table Concepts</a>, Up: <a href="Hash-Tables.html" accesskey="u" rel="up">Hash Tables</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Hash-Tables-Dictionary-1"><span>18.2 Hash Tables Dictionary<a class="copiable-link" href="#Hash-Tables-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="hash_002dtable.html" accesskey="1">hash-table                                                   [System Class]</a></li>
+<li><a href="make_002dhash_002dtable.html" accesskey="2">make-hash-table                                                  [Function]</a></li>
+<li><a href="hash_002dtable_002dp.html" accesskey="3">hash-table-p                                                     [Function]</a></li>
+<li><a href="hash_002dtable_002dcount.html" accesskey="4">hash-table-count                                                 [Function]</a></li>
+<li><a href="hash_002dtable_002drehash_002dsize.html" accesskey="5">hash-table-rehash-size                                           [Function]</a></li>
+<li><a href="hash_002dtable_002drehash_002dthreshold.html" accesskey="6">hash-table-rehash-threshold                                      [Function]</a></li>
+<li><a href="hash_002dtable_002dsize.html" accesskey="7">hash-table-size                                                  [Function]</a></li>
+<li><a href="hash_002dtable_002dtest.html" accesskey="8">hash-table-test                                                  [Function]</a></li>
+<li><a href="gethash.html" accesskey="9">gethash                                                          [Accessor]</a></li>
+<li><a href="remhash.html">remhash                                                          [Function]</a></li>
+<li><a href="maphash.html">maphash                                                          [Function]</a></li>
+<li><a href="with_002dhash_002dtable_002diterator.html">with-hash-table-iterator                                            [Macro]</a></li>
+<li><a href="clrhash.html">clrhash                                                          [Function]</a></li>
+<li><a href="sxhash.html">sxhash                                                           [Function]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Hash-Tables.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Hash Tables (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Hash Tables (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Hash Tables (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Filenames.html" rel="next" title="Filenames">
+<link href="Sequences.html" rel="prev" title="Sequences">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Hash-Tables">
+<div class="nav-panel">
+<p>
+Next: <a href="Filenames.html" accesskey="n" rel="next">Filenames</a>, Previous: <a href="Sequences.html" accesskey="p" rel="prev">Sequences</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Hash-Tables-1"><span>18 Hash Tables<a class="copiable-link" href="#Hash-Tables-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Hash-Table-Concepts.html" accesskey="1">Hash Table Concepts</a></li>
+<li><a href="Hash-Tables-Dictionary.html" accesskey="2">Hash Tables Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Hash_002dTable-Operations.html
@@ -0,0 +1,114 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Hash-Table Operations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Hash-Table Operations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Hash-Table Operations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Table-Concepts.html" rel="up" title="Hash Table Concepts">
+<link href="Modifying-Hash-Table-Keys.html" rel="next" title="Modifying Hash Table Keys">
+<link href="Hash-Table-Concepts.html" rel="prev" title="Hash Table Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Hash_002dTable-Operations">
+<div class="nav-panel">
+<p>
+Next: <a href="Modifying-Hash-Table-Keys.html" accesskey="n" rel="next">Modifying Hash Table Keys</a>, Previous: <a href="Hash-Table-Concepts.html" accesskey="p" rel="prev">Hash Table Concepts</a>, Up: <a href="Hash-Table-Concepts.html" accesskey="u" rel="up">Hash Table Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Hash_002dTable-Operations-1"><span>18.1.1 Hash-Table Operations<a class="copiable-link" href="#Hash_002dTable-Operations-1"> &para;</a></span></h4>
+
+<p>Figure 18&ndash;1 lists some <i class="i">defined names</i> that are applicable 
+to <i class="i">hash tables</i>.  The following rules apply to <i class="i">hash tables</i>.
+</p>
+<dl class="table">
+<dt>&ndash;</dt>
+<dd><p>A <i class="i">hash table</i> can only associate one value with a given
+key. If an attempt is made to add a second value for a given key,
+the second value will replace the first.
+Thus, adding a value to a <i class="i">hash table</i> is a destructive operation;
+the <i class="i">hash table</i> is modified.  
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>There are four kinds of <i class="i">hash tables</i>:
+  those whose keys are compared with <b class="b">eq</b>,
+  those whose keys are compared with <b class="b">eql</b>,
+  those whose keys are compared with <b class="b">equal</b>, and
+</p>
+<p>those whose keys are compared with <b class="b">equalp</b>.  
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p><i class="i">Hash tables</i> are created by <b class="b">make-hash-table</b>. 
+<b class="b">gethash</b> is used to look up a key and find the associated value.
+New entries are added to <i class="i">hash tables</i> using <b class="b">setf</b> with <b class="b">gethash</b>.
+<b class="b">remhash</b> is used to remove an entry.
+For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq a (make-hash-table)) &rArr;  #&lt;HASH-TABLE EQL 0/120 32536573&gt;
+ (setf (gethash 'color a) 'brown) &rArr;  BROWN
+ (setf (gethash 'name a) 'fred) &rArr;  FRED
+ (gethash 'color a) &rArr;  BROWN, <i class="i">true</i>
+ (gethash 'name a) &rArr;  FRED, <i class="i">true</i>
+ (gethash 'pointy a) &rArr;  NIL, <i class="i">false</i>
+</pre></div>
+
+<p>In this example, the symbols <code class="t">color</code> and <code class="t">name</code> are being used as
+keys, and the symbols <code class="t">brown</code> and <code class="t">fred</code> are being used as the
+associated values.  The <i class="i">hash table</i> 
+has two items in it, one of which                              
+associates from <code class="t">color</code> to <code class="t">brown</code>, and the other of which
+associates from <code class="t">name</code> to <code class="t">fred</code>.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>A key or a value may be any <i class="i">object</i>.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>The existence of an entry in the <i class="i">hash table</i> can be determined
+from the <i class="i">secondary value</i> returned by <b class="b">gethash</b>.
+</p></dd>
+</dl>
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  clrhash           hash-table-p     remhash  <!-- /@w -->
+  gethash           make-hash-table  sxhash   <!-- /@w -->
+  hash-table-count  maphash                   <!-- /@w -->
+
+     Figure 18&ndash;1: Hash-table defined names   <!-- /@w -->
+
+</pre></div></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Modifying-Hash-Table-Keys.html">Modifying Hash Table Keys</a>, Previous: <a href="Hash-Table-Concepts.html">Hash Table Concepts</a>, Up: <a href="Hash-Table-Concepts.html">Hash Table Concepts</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/History.html
@@ -0,0 +1,223 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>History (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="History (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="History (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Scope.html" rel="up" title="Scope">
+<link href="Scope-and-Purpose.html" rel="prev" title="Scope and Purpose">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="History">
+<div class="nav-panel">
+<p>
+Previous: <a href="Scope-and-Purpose.html" accesskey="p" rel="prev">Scope and Purpose</a>, Up: <a href="Scope.html" accesskey="u" rel="up">Scope, Purpose, and History</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="History-1"><span>1.1.2 History<a class="copiable-link" href="#History-1"> &para;</a></span></h4>
+
+<p>Lisp is a family of languages with a long history.  Early key ideas in
+Lisp were developed by John McCarthy during the 1956 Dartmouth Summer
+Research Project on Artificial Intelligence.  McCarthy&rsquo;s motivation
+was to develop an algebraic list processing language for artificial
+intelligence work.
+Implementation efforts for early dialects of Lisp were undertaken on
+the IBM~704, the IBM~7090, the Digital Equipment Corporation (DEC) PDP-1,
+the DEC~PDP-6, and the PDP-10. The primary dialect of Lisp between
+1960 and 1965 was Lisp~1.5. By the early 1970&rsquo;s there were two
+predominant dialects of Lisp, both arising from these early efforts:
+MacLisp and Interlisp.
+For further information about very early Lisp dialects, 
+see <b class="b">The Anatomy of Lisp</b> or <b class="b">Lisp 1.5 Programmer&rsquo;s Manual</b>.
+</p>
+<p>MacLisp improved on the Lisp~1.5 notion of special variables and error
+handling. MacLisp also introduced the concept of functions that could take
+a variable number of arguments, macros, arrays, non-local dynamic
+exits, fast arithmetic, the first good Lisp compiler, and an emphasis
+on execution speed. 
+By the end of the 1970&rsquo;s, MacLisp was in use at over 50 sites.
+For further information about Maclisp, 
+see <b class="b">Maclisp Reference Manual, Revision~0</b> or <b class="b">The Revised Maclisp Manual</b>.
+</p>
+<p>Interlisp introduced many ideas into Lisp programming environments and
+methodology. One of the Interlisp ideas that influenced <span class="r">Common Lisp</span> was an iteration
+construct implemented by Warren Teitelman that inspired the <b class="b">loop</b>
+macro used both on the Lisp Machines and in MacLisp, and now in <span class="r">Common Lisp</span>.
+For further information about Interlisp,
+see <b class="b">Interlisp Reference Manual</b>.
+</p>
+<p>Although the first implementations of Lisp were on the IBM~704 and the
+IBM~7090, later work focussed on the DEC
+PDP-6 and, later, PDP-10 computers, the latter being the mainstay of
+Lisp and artificial intelligence work at such places as 
+Massachusetts Institute of Technology (MIT), Stanford University,
+and 
+Carnegie Mellon University (CMU) from the mid-1960&rsquo;s through much of the 1970&rsquo;s.
+The PDP-10 computer and its predecessor the PDP-6 computer were, by
+design, especially well-suited to Lisp because they had 36-bit words
+and 18-bit addresses. This architecture allowed a <i class="i">cons</i> cell to be
+stored in one word; single instructions could extract the 
+<i class="i">car</i> and <i class="i">cdr</i>
+parts.  The PDP-6 and PDP-10 had fast, powerful stack instructions
+that enabled fast function calling.
+But the limitations of the PDP-10 were evident by 1973: it supported a
+small number of researchers using Lisp, and the small, 18-bit address
+space (2^18 = 262,144 words) limited the size of a single
+program.
+One response to the address space problem was the Lisp Machine, a
+special-purpose computer designed to run Lisp programs.  The other
+response was to use general-purpose computers with address spaces
+larger than 18~bits, such as the DEC VAX and
+the S-1~Mark~IIA.
+For further information about S-1 Common Lisp, see <b class="b">S-1 Common Lisp Implementation</b>.
+</p>
+<p>The Lisp machine concept was developed in the late 1960&rsquo;s.  In the
+early 1970&rsquo;s, Peter Deutsch, working with 
+Daniel Bobrow, implemented a Lisp on the
+Alto, a single-user minicomputer, using microcode to interpret a
+byte-code implementation language. Shortly thereafter, Richard
+Greenblatt began work on a different hardware and instruction set
+design at MIT.
+Although the Alto was not a total success as a Lisp machine, a dialect
+of Interlisp known as Interlisp-D became available on the D-series
+machines manufactured by Xerox&mdash;the Dorado, Dandelion,
+Dandetiger, and Dove (or Daybreak).
+An upward-compatible extension of MacLisp called Lisp
+Machine Lisp became available on the early MIT Lisp Machines.
+Commercial Lisp machines from Xerox, Lisp Machines (LMI), and
+Symbolics were on the market by 1981.
+For further information about Lisp Machine Lisp, see <b class="b">Lisp Machine Manual</b>.
+</p>
+<p>During the late 1970&rsquo;s, Lisp Machine Lisp began to expand towards a
+much fuller language.  Sophisticated lambda lists, 
+<code class="t">setf</code>, multiple values, and structures
+like those in <span class="r">Common Lisp</span> are the results of early
+experimentation with programming styles by the Lisp Machine group.
+Jonl White and others migrated these features to MacLisp.
+Around 1980, Scott Fahlman and others at CMU began work on a Lisp to
+run on the Scientific Personal Integrated Computing
+Environment (SPICE) workstation.  One of the goals of the project was to
+design a simpler dialect than Lisp Machine Lisp.
+</p>
+<p>The Macsyma group at MIT began a project during the late 1970&rsquo;s called
+the New Implementation of Lisp (NIL) for the VAX, which was headed by
+White.  One of the stated goals of the NIL project was to fix many of
+the historic, but annoying, problems with Lisp while retaining significant 
+compatibility with MacLisp.  At about the same time, a research group at
+Stanford University and Lawrence Livermore National Laboratory headed
+by Richard P. Gabriel began the design of a Lisp to run on the
+S-1~Mark~IIA supercomputer.  S-1~Lisp, never completely
+functional, was the test bed for adapting advanced compiler techniques
+to Lisp implementation.  Eventually the S-1 and NIL groups
+collaborated.
+For further information about the NIL project,
+see <b class="b">NIL&mdash;A Perspective</b>.
+</p>
+<p>The first effort towards Lisp standardization was made in 1969, 
+when Anthony Hearn and Martin Griss at the University of Utah 
+defined Standard Lisp&mdash;a subset of Lisp~1.5 and other dialects&mdash;to 
+transport REDUCE, a symbolic algebra system.
+During the 1970&rsquo;s, the Utah group implemented first a retargetable
+optimizing compiler for Standard Lisp,
+and then an extended implementation known as Portable Standard Lisp (PSL).
+By the mid 1980&rsquo;s, PSL ran on about a dozen kinds of computers.
+For further information about Standard Lisp, see <b class="b">Standard LISP Report</b>.
+</p>
+<p>PSL and Franz Lisp&mdash;a MacLisp-like dialect for Unix machines&mdash;were 
+the first examples of widely available Lisp dialects on multiple 
+hardware platforms. 
+</p>
+<p>One of the most important developments in Lisp occurred during the
+second half of the 1970&rsquo;s: Scheme. Scheme, designed by Gerald J.
+Sussman and Guy L. Steele Jr., is a simple dialect of Lisp whose
+design brought to Lisp some of the ideas from programming language
+semantics developed in the 1960&rsquo;s.  Sussman was one of the prime
+innovators behind many other advances in Lisp technology from the late
+1960&rsquo;s through the 1970&rsquo;s.
+The major contributions of Scheme were lexical scoping, lexical
+closures, first-class continuations, and simplified syntax (no
+separation of value cells and function cells). Some of these contributions made
+a large impact on the design of <span class="r">Common Lisp</span>.
+For further information about Scheme, see <b class="b">IEEE Standard for the Scheme Programming Language</b> 
+or <b class="b">Revised^3 Report on the Algorithmic Language Scheme</b>.
+</p>
+<p>In the late 1970&rsquo;s object-oriented programming concepts started to
+make a strong impact on Lisp. 
+At MIT, certain ideas from Smalltalk made their way into several
+widely used programming systems.
+Flavors, an object-oriented programming system with multiple inheritance, 
+was developed at MIT for the Lisp machine community by Howard Cannon and others.
+At Xerox, the experience with Smalltalk and 
+Knowledge Representation Language (KRL) led to the development of 
+Lisp Object Oriented Programming System (LOOPS) and later Common LOOPS.
+For further information on Smalltalk, see <b class="b">Smalltalk-80: The Language and its Implementation</b>.
+For further information on Flavors, see <b class="b">Flavors: A Non-Hierarchical Approach to Object-Oriented Programming</b>.
+</p>
+<p>These systems influenced the design of the Common Lisp Object System (CLOS).
+CLOS was developed specifically for this standardization effort,
+and was separately written up in <b class="b">Common Lisp Object System Specification</b>.  
+However, minor details
+of its design have changed slightly since that publication, and that paper 
+should not be taken as an authoritative reference to the semantics of the
+object system as described in this document.
+</p>
+<p>In 1980 Symbolics and LMI were developing Lisp Machine Lisp; stock-hardware
+implementation groups were developing NIL, Franz Lisp, and PSL; Xerox
+was developing Interlisp; and the SPICE project at CMU was developing
+a MacLisp-like dialect of Lisp called SpiceLisp.
+</p>
+<p>In April 1981, after a DARPA-sponsored meeting concerning the
+splintered Lisp community, Symbolics, the SPICE project, the NIL
+project, and the S-1~Lisp project joined together to define
+<span class="r">Common Lisp</span>.  Initially spearheaded by White and Gabriel, the
+driving force behind this grassroots effort was provided by Fahlman,
+Daniel Weinreb, David Moon, Steele,  and Gabriel.
+<span class="r">Common Lisp</span> was designed as a description of a family of languages.  The
+primary influences on <span class="r">Common Lisp</span> were Lisp Machine Lisp, MacLisp, NIL,
+S-1~Lisp, Spice Lisp, and Scheme.
+<i class="i">Common Lisp: The Language</i> is a description of that design.  Its
+semantics were intentionally underspecified in places where it was
+felt that a tight specification would overly constrain <span class="r">Common Lisp</span>
+research and use.
+</p>
+<p>In 1986 X3J13 was formed as a technical working group to
+produce a draft for an ANSI <span class="r">Common Lisp</span> standard. Because of the
+acceptance of <span class="r">Common Lisp</span>, the goals of this group differed from those of
+the original designers. These new goals included stricter
+standardization for portability, an object-oriented programming
+system, a condition system, iteration facilities, and a way to handle
+large character sets.  To accommodate those
+goals, a new language specification, this
+document, was developed.
+</p>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Scope-and-Purpose.html">Scope and Purpose</a>, Up: <a href="Scope.html">Scope, Purpose, and History</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Identity-of-Characters.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Identity of Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Identity of Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Identity of Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Concepts.html" rel="up" title="Character Concepts">
+<link href="Ordering-of-Characters.html" rel="next" title="Ordering of Characters">
+<link href="Character-Categories.html" rel="prev" title="Character Categories">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Identity-of-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Ordering-of-Characters.html" accesskey="n" rel="next">Ordering of Characters</a>, Previous: <a href="Character-Categories.html" accesskey="p" rel="prev">Character Categories</a>, Up: <a href="Character-Concepts.html" accesskey="u" rel="up">Character Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Identity-of-Characters-1"><span>13.1.5 Identity of Characters<a class="copiable-link" href="#Identity-of-Characters-1"> &para;</a></span></h4>
+
+<p>Two <i class="i">characters</i> that are <b class="b">eql</b>, <b class="b">char=</b>, or <b class="b">char-equal</b> 
+are not necessarily <b class="b">eq</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Implementation-Limits-on-Array-Rank.html
@@ -0,0 +1,45 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Implementation Limits on Array Rank (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Implementation Limits on Array Rank (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Implementation Limits on Array Rank (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Array-Elements.html" rel="up" title="Array Elements">
+<link href="Storage-Layout-for-Multidimensional-Arrays.html" rel="prev" title="Storage Layout for Multidimensional Arrays">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Implementation-Limits-on-Array-Rank">
+<div class="nav-panel">
+<p>
+Previous: <a href="Storage-Layout-for-Multidimensional-Arrays.html" accesskey="p" rel="prev">Storage Layout for Multidimensional Arrays</a>, Up: <a href="Array-Elements.html" accesskey="u" rel="up">Array Elements</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Implementation-Limits-on-Array-Rank-1"><span>15.1.1.9 Implementation Limits on Array Rank<a class="copiable-link" href="#Implementation-Limits-on-Array-Rank-1"> &para;</a></span></h4>
+
+<p>An <i class="i">implementation</i> may impose a limit on the <i class="i">rank</i> of an <i class="i">array</i>,
+but there is a minimum requirement on that limit.  See the <i class="i">variable</i> <b class="b">array-rank-limit</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Implementation-Limits-on-Individual-Array-Dimensions.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Implementation Limits on Individual Array Dimensions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Implementation Limits on Individual Array Dimensions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Implementation Limits on Individual Array Dimensions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Array-Elements.html" rel="up" title="Array Elements">
+<link href="Array-Rank.html" rel="next" title="Array Rank">
+<link href="Array-Dimensions.html" rel="prev" title="Array Dimensions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Implementation-Limits-on-Individual-Array-Dimensions">
+<div class="nav-panel">
+<p>
+Next: <a href="Array-Rank.html" accesskey="n" rel="next">Array Rank</a>, Previous: <a href="Array-Dimensions.html" accesskey="p" rel="prev">Array Dimensions</a>, Up: <a href="Array-Elements.html" accesskey="u" rel="up">Array Elements</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Implementation-Limits-on-Individual-Array-Dimensions-1"><span>15.1.1.3 Implementation Limits on Individual Array Dimensions<a class="copiable-link" href="#Implementation-Limits-on-Individual-Array-Dimensions-1"> &para;</a></span></h4>
+
+<p>An <i class="i">implementation</i> may impose a limit on <i class="i">dimensions</i> of an <i class="i">array</i>,
+but there is a minimum requirement on that limit.  See the <i class="i">variable</i> <b class="b">array-dimension-limit</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Implementation_002dDefined-Packages.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Implementation-Defined Packages (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Implementation-Defined Packages (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Implementation-Defined Packages (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standardized-Packages.html" rel="up" title="Standardized Packages">
+<link href="Notes-about-The-KEYWORD-Package.html" rel="prev" title="Notes about The KEYWORD Package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Implementation_002dDefined-Packages">
+<div class="nav-panel">
+<p>
+Previous: <a href="Notes-about-The-KEYWORD-Package.html" accesskey="p" rel="prev">Notes about The KEYWORD Package</a>, Up: <a href="Standardized-Packages.html" accesskey="u" rel="up">Standardized Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Implementation_002dDefined-Packages-1"><span>11.1.2.9 Implementation-Defined Packages<a class="copiable-link" href="#Implementation_002dDefined-Packages-1"> &para;</a></span></h4>
+
+<p>Other, <i class="i">implementation-defined</i> <i class="i">packages</i> might be present
+in the initial <span class="r">Common Lisp</span> environment.
+</p>
+<p>It is recommended, but not required, that the documentation for a
+<i class="i">conforming implementation</i> contain a full list of all <i class="i">package</i> names
+initially present in that <i class="i">implementation</i> but not specified in this specification.
+(See also the <i class="i">function</i> <b class="b">list-all-packages</b>.)
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Implementation_002dDependent-Numeric-Constants.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Implementation-Dependent Numeric Constants (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Implementation-Dependent Numeric Constants (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Implementation-Dependent Numeric Constants (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Number-Concepts.html" rel="up" title="Number Concepts">
+<link href="Rational-Computations.html" rel="next" title="Rational Computations">
+<link href="Numeric-Operations.html" rel="prev" title="Numeric Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Implementation_002dDependent-Numeric-Constants">
+<div class="nav-panel">
+<p>
+Next: <a href="Rational-Computations.html" accesskey="n" rel="next">Rational Computations</a>, Previous: <a href="Numeric-Operations.html" accesskey="p" rel="prev">Numeric Operations</a>, Up: <a href="Number-Concepts.html" accesskey="u" rel="up">Number Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Implementation_002dDependent-Numeric-Constants-1"><span>12.1.2 Implementation-Dependent Numeric Constants<a class="copiable-link" href="#Implementation_002dDependent-Numeric-Constants-1"> &para;</a></span></h4>
+
+<p>Figure 12&ndash;7 shows <i class="i">defined names</i> relating to
+<i class="i">implementation-dependent</i> details about <i class="i">numbers</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  double-float-epsilon           most-negative-fixnum           <!-- /@w -->
+  double-float-negative-epsilon  most-negative-long-float       <!-- /@w -->
+  least-negative-double-float    most-negative-short-float      <!-- /@w -->
+  least-negative-long-float      most-negative-single-float     <!-- /@w -->
+  least-negative-short-float     most-positive-double-float     <!-- /@w -->
+  least-negative-single-float    most-positive-fixnum           <!-- /@w -->
+  least-positive-double-float    most-positive-long-float       <!-- /@w -->
+  least-positive-long-float      most-positive-short-float      <!-- /@w -->
+  least-positive-short-float     most-positive-single-float     <!-- /@w -->
+  least-positive-single-float    short-float-epsilon            <!-- /@w -->
+  long-float-epsilon             short-float-negative-epsilon   <!-- /@w -->
+  long-float-negative-epsilon    single-float-epsilon           <!-- /@w -->
+  most-negative-double-float     single-float-negative-epsilon  <!-- /@w -->
+
+  Figure 12&ndash;7: Defined names relating to implementation-dependent details about numbers.<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Implications-of-Strings-Being-Arrays.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Implications of Strings Being Arrays (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Implications of Strings Being Arrays (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Implications of Strings Being Arrays (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="String-Concepts.html" rel="up" title="String Concepts">
+<link href="Subtypes-of-STRING.html" rel="next" title="Subtypes of STRING">
+<link href="String-Concepts.html" rel="prev" title="String Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Implications-of-Strings-Being-Arrays">
+<div class="nav-panel">
+<p>
+Next: <a href="Subtypes-of-STRING.html" accesskey="n" rel="next">Subtypes of STRING</a>, Previous: <a href="String-Concepts.html" accesskey="p" rel="prev">String Concepts</a>, Up: <a href="String-Concepts.html" accesskey="u" rel="up">String Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Implications-of-Strings-Being-Arrays-1"><span>16.1.1 Implications of Strings Being Arrays<a class="copiable-link" href="#Implications-of-Strings-Being-Arrays-1"> &para;</a></span></h4>
+
+<p>Since all <i class="i">strings</i> are <i class="i">arrays</i>, all rules which apply
+generally to <i class="i">arrays</i> also apply to <i class="i">strings</i>.
+See <a class="ref" href="Array-Concepts.html">Array Concepts</a>.
+</p>
+<p>For example,
+     <i class="i">strings</i> can have <i class="i">fill pointers</i>,
+ and <i class="i">strings</i> are also subject to the rules of <i class="i">element type</i> <i class="i">upgrading</i>
+        that apply to <i class="i">arrays</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Indirection-in-Modified-BNF-Syntax.html
@@ -0,0 +1,59 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Indirection in Modified BNF Syntax (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Indirection in Modified BNF Syntax (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Indirection in Modified BNF Syntax (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Notational-Conventions.html" rel="up" title="Notational Conventions">
+<link href="Additional-Uses-for-Indirect-Definitions-in-Modified-BNF-Syntax.html" rel="next" title="Additional Uses for Indirect Definitions in Modified BNF Syntax">
+<link href="Splicing-in-Modified-BNF-Syntax.html" rel="prev" title="Splicing in Modified BNF Syntax">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.center {text-align:center}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Indirection-in-Modified-BNF-Syntax">
+<div class="nav-panel">
+<p>
+Next: <a href="Additional-Uses-for-Indirect-Definitions-in-Modified-BNF-Syntax.html" accesskey="n" rel="next">Additional Uses for Indirect Definitions in Modified BNF Syntax</a>, Previous: <a href="Splicing-in-Modified-BNF-Syntax.html" accesskey="p" rel="prev">Splicing in Modified BNF Syntax</a>, Up: <a href="Notational-Conventions.html" accesskey="u" rel="up">Notational Conventions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Indirection-in-Modified-BNF-Syntax-1"><span>1.4.1.4 Indirection in Modified BNF Syntax<a class="copiable-link" href="#Indirection-in-Modified-BNF-Syntax-1"> &para;</a></span></h4>
+
+<p>An indirection extension is introduced in order to make this
+new syntax more readable:
+</p>
+<div class="center">!<i class="i">O</i>
+</div>
+<p>If <i class="i">O</i> is a non-terminal symbol, the right-hand side
+of its definition is substituted for the entire expression 
+!<i class="i">O</i>.  For example, the following BNF is equivalent to
+the BNF in the previous example:
+</p>
+<p><code class="t">(x [[!<i class="i">O</i>]] y)</code>
+</p>
+<p><i class="i">O</i>&nbsp;::=<code class="t">A</code>&nbsp;|&nbsp;<code class="t">B</code><span class="r">*</span>&nbsp;|&nbsp;<code class="t">C</code><!-- /@w -->
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Inheritance-of-Class-Options.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Inheritance of Class Options (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Inheritance of Class Options (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Inheritance of Class Options (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Inheritance.html" rel="up" title="Inheritance">
+<link href="Examples-of-Inheritance.html" rel="prev" title="Examples of Inheritance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Inheritance-of-Class-Options">
+<div class="nav-panel">
+<p>
+Previous: <a href="Examples-of-Inheritance.html" accesskey="p" rel="prev">Examples of Inheritance</a>, Up: <a href="Inheritance.html" accesskey="u" rel="up">Inheritance</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Inheritance-of-Class-Options-1"><span>4.3.4.2 Inheritance of Class Options<a class="copiable-link" href="#Inheritance-of-Class-Options-1"> &para;</a></span></h4>
+
+<p>The <code class="t">:default-initargs</code> class option is inherited.  The set of
+defaulted initialization arguments for a <i class="i">class</i> is the union of the
+sets of initialization arguments supplied in
+the <code class="t">:default-initargs</code> class options of the <i class="i">class</i> and its <i class="i">superclasses</i>.
+When more than one default initial value <i class="i">form</i> is supplied for a given
+initialization argument, the default initial value <i class="i">form</i> that is used
+is the one supplied by the <i class="i">class</i> that is most specific according to
+the <i class="i">class precedence list</i>.
+</p>
+<p>If a given <code class="t">:default-initargs</code> class option specifies an
+initialization argument of the same <i class="i">name</i> more than once, an
+error of <i class="i">type</i> <b class="b">program-error</b> is signaled.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Inheritance-of-Methods.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Inheritance of Methods (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Inheritance of Methods (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Inheritance of Methods (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Generic-Functions-and-Methods.html" rel="up" title="Generic Functions and Methods">
+<link href="Method-Selection-and-Combination.html" rel="prev" title="Method Selection and Combination">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Inheritance-of-Methods">
+<div class="nav-panel">
+<p>
+Previous: <a href="Method-Selection-and-Combination.html" accesskey="p" rel="prev">Method Selection and Combination</a>, Up: <a href="Generic-Functions-and-Methods.html" accesskey="u" rel="up">Generic Functions and Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Inheritance-of-Methods-1"><span>7.6.7 Inheritance of Methods<a class="copiable-link" href="#Inheritance-of-Methods-1"> &para;</a></span></h4>
+
+<p>A subclass inherits methods in the sense that any method applicable to
+all instances of a class is also applicable to all instances of any
+subclass of that class.
+</p>
+<p>The inheritance of methods acts the same way regardless of 
+which of the <i class="i">method-defining operators</i> created the methods.
+</p>
+<p>The inheritance of methods is described in detail in 
+<a class="ref" href="Method-Selection-and-Combination.html">Method Selection and Combination</a>.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Inheritance-of-Slots-and-Slot-Options.html
@@ -0,0 +1,170 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Inheritance of Slots and Slot Options (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Inheritance of Slots and Slot Options (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Inheritance of Slots and Slot Options (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Slots.html" rel="up" title="Slots">
+<link href="Accessing-Slots.html" rel="prev" title="Accessing Slots">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Inheritance-of-Slots-and-Slot-Options">
+<div class="nav-panel">
+<p>
+Previous: <a href="Accessing-Slots.html" accesskey="p" rel="prev">Accessing Slots</a>, Up: <a href="Slots.html" accesskey="u" rel="up">Slots</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Inheritance-of-Slots-and-Slot-Options-1"><span>7.5.3 Inheritance of Slots and Slot Options<a class="copiable-link" href="#Inheritance-of-Slots-and-Slot-Options-1"> &para;</a></span></h4>
+
+<p>The set of the <i class="i">names</i> of all <i class="i">slots</i> <i class="i">accessible</i> 
+in an <i class="i">instance</i> of a <i class="i">class</i> C is the union of 
+the sets of <i class="i">names</i> of <i class="i">slots</i> defined by C and its
+<i class="i">superclasses</i>. The structure of an <i class="i">instance</i> is
+the set of <i class="i">names</i> of <i class="i">local slots</i> in that <i class="i">instance</i>.
+</p>
+<p>In the simplest case, only one <i class="i">class</i> among C and its <i class="i">superclasses</i>
+defines a <i class="i">slot</i> with a given <i class="i">slot</i> name.  
+If a <i class="i">slot</i> is defined by a <i class="i">superclass</i> of C, 
+the <i class="i">slot</i> is said to be inherited.  The characteristics 
+of the <i class="i">slot</i> are determined by the <i class="i">slot specifier</i>
+of the defining <i class="i">class</i>.
+Consider the defining <i class="i">class</i> for
+a slot S.  If the value of the <code class="t">:allocation</code> 
+slot
+option is <code class="t">:instance</code>, then S is a <i class="i">local slot</i> and each 
+<i class="i">instance</i>
+of C has its own <i class="i">slot</i> named S that stores its own value.  If the
+value of the <code class="t">:allocation</code> slot 
+option is <code class="t">:class</code>, then S
+is a <i class="i">shared slot</i>, the <i class="i">class</i> 
+that defined S stores the value, and all
+<i class="i">instances</i> of C can <i class="i">access</i> that single <i class="i">slot</i>.  
+If the <code class="t">:allocation</code> slot option is omitted, <code class="t">:instance</code> is used.
+</p>
+<p>In general, more than one <i class="i">class</i> among C and its 
+<i class="i">superclasses</i> can
+define a <i class="i">slot</i> with a given <i class="i">name</i>.  
+In such cases, only one <i class="i">slot</i> with
+the given name is <i class="i">accessible</i> in an <i class="i">instance</i> 
+of C, and
+the characteristics of that <i class="i">slot</i> are 
+a combination of the several <i class="i">slot</i>
+specifiers, computed as follows:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>All the <i class="i">slot specifiers</i> for a given <i class="i">slot</i> name
+are ordered from most specific to least specific, according to the order in C&rsquo;s
+<i class="i">class precedence list</i> of the <i class="i">classes</i> that define them. All references
+to the specificity of <i class="i">slot specifiers</i> immediately below refers to this
+ordering.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The allocation of a <i class="i">slot</i> is controlled by the most 
+specific <i class="i">slot specifier</i>.  If the most specific <i class="i">slot specifier</i> 
+does not contain an <code class="t">:allocation</code> slot option, <code class="t">:instance</code> is used.
+Less specific <i class="i">slot specifiers</i> do not affect the allocation.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The default initial value form for a <i class="i">slot</i> 
+is the value of the <code class="t">:initform</code> slot option in the most specific
+<i class="i">slot specifier</i> that contains one.  If no <i class="i">slot specifier</i>
+contains an <code class="t">:initform</code> slot option, the <i class="i">slot</i> 
+has no default initial value form.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The contents of a <i class="i">slot</i> will always be of type 
+<code class="t">(and T_1 ... T_n)</code> where T_1 ... T_n are
+the values of the <code class="t">:type</code> slot options contained in all of the
+<i class="i">slot specifiers</i>.  If no <i class="i">slot specifier</i> contains the
+<code class="t">:type</code> slot option, the contents of the <i class="i">slot</i> will always be 
+of <i class="i">type</i> <b class="b">t</b>. The consequences of attempting to store in a <i class="i">slot</i>
+a value that does not satisfy the <i class="i">type</i> of the <i class="i">slot</i> are undefined.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The set of initialization arguments that initialize a 
+given <i class="i">slot</i> is the union of the initialization arguments declared in
+the <code class="t">:initarg</code> slot options in all the <i class="i">slot specifiers</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <i class="i">documentation string</i> for a <i class="i">slot</i> is the value of
+the <code class="t">:documentation</code> slot option in the most specific <i class="i">slot</i>
+specifier that contains one.  If no <i class="i">slot specifier</i> contains a
+<code class="t">:documentation</code> slot option, the <i class="i">slot</i> has no <i class="i">documentation string</i>.
+</p>
+</dd>
+</dl>
+
+<p>A consequence of the allocation rule is that a <i class="i">shared slot</i> can be
+<i class="i">shadowed</i>.  For example, if a class C_1 defines 
+a <i class="i">slot</i> named S
+whose value for the <code class="t">:allocation</code> slot option is <code class="t">:class</code>,
+that <i class="i">slot</i> is <i class="i">accessible</i> 
+in <i class="i">instances</i> of C_1 and all of its
+<i class="i">subclasses</i>.  However, if C_2 is a <i class="i">subclass</i> 
+of C_1 and also
+defines a <i class="i">slot</i> named S, C_1&rsquo;s 
+<i class="i">slot</i> is not shared
+by <i class="i">instances</i> of C_2 and its <i class="i">subclasses</i>. When a class
+C_1 defines a <i class="i">shared slot</i>, any subclass C_2 of C_1 will share this single <i class="i">slot</i> 
+unless the <b class="b">defclass</b> form for
+C_2 specifies a <i class="i">slot</i> of the same 
+<i class="i">name</i> or there is a <i class="i">superclass</i>
+of C_2 that precedes C_1 in the <i class="i">class precedence list</i> of
+C_2 that defines a <i class="i">slot</i> of the same name.
+</p>
+<p>A consequence of the type rule is that the value of a <i class="i">slot</i>
+satisfies the type constraint of each <i class="i">slot specifier</i> that
+contributes to that <i class="i">slot</i>.  Because the result of attempting to
+store in a <i class="i">slot</i> a value that does not satisfy the type
+constraint for the <i class="i">slot</i> is undefined, the value in a <i class="i">slot</i>
+might fail to satisfy its type constraint.
+</p>
+<p>The <code class="t">:reader</code>, <code class="t">:writer</code>, and <code class="t">:accessor</code> slot options
+create <i class="i">methods</i> rather than define the characteristics of a <i class="i">slot</i>.
+Reader and writer <i class="i">methods</i> are inherited in the sense described in
+<a class="ref" href="Inheritance-of-Methods.html">Inheritance of Methods</a>.
+</p>
+<p><i class="i">Methods</i> that <i class="i">access</i> <i class="i">slots</i> use only the name of the
+<i class="i">slot</i> and the <i class="i">type</i> of the <i class="i">slot</i>&rsquo;s value.  Suppose
+a <i class="i">superclass</i> provides a <i class="i">method</i> that expects to <i class="i">access</i> a
+<i class="i">shared slot</i> of a given <i class="i">name</i>, and a <i class="i">subclass</i> defines
+a <i class="i">local slot</i> with the same <i class="i">name</i>.  If the <i class="i">method</i> provided 
+by the <i class="i">superclass</i> is used on an <i class="i">instance</i> of the <i class="i">subclass</i>, 
+the <i class="i">method</i> <i class="i">accesses</i> the <i class="i">local slot</i>.
+</p>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Accessing-Slots.html">Accessing Slots</a>, Up: <a href="Slots.html">Slots</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Inheritance.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Inheritance (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Inheritance (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Inheritance (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Classes.html" rel="up" title="Classes">
+<link href="Determining-the-Class-Precedence-List.html" rel="next" title="Determining the Class Precedence List">
+<link href="Creating-Instances-of-Classes.html" rel="prev" title="Creating Instances of Classes">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Inheritance">
+<div class="nav-panel">
+<p>
+Next: <a href="Determining-the-Class-Precedence-List.html" accesskey="n" rel="next">Determining the Class Precedence List</a>, Previous: <a href="Creating-Instances-of-Classes.html" accesskey="p" rel="prev">Creating Instances of Classes</a>, Up: <a href="Classes.html" accesskey="u" rel="up">Classes</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Inheritance-1"><span>4.3.4 Inheritance<a class="copiable-link" href="#Inheritance-1"> &para;</a></span></h4>
+
+<p>A <i class="i">class</i> can inherit <i class="i">methods</i>, <i class="i">slots</i>, 
+and some <b class="b">defclass</b> options from its <i class="i">superclasses</i>.  
+Other sections describe the inheritance of <i class="i">methods</i>, 
+the inheritance of <i class="i">slots</i> and <i class="i">slot</i> options, 
+and the inheritance of <i class="i">class</i> options.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Examples-of-Inheritance.html" accesskey="1">Examples of Inheritance</a></li>
+<li><a href="Inheritance-of-Class-Options.html" accesskey="2">Inheritance of Class Options</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Initial-and-Final-Execution.html
@@ -0,0 +1,92 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Initial and Final Execution (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Initial and Final Execution (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Initial and Final Execution (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Miscellaneous-Clauses.html" rel="up" title="Miscellaneous Clauses">
+<link href="Examples-of-NAMED-clause.html" rel="prev" title="Examples of NAMED clause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Initial-and-Final-Execution">
+<div class="nav-panel">
+<p>
+Previous: <a href="Examples-of-NAMED-clause.html" accesskey="p" rel="prev">Examples of NAMED clause</a>, Up: <a href="Miscellaneous-Clauses.html" accesskey="u" rel="up">Miscellaneous Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Initial-and-Final-Execution-1"><span>6.1.7.3 Initial and Final Execution<a class="copiable-link" href="#Initial-and-Final-Execution-1"> &para;</a></span></h4>
+
+<p>The <code class="t">initially</code> and <code class="t">finally</code> constructs
+evaluate forms that occur before and after the loop body.
+</p>
+<p>The <code class="t">initially</code> construct causes the supplied
+<i class="i">compound-forms</i>
+to be evaluated
+in the loop prologue, which precedes all loop code except for 
+initial settings supplied by constructs <code class="t">with</code>, <code class="t">for</code>, or
+<code class="t">as</code>.
+  The code for any <code class="t">initially</code> clauses is 
+executed
+in the order in which the clauses appeared in
+  the <b class="b">loop</b>.  
+</p>
+<p>The <code class="t">finally</code> construct causes the supplied
+<i class="i">compound-forms</i>
+to be evaluated
+in the loop epilogue after normal iteration terminates.
+  The code for any <code class="t">finally</code> clauses is 
+executed
+ in the order in which the clauses appeared in
+  the <b class="b">loop</b>.  The collected code is executed once in the loop epilogue
+  before any implicit values are returned from the accumulation clauses.
+An explicit transfer of control (<i class="i">e.g.</i>, by <b class="b">return</b>, <b class="b">go</b>, or <b class="b">throw</b>)
+from the loop body, however, will exit the 
+  <b class="b">loop</b> without executing the epilogue code.
+</p>
+<p>Clauses such as <code class="t">return</code>, <code class="t">always</code>, <code class="t">never</code>, and 
+<code class="t">thereis</code>
+can bypass the <code class="t">finally</code> clause.
+</p>
+<p><b class="b">return</b> (or <b class="b">return-from</b>, if the <code class="t">named</code> option was supplied)
+</p>
+<p>can be used after <code class="t">finally</code> to return values from a <b class="b">loop</b>.  
+</p>
+<p>Such an <i class="i">explicit return</i>
+</p>
+<p>inside the
+<code class="t">finally</code> clause takes precedence over returning the accumulation
+from clauses supplied by such keywords as <code class="t">collect</code>, <code class="t">nconc</code>, 
+<code class="t">append</code>, <code class="t">sum</code>, <code class="t">count</code>, <code class="t">maximize</code>, and 
+<code class="t">minimize</code>; 
+the accumulation values for these preempted clauses are not returned by 
+<b class="b">loop</b> if <b class="b">return</b> or <b class="b">return-from</b> is used.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Examples-of-NAMED-clause.html">Examples of NAMED clause</a>, Up: <a href="Miscellaneous-Clauses.html">Miscellaneous Clauses</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Initialization-Arguments.html
@@ -0,0 +1,100 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Initialization Arguments (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Initialization Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Initialization Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Object-Creation-and-Initialization.html" rel="up" title="Object Creation and Initialization">
+<link href="Declaring-the-Validity-of-Initialization-Arguments.html" rel="next" title="Declaring the Validity of Initialization Arguments">
+<link href="Object-Creation-and-Initialization.html" rel="prev" title="Object Creation and Initialization">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Initialization-Arguments">
+<div class="nav-panel">
+<p>
+Next: <a href="Declaring-the-Validity-of-Initialization-Arguments.html" accesskey="n" rel="next">Declaring the Validity of Initialization Arguments</a>, Previous: <a href="Object-Creation-and-Initialization.html" accesskey="p" rel="prev">Object Creation and Initialization</a>, Up: <a href="Object-Creation-and-Initialization.html" accesskey="u" rel="up">Object Creation and Initialization</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Initialization-Arguments-1"><span>7.1.1 Initialization Arguments<a class="copiable-link" href="#Initialization-Arguments-1"> &para;</a></span></h4>
+
+<p>An initialization argument controls <i class="i">object</i> creation and
+initialization.  It is often convenient to use keyword <i class="i">symbols</i>
+to name initialization arguments, but the <i class="i">name</i> of an
+initialization argument can be any <i class="i">symbol</i>, including <b class="b">nil</b>.  An
+initialization argument can be used in two ways: to fill a <i class="i">slot</i>
+with a value or to provide an argument for an initialization
+<i class="i">method</i>.  A single initialization argument can be used for both
+purposes.
+</p>
+<p>An <i class="i">initialization argument list</i> is a
+<i class="i">property list</i> of
+initialization argument names and values.
+Its structure is identical
+to a <i class="i">property list</i> and also 
+to the portion of an argument list
+processed for <b class="b">&amp;key</b> parameters.
+As in those lists,
+if an initialization
+argument name appears more than once in an initialization argument list,
+the leftmost occurrence supplies the value and the remaining occurrences
+are ignored.  The arguments to <b class="b">make-instance</b> (after the first
+argument) form an <i class="i">initialization argument list</i>.
+</p>
+<p>An initialization argument can be associated with a <i class="i">slot</i>.  If
+the initialization argument has a value in the <i class="i">initialization
+argument list</i>, the value is stored into the <i class="i">slot</i> of the newly
+created <i class="i">object</i>, overriding any <code class="t">:initform</code> form associated
+with the <i class="i">slot</i>.  A single initialization argument can initialize
+more than one <i class="i">slot</i>.  An initialization argument that initializes
+a <i class="i">shared slot</i> stores its value into the <i class="i">shared slot</i>,
+replacing any previous value.
+</p>
+<p>An initialization argument can be associated with a <i class="i">method</i>.  When
+an <i class="i">object</i> is created and a particular initialization argument is
+supplied, the <i class="i">generic functions</i> <b class="b">initialize-instance</b>,
+<b class="b">shared-initialize</b>, and <b class="b">allocate-instance</b> are called
+with that initialization argument&rsquo;s name and value as a keyword argument
+pair.  If a value for the initialization argument is not supplied in the
+<i class="i">initialization argument list</i>, the <i class="i">method</i>&rsquo;s 
+<i class="i">lambda list</i> supplies a default value.
+</p>
+<p>Initialization arguments are used in four situations: when making an
+<i class="i">instance</i>, when re-initializing an <i class="i">instance</i>, when updating
+an <i class="i">instance</i> to conform to a redefined <i class="i">class</i>, and when
+updating an <i class="i">instance</i> to conform to the definition of a different
+<i class="i">class</i>.
+</p>
+<p>Because initialization arguments are used to control the creation and
+initialization of an <i class="i">instance</i> of some particular <i class="i">class</i>,
+we say that an initialization argument is
+&ldquo;an initialization argument for&rdquo; that <i class="i">class</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Declaring-the-Validity-of-Initialization-Arguments.html">Declaring the Validity of Initialization Arguments</a>, Previous: <a href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a>, Up: <a href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Initialize_002dInstance.html
@@ -0,0 +1,111 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Initialize-Instance (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Initialize-Instance (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Initialize-Instance (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Object-Creation-and-Initialization.html" rel="up" title="Object Creation and Initialization">
+<link href="Definitions-of-Make_002dInstance-and-Initialize_002dInstance.html" rel="next" title="Definitions of Make-Instance and Initialize-Instance">
+<link href="Shared_002dInitialize.html" rel="prev" title="Shared-Initialize">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Initialize_002dInstance">
+<div class="nav-panel">
+<p>
+Next: <a href="Definitions-of-Make_002dInstance-and-Initialize_002dInstance.html" accesskey="n" rel="next">Definitions of Make-Instance and Initialize-Instance</a>, Previous: <a href="Shared_002dInitialize.html" accesskey="p" rel="prev">Shared-Initialize</a>, Up: <a href="Object-Creation-and-Initialization.html" accesskey="u" rel="up">Object Creation and Initialization</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Initialize_002dInstance-1"><span>7.1.6 Initialize-Instance<a class="copiable-link" href="#Initialize_002dInstance-1"> &para;</a></span></h4>
+
+<p>The <i class="i">generic function</i> <b class="b">initialize-instance</b> is called by 
+<b class="b">make-instance</b> to initialize a newly created <i class="i">instance</i>.
+It uses <i class="i">standard method combination</i>.  <i class="i">Methods</i> for 
+<b class="b">initialize-instance</b> can be defined in order to perform any
+initialization that cannot be achieved 
+simply by supplying initial values for <i class="i">slots</i>.
+</p>
+<p>During initialization, <b class="b">initialize-instance</b> is invoked
+after the following actions have been taken:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The <i class="i">defaulted initialization argument list</i> 
+has been computed by combining the supplied <i class="i">initialization argument list</i> 
+with any default initialization arguments for the <i class="i">class</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The validity of the <i class="i">defaulted initialization argument list</i>
+has been checked.  If any of the initialization arguments has not
+been declared as valid, an error is signaled. 
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>A new <i class="i">instance</i> whose <i class="i">slots</i> 
+are unbound has been created.
+</p>
+</dd>
+</dl>
+
+<p>The generic function <b class="b">initialize-instance</b> is called with the
+new <i class="i">instance</i> and the defaulted initialization arguments.  There is
+a system-supplied primary <i class="i">method</i> for <b class="b">initialize-instance</b>
+whose <i class="i">parameter specializer</i> is the <i class="i">class</i> <b class="b">standard-object</b>.  This
+<i class="i">method</i> calls the generic function 
+<b class="b">shared-initialize</b> to fill in
+the <i class="i">slots</i> according to the initialization arguments and the 
+<code class="t">:initform</code> forms for the <i class="i">slots</i>; the generic function 
+<b class="b">shared-initialize</b> is called with the following arguments: the <i class="i">instance</i>,
+<b class="b">t</b>, and the defaulted initialization arguments.
+</p>
+<p>Note that <b class="b">initialize-instance</b> provides the 
+<i class="i">defaulted initialization argument list</i> in its call to <b class="b">shared-initialize</b>,
+so the first step performed by the system-supplied primary <i class="i">method</i> for
+<b class="b">shared-initialize</b> takes into account both the initialization
+arguments provided in the call to <b class="b">make-instance</b> and the
+<i class="i">defaulted initialization argument list</i>.
+</p>
+<p><i class="i">Methods</i> for <b class="b">initialize-instance</b> can be defined to specify
+actions to be taken when an <i class="i">instance</i> is initialized.  
+If only <i class="i">after methods</i> for <b class="b">initialize-instance</b> are defined, they will be
+run after the system-supplied primary <i class="i">method</i> for initialization and
+therefore will not interfere with the default behavior of 
+<b class="b">initialize-instance</b>.
+</p>
+<p>The object system provides two <i class="i">functions</i> that are useful in the bodies of 
+<b class="b">initialize-instance</b> methods.  The <i class="i">function</i> <b class="b">slot-boundp</b>
+returns a <i class="i">generic boolean</i> value that indicates whether a specified <i class="i">slot</i> has a
+value; this provides a mechanism for writing <i class="i">after methods</i> for
+<b class="b">initialize-instance</b> that initialize <i class="i">slots</i> only if they have
+not already been initialized.  The <i class="i">function</i> <b class="b">slot-makunbound</b>
+causes the <i class="i">slot</i> to have no value.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Definitions-of-Make_002dInstance-and-Initialize_002dInstance.html">Definitions of Make-Instance and Initialize-Instance</a>, Previous: <a href="Shared_002dInitialize.html">Shared-Initialize</a>, Up: <a href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Initializing-Newly-Added-Local-Slots-_0028Changing-the-Class-of-an-Instance_0029.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Initializing Newly Added Local Slots (Changing the Class of an Instance) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Initializing Newly Added Local Slots (Changing the Class of an Instance) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Initializing Newly Added Local Slots (Changing the Class of an Instance) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Changing-the-Class-of-an-Instance.html" rel="up" title="Changing the Class of an Instance">
+<link href="Customizing-the-Change-of-Class-of-an-Instance.html" rel="next" title="Customizing the Change of Class of an Instance">
+<link href="Modifying-the-Structure-of-the-Instance.html" rel="prev" title="Modifying the Structure of the Instance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Initializing-Newly-Added-Local-Slots-_0028Changing-the-Class-of-an-Instance_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="Customizing-the-Change-of-Class-of-an-Instance.html" accesskey="n" rel="next">Customizing the Change of Class of an Instance</a>, Previous: <a href="Modifying-the-Structure-of-the-Instance.html" accesskey="p" rel="prev">Modifying the Structure of the Instance</a>, Up: <a href="Changing-the-Class-of-an-Instance.html" accesskey="u" rel="up">Changing the Class of an Instance</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Initializing-Newly-Added-Local-Slots-1"><span>7.2.2 Initializing Newly Added Local Slots<a class="copiable-link" href="#Initializing-Newly-Added-Local-Slots-1"> &para;</a></span></h4>
+
+<p>The second step of the update initializes the newly added <i class="i">slots</i> and
+performs any other user-defined actions.  This step is implemented by
+the generic function <b class="b">update-instance-for-different-class</b>.  The
+generic function <b class="b">update-instance-for-different-class</b> is invoked
+by <b class="b">change-class</b> after the first step of the update has been
+completed.
+</p>
+<p>The generic function <b class="b">update-instance-for-different-class</b> is
+invoked on arguments computed by <b class="b">change-class</b>.
+The first argument passed is a copy of the <i class="i">instance</i> being updated 
+and is an <i class="i">instance</i> of the class C_{<span class="r">from</span>}; 
+this copy has <i class="i">dynamic extent</i> within the generic function <b class="b">change-class</b>.  
+The second argument is the <i class="i">instance</i> as updated so far by <b class="b">change-class</b>
+and is an <i class="i">instance</i> of the class C_{<span class="r">to</span>}.
+The remaining arguments are an <i class="i">initialization argument list</i>.
+</p>
+<p>There is a system-supplied primary <i class="i">method</i> for 
+<b class="b">update-instance-for-different-class</b> that has two parameter
+specializers, each of which is the <i class="i">class</i> <b class="b">standard-object</b>.  First
+this <i class="i">method</i> checks the validity of initialization arguments and
+signals an error if an initialization argument is supplied that is not
+declared as valid.  (For more information, see <a class="ref" href="Declaring-the-Validity-of-Initialization-Arguments.html">Declaring the Validity of Initialization Arguments</a>.)
+Then it calls the
+generic function <b class="b">shared-initialize</b> with the following arguments:
+the
+new
+<i class="i">instance</i>, a list of <i class="i">names</i> of the newly added 
+<i class="i">slots</i>, and the
+initialization arguments it received.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Initializing-Newly-Added-Local-Slots-_0028Redefining-Classes_0029.html
@@ -0,0 +1,83 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Initializing Newly Added Local Slots (Redefining Classes) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Initializing Newly Added Local Slots (Redefining Classes) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Initializing Newly Added Local Slots (Redefining Classes) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Redefining-Classes.html" rel="up" title="Redefining Classes">
+<link href="Customizing-Class-Redefinition.html" rel="next" title="Customizing Class Redefinition">
+<link href="Modifying-the-Structure-of-Instances.html" rel="prev" title="Modifying the Structure of Instances">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Initializing-Newly-Added-Local-Slots-_0028Redefining-Classes_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="Customizing-Class-Redefinition.html" accesskey="n" rel="next">Customizing Class Redefinition</a>, Previous: <a href="Modifying-the-Structure-of-Instances.html" accesskey="p" rel="prev">Modifying the Structure of Instances</a>, Up: <a href="Redefining-Classes.html" accesskey="u" rel="up">Redefining Classes</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Initializing-Newly-Added-Local-Slots"><span>4.3.6.2 Initializing Newly Added Local Slots<a class="copiable-link" href="#Initializing-Newly-Added-Local-Slots"> &para;</a></span></h4>
+
+<p>The second step initializes the newly added <i class="i">local slots</i> and performs
+any other user-defined actions.  This step is implemented by the generic
+function <b class="b">update-instance-for-redefined-class</b>, which is called after
+completion of the first step of modifying the structure of the
+<i class="i">instance</i>.
+</p>
+<p>The generic function <b class="b">update-instance-for-redefined-class</b> takes
+four required arguments: the <i class="i">instance</i> being updated after it has
+undergone the first step, a list of the names of <i class="i">local slots</i> that were
+added, a list of the names of <i class="i">local slots</i> that were discarded, and a
+property list containing the <i class="i">slot</i> names and values of 
+<i class="i">slots</i> that were
+discarded and had values.  Included among the discarded <i class="i">slots</i> are
+<i class="i">slots</i> that were local in the old <i class="i">class</i> and that are shared in the new
+<i class="i">class</i>.
+</p>
+<p>The generic function <b class="b">update-instance-for-redefined-class</b> also
+takes any number of initialization arguments.  When it is called by
+the system to update an <i class="i">instance</i> whose <i class="i">class</i> 
+has been redefined, no
+initialization arguments are provided.
+</p>
+<p>There is a system-supplied primary <i class="i">method</i> for 
+<b class="b">update-instance-for-redefined-class</b> whose <i class="i">parameter specializer</i>
+for its <i class="i">instance</i> argument is the <i class="i">class</i> <b class="b">standard-object</b>.  
+First this <i class="i">method</i> checks the validity of initialization arguments and signals an
+error if an initialization argument is supplied that is not declared
+as valid.  (For more information, see <a class="ref" href="Declaring-the-Validity-of-Initialization-Arguments.html">Declaring the Validity of Initialization Arguments</a>.)
+Then it calls the generic function
+<b class="b">shared-initialize</b> with the following arguments: the 
+<i class="i">instance</i>,
+the list of <i class="i">names</i> of 
+the newly added <i class="i">slots</i>, and the initialization
+arguments it received.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Customizing-Class-Redefinition.html">Customizing Class Redefinition</a>, Previous: <a href="Modifying-the-Structure-of-Instances.html">Modifying the Structure of Instances</a>, Up: <a href="Redefining-Classes.html">Redefining Classes</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Input.html
@@ -0,0 +1,106 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Input (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Input (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Input (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Streams.html" rel="up" title="Introduction to Streams">
+<link href="Open-and-Closed-Streams.html" rel="next" title="Open and Closed Streams">
+<link href="Abstract-Classifications-of-Streams-_0028Introduction-to-Streams_0029.html" rel="prev" title="Abstract Classifications of Streams (Introduction to Streams)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Input">
+<div class="nav-panel">
+<p>
+Next: <a href="Open-and-Closed-Streams.html" accesskey="n" rel="next">Open and Closed Streams</a>, Previous: <a href="Abstract-Classifications-of-Streams-_0028Introduction-to-Streams_0029.html" accesskey="p" rel="prev">Abstract Classifications of Streams</a>, Up: <a href="Introduction-to-Streams.html" accesskey="u" rel="up">Introduction to Streams</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Input_002c-Output_002c-and-Bidirectional-Streams"><span>21.1.1.2 Input, Output, and Bidirectional Streams<a class="copiable-link" href="#Input_002c-Output_002c-and-Bidirectional-Streams"> &para;</a></span></h4>
+
+<p>A <i class="i">stream</i>, whether a <i class="i">character</i> <i class="i">stream</i> or a <i class="i">binary</i> <i class="i">stream</i>,
+can be an <i class="i">input</i>
+<a class="index-entry-id" id="index-input"></a>
+ <i class="i">stream</i>
+<a class="index-entry-id" id="index-stream-4"></a>
+ (source of data),
+       an <i class="i">output</i>
+<a class="index-entry-id" id="index-output"></a>
+ <i class="i">stream</i>
+<a class="index-entry-id" id="index-stream-5"></a>
+ (sink for data),
+       both, 
+    or (<i class="i">e.g.</i>, when &ldquo;<code class="t">:direction :probe</code>&rdquo; is given to <b class="b">open</b>) neither.
+</p>
+<p>Figure 21&ndash;2 shows <i class="i">operators</i> relating to
+<i class="i">input</i> <i class="i">streams</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  clear-input  read-byte            read-from-string            <!-- /@w -->
+  listen       read-char            read-line                   <!-- /@w -->
+  peek-char    read-char-no-hang    read-preserving-whitespace  <!-- /@w -->
+  read         read-delimited-list  unread-char                 <!-- /@w -->
+
+        Figure 21&ndash;2: Operators relating to Input Streams.      <!-- /@w -->
+
+</pre></div></div>
+
+<p>Figure 21&ndash;3 shows <i class="i">operators</i> relating to
+<i class="i">output</i> <i class="i">streams</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  clear-output   prin1            write            <!-- /@w -->
+  finish-output  prin1-to-string  write-byte       <!-- /@w -->
+  force-output   princ            write-char       <!-- /@w -->
+  format         princ-to-string  write-line       <!-- /@w -->
+  fresh-line     print            write-string     <!-- /@w -->
+  pprint         terpri           write-to-string  <!-- /@w -->
+
+  Figure 21&ndash;3: Operators relating to Output Streams.<!-- /@w -->
+
+</pre></div></div>
+
+<p>A <i class="i">stream</i> that is both an <i class="i">input</i> <i class="i">stream</i> and an <i class="i">output</i> <i class="i">stream</i>
+is called a <i class="i">bidirectional</i>
+<a class="index-entry-id" id="index-bidirectional"></a>
+ <i class="i">stream</i>
+<a class="index-entry-id" id="index-stream-6"></a>
+.
+See the <i class="i">functions</i> <b class="b">input-stream-p</b> and <b class="b">output-stream-p</b>.
+</p>
+<p>Any of the <i class="i">operators</i> listed in <i class="i">Figure~21&ndash;2</i> or <i class="i">Figure~21&ndash;3</i>
+can be used with <i class="i">bidirectional</i> <i class="i">streams</i>.  In addition, Figure 21&ndash;4
+shows a list of <i class="i">operators</i> that relate specificaly to 
+<i class="i">bidirectional</i> <i class="i">streams</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  y-or-n-p  yes-or-no-p    <!-- /@w -->
+
+  Figure 21&ndash;4: Operators relating to Bidirectional Streams.<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Integrating-Types-and-Classes.html
@@ -0,0 +1,179 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Integrating Types and Classes (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Integrating Types and Classes (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Integrating Types and Classes (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Classes.html" rel="up" title="Classes">
+<link href="Redefining-Classes.html" rel="prev" title="Redefining Classes">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Integrating-Types-and-Classes">
+<div class="nav-panel">
+<p>
+Previous: <a href="Redefining-Classes.html" accesskey="p" rel="prev">Redefining Classes</a>, Up: <a href="Classes.html" accesskey="u" rel="up">Classes</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Integrating-Types-and-Classes-1"><span>4.3.7 Integrating Types and Classes<a class="copiable-link" href="#Integrating-Types-and-Classes-1"> &para;</a></span></h4>
+
+<p>The object system maps the space of <i class="i">classes</i> into the space of <i class="i">types</i>.
+Every <i class="i">class</i> that has a proper name has a corresponding <i class="i">type</i> 
+with the same <i class="i">name</i>.  
+</p>
+<p>The proper name of every <i class="i">class</i> is a valid <i class="i">type specifier</i>.  In
+addition, every <i class="i">class</i> <i class="i">object</i> is a valid <i class="i">type specifier</i>.  
+Thus the expression <code class="t">(typep <i class="i">object</i> <i class="i">class</i>)</code> evaluates to 
+<i class="i">true</i> if the <i class="i">class</i> of <i class="i">object</i> is <i class="i">class</i> itself or 
+a <i class="i">subclass</i> of <i class="i">class</i>.  The evaluation of the expression
+<code class="t">(subtypep class1 class2)</code> returns the values 
+<i class="i">true</i> and <i class="i">true</i> if <code class="t">class1</code> is a subclass of <code class="t">class2</code> or if they are the
+same <i class="i">class</i>; otherwise it returns the values 
+<i class="i">false</i> and <i class="i">true</i>.
+If  I is an <i class="i">instance</i> of some <i class="i">class</i> C named S 
+and C is an <i class="i">instance</i> of <b class="b">standard-class</b>, 
+the evaluation of the expression <code class="t">(type-of I\/)</code> returns S 
+if S is the <i class="i">proper name</i> of C; 
+otherwise, it returns C.
+</p>
+<p>Because the names of <i class="i">classes</i> 
+and <i class="i">class</i> <i class="i">objects</i> are <i class="i">type specifiers</i>, they may
+be used in the special form <b class="b">the</b> and in type declarations.
+</p>
+<p>Many but not all of the predefined <i class="i">type specifiers</i> have a
+corresponding <i class="i">class</i> with 
+the same proper name as the <i class="i">type</i>.  These type
+specifiers are listed in <i class="i">Figure~4&ndash;8</i>.
+For example, the <i class="i">type</i> <b class="b">array</b> has 
+a corresponding <i class="i">class</i> named <b class="b">array</b>.  
+No <i class="i">type specifier</i> that is a
+list, such as <code class="t">(vector double-float 100)</code>, has a corresponding <i class="i">class</i>.
+The <i class="i">operator</i> <b class="b">deftype</b> does not create any <i class="i">classes</i>.
+</p>
+<p>Each <i class="i">class</i> that corresponds to a predefined <i class="i">type specifier</i> can
+be implemented in one of three ways, at the discretion of each implementation.
+It can be a <i class="i">standard class</i>,
+a <i class="i">structure class</i>,
+</p>
+<p>or a <i class="i">system class</i>.
+</p>
+<p>A <i class="i">built-in class</i> is one whose <i class="i">generalized instances</i> have restricted capabilities 
+or special representations.  Attempting to use <b class="b">defclass</b> to define 
+<i class="i">subclasses</i> of a <b class="b">built-in-class</b> signals an error.
+Calling <b class="b">make-instance</b> to create a <i class="i">generalized instance</i> of a 
+<i class="i">built-in class</i> signals an error.  Calling <b class="b">slot-value</b> on a
+<i class="i">generalized instance</i> of a <i class="i">built-in class</i> signals an error.
+Redefining a <i class="i">built-in class</i> or using <b class="b">change-class</b> to change
+the <i class="i">class</i> of an <i class="i">object</i> to or from a <i class="i">built-in class</i> signals an error.
+However, <i class="i">built-in classes</i> can be used as <i class="i">parameter specializers</i> 
+in <i class="i">methods</i>.
+</p>
+<p>It is possible to determine whether a <i class="i">class</i> is a <i class="i">built-in class</i>
+by checking the <i class="i">metaclass</i>.
+A <i class="i">standard class</i>  is an <i class="i">instance</i> of the <i class="i">class</i> <b class="b">standard-class</b>,
+a <i class="i">built-in class</i>  is an <i class="i">instance</i> of the <i class="i">class</i> <b class="b">built-in-class</b>, and
+a <i class="i">structure class</i> is an <i class="i">instance</i> of the <i class="i">class</i> <b class="b">structure-class</b>.
+</p>
+<p>Each <i class="i">structure</i> <i class="i">type</i> created by <b class="b">defstruct</b> without 
+using the <code class="t">:type</code> option has a corresponding <i class="i">class</i>.  
+This <i class="i">class</i> is a <i class="i">generalized instance</i> of the <i class="i">class</i> <b class="b">structure-class</b>.  
+The <code class="t">:include</code> option of <b class="b">defstruct</b> creates a direct
+<i class="i">subclass</i> of the <i class="i">class</i> 
+that corresponds to the included <i class="i">structure</i> 
+<i class="i">type</i>.
+</p>
+<p>It is <i class="i">implementation-dependent</i> whether <i class="i">slots</i> are involved in the
+operation of <i class="i">functions</i> defined in this specification
+on <i class="i">instances</i> of <i class="i">classes</i> defined in this specification,
+except when <i class="i">slots</i> are explicitly defined by this specification.
+</p>
+<p>If in a particular <i class="i">implementation</i> a <i class="i">class</i> defined in this specification
+has <i class="i">slots</i> that are not defined by this specfication, the names of these <i class="i">slots</i>
+must not be <i class="i">external symbols</i> of <i class="i">packages</i> defined in this specification nor
+otherwise <i class="i">accessible</i> in the <code class="t">CL-USER</code> <i class="i">package</i>.
+</p>
+<p>The purpose of specifying that many of the standard <i class="i">type specifiers</i> have a
+corresponding <i class="i">class</i> is to enable users to write <i class="i">methods</i> that
+discriminate on these <i class="i">types</i>.  <i class="i">Method</i> selection requires that a 
+<i class="i">class precedence list</i> can be determined for each <i class="i">class</i>. 
+</p>
+<p>The hierarchical relationships among the <i class="i">type specifiers</i> are mirrored by
+relationships among the <i class="i">classes</i> corresponding to those <i class="i">types</i>.  
+</p>
+<p><i class="i">Figure~4&ndash;8</i> lists the set of <i class="i">classes</i> 
+that correspond to predefined <i class="i">type specifiers</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted"> arithmetic-error                 generic-function   simple-error              <!-- /@w -->
+ array                            hash-table         simple-type-error         <!-- /@w -->
+ bit-vector                       integer            simple-warning            <!-- /@w -->
+ broadcast-stream                 list               standard-class            <!-- /@w -->
+ built-in-class                   logical-pathname   standard-generic-function <!-- /@w -->
+ cell-error                       method             standard-method           <!-- /@w -->
+ character                        method-combination standard-object           <!-- /@w -->
+ class                            null               storage-condition         <!-- /@w -->
+ complex                          number             stream                    <!-- /@w -->
+ concatenated-stream              package            stream-error              <!-- /@w -->
+ condition                        package-error      string                    <!-- /@w -->
+ cons                             parse-error        string-stream             <!-- /@w -->
+ control-error                    pathname           structure-class           <!-- /@w -->
+ division-by-zero                 print-not-readable structure-object          <!-- /@w -->
+ echo-stream                      program-error      style-warning             <!-- /@w -->
+ end-of-file                      random-state       symbol                    <!-- /@w -->
+ error                            ratio              synonym-stream            <!-- /@w -->
+ file-error                       rational           t                         <!-- /@w -->
+ file-stream                      reader-error       two-way-stream            <!-- /@w -->
+ float                            readtable          type-error                <!-- /@w -->
+ floating-point-inexact           real               unbound-slot              <!-- /@w -->
+ floating-point-invalid-operation restart            unbound-variable          <!-- /@w -->
+ floating-point-overflow          sequence           undefined-function        <!-- /@w -->
+ floating-point-underflow         serious-condition  vector                    <!-- /@w -->
+ function                         simple-condition   warning                   <!-- /@w -->
+
+       Figure 4&ndash;8: Classes that correspond to pre-defined type specifiers      <!-- /@w -->
+
+</pre></div></div>
+
+<p>The <i class="i">class precedence list</i> information specified in the entries for
+each of these <i class="i">classes</i> are those that are required by the object system.
+</p>
+<p>Individual implementations may be extended to define other type
+specifiers to have a corresponding <i class="i">class</i>.  Individual implementations
+may be extended to add other <i class="i">subclass</i> relationships and to add other
+<i class="i">elements</i> to the <i class="i">class precedence lists</i> as long as
+they do not violate the type relationships and disjointness
+requirements specified by this standard.
+A standard <i class="i">class</i> defined with no direct <i class="i">superclasses</i> is guaranteed to
+be disjoint from all of the <i class="i">classes</i> in the table, except for the
+class named <b class="b">t</b>.
+</p>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Redefining-Classes.html">Redefining Classes</a>, Up: <a href="Classes.html">Classes</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Interactive-Streams.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Interactive Streams (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Interactive Streams (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Interactive Streams (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Streams.html" rel="up" title="Introduction to Streams">
+<link href="Abstract-Classifications-of-Streams.html" rel="next" title="Abstract Classifications of Streams">
+<link href="Open-and-Closed-Streams.html" rel="prev" title="Open and Closed Streams">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Interactive-Streams">
+<div class="nav-panel">
+<p>
+Next: <a href="Abstract-Classifications-of-Streams.html" accesskey="n" rel="next">Abstract Classifications of Streams</a>, Previous: <a href="Open-and-Closed-Streams.html" accesskey="p" rel="prev">Open and Closed Streams</a>, Up: <a href="Introduction-to-Streams.html" accesskey="u" rel="up">Introduction to Streams</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Interactive-Streams-1"><span>21.1.1.4 Interactive Streams<a class="copiable-link" href="#Interactive-Streams-1"> &para;</a></span></h4>
+
+<p>An <i class="i">interactive stream</i>
+<a class="index-entry-id" id="index-interactive-stream"></a>
+ is one on which it makes sense to perform
+interactive querying.
+</p>
+<p>The precise meaning of an <i class="i">interactive stream</i> is
+<i class="i">implementation-defined</i>, and may depend on the underlying
+operating system.  Some examples of the things that an
+<i class="i">implementation</i> might choose to use as identifying characteristics
+of an <i class="i">interactive stream</i> include:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The <i class="i">stream</i> is connected to a person (or equivalent) in such a way
+  that the program can prompt for information and expect to receive different
+  input depending on the prompt.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The program is expected to prompt for input and support &ldquo;normal input editing&rdquo;.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">read-char</b> might wait for the user to type something before returning
+  instead of immediately returning a character or end-of-file. 
+</p>
+</dd>
+</dl>
+
+<p>The general intent of having some <i class="i">streams</i> be classified as
+<i class="i">interactive streams</i> is to allow them to be distinguished from
+streams containing batch (or background or command-file) input.
+Output to batch streams is typically discarded or saved for later viewing, 
+so interactive queries to such streams might not have the expected effect.
+</p>
+<p><i class="i">Terminal I/O</i> might or might not be an <i class="i">interactive stream</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Interactive-Use-of-Restarts.html
@@ -0,0 +1,69 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Interactive Use of Restarts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Interactive Use of Restarts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Interactive Use of Restarts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Signaling-and-Handling-Conditions.html" rel="up" title="Signaling and Handling Conditions">
+<link href="Interfaces-to-Restarts.html" rel="next" title="Interfaces to Restarts">
+<link href="Restarts.html" rel="prev" title="Restarts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Interactive-Use-of-Restarts">
+<div class="nav-panel">
+<p>
+Next: <a href="Interfaces-to-Restarts.html" accesskey="n" rel="next">Interfaces to Restarts</a>, Previous: <a href="Restarts.html" accesskey="p" rel="prev">Restarts</a>, Up: <a href="Signaling-and-Handling-Conditions.html" accesskey="u" rel="up">Signaling and Handling Conditions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Interactive-Use-of-Restarts-1"><span>9.1.4.4 Interactive Use of Restarts<a class="copiable-link" href="#Interactive-Use-of-Restarts-1"> &para;</a></span></h4>
+
+<p>For interactive handling, two pieces of information are needed
+from a <i class="i">restart</i>: a report function and an interactive function.
+</p>
+<p>The report function
+is used by a program such as the debugger to
+present a description of the action the <i class="i">restart</i> will take.  
+The report function is specified and established by the 
+<code class="t">:report-function</code> keyword to
+<b class="b">restart-bind</b> or the 
+<code class="t">:report</code> keyword to <b class="b">restart-case</b>. 
+</p>
+<p>The interactive function, which can be specified using the 
+<code class="t">:interactive-function</code> keyword to 
+<b class="b">restart-bind</b> or <code class="t">:interactive</code> keyword
+to <b class="b">restart-case</b>, is used when the <i class="i">restart</i>
+is invoked
+interactively, such as from the debugger, to produce a suitable
+list of arguments. 
+</p>
+<p><b class="b">invoke-restart</b> invokes the most recently <i class="i">established</i>
+<i class="i">restart</i> whose
+name is the same as the first argument to <b class="b">invoke-restart</b>.
+If a <i class="i">restart</i> is invoked interactively by the debugger and  does
+not transfer control but rather returns values, the precise
+action of the debugger on those values is <i class="i">implementation-defined</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Interfaces-to-Restarts.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Interfaces to Restarts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Interfaces to Restarts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Interfaces to Restarts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Signaling-and-Handling-Conditions.html" rel="up" title="Signaling and Handling Conditions">
+<link href="Restart-Tests.html" rel="next" title="Restart Tests">
+<link href="Interactive-Use-of-Restarts.html" rel="prev" title="Interactive Use of Restarts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Interfaces-to-Restarts">
+<div class="nav-panel">
+<p>
+Next: <a href="Restart-Tests.html" accesskey="n" rel="next">Restart Tests</a>, Previous: <a href="Interactive-Use-of-Restarts.html" accesskey="p" rel="prev">Interactive Use of Restarts</a>, Up: <a href="Signaling-and-Handling-Conditions.html" accesskey="u" rel="up">Signaling and Handling Conditions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Interfaces-to-Restarts-1"><span>9.1.4.5 Interfaces to Restarts<a class="copiable-link" href="#Interfaces-to-Restarts-1"> &para;</a></span></h4>
+
+<p>Some <i class="i">restarts</i> have functional interfaces, 
+such as <b class="b">abort</b>, <b class="b">continue</b>, 
+<b class="b">muffle-warning</b>, <b class="b">store-value</b>, and 
+<b class="b">use-value</b>.
+They are ordinary functions that use 
+ <b class="b">find-restart</b> and <b class="b">invoke-restart</b> internally,
+that have the same name as the <i class="i">restarts</i> they manipulate,
+and that are provided simply for notational convenience.
+</p>
+<p>Figure 9&ndash;6 shows <i class="i">defined names</i> relating to
+<i class="i">restarts</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  abort             invoke-restart-interactively  store-value          <!-- /@w -->
+  compute-restarts  muffle-warning                use-value            <!-- /@w -->
+  continue          restart-bind                  with-simple-restart  <!-- /@w -->
+  find-restart      restart-case                                       <!-- /@w -->
+  invoke-restart    restart-name                                       <!-- /@w -->
+
+            Figure 9&ndash;6: Defined names relating to restarts.           <!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Internal-Time.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Internal Time (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Internal Time (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Internal Time (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Time.html" rel="up" title="Time">
+<link href="Seconds.html" rel="next" title="Seconds">
+<link href="Universal-Time.html" rel="prev" title="Universal Time">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Internal-Time">
+<div class="nav-panel">
+<p>
+Next: <a href="Seconds.html" accesskey="n" rel="next">Seconds</a>, Previous: <a href="Universal-Time.html" accesskey="p" rel="prev">Universal Time</a>, Up: <a href="Time.html" accesskey="u" rel="up">Time</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Internal-Time-1"><span>25.1.4.3 Internal Time<a class="copiable-link" href="#Internal-Time-1"> &para;</a></span></h4>
+
+<p><i class="i">Internal time</i>
+<a class="index-entry-id" id="index-internal-time"></a>
+ represents time as a single <i class="i">integer</i>,
+in terms of an <i class="i">implementation-dependent</i> unit called an <i class="i">internal time unit</i>.
+Relative time is measured as a number of these units.
+Absolute time is relative to an arbitrary time base.
+</p>
+<p>Figure 25&ndash;7 shows <i class="i">defined names</i> related to <i class="i">internal time</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  get-internal-real-time  internal-time-units-per-second  <!-- /@w -->
+  get-internal-run-time                                   <!-- /@w -->
+
+  Figure 25&ndash;7: Defined names involving time in Internal Time.<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Internal-and-External-Symbols.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Internal and External Symbols (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Internal and External Symbols (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Internal and External Symbols (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Packages.html" rel="up" title="Introduction to Packages">
+<link href="Package-Inheritance.html" rel="next" title="Package Inheritance">
+<link href="Symbols-in-a-Package.html" rel="prev" title="Symbols in a Package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Internal-and-External-Symbols">
+<div class="nav-panel">
+<p>
+Next: <a href="Package-Inheritance.html" accesskey="n" rel="next">Package Inheritance</a>, Previous: <a href="Symbols-in-a-Package.html" accesskey="p" rel="prev">Symbols in a Package</a>, Up: <a href="Introduction-to-Packages.html" accesskey="u" rel="up">Introduction to Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Internal-and-External-Symbols-1"><span>11.1.1.3 Internal and External Symbols<a class="copiable-link" href="#Internal-and-External-Symbols-1"> &para;</a></span></h4>
+
+<p>The mappings in a <i class="i">package</i> are divided into two classes, external and internal.
+The <i class="i">symbols</i> targeted by these different mappings 
+are called <i class="i">external symbols</i> and <i class="i">internal symbols</i>
+<a class="index-entry-id" id="index-internal-symbol"></a>
+ of the
+<i class="i">package</i>. Within a <i class="i">package</i>, a name refers to one
+<i class="i">symbol</i> or to none; if it does refer
+to a <i class="i">symbol</i>, then it is either external or internal in that
+<i class="i">package</i>, but not both.
+<i class="i">External symbols</i>
+<a class="index-entry-id" id="index-external-symbol"></a>
+</p>
+<p>are part of the package&rsquo;s public interface to other <i class="i">packages</i>.
+<i class="i">Symbols</i> become <i class="i">external symbols</i> of a given
+<i class="i">package</i> if they have been <i class="i">exported</i> from that <i class="i">package</i>.
+</p>
+<p>A <i class="i">symbol</i> has the same <i class="i">name</i> no matter what <i class="i">package</i> 
+it is <i class="i">present</i> in, but it might be an <i class="i">external symbol</i> of some <i class="i">packages</i>
+and an <i class="i">internal symbol</i> of others. 
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Interning-a-Symbol-in-the-KEYWORD-Package.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Interning a Symbol in the KEYWORD Package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Interning a Symbol in the KEYWORD Package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Interning a Symbol in the KEYWORD Package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standardized-Packages.html" rel="up" title="Standardized Packages">
+<link href="Notes-about-The-KEYWORD-Package.html" rel="next" title="Notes about The KEYWORD Package">
+<link href="The-KEYWORD-Package.html" rel="prev" title="The KEYWORD Package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Interning-a-Symbol-in-the-KEYWORD-Package">
+<div class="nav-panel">
+<p>
+Next: <a href="Notes-about-The-KEYWORD-Package.html" accesskey="n" rel="next">Notes about The KEYWORD Package</a>, Previous: <a href="The-KEYWORD-Package.html" accesskey="p" rel="prev">The KEYWORD Package</a>, Up: <a href="Standardized-Packages.html" accesskey="u" rel="up">Standardized Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Interning-a-Symbol-in-the-KEYWORD-Package-1"><span>11.1.2.7 Interning a Symbol in the KEYWORD Package<a class="copiable-link" href="#Interning-a-Symbol-in-the-KEYWORD-Package-1"> &para;</a></span></h4>
+
+<p>The <code class="t">KEYWORD</code> <i class="i">package</i> is treated differently than other <i class="i">packages</i>
+in that special actions are taken when a <i class="i">symbol</i> is <i class="i">interned</i> in it.
+In particular, when a <i class="i">symbol</i> is <i class="i">interned</i> in the <code class="t">KEYWORD</code> <i class="i">package</i>,
+ it is automatically made to be an <i class="i">external symbol</i> 
+and is automatically made to be a <i class="i">constant variable</i> with itself as a <i class="i">value</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Interpretation-of-Tokens.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Interpretation of Tokens (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Interpretation of Tokens (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Interpretation of Tokens (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Syntax.html" rel="up" title="Syntax">
+<link href="Standard-Macro-Characters.html" rel="next" title="Standard Macro Characters">
+<link href="Reader-Algorithm.html" rel="prev" title="Reader Algorithm">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Interpretation-of-Tokens">
+<div class="nav-panel">
+<p>
+Next: <a href="Standard-Macro-Characters.html" accesskey="n" rel="next">Standard Macro Characters</a>, Previous: <a href="Reader-Algorithm.html" accesskey="p" rel="prev">Reader Algorithm</a>, Up: <a href="Syntax.html" accesskey="u" rel="up">Syntax</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Interpretation-of-Tokens-1"><span>2.3 Interpretation of Tokens<a class="copiable-link" href="#Interpretation-of-Tokens-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Numbers-as-Tokens.html" accesskey="1">Numbers as Tokens</a></li>
+<li><a href="Constructing-Numbers-from-Tokens.html" accesskey="2">Constructing Numbers from Tokens</a></li>
+<li><a href="The-Consing-Dot.html" accesskey="3">The Consing Dot</a></li>
+<li><a href="Symbols-as-Tokens.html" accesskey="4">Symbols as Tokens</a></li>
+<li><a href="Valid-Patterns-for-Tokens.html" accesskey="5">Valid Patterns for Tokens</a></li>
+<li><a href="Package-System-Consistency-Rules.html" accesskey="6">Package System Consistency Rules</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Interpreting-Dictionary-Entries.html
@@ -0,0 +1,91 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Interpreting Dictionary Entries (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Interpreting Dictionary Entries (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Interpreting Dictionary Entries (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Definitions.html" rel="up" title="Definitions">
+<link href="Sections-Not-Formally-Part-Of-This-Standard.html" rel="prev" title="Sections Not Formally Part Of This Standard">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Interpreting-Dictionary-Entries">
+<div class="nav-panel">
+<p>
+Previous: <a href="Sections-Not-Formally-Part-Of-This-Standard.html" accesskey="p" rel="prev">Sections Not Formally Part Of This Standard</a>, Up: <a href="Definitions.html" accesskey="u" rel="up">Definitions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Interpreting-Dictionary-Entries-1"><span>1.4.4 Interpreting Dictionary Entries<a class="copiable-link" href="#Interpreting-Dictionary-Entries-1"> &para;</a></span></h4>
+
+<p>The dictionary entry for each <i class="i">defined name</i> is partitioned into
+sections.  Except as explicitly indicated otherwise below, each section
+is introduced by a label identifying that section.  The omission of a
+section implies that the section is either not applicable, or would
+provide no interesting information.
+</p>
+<p>This section defines the significance of each potential section in a
+dictionary entry.
+</p>
+
+<ul class="mini-toc">
+<li><a href="The-_0022Affected-By_0022-Section-of-a-Dictionary-Entry.html" accesskey="1">The &quot;Affected By&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Arguments_0022-Section-of-a-Dictionary-Entry.html" accesskey="2">The &quot;Arguments&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Arguments-and-Values_0022-Section-of-a-Dictionary-Entry.html" accesskey="3">The &quot;Arguments and Values&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Binding-Types-Affected_0022-Section-of-a-Dictionary-Entry.html" accesskey="4">The &quot;Binding Types Affected&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Class-Precedence-List_0022-Section-of-a-Dictionary-Entry.html" accesskey="5">The &quot;Class Precedence List&quot; Section of a Dictionary Entry</a></li>
+<li><a href="Dictionary-Entries-for-Type-Specifiers.html" accesskey="6">Dictionary Entries for Type Specifiers</a></li>
+<li><a href="The-_0022Compound-Type-Specifier-Kind_0022-Section-of-a-Dictionary-Entry.html" accesskey="7">The &quot;Compound Type Specifier Kind&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Compound-Type-Specifier-Syntax_0022-Section-of-a-Dictionary-Entry.html" accesskey="8">The &quot;Compound Type Specifier Syntax&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Compound-Type-Specifier-Arguments_0022-Section-of-a-Dictionary-Entry.html" accesskey="9">The &quot;Compound Type Specifier Arguments&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Compound-Type-Specifier-Description_0022-Section-of-a-Dictionary-Entry.html">The &quot;Compound Type Specifier Description&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Constant-Value_0022-Section-of-a-Dictionary-Entry.html">The &quot;Constant Value&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Description_0022-Section-of-a-Dictionary-Entry.html">The &quot;Description&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Examples_0022-Section-of-a-Dictionary-Entry.html">The &quot;Examples&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Exceptional-Situations_0022-Section-of-a-Dictionary-Entry.html">The &quot;Exceptional Situations&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Initial-Value_0022-Section-of-a-Dictionary-Entry.html">The &quot;Initial Value&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Argument-Precedence-Order_0022-Section-of-a-Dictionary-Entry.html">The &quot;Argument Precedence Order&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Method-Signature_0022-Section-of-a-Dictionary-Entry.html">The &quot;Method Signature&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Name_0022-Section-of-a-Dictionary-Entry.html">The &quot;Name&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Notes_0022-Section-of-a-Dictionary-Entry.html">The &quot;Notes&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Pronunciation_0022-Section-of-a-Dictionary-Entry.html">The &quot;Pronunciation&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022See-Also_0022-Section-of-a-Dictionary-Entry.html">The &quot;See Also&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Side-Effects_0022-Section-of-a-Dictionary-Entry.html">The &quot;Side Effects&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Supertypes_0022-Section-of-a-Dictionary-Entry.html">The &quot;Supertypes&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Syntax_0022-Section-of-a-Dictionary-Entry.html">The &quot;Syntax&quot; Section of a Dictionary Entry</a></li>
+<li><a href="Special-_0022Syntax_0022-Notations-for-Overloaded-Operators.html">Special &quot;Syntax&quot; Notations for Overloaded Operators</a></li>
+<li><a href="Naming-Conventions-for-Rest-Parameters.html">Naming Conventions for Rest Parameters</a></li>
+<li><a href="Requiring-Non_002dNull-Rest-Parameters-in-The-_0022Syntax_0022-Section.html">Requiring Non-Null Rest Parameters in The &quot;Syntax&quot; Section</a></li>
+<li><a href="Return-values-in-The-_0022Syntax_0022-Section.html">Return values in The &quot;Syntax&quot; Section</a></li>
+<li><a href="No-Arguments-or-Values-in-The-_0022Syntax_0022-Section.html">No Arguments or Values in The &quot;Syntax&quot; Section</a></li>
+<li><a href="Unconditional-Transfer-of-Control-in-The-_0022Syntax_0022-Section.html">Unconditional Transfer of Control in The &quot;Syntax&quot; Section</a></li>
+<li><a href="The-_0022Valid-Context_0022-Section-of-a-Dictionary-Entry.html">The &quot;Valid Context&quot; Section of a Dictionary Entry</a></li>
+<li><a href="The-_0022Value-Type_0022-Section-of-a-Dictionary-Entry.html">The &quot;Value Type&quot; Section of a Dictionary Entry</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Sections-Not-Formally-Part-Of-This-Standard.html">Sections Not Formally Part Of This Standard</a>, Up: <a href="Definitions.html">Definitions</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Interpreting-Pathname-Component-Values.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Interpreting Pathname Component Values (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Interpreting Pathname Component Values (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Interpreting Pathname Component Values (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Pathnames.html" rel="up" title="Pathnames">
+<link href="Merging-Pathnames.html" rel="next" title="Merging Pathnames">
+<link href="Pathname-Components.html" rel="prev" title="Pathname Components">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Interpreting-Pathname-Component-Values">
+<div class="nav-panel">
+<p>
+Next: <a href="Merging-Pathnames.html" accesskey="n" rel="next">Merging Pathnames</a>, Previous: <a href="Pathname-Components.html" accesskey="p" rel="prev">Pathname Components</a>, Up: <a href="Pathnames.html" accesskey="u" rel="up">Pathnames</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Interpreting-Pathname-Component-Values-1"><span>19.2.2 Interpreting Pathname Component Values<a class="copiable-link" href="#Interpreting-Pathname-Component-Values-1"> &para;</a></span></h4>
+
+
+<ul class="mini-toc">
+<li><a href="Strings-in-Component-Values.html" accesskey="1">Strings in Component Values</a></li>
+<li><a href="Special-Characters-in-Pathname-Components.html" accesskey="2">Special Characters in Pathname Components</a></li>
+<li><a href="Case-in-Pathname-Components.html" accesskey="3">Case in Pathname Components</a></li>
+<li><a href="Local-Case-in-Pathname-Components.html" accesskey="4">Local Case in Pathname Components</a></li>
+<li><a href="Common-Case-in-Pathname-Components.html" accesskey="5">Common Case in Pathname Components</a></li>
+<li><a href="Special-Pathname-Component-Values.html" accesskey="6">Special Pathname Component Values</a></li>
+<li><a href="NIL-as-a-Component-Value.html" accesskey="7">NIL as a Component Value</a></li>
+<li><a href="_002d_003eWILD-as-a-Component-Value.html" accesskey="8">:WILD as a Component Value</a></li>
+<li><a href="_002d_003eUNSPECIFIC-as-a-Component-Value.html" accesskey="9">:UNSPECIFIC as a Component Value</a></li>
+<li><a href="Relation-between-component-values-NIL-and-_002d_003eUNSPECIFIC.html">Relation between component values NIL and :UNSPECIFIC</a></li>
+<li><a href="Restrictions-on-Wildcard-Pathnames.html">Restrictions on Wildcard Pathnames</a></li>
+<li><a href="Restrictions-on-Examining-Pathname-Components.html">Restrictions on Examining Pathname Components</a></li>
+<li><a href="Restrictions-on-Examining-a-Pathname-Host-Component.html">Restrictions on Examining a Pathname Host Component</a></li>
+<li><a href="Restrictions-on-Examining-a-Pathname-Device-Component.html">Restrictions on Examining a Pathname Device Component</a></li>
+<li><a href="Restrictions-on-Examining-a-Pathname-Directory-Component.html">Restrictions on Examining a Pathname Directory Component</a></li>
+<li><a href="Directory-Components-in-Non_002dHierarchical-File-Systems.html">Directory Components in Non-Hierarchical File Systems</a></li>
+<li><a href="Restrictions-on-Examining-a-Pathname-Name-Component.html">Restrictions on Examining a Pathname Name Component</a></li>
+<li><a href="Restrictions-on-Examining-a-Pathname-Type-Component.html">Restrictions on Examining a Pathname Type Component</a></li>
+<li><a href="Restrictions-on-Examining-a-Pathname-Version-Component.html">Restrictions on Examining a Pathname Version Component</a></li>
+<li><a href="Notes-about-the-Pathname-Version-Component.html">Notes about the Pathname Version Component</a></li>
+<li><a href="Restrictions-on-Constructing-Pathnames.html">Restrictions on Constructing Pathnames</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Interval-Designators.html
@@ -0,0 +1,97 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Interval Designators (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Interval Designators (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Interval Designators (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Number-Concepts.html" rel="up" title="Number Concepts">
+<link href="Random_002dState-Operations.html" rel="next" title="Random-State Operations">
+<link href="Complex-Computations.html" rel="prev" title="Complex Computations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Interval-Designators">
+<div class="nav-panel">
+<p>
+Next: <a href="Random_002dState-Operations.html" accesskey="n" rel="next">Random-State Operations</a>, Previous: <a href="Complex-Computations.html" accesskey="p" rel="prev">Complex Computations</a>, Up: <a href="Number-Concepts.html" accesskey="u" rel="up">Number Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Interval-Designators-1"><span>12.1.6 Interval Designators<a class="copiable-link" href="#Interval-Designators-1"> &para;</a></span></h4>
+
+<p>The <i class="i">compound type specifier</i> form of the numeric <i class="i">type specifiers</i>
+in Figure 12&ndash;10 permit the user to specify an interval on the real number line
+which describe a <i class="i">subtype</i> of the <i class="i">type</i> which would be described by the
+corresponding <i class="i">atomic type specifier</i>.  A <i class="i">subtype</i> of some <i class="i">type</i>
+<i class="i">T</i> is specified using an ordered pair of <i class="i">objects</i> called
+<i class="i">interval designators</i> for <i class="i">type</i> <i class="i">T</i>.
+</p>
+<p>The first of the two <i class="i">interval designators</i> for <i class="i">type</i> <i class="i">T</i> can be
+any of the following:
+</p>
+<dl class="table">
+<dt>a number <i class="i">N</i> of <i class="i">type</i> <i class="i">T</i></dt>
+<dd><p>This denotes a lower inclusive bound of <i class="i">N</i>.  That is, <i class="i">elements</i>
+of the <i class="i">subtype</i> of <i class="i">T</i> will be greater than or equal to <i class="i">N</i>.
+</p>
+</dd>
+<dt>a <i class="i">singleton</i> <i class="i">list</i> whose <i class="i">element</i> is</dt>
+<dd><p>a number <i class="i">M</i> of <i class="i">type</i> <i class="i">T</i>  
+This denotes a lower exclusive bound of <i class="i">M</i>.  That is, <i class="i">elements</i>
+of the <i class="i">subtype</i> of <i class="i">T</i> will be greater than <i class="i">M</i>.
+</p>
+</dd>
+<dt>the symbol <b class="b">*</b></dt>
+<dd><p>This denotes the absence of a lower bound on the interval.
+</p>
+</dd>
+</dl>
+
+<p>The second of the two <i class="i">interval designators</i> for <i class="i">type</i> <i class="i">T</i> can be
+any of the following:
+</p>
+<dl class="table">
+<dt>a number <i class="i">N</i> of <i class="i">type</i> <i class="i">T</i></dt>
+<dd><p>This denotes an upper inclusive bound of <i class="i">N</i>.  That is, <i class="i">elements</i>
+of the <i class="i">subtype</i> of <i class="i">T</i> will be less than or equal to <i class="i">N</i>.
+</p>
+</dd>
+<dt>a <i class="i">singleton</i> <i class="i">list</i> whose <i class="i">element</i> is</dt>
+<dd><p>a number <i class="i">M</i> of <i class="i">type</i> <i class="i">T</i>  
+This denotes an upper exclusive bound of <i class="i">M</i>.  That is, <i class="i">elements</i>
+of the <i class="i">subtype</i> of <i class="i">T</i> will be less than <i class="i">M</i>.
+</p>
+</dd>
+<dt>the symbol <b class="b">*</b></dt>
+<dd><p>This denotes the absence of an upper bound on the interval.
+</p>
+</dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Random_002dState-Operations.html">Random-State Operations</a>, Previous: <a href="Complex-Computations.html">Complex Computations</a>, Up: <a href="Number-Concepts.html">Number Concepts</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Introduction-_0028Introduction_0029.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Introduction (Introduction) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Introduction (Introduction) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Introduction (Introduction) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Syntax.html" rel="next" title="Syntax">
+<link href="index.html" rel="prev" title="Top">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Introduction-_0028Introduction_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="Syntax.html" accesskey="n" rel="next">Syntax</a>, Previous: <a href="index.html" accesskey="p" rel="prev">Top</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Introduction"><span>1 Introduction<a class="copiable-link" href="#Introduction"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Scope.html" accesskey="1">Scope, Purpose, and History</a></li>
+<li><a href="Organization-of-the-Document.html" accesskey="2">Organization of the Document</a></li>
+<li><a href="Referenced-Publications.html" accesskey="3">Referenced Publications</a></li>
+<li><a href="Definitions.html" accesskey="4">Definitions</a></li>
+<li><a href="Conformance.html" accesskey="5">Conformance</a></li>
+<li><a href="Language-Extensions.html" accesskey="6">Language Extensions</a></li>
+<li><a href="Language-Subsets.html" accesskey="7">Language Subsets</a></li>
+<li><a href="Deprecated-Language-Features.html" accesskey="8">Deprecated Language Features</a></li>
+<li><a href="Symbols-in-the-COMMON_002dLISP-Package.html" accesskey="9">Symbols in the COMMON-LISP Package</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Introduction-_0028Types-and-Classes_0029.html
@@ -0,0 +1,102 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Introduction (Types and Classes) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Introduction (Types and Classes) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Introduction (Types and Classes) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes.html" rel="up" title="Types and Classes">
+<link href="Types.html" rel="next" title="Types">
+<link href="Types-and-Classes.html" rel="prev" title="Types and Classes">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Introduction-_0028Types-and-Classes_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="Types.html" accesskey="n" rel="next">Types</a>, Previous: <a href="Types-and-Classes.html" accesskey="p" rel="prev">Types and Classes</a>, Up: <a href="Types-and-Classes.html" accesskey="u" rel="up">Types and Classes</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Introduction-1"><span>4.1 Introduction<a class="copiable-link" href="#Introduction-1"> &para;</a></span></h3>
+
+
+<p>A <i class="i">type</i> is a (possibly infinite) set of <i class="i">objects</i>.
+An <i class="i">object</i> can belong to more than one <i class="i">type</i>.  
+<i class="i">Types</i> are never explicitly represented as <i class="i">objects</i> by <span class="r">Common Lisp</span>.
+Instead, they are referred to indirectly by the use of <i class="i">type specifiers</i>,
+which are <i class="i">objects</i> that denote <i class="i">types</i>.
+</p>
+<p>New <i class="i">types</i> can be defined using <b class="b">deftype</b>, <b class="b">defstruct</b>, 
+<b class="b">defclass</b>, and <b class="b">define-condition</b>.
+</p>
+<p>The <i class="i">function</i> <b class="b">typep</b>, a set membership test, is used to determine
+whether a given <i class="i">object</i> is of a given <i class="i">type</i>.  The function
+<b class="b">subtypep</b>, a subset test, is used to determine whether a
+given <i class="i">type</i> is a <i class="i">subtype</i> of another given <i class="i">type</i>.  The
+function <b class="b">type-of</b> returns a particular <i class="i">type</i> to
+which a given <i class="i">object</i> belongs, even though that <i class="i">object</i>
+must belong to one or more other <i class="i">types</i> as well.
+(For example, every <i class="i">object</i> is of <i class="i">type</i> <b class="b">t</b>, 
+ but <b class="b">type-of</b> always returns a <i class="i">type specifier</i>
+ for a <i class="i">type</i> more specific than <b class="b">t</b>.)
+</p>
+<p><i class="i">Objects</i>, not <i class="i">variables</i>, have <i class="i">types</i>.
+Normally, any <i class="i">variable</i> can have any <i class="i">object</i> as its <i class="i">value</i>.
+It is possible to declare that a <i class="i">variable</i> takes on only 
+values of a given <i class="i">type</i> by making an explicit <i class="i">type declaration</i>.
+<i class="i">Types</i> are arranged in a directed acyclic graph, except
+for the presence of equivalences. 
+</p>
+<p><i class="i">Declarations</i> can be made about <i class="i">types</i> using <b class="b">declare</b>, 
+<b class="b">proclaim</b>, <b class="b">declaim</b>, or <b class="b">the</b>.
+For more information about <i class="i">declarations</i>,
+see <a class="ref" href="Declarations.html">Declarations</a>.
+</p>
+<p>Among the fundamental <i class="i">objects</i> of the object system are <i class="i">classes</i>.
+A <i class="i">class</i> determines the structure and behavior of a set of
+other <i class="i">objects</i>, which are called its <i class="i">instances</i>. 
+Every <i class="i">object</i> is a <i class="i">direct instance</i> of a <i class="i">class</i>.
+The <i class="i">class</i> of an <i class="i">object</i> determines the set of
+operations that can be performed on the <i class="i">object</i>.
+For more information, see <a class="ref" href="Classes.html">Classes</a>.
+</p>
+<p>It is possible to write <i class="i">functions</i> that have behavior <i class="i">specialized</i>
+to the class of the <i class="i">objects</i> which are their <i class="i">arguments</i>.
+For more information, see <a class="ref" href="Generic-Functions-and-Methods.html">Generic Functions and Methods</a>.
+</p>
+<p>The <i class="i">class</i> of the <i class="i">class</i> of an <i class="i">object</i> 
+is called its <i class="i">metaclass</i>
+<a class="index-entry-id" id="index-metaclass"></a>
+.
+For more information about <i class="i">metaclasses</i>,
+see <a class="ref" href="Meta_002dObjects.html">Meta-Objects</a>.
+</p>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Types.html">Types</a>, Previous: <a href="Types-and-Classes.html">Types and Classes</a>, Up: <a href="Types-and-Classes.html">Types and Classes</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Introduction-to-Characters.html
@@ -0,0 +1,86 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Introduction to Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Introduction to Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Introduction to Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Concepts.html" rel="up" title="Character Concepts">
+<link href="Introduction-to-Scripts-and-Repertoires.html" rel="next" title="Introduction to Scripts and Repertoires">
+<link href="Character-Concepts.html" rel="prev" title="Character Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Introduction-to-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Introduction-to-Scripts-and-Repertoires.html" accesskey="n" rel="next">Introduction to Scripts and Repertoires</a>, Previous: <a href="Character-Concepts.html" accesskey="p" rel="prev">Character Concepts</a>, Up: <a href="Character-Concepts.html" accesskey="u" rel="up">Character Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Introduction-to-Characters-1"><span>13.1.1 Introduction to Characters<a class="copiable-link" href="#Introduction-to-Characters-1"> &para;</a></span></h4>
+
+<p>A <i class="i">character</i>
+<a class="index-entry-id" id="index-character"></a>
+ is an <i class="i">object</i> that represents a unitary token 
+(<i class="i">e.g.</i>, a letter, a special symbol, or a &ldquo;control character&rdquo;)
+in an aggregate quantity of text
+(<i class="i">e.g.</i>, a <i class="i">string</i> or a text <i class="i">stream</i>).
+</p>
+<p><span class="r">Common Lisp</span> allows an implementation to provide support 
+for international language <i class="i">characters</i> as well
+as <i class="i">characters</i> used in specialized arenas (<i class="i">e.g.</i>, mathematics).
+</p>
+<p>The following figures contain lists of <i class="i">defined names</i> applicable to 
+<i class="i">characters</i>.
+</p>
+<p>Figure 13&ndash;1 lists some <i class="i">defined names</i> relating to 
+<i class="i">character</i> <i class="i">attributes</i> and <i class="i">character</i> <i class="i">predicates</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  alpha-char-p     char-not-equal     char&gt;            <!-- /@w -->
+  alphanumericp    char-not-greaterp  char&gt;=           <!-- /@w -->
+  both-case-p      char-not-lessp     digit-char-p     <!-- /@w -->
+  char-code-limit  char/=             graphic-char-p   <!-- /@w -->
+  char-equal       char&lt;              lower-case-p     <!-- /@w -->
+  char-greaterp    char&lt;=             standard-char-p  <!-- /@w -->
+  char-lessp       char=              upper-case-p     <!-- /@w -->
+
+       Figure 13&ndash;1: Character defined names &ndash; 1      <!-- /@w -->
+
+</pre></div></div>
+
+<p>Figure 13&ndash;2 lists some <i class="i">character</i> construction and conversion <i class="i">defined names</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  char-code      char-name    code-char   <!-- /@w -->
+  char-downcase  char-upcase  digit-char  <!-- /@w -->
+  char-int       character    name-char   <!-- /@w -->
+
+  Figure 13&ndash;2: Character defined names &ndash; 2<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Introduction-to-Classes.html
@@ -0,0 +1,169 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Introduction to Classes (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Introduction to Classes (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Introduction to Classes (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Classes.html" rel="up" title="Classes">
+<link href="Defining-Classes.html" rel="next" title="Defining Classes">
+<link href="Classes.html" rel="prev" title="Classes">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Introduction-to-Classes">
+<div class="nav-panel">
+<p>
+Next: <a href="Defining-Classes.html" accesskey="n" rel="next">Defining Classes</a>, Previous: <a href="Classes.html" accesskey="p" rel="prev">Classes</a>, Up: <a href="Classes.html" accesskey="u" rel="up">Classes</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Introduction-to-Classes-1"><span>4.3.1 Introduction to Classes<a class="copiable-link" href="#Introduction-to-Classes-1"> &para;</a></span></h4>
+
+<p>A <i class="i">class</i>
+<a class="index-entry-id" id="index-class"></a>
+ is an <i class="i">object</i> that determines the structure and behavior 
+of a set of other <i class="i">objects</i>, which are called its <i class="i">instances</i>
+<a class="index-entry-id" id="index-instance"></a>
+.   
+</p>
+<p>A <i class="i">class</i> can inherit structure and behavior from other <i class="i">classes</i>.
+A <i class="i">class</i> whose definition refers to other <i class="i">classes</i> for the purpose 
+of inheriting from them is said to be a <i class="i">subclass</i> of each of
+those <i class="i">classes</i>. The <i class="i">classes</i> that are designated for purposes of
+inheritance are said to be <i class="i">superclasses</i> of the inheriting <i class="i">class</i>.
+</p>
+<p>A <i class="i">class</i> can have a <i class="i">name</i>. The <i class="i">function</i> <b class="b">class-name</b> 
+takes a <i class="i">class</i> <i class="i">object</i> and returns its <i class="i">name</i>. 
+The <i class="i">name</i> of an anonymous <i class="i">class</i> is <b class="b">nil</b>.  A <i class="i">symbol</i> 
+can <i class="i">name</i> a <i class="i">class</i>. The <i class="i">function</i> <b class="b">find-class</b> takes a
+<i class="i">symbol</i> and returns the <i class="i">class</i> that the <i class="i">symbol</i> names.
+A <i class="i">class</i> has a <i class="i">proper name</i> if the <i class="i">name</i> is a <i class="i">symbol</i>
+and if the <i class="i">name</i> of the <i class="i">class</i> names that <i class="i">class</i>.
+That is, a <i class="i">class</i>~C has the <i class="i">proper name</i>~S if S=
+<code class="t">(class-name C)</code> and C= <code class="t">(find-class S)</code>.
+Notice that it is possible for 
+<code class="t">(find-class S_1)</code> = <code class="t">(find-class S_2)</code>
+and S_1!= S_2.
+If C= <code class="t">(find-class S)</code>, we say that C is the <i class="i">class</i> <i class="i">named</i> S.
+</p>
+<p>A <i class="i">class</i> C_1 is 
+a <i class="i">direct superclass</i>
+<a class="index-entry-id" id="index-direct-superclass"></a>
+ of a <i class="i">class</i> C_2
+if C_2 explicitly designates C_1 
+as a <i class="i">superclass</i> in its definition.
+In this case C_2 is a <i class="i">direct subclass</i>
+<a class="index-entry-id" id="index-direct-subclass"></a>
+ of C_1.
+A <i class="i">class</i> C_n is a <i class="i">superclass</i>
+<a class="index-entry-id" id="index-superclass"></a>
+ of 
+a <i class="i">class</i> C_1 if there exists a series of
+<i class="i">classes</i> C_2,...,C_{n-1} such that 
+C_{i+1} is a <i class="i">direct superclass</i> of C_i for 1 &lt;= i&lt;n.
+In this case, C_1 is a <i class="i">subclass</i>
+<a class="index-entry-id" id="index-subclass"></a>
+ of C_n.
+A <i class="i">class</i> is considered neither a <i class="i">superclass</i> nor a <i class="i">subclass</i> of itself.
+That is, if C_1 is a <i class="i">superclass</i> of C_2, 
+then C_1 != C_2.
+The set of <i class="i">classes</i> consisting of some given <i class="i">class</i> C 
+along with all of its <i class="i">superclasses</i> is called &ldquo;C and its superclasses.&rdquo;
+</p>
+<p>Each <i class="i">class</i> has a <i class="i">class precedence list</i>
+<a class="index-entry-id" id="index-class-precedence-list"></a>
+,
+which is a total ordering on the set of the given <i class="i">class</i> and its <i class="i">superclasses</i>.
+The total ordering is expressed as a list ordered from most specific to least specific.
+The <i class="i">class precedence list</i> is used in several ways.  In general, more
+specific <i class="i">classes</i> can <i class="i">shadow</i>
+<a class="index-entry-id" id="index-shadow-1"></a>
+_1 features that would
+otherwise be inherited from less specific <i class="i">classes</i>.
+The <i class="i">method</i> selection and combination process uses 
+the <i class="i">class precedence list</i> to order <i class="i">methods</i> 
+from most specific to least specific. 
+</p>
+<p>When a <i class="i">class</i> is defined, the order in which its direct <i class="i">superclasses</i>
+are mentioned in the defining form is important.  Each <i class="i">class</i> has a
+<i class="i">local precedence order</i>
+<a class="index-entry-id" id="index-local-precedence-order"></a>
+, which is a <i class="i">list</i> consisting of the
+<i class="i">class</i> followed by its <i class="i">direct superclasses</i> in the order mentioned
+in the defining <i class="i">form</i>.
+</p>
+<p>A <i class="i">class precedence list</i> is always consistent with the
+<i class="i">local precedence order</i> of each <i class="i">class</i> in the list.  
+The <i class="i">classes</i> in each <i class="i">local precedence order</i> appear
+within the <i class="i">class precedence list</i> in the same order.  
+If the <i class="i">local precedence orders</i> are inconsistent with each other, 
+no <i class="i">class precedence list</i> can be constructed, and an error is signaled.
+The <i class="i">class precedence list</i> and its computation is discussed
+in <a class="ref" href="Determining-the-Class-Precedence-List.html">Determining the Class Precedence List</a>.
+</p>
+<p><i class="i">classes</i> are organized into a directed acyclic graph.
+There are two distinguished <i class="i">classes</i>, named <b class="b">t</b> and <b class="b">standard-object</b>.
+The <i class="i">class</i> named <b class="b">t</b> has no <i class="i">superclasses</i>. 
+It is a <i class="i">superclass</i> of every <i class="i">class</i> except itself.  
+The <i class="i">class</i> named <b class="b">standard-object</b> is an <i class="i">instance</i> of 
+the <i class="i">class</i> <b class="b">standard-class</b> and is a <i class="i">superclass</i> of
+every <i class="i">class</i> that is an <i class="i">instance</i> of the <i class="i">class</i> <b class="b">standard-class</b> except itself.
+</p>
+<p>[Reviewer Note by Barmar: This or something like it needs to be said in the introduction.]
+There is a mapping from the object system <i class="i">class</i> space into
+the <i class="i">type</i> space.  Many of the standard <i class="i">types</i> specified 
+in this document have a corresponding <i class="i">class</i> that has the same 
+<i class="i">name</i> as the <i class="i">type</i>. Some <i class="i">types</i> do not have a
+corresponding <i class="i">class</i>. The integration of the <i class="i">type</i> and <i class="i">class</i>
+systems is discussed in <a class="ref" href="Integrating-Types-and-Classes.html">Integrating Types and Classes</a>.
+</p>
+<p><i class="i">Classes</i> are represented by <i class="i">objects</i> that are themselves
+<i class="i">instances</i> of <i class="i">classes</i>. 
+The <i class="i">class</i> of the <i class="i">class</i> of an <i class="i">object</i> is termed
+the <i class="i">metaclass</i>
+<a class="index-entry-id" id="index-metaclass-1"></a>
+ of that <i class="i">object</i>. When no misinterpretation is
+possible, the term <i class="i">metaclass</i> is used to refer to a <i class="i">class</i>
+that has <i class="i">instances</i> that are themselves <i class="i">classes</i>. The <i class="i">metaclass</i>
+determines the form of inheritance used by the <i class="i">classes</i> that are its
+<i class="i">instances</i> and the representation of the <i class="i">instances</i> of those <i class="i">classes</i>.
+The object system provides a default <i class="i">metaclass</i>, <b class="b">standard-class</b>, that is
+appropriate for most programs.
+</p>
+<p>Except where otherwise specified, all <i class="i">classes</i> mentioned in this
+standard are <i class="i">instances</i> of the <i class="i">class</i> <b class="b">standard-class</b>,
+all <i class="i">generic functions</i> are <i class="i">instances</i> 
+of the <i class="i">class</i> <b class="b">standard-generic-function</b>,
+and all <i class="i">methods</i> are <i class="i">instances</i> of the <i class="i">class</i> <b class="b">standard-method</b>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Standard-Metaclasses.html" accesskey="1">Standard Metaclasses</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Defining-Classes.html">Defining Classes</a>, Previous: <a href="Classes.html">Classes</a>, Up: <a href="Classes.html">Classes</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Introduction-to-Environments.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Introduction to Environments (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Introduction to Environments (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Introduction to Environments (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation.html" rel="up" title="Evaluation">
+<link href="The-Evaluation-Model.html" rel="next" title="The Evaluation Model">
+<link href="Evaluation.html" rel="prev" title="Evaluation">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Introduction-to-Environments">
+<div class="nav-panel">
+<p>
+Next: <a href="The-Evaluation-Model.html" accesskey="n" rel="next">The Evaluation Model</a>, Previous: <a href="Evaluation.html" accesskey="p" rel="prev">Evaluation</a>, Up: <a href="Evaluation.html" accesskey="u" rel="up">Evaluation</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Introduction-to-Environments-1"><span>3.1.1 Introduction to Environments<a class="copiable-link" href="#Introduction-to-Environments-1"> &para;</a></span></h4>
+
+<p>A <i class="i">binding</i>
+<a class="index-entry-id" id="index-binding"></a>
+ is an association between a <i class="i">name</i> and
+that which the name denotes.  <i class="i">Bindings</i> are <i class="i">established</i>
+in a <i class="i">lexical environment</i> or a <i class="i">dynamic environment</i>
+by particular <i class="i">special operators</i>.
+</p>
+<p>An <i class="i">environment</i>
+<a class="index-entry-id" id="index-environment"></a>
+ is a set of <i class="i">bindings</i> and other information
+used during evaluation (<i class="i">e.g.</i>, to associate meanings with names).
+</p>
+<p><i class="i">Bindings</i> in an <i class="i">environment</i> are partitioned into <i class="i">namespaces</i>
+<a class="index-entry-id" id="index-namespace"></a>
+.
+A single <i class="i">name</i> can simultaneously have more than one
+associated <i class="i">binding</i> per <i class="i">environment</i>,
+but can have only one associated <i class="i">binding</i> per <i class="i">namespace</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="The-Global-Environment.html" accesskey="1">The Global Environment</a></li>
+<li><a href="Dynamic-Environments.html" accesskey="2">Dynamic Environments</a></li>
+<li><a href="Lexical-Environments.html" accesskey="3">Lexical Environments</a></li>
+<li><a href="The-Null-Lexical-Environment.html" accesskey="4">The Null Lexical Environment</a></li>
+<li><a href="Environment-Objects.html" accesskey="5">Environment Objects</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Introduction-to-Generic-Functions.html
@@ -0,0 +1,150 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Introduction to Generic Functions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Introduction to Generic Functions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Introduction to Generic Functions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Generic-Functions-and-Methods.html" rel="up" title="Generic Functions and Methods">
+<link href="Introduction-to-Methods.html" rel="next" title="Introduction to Methods">
+<link href="Generic-Functions-and-Methods.html" rel="prev" title="Generic Functions and Methods">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Introduction-to-Generic-Functions">
+<div class="nav-panel">
+<p>
+Next: <a href="Introduction-to-Methods.html" accesskey="n" rel="next">Introduction to Methods</a>, Previous: <a href="Generic-Functions-and-Methods.html" accesskey="p" rel="prev">Generic Functions and Methods</a>, Up: <a href="Generic-Functions-and-Methods.html" accesskey="u" rel="up">Generic Functions and Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Introduction-to-Generic-Functions-1"><span>7.6.1 Introduction to Generic Functions<a class="copiable-link" href="#Introduction-to-Generic-Functions-1"> &para;</a></span></h4>
+
+<p>A <i class="i">generic function</i>
+<a class="index-entry-id" id="index-generic-function-1"></a>
+ is a function whose behavior depends on
+the <i class="i">classes</i> or identities of the <i class="i">arguments</i> supplied to it.
+A <i class="i">generic function</i> <i class="i">object</i> 
+is associated with 
+     a set of <i class="i">methods</i>,
+     a <i class="i">lambda list</i>,
+     a <i class="i">method combination</i>_2, 
+ and other information.
+</p>
+<p>Like an <i class="i">ordinary function</i>, a <i class="i">generic function</i> takes <i class="i">arguments</i>,
+performs a series of operations, and perhaps returns useful <i class="i">values</i>.
+An <i class="i">ordinary function</i> has a single body of <i class="i">code</i> that is always <i class="i">executed</i>
+when the <i class="i">function</i> is called.  A <i class="i">generic function</i> has a set of bodies
+of <i class="i">code</i> of which a subset is selected for <i class="i">execution</i>. The selected
+bodies of <i class="i">code</i> and the manner of their combination are determined by
+the <i class="i">classes</i> or identities of one or more of the <i class="i">arguments</i> to the
+<i class="i">generic function</i> and by its <i class="i">method combination</i>.
+</p>
+<p><i class="i">Ordinary functions</i> and <i class="i">generic functions</i> are called with identical syntax.
+</p>
+<p><i class="i">Generic functions</i> are true <i class="i">functions</i> that can be passed as <i class="i">arguments</i>
+and used as the first <i class="i">argument</i> to <b class="b">funcall</b> and <b class="b">apply</b>.
+</p>
+<p>A <i class="i">binding</i> of a <i class="i">function name</i> to a <i class="i">generic function</i>
+can be <i class="i">established</i> in one of several ways.  It can be
+<i class="i">established</i> in the <i class="i">global environment</i> by 
+ <b class="b">ensure-generic-function</b>,
+ <b class="b">defmethod</b> (implicitly, due to <b class="b">ensure-generic-function</b>)
+or
+ <b class="b">defgeneric</b> (also implicitly, due to <b class="b">ensure-generic-function</b>).
+</p>
+<p>No <i class="i">standardized</i> mechanism is provided for <i class="i">establishing</i> a
+<i class="i">binding</i> of a <i class="i">function name</i> to a <i class="i">generic function</i>
+in the <i class="i">lexical environment</i>.
+</p>
+<p>When a <b class="b">defgeneric</b> form is evaluated, one of three actions
+is taken (due to <b class="b">ensure-generic-function</b>):
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>If a generic function of the given name already exists,
+the existing generic function object is modified.  Methods specified
+by the current <b class="b">defgeneric</b> form are added, and any methods in the
+existing generic function that were defined by a previous <b class="b">defgeneric</b>
+form are removed.  Methods added by the current <b class="b">defgeneric</b> 
+form might replace methods defined by <b class="b">defmethod</b>, 
+<b class="b">defclass</b>, <b class="b">define-condition</b>, or <b class="b">defstruct</b>.  
+No other methods in the generic function are affected
+or replaced.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If the given name names 
+    an <i class="i">ordinary function</i>, 
+    a  <i class="i">macro</i>,
+ or a <i class="i">special operator</i>, 
+an error is signaled.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Otherwise a generic function is created with the
+methods specified by the method definitions in the <b class="b">defgeneric</b>
+form.
+</p>
+</dd>
+</dl>
+
+<p>Some <i class="i">operators</i> permit specification of the options of a
+<i class="i">generic function</i>, such as 
+the <i class="i">type</i> of <i class="i">method combination</i> it uses 
+or its <i class="i">argument precedence order</i>.
+These <i class="i">operators</i> will be referred to as
+&ldquo;operators that specify generic function options.&rdquo;
+</p>
+<p>The only <i class="i">standardized</i> <i class="i">operator</i> in this category is <b class="b">defgeneric</b>.
+</p>
+<p>Some <i class="i">operators</i> define <i class="i">methods</i> for a <i class="i">generic function</i>.
+These <i class="i">operators</i> will be referred to as
+<i class="i">method-defining operators</i>
+<a class="index-entry-id" id="index-method_002ddefining-operator"></a>
+;
+their associated <i class="i">forms</i> are called <i class="i">method-defining forms</i>.
+The <i class="i">standardized</i> <i class="i">method-defining operators</i> are listed in Figure 7&ndash;2.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  defgeneric        defmethod  defclass  <!-- /@w -->
+  define-condition  defstruct            <!-- /@w -->
+
+  Figure 7&ndash;2: Standardized Method-Defining Operators<!-- /@w -->
+
+</pre></div></div>
+
+<p>Note that of the <i class="i">standardized</i> <i class="i">method-defining operators</i>
+only <b class="b">defgeneric</b>
+can specify <i class="i">generic function</i> options.
+<b class="b">defgeneric</b> and any <i class="i">implementation-defined</i> <i class="i">operators</i>
+that can specify <i class="i">generic function</i> options
+are also referred to as &ldquo;operators that specify generic function options.&rdquo;
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Introduction-to-Methods.html">Introduction to Methods</a>, Previous: <a href="Generic-Functions-and-Methods.html">Generic Functions and Methods</a>, Up: <a href="Generic-Functions-and-Methods.html">Generic Functions and Methods</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Introduction-to-Methods.html
@@ -0,0 +1,193 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Introduction to Methods (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Introduction to Methods (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Introduction to Methods (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Generic-Functions-and-Methods.html" rel="up" title="Generic Functions and Methods">
+<link href="Agreement-on-Parameter-Specializers-and-Qualifiers.html" rel="next" title="Agreement on Parameter Specializers and Qualifiers">
+<link href="Introduction-to-Generic-Functions.html" rel="prev" title="Introduction to Generic Functions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Introduction-to-Methods">
+<div class="nav-panel">
+<p>
+Next: <a href="Agreement-on-Parameter-Specializers-and-Qualifiers.html" accesskey="n" rel="next">Agreement on Parameter Specializers and Qualifiers</a>, Previous: <a href="Introduction-to-Generic-Functions.html" accesskey="p" rel="prev">Introduction to Generic Functions</a>, Up: <a href="Generic-Functions-and-Methods.html" accesskey="u" rel="up">Generic Functions and Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Introduction-to-Methods-1"><span>7.6.2 Introduction to Methods<a class="copiable-link" href="#Introduction-to-Methods-1"> &para;</a></span></h4>
+
+<p><i class="i">Methods</i> define the class-specific or identity-specific behavior
+and operations of a <i class="i">generic function</i>. 
+</p>
+<p>A <i class="i">method</i> <i class="i">object</i> 
+is associated with 
+     <i class="i">code</i> that implements the method&rsquo;s behavior,
+     a sequence of <i class="i">parameter specializers</i> 
+       that specify when the given <i class="i">method</i> is applicable,
+     a <i class="i">lambda list</i>,
+ and a sequence of <i class="i">qualifiers</i> that are used by the method combination
+       facility to distinguish among <i class="i">methods</i>.
+</p>
+<p>A method object is not a function and cannot be invoked as a function. 
+Various mechanisms in the object system take a method object and invoke its method
+function, as is the case when a generic function is invoked.  When this
+occurs it is said that the method is invoked or called.
+</p>
+<p>A method-defining form contains the <i class="i">code</i> that is to be run when the
+arguments to the generic function cause the method that it defines to
+be invoked.  When a method-defining form is evaluated, a method object
+is created and one of four actions is taken:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>If a <i class="i">generic function</i> of the given name already exists
+and if a <i class="i">method object</i> already exists that agrees with the new one on
+<i class="i">parameter specializers</i> and <i class="i">qualifiers</i>, the new <i class="i">method object</i> replaces
+the old one.  For a definition of one method agreeing with another on
+<i class="i">parameter specializers</i> and <i class="i">qualifiers</i>, 
+see <a class="ref" href="Agreement-on-Parameter-Specializers-and-Qualifiers.html">Agreement on Parameter Specializers and Qualifiers</a>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If a <i class="i">generic function</i> of the given name already exists
+and if there is no <i class="i">method object</i> that agrees with the new one on
+<i class="i">parameter specializers</i> and <i class="i">qualifiers</i>, the existing <i class="i">generic function</i>
+<i class="i">object</i> is modified to contain the new <i class="i">method</i> <i class="i">object</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If the given <i class="i">name</i> names an <i class="i">ordinary function</i>, a <i class="i">macro</i>,
+or a <i class="i">special operator</i>, an error is signaled.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Otherwise a <i class="i">generic function</i> is created with the <i class="i">method</i>
+specified by the <i class="i">method-defining form</i>.
+</p>
+</dd>
+</dl>
+
+<p>If the <i class="i">lambda list</i> of a new <i class="i">method</i> is not
+<i class="i">congruent</i> with the <i class="i">lambda list</i> of the <i class="i">generic function</i>,
+an error is signaled.  If a <i class="i">method-defining operator</i> that cannot specify
+<i class="i">generic function</i> options creates a new <i class="i">generic function</i>, 
+a <i class="i">lambda list</i> for that <i class="i">generic function</i> is derived from the
+<i class="i">lambda list</i> of the <i class="i">method</i> in the <i class="i">method-defining form</i> in such a way
+as to be <i class="i">congruent</i> with it.  For a discussion of <i class="i">congruence</i>
+<a class="index-entry-id" id="index-congruence"></a>
+,
+see <a class="ref" href="Congruent-Lambda_002dlists-for-all-Methods-of-a-Generic-Function.html">Congruent Lambda-lists for all Methods of a Generic Function</a>.
+</p>
+<p>Each method has a <i class="i">specialized lambda list</i>, which determines
+when that method can be applied.  A <i class="i">specialized lambda list</i> is like
+an <i class="i">ordinary lambda list</i> except that a specialized parameter
+may occur instead of the name of a required parameter.  A specialized parameter
+is a list <code class="t">(<i class="i">variable-name</i> <i class="i">parameter-specializer-name</i>)</code>,
+where <i class="i">parameter-specializer-name</i> is one of the following:
+</p>
+<dl class="table">
+<dt>a <i class="i">symbol</i></dt>
+<dd><p>denotes a <i class="i">parameter specializer</i> which is the <i class="i">class</i> 
+named by that <i class="i">symbol</i>.
+</p>
+</dd>
+<dt>a <i class="i">class</i></dt>
+<dd><p>denotes a <i class="i">parameter specializer</i> which is the <i class="i">class</i> itself.
+</p>
+</dd>
+<dt><code class="t">(eql <i class="i">form</i>)</code></dt>
+<dd><p>denotes a <i class="i">parameter specializer</i> which satisfies the <i class="i">type specifier</i>
+<code class="t">(eql <i class="i">object</i>)</code>, where <i class="i">object</i> is the 
+result of evaluating <i class="i">form</i>.  The form <i class="i">form</i> is evaluated in 
+the lexical environment in which the method-defining form is evaluated.
+Note that <i class="i">form</i> is evaluated only once, at the time the method is
+defined, not each time the generic function is called.
+</p></dd>
+</dl>
+
+<p><i class="i">Parameter specializer names</i> are used in macros intended as the
+user-level interface (<b class="b">defmethod</b>), while <i class="i">parameter specializers</i>
+are used in the functional interface.
+</p>
+<p>Only required parameters may be specialized, and there must be a
+<i class="i">parameter specializer</i> for each required parameter.  For notational
+simplicity, if some required parameter in a <i class="i">specialized lambda list</i> in
+a method-defining form is simply a variable name, its 
+<i class="i">parameter specializer</i> defaults to the <i class="i">class</i> <b class="b">t</b>.
+</p>
+<p>Given a generic function and a set of arguments, an applicable
+method is a method for that generic function whose parameter
+specializers are satisfied by their corresponding arguments.  The
+following definition specifies what it means for a method to be
+applicable and for an argument to satisfy a <i class="i">parameter specializer</i>.
+</p>
+<p>Let &lt; A_1, ..., A_n&gt; be the required
+arguments to a generic function in order. Let &lt; P_1,
+..., P_n&gt; be the <i class="i">parameter specializers</i> corresponding to
+the required parameters of the method M in order.  The method M is
+applicable when each A_i is of the <i class="i">type</i> specified by 
+the <i class="i">type specifier</i> P_i.
+Because every valid <i class="i">parameter specializer</i> is 
+also a valid <i class="i">type specifier</i>, the <i class="i">function</i> <b class="b">typep</b> can be used during method
+selection to determine whether an argument satisfies a <i class="i">parameter specializer</i>.  
+</p>
+<p>A method all of whose <i class="i">parameter specializers</i> are 
+the <i class="i">class</i> <b class="b">t</b> is called a <i class="i">default method</i>
+<a class="index-entry-id" id="index-default-method"></a>
+; it is always applicable but
+may be shadowed by a more specific method.
+</p>
+<p>Methods can have <i class="i">qualifiers</i>, which give the method combination
+procedure a way to distinguish among methods.  A method that has one
+or more <i class="i">qualifiers</i> is called a <i class="i">qualified method</i>.
+A method with no <i class="i">qualifiers</i> is called an <i class="i">unqualified method</i>. 
+A <i class="i">qualifier</i> is any <i class="i">non-list</i>.
+The <i class="i">qualifiers</i> defined by the <i class="i">standardized</i> method combination types 
+are <i class="i">symbols</i>.
+</p>
+<p>In this specification, the terms &ldquo;<i class="i">primary method</i>&rdquo; and 
+&ldquo;<i class="i">auxiliary method</i>&rdquo; are used to partition <i class="i">methods</i>
+within a method combination type according to their intended use.  
+In standard method combination, <i class="i">primary methods</i> are 
+<i class="i">unqualified methods</i> 
+and <i class="i">auxiliary methods</i> are methods with a single <i class="i">qualifier</i> 
+that is one of <code class="t">:around</code>, <code class="t">:before</code>, or <code class="t">:after</code>.
+<i class="i">Methods</i> with these <i class="i">qualifiers</i> are called <i class="i">around methods</i>,
+<i class="i">before methods</i>, and <i class="i">after methods</i>, respectively.
+When a method combination type is defined using the short form of
+<b class="b">define-method-combination</b>, <i class="i">primary methods</i> are 
+methods qualified with the name of the type of method combination, 
+and auxiliary methods have the <i class="i">qualifier</i> <code class="t">:around</code>.
+Thus the terms &ldquo;<i class="i">primary method</i>&rdquo; and &ldquo;<i class="i">auxiliary method</i>&rdquo;
+have only a relative definition within a given method combination type.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Agreement-on-Parameter-Specializers-and-Qualifiers.html">Agreement on Parameter Specializers and Qualifiers</a>, Previous: <a href="Introduction-to-Generic-Functions.html">Introduction to Generic Functions</a>, Up: <a href="Generic-Functions-and-Methods.html">Generic Functions and Methods</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Introduction-to-Packages.html
@@ -0,0 +1,97 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Introduction to Packages (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Introduction to Packages (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Introduction to Packages (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Package-Concepts.html" rel="up" title="Package Concepts">
+<link href="Standardized-Packages.html" rel="next" title="Standardized Packages">
+<link href="Package-Concepts.html" rel="prev" title="Package Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Introduction-to-Packages">
+<div class="nav-panel">
+<p>
+Next: <a href="Standardized-Packages.html" accesskey="n" rel="next">Standardized Packages</a>, Previous: <a href="Package-Concepts.html" accesskey="p" rel="prev">Package Concepts</a>, Up: <a href="Package-Concepts.html" accesskey="u" rel="up">Package Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Introduction-to-Packages-1"><span>11.1.1 Introduction to Packages<a class="copiable-link" href="#Introduction-to-Packages-1"> &para;</a></span></h4>
+
+<p>A <i class="i">package</i>
+<a class="index-entry-id" id="index-package"></a>
+ establishes a mapping from names to <i class="i">symbols</i>. 
+At any given time, one <i class="i">package</i> is current.
+The <i class="i">current package</i>
+<a class="index-entry-id" id="index-current-package"></a>
+ is the one that is the <i class="i">value</i> of <b class="b">*package*</b>.
+When using the <i class="i">Lisp reader</i>,
+it is possible to refer to <i class="i">symbols</i> in <i class="i">packages</i> 
+other than the current one through the use of <i class="i">package prefixes</i> in the 
+printed representation of the <i class="i">symbol</i>.
+</p>
+<p>Figure 11&ndash;1 lists some <i class="i">defined names</i> that are applicable
+to <i class="i">packages</i>.
+Where an <i class="i">operator</i> 
+takes an argument that is either a <i class="i">symbol</i> or a <i class="i">list</i> 
+of <i class="i">symbols</i>,
+an argument of <b class="b">nil</b> is treated as an empty <i class="i">list</i> of <i class="i">symbols</i>.
+Any <i class="i">package</i> argument may be either a <i class="i">string</i>, a <i class="i">symbol</i>, or
+a <i class="i">package</i>.  If a <i class="i">symbol</i> is supplied, its name will be used
+as the <i class="i">package</i> name.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  *modules*            import                     provide           <!-- /@w -->
+  *package*            in-package                 rename-package    <!-- /@w -->
+  defpackage           intern                     require           <!-- /@w -->
+  do-all-symbols       list-all-packages          shadow            <!-- /@w -->
+  do-external-symbols  make-package               shadowing-import  <!-- /@w -->
+  do-symbols           package-name               unexport          <!-- /@w -->
+  export               package-nicknames          unintern          <!-- /@w -->
+  find-all-symbols     package-shadowing-symbols  unuse-package     <!-- /@w -->
+  find-package         package-use-list           use-package       <!-- /@w -->
+  find-symbol          package-used-by-list                         <!-- /@w -->
+
+         Figure 11&ndash;1: Some Defined Names related to Packages       <!-- /@w -->
+
+</pre></div></div>
+
+
+<ul class="mini-toc">
+<li><a href="Package-Names-and-Nicknames.html" accesskey="1">Package Names and Nicknames</a></li>
+<li><a href="Symbols-in-a-Package.html" accesskey="2">Symbols in a Package</a></li>
+<li><a href="Internal-and-External-Symbols.html" accesskey="3">Internal and External Symbols</a></li>
+<li><a href="Package-Inheritance.html" accesskey="4">Package Inheritance</a></li>
+<li><a href="Accessibility-of-Symbols-in-a-Package.html" accesskey="5">Accessibility of Symbols in a Package</a></li>
+<li><a href="Locating-a-Symbol-in-a-Package.html" accesskey="6">Locating a Symbol in a Package</a></li>
+<li><a href="Prevention-of-Name-Conflicts-in-Packages.html" accesskey="7">Prevention of Name Conflicts in Packages</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Standardized-Packages.html">Standardized Packages</a>, Previous: <a href="Package-Concepts.html">Package Concepts</a>, Up: <a href="Package-Concepts.html">Package Concepts</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Introduction-to-Scripts-and-Repertoires.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Introduction to Scripts and Repertoires (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Introduction to Scripts and Repertoires (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Introduction to Scripts and Repertoires (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Concepts.html" rel="up" title="Character Concepts">
+<link href="Character-Attributes.html" rel="next" title="Character Attributes">
+<link href="Introduction-to-Characters.html" rel="prev" title="Introduction to Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Introduction-to-Scripts-and-Repertoires">
+<div class="nav-panel">
+<p>
+Next: <a href="Character-Attributes.html" accesskey="n" rel="next">Character Attributes</a>, Previous: <a href="Introduction-to-Characters.html" accesskey="p" rel="prev">Introduction to Characters</a>, Up: <a href="Character-Concepts.html" accesskey="u" rel="up">Character Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Introduction-to-Scripts-and-Repertoires-1"><span>13.1.2 Introduction to Scripts and Repertoires<a class="copiable-link" href="#Introduction-to-Scripts-and-Repertoires-1"> &para;</a></span></h4>
+
+
+<ul class="mini-toc">
+<li><a href="Character-Scripts.html" accesskey="1">Character Scripts</a></li>
+<li><a href="Character-Repertoires.html" accesskey="2">Character Repertoires</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Introduction-to-Slots.html
@@ -0,0 +1,111 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Introduction to Slots (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Introduction to Slots (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Introduction to Slots (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Slots.html" rel="up" title="Slots">
+<link href="Accessing-Slots.html" rel="next" title="Accessing Slots">
+<link href="Slots.html" rel="prev" title="Slots">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Introduction-to-Slots">
+<div class="nav-panel">
+<p>
+Next: <a href="Accessing-Slots.html" accesskey="n" rel="next">Accessing Slots</a>, Previous: <a href="Slots.html" accesskey="p" rel="prev">Slots</a>, Up: <a href="Slots.html" accesskey="u" rel="up">Slots</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Introduction-to-Slots-1"><span>7.5.1 Introduction to Slots<a class="copiable-link" href="#Introduction-to-Slots-1"> &para;</a></span></h4>
+
+<p>An <i class="i">object</i> of <i class="i">metaclass</i> <b class="b">standard-class</b> has zero or more named
+<i class="i">slots</i>.  The <i class="i">slots</i> of an <i class="i">object</i> are determined 
+by the <i class="i">class</i> of the <i class="i">object</i>.  Each <i class="i">slot</i> can hold
+one value.
+</p>
+<p>[Reviewer Note by Barmar: All symbols are valid variable names.  Perhaps this means
+                  to preclude the use of named constants?  We have a terminology
+		  problem to solve.]
+The <i class="i">name</i> of a <i class="i">slot</i> is a <i class="i">symbol</i> that is syntactically
+valid for use as a variable name.
+</p>
+<p>When a <i class="i">slot</i> does not have a value, the <i class="i">slot</i> is said to be 
+<i class="i">unbound</i>.  When an unbound <i class="i">slot</i> is read,
+</p>
+<p>[Reviewer Note by Barmar: from an object whose metaclass is standard-class?]
+the <i class="i">generic function</i> <b class="b">slot-unbound</b> is invoked. The 
+system-supplied primary <i class="i">method</i> 
+for <b class="b">slot-unbound</b> 
+on <i class="i">class</i> <b class="b">t</b> signals an error.
+</p>
+<p>If <b class="b">slot-unbound</b> returns, its <i class="i">primary value</i> 
+is used that time as the <i class="i">value</i> of the <i class="i">slot</i>.
+</p>
+<p>The default initial value form for a <i class="i">slot</i> is defined by
+the <code class="t">:initform</code> slot option.  When the <code class="t">:initform</code> form is used to
+supply a value, it is evaluated in the lexical environment in which
+the <b class="b">defclass</b> form was evaluated. The <code class="t">:initform</code> along with
+the lexical environment in which the <b class="b">defclass</b> form was evaluated
+is called a <i class="i">captured initialization form</i>. 
+For more details, see <a class="ref" href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a>.
+</p>
+<p>A <i class="i">local slot</i> is defined to be a <i class="i">slot</i> that is
+<i class="i">accessible</i>
+to exactly one <i class="i">instance</i>, 
+namely the one in which the <i class="i">slot</i> is allocated.  
+A <i class="i">shared slot</i> is defined to be a <i class="i">slot</i> that is visible to more than one
+<i class="i">instance</i> of a given <i class="i">class</i> and its <i class="i">subclasses</i>.
+</p>
+<p>A <i class="i">class</i> is said to define a <i class="i">slot</i> with a given <i class="i">name</i> when
+the <b class="b">defclass</b> form for that <i class="i">class</i> contains a <i class="i">slot specifier</i> with
+that <i class="i">name</i>.  Defining a <i class="i">local slot</i> does not immediately create 
+a <i class="i">slot</i>; it causes a <i class="i">slot</i> to be created each time 
+an <i class="i">instance</i> of the <i class="i">class</i> is created.
+Defining a <i class="i">shared slot</i> immediately creates a <i class="i">slot</i>.
+</p>
+<p>The <code class="t">:allocation</code> slot option to <b class="b">defclass</b> controls the kind
+of <i class="i">slot</i> that is defined.  If the value of the <code class="t">:allocation</code> slot
+option is <code class="t">:instance</code>, a <i class="i">local slot</i> is created.  If the value of
+<code class="t">:allocation</code> is <code class="t">:class</code>, a <i class="i">shared slot</i> is created.
+</p>
+<p>A <i class="i">slot</i> is said to be <i class="i">accessible</i> in an <i class="i">instance</i> 
+of a <i class="i">class</i> if
+the <i class="i">slot</i> is defined by the <i class="i">class</i> 
+of the <i class="i">instance</i> or is inherited from
+a <i class="i">superclass</i> of that <i class="i">class</i>.  
+At most one <i class="i">slot</i> of a given <i class="i">name</i> can be
+<i class="i">accessible</i> in an <i class="i">instance</i>.  
+A <i class="i">shared slot</i> defined by a <i class="i">class</i> is
+<i class="i">accessible</i> in all <i class="i">instances</i> 
+of that <i class="i">class</i>.  
+A detailed explanation of the inheritance of <i class="i">slots</i> is given in 
+<a class="ref" href="Inheritance-of-Slots-and-Slot-Options.html">Inheritance of Slots and Slot Options</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Accessing-Slots.html">Accessing Slots</a>, Previous: <a href="Slots.html">Slots</a>, Up: <a href="Slots.html">Slots</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Introduction-to-Streams.html
@@ -0,0 +1,88 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Introduction to Streams (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Introduction to Streams (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Introduction to Streams (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Stream-Concepts.html" rel="up" title="Stream Concepts">
+<link href="Stream-Variables.html" rel="next" title="Stream Variables">
+<link href="Stream-Concepts.html" rel="prev" title="Stream Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Introduction-to-Streams">
+<div class="nav-panel">
+<p>
+Next: <a href="Stream-Variables.html" accesskey="n" rel="next">Stream Variables</a>, Previous: <a href="Stream-Concepts.html" accesskey="p" rel="prev">Stream Concepts</a>, Up: <a href="Stream-Concepts.html" accesskey="u" rel="up">Stream Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Introduction-to-Streams-1"><span>21.1.1 Introduction to Streams<a class="copiable-link" href="#Introduction-to-Streams-1"> &para;</a></span></h4>
+
+<p>A <i class="i">stream</i>
+<a class="index-entry-id" id="index-stream-1"></a>
+ is an <i class="i">object</i> that can be used with an input or output
+function to identify an appropriate source or sink of <i class="i">characters</i> or 
+<i class="i">bytes</i> for that operation.
+A <i class="i">character</i>
+<a class="index-entry-id" id="index-character-1"></a>
+ <i class="i">stream</i>
+<a class="index-entry-id" id="index-stream-2"></a>
+ is a source or sink of <i class="i">characters</i>.
+A <i class="i">binary</i>
+<a class="index-entry-id" id="index-binary"></a>
+ <i class="i">stream</i>
+<a class="index-entry-id" id="index-stream-3"></a>
+ is a source or sink of <i class="i">bytes</i>.
+</p>
+<p>Some operations may be performed on any kind of <i class="i">stream</i>;
+Figure 21&ndash;1 provides a list of <i class="i">standardized</i> operations
+that are potentially useful with any kind of <i class="i">stream</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  close                 stream-element-type  <!-- /@w -->
+  input-stream-p        streamp              <!-- /@w -->
+  interactive-stream-p  with-open-stream     <!-- /@w -->
+  output-stream-p                            <!-- /@w -->
+
+  Figure 21&ndash;1: Some General-Purpose Stream Operations<!-- /@w -->
+
+</pre></div></div>
+
+<p>Other operations are only meaningful on certain <i class="i">stream</i> <i class="i">types</i>.
+For example, <b class="b">read-char</b> is only defined for <i class="i">character</i> <i class="i">streams</i>
+and <b class="b">read-byte</b> is only defined for <i class="i">binary</i> <i class="i">streams</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Abstract-Classifications-of-Streams-_0028Introduction-to-Streams_0029.html" accesskey="1">Abstract Classifications of Streams</a></li>
+<li><a href="Input.html" accesskey="2">Input, Output, and Bidirectional Streams</a></li>
+<li><a href="Open-and-Closed-Streams.html" accesskey="3">Open and Closed Streams</a></li>
+<li><a href="Interactive-Streams.html" accesskey="4">Interactive Streams</a></li>
+<li><a href="Abstract-Classifications-of-Streams.html" accesskey="5">Abstract Classifications of Streams</a></li>
+<li><a href="File-Streams.html" accesskey="6">File Streams</a></li>
+<li><a href="Other-Subclasses-of-Stream.html" accesskey="7">Other Subclasses of Stream</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Invalid-Characters.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Invalid Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Invalid Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Invalid Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Syntax-Types.html" rel="up" title="Character Syntax Types">
+<link href="Macro-Characters.html" rel="next" title="Macro Characters">
+<link href="Constituent-Traits.html" rel="prev" title="Constituent Traits">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Invalid-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Macro-Characters.html" accesskey="n" rel="next">Macro Characters</a>, Previous: <a href="Constituent-Traits.html" accesskey="p" rel="prev">Constituent Traits</a>, Up: <a href="Character-Syntax-Types.html" accesskey="u" rel="up">Character Syntax Types</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Invalid-Characters-1"><span>2.1.4.3 Invalid Characters<a class="copiable-link" href="#Invalid-Characters-1"> &para;</a></span></h4>
+
+<p><i class="i">Characters</i> with the <i class="i">constituent trait</i> <i class="i">invalid</i> 
+cannot ever appear in a <i class="i">token</i> 
+except under the control of a <i class="i">single escape</i> <i class="i">character</i>.
+If an <i class="i">invalid</i> <i class="i">character</i> is encountered while an <i class="i">object</i> is
+being read, an error of <i class="i">type</i> <b class="b">reader-error</b> is signaled.
+If an <i class="i">invalid</i> <i class="i">character</i> is preceded by a <i class="i">single escape</i> <i class="i">character</i>,
+it is treated as an <i class="i">alphabetic</i>_2 <i class="i">constituent</i> instead.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Invalid-Keyword-Arguments.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Invalid Keyword Arguments (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Invalid Keyword Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Invalid Keyword Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Argument-Mismatch-Detection.html" rel="up" title="Argument Mismatch Detection">
+<link href="Odd-Number-of-Keyword-Arguments.html" rel="next" title="Odd Number of Keyword Arguments">
+<link href="Unrecognized-Keyword-Arguments.html" rel="prev" title="Unrecognized Keyword Arguments">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Invalid-Keyword-Arguments">
+<div class="nav-panel">
+<p>
+Next: <a href="Odd-Number-of-Keyword-Arguments.html" accesskey="n" rel="next">Odd Number of Keyword Arguments</a>, Previous: <a href="Unrecognized-Keyword-Arguments.html" accesskey="p" rel="prev">Unrecognized Keyword Arguments</a>, Up: <a href="Argument-Mismatch-Detection.html" accesskey="u" rel="up">Argument Mismatch Detection</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Invalid-Keyword-Arguments-1"><span>3.5.1.6 Invalid Keyword Arguments<a class="copiable-link" href="#Invalid-Keyword-Arguments-1"> &para;</a></span></h4>
+
+<p>It is not permitted to supply a keyword argument to a <i class="i">function</i>
+using a name that is not a <i class="i">symbol</i>.
+</p>
+<p>If this <i class="i">situation</i> occurs in a <i class="i">safe call</i>,
+</p>
+<p>an error of <i class="i">type</i> <b class="b">program-error</b> must be signaled 
+unless keyword argument checking is suppressed as described
+in <a class="ref" href="Suppressing-Keyword-Argument-Checking.html">Suppressing Keyword Argument Checking</a>;
+and in an <i class="i">unsafe call</i> the <i class="i">situation</i> has undefined consequences.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Iteration-Control.html
@@ -0,0 +1,112 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Iteration Control (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Iteration Control (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Iteration Control (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="up" title="Variable Initialization and Stepping Clauses">
+<link href="The-for_002das_002darithmetic-subclause.html" rel="next" title="The for-as-arithmetic subclause">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="prev" title="Variable Initialization and Stepping Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Iteration-Control">
+<div class="nav-panel">
+<p>
+Next: <a href="The-for_002das_002darithmetic-subclause.html" accesskey="n" rel="next">The for-as-arithmetic subclause</a>, Previous: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="p" rel="prev">Variable Initialization and Stepping Clauses</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="u" rel="up">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Iteration-Control-1"><span>6.1.2.1 Iteration Control<a class="copiable-link" href="#Iteration-Control-1"> &para;</a></span></h4>
+
+<p>Iteration control clauses allow direction of <b class="b">loop</b> iteration.
+The <i class="i">loop keywords</i> <code class="t">for</code> and <code class="t">as</code>
+designate iteration control clauses.
+Iteration control clauses differ with respect to the specification of
+termination tests and to the initialization and <i class="i">stepping</i>_1
+of loop variables.  Iteration clauses by themselves
+do not cause the Loop Facility to return values, but they
+can be used in conjunction with value-accumulation clauses to
+return values.  
+</p>
+<p>All variables are initialized in the loop prologue.  
+A <i class="i">variable</i> <i class="i">binding</i> has <i class="i">lexical scope</i>
+unless it is proclaimed <b class="b">special</b>;
+thus, by default, the variable can be <i class="i">accessed</i> only by <i class="i">forms</i> 
+that lie textually within the <b class="b">loop</b>.
+Stepping assignments are made in the loop body before any other <i class="i">forms</i>
+are evaluated in the body.  
+</p>
+<p>The variable argument in iteration control clauses can be a 
+destructuring list.  A destructuring list
+is a <i class="i">tree</i> whose <i class="i">non-nil</i> <i class="i">atoms</i> are <i class="i">variable</i> <i class="i">names</i>.
+See <a class="ref" href="Destructuring.html">Destructuring</a>.
+</p>
+<p>The iteration control clauses <code class="t">for</code>, <code class="t">as</code>,  and <code class="t">repeat</code> 
+must precede any other loop clauses, except
+  <code class="t">initially</code>, <code class="t">with</code>, and <code class="t">named</code>,
+since they establish variable <i class="i">bindings</i>.  
+When iteration control clauses are
+used in a <b class="b">loop</b>,
+the corresponding
+termination tests in the loop body are evaluated
+before any other loop body code is executed.
+</p>
+<p>If multiple iteration clauses are used to control iteration, variable
+initialization and <i class="i">stepping</i>_1 occur <i class="i">sequentially</i> by default.  
+The <code class="t">and</code> construct can be used to connect two or more
+iteration clauses when <i class="i">sequential</i> <i class="i">binding</i> and 
+<i class="i">stepping</i>_1 are not necessary.
+The iteration behavior of clauses joined by <code class="t">and</code>
+is analogous to the behavior of the macro <b class="b">do</b> with
+respect to <b class="b">do*</b>.
+</p>
+<p>The <code class="t">for</code> and <code class="t">as</code> clauses iterate by using one or more local 
+loop  variables that are initialized to some value and that 
+can be modified or <i class="i">stepped</i>_1 after each iteration.  
+For these clauses, iteration terminates when a local
+variable reaches some supplied value or when some other loop clause
+terminates iteration.
+At each iteration, variables can be 
+   <i class="i">stepped</i>_1 by an increment or a decrement
+or can be assigned a new value by the evaluation of a <i class="i">form</i>).
+Destructuring can be used to assign 
+values to variables during iteration. 
+</p>
+<p>The <code class="t">for</code> and <code class="t">as</code> keywords are synonyms; they can be used
+interchangeably.  There are seven syntactic formats for these constructs.
+In each syntactic format, the <i class="i">type</i> of
+<i class="i">var</i> can be supplied by the optional <i class="i">type-spec</i>
+argument.  If <i class="i">var</i> is a destructuring list, the <i class="i">type</i>
+supplied by the <i class="i">type-spec</i> argument must appropriately match
+the elements of the list.  
+By convention, <code class="t">for</code> introduces new iterations and <code class="t">as</code>
+introduces iterations that depend on a previous iteration specification.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="The-for_002das_002darithmetic-subclause.html">The for-as-arithmetic subclause</a>, Previous: <a href="Variable-Initialization-and-Stepping-Clauses.html">Variable Initialization and Stepping Clauses</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Iteration-Dictionary.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Iteration Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Iteration Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Iteration Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Iteration.html" rel="up" title="Iteration">
+<link href="The-LOOP-Facility.html" rel="prev" title="The LOOP Facility">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Iteration-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="The-LOOP-Facility.html" accesskey="p" rel="prev">The LOOP Facility</a>, Up: <a href="Iteration.html" accesskey="u" rel="up">Iteration</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Iteration-Dictionary-1"><span>6.2 Iteration Dictionary<a class="copiable-link" href="#Iteration-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="do.html" accesskey="1">do, do*                                                             [Macro]</a></li>
+<li><a href="dotimes.html" accesskey="2">dotimes                                                             [Macro]</a></li>
+<li><a href="dolist.html" accesskey="3">dolist                                                              [Macro]</a></li>
+<li><a href="loop.html" accesskey="4">loop                                                                [Macro]</a></li>
+<li><a href="loop_002dfinish.html" accesskey="5">loop-finish                                                   [Local Macro]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Iteration.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Iteration (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Iteration (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Iteration (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Objects.html" rel="next" title="Objects">
+<link href="Data-and-Control-Flow.html" rel="prev" title="Data and Control Flow">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Iteration">
+<div class="nav-panel">
+<p>
+Next: <a href="Objects.html" accesskey="n" rel="next">Objects</a>, Previous: <a href="Data-and-Control-Flow.html" accesskey="p" rel="prev">Data and Control Flow</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Iteration-1"><span>6 Iteration<a class="copiable-link" href="#Iteration-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="The-LOOP-Facility.html" accesskey="1">The LOOP Facility</a></li>
+<li><a href="Iteration-Dictionary.html" accesskey="2">Iteration Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Keyword-Arguments-in-Generic-Functions-and-Methods.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Keyword Arguments in Generic Functions and Methods (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Keyword Arguments in Generic Functions and Methods (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Keyword Arguments in Generic Functions and Methods (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Generic-Functions-and-Methods.html" rel="up" title="Generic Functions and Methods">
+<link href="Method-Selection-and-Combination.html" rel="next" title="Method Selection and Combination">
+<link href="Congruent-Lambda_002dlists-for-all-Methods-of-a-Generic-Function.html" rel="prev" title="Congruent Lambda-lists for all Methods of a Generic Function">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Keyword-Arguments-in-Generic-Functions-and-Methods">
+<div class="nav-panel">
+<p>
+Next: <a href="Method-Selection-and-Combination.html" accesskey="n" rel="next">Method Selection and Combination</a>, Previous: <a href="Congruent-Lambda_002dlists-for-all-Methods-of-a-Generic-Function.html" accesskey="p" rel="prev">Congruent Lambda-lists for all Methods of a Generic Function</a>, Up: <a href="Generic-Functions-and-Methods.html" accesskey="u" rel="up">Generic Functions and Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Keyword-Arguments-in-Generic-Functions-and-Methods-1"><span>7.6.5 Keyword Arguments in Generic Functions and Methods<a class="copiable-link" href="#Keyword-Arguments-in-Generic-Functions-and-Methods-1"> &para;</a></span></h4>
+
+<p>When a generic function or any of its methods mentions 
+<b class="b">&amp;key</b> in a <i class="i">lambda list</i>, the specific set of keyword
+arguments accepted by the generic function varies according to the
+applicable methods.  The set of keyword arguments accepted by the
+generic function for a particular call is the union of the keyword
+arguments accepted by all applicable methods and the keyword arguments
+mentioned after <b class="b">&amp;key</b> in the generic function definition,
+if any.  A method that has <b class="b">&amp;rest</b> but not <b class="b">&amp;key</b> does not affect the
+set of acceptable keyword arguments.  If
+the <i class="i">lambda list</i> of any applicable method or of the generic
+function definition contains <b class="b">&amp;allow-other-keys</b>, all
+keyword arguments are accepted by the generic function.
+</p>
+<p>The <i class="i">lambda list</i> congruence rules require that each method
+accept all of the keyword arguments mentioned after <b class="b">&amp;key</b> in the
+generic function definition, by accepting them explicitly, by
+specifying <b class="b">&amp;allow-other-keys</b>, or by specifying <b class="b">&amp;rest</b> but
+not <b class="b">&amp;key</b>.  Each method can accept additional keyword arguments
+of its own, in addition to the keyword arguments mentioned in the
+generic function definition.
+</p>
+<p>If a <i class="i">generic function</i> is passed a keyword argument that no applicable
+method accepts, an error should be signaled; see <a class="ref" href="Error-Checking-in-Function-Calls.html">Error Checking in Function Calls</a>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Examples-of-Keyword-Arguments-in-Generic-Functions-and-Methods.html" accesskey="1">Examples of Keyword Arguments in Generic Functions and Methods</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Kinds-of-Places.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Kinds of Places (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Kinds of Places (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Kinds of Places (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Generalized-Reference.html" rel="up" title="Generalized Reference">
+<link href="Treatment-of-Other-Macros-Based-on-SETF.html" rel="next" title="Treatment of Other Macros Based on SETF">
+<link href="Overview-of-Places-and-Generalized-Reference.html" rel="prev" title="Overview of Places and Generalized Reference">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Kinds-of-Places">
+<div class="nav-panel">
+<p>
+Next: <a href="Treatment-of-Other-Macros-Based-on-SETF.html" accesskey="n" rel="next">Treatment of Other Macros Based on SETF</a>, Previous: <a href="Overview-of-Places-and-Generalized-Reference.html" accesskey="p" rel="prev">Overview of Places and Generalized Reference</a>, Up: <a href="Generalized-Reference.html" accesskey="u" rel="up">Generalized Reference</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Kinds-of-Places-1"><span>5.1.2 Kinds of Places<a class="copiable-link" href="#Kinds-of-Places-1"> &para;</a></span></h4>
+
+<p>Several kinds of <i class="i">places</i> are defined by <span class="r">Common Lisp</span>; 
+this section enumerates them.
+This set can be extended by <i class="i">implementations</i> and by <i class="i">programmer code</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Variable-Names-as-Places.html" accesskey="1">Variable Names as Places</a></li>
+<li><a href="Function-Call-Forms-as-Places.html" accesskey="2">Function Call Forms as Places</a></li>
+<li><a href="VALUES-Forms-as-Places.html" accesskey="3">VALUES Forms as Places</a></li>
+<li><a href="THE-Forms-as-Places.html" accesskey="4">THE Forms as Places</a></li>
+<li><a href="APPLY-Forms-as-Places.html" accesskey="5">APPLY Forms as Places</a></li>
+<li><a href="Setf-Expansions-and-Places.html" accesskey="6">Setf Expansions and Places</a></li>
+<li><a href="Macro-Forms-as-Places.html" accesskey="7">Macro Forms as Places</a></li>
+<li><a href="Symbol-Macros-as-Places.html" accesskey="8">Symbol Macros as Places</a></li>
+<li><a href="Other-Compound-Forms-as-Places.html" accesskey="9">Other Compound Forms as Places</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Lambda-Expressions.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Lambda Expressions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Lambda Expressions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Lambda Expressions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation.html" rel="up" title="Evaluation">
+<link href="Closures-and-Lexical-Binding.html" rel="next" title="Closures and Lexical Binding">
+<link href="The-Evaluation-Model.html" rel="prev" title="The Evaluation Model">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Lambda-Expressions">
+<div class="nav-panel">
+<p>
+Next: <a href="Closures-and-Lexical-Binding.html" accesskey="n" rel="next">Closures and Lexical Binding</a>, Previous: <a href="The-Evaluation-Model.html" accesskey="p" rel="prev">The Evaluation Model</a>, Up: <a href="Evaluation.html" accesskey="u" rel="up">Evaluation</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Lambda-Expressions-1"><span>3.1.3 Lambda Expressions<a class="copiable-link" href="#Lambda-Expressions-1"> &para;</a></span></h4>
+
+<p>In a <i class="i">lambda expression</i>,
+the body is evaluated in a lexical <i class="i">environment</i> that is formed by
+adding the <i class="i">binding</i> of 
+each <i class="i">parameter</i> in the <i class="i">lambda list</i>
+with the corresponding <i class="i">value</i> from the <i class="i">arguments</i>
+to the current lexical <i class="i">environment</i>.
+</p>
+<p>For further discussion of how <i class="i">bindings</i> are <i class="i">established</i> 
+based on the <i class="i">lambda list</i>, see <a class="ref" href="Lambda-Lists.html">Lambda Lists</a>.
+</p>
+<p>The body of a <i class="i">lambda expression</i> is an <i class="i">implicit progn</i>;
+the <i class="i">values</i> it returns are returned by the <i class="i">lambda expression</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Lambda-Forms.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Lambda Forms (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Lambda Forms (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Lambda Forms (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Evaluation-Model.html" rel="up" title="The Evaluation Model">
+<link href="Self_002dEvaluating-Objects.html" rel="next" title="Self-Evaluating Objects">
+<link href="Function-Forms.html" rel="prev" title="Function Forms">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Lambda-Forms">
+<div class="nav-panel">
+<p>
+Next: <a href="Self_002dEvaluating-Objects.html" accesskey="n" rel="next">Self-Evaluating Objects</a>, Previous: <a href="Function-Forms.html" accesskey="p" rel="prev">Function Forms</a>, Up: <a href="The-Evaluation-Model.html" accesskey="u" rel="up">The Evaluation Model</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Lambda-Forms-1"><span>3.1.2.11 Lambda Forms<a class="copiable-link" href="#Lambda-Forms-1"> &para;</a></span></h4>
+
+<p>A <i class="i">lambda form</i> is similar to a <i class="i">function form</i>, except that
+the <i class="i">function name</i> is replaced by a <i class="i">lambda expression</i>.
+</p>
+<p>A <i class="i">lambda form</i> is equivalent to using <i class="i">funcall</i> of a
+<i class="i">lexical closure</i> of the <i class="i">lambda expression</i> on the given <i class="i">arguments</i>.
+(In practice, some compilers are more likely to produce inline code 
+for a <i class="i">lambda form</i> than for an arbitrary named function 
+that has been declared <b class="b">inline</b>; however, such a difference
+is not semantic.)
+</p>
+<p>For further information, see <a class="ref" href="Lambda-Expressions.html">Lambda Expressions</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Lambda-Lists.html
@@ -0,0 +1,109 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Lambda Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation.html" rel="up" title="Evaluation and Compilation">
+<link href="Error-Checking-in-Function-Calls.html" rel="next" title="Error Checking in Function Calls">
+<link href="Declarations.html" rel="prev" title="Declarations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Lambda-Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Error-Checking-in-Function-Calls.html" accesskey="n" rel="next">Error Checking in Function Calls</a>, Previous: <a href="Declarations.html" accesskey="p" rel="prev">Declarations</a>, Up: <a href="Evaluation-and-Compilation.html" accesskey="u" rel="up">Evaluation and Compilation</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Lambda-Lists-1"><span>3.4 Lambda Lists<a class="copiable-link" href="#Lambda-Lists-1"> &para;</a></span></h3>
+
+
+<p>A <i class="i">lambda list</i>
+<a class="index-entry-id" id="index-lambda-list"></a>
+ is a <i class="i">list</i> that
+specifies a set of <i class="i">parameters</i> (sometimes called <i class="i">lambda variables</i>)
+and a protocol for receiving <i class="i">values</i> for those <i class="i">parameters</i>.
+</p>
+<p>There are several kinds of <i class="i">lambda lists</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted"> Context                                     Kind of Lambda List                             <!-- /@w -->
+ <b class="b">defun</b> <i class="i">form</i>                                  <i class="i">ordinary lambda list</i>                            <!-- /@w -->
+ <b class="b">defmacro</b> <i class="i">form</i>                               <i class="i">macro lambda list</i>                               <!-- /@w -->
+ <i class="i">lambda expression</i>                           <i class="i">ordinary lambda list</i>                            <!-- /@w -->
+ <b class="b">flet</b> local <i class="i">function</i> definition              <i class="i">ordinary lambda list</i>                            <!-- /@w -->
+ <b class="b">labels</b> local <i class="i">function</i> definition            <i class="i">ordinary lambda list</i>                            <!-- /@w -->
+ <b class="b">handler-case</b> <i class="i">clause</i> specification           <i class="i">ordinary lambda list</i>                            <!-- /@w -->
+ <b class="b">restart-case</b> <i class="i">clause</i> specification           <i class="i">ordinary lambda list</i>                            <!-- /@w -->
+ <b class="b">macrolet</b> local <i class="i">macro</i> definition             <i class="i">macro lambda list</i>                               <!-- /@w -->
+ <b class="b">define-method-combination</b>                   <i class="i">ordinary lambda list</i>                            <!-- /@w -->
+ <b class="b">define-method-combination</b> <code class="t">:arguments</code> option <i class="i">define-method-combination arguments lambda list</i> <!-- /@w -->
+ <b class="b">defstruct</b> <code class="t">:constructor</code> option               <i class="i">boa lambda list</i>                                 <!-- /@w -->
+ <b class="b">defgeneric</b> <i class="i">form</i>                             <i class="i">generic function lambda list</i>                    <!-- /@w -->
+ <b class="b">defgeneric</b> <i class="i">method</i> clause                    <i class="i">specialized lambda list</i>                         <!-- /@w -->
+ <b class="b">defmethod</b> <i class="i">form</i>                              <i class="i">specialized lambda list</i>                         <!-- /@w -->
+ <b class="b">defsetf</b> <i class="i">form</i>                                <i class="i">defsetf lambda list</i>                             <!-- /@w -->
+ <b class="b">define-setf-expander</b> <i class="i">form</i>                   <i class="i">macro lambda list</i>                               <!-- /@w -->
+ <b class="b">deftype</b> <i class="i">form</i>                                <i class="i">deftype lambda list</i>                             <!-- /@w -->
+ <b class="b">destructuring-bind</b> <i class="i">form</i>                     <i class="i">destructuring lambda list</i>                       <!-- /@w -->
+ <b class="b">define-compiler-macro</b> <i class="i">form</i>                  <i class="i">macro lambda list</i>                               <!-- /@w -->
+ <b class="b">define-modify-macro</b> <i class="i">form</i>                    <i class="i">define-modify-macro lambda list</i>                 <!-- /@w -->
+
+                         Figure 3&ndash;10: What Kind of Lambda Lists to Use                       <!-- /@w -->
+
+</pre></div></div>
+
+<p>Figure 3&ndash;11 lists some <i class="i">defined names</i> that are applicable
+to <i class="i">lambda lists</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  lambda-list-keywords  lambda-parameters-limit    <!-- /@w -->
+
+  Figure 3&ndash;11: Defined names applicable to lambda lists<!-- /@w -->
+
+</pre></div></div>
+
+
+<ul class="mini-toc">
+<li><a href="Ordinary-Lambda-Lists.html" accesskey="1">Ordinary Lambda Lists</a></li>
+<li><a href="Generic-Function-Lambda-Lists.html" accesskey="2">Generic Function Lambda Lists</a></li>
+<li><a href="Specialized-Lambda-Lists.html" accesskey="3">Specialized Lambda Lists</a></li>
+<li><a href="Macro-Lambda-Lists.html" accesskey="4">Macro Lambda Lists</a></li>
+<li><a href="Destructuring-Lambda-Lists.html" accesskey="5">Destructuring Lambda Lists</a></li>
+<li><a href="Boa-Lambda-Lists.html" accesskey="6">Boa Lambda Lists</a></li>
+<li><a href="Defsetf-Lambda-Lists.html" accesskey="7">Defsetf Lambda Lists</a></li>
+<li><a href="Deftype-Lambda-Lists.html" accesskey="8">Deftype Lambda Lists</a></li>
+<li><a href="Define_002dmodify_002dmacro-Lambda-Lists.html" accesskey="9">Define-modify-macro Lambda Lists</a></li>
+<li><a href="Define_002dmethod_002dcombination-Arguments-Lambda-Lists.html">Define-method-combination Arguments Lambda Lists</a></li>
+<li><a href="Syntactic-Interaction-of-Documentation-Strings-and-Declarations.html">Syntactic Interaction of Documentation Strings and Declarations</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Error-Checking-in-Function-Calls.html">Error Checking in Function Calls</a>, Previous: <a href="Declarations.html">Declarations</a>, Up: <a href="Evaluation-and-Compilation.html">Evaluation and Compilation</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Lambda_002dlist_002ddirected-Destructuring-by-Lambda-Lists.html
@@ -0,0 +1,133 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Lambda-list-directed Destructuring by Lambda Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Lambda-list-directed Destructuring by Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Lambda-list-directed Destructuring by Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Macro-Lambda-Lists.html" rel="up" title="Macro Lambda Lists">
+<link href="Examples-of-Data_002ddirected-Destructuring-by-Lambda-Lists.html" rel="prev" title="Examples of Data-directed Destructuring by Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Lambda_002dlist_002ddirected-Destructuring-by-Lambda-Lists">
+<div class="nav-panel">
+<p>
+Previous: <a href="Examples-of-Data_002ddirected-Destructuring-by-Lambda-Lists.html" accesskey="p" rel="prev">Examples of Data-directed Destructuring by Lambda Lists</a>, Up: <a href="Macro-Lambda-Lists.html" accesskey="u" rel="up">Macro Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Lambda_002dlist_002ddirected-Destructuring-by-Lambda-Lists-1"><span>3.4.4.4 Lambda-list-directed Destructuring by Lambda Lists<a class="copiable-link" href="#Lambda_002dlist_002ddirected-Destructuring-by-Lambda-Lists-1"> &para;</a></span></h4>
+
+<p>An extension of data-directed destructuring of <i class="i">trees</i> is
+lambda-list-directed destructuring.  This derives from the analogy
+between the three-element destructuring pattern
+</p>
+<p><code class="t">(first second third)</code>
+</p>
+<p>and the three-argument <i class="i">lambda list</i>
+</p>
+<p><code class="t">(first second third)</code>
+</p>
+<p>Lambda-list-directed destructuring is identical to data-directed destructuring
+if no <i class="i">lambda list keywords</i> appear in the pattern.  
+Any list in the pattern (whether a sub-list or the whole pattern itself)
+that contains a <i class="i">lambda list keyword</i> is interpreted specially.
+Elements of the list to the left of the first
+<i class="i">lambda list keyword</i> are treated as destructuring patterns, as usual, but the
+remaining elements of the list are treated like a function&rsquo;s 
+<i class="i">lambda list</i>
+except that where a variable would normally be required, an arbitrary
+destructuring pattern is allowed.  Note that in case of ambiguity,
+<i class="i">lambda list</i> syntax is preferred over destructuring syntax.  Thus, after
+<b class="b">&amp;optional</b> a list of elements is a list of a destructuring pattern
+and a default value form.
+</p>
+<p>The detailed behavior of each <i class="i">lambda list keyword</i> in a 
+lambda-list-directed destructuring
+pattern is as follows:
+</p>
+<dl class="table">
+<dt><b class="b">&amp;optional</b></dt>
+<dd><p>Each following element is a variable or a list of a destructuring
+pattern, a default value form, and a supplied-p variable.  The default value and
+the supplied-p variable can be omitted.  
+If the list being destructured ends
+early, so that it does not have an element to match against this destructuring
+(sub)-pattern, the default form is evaluated and destructured instead.  The
+supplied-p variable receives the value 
+<b class="b">nil</b> if the default form is used, <b class="b">t</b> otherwise.
+</p>
+</dd>
+<dt><b class="b">&amp;rest</b>, <b class="b">&amp;body</b></dt>
+<dd><p>The next element is a destructuring pattern that matches the
+rest of the list.  <b class="b">&amp;body</b> is identical to <b class="b">&amp;rest</b> but declares that what
+is being matched is a list of forms that constitutes the body of <i class="i">form</i>.
+This next element must be the last unless a <i class="i">lambda list keyword</i> follows it.
+</p>
+</dd>
+<dt><b class="b">&amp;aux</b></dt>
+<dd><p>The remaining elements are not destructuring patterns at all, but are
+auxiliary variable bindings.  
+</p>
+</dd>
+<dt><b class="b">&amp;whole</b></dt>
+<dd><p>The next element is a destructuring pattern that matches the entire
+form in a macro, or the entire <i class="i">subexpression</i> at inner levels.
+</p>
+</dd>
+<dt><b class="b">&amp;key</b></dt>
+<dd><p>Each following element is one of
+</p><dl class="table">
+<dt><code class="t"></code></dt>
+<dd><p>a <i class="i">variable</i>,
+</p>
+</dd>
+<dt>or</dt>
+<dd><p>a list of a variable,
+           an optional initialization form,
+       and an optional supplied-p variable.
+</p>
+</dd>
+<dt>or</dt>
+<dd><p>a list of a list of a keyword and a destructuring pattern,
+           an optional initialization form,
+       and an optional supplied-p variable.
+</p></dd>
+</dl>
+
+<p>The rest of the list being destructured
+is taken to be alternating keywords and values and is taken apart appropriately.
+</p>
+</dd>
+<dt><b class="b">&amp;allow-other-keys</b></dt>
+<dd><p>Stands by itself.
+</p></dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Examples-of-Data_002ddirected-Destructuring-by-Lambda-Lists.html">Examples of Data-directed Destructuring by Lambda Lists</a>, Up: <a href="Macro-Lambda-Lists.html">Macro Lambda Lists</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Language-Extensions.html
@@ -0,0 +1,109 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Language Extensions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Language Extensions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Language Extensions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-_0028Introduction_0029.html" rel="up" title="Introduction (Introduction)">
+<link href="Language-Subsets.html" rel="next" title="Language Subsets">
+<link href="Conformance.html" rel="prev" title="Conformance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Language-Extensions">
+<div class="nav-panel">
+<p>
+Next: <a href="Language-Subsets.html" accesskey="n" rel="next">Language Subsets</a>, Previous: <a href="Conformance.html" accesskey="p" rel="prev">Conformance</a>, Up: <a href="Introduction-_0028Introduction_0029.html" accesskey="u" rel="up">Introduction</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Language-Extensions-1"><span>1.6 Language Extensions<a class="copiable-link" href="#Language-Extensions-1"> &para;</a></span></h3>
+
+
+<p>A language extension is any documented <i class="i">implementation-defined</i> behavior
+of a <i class="i">defined name</i> in this standard that varies from the
+behavior described in this standard, or a documented consequence of a
+situation that the standard specifies as undefined, unspecified, or
+extendable by the implementation.  For example, if this standard says
+that &ldquo;the results are unspecified,&rdquo; an extension would be to specify
+the results.
+</p>
+<p>[Reviewer Note by Barmar: This contradicts previous definitions of conforming code.]
+If the correct behavior of a program depends on the results provided
+by an extension, only implementations with the same extension will
+execute the program correctly.  Note that such a program might be
+non-conforming.  Also, if this standard says that &ldquo;an implementation
+may be extended,&rdquo; a conforming, but possibly non-portable, program
+can be written using an extension.
+</p>
+<p>An implementation can have extensions, provided they do not alter the
+behavior of conforming code and provided they are not explicitly
+prohibited by this standard.
+</p>
+<p>The term &ldquo;extension&rdquo; refers only to extensions available upon
+startup.  An implementation is free to allow or prohibit redefinition
+of an extension.
+</p>
+<p>The following list contains specific guidance to implementations 
+concerning certain types of extensions.
+</p><dl class="table">
+<dt><b class="b">Extra return values</b></dt>
+<dd>
+<p>An implementation must return exactly
+the number of return values specified by this standard unless the
+standard specifically indicates otherwise.
+</p>
+</dd>
+<dt><b class="b">Unsolicited messages</b></dt>
+<dd>
+<p>No output can be produced by a function other than that specified in
+the standard or due to the signaling of <i class="i">conditions</i>
+detected by the function.
+</p>
+<p>Unsolicited output, such as garbage collection notifications and
+autoload heralds, should not go directly to the <i class="i">stream</i>
+that is the value of a <i class="i">stream</i> variable defined in this
+standard, but can go indirectly to <i class="i">terminal I/O</i> by using a
+<i class="i">synonym stream</i> to <b class="b">*terminal-io*</b>.
+</p>
+<p>Progress reports from such functions as <b class="b">load</b> and
+<b class="b">compile</b> are considered solicited, and are not covered by
+this prohibition.
+</p>
+</dd>
+<dt><b class="b">Implementation of macros and special forms</b></dt>
+<dd>
+<p><i class="i">Macros</i> and <i class="i">special operators</i> defined in this standard
+must not be <i class="i">functions</i>.
+</p>
+</dd>
+</dl>
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Language-Subsets.html">Language Subsets</a>, Previous: <a href="Conformance.html">Conformance</a>, Up: <a href="Introduction-_0028Introduction_0029.html">Introduction</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Language-Subsets.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Language Subsets (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Language Subsets (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Language Subsets (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-_0028Introduction_0029.html" rel="up" title="Introduction (Introduction)">
+<link href="Deprecated-Language-Features.html" rel="next" title="Deprecated Language Features">
+<link href="Language-Extensions.html" rel="prev" title="Language Extensions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Language-Subsets">
+<div class="nav-panel">
+<p>
+Next: <a href="Deprecated-Language-Features.html" accesskey="n" rel="next">Deprecated Language Features</a>, Previous: <a href="Language-Extensions.html" accesskey="p" rel="prev">Language Extensions</a>, Up: <a href="Introduction-_0028Introduction_0029.html" accesskey="u" rel="up">Introduction</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Language-Subsets-1"><span>1.7 Language Subsets<a class="copiable-link" href="#Language-Subsets-1"> &para;</a></span></h3>
+
+
+<p>The language described in this standard contains no subsets,
+though subsets are not forbidden.
+</p>
+<p>For a language to be considered a subset,
+it must have the property that any valid <i class="i">program</i> in that language
+has equivalent semantics and will run directly
+(with no extralingual pre-processing, and no special compatibility packages)
+in any <i class="i">conforming implementation</i> of the full language.
+</p>
+<p>A language that conforms to this requirement shall be described
+as being a &ldquo;subset of <span class="r">Common Lisp</span> as specified by ANSI &lt;&lt;<i class="i">standard number</i>&gt;&gt;.&rdquo;
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Leading-and-Trailing-Newlines-in-Condition-Reports.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Leading and Trailing Newlines in Condition Reports (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Leading and Trailing Newlines in Condition Reports (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Leading and Trailing Newlines in Condition Reports (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printing-Conditions.html" rel="up" title="Printing Conditions">
+<link href="Embedded-Newlines-in-Condition-Reports.html" rel="next" title="Embedded Newlines in Condition Reports">
+<link href="Capitalization-and-Punctuation-in-Condition-Reports.html" rel="prev" title="Capitalization and Punctuation in Condition Reports">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Leading-and-Trailing-Newlines-in-Condition-Reports">
+<div class="nav-panel">
+<p>
+Next: <a href="Embedded-Newlines-in-Condition-Reports.html" accesskey="n" rel="next">Embedded Newlines in Condition Reports</a>, Previous: <a href="Capitalization-and-Punctuation-in-Condition-Reports.html" accesskey="p" rel="prev">Capitalization and Punctuation in Condition Reports</a>, Up: <a href="Printing-Conditions.html" accesskey="u" rel="up">Printing Conditions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Leading-and-Trailing-Newlines-in-Condition-Reports-1"><span>9.1.3.3 Leading and Trailing Newlines in Condition Reports<a class="copiable-link" href="#Leading-and-Trailing-Newlines-in-Condition-Reports-1"> &para;</a></span></h4>
+
+<p>It is recommended that a <i class="i">report message</i> not begin with any 
+introductory text, such as &ldquo;<code class="t">Error: </code>&rdquo; or &ldquo;<code class="t">Warning: </code>&rdquo;
+or even just <i class="i">freshline</i> or <i class="i">newline</i>. 
+Such text is added, if appropriate to the context,
+by the routine invoking the <i class="i">condition reporter</i>.
+</p>
+<p>It is recommended that a <i class="i">report message</i> not be followed 
+by a trailing <i class="i">freshline</i> or <i class="i">newline</i>.
+Such text is added, if appropriate to the context, 
+by the routine invoking the <i class="i">condition reporter</i>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (error &quot;This is a message.~
+ (error &quot;~&amp;This is a message.&quot;)   ; Not recommended
+ (error &quot;~&amp;This is a message.~
+
+ (error &quot;This is a message.&quot;)     ; Recommended instead
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Left_002dParenthesis.html
@@ -0,0 +1,104 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Left-Parenthesis (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Left-Parenthesis (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Left-Parenthesis (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standard-Macro-Characters.html" rel="up" title="Standard Macro Characters">
+<link href="Right_002dParenthesis.html" rel="next" title="Right-Parenthesis">
+<link href="Standard-Macro-Characters.html" rel="prev" title="Standard Macro Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Left_002dParenthesis">
+<div class="nav-panel">
+<p>
+Next: <a href="Right_002dParenthesis.html" accesskey="n" rel="next">Right-Parenthesis</a>, Previous: <a href="Standard-Macro-Characters.html" accesskey="p" rel="prev">Standard Macro Characters</a>, Up: <a href="Standard-Macro-Characters.html" accesskey="u" rel="up">Standard Macro Characters</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Left_002dParenthesis-1"><span>2.4.1 Left-Parenthesis<a class="copiable-link" href="#Left_002dParenthesis-1"> &para;</a></span></h4>
+
+<p>The <i class="i">left-parenthesis</i> initiates reading of a <i class="i">list</i>.
+<b class="b">read</b> is called recursively to read successive <i class="i">objects</i>
+until a right parenthesis is found in the input <i class="i">stream</i>.
+A <i class="i">list</i> of the <i class="i">objects</i> read is returned.  Thus
+</p>
+<div class="example">
+<pre class="example-preformatted"> (a b c)
+</pre></div>
+
+<p>is read as a <i class="i">list</i> of three <i class="i">objects</i>
+(the <i class="i">symbols</i> <code class="t">a</code>, <code class="t">b</code>, and <code class="t">c</code>).
+The right parenthesis need not immediately follow the printed representation of
+the last <i class="i">object</i>; <i class="i">whitespace</i>_2                              
+characters and comments may precede it.
+</p>
+<p>If no <i class="i">objects</i> precede the right parenthesis, 
+it reads as a <i class="i">list</i> of zero <i class="i">objects</i> 
+(the <i class="i">empty list</i>).
+</p>
+<p>If a <i class="i">token</i> that is just a dot
+not immediately preceded by an escape character
+is read after some <i class="i">object</i>
+then exactly one more <i class="i">object</i> must follow the dot,
+possibly preceded or followed by <i class="i">whitespace</i>_2 or a comment,
+followed by the right parenthesis:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (a b c . d)
+</pre></div>
+
+<p>This means that the <i class="i">cdr</i> of the last <i class="i">cons</i> in the 
+<i class="i">list</i> is not <b class="b">nil</b>,
+but rather the <i class="i">object</i> whose representation followed the dot.
+The above example might have been the result of evaluating
+</p>
+<div class="example">
+<pre class="example-preformatted"> (cons 'a (cons 'b (cons 'c 'd)))
+</pre></div>
+
+<p>Similarly,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (cons 'this-one 'that-one) &rArr;  (this-one . that-one)
+</pre></div>
+
+<p>It is permissible for the <i class="i">object</i> 
+following the dot to be a <i class="i">list</i>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (a b c d . (e f . (g))) &equiv; (a b c d e f g)
+</pre></div>
+
+<p>For information on how the <i class="i">Lisp printer</i> prints <i class="i">lists</i> and <i class="i">conses</i>,
+see <a class="ref" href="Printing-Lists-and-Conses.html">Printing Lists and Conses</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Right_002dParenthesis.html">Right-Parenthesis</a>, Previous: <a href="Standard-Macro-Characters.html">Standard Macro Characters</a>, Up: <a href="Standard-Macro-Characters.html">Standard Macro Characters</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Lexical-Environments.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Lexical Environments (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Lexical Environments (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Lexical Environments (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Environments.html" rel="up" title="Introduction to Environments">
+<link href="The-Null-Lexical-Environment.html" rel="next" title="The Null Lexical Environment">
+<link href="Dynamic-Environments.html" rel="prev" title="Dynamic Environments">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Lexical-Environments">
+<div class="nav-panel">
+<p>
+Next: <a href="The-Null-Lexical-Environment.html" accesskey="n" rel="next">The Null Lexical Environment</a>, Previous: <a href="Dynamic-Environments.html" accesskey="p" rel="prev">Dynamic Environments</a>, Up: <a href="Introduction-to-Environments.html" accesskey="u" rel="up">Introduction to Environments</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Lexical-Environments-1"><span>3.1.1.3 Lexical Environments<a class="copiable-link" href="#Lexical-Environments-1"> &para;</a></span></h4>
+
+<p>A <i class="i">lexical environment</i>
+<a class="index-entry-id" id="index-lexical-environment"></a>
+ for <i class="i">evaluation</i> at some position in a <i class="i">program</i>
+is that part of the <i class="i">environment</i> that contains information having 
+<i class="i">lexical scope</i> within the <i class="i">forms</i> containing that position.
+A <i class="i">lexical environment</i> contains, among other things, the following:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p><i class="i">bindings</i> of <i class="i">lexical variables</i> and <i class="i">symbol macros</i>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p><i class="i">bindings</i> of <i class="i">functions</i> and <i class="i">macros</i>.
+             (Implicit in this is information about those <i class="i">compiler macros</i> 
+	      that are locally disabled.)
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p><i class="i">bindings</i> of <i class="i">block tags</i>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p><i class="i">bindings</i> of <i class="i">go tags</i>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>information about <i class="i">declarations</i>.
+</p></dd>
+</dl>
+
+<p>The <i class="i">lexical environment</i> that is active at any given position
+in a <i class="i">program</i> being semantically processed is referred to by
+definite reference as &ldquo;the current <i class="i">lexical environment</i>,&rdquo;
+or sometimes as just &ldquo;the <i class="i">lexical environment</i>.&rdquo;  
+</p>
+<p>Within a given <i class="i">namespace</i>,
+a <i class="i">name</i> is said to be <i class="i">bound</i> in a <i class="i">lexical environment</i>
+if there is a <i class="i">binding</i> 
+associated with its <i class="i">name</i>
+in the <i class="i">lexical environment</i> or, if not, there is a <i class="i">binding</i> 
+associated with its name in the <i class="i">global environment</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Lexical-Variables.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Lexical Variables (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Lexical Variables (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Lexical Variables (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Evaluation-Model.html" rel="up" title="The Evaluation Model">
+<link href="Dynamic-Variables.html" rel="next" title="Dynamic Variables">
+<link href="Symbols-as-Forms.html" rel="prev" title="Symbols as Forms">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Lexical-Variables">
+<div class="nav-panel">
+<p>
+Next: <a href="Dynamic-Variables.html" accesskey="n" rel="next">Dynamic Variables</a>, Previous: <a href="Symbols-as-Forms.html" accesskey="p" rel="prev">Symbols as Forms</a>, Up: <a href="The-Evaluation-Model.html" accesskey="u" rel="up">The Evaluation Model</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Lexical-Variables-1"><span>3.1.2.3 Lexical Variables<a class="copiable-link" href="#Lexical-Variables-1"> &para;</a></span></h4>
+
+<p>A <i class="i">lexical variable</i> is a <i class="i">variable</i> that can be referenced only within 
+the <i class="i">lexical scope</i> of the <i class="i">form</i> that establishes that <i class="i">variable</i>;
+<i class="i">lexical variables</i> have <i class="i">lexical scope</i>.
+Each time a <i class="i">form</i> creates a <i class="i">lexical binding</i> of a <i class="i">variable</i>,
+a <i class="i">fresh</i> <i class="i">binding</i> is <i class="i">established</i>.
+</p>
+<p>Within the <i class="i">scope</i> of a <i class="i">binding</i> for a <i class="i">lexical variable</i> <i class="i">name</i>,
+uses of that <i class="i">name</i> as a <i class="i">variable</i> are considered to be references
+to that <i class="i">binding</i> except where the <i class="i">variable</i> is <i class="i">shadowed</i>_2 
+by a <i class="i">form</i> that <i class="i">establishes</i> a <i class="i">fresh</i> <i class="i">binding</i> for that 
+<i class="i">variable</i> <i class="i">name</i>,
+or by a <i class="i">form</i> that locally <i class="i">declares</i> the <i class="i">name</i> <b class="b">special</b>.
+</p>
+<p>A <i class="i">lexical variable</i> always has a <i class="i">value</i>.
+There is no <i class="i">operator</i> that introduces a <i class="i">binding</i> for a
+<i class="i">lexical variable</i> without giving it an initial <i class="i">value</i>, nor
+is there any <i class="i">operator</i> that can make a <i class="i">lexical variable</i> be <i class="i">unbound</i>.
+</p>
+<p><i class="i">Bindings</i> of <i class="i">lexical variables</i> are found in the <i class="i">lexical environment</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Lists-as-Association-Lists.html
@@ -0,0 +1,59 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Lists as Association Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Lists as Association Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Lists as Association Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-as-Lists.html" rel="up" title="Conses as Lists">
+<link href="Lists-as-Sets.html" rel="next" title="Lists as Sets">
+<link href="Conses-as-Lists.html" rel="prev" title="Conses as Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Lists-as-Association-Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Lists-as-Sets.html" accesskey="n" rel="next">Lists as Sets</a>, Previous: <a href="Conses-as-Lists.html" accesskey="p" rel="prev">Conses as Lists</a>, Up: <a href="Conses-as-Lists.html" accesskey="u" rel="up">Conses as Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Lists-as-Association-Lists-1"><span>14.1.2.1 Lists as Association Lists<a class="copiable-link" href="#Lists-as-Association-Lists-1"> &para;</a></span></h4>
+
+<p>An <i class="i">association list</i>
+<a class="index-entry-id" id="index-association-list"></a>
+ is a <i class="i">list</i> of <i class="i">conses</i> 
+representing an association of <i class="i">keys</i> with <i class="i">values</i>, 
+where the <i class="i">car</i> of each <i class="i">cons</i> is the <i class="i">key</i> 
+and the <i class="i">cdr</i> is the <i class="i">value</i> associated with that <i class="i">key</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  acons  assoc-if      pairlis  rassoc-if      <!-- /@w -->
+  assoc  assoc-if-not  rassoc   rassoc-if-not  <!-- /@w -->
+
+  Figure 14&ndash;4: Some defined names related to assocation lists.<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Lists-as-Sets.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Lists as Sets (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Lists as Sets (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Lists as Sets (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-as-Lists.html" rel="up" title="Conses as Lists">
+<link href="General-Restrictions-on-Parameters-that-must-be-Lists.html" rel="next" title="General Restrictions on Parameters that must be Lists">
+<link href="Lists-as-Association-Lists.html" rel="prev" title="Lists as Association Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Lists-as-Sets">
+<div class="nav-panel">
+<p>
+Next: <a href="General-Restrictions-on-Parameters-that-must-be-Lists.html" accesskey="n" rel="next">General Restrictions on Parameters that must be Lists</a>, Previous: <a href="Lists-as-Association-Lists.html" accesskey="p" rel="prev">Lists as Association Lists</a>, Up: <a href="Conses-as-Lists.html" accesskey="u" rel="up">Conses as Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Lists-as-Sets-1"><span>14.1.2.2 Lists as Sets<a class="copiable-link" href="#Lists-as-Sets-1"> &para;</a></span></h4>
+
+<p><i class="i">Lists</i> are sometimes viewed as sets by considering their elements
+unordered and by assuming there is no duplication of elements.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  adjoin         nset-difference    set-difference    union  <!-- /@w -->
+  intersection   nset-exclusive-or  set-exclusive-or         <!-- /@w -->
+  nintersection  nunion             subsetp                  <!-- /@w -->
+
+       Figure 14&ndash;5: Some defined names related to sets.     <!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Literal-Objects-in-Compiled-Files.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Literal Objects in Compiled Files (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Literal Objects in Compiled Files (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Literal Objects in Compiled Files (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Compilation.html" rel="up" title="Compilation">
+<link href="Exceptional-Situations-in-the-Compiler.html" rel="next" title="Exceptional Situations in the Compiler">
+<link href="File-Compilation.html" rel="prev" title="File Compilation">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Literal-Objects-in-Compiled-Files">
+<div class="nav-panel">
+<p>
+Next: <a href="Exceptional-Situations-in-the-Compiler.html" accesskey="n" rel="next">Exceptional Situations in the Compiler</a>, Previous: <a href="File-Compilation.html" accesskey="p" rel="prev">File Compilation</a>, Up: <a href="Compilation.html" accesskey="u" rel="up">Compilation</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Literal-Objects-in-Compiled-Files-1"><span>3.2.4 Literal Objects in Compiled Files<a class="copiable-link" href="#Literal-Objects-in-Compiled-Files-1"> &para;</a></span></h4>
+
+<p>The functions <b class="b">eval</b> and <b class="b">compile</b> are
+required to ensure that <i class="i">literal objects</i> referenced within the resulting
+interpreted or compiled code objects are the <i class="i">same</i> as the
+corresponding <i class="i">objects</i> in the <i class="i">source code</i>.
+<b class="b">compile-file</b>, on the other hand, 
+must produce a <i class="i">compiled file</i> that, when loaded with
+<b class="b">load</b>, constructs the <i class="i">objects</i> defined by the
+<i class="i">source code</i> and produces references to them.
+</p>
+<p>In the case of <b class="b">compile-file</b>, <i class="i">objects</i>
+constructed by <b class="b">load</b> of the <i class="i">compiled file</i> cannot be spoken
+of as being the <i class="i">same</i> as the <i class="i">objects</i> constructed at
+compile time, because the <i class="i">compiled file</i> may be loaded into a different
+<i class="i">Lisp image</i> than the one in which it was compiled.  This section
+defines the concept of <i class="i">similarity</i> which relates
+<i class="i">objects</i> in the <i class="i">evaluation environment</i> to the
+corresponding <i class="i">objects</i> in the <i class="i">run-time environment</i>.
+</p>
+<p>The constraints on <i class="i">literal objects</i> described in this section
+apply only to <b class="b">compile-file</b>;
+<b class="b">eval</b> and <b class="b">compile</b> do not copy or coalesce constants.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Externalizable-Objects.html" accesskey="1">Externalizable Objects</a></li>
+<li><a href="Similarity-of-Literal-Objects.html" accesskey="2">Similarity of Literal Objects</a></li>
+<li><a href="Similarity-of-Aggregate-Objects.html" accesskey="3">Similarity of Aggregate Objects</a></li>
+<li><a href="Definition-of-Similarity.html" accesskey="4">Definition of Similarity</a></li>
+<li><a href="Extensions-to-Similarity-Rules.html" accesskey="5">Extensions to Similarity Rules</a></li>
+<li><a href="Additional-Constraints-on-Externalizable-Objects.html" accesskey="6">Additional Constraints on Externalizable Objects</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Loading.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Loading (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Loading (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Loading (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="System-Construction-Concepts.html" rel="up" title="System Construction Concepts">
+<link href="Features.html" rel="next" title="Features">
+<link href="System-Construction-Concepts.html" rel="prev" title="System Construction Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Loading">
+<div class="nav-panel">
+<p>
+Next: <a href="Features.html" accesskey="n" rel="next">Features</a>, Previous: <a href="System-Construction-Concepts.html" accesskey="p" rel="prev">System Construction Concepts</a>, Up: <a href="System-Construction-Concepts.html" accesskey="u" rel="up">System Construction Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Loading-1"><span>24.1.1 Loading<a class="copiable-link" href="#Loading-1"> &para;</a></span></h4>
+
+<p>To <b class="b">load</b> a <i class="i">file</i> is to treat its contents as <i class="i">code</i>
+and <i class="i">execute</i> that <i class="i">code</i>.
+The <i class="i">file</i> may contain <i class="i">source code</i>
+<a class="index-entry-id" id="index-source-code"></a>
+ or <i class="i">compiled code</i>
+<a class="index-entry-id" id="index-compiled-code-1"></a>
+.
+</p>
+<p>A <i class="i">file</i> containing <i class="i">source code</i> is called a <i class="i">source file</i>
+<a class="index-entry-id" id="index-source-file"></a>
+.
+<i class="i">Loading</i> a <i class="i">source file</i> is accomplished essentially 
+by sequentially <i class="i">reading</i>_2 the <i class="i">forms</i> in the file,
+<i class="i">evaluating</i> each immediately after it is <i class="i">read</i>.
+</p>
+<p>A <i class="i">file</i> containing <i class="i">compiled code</i> is called a <i class="i">compiled file</i>
+<a class="index-entry-id" id="index-compiled-file"></a>
+.
+<i class="i">Loading</i> a <i class="i">compiled file</i> is similar to <i class="i">loading</i> a <i class="i">source file</i>,
+except that the <i class="i">file</i> does not contain text but rather an
+<i class="i">implementation-dependent</i> representation of pre-digested <i class="i">expressions</i>
+created by the <i class="i">compiler</i>.  Often, a <i class="i">compiled file</i> can be <i class="i">loaded</i>
+more quickly than a <i class="i">source file</i>.
+See <a class="ref" href="Compilation.html">Compilation</a>.
+</p>
+<p>The way in which a <i class="i">source file</i> is distinguished from a <i class="i">compiled file</i> 
+is <i class="i">implementation-dependent</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Local-Case-in-Pathname-Components.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Local Case in Pathname Components (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Local Case in Pathname Components (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Local Case in Pathname Components (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Common-Case-in-Pathname-Components.html" rel="next" title="Common Case in Pathname Components">
+<link href="Case-in-Pathname-Components.html" rel="prev" title="Case in Pathname Components">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Local-Case-in-Pathname-Components">
+<div class="nav-panel">
+<p>
+Next: <a href="Common-Case-in-Pathname-Components.html" accesskey="n" rel="next">Common Case in Pathname Components</a>, Previous: <a href="Case-in-Pathname-Components.html" accesskey="p" rel="prev">Case in Pathname Components</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Local-Case-in-Pathname-Components-1"><span>19.2.2.4 Local Case in Pathname Components<a class="copiable-link" href="#Local-Case-in-Pathname-Components-1"> &para;</a></span></h4>
+
+<p>For the functions in <i class="i">Figure~19&ndash;2</i>,
+a value of <code class="t">:local</code>
+ for the <code class="t">:case</code> argument 
+(the default for these functions)
+indicates that the functions should receive and yield <i class="i">strings</i> in component values
+as if they were already represented according to the host <i class="i">file system</i>&rsquo;s 
+convention for <i class="i">case</i>.
+</p>
+<p>If the <i class="i">file system</i> supports both <i class="i">cases</i>, <i class="i">strings</i> given or received
+as <i class="i">pathname</i> component values under this protocol are to be used exactly
+as written.  If the file system only supports one <i class="i">case</i>, 
+the <i class="i">strings</i> will be translated to that <i class="i">case</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Local-Variable-Initializations.html
@@ -0,0 +1,129 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Local Variable Initializations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Local Variable Initializations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Local Variable Initializations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="up" title="Variable Initialization and Stepping Clauses">
+<link href="Examples-of-WITH-clause.html" rel="next" title="Examples of WITH clause">
+<link href="Examples-of-for_002das_002dpackage-subclause.html" rel="prev" title="Examples of for-as-package subclause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Local-Variable-Initializations">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-WITH-clause.html" accesskey="n" rel="next">Examples of WITH clause</a>, Previous: <a href="Examples-of-for_002das_002dpackage-subclause.html" accesskey="p" rel="prev">Examples of for-as-package subclause</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="u" rel="up">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Local-Variable-Initializations-1"><span>6.1.2.15 Local Variable Initializations<a class="copiable-link" href="#Local-Variable-Initializations-1"> &para;</a></span></h4>
+
+<p>When a <b class="b">loop</b> <i class="i">form</i> is executed, the local variables are bound and are
+initialized to some value.  These local variables exist until <b class="b">loop</b>
+iteration terminates, at which point they cease to exist.  
+Implicit variables are also established by iteration control clauses and the
+<code class="t">into</code> preposition of accumulation clauses.
+</p>
+<p>The <code class="t">with</code> construct initializes variables that are local to 
+a loop.  The variables are initialized one time only.
+If the optional <i class="i">type-spec</i> argument is supplied for the variable 
+<i class="i">var</i>, but there is no related expression to be evaluated, <i class="i">var</i>
+is initialized to an appropriate default value for its <i class="i">type</i>.
+For example, for the types <b class="b">t</b>, <b class="b">number</b>, 
+and <b class="b">float</b>,
+the default values are <b class="b">nil</b>, <code class="t">0</code>, and <code class="t">0.0</code> respectively.
+The consequences are undefined if a 
+<i class="i">type-spec</i> argument is supplied for <i class="i">var</i> if
+the related expression returns a value that is not of the supplied 
+<i class="i">type</i>.
+By default, the <code class="t">with</code> construct initializes variables
+<i class="i">sequentially</i>; that is, one variable is assigned a value before the
+next expression is evaluated.  However, by using the <i class="i">loop keyword</i> <code class="t">and</code>
+to join several <code class="t">with</code> clauses, 
+initializations can be forced to occur in <i class="i">parallel</i>; that 
+is, all of the supplied
+<i class="i">forms</i> are evaluated, and the results are bound to the respective
+variables simultaneously.
+</p>
+<p><i class="i">Sequential</i> <i class="i">binding</i> is used when it is desireable for the initialization of
+some variables to depend on the values of previously bound variables.
+For example, suppose the variables <code class="t">a</code>, <code class="t">b</code>, and <code class="t">c</code> are to be bound in sequence:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (loop with a = 1 
+       with b = (+ a 2) 
+       with c = (+ b 3)
+       return (list a b c))
+&rArr;  (1 3 6)
+</pre></div>
+
+<p>The execution of the above <b class="b">loop</b> is equivalent to the execution of
+the following code:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (block nil
+   (let* ((a 1)
+          (b (+ a 2))
+          (c (+ b 3)))
+     (tagbody
+         (next-loop (return (list a b c))
+                    (go next-loop)
+                    end-loop))))
+</pre></div>
+
+<p>If the values of previously bound variables are not needed
+for the initialization of other local variables, an 
+<code class="t">and</code> clause can be used to 
+specify that the bindings are to occur in <i class="i">parallel</i>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (loop with a = 1 
+       and b = 2 
+       and c = 3
+       return (list a b c))
+&rArr;  (1 2 3)
+</pre></div>
+
+<p>The execution of the above loop is equivalent to the execution of
+the following code:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (block nil
+   (let ((a 1)
+         (b 2)
+         (c 3))
+     (tagbody
+         (next-loop (return (list a b c))
+                    (go next-loop)
+                    end-loop))))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-WITH-clause.html">Examples of WITH clause</a>, Previous: <a href="Examples-of-for_002das_002dpackage-subclause.html">Examples of for-as-package subclause</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Locating-a-Symbol-in-a-Package.html
@@ -0,0 +1,59 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Locating a Symbol in a Package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Locating a Symbol in a Package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Locating a Symbol in a Package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Packages.html" rel="up" title="Introduction to Packages">
+<link href="Prevention-of-Name-Conflicts-in-Packages.html" rel="next" title="Prevention of Name Conflicts in Packages">
+<link href="Accessibility-of-Symbols-in-a-Package.html" rel="prev" title="Accessibility of Symbols in a Package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Locating-a-Symbol-in-a-Package">
+<div class="nav-panel">
+<p>
+Next: <a href="Prevention-of-Name-Conflicts-in-Packages.html" accesskey="n" rel="next">Prevention of Name Conflicts in Packages</a>, Previous: <a href="Accessibility-of-Symbols-in-a-Package.html" accesskey="p" rel="prev">Accessibility of Symbols in a Package</a>, Up: <a href="Introduction-to-Packages.html" accesskey="u" rel="up">Introduction to Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Locating-a-Symbol-in-a-Package-1"><span>11.1.1.6 Locating a Symbol in a Package<a class="copiable-link" href="#Locating-a-Symbol-in-a-Package-1"> &para;</a></span></h4>
+
+<p>When a <i class="i">symbol</i> is to be located in a given <i class="i">package</i> 
+the following occurs:
+</p><dl class="table">
+<dt>&ndash;</dt>
+<dd><p>The <i class="i">external symbols</i> and <i class="i">internal symbols</i> of the 
+<i class="i">package</i> are searched for the <i class="i">symbol</i>.
+</p></dd>
+<dt>&ndash;</dt>
+<dd><p>The <i class="i">external symbols</i> of the used <i class="i">packages</i> are 
+searched
+in some unspecified order.  The
+order does not matter; see the rules for handling name
+conflicts listed below. 
+</p></dd>
+</dl>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Logical-Operations-on-Integers.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Logical Operations on Integers (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Logical Operations on Integers (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Logical Operations on Integers (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numeric-Operations.html" rel="up" title="Numeric Operations">
+<link href="Byte-Operations-on-Integers.html" rel="next" title="Byte Operations on Integers">
+<link href="Viewing-Integers-as-Bits-and-Bytes.html" rel="prev" title="Viewing Integers as Bits and Bytes">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Logical-Operations-on-Integers">
+<div class="nav-panel">
+<p>
+Next: <a href="Byte-Operations-on-Integers.html" accesskey="n" rel="next">Byte Operations on Integers</a>, Previous: <a href="Viewing-Integers-as-Bits-and-Bytes.html" accesskey="p" rel="prev">Viewing Integers as Bits and Bytes</a>, Up: <a href="Numeric-Operations.html" accesskey="u" rel="up">Numeric Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Logical-Operations-on-Integers-1"><span>12.1.1.5 Logical Operations on Integers<a class="copiable-link" href="#Logical-Operations-on-Integers-1"> &para;</a></span></h4>
+
+<p>Logical operations require <i class="i">integers</i> as arguments;
+an error of <i class="i">type</i> <b class="b">type-error</b> should be signaled 
+if an argument is supplied that is not an <i class="i">integer</i>.
+<i class="i">Integer</i> arguments to logical operations are treated as if
+they were represented in two&rsquo;s-complement notation.
+</p>
+<p>Figure 12&ndash;5 shows <i class="i">defined names</i> relating to
+logical operations on numbers.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  ash          boole-ior       logbitp   <!-- /@w -->
+  boole        boole-nand      logcount  <!-- /@w -->
+  boole-1      boole-nor       logeqv    <!-- /@w -->
+  boole-2      boole-orc1      logior    <!-- /@w -->
+  boole-and    boole-orc2      lognand   <!-- /@w -->
+  boole-andc1  boole-set       lognor    <!-- /@w -->
+  boole-andc2  boole-xor       lognot    <!-- /@w -->
+  boole-c1     integer-length  logorc1   <!-- /@w -->
+  boole-c2     logand          logorc2   <!-- /@w -->
+  boole-clr    logandc1        logtest   <!-- /@w -->
+  boole-eqv    logandc2        logxor    <!-- /@w -->
+
+  Figure 12&ndash;5: Defined names relating to logical operations on numbers.<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Logical-Pathname-Components.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Logical Pathname Components (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Logical Pathname Components (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Logical Pathname Components (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Logical-Pathnames.html" rel="up" title="Logical Pathnames">
+<link href="Syntax-of-Logical-Pathname-Namestrings.html" rel="prev" title="Syntax of Logical Pathname Namestrings">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Logical-Pathname-Components">
+<div class="nav-panel">
+<p>
+Previous: <a href="Syntax-of-Logical-Pathname-Namestrings.html" accesskey="p" rel="prev">Syntax of Logical Pathname Namestrings</a>, Up: <a href="Logical-Pathnames.html" accesskey="u" rel="up">Logical Pathnames</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Logical-Pathname-Components-1"><span>19.3.2 Logical Pathname Components<a class="copiable-link" href="#Logical-Pathname-Components-1"> &para;</a></span></h4>
+
+
+<ul class="mini-toc">
+<li><a href="Unspecific-Components-of-a-Logical-Pathname.html" accesskey="1">Unspecific Components of a Logical Pathname</a></li>
+<li><a href="Null-Strings-as-Components-of-a-Logical-Pathname.html" accesskey="2">Null Strings as Components of a Logical Pathname</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Logical-Pathnames.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Logical Pathnames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Logical Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Logical Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames.html" rel="up" title="Filenames">
+<link href="Filenames-Dictionary.html" rel="next" title="Filenames Dictionary">
+<link href="Pathnames.html" rel="prev" title="Pathnames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Logical-Pathnames">
+<div class="nav-panel">
+<p>
+Next: <a href="Filenames-Dictionary.html" accesskey="n" rel="next">Filenames Dictionary</a>, Previous: <a href="Pathnames.html" accesskey="p" rel="prev">Pathnames</a>, Up: <a href="Filenames.html" accesskey="u" rel="up">Filenames</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Logical-Pathnames-1"><span>19.3 Logical Pathnames<a class="copiable-link" href="#Logical-Pathnames-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Syntax-of-Logical-Pathname-Namestrings.html" accesskey="1">Syntax of Logical Pathname Namestrings</a></li>
+<li><a href="Logical-Pathname-Components.html" accesskey="2">Logical Pathname Components</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Loop-Keywords.html
@@ -0,0 +1,59 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Loop Keywords (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Loop Keywords (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Loop Keywords (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-the-Loop-Facility.html" rel="up" title="Overview of the Loop Facility">
+<link href="Parsing-Loop-Clauses.html" rel="next" title="Parsing Loop Clauses">
+<link href="Extended-Loop.html" rel="prev" title="Extended Loop">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Loop-Keywords">
+<div class="nav-panel">
+<p>
+Next: <a href="Parsing-Loop-Clauses.html" accesskey="n" rel="next">Parsing Loop Clauses</a>, Previous: <a href="Extended-Loop.html" accesskey="p" rel="prev">Extended Loop</a>, Up: <a href="Overview-of-the-Loop-Facility.html" accesskey="u" rel="up">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Loop-Keywords-1"><span>6.1.1.4 Loop Keywords<a class="copiable-link" href="#Loop-Keywords-1"> &para;</a></span></h4>
+
+<p><i class="i">Loop keywords</i> are not true <i class="i">keywords</i>_1; 
+they are special <i class="i">symbols</i>, recognized by <i class="i">name</i> rather than <i class="i">object</i> identity,
+that are meaningful only to the <b class="b">loop</b> facility.
+A <i class="i">loop keyword</i> is a <i class="i">symbol</i> but is recognized by its <i class="i">name</i>
+(not its identity), regardless of the <i class="i">packages</i> in which it is <i class="i">accessible</i>.  
+</p>
+<p>In general, <i class="i">loop keywords</i> are not <i class="i">external symbols</i> of the <code class="t">COMMON-LISP</code> <i class="i">package</i>,
+except in the coincidental situation that a <i class="i">symbol</i> with the same name as a
+<i class="i">loop keyword</i> was needed for some other purpose in <span class="r">Common Lisp</span>.  For example,
+there is a <i class="i">symbol</i> in the <code class="t">COMMON-LISP</code> <i class="i">package</i> whose <i class="i">name</i> is <code class="t">&quot;UNLESS&quot;</code> but
+not one whose <i class="i">name</i> is <code class="t">&quot;UNTIL&quot;</code>.
+</p>
+<p>If no <i class="i">loop keywords</i> are supplied in a <b class="b">loop</b> <i class="i">form</i>,
+the Loop Facility executes the loop body repeatedly; see <a class="ref" href="Simple-Loop.html">Simple Loop</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Lowercase-Characters.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Lowercase Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Lowercase Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Lowercase Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Categories.html" rel="up" title="Character Categories">
+<link href="Corresponding-Characters-in-the-Other-Case.html" rel="next" title="Corresponding Characters in the Other Case">
+<link href="Uppercase-Characters.html" rel="prev" title="Uppercase Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Lowercase-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Corresponding-Characters-in-the-Other-Case.html" accesskey="n" rel="next">Corresponding Characters in the Other Case</a>, Previous: <a href="Uppercase-Characters.html" accesskey="p" rel="prev">Uppercase Characters</a>, Up: <a href="Character-Categories.html" accesskey="u" rel="up">Character Categories</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Lowercase-Characters-1"><span>13.1.4.5 Lowercase Characters<a class="copiable-link" href="#Lowercase-Characters-1"> &para;</a></span></h4>
+
+<p>A lowercase <i class="i">character</i> is one that has a corresponding 
+<i class="i">uppercase</i> <i class="i">character</i> that is <i class="i">different</i> 
+(and can be obtained using <b class="b">char-upcase</b>).
+</p>
+<p>Of the <i class="i">standard characters</i>, only these are <i class="i">lowercase</i> <i class="i">characters</i>:
+</p>
+<p><code class="t">a b c d e f g h i j k l m n o p q r s t u v w x y z</code>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Lowercase-Letters-in-a-Logical-Pathname-Namestring.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Lowercase Letters in a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Lowercase Letters in a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Lowercase Letters in a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Syntax-of-Logical-Pathname-Namestrings.html" rel="up" title="Syntax of Logical Pathname Namestrings">
+<link href="Other-Syntax-in-a-Logical-Pathname-Namestring.html" rel="next" title="Other Syntax in a Logical Pathname Namestring">
+<link href="Wildcard-Words-in-a-Logical-Pathname-Namestring.html" rel="prev" title="Wildcard Words in a Logical Pathname Namestring">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Lowercase-Letters-in-a-Logical-Pathname-Namestring">
+<div class="nav-panel">
+<p>
+Next: <a href="Other-Syntax-in-a-Logical-Pathname-Namestring.html" accesskey="n" rel="next">Other Syntax in a Logical Pathname Namestring</a>, Previous: <a href="Wildcard-Words-in-a-Logical-Pathname-Namestring.html" accesskey="p" rel="prev">Wildcard Words in a Logical Pathname Namestring</a>, Up: <a href="Syntax-of-Logical-Pathname-Namestrings.html" accesskey="u" rel="up">Syntax of Logical Pathname Namestrings</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Lowercase-Letters-in-a-Logical-Pathname-Namestring-1"><span>19.3.1.8 Lowercase Letters in a Logical Pathname Namestring<a class="copiable-link" href="#Lowercase-Letters-in-a-Logical-Pathname-Namestring-1"> &para;</a></span></h4>
+
+<p>When parsing <i class="i">words</i> and <i class="i">wildcard-words</i>,
+lowercase letters are translated to uppercase.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Macro-Characters.html
@@ -0,0 +1,115 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Macro Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Macro Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Macro Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Syntax-Types.html" rel="up" title="Character Syntax Types">
+<link href="Multiple-Escape-Characters.html" rel="next" title="Multiple Escape Characters">
+<link href="Invalid-Characters.html" rel="prev" title="Invalid Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Macro-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Multiple-Escape-Characters.html" accesskey="n" rel="next">Multiple Escape Characters</a>, Previous: <a href="Invalid-Characters.html" accesskey="p" rel="prev">Invalid Characters</a>, Up: <a href="Character-Syntax-Types.html" accesskey="u" rel="up">Character Syntax Types</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Macro-Characters-1"><span>2.1.4.4 Macro Characters<a class="copiable-link" href="#Macro-Characters-1"> &para;</a></span></h4>
+
+<p>When the <i class="i">Lisp reader</i> encounters a <i class="i">macro character</i> 
+on an <i class="i">input</i> <i class="i">stream</i>,
+special parsing of subsequent <i class="i">characters</i> 
+on the <i class="i">input</i> <i class="i">stream</i> 
+is performed.
+</p>
+<p>A <i class="i">macro character</i> has an associated <i class="i">function</i>
+called a <i class="i">reader macro function</i>
+<a class="index-entry-id" id="index-reader-macro-function"></a>
+ that implements its specialized parsing behavior.
+An association of this kind can be established or modified under control of
+a <i class="i">conforming program</i> by using 
+the <i class="i">functions</i> <b class="b">set-macro-character</b> and <b class="b">set-dispatch-macro-character</b>.
+</p>
+<p>Upon encountering a <i class="i">macro character</i>, the <i class="i">Lisp reader</i> calls its
+<i class="i">reader macro function</i>, which parses one specially formatted object 
+from the <i class="i">input</i> <i class="i">stream</i>.
+The <i class="i">function</i> either returns the parsed <i class="i">object</i>,
+or else it returns no <i class="i">values</i> 
+    to indicate that the characters scanned by the <i class="i">function</i>
+    are being ignored (<i class="i">e.g.</i>, in the case of a comment).
+Examples of <i class="i">macro characters</i>
+are <i class="i">backquote</i>, <i class="i">single-quote</i>, <i class="i">left-parenthesis</i>, and 
+<i class="i">right-parenthesis</i>.
+</p>
+<p>A <i class="i">macro character</i> is either <i class="i">terminating</i> or <i class="i">non-terminating</i>.
+The difference between <i class="i">terminating</i> and <i class="i">non-terminating</i> <i class="i">macro characters</i> 
+lies in what happens when such characters occur in the middle of a <i class="i">token</i>.  
+If a <i class="i">non-terminating</i>
+<a class="index-entry-id" id="index-non_002dterminating"></a>
+ <i class="i">macro character</i> occurs in the middle of a <i class="i">token</i>,
+the <i class="i">function</i> associated 
+with the <i class="i">non-terminating</i> <i class="i">macro character</i> is not called,
+and the
+<i class="i">non-terminating</i> <i class="i">macro character</i> does not terminate the <i class="i">token</i>&rsquo;s name; it
+becomes part of the name as if the <i class="i">macro character</i> were really a constituent
+character.  A <i class="i">terminating</i>
+<a class="index-entry-id" id="index-terminating"></a>
+ <i class="i">macro character</i> terminates any <i class="i">token</i>,
+and its associated <i class="i">reader macro function</i>
+is called no matter where the <i class="i">character</i> appears.
+The only <i class="i">non-terminating</i> <i class="i">macro character</i> in <i class="i">standard syntax</i> 
+is <i class="i">sharpsign</i>.
+</p>
+<p>If a <i class="i">character</i> is a <i class="i">dispatching macro character</i> C_1,
+its <i class="i">reader macro function</i> is a <i class="i">function</i> supplied by the <i class="i">implementation</i>.
+This <i class="i">function</i> reads decimal <i class="i">digit</i> <i class="i">characters</i> until a non-<i class="i">digit</i>
+C_2 is read.
+If any <i class="i">digits</i> were read,
+they are converted into a corresponding <i class="i">integer</i> infix parameter P;
+otherwise, the infix parameter P is <b class="b">nil</b>.  
+The terminating non-<i class="i">digit</i> C_2 is a <i class="i">character</i> 
+(sometimes called a &ldquo;sub-character&rdquo; to emphasize its subordinate role in the dispatching)
+that is looked up in the dispatch table associated with
+the <i class="i">dispatching macro character</i> C_1.
+The <i class="i">reader macro function</i> associated with the sub-character C_2 
+is invoked with three arguments:
+     the <i class="i">stream</i>,
+     the sub-character C_2,
+ and the infix parameter P.
+For more information about dispatch characters,
+see the <i class="i">function</i> <b class="b">set-dispatch-macro-character</b>.
+</p>
+<p>For information about the <i class="i">macro characters</i> 
+that are available in <i class="i">standard syntax</i>,
+see <a class="ref" href="Standard-Macro-Characters.html">Standard Macro Characters</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Multiple-Escape-Characters.html">Multiple Escape Characters</a>, Previous: <a href="Invalid-Characters.html">Invalid Characters</a>, Up: <a href="Character-Syntax-Types.html">Character Syntax Types</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Macro-Forms-as-Places.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Macro Forms as Places (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Macro Forms as Places (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Macro Forms as Places (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Kinds-of-Places.html" rel="up" title="Kinds of Places">
+<link href="Symbol-Macros-as-Places.html" rel="next" title="Symbol Macros as Places">
+<link href="Setf-Expansions-and-Places.html" rel="prev" title="Setf Expansions and Places">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Macro-Forms-as-Places">
+<div class="nav-panel">
+<p>
+Next: <a href="Symbol-Macros-as-Places.html" accesskey="n" rel="next">Symbol Macros as Places</a>, Previous: <a href="Setf-Expansions-and-Places.html" accesskey="p" rel="prev">Setf Expansions and Places</a>, Up: <a href="Kinds-of-Places.html" accesskey="u" rel="up">Kinds of Places</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Macro-Forms-as-Places-1"><span>5.1.2.7 Macro Forms as Places<a class="copiable-link" href="#Macro-Forms-as-Places-1"> &para;</a></span></h4>
+
+<p>A <i class="i">macro form</i> can be used as a <i class="i">place</i>, 
+in which case <span class="r">Common Lisp</span> expands the <i class="i">macro form</i>
+</p>
+<p>as if by <b class="b">macroexpand-1</b>
+</p>
+<p>and then uses the <i class="i">macro expansion</i> in place of the original <i class="i">place</i>.
+</p>
+<p>Such <i class="i">macro expansion</i> is attempted only after exhausting all other possibilities
+other than expanding into a call to a function named <code class="t">(setf <i class="i">reader</i>)</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Macro-Forms.html
@@ -0,0 +1,95 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Macro Forms (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Macro Forms (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Macro Forms (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Evaluation-Model.html" rel="up" title="The Evaluation Model">
+<link href="Function-Forms.html" rel="next" title="Function Forms">
+<link href="Special-Forms.html" rel="prev" title="Special Forms">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Macro-Forms">
+<div class="nav-panel">
+<p>
+Next: <a href="Function-Forms.html" accesskey="n" rel="next">Function Forms</a>, Previous: <a href="Special-Forms.html" accesskey="p" rel="prev">Special Forms</a>, Up: <a href="The-Evaluation-Model.html" accesskey="u" rel="up">The Evaluation Model</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Macro-Forms-1"><span>3.1.2.9 Macro Forms<a class="copiable-link" href="#Macro-Forms-1"> &para;</a></span></h4>
+
+<p>If the <i class="i">operator</i> names a <i class="i">macro</i>,
+its associated <i class="i">macro function</i> is applied
+to the entire <i class="i">form</i> and the result of that application is
+used in place of the original <i class="i">form</i>.
+</p>
+<p>Specifically, a <i class="i">symbol</i> names a <i class="i">macro</i> in a given <i class="i">lexical environment</i> if
+<b class="b">macro-function</b> is <i class="i">true</i> of the 
+<i class="i">symbol</i> and that <i class="i">environment</i>.
+The <i class="i">function</i> returned by <b class="b">macro-function</b>
+is a <i class="i">function</i> of two arguments, called the
+expansion function.
+The expansion function is invoked by calling the <i class="i">macroexpand hook</i> with
+      the expansion function as its first argument,
+      the entire <i class="i">macro form</i> as its second argument,
+    and an <i class="i">environment object</i> (corresponding to the current <i class="i">lexical environment</i>)
+      as its third argument.
+The <i class="i">macroexpand hook</i>, in turn, calls the expansion function with the
+<i class="i">form</i> as its first argument and the <i class="i">environment</i> as its second argument.
+The <i class="i">value</i> of the expansion function, which is passed through
+by the <i class="i">macroexpand hook</i>, is a <i class="i">form</i>. 
+The returned <i class="i">form</i> is <i class="i">evaluated</i> in place of the original <i class="i">form</i>.
+</p>
+<p>The consequences are undefined if a <i class="i">macro function</i> destructively modifies
+any part of its <i class="i">form</i> argument.
+</p>
+<p>A <i class="i">macro name</i> is not a <i class="i">function designator</i>,
+and cannot be used as the <i class="i">function</i> argument to <i class="i">functions</i> 
+such as <b class="b">apply</b>, <b class="b">funcall</b>, or <b class="b">map</b>.
+</p>
+<p>An <i class="i">implementation</i> is free to implement a <span class="r">Common Lisp</span> <i class="i">special operator</i>
+as a <i class="i">macro</i>.  An <i class="i">implementation</i> is free to implement any
+<i class="i">macro</i> <i class="i">operator</i> as a <i class="i">special operator</i>, but only
+if an equivalent definition of the <i class="i">macro</i> is also provided.
+</p>
+<p>Figure 3&ndash;3 lists some <i class="i">defined names</i> that are applicable
+to <i class="i">macros</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  *macroexpand-hook*  macro-function  macroexpand-1  <!-- /@w -->
+  defmacro            macroexpand     macrolet       <!-- /@w -->
+
+    Figure 3&ndash;3: Defined names applicable to macros  <!-- /@w -->
+
+</pre></div></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Function-Forms.html">Function Forms</a>, Previous: <a href="Special-Forms.html">Special Forms</a>, Up: <a href="The-Evaluation-Model.html">The Evaluation Model</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Macro-Lambda-Lists.html
@@ -0,0 +1,219 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Macro Lambda Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Macro Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Macro Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Lambda-Lists.html" rel="up" title="Lambda Lists">
+<link href="Destructuring-Lambda-Lists.html" rel="next" title="Destructuring Lambda Lists">
+<link href="Specialized-Lambda-Lists.html" rel="prev" title="Specialized Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Macro-Lambda-Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Destructuring-Lambda-Lists.html" accesskey="n" rel="next">Destructuring Lambda Lists</a>, Previous: <a href="Specialized-Lambda-Lists.html" accesskey="p" rel="prev">Specialized Lambda Lists</a>, Up: <a href="Lambda-Lists.html" accesskey="u" rel="up">Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Macro-Lambda-Lists-1"><span>3.4.4 Macro Lambda Lists<a class="copiable-link" href="#Macro-Lambda-Lists-1"> &para;</a></span></h4>
+
+<p>A <i class="i">macro lambda list</i>
+<a class="index-entry-id" id="index-macro-lambda-list"></a>
+ is used in describing <i class="i">macros</i> 
+defined by the <i class="i">operators</i> in Figure 3&ndash;17.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  define-compiler-macro  defmacro  macrolet  <!-- /@w -->
+  define-setf-expander                       <!-- /@w -->
+
+  Figure 3&ndash;17: Operators that use Macro Lambda Lists<!-- /@w -->
+
+</pre></div></div>
+
+<p>With the additional restriction that
+an <i class="i">environment parameter</i> may appear only once
+(at any of the positions indicated),
+a <i class="i">macro lambda list</i> has the following syntax:
+</p>
+
+<p><i class="i">reqvars</i>&nbsp;::={<i class="i">var</i>&nbsp;|&nbsp;!<i class="i">pattern</i>}*<!-- /@w -->
+</p>
+<p><i class="i">optvars</i>&nbsp;::=<code class="t">[</code><span class="r">&amp;optional</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;		&nbsp;<span class="r">(</span><span class="r">{<i class="i">var</i>&nbsp;|&nbsp;!<i class="i">pattern</i>}</span>&nbsp;<span class="r">[</span>init-form&nbsp;<span class="r">[</span>supplied-p-parameter<span class="r">]</span><span class="r">]</span><span class="r">)</span>}*<code class="t">]</code><!-- /@w -->
+</p>
+<p><i class="i">restvar</i>&nbsp;::=<code class="t">[</code>{<code class="t">&amp;rest</code>&nbsp;|&nbsp;<span class="r">&amp;body</span>}&nbsp;<i class="i">{<i class="i">var</i>&nbsp;|&nbsp;!<i class="i">pattern</i>}</i><code class="t">]</code><!-- /@w -->
+</p>
+<p><i class="i">keyvars</i>&nbsp;::=<span class="r">[</span><span class="r">&amp;key</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;		&nbsp;	&nbsp;<span class="r">(</span>{<i class="i">var</i>&nbsp;|&nbsp;					&nbsp;<span class="r">(</span><i class="i">keyword-name</i>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;!<i class="i">pattern</i>}<span class="r">)</span>}&nbsp;				&nbsp;	<span class="r">[</span>init-form&nbsp;<span class="r">[</span>supplied-p-parameter<span class="r">]</span><span class="r">]</span><span class="r">)</span>}*<!-- /@w -->
+&nbsp;<span class="r">[</span><code class="t">&amp;allow-other-keys</code><span class="r">]</span><span class="r">]</span><!-- /@w -->
+</p>
+
+<p><i class="i">auxvars</i>&nbsp;::=<code class="t">[</code><span class="r">&amp;aux</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;<span class="r">(</span><span class="r"><i class="i">var</i></span>&nbsp;<span class="r">[</span><i class="i">init-form</i><span class="r">]</span><span class="r">)</span>}*<code class="t">]</code><!-- /@w -->
+</p>
+<p><i class="i">envvar</i>&nbsp;::=<code class="t">[</code><span class="r">&amp;environment</span>&nbsp;<i class="i">var</i><code class="t">]</code><!-- /@w -->
+</p>
+<p><i class="i">wholevar</i>&nbsp;::=<code class="t">[</code><span class="r">&amp;whole</span>&nbsp;<i class="i">var</i><code class="t">]</code><!-- /@w -->
+</p>
+<p><i class="i">lambda-list</i>&nbsp;::=<span class="r">(</span>!<i class="i">wholevar</i>&nbsp;!<i class="i">envvar</i>&nbsp;!<i class="i">reqvars</i>&nbsp;!<i class="i">envvar</i>&nbsp;!<i class="i">optvars</i>&nbsp;!<i class="i">envvar</i><!-- /@w -->
+&nbsp;!<i class="i">restvar</i>&nbsp;!<i class="i">envvar</i>&nbsp;!<i class="i">keyvars</i>&nbsp;!<i class="i">envvar</i>&nbsp;!<i class="i">auxvars</i>&nbsp;!<i class="i">envvar</i><span class="r">)</span>&nbsp;|<!-- /@w -->
+&nbsp;<span class="r">(</span>!<i class="i">wholevar</i>&nbsp;!<i class="i">envvar</i>&nbsp;!<i class="i">reqvars</i>&nbsp;!<i class="i">envvar</i>&nbsp;!<i class="i">optvars</i>&nbsp;!<i class="i">envvar</i>&nbsp;<code class="t">.</code>&nbsp;<i class="i">var</i><span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">pattern</i>&nbsp;::=<span class="r">(</span>!<i class="i">wholevar</i>&nbsp;!<i class="i">reqvars</i>&nbsp;!<i class="i">optvars</i>&nbsp;!<i class="i">restvar</i>&nbsp;!<i class="i">keyvars</i>&nbsp;!<i class="i">auxvars</i><span class="r">)</span>&nbsp;|<!-- /@w -->
+&nbsp;<span class="r">(</span>!<i class="i">wholevar</i>&nbsp;!<i class="i">reqvars</i>&nbsp;!<i class="i">optvars</i>&nbsp;<code class="t">.</code>&nbsp;<i class="i">var</i><span class="r">)</span><!-- /@w -->
+</p>
+
+
+<p>A <i class="i">macro lambda list</i> can contain
+the <i class="i">lambda list keywords</i> shown in Figure 3&ndash;18.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <b class="b">&amp;allow-other-keys</b>  <b class="b">&amp;environment</b>  <b class="b">&amp;rest</b>   <!-- /@w -->
+  <b class="b">&amp;aux</b>               <b class="b">&amp;key</b>          <b class="b">&amp;whole</b>  <!-- /@w -->
+  <b class="b">&amp;body</b>              <b class="b">&amp;optional</b>             <!-- /@w -->
+
+  Figure 3&ndash;18: Lambda List Keywords used by Macro Lambda Lists<!-- /@w -->
+
+</pre></div></div>
+
+<p><i class="i">Optional parameters</i> (introduced by <b class="b">&amp;optional</b>) and
+<i class="i">keyword parameters</i> (introduced by <b class="b">&amp;key</b>)
+can be supplied in a <i class="i">macro lambda list</i>,
+just as in an <i class="i">ordinary lambda list</i>.
+Both may contain default initialization forms and <i class="i">supplied-p parameters</i>.
+</p>
+<p><b class="b">&amp;body</b>
+<a class="index-entry-id" id="index-_0026body"></a>
+</p>
+<p>is identical in function to <b class="b">&amp;rest</b>,
+but it can be used to inform certain output-formatting 
+and editing functions that the remainder of the <i class="i">form</i> is
+treated as a body, and should be indented accordingly.
+Only one of <b class="b">&amp;body</b> or <b class="b">&amp;rest</b> can be used at any particular level; 
+see <a class="ref" href="Destructuring-by-Lambda-Lists.html">Destructuring by Lambda Lists</a>.
+</p>
+<p><b class="b">&amp;body</b> can appear at any level of a 
+<i class="i">macro lambda list</i>; 
+for details, see <a class="ref" href="Destructuring-by-Lambda-Lists.html">Destructuring by Lambda Lists</a>.
+</p>
+<p><b class="b">&amp;whole</b>
+<a class="index-entry-id" id="index-_0026whole"></a>
+</p>
+<p>is followed by a single variable that is bound to the
+entire macro-call form; this is the value that the <i class="i">macro function</i>
+receives as its first argument.
+</p>
+<p>If <b class="b">&amp;whole</b> and a following variable appear,
+they must appear first in <i class="i">lambda-list</i>,
+</p>
+<p>before any other parameter or <i class="i">lambda list keyword</i>.
+</p>
+<p><b class="b">&amp;whole</b> can appear at any level of a <i class="i">macro lambda list</i>. 
+At inner levels, the <b class="b">&amp;whole</b> variable is bound to
+		the corresponding part of the argument, 
+as with <b class="b">&amp;rest</b>, but unlike <b class="b">&amp;rest</b>, other arguments are also allowed.
+The use of <b class="b">&amp;whole</b> does not affect the pattern of arguments
+     specified.
+</p>
+<p><b class="b">&amp;environment</b>
+<a class="index-entry-id" id="index-_0026environment"></a>
+</p>
+<p>is followed by a single variable that is bound
+to an <i class="i">environment</i> representing the <i class="i">lexical environment</i> in which the
+macro call is to be interpreted.
+This <i class="i">environment</i> 
+should be used with
+</p>
+<p><b class="b">macro-function</b>,
+</p>
+<p><b class="b">get-setf-expansion</b>,
+</p>
+<p><b class="b">compiler-macro-function</b>, 
+</p>
+<p>and
+<b class="b">macroexpand</b> 
+(for example) in computing the expansion of the macro, to ensure that any
+<i class="i">lexical bindings</i> or definitions established in the 
+<i class="i">compilation environment</i> are taken into account.
+</p>
+<p><b class="b">&amp;environment</b> can only appear at the top level of a
+	<i class="i">macro lambda list</i>, and can only
+appear once, but can appear anywhere in that list;
+</p>
+<p>the <b class="b">&amp;environment</b> <i class="i">parameter</i> is <i class="i">bound</i> along with <b class="b">&amp;whole</b>
+before any other <i class="i">variables</i> in the <i class="i">lambda list</i>, regardless of where
+<b class="b">&amp;environment</b> appears in the <i class="i">lambda list</i>.
+</p>
+<p>The <i class="i">object</i> that is bound to the
+<i class="i">environment parameter</i> has <i class="i">dynamic extent</i>.
+</p>
+<p>Destructuring allows a <i class="i">macro lambda list</i> to express
+the structure of a macro call syntax.
+If no <i class="i">lambda list keywords</i> appear,
+then the <i class="i">macro lambda list</i> is a <i class="i">tree</i>
+containing parameter names at the leaves.
+The pattern and the <i class="i">macro form</i> must have compatible <i class="i">tree structure</i>; 
+that is, their <i class="i">tree structure</i> must be equivalent,
+or it must differ only in that some <i class="i">leaves</i> of the pattern
+match <i class="i">non-atomic</i> <i class="i">objects</i> of the <i class="i">macro form</i>.
+</p>
+<p>For information about error detection in this <i class="i">situation</i>,
+see <a class="ref" href="Destructuring-Mismatch.html">Destructuring Mismatch</a>.
+</p>
+<p>A destructuring <i class="i">lambda list</i>
+(whether at top level or embedded) 
+can
+be dotted, ending
+in a parameter name.  This situation is treated exactly as if the
+parameter name that ends the <i class="i">list</i> had appeared preceded by <b class="b">&amp;rest</b>.
+</p>
+<p>It is permissible for a <i class="i">macro</i> <i class="i">form</i> (or a <i class="i">subexpression</i> of a
+<i class="i">macro</i> <i class="i">form</i>)
+to be a <i class="i">dotted list</i> 
+only  when <code class="t">(... &amp;rest var)</code> or <code class="t">(... . var)</code> is used to match
+ it. It is the responsibility of the <i class="i">macro</i> to recognize and deal
+ with such situations.
+</p>
+<p>[Editorial Note by KMP: Apparently the dotted-macro-forms cleanup doesn&rsquo;t allow for
+		 the macro to &lsquo;manually&rsquo; notice dotted forms and fix them as well.
+		 It shouldn&rsquo;t be required that this be done only by &amp;REST or 
+		 a dotted pattern; it should only matter that ultimately the 
+		 non-macro result of a full-macro expansion not contain dots.
+		 Anyway, I plan to address this editorially unless someone
+		 raises an objection.]
+</p>
+
+<ul class="mini-toc">
+<li><a href="Destructuring-by-Lambda-Lists.html" accesskey="1">Destructuring by Lambda Lists</a></li>
+<li><a href="Data_002ddirected-Destructuring-by-Lambda-Lists.html" accesskey="2">Data-directed Destructuring by Lambda Lists</a></li>
+<li><a href="Examples-of-Data_002ddirected-Destructuring-by-Lambda-Lists.html" accesskey="3">Examples of Data-directed Destructuring by Lambda Lists</a></li>
+<li><a href="Lambda_002dlist_002ddirected-Destructuring-by-Lambda-Lists.html" accesskey="4">Lambda-list-directed Destructuring by Lambda Lists</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Destructuring-Lambda-Lists.html">Destructuring Lambda Lists</a>, Previous: <a href="Specialized-Lambda-Lists.html">Specialized Lambda Lists</a>, Up: <a href="Lambda-Lists.html">Lambda Lists</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Mentioning-Containing-Function-in-Condition-Reports.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Mentioning Containing Function in Condition Reports (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Mentioning Containing Function in Condition Reports (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Mentioning Containing Function in Condition Reports (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printing-Conditions.html" rel="up" title="Printing Conditions">
+<link href="Note-about-Tabs-in-Condition-Reports.html" rel="prev" title="Note about Tabs in Condition Reports">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Mentioning-Containing-Function-in-Condition-Reports">
+<div class="nav-panel">
+<p>
+Previous: <a href="Note-about-Tabs-in-Condition-Reports.html" accesskey="p" rel="prev">Note about Tabs in Condition Reports</a>, Up: <a href="Printing-Conditions.html" accesskey="u" rel="up">Printing Conditions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Mentioning-Containing-Function-in-Condition-Reports-1"><span>9.1.3.6 Mentioning Containing Function in Condition Reports<a class="copiable-link" href="#Mentioning-Containing-Function-in-Condition-Reports-1"> &para;</a></span></h4>
+
+<p>The name of the containing function should generally not be mentioned in
+<i class="i">report messages</i>.  It is assumed that the <i class="i">debugger</i> will make this
+information accessible in situations where it is necessary and appropriate.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Merging-Pathnames.html
@@ -0,0 +1,59 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Merging Pathnames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Merging Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Merging Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Pathnames.html" rel="up" title="Pathnames">
+<link href="Interpreting-Pathname-Component-Values.html" rel="prev" title="Interpreting Pathname Component Values">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Merging-Pathnames">
+<div class="nav-panel">
+<p>
+Previous: <a href="Interpreting-Pathname-Component-Values.html" accesskey="p" rel="prev">Interpreting Pathname Component Values</a>, Up: <a href="Pathnames.html" accesskey="u" rel="up">Pathnames</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Merging-Pathnames-1"><span>19.2.3 Merging Pathnames<a class="copiable-link" href="#Merging-Pathnames-1"> &para;</a></span></h4>
+
+<p>Merging takes a <i class="i">pathname</i> with unfilled components
+and supplies values for those components from a source of defaults.
+</p>
+<p>If a component&rsquo;s value is <b class="b">nil</b>, that component is considered to be unfilled.
+If a component&rsquo;s value is any <i class="i">non-nil</i> <i class="i">object</i>, 
+including <code class="t">:unspecific</code>, that component is considered to be filled.
+</p>
+<p>Except as explicitly specified otherwise,
+for functions that manipulate or inquire about <i class="i">files</i> in the <i class="i">file system</i>,
+the pathname argument to such a function
+is merged with <b class="b">*default-pathname-defaults*</b> before accessing the <i class="i">file system</i>
+(as if by <b class="b">merge-pathnames</b>).
+</p>
+
+<ul class="mini-toc">
+<li><a href="Examples-of-Merging-Pathnames.html" accesskey="1">Examples of Merging Pathnames</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Meta_002dObjects.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Meta-Objects (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Meta-Objects (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Meta-Objects (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects.html" rel="up" title="Objects">
+<link href="Slots.html" rel="next" title="Slots">
+<link href="Reinitializing-an-Instance.html" rel="prev" title="Reinitializing an Instance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Meta_002dObjects">
+<div class="nav-panel">
+<p>
+Next: <a href="Slots.html" accesskey="n" rel="next">Slots</a>, Previous: <a href="Reinitializing-an-Instance.html" accesskey="p" rel="prev">Reinitializing an Instance</a>, Up: <a href="Objects.html" accesskey="u" rel="up">Objects</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Meta_002dObjects-1"><span>7.4 Meta-Objects<a class="copiable-link" href="#Meta_002dObjects-1"> &para;</a></span></h3>
+
+
+<p>The implementation of the object system manipulates <i class="i">classes</i>, <i class="i">methods</i>,
+and <i class="i">generic functions</i>.  The object system contains a set of 
+<i class="i">generic functions</i> defined by <i class="i">methods</i> on <i class="i">classes</i>; 
+the behavior of those <i class="i">generic functions</i> defines the behavior of
+the object system.  The <i class="i">instances</i> of the <i class="i">classes</i> on which those
+<i class="i">methods</i> are defined are called meta-objects.  
+</p>
+
+<ul class="mini-toc">
+<li><a href="Standard-Meta_002dobjects.html" accesskey="1">Standard Meta-objects</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Method-Selection-and-Combination.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Method Selection and Combination (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Method Selection and Combination (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Method Selection and Combination (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Generic-Functions-and-Methods.html" rel="up" title="Generic Functions and Methods">
+<link href="Inheritance-of-Methods.html" rel="next" title="Inheritance of Methods">
+<link href="Keyword-Arguments-in-Generic-Functions-and-Methods.html" rel="prev" title="Keyword Arguments in Generic Functions and Methods">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Method-Selection-and-Combination">
+<div class="nav-panel">
+<p>
+Next: <a href="Inheritance-of-Methods.html" accesskey="n" rel="next">Inheritance of Methods</a>, Previous: <a href="Keyword-Arguments-in-Generic-Functions-and-Methods.html" accesskey="p" rel="prev">Keyword Arguments in Generic Functions and Methods</a>, Up: <a href="Generic-Functions-and-Methods.html" accesskey="u" rel="up">Generic Functions and Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Method-Selection-and-Combination-1"><span>7.6.6 Method Selection and Combination<a class="copiable-link" href="#Method-Selection-and-Combination-1"> &para;</a></span></h4>
+
+<p>When a <i class="i">generic function</i> is called with particular arguments, it must
+determine the code to execute.  This code is called the 
+<i class="i">effective method</i>
+<a class="index-entry-id" id="index-effective-method"></a>
+ for those <i class="i">arguments</i>.
+The <i class="i">effective method</i> is a 
+combination of the <i class="i">applicable methods</i> in the <i class="i">generic function</i>
+that <i class="i">calls</i> some or all of the <i class="i">methods</i>.
+</p>
+<p>If a <i class="i">generic function</i> is called and no <i class="i">methods</i> are 
+<i class="i">applicable</i>, the <i class="i">generic function</i> <b class="b">no-applicable-method</b>
+is invoked, with the <i class="i">results</i> from that call being used as the
+<i class="i">results</i> of the call to the original <i class="i">generic function</i>.  Calling
+<b class="b">no-applicable-method</b> takes precedence over checking for acceptable
+keyword arguments; see <a class="ref" href="Keyword-Arguments-in-Generic-Functions-and-Methods.html">Keyword Arguments in Generic Functions and Methods</a>.
+</p>
+<p>When the <i class="i">effective method</i> has been determined,
+it is invoked with the same <i class="i">arguments</i> as were passed to the <i class="i">generic function</i>.  
+Whatever <i class="i">values</i> it returns are returned as the <i class="i">values</i>
+of the <i class="i">generic function</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Determining-the-Effective-Method.html" accesskey="1">Determining the Effective Method</a></li>
+<li><a href="Selecting-the-Applicable-Methods.html" accesskey="2">Selecting the Applicable Methods</a></li>
+<li><a href="Sorting-the-Applicable-Methods-by-Precedence-Order.html" accesskey="3">Sorting the Applicable Methods by Precedence Order</a></li>
+<li><a href="Applying-method-combination-to-the-sorted-list-of-applicable-methods.html" accesskey="4">Applying method combination to the sorted list of applicable methods</a></li>
+<li><a href="Standard-Method-Combination.html" accesskey="5">Standard Method Combination</a></li>
+<li><a href="Declarative-Method-Combination.html" accesskey="6">Declarative Method Combination</a></li>
+<li><a href="Built_002din-Method-Combination-Types.html" accesskey="7">Built-in Method Combination Types</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Minimal-Compilation.html
@@ -0,0 +1,95 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Minimal Compilation (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Minimal Compilation (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Minimal Compilation (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Compilation-Semantics.html" rel="up" title="Compilation Semantics">
+<link href="Semantic-Constraints.html" rel="next" title="Semantic Constraints">
+<link href="Notes-about-the-Implementation-of-Compiler-Macros.html" rel="prev" title="Notes about the Implementation of Compiler Macros">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Minimal-Compilation">
+<div class="nav-panel">
+<p>
+Next: <a href="Semantic-Constraints.html" accesskey="n" rel="next">Semantic Constraints</a>, Previous: <a href="Notes-about-the-Implementation-of-Compiler-Macros.html" accesskey="p" rel="prev">Notes about the Implementation of Compiler Macros</a>, Up: <a href="Compilation-Semantics.html" accesskey="u" rel="up">Compilation Semantics</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Minimal-Compilation-1"><span>3.2.2.6 Minimal Compilation<a class="copiable-link" href="#Minimal-Compilation-1"> &para;</a></span></h4>
+
+<p><i class="i">Minimal compilation</i> is defined as follows:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>All <i class="i">compiler macro</i>
+<a class="index-entry-id" id="index-compiler-macro"></a>
+ calls appearing in the
+<i class="i">source code</i> being compiled are expanded, if at all, at compile time;
+they will not be expanded at run time.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>All <i class="i">macro</i>
+<a class="index-entry-id" id="index-macro"></a>
+ and 
+<i class="i">symbol macro</i>
+<a class="index-entry-id" id="index-symbol-macro"></a>
+ calls
+appearing in the source code being compiled are expanded at compile time
+in such a way that they will not be expanded again at run time.
+<b class="b">macrolet</b>
+<a class="index-entry-id" id="index-macrolet"></a>
+</p>
+<p>and
+<b class="b">symbol-macrolet</b>
+<a class="index-entry-id" id="index-symbol_002dmacrolet"></a>
+</p>
+<p>are effectively replaced by
+<i class="i">forms</i> corresponding to their bodies in which calls to 
+<i class="i">macros</i> are replaced by their expansions.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The first <i class="i">argument</i> in a <b class="b">load-time-value</b>
+<a class="index-entry-id" id="index-load_002dtime_002dvalue"></a>
+</p>
+<p><i class="i">form</i> 
+in <i class="i">source code</i> processed by <b class="b">compile</b>
+<a class="index-entry-id" id="index-compile-1"></a>
+</p>
+<p>is <i class="i">evaluated</i> at <i class="i">compile time</i>;
+in <i class="i">source code</i> processed by <b class="b">compile-file</b>
+<a class="index-entry-id" id="index-compile_002dfile"></a>
+, 
+the compiler arranges for it to be <i class="i">evaluated</i> at <i class="i">load time</i>.
+In either case, the result of the <i class="i">evaluation</i>
+is remembered and used later as the value of the 
+<b class="b">load-time-value</b> <i class="i">form</i> at <i class="i">execution time</i>.
+</p>
+</dd>
+</dl>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Minimal-Declaration-Processing-Requirements.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Minimal Declaration Processing Requirements (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Minimal Declaration Processing Requirements (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Minimal Declaration Processing Requirements (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Declarations.html" rel="up" title="Declarations">
+<link href="Declaration-Specifiers.html" rel="next" title="Declaration Specifiers">
+<link href="Declarations.html" rel="prev" title="Declarations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Minimal-Declaration-Processing-Requirements">
+<div class="nav-panel">
+<p>
+Next: <a href="Declaration-Specifiers.html" accesskey="n" rel="next">Declaration Specifiers</a>, Previous: <a href="Declarations.html" accesskey="p" rel="prev">Declarations</a>, Up: <a href="Declarations.html" accesskey="u" rel="up">Declarations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Minimal-Declaration-Processing-Requirements-1"><span>3.3.1 Minimal Declaration Processing Requirements<a class="copiable-link" href="#Minimal-Declaration-Processing-Requirements-1"> &para;</a></span></h4>
+
+<p>In general, an <i class="i">implementation</i> is free to ignore
+<i class="i">declaration specifiers</i> except for the
+     <b class="b">declaration</b>
+<a class="index-entry-id" id="index-declaration-2"></a>
+,
+     <b class="b">notinline</b>
+<a class="index-entry-id" id="index-notinline"></a>
+,
+     <b class="b">safety</b>
+<a class="index-entry-id" id="index-safety"></a>
+,
+ and <b class="b">special</b>
+<a class="index-entry-id" id="index-special"></a>
+ <i class="i">declaration specifiers</i>.
+</p>
+<p>A <b class="b">declaration</b> <i class="i">declaration</i> must suppress warnings
+about unrecognized <i class="i">declarations</i> of the kind that it declares.
+If an <i class="i">implementation</i> does not produce warnings about
+unrecognized declarations, it may safely ignore this <i class="i">declaration</i>.
+</p>
+<p>A <b class="b">notinline</b> <i class="i">declaration</i> must be recognized by any <i class="i">implementation</i>
+that supports inline functions or <i class="i">compiler macros</i> in order to disable those facilities.
+An <i class="i">implementation</i> that does not use inline functions or <i class="i">compiler macros</i>
+may safely ignore this <i class="i">declaration</i>.
+</p>
+<p>A <b class="b">safety</b> <i class="i">declaration</i> that increases the current safety level 
+must always be recognized.  An <i class="i">implementation</i> that always processes 
+code as if safety were high may safely ignore this <i class="i">declaration</i>.
+</p>
+<p>A <b class="b">special</b> <i class="i">declaration</i> must be processed by all <i class="i">implementations</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Miscellaneous-Clauses.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Miscellaneous Clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Miscellaneous Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Miscellaneous Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-LOOP-Facility.html" rel="up" title="The LOOP Facility">
+<link href="Examples-of-Miscellaneous-Loop-Features.html" rel="next" title="Examples of Miscellaneous Loop Features">
+<link href="Conditional-Execution-Clauses.html" rel="prev" title="Conditional Execution Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Miscellaneous-Clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Miscellaneous-Loop-Features.html" accesskey="n" rel="next">Examples of Miscellaneous Loop Features</a>, Previous: <a href="Conditional-Execution-Clauses.html" accesskey="p" rel="prev">Conditional Execution Clauses</a>, Up: <a href="The-LOOP-Facility.html" accesskey="u" rel="up">The LOOP Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Miscellaneous-Clauses-1"><span>6.1.7 Miscellaneous Clauses<a class="copiable-link" href="#Miscellaneous-Clauses-1"> &para;</a></span></h4>
+
+
+<ul class="mini-toc">
+<li><a href="Control-Transfer-Clauses.html" accesskey="1">Control Transfer Clauses</a></li>
+<li><a href="Examples-of-NAMED-clause.html" accesskey="2">Examples of NAMED clause</a></li>
+<li><a href="Initial-and-Final-Execution.html" accesskey="3">Initial and Final Execution</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Missing-and-Additional-FORMAT-Arguments.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Missing and Additional FORMAT Arguments (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Missing and Additional FORMAT Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Missing and Additional FORMAT Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Additional-Information-about-FORMAT-Operations.html" rel="up" title="Additional Information about FORMAT Operations">
+<link href="Additional-FORMAT-Parameters.html" rel="next" title="Additional FORMAT Parameters">
+<link href="Nesting-of-FORMAT-Operations.html" rel="prev" title="Nesting of FORMAT Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Missing-and-Additional-FORMAT-Arguments">
+<div class="nav-panel">
+<p>
+Next: <a href="Additional-FORMAT-Parameters.html" accesskey="n" rel="next">Additional FORMAT Parameters</a>, Previous: <a href="Nesting-of-FORMAT-Operations.html" accesskey="p" rel="prev">Nesting of FORMAT Operations</a>, Up: <a href="Additional-Information-about-FORMAT-Operations.html" accesskey="u" rel="up">Additional Information about FORMAT Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Missing-and-Additional-FORMAT-Arguments-1"><span>22.3.10.2 Missing and Additional FORMAT Arguments<a class="copiable-link" href="#Missing-and-Additional-FORMAT-Arguments-1"> &para;</a></span></h4>
+
+<p>The consequences are undefined if no <i class="i">arg</i> remains for a directive 
+requiring an argument.  However, it is permissible for one or more <i class="i">args</i> 
+to remain unprocessed by a directive; such <i class="i">args</i> are ignored.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Modification-of-Literal-Objects.html
@@ -0,0 +1,134 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Modification of Literal Objects (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Modification of Literal Objects (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Modification of Literal Objects (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Destructive-Operations.html" rel="up" title="Destructive Operations">
+<link href="Transfer-of-Control-during-a-Destructive-Operation.html" rel="next" title="Transfer of Control during a Destructive Operation">
+<link href="Destructive-Operations.html" rel="prev" title="Destructive Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Modification-of-Literal-Objects">
+<div class="nav-panel">
+<p>
+Next: <a href="Transfer-of-Control-during-a-Destructive-Operation.html" accesskey="n" rel="next">Transfer of Control during a Destructive Operation</a>, Previous: <a href="Destructive-Operations.html" accesskey="p" rel="prev">Destructive Operations</a>, Up: <a href="Destructive-Operations.html" accesskey="u" rel="up">Destructive Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Modification-of-Literal-Objects-1"><span>3.7.1 Modification of Literal Objects<a class="copiable-link" href="#Modification-of-Literal-Objects-1"> &para;</a></span></h4>
+
+<p>The consequences are undefined if <i class="i">literal</i> <i class="i">objects</i> 
+are destructively modified.  For this purpose, the following operations 
+are considered <i class="i">destructive</i>:
+</p>
+<dl class="table">
+<dt><b class="b">random-state</b></dt>
+<dd><p>Using it as an <i class="i">argument</i> to the <i class="i">function</i> <b class="b">random</b>.
+</p>
+</dd>
+<dt><b class="b">cons</b></dt>
+<dd><p>Changing the <i class="i">car</i>_1 or <i class="i">cdr</i>_1 of the <i class="i">cons</i>,
+or performing a <i class="i">destructive</i> operation on an <i class="i">object</i> which is either
+the <i class="i">car</i>_2 or the <i class="i">cdr</i>_2 of the <i class="i">cons</i>.
+</p>
+</dd>
+<dt><b class="b">array</b></dt>
+<dd><p>Storing a new value into some element of the <i class="i">array</i>,
+or performing a <i class="i">destructive</i> operation 
+on an <i class="i">object</i> that is already such an <i class="i">element</i>.
+</p>
+<p>Changing the <i class="i">fill pointer</i>, <i class="i">dimensions</i>, or displacement of
+the <i class="i">array</i> (regardless of whether the <i class="i">array</i> is <i class="i">actually adjustable</i>).
+</p>
+<p>Performing a <i class="i">destructive</i> operation on another <i class="i">array</i> 
+that is displaced to the <i class="i">array</i> or that otherwise shares its contents
+with the <i class="i">array</i>.
+</p>
+</dd>
+<dt><b class="b">hash-table</b></dt>
+<dd><p>Performing a <i class="i">destructive</i> operation on any <i class="i">key</i>.
+</p>
+<p>Storing a new <i class="i">value</i>_4 for any <i class="i">key</i>,
+or performing a <i class="i">destructive</i> operation 
+on any <i class="i">object</i> that is such a <i class="i">value</i>.
+</p>
+<p>Adding or removing entries from the <i class="i">hash table</i>.
+</p>
+</dd>
+<dt><b class="b">structure-object</b></dt>
+<dd><p>Storing a new value into any slot,
+or performing a <i class="i">destructive</i> operation on an <i class="i">object</i> 
+that is the value of some slot.
+</p>
+</dd>
+<dt><b class="b">standard-object</b></dt>
+<dd><p>Storing a new value into any slot,
+or performing a <i class="i">destructive</i> operation on an <i class="i">object</i> 
+that is the value of some slot.
+</p>
+<p>Changing the class of the <i class="i">object</i> (<i class="i">e.g.</i>, using the <i class="i">function</i> <b class="b">change-class</b>).
+</p>
+</dd>
+<dt><b class="b">readtable</b></dt>
+<dd><p>Altering the <i class="i">readtable case</i>.
+</p>
+<p>Altering the syntax type of any character in this readtable.
+</p>
+<p>Altering the <i class="i">reader macro function</i> associated with any <i class="i">character</i>
+in the <i class="i">readtable</i>, or altering the <i class="i">reader macro functions</i>
+associated with <i class="i">characters</i> defined as <i class="i">dispatching macro characters</i>
+in the <i class="i">readtable</i>.
+</p>
+</dd>
+<dt><b class="b">stream</b></dt>
+<dd><p>Performing I/O operations on the <i class="i">stream</i>,
+or <i class="i">closing</i> the <i class="i">stream</i>.
+</p>
+</dd>
+<dt>All other standardized types</dt>
+<dd><p>[This category includes, for example, <b class="b">character</b>,
+                                      <b class="b">condition</b>,
+                                      <b class="b">function</b>,
+                                      <b class="b">method-combination</b>,
+                                      <b class="b">method</b>,
+                                      <b class="b">number</b>,
+                                      <b class="b">package</b>,
+                                      <b class="b">pathname</b>,
+                                      <b class="b">restart</b>,
+                                  and <b class="b">symbol</b>.]
+</p>
+<p>There are no <i class="i">standardized</i> <i class="i">destructive</i> operations
+defined on <i class="i">objects</i> of these <i class="i">types</i>.
+</p>
+</dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Transfer-of-Control-during-a-Destructive-Operation.html">Transfer of Control during a Destructive Operation</a>, Previous: <a href="Destructive-Operations.html">Destructive Operations</a>, Up: <a href="Destructive-Operations.html">Destructive Operations</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Modified-BNF-Syntax.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Modified BNF Syntax (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Modified BNF Syntax (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Modified BNF Syntax (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Notational-Conventions.html" rel="up" title="Notational Conventions">
+<link href="Splicing-in-Modified-BNF-Syntax.html" rel="next" title="Splicing in Modified BNF Syntax">
+<link href="Font-Key.html" rel="prev" title="Font Key">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Modified-BNF-Syntax">
+<div class="nav-panel">
+<p>
+Next: <a href="Splicing-in-Modified-BNF-Syntax.html" accesskey="n" rel="next">Splicing in Modified BNF Syntax</a>, Previous: <a href="Font-Key.html" accesskey="p" rel="prev">Font Key</a>, Up: <a href="Notational-Conventions.html" accesskey="u" rel="up">Notational Conventions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Modified-BNF-Syntax-1"><span>1.4.1.2 Modified BNF Syntax<a class="copiable-link" href="#Modified-BNF-Syntax-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-bnf-key"></a>
+
+<p>This specification uses an extended Backus Normal Form (BNF) to
+describe the syntax of <span class="r">Common Lisp</span> <i class="i">macro forms</i> and <i class="i">special forms</i>.
+This section discusses the syntax of BNF expressions.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Modifying-Hash-Table-Keys.html
@@ -0,0 +1,83 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Modifying Hash Table Keys (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Modifying Hash Table Keys (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Modifying Hash Table Keys (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Table-Concepts.html" rel="up" title="Hash Table Concepts">
+<link href="Hash_002dTable-Operations.html" rel="prev" title="Hash-Table Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Modifying-Hash-Table-Keys">
+<div class="nav-panel">
+<p>
+Previous: <a href="Hash_002dTable-Operations.html" accesskey="p" rel="prev">Hash-Table Operations</a>, Up: <a href="Hash-Table-Concepts.html" accesskey="u" rel="up">Hash Table Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Modifying-Hash-Table-Keys-1"><span>18.1.2 Modifying Hash Table Keys<a class="copiable-link" href="#Modifying-Hash-Table-Keys-1"> &para;</a></span></h4>
+
+<p>The function supplied as the <code class="t">:test</code> argument to <b class="b">make-hash-table</b>
+specifies the &lsquo;equivalence test&rsquo; for the <i class="i">hash table</i> it creates.
+</p>
+<p>An <i class="i">object</i> is &lsquo;visibly modified&rsquo; with regard to an equivalence test
+if there exists some set of <i class="i">objects</i> (or potential <i class="i">objects</i>)
+which are equivalent to the <i class="i">object</i> before the modification but are
+no longer equivalent afterwards.
+</p>
+<p>If an <i class="i">object</i> O_1 is used as a key in a <i class="i">hash table</i> H
+and is then visibly modified with regard to the equivalence test of H,
+then the consequences are unspecified if O_1, or any <i class="i">object</i>
+O_2 equivalent to O_1 under the equivalence test (either before
+or after the modification), is used as a key in further operations on H.
+The consequences of using O_1 as a key are unspecified 
+even if O_1 is visibly modified 
+and then later modified again in such a way as 
+to undo the visible modification.
+</p>
+<p>Following are specifications of the modifications which are visible to the
+equivalence tests which must be supported by <i class="i">hash tables</i>.  The modifications
+are described in terms of modification of components, and are defined
+recursively.  Visible modifications of components of the <i class="i">object</i> are 
+visible modifications of the <i class="i">object</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Visible-Modification-of-Objects-with-respect-to-EQ-and-EQL.html" accesskey="1">Visible Modification of Objects with respect to EQ and EQL</a></li>
+<li><a href="Visible-Modification-of-Objects-with-respect-to-EQUAL.html" accesskey="2">Visible Modification of Objects with respect to EQUAL</a></li>
+<li><a href="Visible-Modification-of-Conses-with-respect-to-EQUAL.html" accesskey="3">Visible Modification of Conses with respect to EQUAL</a></li>
+<li><a href="Visible-Modification-of-Bit-Vectors-and-Strings-with-respect-to-EQUAL.html" accesskey="4">Visible Modification of Bit Vectors and Strings with respect to EQUAL</a></li>
+<li><a href="Visible-Modification-of-Objects-with-respect-to-EQUALP.html" accesskey="5">Visible Modification of Objects with respect to EQUALP</a></li>
+<li><a href="Visible-Modification-of-Structures-with-respect-to-EQUALP.html" accesskey="6">Visible Modification of Structures with respect to EQUALP</a></li>
+<li><a href="Visible-Modification-of-Arrays-with-respect-to-EQUALP.html" accesskey="7">Visible Modification of Arrays with respect to EQUALP</a></li>
+<li><a href="Visible-Modification-of-Hash-Tables-with-respect-to-EQUALP.html" accesskey="8">Visible Modification of Hash Tables with respect to EQUALP</a></li>
+<li><a href="Visible-Modifications-by-Language-Extensions.html" accesskey="9">Visible Modifications by Language Extensions</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Hash_002dTable-Operations.html">Hash-Table Operations</a>, Up: <a href="Hash-Table-Concepts.html">Hash Table Concepts</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Modifying-the-Structure-of-Instances.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Modifying the Structure of Instances (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Modifying the Structure of Instances (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Modifying the Structure of Instances (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Redefining-Classes.html" rel="up" title="Redefining Classes">
+<link href="Initializing-Newly-Added-Local-Slots-_0028Redefining-Classes_0029.html" rel="next" title="Initializing Newly Added Local Slots (Redefining Classes)">
+<link href="Redefining-Classes.html" rel="prev" title="Redefining Classes">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Modifying-the-Structure-of-Instances">
+<div class="nav-panel">
+<p>
+Next: <a href="Initializing-Newly-Added-Local-Slots-_0028Redefining-Classes_0029.html" accesskey="n" rel="next">Initializing Newly Added Local Slots</a>, Previous: <a href="Redefining-Classes.html" accesskey="p" rel="prev">Redefining Classes</a>, Up: <a href="Redefining-Classes.html" accesskey="u" rel="up">Redefining Classes</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Modifying-the-Structure-of-Instances-1"><span>4.3.6.1 Modifying the Structure of Instances<a class="copiable-link" href="#Modifying-the-Structure-of-Instances-1"> &para;</a></span></h4>
+
+<p>[Reviewer Note by Barmar: What about shared slots that are deleted?]
+</p>
+<p>The first step modifies the structure of <i class="i">instances</i> of the redefined
+<i class="i">class</i> to conform to its new <i class="i">class</i> definition.  
+<i class="i">Local slots</i> specified
+by the new <i class="i">class</i> definition that are not specified as either local or
+shared by the old <i class="i">class</i> are added, and <i class="i">slots</i> 
+not specified as either
+local or shared by the new <i class="i">class</i> definition that are specified as
+local by the old <i class="i">class</i> are discarded. 
+The <i class="i">names</i> of these added and discarded
+<i class="i">slots</i> are passed as arguments 
+to <b class="b">update-instance-for-redefined-class</b>
+as described in the next section.
+</p>
+<p>The values of <i class="i">local slots</i> specified by both the new and old
+<i class="i">classes</i> are retained. If such a <i class="i">local slot</i> was unbound,
+it remains unbound.
+</p>
+<p>The value of a <i class="i">slot</i> that is specified as shared in the old 
+<i class="i">class</i> and as local in the new <i class="i">class</i> is retained.  If such 
+a <i class="i">shared slot</i> was unbound, the <i class="i">local slot</i> is unbound.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Modifying-the-Structure-of-the-Instance.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Modifying the Structure of the Instance (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Modifying the Structure of the Instance (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Modifying the Structure of the Instance (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Changing-the-Class-of-an-Instance.html" rel="up" title="Changing the Class of an Instance">
+<link href="Initializing-Newly-Added-Local-Slots-_0028Changing-the-Class-of-an-Instance_0029.html" rel="next" title="Initializing Newly Added Local Slots (Changing the Class of an Instance)">
+<link href="Changing-the-Class-of-an-Instance.html" rel="prev" title="Changing the Class of an Instance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Modifying-the-Structure-of-the-Instance">
+<div class="nav-panel">
+<p>
+Next: <a href="Initializing-Newly-Added-Local-Slots-_0028Changing-the-Class-of-an-Instance_0029.html" accesskey="n" rel="next">Initializing Newly Added Local Slots</a>, Previous: <a href="Changing-the-Class-of-an-Instance.html" accesskey="p" rel="prev">Changing the Class of an Instance</a>, Up: <a href="Changing-the-Class-of-an-Instance.html" accesskey="u" rel="up">Changing the Class of an Instance</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Modifying-the-Structure-of-the-Instance-1"><span>7.2.1 Modifying the Structure of the Instance<a class="copiable-link" href="#Modifying-the-Structure-of-the-Instance-1"> &para;</a></span></h4>
+
+<p>In order to make the <i class="i">instance</i> conform to the class C_{<span class="r">to</span>}, <i class="i">local slots</i> specified by the class C_{<span class="r">to</span>} that are not specified by the class C_{<span class="r">from</span>} are added, and <i class="i">local slots</i> not specified by
+the class C_{<span class="r">to</span>} that are specified by the
+class C_{<span class="r">from</span>} are discarded.
+</p>
+<p>The values of <i class="i">local slots</i> specified by both the class C_{<span class="r">to</span>} and the class C_{<span class="r">from</span>} are retained. If such a <i class="i">local slot</i> was unbound, it remains
+unbound.
+</p>
+<p>The values of <i class="i">slots</i> specified as shared in the class C_{<span class="r">from</span>} and as local in the class C_{<span class="r">to</span>} are retained.
+</p>
+<p>This first step of the update does not affect the values of any 
+<i class="i">shared slots</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Multidimensional-Arrays.html
@@ -0,0 +1,43 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Multidimensional Arrays (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Multidimensional Arrays (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Multidimensional Arrays (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Array-Elements.html" rel="up" title="Array Elements">
+<link href="Storage-Layout-for-Multidimensional-Arrays.html" rel="next" title="Storage Layout for Multidimensional Arrays">
+<link href="Fill-Pointers.html" rel="prev" title="Fill Pointers">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Multidimensional-Arrays">
+<div class="nav-panel">
+<p>
+Next: <a href="Storage-Layout-for-Multidimensional-Arrays.html" accesskey="n" rel="next">Storage Layout for Multidimensional Arrays</a>, Previous: <a href="Fill-Pointers.html" accesskey="p" rel="prev">Fill Pointers</a>, Up: <a href="Array-Elements.html" accesskey="u" rel="up">Array Elements</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Multidimensional-Arrays-1"><span>15.1.1.7 Multidimensional Arrays<a class="copiable-link" href="#Multidimensional-Arrays-1"> &para;</a></span></h4>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Multiple-Escape-Characters.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Multiple Escape Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Multiple Escape Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Multiple Escape Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Syntax-Types.html" rel="up" title="Character Syntax Types">
+<link href="Examples-of-Multiple-Escape-Characters.html" rel="next" title="Examples of Multiple Escape Characters">
+<link href="Macro-Characters.html" rel="prev" title="Macro Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Multiple-Escape-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Multiple-Escape-Characters.html" accesskey="n" rel="next">Examples of Multiple Escape Characters</a>, Previous: <a href="Macro-Characters.html" accesskey="p" rel="prev">Macro Characters</a>, Up: <a href="Character-Syntax-Types.html" accesskey="u" rel="up">Character Syntax Types</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Multiple-Escape-Characters-1"><span>2.1.4.5 Multiple Escape Characters<a class="copiable-link" href="#Multiple-Escape-Characters-1"> &para;</a></span></h4>
+
+<p>A pair of <i class="i">multiple escape</i>
+<a class="index-entry-id" id="index-multiple-escape"></a>
+ <i class="i">characters</i>
+is used to indicate that an enclosed sequence of characters,
+including possible <i class="i">macro characters</i> and <i class="i">whitespace</i>_2 <i class="i">characters</i>,
+are to be treated as <i class="i">alphabetic</i>_2 <i class="i">characters</i> 
+with <i class="i">case</i> preserved.
+Any <i class="i">single escape</i> and <i class="i">multiple escape</i> <i class="i">characters</i> 
+that are to appear in the sequence must be preceded by a <i class="i">single escape</i> 
+<i class="i">character</i>.  
+</p>
+<p><i class="i">Vertical-bar</i> is a <i class="i">multiple escape</i> <i class="i">character</i>
+in <i class="i">standard syntax</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Multiple-Possible-Textual-Representations.html
@@ -0,0 +1,115 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Multiple Possible Textual Representations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Multiple Possible Textual Representations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Multiple Possible Textual Representations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-The-Lisp-Printer.html" rel="up" title="Overview of The Lisp Printer">
+<link href="Printer-Escaping.html" rel="next" title="Printer Escaping">
+<link href="Overview-of-The-Lisp-Printer.html" rel="prev" title="Overview of The Lisp Printer">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Multiple-Possible-Textual-Representations">
+<div class="nav-panel">
+<p>
+Next: <a href="Printer-Escaping.html" accesskey="n" rel="next">Printer Escaping</a>, Previous: <a href="Overview-of-The-Lisp-Printer.html" accesskey="p" rel="prev">Overview of The Lisp Printer</a>, Up: <a href="Overview-of-The-Lisp-Printer.html" accesskey="u" rel="up">Overview of The Lisp Printer</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Multiple-Possible-Textual-Representations-1"><span>22.1.1.1 Multiple Possible Textual Representations<a class="copiable-link" href="#Multiple-Possible-Textual-Representations-1"> &para;</a></span></h4>
+
+<p>Most <i class="i">objects</i> have more than one possible textual representation.
+For example, the positive <i class="i">integer</i> with a magnitude of twenty-seven
+can be textually expressed in any of these ways:
+</p>
+<div class="example">
+<pre class="example-preformatted"> 27    27.    #o33    #x1B    #b11011    #.(* 3 3 3)    81/3
+</pre></div>
+
+<p>A list containing the two symbols <code class="t">A</code> and <code class="t">B</code> can also be textually
+expressed in a variety of ways:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (A B)    (a b)    (  a  b )    (\A |B|) 
+(|\A|
+  B
+)
+</pre></div>
+
+<p>In general,
+</p>
+<p>from the point of view of the <i class="i">Lisp reader</i>,
+</p>
+<p>wherever <i class="i">whitespace</i> is permissible in a textual representation,
+any number of <i class="i">spaces</i> and <i class="i">newlines</i> can appear in <i class="i">standard syntax</i>.
+</p>
+<p>When a function such as <b class="b">print</b> produces a printed representation,
+it must choose 
+from among many possible textual representations.
+In most cases, it chooses a 
+program readable representation,
+but in certain cases it might use a more compact notation that is not 
+program-readable.
+</p>
+<p>A number of option variables, called
+<i class="i">printer control variables</i>
+<a class="index-entry-id" id="index-printer-control-variable"></a>
+,
+are provided to permit control of individual aspects of the 
+printed representation of <i class="i">objects</i>.
+Figure 22&ndash;1 shows the <i class="i">standardized</i> <i class="i">printer control variables</i>;
+there might also be <i class="i">implementation-defined</i> <i class="i">printer control variables</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  *print-array*   *print-gensym*       *print-pprint-dispatch*  <!-- /@w -->
+  *print-base*    *print-length*       *print-pretty*           <!-- /@w -->
+  *print-case*    *print-level*        *print-radix*            <!-- /@w -->
+  *print-circle*  *print-lines*        *print-readably*         <!-- /@w -->
+  *print-escape*  *print-miser-width*  *print-right-margin*     <!-- /@w -->
+
+       Figure 22&ndash;1: Standardized Printer Control Variables     <!-- /@w -->
+
+</pre></div></div>
+
+<p>In addition to the <i class="i">printer control variables</i>, 
+the following additional <i class="i">defined names</i> 
+relate to or affect the behavior of the <i class="i">Lisp printer</i>:
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  *package*                    *read-eval*  readtable-case  <!-- /@w -->
+  *read-default-float-format*  *readtable*                  <!-- /@w -->
+
+   Figure 22&ndash;2: Additional Influences on the Lisp printer. <!-- /@w -->
+
+</pre></div></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Printer-Escaping.html">Printer Escaping</a>, Previous: <a href="Overview-of-The-Lisp-Printer.html">Overview of The Lisp Printer</a>, Up: <a href="Overview-of-The-Lisp-Printer.html">Overview of The Lisp Printer</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/NIL-as-a-Component-Value.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>NIL as a Component Value (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="NIL as a Component Value (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="NIL as a Component Value (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="_002d_003eWILD-as-a-Component-Value.html" rel="next" title="-&gt;WILD as a Component Value">
+<link href="Special-Pathname-Component-Values.html" rel="prev" title="Special Pathname Component Values">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="NIL-as-a-Component-Value">
+<div class="nav-panel">
+<p>
+Next: <a href="_002d_003eWILD-as-a-Component-Value.html" accesskey="n" rel="next">:WILD as a Component Value</a>, Previous: <a href="Special-Pathname-Component-Values.html" accesskey="p" rel="prev">Special Pathname Component Values</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="NIL-as-a-Component-Value-1"><span>19.2.2.7 NIL as a Component Value<a class="copiable-link" href="#NIL-as-a-Component-Value-1"> &para;</a></span></h4>
+
+<p>As a <i class="i">pathname</i> component value,
+<b class="b">nil</b> represents that the component is &ldquo;unfilled&rdquo;;
+see <a class="ref" href="Merging-Pathnames.html">Merging Pathnames</a>.
+</p>
+<p>The value of any <i class="i">pathname</i> component can be <b class="b">nil</b>.
+</p>
+<p>When constructing a <i class="i">pathname</i>,
+<b class="b">nil</b> in the host component might mean a default host
+rather than an actual <b class="b">nil</b> in some <i class="i">implementations</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/NIL.html
@@ -0,0 +1,105 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>NIL (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="NIL (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="NIL (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Notational-Conventions.html" rel="up" title="Notational Conventions">
+<link href="Designators.html" rel="next" title="Designators">
+<link href="Use-of-the-Dot-Character.html" rel="prev" title="Use of the Dot Character">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="NIL">
+<div class="nav-panel">
+<p>
+Next: <a href="Designators.html" accesskey="n" rel="next">Designators</a>, Previous: <a href="Use-of-the-Dot-Character.html" accesskey="p" rel="prev">Use of the Dot Character</a>, Up: <a href="Notational-Conventions.html" accesskey="u" rel="up">Notational Conventions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="NIL-1"><span>1.4.1.11 NIL<a class="copiable-link" href="#NIL-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-nil"></a>
+
+<a class="index-entry-id" id="index-_0028_0029"></a>
+
+<a class="index-entry-id" id="index-nil-2"></a>
+
+<p><b class="b">nil</b> has a variety of meanings.
+It is a <i class="i">symbol</i> in the <code class="t">COMMON-LISP</code> <i class="i">package</i> with the <i class="i">name</i> <code class="t">&quot;NIL&quot;</code>,
+it is <i class="i">boolean</i> (and <i class="i">generalized boolean</i>) <i class="i">false</i>,
+it is the <i class="i">empty list</i>,
+and it is the <i class="i">name</i> of the <i class="i">empty type</i> (a <i class="i">subtype</i> of all <i class="i">types</i>).
+</p>
+<p>Within <span class="r">Common Lisp</span>, <b class="b">nil</b> can be notated interchangeably as either <code class="t">NIL</code> or <code class="t">()</code>.
+By convention, the choice of notation offers a hint as to which of its many
+roles it is playing.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <b class="b">For Evaluation?</b>  <b class="b">Notation</b>  <b class="b">Typically Implied Role</b>       <!-- /@w -->
+  ________________________________________________________<!-- /@w -->
+  Yes              <code class="t">nil</code>       use as a <i class="i">boolean</i>.            <!-- /@w -->
+  Yes              <code class="t">'nil</code>      use as a <i class="i">symbol</i>.             <!-- /@w -->
+  Yes              <code class="t">'()</code>       use as an <i class="i">empty list</i>         <!-- /@w -->
+  No               <code class="t">nil</code>       use as a <i class="i">symbol</i> or <i class="i">boolean</i>.  <!-- /@w -->
+  No               <code class="t">()</code>        use as an <i class="i">empty list</i>.        <!-- /@w -->
+
+               Figure 1&ndash;1: Notations for NIL             <!-- /@w -->
+
+</pre></div></div>
+
+<p>Within this document only, <b class="b">nil</b> is also sometimes notated as <i class="i">false</i> to
+emphasize its role as a <i class="i">boolean</i>.
+</p>
+<p>For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (print ())                          ;avoided
+ (defun three nil 3)                 ;avoided 
+ '(nil nil)                          ;list of two symbols
+ '(() ())                            ;list of empty lists
+ (defun three () 3)                  ;Emphasize empty parameter list.
+ (append '() '()) &rArr;  ()              ;Emphasize use of empty lists
+ (not nil) &rArr;  <i class="i">true</i>                   ;Emphasize use as Boolean false
+ (get 'nil 'color)                   ;Emphasize use as a symbol
+</pre></div>
+
+<p>A <i class="i">function</i> is sometimes said to &ldquo;be <i class="i">false</i>&rdquo; or &ldquo;be <i class="i">true</i>&rdquo;
+in some circumstance.
+Since no <i class="i">function</i> object can be the same as <b class="b">nil</b> 
+and all <i class="i">function</i> <i class="i">objects</i> represent <i class="i">true</i> when viewed as <i class="i">booleans</i>,
+it would be meaningless to say that the <i class="i">function</i> was literally <i class="i">false</i> 
+and uninteresting to say that it was literally <i class="i">true</i>.
+Instead, these phrases are just traditional alternative ways of saying that the
+<i class="i">function</i> &ldquo;returns <i class="i">false</i>&rdquo; or &ldquo;returns <i class="i">true</i>,&rdquo; respectively.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Designators.html">Designators</a>, Previous: <a href="Use-of-the-Dot-Character.html">Use of the Dot Character</a>, Up: <a href="Notational-Conventions.html">Notational Conventions</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Namestrings-as-Filenames.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Namestrings as Filenames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Namestrings as Filenames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Namestrings as Filenames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-Filenames.html" rel="up" title="Overview of Filenames">
+<link href="Pathnames-as-Filenames.html" rel="next" title="Pathnames as Filenames">
+<link href="Overview-of-Filenames.html" rel="prev" title="Overview of Filenames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Namestrings-as-Filenames">
+<div class="nav-panel">
+<p>
+Next: <a href="Pathnames-as-Filenames.html" accesskey="n" rel="next">Pathnames as Filenames</a>, Previous: <a href="Overview-of-Filenames.html" accesskey="p" rel="prev">Overview of Filenames</a>, Up: <a href="Overview-of-Filenames.html" accesskey="u" rel="up">Overview of Filenames</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Namestrings-as-Filenames-1"><span>19.1.1 Namestrings as Filenames<a class="copiable-link" href="#Namestrings-as-Filenames-1"> &para;</a></span></h4>
+
+<p>A <i class="i">namestring</i>
+<a class="index-entry-id" id="index-namestring"></a>
+ is a <i class="i">string</i> that represents a <i class="i">filename</i>.
+</p>
+<p>In general, the syntax of <i class="i">namestrings</i> involves the use of 
+<i class="i">implementation-defined</i> conventions, 
+usually those customary for the <i class="i">file system</i> in which the named <i class="i">file</i> resides.
+The only exception is the syntax of a <i class="i">logical pathname</i> <i class="i">namestring</i>,
+which is defined in this specification; see <a class="ref" href="Syntax-of-Logical-Pathname-Namestrings.html">Syntax of Logical Pathname Namestrings</a>.
+</p>
+<p>A <i class="i">conforming program</i> must never unconditionally use a
+<i class="i">literal</i> <i class="i">namestring</i> other than a <i class="i">logical pathname</i> <i class="i">namestring</i>
+because <span class="r">Common Lisp</span> does not define any <i class="i">namestring</i> syntax 
+other than that for <i class="i">logical pathnames</i>
+that would be guaranteed to be portable.
+However, a <i class="i">conforming program</i> can, if it is careful, 
+successfully manipulate user-supplied data 
+which contains or refers to non-portable <i class="i">namestrings</i>.
+</p>
+<p>A <i class="i">namestring</i> can be <i class="i">coerced</i> to a <i class="i">pathname</i> by the <i class="i">functions</i> <b class="b">pathname</b>
+or <b class="b">parse-namestring</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Naming-Conventions-for-Rest-Parameters.html
@@ -0,0 +1,59 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Naming Conventions for Rest Parameters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Naming Conventions for Rest Parameters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Naming Conventions for Rest Parameters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="Requiring-Non_002dNull-Rest-Parameters-in-The-_0022Syntax_0022-Section.html" rel="next" title="Requiring Non-Null Rest Parameters in The &quot;Syntax&quot; Section">
+<link href="Special-_0022Syntax_0022-Notations-for-Overloaded-Operators.html" rel="prev" title="Special &quot;Syntax&quot; Notations for Overloaded Operators">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Naming-Conventions-for-Rest-Parameters">
+<div class="nav-panel">
+<p>
+Next: <a href="Requiring-Non_002dNull-Rest-Parameters-in-The-_0022Syntax_0022-Section.html" accesskey="n" rel="next">Requiring Non-Null Rest Parameters in The &quot;Syntax&quot; Section</a>, Previous: <a href="Special-_0022Syntax_0022-Notations-for-Overloaded-Operators.html" accesskey="p" rel="prev">Special &quot;Syntax&quot; Notations for Overloaded Operators</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Naming-Conventions-for-Rest-Parameters-1"><span>1.4.4.26 Naming Conventions for Rest Parameters<a class="copiable-link" href="#Naming-Conventions-for-Rest-Parameters-1"> &para;</a></span></h4>
+
+<p>Within this specification, 
+if the name of a <i class="i">rest parameter</i> is chosen to be a plural noun,
+use of that name in <i class="i">parameter</i> font refers
+to the <i class="i">list</i> to which the <i class="i">rest parameter</i> is bound.
+Use of the singular form of that name in <i class="i">parameter</i> font refers 
+to an <i class="i">element</i> of that <i class="i">list</i>.
+</p>
+<p>For example, given a syntax description such as:
+</p>
+<p><code class="code">F</code>  <i class="i"><span class="r">&amp;rest</span> <i class="i">arguments</i></i>
+</p>
+<p>it is appropriate to refer either to the <i class="i">rest parameter</i> named
+<i class="i">arguments</i> by name, or to one of its elements by speaking of &ldquo;an <i class="i">argument</i>,&rdquo;
+&ldquo;some <i class="i">argument</i>,&rdquo; &ldquo;each <i class="i">argument</i>&rdquo; <i class="i">etc.</i>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Naming-of-Compiler-Macros.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Naming of Compiler Macros (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Naming of Compiler Macros (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Naming of Compiler Macros (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Compilation-Semantics.html" rel="up" title="Compilation Semantics">
+<link href="When-Compiler-Macros-Are-Used.html" rel="next" title="When Compiler Macros Are Used">
+<link href="Purpose-of-Compiler-Macros.html" rel="prev" title="Purpose of Compiler Macros">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Naming-of-Compiler-Macros">
+<div class="nav-panel">
+<p>
+Next: <a href="When-Compiler-Macros-Are-Used.html" accesskey="n" rel="next">When Compiler Macros Are Used</a>, Previous: <a href="Purpose-of-Compiler-Macros.html" accesskey="p" rel="prev">Purpose of Compiler Macros</a>, Up: <a href="Compilation-Semantics.html" accesskey="u" rel="up">Compilation Semantics</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Naming-of-Compiler-Macros-1"><span>3.2.2.3 Naming of Compiler Macros<a class="copiable-link" href="#Naming-of-Compiler-Macros-1"> &para;</a></span></h4>
+
+<p><i class="i">Compiler macros</i> may be defined for <i class="i">function names</i> that name
+<i class="i">macros</i> as well as <i class="i">functions</i>.  
+</p>
+<p><i class="i">Compiler macro</i> definitions are strictly global.  There is no provision
+for defining local <i class="i">compiler macros</i> in the way that <b class="b">macrolet</b>
+defines local <i class="i">macros</i>.  Lexical bindings of a function name shadow any
+compiler macro definition associated with the name as well as its 
+global <i class="i">function</i> or <i class="i">macro</i> definition.
+</p>
+<p>Note that the presence of a compiler macro definition does not affect
+the values returned by
+</p>
+<p>functions that access <i class="i">function</i> definitions (<i class="i">e.g.</i>, <b class="b">fboundp</b>)
+or <i class="i">macro</i> definitions (<i class="i">e.g.</i>, <b class="b">macroexpand</b>).
+Compiler macros are global, and the function
+<b class="b">compiler-macro-function</b> is sufficient to resolve their interaction
+with other lexical and global definitions.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Nesting-of-FORMAT-Operations.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Nesting of FORMAT Operations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Nesting of FORMAT Operations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Nesting of FORMAT Operations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Additional-Information-about-FORMAT-Operations.html" rel="up" title="Additional Information about FORMAT Operations">
+<link href="Missing-and-Additional-FORMAT-Arguments.html" rel="next" title="Missing and Additional FORMAT Arguments">
+<link href="Additional-Information-about-FORMAT-Operations.html" rel="prev" title="Additional Information about FORMAT Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Nesting-of-FORMAT-Operations">
+<div class="nav-panel">
+<p>
+Next: <a href="Missing-and-Additional-FORMAT-Arguments.html" accesskey="n" rel="next">Missing and Additional FORMAT Arguments</a>, Previous: <a href="Additional-Information-about-FORMAT-Operations.html" accesskey="p" rel="prev">Additional Information about FORMAT Operations</a>, Up: <a href="Additional-Information-about-FORMAT-Operations.html" accesskey="u" rel="up">Additional Information about FORMAT Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Nesting-of-FORMAT-Operations-1"><span>22.3.10.1 Nesting of FORMAT Operations<a class="copiable-link" href="#Nesting-of-FORMAT-Operations-1"> &para;</a></span></h4>
+
+<p>The case-conversion, conditional, iteration, and justification
+constructs can contain other formatting constructs by bracketing them.
+These constructs must nest properly with respect to each other.
+For example, it is not legitimate to put the start of a case-conversion
+construct in each arm of a conditional and the
+end of the case-conversion construct outside the conditional:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;~:[abc~:@(def~;ghi~
+:@(jkl~]mno~)&quot; x) ;Invalid!
+</pre></div>
+
+<p>This notation is invalid because the <code class="t">~[...~;...~]</code>
+and <code class="t">~(...~)</code> constructs are not properly nested.
+</p>
+<p>The processing indirection caused by the <code class="t">~?</code> directive
+is also a kind of nesting for the purposes of this rule of proper nesting.
+It is not permitted to
+start a bracketing construct within a string processed
+under control of a <code class="t">~?</code>                                      
+directive and end the construct at some point after the <code class="t">~?</code> construct
+in the string containing that construct, or vice versa.
+For example, this situation is invalid:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;~@?ghi~)&quot; &quot;abc~@(def&quot;) ;Invalid!
+</pre></div>
+
+<p>This notation
+is invalid because the <code class="t">~?</code>
+and <code class="t">~(...~)</code> constructs are not properly nested.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/No-Arguments-or-Values-in-The-_0022Syntax_0022-Section.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>No Arguments or Values in The &quot;Syntax&quot; Section (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="No Arguments or Values in The &quot;Syntax&quot; Section (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="No Arguments or Values in The &quot;Syntax&quot; Section (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="Unconditional-Transfer-of-Control-in-The-_0022Syntax_0022-Section.html" rel="next" title="Unconditional Transfer of Control in The &quot;Syntax&quot; Section">
+<link href="Return-values-in-The-_0022Syntax_0022-Section.html" rel="prev" title="Return values in The &quot;Syntax&quot; Section">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="No-Arguments-or-Values-in-The-_0022Syntax_0022-Section">
+<div class="nav-panel">
+<p>
+Next: <a href="Unconditional-Transfer-of-Control-in-The-_0022Syntax_0022-Section.html" accesskey="n" rel="next">Unconditional Transfer of Control in The &quot;Syntax&quot; Section</a>, Previous: <a href="Return-values-in-The-_0022Syntax_0022-Section.html" accesskey="p" rel="prev">Return values in The &quot;Syntax&quot; Section</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="No-Arguments-or-Values-in-The-_0022Syntax_0022-Section-1"><span>1.4.4.29 No Arguments or Values in The &quot;Syntax&quot; Section<a class="copiable-link" href="#No-Arguments-or-Values-in-The-_0022Syntax_0022-Section-1"> &para;</a></span></h4>
+
+<p>If no <i class="i">arguments</i> are permitted, or no <i class="i">values</i> are returned, 
+a special notation is used to make this more visually apparent.  For example,
+</p>
+<p><code class="code">F</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i">&lt;<i class="i">no <i class="i">values</i></i>&gt;</i>
+</p>
+<p>indicates that <code class="t">F</code> is an operator that accepts no <i class="i">arguments</i> and returns
+no <i class="i">values</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Nonsense-Words.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Nonsense Words (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Nonsense Words (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Nonsense Words (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Notational-Conventions.html" rel="up" title="Notational Conventions">
+<link href="Designators.html" rel="prev" title="Designators">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Nonsense-Words">
+<div class="nav-panel">
+<p>
+Previous: <a href="Designators.html" accesskey="p" rel="prev">Designators</a>, Up: <a href="Notational-Conventions.html" accesskey="u" rel="up">Notational Conventions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Nonsense-Words-1"><span>1.4.1.13 Nonsense Words<a class="copiable-link" href="#Nonsense-Words-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-foo"></a>
+
+<a class="index-entry-id" id="index-bar"></a>
+
+<a class="index-entry-id" id="index-baz"></a>
+
+<a class="index-entry-id" id="index-quux"></a>
+
+<p>When a word having no pre-attached semantics is required (<i class="i">e.g.</i>, in an
+example), it is common in the Lisp community to use one of the words
+&ldquo;foo,&rdquo; &ldquo;bar,&rdquo; &ldquo;baz,&rdquo; and &ldquo;quux.&rdquo;  For example, in
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun foo (x) (+ x 1))
+</pre></div>
+
+<p>the use of the name <code class="t">foo</code> is just a shorthand way of saying 
+&ldquo;please substitute your favorite name here.&rdquo;
+</p>
+<p>These nonsense words have gained such prevalance of usage, that it is
+commonplace for newcomers to the community to begin to wonder if there
+is an attached semantics which they are overlooking&mdash;there is not.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Notational-Conventions.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Notational Conventions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Notational Conventions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Notational Conventions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Definitions.html" rel="up" title="Definitions">
+<link href="Error-Terminology.html" rel="next" title="Error Terminology">
+<link href="Definitions.html" rel="prev" title="Definitions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Notational-Conventions">
+<div class="nav-panel">
+<p>
+Next: <a href="Error-Terminology.html" accesskey="n" rel="next">Error Terminology</a>, Previous: <a href="Definitions.html" accesskey="p" rel="prev">Definitions</a>, Up: <a href="Definitions.html" accesskey="u" rel="up">Definitions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Notational-Conventions-1"><span>1.4.1 Notational Conventions<a class="copiable-link" href="#Notational-Conventions-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-notation"></a>
+
+<p>The following notational conventions are used throughout this document.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Font-Key.html" accesskey="1">Font Key</a></li>
+<li><a href="Modified-BNF-Syntax.html" accesskey="2">Modified BNF Syntax</a></li>
+<li><a href="Splicing-in-Modified-BNF-Syntax.html" accesskey="3">Splicing in Modified BNF Syntax</a></li>
+<li><a href="Indirection-in-Modified-BNF-Syntax.html" accesskey="4">Indirection in Modified BNF Syntax</a></li>
+<li><a href="Additional-Uses-for-Indirect-Definitions-in-Modified-BNF-Syntax.html" accesskey="5">Additional Uses for Indirect Definitions in Modified BNF Syntax</a></li>
+<li><a href="Special-Symbols.html" accesskey="6">Special Symbols</a></li>
+<li><a href="Objects-with-Multiple-Notations.html" accesskey="7">Objects with Multiple Notations</a></li>
+<li><a href="Case-in-Symbols.html" accesskey="8">Case in Symbols</a></li>
+<li><a href="Numbers-_0028Objects-with-Multiple-Notations_0029.html" accesskey="9">Numbers</a></li>
+<li><a href="Use-of-the-Dot-Character.html">Use of the Dot Character</a></li>
+<li><a href="NIL.html">NIL</a></li>
+<li><a href="Designators.html">Designators</a></li>
+<li><a href="Nonsense-Words.html">Nonsense Words</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Note-about-Printing-Numbers.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Note about Printing Numbers (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Note about Printing Numbers (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Note about Printing Numbers (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Printing-Characters.html" rel="next" title="Printing Characters">
+<link href="Printing-Complexes.html" rel="prev" title="Printing Complexes">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Note-about-Printing-Numbers">
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Characters.html" accesskey="n" rel="next">Printing Characters</a>, Previous: <a href="Printing-Complexes.html" accesskey="p" rel="prev">Printing Complexes</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Note-about-Printing-Numbers-1"><span>22.1.3.6 Note about Printing Numbers<a class="copiable-link" href="#Note-about-Printing-Numbers-1"> &para;</a></span></h4>
+
+<p>The printed representation of a number must not contain <i class="i">escape</i> <i class="i">characters</i>;
+see <a class="ref" href="Escape-Characters-and-Potential-Numbers.html">Escape Characters and Potential Numbers</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Note-about-Tabs-in-Condition-Reports.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Note about Tabs in Condition Reports (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Note about Tabs in Condition Reports (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Note about Tabs in Condition Reports (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printing-Conditions.html" rel="up" title="Printing Conditions">
+<link href="Mentioning-Containing-Function-in-Condition-Reports.html" rel="next" title="Mentioning Containing Function in Condition Reports">
+<link href="Embedded-Newlines-in-Condition-Reports.html" rel="prev" title="Embedded Newlines in Condition Reports">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Note-about-Tabs-in-Condition-Reports">
+<div class="nav-panel">
+<p>
+Next: <a href="Mentioning-Containing-Function-in-Condition-Reports.html" accesskey="n" rel="next">Mentioning Containing Function in Condition Reports</a>, Previous: <a href="Embedded-Newlines-in-Condition-Reports.html" accesskey="p" rel="prev">Embedded Newlines in Condition Reports</a>, Up: <a href="Printing-Conditions.html" accesskey="u" rel="up">Printing Conditions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Note-about-Tabs-in-Condition-Reports-1"><span>9.1.3.5 Note about Tabs in Condition Reports<a class="copiable-link" href="#Note-about-Tabs-in-Condition-Reports-1"> &para;</a></span></h4>
+
+<p>Because the indentation of a <i class="i">report message</i> might be shifted to the right or
+left by an arbitrary amount, special care should be taken with the
+semi-standard <i class="i">character</i> &lt;<i class="i">Tab</i>&gt; 
+(in those <i class="i">implementations</i> that support such a <i class="i">character</i>).  
+Unless the <i class="i">implementation</i> specifically defines its behavior 
+in this context, its use should be avoided.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Notes-about-Backquote.html
@@ -0,0 +1,59 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Notes about Backquote (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Notes about Backquote (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Notes about Backquote (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Backquote.html" rel="up" title="Backquote">
+<link href="Backquote.html" rel="prev" title="Backquote">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Notes-about-Backquote">
+<div class="nav-panel">
+<p>
+Previous: <a href="Backquote.html" accesskey="p" rel="prev">Backquote</a>, Up: <a href="Backquote.html" accesskey="u" rel="up">Backquote</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Notes-about-Backquote-1"><span>2.4.6.1 Notes about Backquote<a class="copiable-link" href="#Notes-about-Backquote-1"> &para;</a></span></h4>
+
+<p>Since the exact manner in which the <i class="i">Lisp reader</i> will parse
+an <i class="i">expression</i> involving the <i class="i">backquote</i> <i class="i">reader macro</i> 
+is not specified, an <i class="i">implementation</i> is free to choose any
+representation that preserves the semantics described.
+</p>
+<p>Often an <i class="i">implementation</i> will choose a representation that facilitates
+pretty printing of the expression, so that <code class="t">(pprint `(a ,b))</code> will display
+<code class="t">`(a ,b)</code> and not, for example, <code class="t">(list 'a b)</code>.  However, this is not a
+requirement.
+</p>
+<p>Implementors who have no particular reason to make one choice or another
+might wish to refer to <b class="b">IEEE Standard for the Scheme Programming Language</b>, which identifies a popular choice of
+representation for such expressions that might provide useful to be useful
+compatibility for some user communities.  There is no requirement, however,
+that any <i class="i">conforming implementation</i> use this particular representation.
+This information is provided merely for cross-reference purposes.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Notes-about-FORMAT.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Notes about FORMAT (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Notes about FORMAT (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Notes about FORMAT (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Formatted-Output.html" rel="up" title="Formatted Output">
+<link href="Examples-of-FORMAT.html" rel="prev" title="Examples of FORMAT">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Notes-about-FORMAT">
+<div class="nav-panel">
+<p>
+Previous: <a href="Examples-of-FORMAT.html" accesskey="p" rel="prev">Examples of FORMAT</a>, Up: <a href="Formatted-Output.html" accesskey="u" rel="up">Formatted Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Notes-about-FORMAT-1"><span>22.3.12 Notes about FORMAT<a class="copiable-link" href="#Notes-about-FORMAT-1"> &para;</a></span></h4>
+
+<p>Formatted output is performed not only by <b class="b">format</b>,
+but by certain other functions that accept a <i class="i">format control</i>
+the way <b class="b">format</b> does.  For example, error-signaling functions
+such as <b class="b">cerror</b> accept <i class="i">format controls</i>.
+</p>
+<p>Note that the meaning of <b class="b">nil</b> and <b class="b">t</b> as destinations to <b class="b">format</b> 
+are different than those of <b class="b">nil</b> and <b class="b">t</b> as <i class="i">stream designators</i>.
+</p>
+<p>The <code class="t">~<code class="t">^</code></code> should appear only at the beginning of a <code class="t">~&lt;</code> clause,
+because it aborts the entire clause in which it appears (as well as
+all following clauses).                                     
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Notes-about-Loop.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Notes about Loop (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Notes about Loop (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Notes about Loop (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-LOOP-Facility.html" rel="up" title="The LOOP Facility">
+<link href="Examples-of-Miscellaneous-Loop-Features.html" rel="prev" title="Examples of Miscellaneous Loop Features">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Notes-about-Loop">
+<div class="nav-panel">
+<p>
+Previous: <a href="Examples-of-Miscellaneous-Loop-Features.html" accesskey="p" rel="prev">Examples of Miscellaneous Loop Features</a>, Up: <a href="The-LOOP-Facility.html" accesskey="u" rel="up">The LOOP Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Notes-about-Loop-1"><span>6.1.9 Notes about Loop<a class="copiable-link" href="#Notes-about-Loop-1"> &para;</a></span></h4>
+
+<p><i class="i">Types</i> can be supplied for loop variables.  
+It is not necessary to supply a <i class="i">type</i> for any variable,
+but supplying the <i class="i">type</i> 
+can ensure that the variable has a correctly typed initial value,
+and it can also enable compiler optimizations 
+(depending on the <i class="i">implementation</i>).
+</p>
+<p>The clause <code class="t">repeat</code> <i class="i">n</i> ... is roughly equivalent to a clause such as 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (loop for <i class="i">internal-variable</i> downfrom (- <i class="i">n</i> 1) to 0 ...)
+</pre></div>
+
+<p>but in some <i class="i">implementations</i>,
+the <code class="t">repeat</code> construct might be more efficient.
+</p>
+<p>Within the executable parts of the loop clauses and around the entire
+<b class="b">loop</b> form, variables can be bound by using <b class="b">let</b>.
+</p>
+<p>Use caution when using a variable named <code class="t">IT</code> (in any <i class="i">package</i>)
+in connection with <b class="b">loop</b>, since <code class="t">it</code> is a <i class="i">loop keyword</i> 
+that can be used in place of a <i class="i">form</i> in certain contexts.
+</p>
+<p>There is
+</p>
+<p>no
+</p>
+<p><i class="i">standardized</i>
+mechanism for users to add
+extensions to <b class="b">loop</b>.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Notes-about-Style-for-Semicolon.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Notes about Style for Semicolon (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Notes about Style for Semicolon (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Notes about Style for Semicolon (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Semicolon.html" rel="up" title="Semicolon">
+<link href="Use-of-Single-Semicolon.html" rel="next" title="Use of Single Semicolon">
+<link href="Examples-of-Semicolon.html" rel="prev" title="Examples of Semicolon">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Notes-about-Style-for-Semicolon">
+<div class="nav-panel">
+<p>
+Next: <a href="Use-of-Single-Semicolon.html" accesskey="n" rel="next">Use of Single Semicolon</a>, Previous: <a href="Examples-of-Semicolon.html" accesskey="p" rel="prev">Examples of Semicolon</a>, Up: <a href="Semicolon.html" accesskey="u" rel="up">Semicolon</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Notes-about-Style-for-Semicolon-1"><span>2.4.4.2 Notes about Style for Semicolon<a class="copiable-link" href="#Notes-about-Style-for-Semicolon-1"> &para;</a></span></h4>
+
+<p>Some text editors make assumptions about desired indentation based on
+the number of <i class="i">semicolons</i> that begin a comment.  The following style 
+conventions are common, although not by any means universal.  
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Notes-about-Style-for-Sharpsign-Vertical_002dBar.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Notes about Style for Sharpsign Vertical-Bar (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Notes about Style for Sharpsign Vertical-Bar (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Notes about Style for Sharpsign Vertical-Bar (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-Less_002dThan_002dSign.html" rel="next" title="Sharpsign Less-Than-Sign">
+<link href="Examples-of-Sharpsign-Vertical_002dBar.html" rel="prev" title="Examples of Sharpsign Vertical-Bar">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Notes-about-Style-for-Sharpsign-Vertical_002dBar">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-Less_002dThan_002dSign.html" accesskey="n" rel="next">Sharpsign Less-Than-Sign</a>, Previous: <a href="Examples-of-Sharpsign-Vertical_002dBar.html" accesskey="p" rel="prev">Examples of Sharpsign Vertical-Bar</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Notes-about-Style-for-Sharpsign-Vertical_002dBar-1"><span>2.4.8.22 Notes about Style for Sharpsign Vertical-Bar<a class="copiable-link" href="#Notes-about-Style-for-Sharpsign-Vertical_002dBar-1"> &para;</a></span></h4>
+
+<p>Some text editors that purport to understand Lisp syntax treat any <code class="t">|...|</code>
+as balanced pairs that cannot nest (as if they were just balanced pairs of 
+the multiple escapes used in notating certain symbols).  To compensate for 
+this deficiency, some programmers use the notation <code class="t">#||...#||...||#...||#</code>
+instead of <code class="t">#|...#|...|#...|#</code>.   Note that this alternate usage is not
+a different <i class="i">reader macro</i>; it merely exploits the fact that the additional
+vertical-bars occur within the comment in a way that tricks certain text editor
+into better supporting nested comments.  As such, one might sometimes see code
+like:
+</p>
+<div class="example">
+<pre class="example-preformatted"> #|| (+ #|| 3 ||# 4 5) ||# 
+</pre></div>
+
+<p>Such code is equivalent to:
+</p>
+<div class="example">
+<pre class="example-preformatted"> #| (+ #| 3 |# 4 5) |#
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Notes-about-The-KEYWORD-Package.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Notes about The KEYWORD Package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Notes about The KEYWORD Package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Notes about The KEYWORD Package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standardized-Packages.html" rel="up" title="Standardized Packages">
+<link href="Implementation_002dDefined-Packages.html" rel="next" title="Implementation-Defined Packages">
+<link href="Interning-a-Symbol-in-the-KEYWORD-Package.html" rel="prev" title="Interning a Symbol in the KEYWORD Package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Notes-about-The-KEYWORD-Package">
+<div class="nav-panel">
+<p>
+Next: <a href="Implementation_002dDefined-Packages.html" accesskey="n" rel="next">Implementation-Defined Packages</a>, Previous: <a href="Interning-a-Symbol-in-the-KEYWORD-Package.html" accesskey="p" rel="prev">Interning a Symbol in the KEYWORD Package</a>, Up: <a href="Standardized-Packages.html" accesskey="u" rel="up">Standardized Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Notes-about-The-KEYWORD-Package-1"><span>11.1.2.8 Notes about The KEYWORD Package<a class="copiable-link" href="#Notes-about-The-KEYWORD-Package-1"> &para;</a></span></h4>
+
+<p>It is generally best to confine the use of <i class="i">keywords</i> to situations in which
+there are a finitely enumerable set of names to be selected between.  For example,
+if there were two states of a light switch, they might be called <code class="t">:on</code> and <code class="t">:off</code>.
+</p>
+<p>In situations where the set of names is not finitely enumerable
+(<i class="i">i.e.</i>, where name conflicts might arise)
+it is frequently best to use <i class="i">symbols</i> in some <i class="i">package</i>
+other than <code class="t">KEYWORD</code> so that conflicts will be naturally avoided.
+For example, it is generally not wise for a <i class="i">program</i> to use a <i class="i">keyword</i>_1 
+as a <i class="i">property indicator</i>, since if there were ever another <i class="i">program</i>
+that did the same thing, each would clobber the other&rsquo;s data.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Notes-about-the-Condition-System_0060s-Background.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Notes about the Condition System`s Background (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Notes about the Condition System`s Background (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Notes about the Condition System`s Background (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Condition-System-Concepts.html" rel="up" title="Condition System Concepts">
+<link href="Assertions.html" rel="prev" title="Assertions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Notes-about-the-Condition-System_0060s-Background">
+<div class="nav-panel">
+<p>
+Previous: <a href="Assertions.html" accesskey="p" rel="prev">Assertions</a>, Up: <a href="Condition-System-Concepts.html" accesskey="u" rel="up">Condition System Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Notes-about-the-Condition-System_0060s-Background-1"><span>9.1.6 Notes about the Condition System&lsquo;s Background<a class="copiable-link" href="#Notes-about-the-Condition-System_0060s-Background-1"> &para;</a></span></h4>
+
+<p>For a background reference to the abstract concepts detailed in this
+section, see <i class="i">Exceptional Situations in Lisp</i>.  The details of that paper are not binding on
+this document, but may be helpful in establishing a conceptual basis for
+understanding this material.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Notes-about-the-Implementation-of-Compiler-Macros.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Notes about the Implementation of Compiler Macros (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Notes about the Implementation of Compiler Macros (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Notes about the Implementation of Compiler Macros (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Compilation-Semantics.html" rel="up" title="Compilation Semantics">
+<link href="Minimal-Compilation.html" rel="next" title="Minimal Compilation">
+<link href="When-Compiler-Macros-Are-Used.html" rel="prev" title="When Compiler Macros Are Used">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Notes-about-the-Implementation-of-Compiler-Macros">
+<div class="nav-panel">
+<p>
+Next: <a href="Minimal-Compilation.html" accesskey="n" rel="next">Minimal Compilation</a>, Previous: <a href="When-Compiler-Macros-Are-Used.html" accesskey="p" rel="prev">When Compiler Macros Are Used</a>, Up: <a href="Compilation-Semantics.html" accesskey="u" rel="up">Compilation Semantics</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Notes-about-the-Implementation-of-Compiler-Macros-1"><span>3.2.2.5 Notes about the Implementation of Compiler Macros<a class="copiable-link" href="#Notes-about-the-Implementation-of-Compiler-Macros-1"> &para;</a></span></h4>
+
+<p>Although it is technically permissible, as described above,
+for <b class="b">eval</b> to treat <i class="i">compiler macros</i> in the same situations
+as <i class="i">compiler</i> might, this is not necessarily a good idea in
+<i class="i">interpreted implementations</i>.
+</p>
+<p><i class="i">Compiler macros</i> exist for the purpose of trading compile-time speed
+for run-time speed.  Programmers who write <i class="i">compiler macros</i> tend to
+assume that the <i class="i">compiler macros</i> can take more time than normal <i class="i">functions</i>
+and <i class="i">macros</i> in order to produce code which is especially optimal for use
+at run time.  Since <b class="b">eval</b> in an <i class="i">interpreted implementation</i>
+might perform semantic analysis of the same form multiple times, it might be 
+inefficient in general for the <i class="i">implementation</i> to choose to call
+<i class="i">compiler macros</i> on every such <i class="i">evaluation</i>.
+</p>
+<p>Nevertheless, the decision about what to do in these situations is left to
+each <i class="i">implementation</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Notes-about-the-Pathname-Version-Component.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Notes about the Pathname Version Component (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Notes about the Pathname Version Component (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Notes about the Pathname Version Component (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Restrictions-on-Constructing-Pathnames.html" rel="next" title="Restrictions on Constructing Pathnames">
+<link href="Restrictions-on-Examining-a-Pathname-Version-Component.html" rel="prev" title="Restrictions on Examining a Pathname Version Component">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Notes-about-the-Pathname-Version-Component">
+<div class="nav-panel">
+<p>
+Next: <a href="Restrictions-on-Constructing-Pathnames.html" accesskey="n" rel="next">Restrictions on Constructing Pathnames</a>, Previous: <a href="Restrictions-on-Examining-a-Pathname-Version-Component.html" accesskey="p" rel="prev">Restrictions on Examining a Pathname Version Component</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Notes-about-the-Pathname-Version-Component-1"><span>19.2.2.20 Notes about the Pathname Version Component<a class="copiable-link" href="#Notes-about-the-Pathname-Version-Component-1"> &para;</a></span></h4>
+
+<p>It is suggested, but not required, that implementations do the following:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>Use positive <i class="i">integers</i> starting at 1 as version numbers.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Recognize the symbol <code class="t">:oldest</code>
+		 to designate the smallest existing version number.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Use <i class="i">keywords</i> for other special versions.
+</p>
+</dd>
+</dl>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Notes-about-the-Pretty-Printer_0060s-Background.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Notes about the Pretty Printer`s Background (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Notes about the Pretty Printer`s Background (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Notes about the Pretty Printer`s Background (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Lisp-Pretty-Printer.html" rel="up" title="The Lisp Pretty Printer">
+<link href="Examples-of-using-the-Pretty-Printer.html" rel="prev" title="Examples of using the Pretty Printer">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Notes-about-the-Pretty-Printer_0060s-Background">
+<div class="nav-panel">
+<p>
+Previous: <a href="Examples-of-using-the-Pretty-Printer.html" accesskey="p" rel="prev">Examples of using the Pretty Printer</a>, Up: <a href="The-Lisp-Pretty-Printer.html" accesskey="u" rel="up">The Lisp Pretty Printer</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Notes-about-the-Pretty-Printer_0060s-Background-1"><span>22.2.3 Notes about the Pretty Printer&lsquo;s Background<a class="copiable-link" href="#Notes-about-the-Pretty-Printer_0060s-Background-1"> &para;</a></span></h4>
+
+<p>For a background reference to the abstract concepts detailed in this
+section, see <i class="i">XP: A Common Lisp Pretty Printing System</i>.  The details of that paper are not binding on
+this document, but may be helpful in establishing a conceptual basis for
+understanding this material.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Null-Strings-as-Components-of-a-Logical-Pathname.html
@@ -0,0 +1,45 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Null Strings as Components of a Logical Pathname (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Null Strings as Components of a Logical Pathname (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Null Strings as Components of a Logical Pathname (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Logical-Pathname-Components.html" rel="up" title="Logical Pathname Components">
+<link href="Unspecific-Components-of-a-Logical-Pathname.html" rel="prev" title="Unspecific Components of a Logical Pathname">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Null-Strings-as-Components-of-a-Logical-Pathname">
+<div class="nav-panel">
+<p>
+Previous: <a href="Unspecific-Components-of-a-Logical-Pathname.html" accesskey="p" rel="prev">Unspecific Components of a Logical Pathname</a>, Up: <a href="Logical-Pathname-Components.html" accesskey="u" rel="up">Logical Pathname Components</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Null-Strings-as-Components-of-a-Logical-Pathname-1"><span>19.3.2.2 Null Strings as Components of a Logical Pathname<a class="copiable-link" href="#Null-Strings-as-Components-of-a-Logical-Pathname-1"> &para;</a></span></h4>
+
+<p>The null string, <code class="t">&quot;&quot;</code>, is not a valid value for any component of a <i class="i">logical pathname</i>.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Number-Concepts.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Number Concepts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Number Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Number Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-_0028Numbers_0029.html" rel="up" title="Numbers (Numbers)">
+<link href="Numbers-Dictionary.html" rel="next" title="Numbers Dictionary">
+<link href="Numbers-_0028Numbers_0029.html" rel="prev" title="Numbers (Numbers)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Number-Concepts">
+<div class="nav-panel">
+<p>
+Next: <a href="Numbers-Dictionary.html" accesskey="n" rel="next">Numbers Dictionary</a>, Previous: <a href="Numbers-_0028Numbers_0029.html" accesskey="p" rel="prev">Numbers</a>, Up: <a href="Numbers-_0028Numbers_0029.html" accesskey="u" rel="up">Numbers</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Number-Concepts-1"><span>12.1 Number Concepts<a class="copiable-link" href="#Number-Concepts-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Numeric-Operations.html" accesskey="1">Numeric Operations</a></li>
+<li><a href="Implementation_002dDependent-Numeric-Constants.html" accesskey="2">Implementation-Dependent Numeric Constants</a></li>
+<li><a href="Rational-Computations.html" accesskey="3">Rational Computations</a></li>
+<li><a href="Floating_002dpoint-Computations.html" accesskey="4">Floating-point Computations</a></li>
+<li><a href="Complex-Computations.html" accesskey="5">Complex Computations</a></li>
+<li><a href="Interval-Designators.html" accesskey="6">Interval Designators</a></li>
+<li><a href="Random_002dState-Operations.html" accesskey="7">Random-State Operations</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Numbers-Dictionary.html
@@ -0,0 +1,135 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Numbers Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Numbers Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Numbers Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-_0028Numbers_0029.html" rel="up" title="Numbers (Numbers)">
+<link href="Number-Concepts.html" rel="prev" title="Number Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Numbers-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Number-Concepts.html" accesskey="p" rel="prev">Number Concepts</a>, Up: <a href="Numbers-_0028Numbers_0029.html" accesskey="u" rel="up">Numbers</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Numbers-Dictionary-1"><span>12.2 Numbers Dictionary<a class="copiable-link" href="#Numbers-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="number.html" accesskey="1">number                                                       [System Class]</a></li>
+<li><a href="complex-_0028System-Class_0029.html" accesskey="2">complex                                                      [System Class]</a></li>
+<li><a href="real.html" accesskey="3">real                                                         [System Class]</a></li>
+<li><a href="float-_0028System-Class_0029.html" accesskey="4">float                                                        [System Class]</a></li>
+<li><a href="short_002dfloat.html" accesskey="5">short-float, single-float, double-float, long-float                  [Type]</a></li>
+<li><a href="rational-_0028System-Class_0029.html" accesskey="6">rational                                                     [System Class]</a></li>
+<li><a href="ratio.html" accesskey="7">ratio                                                        [System Class]</a></li>
+<li><a href="integer.html" accesskey="8">integer                                                      [System Class]</a></li>
+<li><a href="signed_002dbyte.html" accesskey="9">signed-byte                                                          [Type]</a></li>
+<li><a href="unsigned_002dbyte.html">unsigned-byte                                                        [Type]</a></li>
+<li><a href="mod-_0028System-Class_0029.html">mod                                                        [Type Specifier]</a></li>
+<li><a href="bit-_0028System-Class_0029.html">bit                                                                  [Type]</a></li>
+<li><a href="fixnum.html">fixnum                                                               [Type]</a></li>
+<li><a href="bignum.html">bignum                                                               [Type]</a></li>
+<li><a href="_003d.html">=, /=, &lt;, &gt;, &lt;=, &gt;=                                              [Function]</a></li>
+<li><a href="max.html">max, min                                                         [Function]</a></li>
+<li><a href="minusp.html">minusp, plusp                                                    [Function]</a></li>
+<li><a href="zerop.html">zerop                                                            [Function]</a></li>
+<li><a href="floor.html">floor, ffloor, ceiling, fceiling,</a></li>
+<li><a href="sin.html">sin, cos, tan                                                    [Function]</a></li>
+<li><a href="asin.html">asin, acos, atan                                                 [Function]</a></li>
+<li><a href="pi.html">pi                                                      [Constant Variable]</a></li>
+<li><a href="sinh.html">sinh, cosh, tanh, asinh, acosh, atanh                            [Function]</a></li>
+<li><a href="_002a.html">*                                                                [Function]</a></li>
+<li><a href="_002b.html">+                                                                [Function]</a></li>
+<li><a href="_002d.html">-                                                              [Function]</a></li>
+<li><a href="_002f.html">/                                                                [Function]</a></li>
+<li><a href="1_002b.html">1+, 1-                                                         [Function]</a></li>
+<li><a href="abs.html">abs                                                              [Function]</a></li>
+<li><a href="evenp.html">evenp, oddp                                                      [Function]</a></li>
+<li><a href="exp.html">exp, expt                                                        [Function]</a></li>
+<li><a href="gcd.html">gcd                                                              [Function]</a></li>
+<li><a href="incf.html">incf, decf                                                          [Macro]</a></li>
+<li><a href="lcm.html">lcm                                                              [Function]</a></li>
+<li><a href="log.html">log                                                              [Function]</a></li>
+<li><a href="mod-_0028Function_0029.html">mod, rem                                                         [Function]</a></li>
+<li><a href="signum.html">signum                                                           [Function]</a></li>
+<li><a href="sqrt.html">sqrt, isqrt                                                      [Function]</a></li>
+<li><a href="random_002dstate.html">random-state                                                 [System Class]</a></li>
+<li><a href="make_002drandom_002dstate.html">make-random-state                                                [Function]</a></li>
+<li><a href="random.html">random                                                           [Function]</a></li>
+<li><a href="random_002dstate_002dp.html">random-state-p                                                   [Function]</a></li>
+<li><a href="_002arandom_002dstate_002a.html">*random-state*                                                   [Variable]</a></li>
+<li><a href="numberp.html">numberp                                                          [Function]</a></li>
+<li><a href="cis.html">cis                                                              [Function]</a></li>
+<li><a href="complex.html">complex                                                          [Function]</a></li>
+<li><a href="complexp.html">complexp                                                         [Function]</a></li>
+<li><a href="conjugate.html">conjugate                                                        [Function]</a></li>
+<li><a href="phase.html">phase                                                            [Function]</a></li>
+<li><a href="realpart.html">realpart, imagpart                                               [Function]</a></li>
+<li><a href="upgraded_002dcomplex_002dpart_002dtype.html">upgraded-complex-part-type                                       [Function]</a></li>
+<li><a href="realp.html">realp                                                            [Function]</a></li>
+<li><a href="numerator.html">numerator, denominator                                           [Function]</a></li>
+<li><a href="rational-_0028Function_0029.html">rational, rationalize                                            [Function]</a></li>
+<li><a href="rationalp.html">rationalp                                                        [Function]</a></li>
+<li><a href="ash.html">ash                                                              [Function]</a></li>
+<li><a href="integer_002dlength.html">integer-length                                                   [Function]</a></li>
+<li><a href="integerp.html">integerp                                                         [Function]</a></li>
+<li><a href="parse_002dinteger.html">parse-integer                                                    [Function]</a></li>
+<li><a href="boole.html">boole                                                            [Function]</a></li>
+<li><a href="boole_002d1.html">boole-1,    boole-2,   boole-and,  boole-andc1, boole-andc2,</a></li>
+<li><a href="logand.html">logand,  logandc1, logandc2, logeqv,  logior,</a></li>
+<li><a href="logbitp.html">logbitp                                                          [Function]</a></li>
+<li><a href="logcount.html">logcount                                                         [Function]</a></li>
+<li><a href="logtest.html">logtest                                                          [Function]</a></li>
+<li><a href="byte.html">byte, byte-size, byte-position                                   [Function]</a></li>
+<li><a href="deposit_002dfield.html">deposit-field                                                    [Function]</a></li>
+<li><a href="dpb.html">dpb                                                              [Function]</a></li>
+<li><a href="ldb.html">ldb                                                              [Accessor]</a></li>
+<li><a href="ldb_002dtest.html">ldb-test                                                         [Function]</a></li>
+<li><a href="mask_002dfield.html">mask-field                                                       [Accessor]</a></li>
+<li><a href="most_002dpositive_002dfixnum.html">most-positive-fixnum, most-negative-fixnum              [Constant Variable]</a></li>
+<li><a href="decode_002dfloat.html">decode-float, scale-float, float-radix, float-sign,</a></li>
+<li><a href="float.html">float                                                            [Function]</a></li>
+<li><a href="floatp.html">floatp                                                           [Function]</a></li>
+<li><a href="most_002dpositive_002dshort_002dfloat.html">most-positive-short-float, least-positive-short-float,</a></li>
+<li><a href="short_002dfloat_002depsilon.html">short-float-epsilon, short-float-negative-epsilon,</a></li>
+<li><a href="arithmetic_002derror.html">arithmetic-error                                           [Condition Type]</a></li>
+<li><a href="arithmetic_002derror_002doperands.html">arithmetic-error-operands, arithmetic-error-operation            [Function]</a></li>
+<li><a href="division_002dby_002dzero.html">division-by-zero                                           [Condition Type]</a></li>
+<li><a href="floating_002dpoint_002dinvalid_002doperation.html">floating-point-invalid-operation                           [Condition Type]</a></li>
+<li><a href="floating_002dpoint_002dinexact.html">floating-point-inexact                                     [Condition Type]</a></li>
+<li><a href="floating_002dpoint_002doverflow.html">floating-point-overflow                                    [Condition Type]</a></li>
+<li><a href="floating_002dpoint_002dunderflow.html">floating-point-underflow                                   [Condition Type]</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Number-Concepts.html">Number Concepts</a>, Up: <a href="Numbers-_0028Numbers_0029.html">Numbers</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Numbers-_0028Numbers_0029.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Numbers (Numbers) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Numbers (Numbers) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Numbers (Numbers) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Characters.html" rel="next" title="Characters">
+<link href="Packages.html" rel="prev" title="Packages">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Numbers-_0028Numbers_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="Characters.html" accesskey="n" rel="next">Characters</a>, Previous: <a href="Packages.html" accesskey="p" rel="prev">Packages</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Numbers-1"><span>12 Numbers<a class="copiable-link" href="#Numbers-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Number-Concepts.html" accesskey="1">Number Concepts</a></li>
+<li><a href="Numbers-Dictionary.html" accesskey="2">Numbers Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Numbers-_0028Objects-with-Multiple-Notations_0029.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Numbers (Objects with Multiple Notations) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Numbers (Objects with Multiple Notations) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Numbers (Objects with Multiple Notations) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Notational-Conventions.html" rel="up" title="Notational Conventions">
+<link href="Use-of-the-Dot-Character.html" rel="next" title="Use of the Dot Character">
+<link href="Case-in-Symbols.html" rel="prev" title="Case in Symbols">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Numbers-_0028Objects-with-Multiple-Notations_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="Use-of-the-Dot-Character.html" accesskey="n" rel="next">Use of the Dot Character</a>, Previous: <a href="Case-in-Symbols.html" accesskey="p" rel="prev">Case in Symbols</a>, Up: <a href="Notational-Conventions.html" accesskey="u" rel="up">Notational Conventions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Numbers"><span>1.4.1.9 Numbers<a class="copiable-link" href="#Numbers"> &para;</a></span></h4>
+
+<p>Although <span class="r">Common Lisp</span> provides a variety of ways for programs to manipulate the
+input and output radix for rational numbers, all numbers in this document
+are in decimal notation unless explicitly noted otherwise.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Numbers-as-Tokens.html
@@ -0,0 +1,72 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Numbers as Tokens (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Numbers as Tokens (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Numbers as Tokens (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpretation-of-Tokens.html" rel="up" title="Interpretation of Tokens">
+<link href="Constructing-Numbers-from-Tokens.html" rel="next" title="Constructing Numbers from Tokens">
+<link href="Interpretation-of-Tokens.html" rel="prev" title="Interpretation of Tokens">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Numbers-as-Tokens">
+<div class="nav-panel">
+<p>
+Next: <a href="Constructing-Numbers-from-Tokens.html" accesskey="n" rel="next">Constructing Numbers from Tokens</a>, Previous: <a href="Interpretation-of-Tokens.html" accesskey="p" rel="prev">Interpretation of Tokens</a>, Up: <a href="Interpretation-of-Tokens.html" accesskey="u" rel="up">Interpretation of Tokens</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Numbers-as-Tokens-1"><span>2.3.1 Numbers as Tokens<a class="copiable-link" href="#Numbers-as-Tokens-1"> &para;</a></span></h4>
+
+<p>When a <i class="i">token</i> is read,
+it is interpreted as a <i class="i">number</i> or <i class="i">symbol</i>.
+The <i class="i">token</i> is interpreted as a <i class="i">number</i> if it satisfies
+the syntax for numbers specified in Figure 2&ndash;9.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted"> <i class="i">numeric-token</i> ::= !<i class="i">integer</i> | !<i class="i">ratio</i> | !<i class="i">float</i>                                              <!-- /@w -->
+ <i class="i">integer</i>       ::= <code class="t">[</code><i class="i">sign</i><code class="t">]</code> {<i class="i">decimal-digit</i>}^+ <i class="i">decimal-point</i> | <code class="t">[</code><i class="i">sign</i><code class="t">]</code> {<i class="i">digit</i>}^+               <!-- /@w -->
+ <i class="i">ratio</i>         ::= <code class="t">[</code><i class="i">sign</i><code class="t">]</code> {<i class="i">digit</i>}^+ <i class="i">slash</i> {<i class="i">digit</i>}^+                                        <!-- /@w -->
+ <i class="i">float</i>         ::= <code class="t">[</code><i class="i">sign</i><code class="t">]</code> {<i class="i">decimal-digit</i>}* <i class="i">decimal-point</i> {<i class="i">decimal-digit</i>}^+ <code class="t">[</code>!<i class="i">exponent</i><code class="t">]</code>   <!-- /@w -->
+                   | <code class="t">[</code><i class="i">sign</i><code class="t">]</code> {<i class="i">decimal-digit</i>}^+ <code class="t">[</code><i class="i">decimal-point</i> {<i class="i">decimal-digit</i>}*<code class="t">]</code> !<i class="i">exponent</i> <!-- /@w -->
+ <i class="i">exponent</i>      ::= <i class="i">exponent-marker</i> <code class="t">[</code><i class="i">sign</i><code class="t">]</code> {<i class="i">digit</i>}^+                                        <!-- /@w -->
+ <i class="i">sign</i>&mdash;a <i class="i">sign</i>.<!-- /@w -->
+ <i class="i">slash</i>&mdash;a <i class="i">slash</i><!-- /@w -->
+ <i class="i">decimal-point</i>&mdash;a <i class="i">dot</i>.<!-- /@w -->
+ <i class="i">exponent-marker</i>&mdash;an <i class="i">exponent marker</i>.<!-- /@w -->
+ <i class="i">decimal-digit</i>&mdash;a <i class="i">digit</i> in <i class="i">radix</i> <code class="t">10</code>.<!-- /@w -->
+ <i class="i">digit</i>&mdash;a <i class="i">digit</i> in the <i class="i">current input radix</i>.<!-- /@w -->
+</pre></div></div>
+
+<p>&nbsp;Figure&nbsp;2&ndash;9:&nbsp;Syntax&nbsp;for&nbsp;Numeric&nbsp;Tokens<!-- /@w -->
+</p>
+
+<ul class="mini-toc">
+<li><a href="Potential-Numbers-as-Tokens.html" accesskey="1">Potential Numbers as Tokens</a></li>
+<li><a href="Escape-Characters-and-Potential-Numbers.html" accesskey="2">Escape Characters and Potential Numbers</a></li>
+<li><a href="Examples-of-Potential-Numbers.html" accesskey="3">Examples of Potential Numbers</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Numeric-Characters.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Numeric Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Numeric Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Numeric Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Categories.html" rel="up" title="Character Categories">
+<link href="Alphanumeric-Characters.html" rel="next" title="Alphanumeric Characters">
+<link href="Case-of-Implementation_002dDefined-Characters.html" rel="prev" title="Case of Implementation-Defined Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Numeric-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Alphanumeric-Characters.html" accesskey="n" rel="next">Alphanumeric Characters</a>, Previous: <a href="Case-of-Implementation_002dDefined-Characters.html" accesskey="p" rel="prev">Case of Implementation-Defined Characters</a>, Up: <a href="Character-Categories.html" accesskey="u" rel="up">Character Categories</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Numeric-Characters-1"><span>13.1.4.8 Numeric Characters<a class="copiable-link" href="#Numeric-Characters-1"> &para;</a></span></h4>
+
+<p>The <i class="i">numeric</i> <i class="i">characters</i> are
+a subset of the <i class="i">graphic</i> <i class="i">characters</i>.
+Of the <i class="i">standard characters</i>, only these are <i class="i">numeric</i> <i class="i">characters</i>:
+</p>
+<p><code class="t">0 1 2 3 4 5 6 7 8 9</code>
+</p>
+<p>For each <i class="i">implementation-defined</i> <i class="i">graphic</i> <i class="i">character</i> 
+that has no <i class="i">case</i>, the <i class="i">implementation</i> must define whether
+or not it is a <i class="i">numeric</i> <i class="i">character</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Numeric-Operations.html
@@ -0,0 +1,125 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Numeric Operations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Numeric Operations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Numeric Operations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Number-Concepts.html" rel="up" title="Number Concepts">
+<link href="Implementation_002dDependent-Numeric-Constants.html" rel="next" title="Implementation-Dependent Numeric Constants">
+<link href="Number-Concepts.html" rel="prev" title="Number Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Numeric-Operations">
+<div class="nav-panel">
+<p>
+Next: <a href="Implementation_002dDependent-Numeric-Constants.html" accesskey="n" rel="next">Implementation-Dependent Numeric Constants</a>, Previous: <a href="Number-Concepts.html" accesskey="p" rel="prev">Number Concepts</a>, Up: <a href="Number-Concepts.html" accesskey="u" rel="up">Number Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Numeric-Operations-1"><span>12.1.1 Numeric Operations<a class="copiable-link" href="#Numeric-Operations-1"> &para;</a></span></h4>
+
+<p><span class="r">Common Lisp</span> provides a large variety of operations related to <i class="i">numbers</i>.
+This section provides an overview of those operations by grouping them
+into categories that emphasize some of the relationships among them.
+</p>
+<p>Figure 12&ndash;1 shows <i class="i">operators</i> relating to
+arithmetic operations.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  *  1+         gcd   <!-- /@w -->
+  +  1-         incf  <!-- /@w -->
+  -  conjugate  lcm   <!-- /@w -->
+  /  decf             <!-- /@w -->
+
+  Figure 12&ndash;1: Operators relating to Arithmetic.<!-- /@w -->
+
+</pre></div></div>
+
+<p>Figure 12&ndash;2 shows <i class="i">defined names</i> relating to
+exponential, logarithmic, and trigonometric operations.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  abs    cos    signum  <!-- /@w -->
+  acos   cosh   sin     <!-- /@w -->
+  acosh  exp    sinh    <!-- /@w -->
+  asin   expt   sqrt    <!-- /@w -->
+  asinh  isqrt  tan     <!-- /@w -->
+  atan   log    tanh    <!-- /@w -->
+  atanh  phase          <!-- /@w -->
+  cis    pi             <!-- /@w -->
+
+  Figure 12&ndash;2: Defined names relating to Exponentials, Logarithms, and Trigonometry.<!-- /@w -->
+
+</pre></div></div>
+
+<p>Figure 12&ndash;3 shows <i class="i">operators</i> relating to
+numeric comparison and predication.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  /=  &gt;=      oddp   <!-- /@w -->
+  &lt;   evenp   plusp  <!-- /@w -->
+  &lt;=  max     zerop  <!-- /@w -->
+  =   min            <!-- /@w -->
+  &gt;   minusp         <!-- /@w -->
+
+  Figure 12&ndash;3: Operators for numeric comparison and predication.<!-- /@w -->
+
+</pre></div></div>
+
+<p>Figure 12&ndash;4 shows <i class="i">defined names</i> relating to
+numeric type manipulation and coercion.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  ceiling          float-radix           rational     <!-- /@w -->
+  complex          float-sign            rationalize  <!-- /@w -->
+  decode-float     floor                 realpart     <!-- /@w -->
+  denominator      fround                rem          <!-- /@w -->
+  fceiling         ftruncate             round        <!-- /@w -->
+  ffloor           imagpart              scale-float  <!-- /@w -->
+  float            integer-decode-float  truncate     <!-- /@w -->
+  float-digits     mod                                <!-- /@w -->
+  float-precision  numerator                          <!-- /@w -->
+
+  Figure 12&ndash;4: Defined names relating to numeric type manipulation and coercion.<!-- /@w -->
+
+</pre></div></div>
+
+
+<ul class="mini-toc">
+<li><a href="Associativity-and-Commutativity-in-Numeric-Operations.html" accesskey="1">Associativity and Commutativity in Numeric Operations</a></li>
+<li><a href="Examples-of-Associativity-and-Commutativity-in-Numeric-Operations.html" accesskey="2">Examples of Associativity and Commutativity in Numeric Operations</a></li>
+<li><a href="Contagion-in-Numeric-Operations.html" accesskey="3">Contagion in Numeric Operations</a></li>
+<li><a href="Viewing-Integers-as-Bits-and-Bytes.html" accesskey="4">Viewing Integers as Bits and Bytes</a></li>
+<li><a href="Logical-Operations-on-Integers.html" accesskey="5">Logical Operations on Integers</a></li>
+<li><a href="Byte-Operations-on-Integers.html" accesskey="6">Byte Operations on Integers</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Implementation_002dDependent-Numeric-Constants.html">Implementation-Dependent Numeric Constants</a>, Previous: <a href="Number-Concepts.html">Number Concepts</a>, Up: <a href="Number-Concepts.html">Number Concepts</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Object-Creation-and-Initialization.html
@@ -0,0 +1,134 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Object Creation and Initialization (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Object Creation and Initialization (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Object Creation and Initialization (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects.html" rel="up" title="Objects">
+<link href="Changing-the-Class-of-an-Instance.html" rel="next" title="Changing the Class of an Instance">
+<link href="Objects.html" rel="prev" title="Objects">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Object-Creation-and-Initialization">
+<div class="nav-panel">
+<p>
+Next: <a href="Changing-the-Class-of-an-Instance.html" accesskey="n" rel="next">Changing the Class of an Instance</a>, Previous: <a href="Objects.html" accesskey="p" rel="prev">Objects</a>, Up: <a href="Objects.html" accesskey="u" rel="up">Objects</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Object-Creation-and-Initialization-1"><span>7.1 Object Creation and Initialization<a class="copiable-link" href="#Object-Creation-and-Initialization-1"> &para;</a></span></h3>
+
+
+<p>The <i class="i">generic function</i> <b class="b">make-instance</b> creates and returns a new
+<i class="i">instance</i> of a <i class="i">class</i>.  The first argument is a <i class="i">class</i> or
+the <i class="i">name</i> of a <i class="i">class</i>, and the remaining arguments form an 
+<i class="i">initialization argument list</i>
+<a class="index-entry-id" id="index-initialization-argument-list"></a>
+.
+</p>
+<p>The initialization of a new <i class="i">instance</i> consists of several distinct
+steps, including the following: combining the explicitly supplied initialization
+arguments with default values for the unsupplied initialization arguments, 
+checking the validity of the initialization arguments, allocating storage 
+for the <i class="i">instance</i>, filling <i class="i">slots</i> with
+values, and executing user-supplied <i class="i">methods</i> that perform additional
+initialization.  Each step of <b class="b">make-instance</b> is implemented by a
+<i class="i">generic function</i> to provide a mechanism for customizing that step.  
+In addition, <b class="b">make-instance</b> is itself a <i class="i">generic function</i> 
+and thus also can be customized.
+</p>
+<p>The object system specifies system-supplied primary <i class="i">methods</i> for each step 
+and thus specifies a well-defined standard behavior for the entire
+initialization process.  The standard behavior provides four simple
+mechanisms for controlling initialization:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>Declaring a <i class="i">symbol</i> to be an initialization argument 
+for a <i class="i">slot</i>.  An initialization argument is declared by using the
+<code class="t">:initarg</code> slot option to <b class="b">defclass</b>.  This provides a mechanism
+for supplying a value for a <i class="i">slot</i> in a call to <b class="b">make-instance</b>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Supplying a default value form for an initialization argument.
+Default value forms for initialization arguments are defined by using the
+<code class="t">:default-initargs</code> class option to <b class="b">defclass</b>.  If an 
+initialization argument is not explicitly provided
+as an argument to <b class="b">make-instance</b>, the default value form is
+evaluated in the lexical environment of the <b class="b">defclass</b> form that
+defined it, and the resulting value is used as the value of the
+initialization argument.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Supplying a default initial value form for a <i class="i">slot</i>.  
+A default initial value form for a <i class="i">slot</i> is defined by using the 
+<code class="t">:initform</code> slot option to <b class="b">defclass</b>.  If no initialization
+argument associated with that <i class="i">slot</i> is given as an argument to 
+<b class="b">make-instance</b> or is defaulted by <code class="t">:default-initargs</code>, this
+default initial value form is evaluated in the lexical environment of
+the <b class="b">defclass</b> form that defined it, and the resulting value is
+stored in the <i class="i">slot</i>.  The <code class="t">:initform</code> form for a
+<i class="i">local slot</i> may be used when creating an <i class="i">instance</i>, when 
+updating an <i class="i">instance</i> to conform to a redefined <i class="i">class</i>, 
+or when updating an <i class="i">instance</i> to conform to the definition of a
+different <i class="i">class</i>. The <code class="t">:initform</code> form for a
+<i class="i">shared slot</i> may be used when defining or re-defining the <i class="i">class</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Defining <i class="i">methods</i> for <b class="b">initialize-instance</b> and
+<b class="b">shared-initialize</b>.  The slot-filling behavior described above is
+implemented by a system-supplied primary <i class="i">method</i> for
+<b class="b">initialize-instance</b> which invokes <b class="b">shared-initialize</b>. The
+<i class="i">generic function</i> <b class="b">shared-initialize</b> implements the parts of
+initialization shared by these four situations: when making an <i class="i">instance</i>, 
+when re-initializing an <i class="i">instance</i>, when updating an <i class="i">instance</i>
+to conform to a redefined <i class="i">class</i>, and when updating an <i class="i">instance</i> 
+to conform to the definition of a different <i class="i">class</i>. The system-supplied
+primary <i class="i">method</i> for <b class="b">shared-initialize</b> directly implements the
+slot-filling behavior described above, and <b class="b">initialize-instance</b>
+simply invokes <b class="b">shared-initialize</b>.
+</p>
+</dd>
+</dl>
+
+
+<ul class="mini-toc">
+<li><a href="Initialization-Arguments.html" accesskey="1">Initialization Arguments</a></li>
+<li><a href="Declaring-the-Validity-of-Initialization-Arguments.html" accesskey="2">Declaring the Validity of Initialization Arguments</a></li>
+<li><a href="Defaulting-of-Initialization-Arguments.html" accesskey="3">Defaulting of Initialization Arguments</a></li>
+<li><a href="Rules-for-Initialization-Arguments.html" accesskey="4">Rules for Initialization Arguments</a></li>
+<li><a href="Shared_002dInitialize.html" accesskey="5">Shared-Initialize</a></li>
+<li><a href="Initialize_002dInstance.html" accesskey="6">Initialize-Instance</a></li>
+<li><a href="Definitions-of-Make_002dInstance-and-Initialize_002dInstance.html" accesskey="7">Definitions of Make-Instance and Initialize-Instance</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Changing-the-Class-of-an-Instance.html">Changing the Class of an Instance</a>, Previous: <a href="Objects.html">Objects</a>, Up: <a href="Objects.html">Objects</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Objects-Dictionary.html
@@ -0,0 +1,87 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Objects Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Objects Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Objects Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects.html" rel="up" title="Objects">
+<link href="Generic-Functions-and-Methods.html" rel="prev" title="Generic Functions and Methods">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Objects-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Generic-Functions-and-Methods.html" accesskey="p" rel="prev">Generic Functions and Methods</a>, Up: <a href="Objects.html" accesskey="u" rel="up">Objects</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Objects-Dictionary-1"><span>7.7 Objects Dictionary<a class="copiable-link" href="#Objects-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="function_002dkeywords.html" accesskey="1">function-keywords                               [Standard Generic Function]</a></li>
+<li><a href="ensure_002dgeneric_002dfunction.html" accesskey="2">ensure-generic-function                                          [Function]</a></li>
+<li><a href="allocate_002dinstance.html" accesskey="3">allocate-instance                               [Standard Generic Function]</a></li>
+<li><a href="reinitialize_002dinstance.html" accesskey="4">reinitialize-instance                           [Standard Generic Function]</a></li>
+<li><a href="shared_002dinitialize.html" accesskey="5">shared-initialize                               [Standard Generic Function]</a></li>
+<li><a href="update_002dinstance_002dfor_002ddifferent_002dclass.html" accesskey="6">update-instance-for-different-class             [Standard Generic Function]</a></li>
+<li><a href="update_002dinstance_002dfor_002dredefined_002dclass.html" accesskey="7">update-instance-for-redefined-class             [Standard Generic Function]</a></li>
+<li><a href="change_002dclass.html" accesskey="8">change-class                                    [Standard Generic Function]</a></li>
+<li><a href="slot_002dboundp.html" accesskey="9">slot-boundp                                                      [Function]</a></li>
+<li><a href="slot_002dexists_002dp.html">slot-exists-p                                                    [Function]</a></li>
+<li><a href="slot_002dmakunbound.html">slot-makunbound                                                  [Function]</a></li>
+<li><a href="slot_002dmissing.html">slot-missing                                    [Standard Generic Function]</a></li>
+<li><a href="slot_002dunbound.html">slot-unbound                                    [Standard Generic Function]</a></li>
+<li><a href="slot_002dvalue.html">slot-value                                                       [Function]</a></li>
+<li><a href="method_002dqualifiers.html">method-qualifiers                               [Standard Generic Function]</a></li>
+<li><a href="no_002dapplicable_002dmethod.html">no-applicable-method                            [Standard Generic Function]</a></li>
+<li><a href="no_002dnext_002dmethod.html">no-next-method                                  [Standard Generic Function]</a></li>
+<li><a href="remove_002dmethod.html">remove-method                                   [Standard Generic Function]</a></li>
+<li><a href="make_002dinstance.html">make-instance                                   [Standard Generic Function]</a></li>
+<li><a href="make_002dinstances_002dobsolete.html">make-instances-obsolete                         [Standard Generic Function]</a></li>
+<li><a href="make_002dload_002dform.html">make-load-form                                  [Standard Generic Function]</a></li>
+<li><a href="make_002dload_002dform_002dsaving_002dslots.html">make-load-form-saving-slots                                      [Function]</a></li>
+<li><a href="with_002daccessors.html">with-accessors                                                      [Macro]</a></li>
+<li><a href="with_002dslots.html">with-slots                                                          [Macro]</a></li>
+<li><a href="defclass.html">defclass                                                            [Macro]</a></li>
+<li><a href="defgeneric.html">defgeneric                                                          [Macro]</a></li>
+<li><a href="defmethod.html">defmethod                                                           [Macro]</a></li>
+<li><a href="find_002dclass.html">find-class                                                       [Accessor]</a></li>
+<li><a href="next_002dmethod_002dp.html">next-method-p                                              [Local Function]</a></li>
+<li><a href="call_002dmethod.html">call-method, make-method                                      [Local Macro]</a></li>
+<li><a href="call_002dnext_002dmethod.html">call-next-method                                           [Local Function]</a></li>
+<li><a href="compute_002dapplicable_002dmethods.html">compute-applicable-methods                      [Standard Generic Function]</a></li>
+<li><a href="define_002dmethod_002dcombination.html">define-method-combination                                           [Macro]</a></li>
+<li><a href="find_002dmethod.html">find-method                                     [Standard Generic Function]</a></li>
+<li><a href="add_002dmethod.html">add-method                                      [Standard Generic Function]</a></li>
+<li><a href="initialize_002dinstance.html">initialize-instance                             [Standard Generic Function]</a></li>
+<li><a href="class_002dname.html">class-name                                      [Standard Generic Function]</a></li>
+<li><a href="setf-class_002dname.html">setf class-name                               [Standard Generic Function]</a></li>
+<li><a href="class_002dof.html">class-of                                                         [Function]</a></li>
+<li><a href="unbound_002dslot.html">unbound-slot                                               [Condition Type]</a></li>
+<li><a href="unbound_002dslot_002dinstance.html">unbound-slot-instance                                            [Function]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Objects-with-Multiple-Notations.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Objects with Multiple Notations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Objects with Multiple Notations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Objects with Multiple Notations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Notational-Conventions.html" rel="up" title="Notational Conventions">
+<link href="Case-in-Symbols.html" rel="next" title="Case in Symbols">
+<link href="Special-Symbols.html" rel="prev" title="Special Symbols">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Objects-with-Multiple-Notations">
+<div class="nav-panel">
+<p>
+Next: <a href="Case-in-Symbols.html" accesskey="n" rel="next">Case in Symbols</a>, Previous: <a href="Special-Symbols.html" accesskey="p" rel="prev">Special Symbols</a>, Up: <a href="Notational-Conventions.html" accesskey="u" rel="up">Notational Conventions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Objects-with-Multiple-Notations-1"><span>1.4.1.7 Objects with Multiple Notations<a class="copiable-link" href="#Objects-with-Multiple-Notations-1"> &para;</a></span></h4>
+
+<p>Some <i class="i">objects</i> in <span class="r">Common Lisp</span> can be notated in more than one way.
+In such situations, the choice of which notation to use is technically arbitrary,
+but conventions may exist which convey a &ldquo;point of view&rdquo; or &ldquo;sense of intent.&rdquo;
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Objects.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Objects (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Objects (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Objects (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Structures.html" rel="next" title="Structures">
+<link href="Iteration.html" rel="prev" title="Iteration">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Objects">
+<div class="nav-panel">
+<p>
+Next: <a href="Structures.html" accesskey="n" rel="next">Structures</a>, Previous: <a href="Iteration.html" accesskey="p" rel="prev">Iteration</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Objects-1"><span>7 Objects<a class="copiable-link" href="#Objects-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Object-Creation-and-Initialization.html" accesskey="1">Object Creation and Initialization</a></li>
+<li><a href="Changing-the-Class-of-an-Instance.html" accesskey="2">Changing the Class of an Instance</a></li>
+<li><a href="Reinitializing-an-Instance.html" accesskey="3">Reinitializing an Instance</a></li>
+<li><a href="Meta_002dObjects.html" accesskey="4">Meta-Objects</a></li>
+<li><a href="Slots.html" accesskey="5">Slots</a></li>
+<li><a href="Generic-Functions-and-Methods.html" accesskey="6">Generic Functions and Methods</a></li>
+<li><a href="Objects-Dictionary.html" accesskey="7">Objects Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Odd-Number-of-Keyword-Arguments.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Odd Number of Keyword Arguments (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Odd Number of Keyword Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Odd Number of Keyword Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Argument-Mismatch-Detection.html" rel="up" title="Argument Mismatch Detection">
+<link href="Destructuring-Mismatch.html" rel="next" title="Destructuring Mismatch">
+<link href="Invalid-Keyword-Arguments.html" rel="prev" title="Invalid Keyword Arguments">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Odd-Number-of-Keyword-Arguments">
+<div class="nav-panel">
+<p>
+Next: <a href="Destructuring-Mismatch.html" accesskey="n" rel="next">Destructuring Mismatch</a>, Previous: <a href="Invalid-Keyword-Arguments.html" accesskey="p" rel="prev">Invalid Keyword Arguments</a>, Up: <a href="Argument-Mismatch-Detection.html" accesskey="u" rel="up">Argument Mismatch Detection</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Odd-Number-of-Keyword-Arguments-1"><span>3.5.1.7 Odd Number of Keyword Arguments<a class="copiable-link" href="#Odd-Number-of-Keyword-Arguments-1"> &para;</a></span></h4>
+
+<p>An odd number of <i class="i">arguments</i> must not be supplied for the <i class="i">keyword parameters</i>.
+</p>
+<p>If this <i class="i">situation</i> occurs in a <i class="i">safe call</i>,
+</p>
+<p>an error of <i class="i">type</i> <b class="b">program-error</b> must be signaled
+unless keyword argument checking is suppressed as described
+in <a class="ref" href="Suppressing-Keyword-Argument-Checking.html">Suppressing Keyword Argument Checking</a>;
+and in an <i class="i">unsafe call</i> the <i class="i">situation</i> has undefined consequences.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Open-and-Closed-Streams.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Open and Closed Streams (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Open and Closed Streams (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Open and Closed Streams (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Streams.html" rel="up" title="Introduction to Streams">
+<link href="Interactive-Streams.html" rel="next" title="Interactive Streams">
+<link href="Input.html" rel="prev" title="Input">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Open-and-Closed-Streams">
+<div class="nav-panel">
+<p>
+Next: <a href="Interactive-Streams.html" accesskey="n" rel="next">Interactive Streams</a>, Previous: <a href="Input.html" accesskey="p" rel="prev">Input, Output, and Bidirectional Streams</a>, Up: <a href="Introduction-to-Streams.html" accesskey="u" rel="up">Introduction to Streams</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Open-and-Closed-Streams-1"><span>21.1.1.3 Open and Closed Streams<a class="copiable-link" href="#Open-and-Closed-Streams-1"> &para;</a></span></h4>
+
+<p><i class="i">Streams</i> are either <i class="i">open</i>
+<a class="index-entry-id" id="index-open"></a>
+ or <i class="i">closed</i>
+<a class="index-entry-id" id="index-closed"></a>
+.  
+</p>
+<p>Except as explicitly specified otherwise,
+operations that create and return <i class="i">streams</i> return <i class="i">open</i> <i class="i">streams</i>.
+</p>
+<p>The action of <i class="i">closing</i> a <i class="i">stream</i> marks the end of its use as a source
+or sink of data, permitting the <i class="i">implementation</i> to reclaim its internal data
+structures, and to free any external resources which might have been locked by the
+<i class="i">stream</i> when it was opened.
+</p>
+<p>Except as explicitly specified otherwise,
+the consequences are undefined when a <i class="i">closed</i> <i class="i">stream</i> 
+is used where a <i class="i">stream</i> is called for.
+</p>
+<p>Coercion of <i class="i">streams</i> to <i class="i">pathnames</i> 
+is permissible for <i class="i">closed</i> <i class="i">streams</i>;
+in some situations, such as for a <i class="i">truename</i> computation, 
+the result might be different for an <i class="i">open</i> <i class="i">stream</i>
+and for that same <i class="i">stream</i> once it has been <i class="i">closed</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Order-of-Execution.html
@@ -0,0 +1,114 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Order of Execution (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Order of Execution (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Order of Execution (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-the-Loop-Facility.html" rel="up" title="Overview of the Loop Facility">
+<link href="Destructuring.html" rel="next" title="Destructuring">
+<link href="Summary-of-Miscellaneous-Clauses.html" rel="prev" title="Summary of Miscellaneous Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Order-of-Execution">
+<div class="nav-panel">
+<p>
+Next: <a href="Destructuring.html" accesskey="n" rel="next">Destructuring</a>, Previous: <a href="Summary-of-Miscellaneous-Clauses.html" accesskey="p" rel="prev">Summary of Miscellaneous Clauses</a>, Up: <a href="Overview-of-the-Loop-Facility.html" accesskey="u" rel="up">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Order-of-Execution-1"><span>6.1.1.14 Order of Execution<a class="copiable-link" href="#Order-of-Execution-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-order-of-evaluation-5"></a>
+
+<a class="index-entry-id" id="index-evaluation-order-5"></a>
+
+<p>With the exceptions listed below, clauses are executed in the loop body
+  in the order in which they appear in the source.  Execution is repeated 
+  until a clause
+  terminates the <b class="b">loop</b> or until a <b class="b">return</b>, <b class="b">go</b>,
+  or <b class="b">throw</b> form is encountered 
+which transfers control to a point outside of the loop.
+ The following actions are
+  exceptions to the linear order of execution:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>All variables are initialized first, 
+  regardless of where the establishing clauses appear in the
+  source.  The order of initialization follows the order of these clauses.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The code for any <code class="t">initially</code> clauses is collected
+  into one <b class="b">progn</b> in the order in which the clauses appear in
+  the source.  The collected code is executed once in the loop prologue
+  after any implicit variable initializations.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The code for any <code class="t">finally</code> clauses is collected 
+  into one <b class="b">progn</b> in the order in which the clauses appear in
+  the source.  The collected code is executed once in the loop epilogue
+  before any implicit values from the accumulation clauses are returned.
+  Explicit returns anywhere in the source, however, will exit the 
+  <b class="b">loop</b> without executing the epilogue code.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>A <code class="t">with</code> clause introduces a variable <i class="i">binding</i>
+  and an optional initial value.  The initial values are calculated 
+  in the order in which the <code class="t">with</code> clauses occur.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Iteration control clauses implicitly perform the following actions:
+</p>
+<dl class="table">
+<dt>&ndash;</dt>
+<dd><p>initialize variables;
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p><i class="i">step</i> variables, generally 
+between each execution of the loop body;
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>perform termination tests, 
+generally just before the execution of the
+  loop body.
+</p>
+</dd>
+</dl>
+
+</dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Destructuring.html">Destructuring</a>, Previous: <a href="Summary-of-Miscellaneous-Clauses.html">Summary of Miscellaneous Clauses</a>, Up: <a href="Overview-of-the-Loop-Facility.html">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Ordering-of-Characters.html
@@ -0,0 +1,104 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Ordering of Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Ordering of Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Ordering of Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Concepts.html" rel="up" title="Character Concepts">
+<link href="Character-Names.html" rel="next" title="Character Names">
+<link href="Identity-of-Characters.html" rel="prev" title="Identity of Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Ordering-of-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Character-Names.html" accesskey="n" rel="next">Character Names</a>, Previous: <a href="Identity-of-Characters.html" accesskey="p" rel="prev">Identity of Characters</a>, Up: <a href="Character-Concepts.html" accesskey="u" rel="up">Character Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Ordering-of-Characters-1"><span>13.1.6 Ordering of Characters<a class="copiable-link" href="#Ordering-of-Characters-1"> &para;</a></span></h4>
+
+<p>The total ordering on <i class="i">characters</i> is guaranteed to have 
+the following properties: 
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>If two <i class="i">characters</i> have the same <i class="i">implementation-defined</i> <i class="i">attributes</i>,
+then their ordering by <b class="b">char&lt;</b> is consistent with the numerical
+ordering by the predicate <b class="b">&lt;</b> on their code <i class="i">attributes</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If two <i class="i">characters</i> differ in any <i class="i">attribute</i>, then they
+are not <b class="b">char=</b>.
+</p>
+<p>[Reviewer Note by Barmar: I wonder if we should say that the ordering may be dependent on the
+	          <i class="i">implementation-defined</i> <i class="i">attributes</i>.]
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The total ordering is not necessarily the same as the total ordering
+  on the <i class="i">integers</i> produced by applying <b class="b">char-int</b> to the
+  <i class="i">characters</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>While <i class="i">alphabetic</i>_1 <i class="i">standard characters</i> of a given <i class="i">case</i>
+  must    
+  obey a partial ordering,
+  they need not be contiguous; it is permissible for 
+  <i class="i">uppercase</i> and <i class="i">lowercase</i> <i class="i">characters</i> to be interleaved. 
+  Thus <code class="t">(char&lt;= #\a x #\z)</code> 
+  is not a valid way of determining whether or not <code class="t">x</code> is a
+  <i class="i">lowercase</i> <i class="i">character</i>.  
+</p>
+</dd>
+</dl>
+
+<p>Of the <i class="i">standard characters</i>, 
+those which are <i class="i">alphanumeric</i> obey the following partial ordering:
+</p>
+<div class="example">
+<pre class="example-preformatted"> A&lt;B&lt;C&lt;D&lt;E&lt;F&lt;G&lt;H&lt;I&lt;J&lt;K&lt;L&lt;M&lt;N&lt;O&lt;P&lt;Q&lt;R&lt;S&lt;T&lt;U&lt;V&lt;W&lt;X&lt;Y&lt;Z
+ a&lt;b&lt;c&lt;d&lt;e&lt;f&lt;g&lt;h&lt;i&lt;j&lt;k&lt;l&lt;m&lt;n&lt;o&lt;p&lt;q&lt;r&lt;s&lt;t&lt;u&lt;v&lt;w&lt;x&lt;y&lt;z
+ 0&lt;1&lt;2&lt;3&lt;4&lt;5&lt;6&lt;7&lt;8&lt;9
+ either 9&lt;A or Z&lt;0
+ either 9&lt;a or z&lt;0                                                      
+</pre></div>
+
+<p>This implies that, for <i class="i">standard characters</i>, <i class="i">alphabetic</i>_1 
+ordering holds within each <i class="i">case</i> (<i class="i">uppercase</i> and <i class="i">lowercase</i>), 
+and that the <i class="i">numeric</i> <i class="i">characters</i> as a group are not interleaved
+with <i class="i">alphabetic</i> <i class="i">characters</i>.
+However, the ordering or possible interleaving of <i class="i">uppercase</i> <i class="i">characters</i>
+and <i class="i">lowercase</i> <i class="i">characters</i> is <i class="i">implementation-defined</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Character-Names.html">Character Names</a>, Previous: <a href="Identity-of-Characters.html">Identity of Characters</a>, Up: <a href="Character-Concepts.html">Character Concepts</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Ordinary-Lambda-Lists.html
@@ -0,0 +1,122 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Ordinary Lambda Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Ordinary Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Ordinary Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Lambda-Lists.html" rel="up" title="Lambda Lists">
+<link href="Generic-Function-Lambda-Lists.html" rel="next" title="Generic Function Lambda Lists">
+<link href="Lambda-Lists.html" rel="prev" title="Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Ordinary-Lambda-Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Generic-Function-Lambda-Lists.html" accesskey="n" rel="next">Generic Function Lambda Lists</a>, Previous: <a href="Lambda-Lists.html" accesskey="p" rel="prev">Lambda Lists</a>, Up: <a href="Lambda-Lists.html" accesskey="u" rel="up">Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Ordinary-Lambda-Lists-1"><span>3.4.1 Ordinary Lambda Lists<a class="copiable-link" href="#Ordinary-Lambda-Lists-1"> &para;</a></span></h4>
+
+<p>An <i class="i">ordinary lambda list</i>
+<a class="index-entry-id" id="index-ordinary-lambda-list"></a>
+ is used to describe how a set of
+<i class="i">arguments</i> is received by an <i class="i">ordinary</i> <i class="i">function</i>.  
+The <i class="i">defined names</i> in Figure 3&ndash;12 are those which use
+<i class="i">ordinary lambda lists</i>:
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  define-method-combination  handler-case  restart-case  <!-- /@w -->
+  defun                      labels                      <!-- /@w -->
+  flet                       lambda                      <!-- /@w -->
+
+  Figure 3&ndash;12: Standardized Operators that use Ordinary Lambda Lists<!-- /@w -->
+
+</pre></div></div>
+
+<p>An <i class="i">ordinary lambda list</i> can contain the <i class="i">lambda list keywords</i> shown
+in Figure 3&ndash;13.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <b class="b">&amp;allow-other-keys</b>  <b class="b">&amp;key</b>       <b class="b">&amp;rest</b>  <!-- /@w -->
+  <b class="b">&amp;aux</b>               <b class="b">&amp;optional</b>         <!-- /@w -->
+
+  Figure 3&ndash;13: Lambda List Keywords used by Ordinary Lambda Lists<!-- /@w -->
+
+</pre></div></div>
+
+<p>Each <i class="i">element</i> of a <i class="i">lambda list</i> is either a parameter specifier
+or a <i class="i">lambda list keyword</i>.
+Implementations are free to provide additional <i class="i">lambda list keywords</i>.
+For a list of all <i class="i">lambda list keywords</i>
+used by the implementation, see <b class="b">lambda-list-keywords</b>.
+</p>
+<p>The syntax for <i class="i">ordinary lambda lists</i> is as follows: 
+</p>
+<p><i class="i">lambda-list</i>&nbsp;::=<span class="r">(</span>{<i class="i">var</i>}*<!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;optional</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;		&nbsp;<span class="r">(</span><i class="i">var</i>&nbsp;<span class="r">[</span>init-form&nbsp;<span class="r">[</span>supplied-p-parameter&nbsp;<span class="r">]</span><span class="r">]</span><span class="r">)</span>}*<code class="t">]</code><!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;rest</span>&nbsp;<i class="i">var</i><code class="t">]</code><!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;key</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;		&nbsp;	&nbsp;<span class="r">(</span>{<i class="i">var</i>&nbsp;|&nbsp;					&nbsp;<span class="r">(</span><i class="i">keyword-name</i>&nbsp;<i class="i">var</i><span class="r">)</span>}&nbsp;				&nbsp;	<span class="r">[</span>init-form&nbsp;<span class="r">[</span>supplied-p-parameter<span class="r">]</span><span class="r">]</span><span class="r">)</span>}*&nbsp;pt&nbsp;<span class="r">[</span><code class="t">&amp;allow-other-keys</code><span class="r">]</span><code class="t">]</code><!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;aux</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;<span class="r">(</span><i class="i">var</i>&nbsp;<span class="r">[</span><i class="i">init-form</i><span class="r">]</span><span class="r">)</span>}*<code class="t">]</code><span class="r">)</span><!-- /@w -->
+&nbsp;<!-- /@w -->
+</p>
+<p>A <i class="i">var</i> or <i class="i">supplied-p-parameter</i> must be a <i class="i">symbol</i>
+that is not the name of a <i class="i">constant variable</i>.
+</p>
+<p>An <i class="i">init-form</i> can be any <i class="i">form</i>.
+Whenever any <i class="i">init-form</i> is evaluated for any parameter
+specifier, that <i class="i">form</i> may refer to any parameter variable to
+the left of the specifier in which the <i class="i">init-form</i> appears,
+including any <i class="i">supplied-p-parameter</i> variables, and may rely 
+on the fact that no other parameter variable has yet been bound
+(including its own parameter variable).
+</p>
+<p>A <i class="i">keyword-name</i> can be any <i class="i">symbol</i>, 
+but by convention is normally a <i class="i">keyword</i>_1;
+all <i class="i">standardized</i> <i class="i">functions</i> follow that convention.
+</p>
+<p>An <i class="i">ordinary lambda list</i> has five parts, any or all of which may be empty.
+For information about the treatment of argument mismatches,
+see <a class="ref" href="Error-Checking-in-Function-Calls.html">Error Checking in Function Calls</a>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Specifiers-for-the-required-parameters.html" accesskey="1">Specifiers for the required parameters</a></li>
+<li><a href="Specifiers-for-optional-parameters.html" accesskey="2">Specifiers for optional parameters</a></li>
+<li><a href="A-specifier-for-a-rest-parameter.html" accesskey="3">A specifier for a rest parameter</a></li>
+<li><a href="Specifiers-for-keyword-parameters.html" accesskey="4">Specifiers for keyword parameters</a></li>
+<li><a href="Suppressing-Keyword-Argument-Checking.html" accesskey="5">Suppressing Keyword Argument Checking</a></li>
+<li><a href="Examples-of-Suppressing-Keyword-Argument-Checking.html" accesskey="6">Examples of Suppressing Keyword Argument Checking</a></li>
+<li><a href="Specifiers-for-_0026aux-variables.html" accesskey="7">Specifiers for <b class="b">&amp;aux</b> variables</a></li>
+<li><a href="Examples-of-Ordinary-Lambda-Lists.html" accesskey="8">Examples of Ordinary Lambda Lists</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Generic-Function-Lambda-Lists.html">Generic Function Lambda Lists</a>, Previous: <a href="Lambda-Lists.html">Lambda Lists</a>, Up: <a href="Lambda-Lists.html">Lambda Lists</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Organization-of-the-Document.html
@@ -0,0 +1,95 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Organization of the Document (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Organization of the Document (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Organization of the Document (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-_0028Introduction_0029.html" rel="up" title="Introduction (Introduction)">
+<link href="Referenced-Publications.html" rel="next" title="Referenced Publications">
+<link href="Scope.html" rel="prev" title="Scope">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Organization-of-the-Document">
+<div class="nav-panel">
+<p>
+Next: <a href="Referenced-Publications.html" accesskey="n" rel="next">Referenced Publications</a>, Previous: <a href="Scope.html" accesskey="p" rel="prev">Scope, Purpose, and History</a>, Up: <a href="Introduction-_0028Introduction_0029.html" accesskey="u" rel="up">Introduction</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Organization-of-the-Document-1"><span>1.2 Organization of the Document<a class="copiable-link" href="#Organization-of-the-Document-1"> &para;</a></span></h3>
+
+
+<p>This is a reference document, not a tutorial document.  Where possible
+and convenient, the order of presentation has been chosen so that the
+more primitive topics precede those that build upon them;  however,
+linear readability has not been a priority.
+</p>
+<p>This document is divided into chapters by topic.
+Any given chapter might contain conceptual material, dictionary entries, or both.
+</p>
+<p><i class="i">Defined names</i> within the dictionary portion of a chapter are
+grouped in a way that brings related topics into physical proximity.
+Many such groupings were possible,
+and no deep significance should be inferred from the particular grouping that was chosen.
+To see <i class="i">defined names</i> grouped alphabetically, consult the index.
+For a complete list of <i class="i">defined names</i>, see <a class="ref" href="Symbols-in-the-COMMON_002dLISP-Package.html">Symbols in the COMMON-LISP Package</a>.
+</p>
+<p>In order to compensate for the sometimes-unordered portions of this document, 
+a glossary has been provided; see <a class="ref" href="Glossary.html">Glossary</a>.
+The glossary provides connectivity by providing easy access to 
+definitions of terms, and in some cases by providing examples or 
+cross references to additional conceptual material.
+</p>
+<p>For information about notational conventions used in this document,
+see <a class="ref" href="Definitions.html">Definitions</a>.
+</p>
+<p>For information about conformance, see <a class="ref" href="Conformance.html">Conformance</a>. 
+</p>
+<p>For information about extensions and subsets, see <a class="ref" href="Language-Extensions.html">Language Extensions</a>
+and <a class="ref" href="Language-Subsets.html">Language Subsets</a>.
+</p>
+<p>For information about how <i class="i">programs</i> in the language are parsed by the
+<i class="i">Lisp reader</i>, see <a class="ref" href="Syntax.html">Syntax</a>.
+</p>
+<p>For information about how <i class="i">programs</i> in the language are <i class="i">compiled</i>
+and <i class="i">executed</i>, see <a class="ref" href="Evaluation-and-Compilation.html">Evaluation and Compilation</a>.
+</p>
+<p>For information about data types, see <a class="ref" href="Types-and-Classes.html">Types and Classes</a>.
+Not all <i class="i">types</i> and <i class="i">classes</i> are defined in this chapter;
+many are defined in chapter corresponding to their topic&ndash;for example,
+the numeric types are defined in <a class="ref" href="Numbers-_0028Numbers_0029.html">Numbers</a>.
+For a complete list of <i class="i">standardized</i> <i class="i">types</i>, 
+see <i class="i">Figure~4&ndash;2</i>.
+</p>
+<p>For information about general purpose control and data flow,
+see <a class="ref" href="Data-and-Control-Flow.html">Data and Control Flow</a> or <a class="ref" href="Iteration.html">Iteration</a>.
+</p>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Referenced-Publications.html">Referenced Publications</a>, Previous: <a href="Scope.html">Scope, Purpose, and History</a>, Up: <a href="Introduction-_0028Introduction_0029.html">Introduction</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Other-Compound-Forms-as-Places.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Other Compound Forms as Places (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Other Compound Forms as Places (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Other Compound Forms as Places (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Kinds-of-Places.html" rel="up" title="Kinds of Places">
+<link href="Symbol-Macros-as-Places.html" rel="prev" title="Symbol Macros as Places">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Other-Compound-Forms-as-Places">
+<div class="nav-panel">
+<p>
+Previous: <a href="Symbol-Macros-as-Places.html" accesskey="p" rel="prev">Symbol Macros as Places</a>, Up: <a href="Kinds-of-Places.html" accesskey="u" rel="up">Kinds of Places</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Other-Compound-Forms-as-Places-1"><span>5.1.2.9 Other Compound Forms as Places<a class="copiable-link" href="#Other-Compound-Forms-as-Places-1"> &para;</a></span></h4>
+
+<p>For any other <i class="i">compound form</i> for which the <i class="i">operator</i> is a
+<i class="i">symbol</i> <i class="i">f</i>,
+the <b class="b">setf</b> <i class="i">form</i> expands into a call 
+to the <i class="i">function</i> named <code class="t">(setf <i class="i">f</i>)</code>.
+The first <i class="i">argument</i> in the newly constructed <i class="i">function form</i>
+is <i class="i">newvalue</i> and the
+     remaining <i class="i">arguments</i> are the remaining <i class="i">elements</i> of
+     <i class="i">place</i>.
+This expansion occurs regardless of whether <i class="i">f</i> or <code class="t">(setf <i class="i">f</i>)</code>
+is defined as a <i class="i">function</i> locally, globally, or not at all.
+For example,
+</p>
+<p><code class="t">(setf (<i class="i">f</i> <i class="i">arg1</i> <i class="i">arg2</i> ...) <i class="i">new-value</i>)</code>
+</p>
+<p>expands into a form with the same effect and value as
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((#:temp-1 arg1)          ;force correct order of evaluation
+       (#:temp-2 arg2)
+       ...
+       (#:temp-0 <i class="i">new-value</i>))
+   (funcall (function (setf <i class="i">f</i>)) #:temp-0 #:temp-1 #:temp-2...))
+</pre></div>
+
+<p>A <i class="i">function</i> named <code class="t">(setf <i class="i">f</i>)</code> must return its first argument
+as its only value in order to preserve the semantics of <b class="b">setf</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Other-Subclasses-of-Stream.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Other Subclasses of Stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Other Subclasses of Stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Other Subclasses of Stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Streams.html" rel="up" title="Introduction to Streams">
+<link href="File-Streams.html" rel="prev" title="File Streams">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Other-Subclasses-of-Stream">
+<div class="nav-panel">
+<p>
+Previous: <a href="File-Streams.html" accesskey="p" rel="prev">File Streams</a>, Up: <a href="Introduction-to-Streams.html" accesskey="u" rel="up">Introduction to Streams</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Other-Subclasses-of-Stream-1"><span>21.1.1.7 Other Subclasses of Stream<a class="copiable-link" href="#Other-Subclasses-of-Stream-1"> &para;</a></span></h4>
+
+<p>The <i class="i">class</i> <b class="b">stream</b> has a number of <i class="i">subclasses</i> defined 
+by this specification.  Figure 21&ndash;5 shows some information 
+about these subclasses.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Class                Related Operators             <!-- /@w -->
+  <b class="b">broadcast-stream</b>     <b class="b">make-broadcast-stream</b>         <!-- /@w -->
+                       <b class="b">broadcast-stream-streams</b>      <!-- /@w -->
+  <b class="b">concatenated-stream</b>  <b class="b">make-concatenated-stream</b>      <!-- /@w -->
+                       <b class="b">concatenated-stream-streams</b>   <!-- /@w -->
+  <b class="b">echo-stream</b>          <b class="b">make-echo-stream</b>              <!-- /@w -->
+                       <b class="b">echo-stream-input-stream</b>      <!-- /@w -->
+                       <b class="b">echo-stream-output-stream</b>     <!-- /@w -->
+  <b class="b">string-stream</b>        <b class="b">make-string-input-stream</b>      <!-- /@w -->
+                       <b class="b">with-input-from-string</b>        <!-- /@w -->
+                       <b class="b">make-string-output-stream</b>     <!-- /@w -->
+                       <b class="b">with-output-to-string</b>         <!-- /@w -->
+                       <b class="b">get-output-stream-string</b>      <!-- /@w -->
+  <b class="b">synonym-stream</b>       <b class="b">make-synonym-stream</b>           <!-- /@w -->
+                       <b class="b">synonym-stream-symbol</b>         <!-- /@w -->
+  <b class="b">two-way-stream</b>       <b class="b">make-two-way-stream</b>           <!-- /@w -->
+                       <b class="b">two-way-stream-input-stream</b>   <!-- /@w -->
+                       <b class="b">two-way-stream-output-stream</b>  <!-- /@w -->
+
+  Figure 21&ndash;5: Defined Names related to Specialized Streams<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Other-Syntax-in-a-Logical-Pathname-Namestring.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Other Syntax in a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Other Syntax in a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Other Syntax in a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Syntax-of-Logical-Pathname-Namestrings.html" rel="up" title="Syntax of Logical Pathname Namestrings">
+<link href="Lowercase-Letters-in-a-Logical-Pathname-Namestring.html" rel="prev" title="Lowercase Letters in a Logical Pathname Namestring">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Other-Syntax-in-a-Logical-Pathname-Namestring">
+<div class="nav-panel">
+<p>
+Previous: <a href="Lowercase-Letters-in-a-Logical-Pathname-Namestring.html" accesskey="p" rel="prev">Lowercase Letters in a Logical Pathname Namestring</a>, Up: <a href="Syntax-of-Logical-Pathname-Namestrings.html" accesskey="u" rel="up">Syntax of Logical Pathname Namestrings</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Other-Syntax-in-a-Logical-Pathname-Namestring-1"><span>19.3.1.9 Other Syntax in a Logical Pathname Namestring<a class="copiable-link" href="#Other-Syntax-in-a-Logical-Pathname-Namestring-1"> &para;</a></span></h4>
+
+<p>The consequences of using characters other than those specified here
+in a <i class="i">logical pathname</i> <i class="i">namestring</i> are unspecified.
+</p>
+<p>The consequences of using any value not specified here as a 
+<i class="i">logical pathname</i> component are unspecified.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Overview-of-Filenames.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Overview of Filenames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Overview of Filenames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Overview of Filenames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames.html" rel="up" title="Filenames">
+<link href="Pathnames.html" rel="next" title="Pathnames">
+<link href="Filenames.html" rel="prev" title="Filenames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Overview-of-Filenames">
+<div class="nav-panel">
+<p>
+Next: <a href="Pathnames.html" accesskey="n" rel="next">Pathnames</a>, Previous: <a href="Filenames.html" accesskey="p" rel="prev">Filenames</a>, Up: <a href="Filenames.html" accesskey="u" rel="up">Filenames</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Overview-of-Filenames-1"><span>19.1 Overview of Filenames<a class="copiable-link" href="#Overview-of-Filenames-1"> &para;</a></span></h3>
+
+
+<p>There are many kinds of <i class="i">file systems</i>,
+varying widely both in their superficial syntactic details,
+		and in their underlying power and structure.
+The facilities provided by <span class="r">Common Lisp</span> for referring to and manipulating <i class="i">files</i>
+has been chosen to be compatible with many kinds of <i class="i">file systems</i>,
+while at the same time minimizing the program-visible differences 
+between kinds of <i class="i">file systems</i>.
+</p>
+<p>Since <i class="i">file systems</i> vary in their conventions for naming <i class="i">files</i>,
+there are two distinct ways to represent <i class="i">filenames</i>:
+as <i class="i">namestrings</i> and as <i class="i">pathnames</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Namestrings-as-Filenames.html" accesskey="1">Namestrings as Filenames</a></li>
+<li><a href="Pathnames-as-Filenames.html" accesskey="2">Pathnames as Filenames</a></li>
+<li><a href="Parsing-Namestrings-Into-Pathnames.html" accesskey="3">Parsing Namestrings Into Pathnames</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Overview-of-Places-and-Generalized-Reference.html
@@ -0,0 +1,116 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Overview of Places and Generalized Reference (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Overview of Places and Generalized Reference (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Overview of Places and Generalized Reference (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Generalized-Reference.html" rel="up" title="Generalized Reference">
+<link href="Kinds-of-Places.html" rel="next" title="Kinds of Places">
+<link href="Generalized-Reference.html" rel="prev" title="Generalized Reference">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Overview-of-Places-and-Generalized-Reference">
+<div class="nav-panel">
+<p>
+Next: <a href="Kinds-of-Places.html" accesskey="n" rel="next">Kinds of Places</a>, Previous: <a href="Generalized-Reference.html" accesskey="p" rel="prev">Generalized Reference</a>, Up: <a href="Generalized-Reference.html" accesskey="u" rel="up">Generalized Reference</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Overview-of-Places-and-Generalized-Reference-1"><span>5.1.1 Overview of Places and Generalized Reference<a class="copiable-link" href="#Overview-of-Places-and-Generalized-Reference-1"> &para;</a></span></h4>
+
+<p>A <i class="i">generalized reference</i>
+<a class="index-entry-id" id="index-generalized-reference"></a>
+ is the use of a <i class="i">form</i>,
+sometimes called a <i class="i">place</i>
+<a class="index-entry-id" id="index-place"></a>
+,
+as if it were a <i class="i">variable</i> that could be read and written.
+The <i class="i">value</i> of a <i class="i">place</i> is 
+the <i class="i">object</i> to which the <i class="i">place</i> <i class="i">form</i> evaluates.
+The <i class="i">value</i> of a <i class="i">place</i> can be changed by using <b class="b">setf</b>.
+The concept of binding a <i class="i">place</i> is not defined in <span class="r">Common Lisp</span>,
+but an <i class="i">implementation</i> is permitted to extend the language by defining this concept.
+</p>
+<p>Figure 5&ndash;1 contains examples of the use of <b class="b">setf</b>.
+Note that the values returned by evaluating the <i class="i">forms</i> in column two 
+are not necessarily the same as those obtained by evaluating the 
+<i class="i">forms</i> in column three.
+In general, the exact <i class="i">macro expansion</i> of a <b class="b">setf</b> <i class="i">form</i> is not guaranteed 
+and can even be <i class="i">implementation-dependent</i>;
+all that is guaranteed is 
+ that the expansion is an update form that works
+   for that particular <i class="i">implementation</i>,
+ that the left-to-right evaluation of <i class="i">subforms</i> is preserved, 
+and
+ that the ultimate result of evaluating <b class="b">setf</b> is the value
+  or values being stored.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Access function   Update Function   Update using <b class="b">setf</b>              <!-- /@w -->
+  <code class="t">x</code>                 <code class="t">(setq x datum)</code>    <code class="t">(setf x datum)</code>                 <!-- /@w -->
+  <code class="t">(car x)</code>           <code class="t">(rplaca x datum)</code>  <code class="t">(setf (car x) datum)</code>           <!-- /@w -->
+  <code class="t">(symbol-value x)</code>  <code class="t">(set x datum)</code>     <code class="t">(setf (symbol-value x) datum)</code>  <!-- /@w -->
+
+                     Figure 5&ndash;1: Examples of setf                   <!-- /@w -->
+
+</pre></div></div>
+
+<p>Figure 5&ndash;2 shows <i class="i">operators</i> relating to
+<i class="i">places</i> and <i class="i">generalized reference</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  assert                defsetf             push     <!-- /@w -->
+  ccase                 get-setf-expansion  remf     <!-- /@w -->
+  ctypecase             getf                rotatef  <!-- /@w -->
+  decf                  incf                setf     <!-- /@w -->
+  define-modify-macro   pop                 shiftf   <!-- /@w -->
+  define-setf-expander  psetf                        <!-- /@w -->
+
+  Figure 5&ndash;2: Operators relating to places and generalized reference.<!-- /@w -->
+
+</pre></div></div>
+
+<p>Some of the <i class="i">operators</i> above manipulate <i class="i">places</i>
+and some manipulate <i class="i">setf expanders</i>.
+A <i class="i">setf expansion</i> can be derived from any <i class="i">place</i>.
+</p>
+<p>New <i class="i">setf expanders</i> can be defined by using <b class="b">defsetf</b> 
+and <b class="b">define-setf-expander</b>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Evaluation-of-Subforms-to-Places.html" accesskey="1">Evaluation of Subforms to Places</a></li>
+<li><a href="Examples-of-Evaluation-of-Subforms-to-Places.html" accesskey="2">Examples of Evaluation of Subforms to Places</a></li>
+<li><a href="Setf-Expansions.html" accesskey="3">Setf Expansions</a></li>
+<li><a href="Examples-of-Setf-Expansions.html" accesskey="4">Examples of Setf Expansions</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Kinds-of-Places.html">Kinds of Places</a>, Previous: <a href="Generalized-Reference.html">Generalized Reference</a>, Up: <a href="Generalized-Reference.html">Generalized Reference</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Overview-of-The-Lisp-Printer.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Overview of The Lisp Printer (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Overview of The Lisp Printer (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Overview of The Lisp Printer (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Lisp-Printer.html" rel="up" title="The Lisp Printer">
+<link href="Printer-Dispatching.html" rel="next" title="Printer Dispatching">
+<link href="The-Lisp-Printer.html" rel="prev" title="The Lisp Printer">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Overview-of-The-Lisp-Printer">
+<div class="nav-panel">
+<p>
+Next: <a href="Printer-Dispatching.html" accesskey="n" rel="next">Printer Dispatching</a>, Previous: <a href="The-Lisp-Printer.html" accesskey="p" rel="prev">The Lisp Printer</a>, Up: <a href="The-Lisp-Printer.html" accesskey="u" rel="up">The Lisp Printer</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Overview-of-The-Lisp-Printer-1"><span>22.1.1 Overview of The Lisp Printer<a class="copiable-link" href="#Overview-of-The-Lisp-Printer-1"> &para;</a></span></h4>
+
+<p><span class="r">Common Lisp</span> provides a representation of most <i class="i">objects</i> in the form 
+of printed text called the printed representation.
+Functions such as <b class="b">print</b> take an <i class="i">object</i> 
+and send the characters of its printed representation to a <i class="i">stream</i>. 
+The collection of routines that does this is known as the (<span class="r">Common Lisp</span>) printer.  
+</p>
+<p>Reading a printed representation 
+typically
+produces an <i class="i">object</i> that is <b class="b">equal</b> to the
+originally printed <i class="i">object</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Multiple-Possible-Textual-Representations.html" accesskey="1">Multiple Possible Textual Representations</a></li>
+<li><a href="Printer-Escaping.html" accesskey="2">Printer Escaping</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Overview-of-the-Loop-Facility.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Overview of the Loop Facility (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Overview of the Loop Facility (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Overview of the Loop Facility (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-LOOP-Facility.html" rel="up" title="The LOOP Facility">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="next" title="Variable Initialization and Stepping Clauses">
+<link href="The-LOOP-Facility.html" rel="prev" title="The LOOP Facility">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Overview-of-the-Loop-Facility">
+<div class="nav-panel">
+<p>
+Next: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="n" rel="next">Variable Initialization and Stepping Clauses</a>, Previous: <a href="The-LOOP-Facility.html" accesskey="p" rel="prev">The LOOP Facility</a>, Up: <a href="The-LOOP-Facility.html" accesskey="u" rel="up">The LOOP Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Overview-of-the-Loop-Facility-1"><span>6.1.1 Overview of the Loop Facility<a class="copiable-link" href="#Overview-of-the-Loop-Facility-1"> &para;</a></span></h4>
+
+<p>The <b class="b">loop</b> <i class="i">macro</i> performs iteration.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Simple-vs-Extended-Loop.html" accesskey="1">Simple vs Extended Loop</a></li>
+<li><a href="Simple-Loop.html" accesskey="2">Simple Loop</a></li>
+<li><a href="Extended-Loop.html" accesskey="3">Extended Loop</a></li>
+<li><a href="Loop-Keywords.html" accesskey="4">Loop Keywords</a></li>
+<li><a href="Parsing-Loop-Clauses.html" accesskey="5">Parsing Loop Clauses</a></li>
+<li><a href="Expanding-Loop-Forms.html" accesskey="6">Expanding Loop Forms</a></li>
+<li><a href="Summary-of-Loop-Clauses.html" accesskey="7">Summary of Loop Clauses</a></li>
+<li><a href="Summary-of-Variable-Initialization-and-Stepping-Clauses.html" accesskey="8">Summary of Variable Initialization and Stepping Clauses</a></li>
+<li><a href="Summary-of-Value-Accumulation-Clauses.html" accesskey="9">Summary of Value Accumulation Clauses</a></li>
+<li><a href="Summary-of-Termination-Test-Clauses.html">Summary of Termination Test Clauses</a></li>
+<li><a href="Summary-of-Unconditional-Execution-Clauses.html">Summary of Unconditional Execution Clauses</a></li>
+<li><a href="Summary-of-Conditional-Execution-Clauses.html">Summary of Conditional Execution Clauses</a></li>
+<li><a href="Summary-of-Miscellaneous-Clauses.html">Summary of Miscellaneous Clauses</a></li>
+<li><a href="Order-of-Execution.html">Order of Execution</a></li>
+<li><a href="Destructuring.html">Destructuring</a></li>
+<li><a href="Restrictions-on-Side_002dEffects.html">Restrictions on Side-Effects</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Package-Concepts.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Package Concepts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Package Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Package Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages.html" rel="up" title="Packages">
+<link href="Packages-Dictionary.html" rel="next" title="Packages Dictionary">
+<link href="Packages.html" rel="prev" title="Packages">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Package-Concepts">
+<div class="nav-panel">
+<p>
+Next: <a href="Packages-Dictionary.html" accesskey="n" rel="next">Packages Dictionary</a>, Previous: <a href="Packages.html" accesskey="p" rel="prev">Packages</a>, Up: <a href="Packages.html" accesskey="u" rel="up">Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Package-Concepts-1"><span>11.1 Package Concepts<a class="copiable-link" href="#Package-Concepts-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Introduction-to-Packages.html" accesskey="1">Introduction to Packages</a></li>
+<li><a href="Standardized-Packages.html" accesskey="2">Standardized Packages</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Package-Inheritance.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Package Inheritance (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Package Inheritance (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Package Inheritance (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Packages.html" rel="up" title="Introduction to Packages">
+<link href="Accessibility-of-Symbols-in-a-Package.html" rel="next" title="Accessibility of Symbols in a Package">
+<link href="Internal-and-External-Symbols.html" rel="prev" title="Internal and External Symbols">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Package-Inheritance">
+<div class="nav-panel">
+<p>
+Next: <a href="Accessibility-of-Symbols-in-a-Package.html" accesskey="n" rel="next">Accessibility of Symbols in a Package</a>, Previous: <a href="Internal-and-External-Symbols.html" accesskey="p" rel="prev">Internal and External Symbols</a>, Up: <a href="Introduction-to-Packages.html" accesskey="u" rel="up">Introduction to Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Package-Inheritance-1"><span>11.1.1.4 Package Inheritance<a class="copiable-link" href="#Package-Inheritance-1"> &para;</a></span></h4>
+
+<p><i class="i">Packages</i> can be built up in layers.  From one point of view,
+a <i class="i">package</i> is a single collection
+of mappings from <i class="i">strings</i> into <i class="i">internal symbols</i> and 
+<i class="i">external symbols</i>.
+However, some of these mappings might be established within the <i class="i">package</i> 
+itself, while other mappings are inherited from other <i class="i">packages</i> 
+via <b class="b">use-package</b>.
+A <i class="i">symbol</i> is said to be <i class="i">present</i>
+<a class="index-entry-id" id="index-present"></a>
+ in a <i class="i">package</i> 
+if the mapping is in the <i class="i">package</i> itself and is
+not inherited from somewhere else.
+</p>
+<p>There is no way to inherit the <i class="i">internal symbols</i> of another <i class="i">package</i>;
+to refer to an <i class="i">internal symbol</i> using the <i class="i">Lisp reader</i>, 
+    a <i class="i">package</i> containing the <i class="i">symbol</i> 
+     must be made to be the <i class="i">current package</i>,
+    a <i class="i">package prefix</i> must be used,
+ or the <i class="i">symbol</i> must be <i class="i">imported</i> into the <i class="i">current package</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Package-Names-and-Nicknames.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Package Names and Nicknames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Package Names and Nicknames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Package Names and Nicknames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Packages.html" rel="up" title="Introduction to Packages">
+<link href="Symbols-in-a-Package.html" rel="next" title="Symbols in a Package">
+<link href="Introduction-to-Packages.html" rel="prev" title="Introduction to Packages">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Package-Names-and-Nicknames">
+<div class="nav-panel">
+<p>
+Next: <a href="Symbols-in-a-Package.html" accesskey="n" rel="next">Symbols in a Package</a>, Previous: <a href="Introduction-to-Packages.html" accesskey="p" rel="prev">Introduction to Packages</a>, Up: <a href="Introduction-to-Packages.html" accesskey="u" rel="up">Introduction to Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Package-Names-and-Nicknames-1"><span>11.1.1.1 Package Names and Nicknames<a class="copiable-link" href="#Package-Names-and-Nicknames-1"> &para;</a></span></h4>
+
+<p>Each <i class="i">package</i> has a <i class="i">name</i> (a <i class="i">string</i>) and perhaps some <i class="i">nicknames</i>
+(also <i class="i">strings</i>).
+These are assigned when the <i class="i">package</i> is created and can be changed later.  
+</p>
+<p>There is a single namespace for <i class="i">packages</i>.  
+The <i class="i">function</i> <b class="b">find-package</b> translates a package
+<i class="i">name</i> or <i class="i">nickname</i> into the associated <i class="i">package</i>.  
+The <i class="i">function</i> <b class="b">package-name</b> returns the <i class="i">name</i> of a <i class="i">package</i>.  
+The <i class="i">function</i> <b class="b">package-nicknames</b> returns 
+a <i class="i">list</i> of all <i class="i">nicknames</i> for a <i class="i">package</i>.
+<b class="b">rename-package</b> removes a <i class="i">package</i>&rsquo;s
+current <i class="i">name</i> and <i class="i">nicknames</i> and replaces them with new ones
+specified by the caller.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Package-Prefixes-for-Symbols.html
@@ -0,0 +1,105 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Package Prefixes for Symbols (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Package Prefixes for Symbols (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Package Prefixes for Symbols (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Effect-of-Readtable-Case-on-the-Lisp-Printer.html" rel="next" title="Effect of Readtable Case on the Lisp Printer">
+<link href="Printing-Symbols.html" rel="prev" title="Printing Symbols">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Package-Prefixes-for-Symbols">
+<div class="nav-panel">
+<p>
+Next: <a href="Effect-of-Readtable-Case-on-the-Lisp-Printer.html" accesskey="n" rel="next">Effect of Readtable Case on the Lisp Printer</a>, Previous: <a href="Printing-Symbols.html" accesskey="p" rel="prev">Printing Symbols</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Package-Prefixes-for-Symbols-1"><span>22.1.3.9 Package Prefixes for Symbols<a class="copiable-link" href="#Package-Prefixes-for-Symbols-1"> &para;</a></span></h4>
+
+<p><i class="i">Package prefixes</i> are printed if necessary.
+The rules for <i class="i">package prefixes</i> are as follows.
+When the <i class="i">symbol</i> is printed, if it is in the <code class="t">KEYWORD</code> <i class="i">package</i>, 
+then it is printed with a preceding <i class="i">colon</i>; otherwise, if
+it is <i class="i">accessible</i> in the <i class="i">current package</i>, it is printed without any
+<i class="i">package prefix</i>; otherwise, it is printed with a <i class="i">package prefix</i>.
+</p>
+<p>A <i class="i">symbol</i> that is <i class="i">apparently uninterned</i> is printed
+preceded by &ldquo;<code class="t">#:</code>&rdquo; 
+</p>
+<p>if <b class="b">*print-gensym*</b> is <i class="i">true</i> and <i class="i">printer escaping</i> is enabled;
+if <b class="b">*print-gensym*</b> is <i class="i">false</i> or <i class="i">printer escaping</i> is disabled,
+</p>
+<p>then the <i class="i">symbol</i> is printed without a prefix,
+as if it were in the <i class="i">current package</i>.
+</p>
+<p>Because the <code class="t">#:</code> syntax does not intern the
+following symbol, it is necessary to use circular-list syntax
+if <b class="b">*print-circle*</b> is <i class="i">true</i> and
+the same uninterned symbol appears several times in an expression
+to be printed.  For example, the result of
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((x (make-symbol &quot;FOO&quot;))) (list x x))
+</pre></div>
+
+<p>would be printed as <code class="t">(#:foo #:foo)</code> if <b class="b">*print-circle*</b>
+were <i class="i">false</i>, but as <code class="t">(#1=#:foo #1#)</code> if <b class="b">*print-circle*</b>
+were <i class="i">true</i>.
+</p>
+<p>A summary of the preceding package prefix rules follows:
+</p>
+<dl class="table">
+<dt><code class="t">foo:bar</code></dt>
+<dd><p><code class="t">foo:bar</code> is printed when <i class="i">symbol</i> <code class="t">bar</code> 
+is external in its <i class="i">home package</i> <code class="t">foo</code> 
+and is not <i class="i">accessible</i> in the <i class="i">current package</i>.
+</p>
+</dd>
+<dt><code class="t">foo::bar</code></dt>
+<dd><p><code class="t">foo::bar</code> is printed when <code class="t">bar</code> is internal in its <i class="i">home package</i>
+<code class="t">foo</code> and is not <i class="i">accessible</i> in the <i class="i">current package</i>.
+</p>
+</dd>
+<dt><code class="t">:bar</code></dt>
+<dd><p><code class="t">:bar</code> is printed when the home package of <code class="t">bar</code> is the <code class="t">KEYWORD</code> <i class="i">package</i>.
+</p>
+</dd>
+<dt>#:bar</dt>
+<dd><p><code class="t">#:bar</code> is printed when <code class="t">bar</code> is <i class="i">apparently uninterned</i>,
+even in the pathological case that <code class="t">bar</code> 
+has no <i class="i">home package</i> but is nevertheless somehow <i class="i">accessible</i> 
+in the <i class="i">current package</i>.
+</p></dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Effect-of-Readtable-Case-on-the-Lisp-Printer.html">Effect of Readtable Case on the Lisp Printer</a>, Previous: <a href="Printing-Symbols.html">Printing Symbols</a>, Up: <a href="Default-Print_002dObject-Methods.html">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Package-System-Consistency-Rules.html
@@ -0,0 +1,97 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Package System Consistency Rules (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Package System Consistency Rules (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Package System Consistency Rules (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpretation-of-Tokens.html" rel="up" title="Interpretation of Tokens">
+<link href="Valid-Patterns-for-Tokens.html" rel="prev" title="Valid Patterns for Tokens">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Package-System-Consistency-Rules">
+<div class="nav-panel">
+<p>
+Previous: <a href="Valid-Patterns-for-Tokens.html" accesskey="p" rel="prev">Valid Patterns for Tokens</a>, Up: <a href="Interpretation-of-Tokens.html" accesskey="u" rel="up">Interpretation of Tokens</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Package-System-Consistency-Rules-1"><span>2.3.6 Package System Consistency Rules<a class="copiable-link" href="#Package-System-Consistency-Rules-1"> &para;</a></span></h4>
+
+<p>The following rules apply to the package system as long as 
+the <i class="i">value</i> of <b class="b">*package*</b> is not changed:
+</p>
+<dl class="table">
+<dt><b class="b">Read-read consistency</b></dt>
+<dd><p>Reading the same <i class="i">symbol</i> <i class="i">name</i>
+always results in the <i class="i">same</i> <i class="i">symbol</i>.
+</p>
+</dd>
+<dt><b class="b">Print-read consistency</b></dt>
+<dd><p>An <i class="i">interned symbol</i> always prints as a sequence of characters that, 
+when read back in, yields the <i class="i">same</i> <i class="i">symbol</i>.
+</p>
+<p>For information about how the <i class="i">Lisp printer</i> treats <i class="i">symbols</i>,
+see <a class="ref" href="Printing-Symbols.html">Printing Symbols</a>.
+</p>
+</dd>
+<dt><b class="b">Print-print consistency</b></dt>
+<dd><p>If two interned <i class="i">symbols</i> are not the <i class="i">same</i>,
+then their printed representations will be different sequences of characters.
+</p></dd>
+</dl>
+
+<p>These rules are true regardless of any implicit interning.
+As long as the <i class="i">current package</i> is not changed,
+results are reproducible regardless of the order of <i class="i">loading</i> files 
+or the exact history of what <i class="i">symbols</i> were typed in when.  
+If the <i class="i">value</i> of <b class="b">*package*</b> is changed and then changed back to the previous value,
+consistency is maintained.
+The rules can be violated by
+    changing the <i class="i">value</i> of <b class="b">*package*</b>,
+    forcing a change to <i class="i">symbols</i> 
+                  or to <i class="i">packages</i> 
+    	          or to both
+    by continuing from an error,
+or calling one of the following <i class="i">functions</i>:
+    <b class="b">unintern</b>,
+    <b class="b">unexport</b>,
+    <b class="b">shadow</b>,
+    <b class="b">shadowing-import</b>,
+ or <b class="b">unuse-package</b>.
+</p>
+<p>An inconsistency only applies if one of the restrictions is violated
+between two of the named <i class="i">symbols</i>.
+<b class="b">shadow</b>, <b class="b">unexport</b>, <b class="b">unintern</b>,
+and <b class="b">shadowing-import</b> can only affect the consistency of
+<i class="i">symbols</i> with the same <i class="i">names</i> (under <b class="b">string=</b>)
+as the ones supplied as arguments.
+</p>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Valid-Patterns-for-Tokens.html">Valid Patterns for Tokens</a>, Up: <a href="Interpretation-of-Tokens.html">Interpretation of Tokens</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Packages-Dictionary.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Packages Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Packages Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Packages Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages.html" rel="up" title="Packages">
+<link href="Package-Concepts.html" rel="prev" title="Package Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Packages-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Package-Concepts.html" accesskey="p" rel="prev">Package Concepts</a>, Up: <a href="Packages.html" accesskey="u" rel="up">Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Packages-Dictionary-1"><span>11.2 Packages Dictionary<a class="copiable-link" href="#Packages-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="package.html" accesskey="1">package                                                      [System Class]</a></li>
+<li><a href="export.html" accesskey="2">export                                                           [Function]</a></li>
+<li><a href="find_002dsymbol.html" accesskey="3">find-symbol                                                      [Function]</a></li>
+<li><a href="find_002dpackage.html" accesskey="4">find-package                                                     [Function]</a></li>
+<li><a href="find_002dall_002dsymbols.html" accesskey="5">find-all-symbols                                                 [Function]</a></li>
+<li><a href="import.html" accesskey="6">import                                                           [Function]</a></li>
+<li><a href="list_002dall_002dpackages.html" accesskey="7">list-all-packages                                                [Function]</a></li>
+<li><a href="rename_002dpackage.html" accesskey="8">rename-package                                                   [Function]</a></li>
+<li><a href="shadow.html" accesskey="9">shadow                                                           [Function]</a></li>
+<li><a href="shadowing_002dimport.html">shadowing-import                                                 [Function]</a></li>
+<li><a href="delete_002dpackage.html">delete-package                                                   [Function]</a></li>
+<li><a href="make_002dpackage.html">make-package                                                     [Function]</a></li>
+<li><a href="with_002dpackage_002diterator.html">with-package-iterator                                               [Macro]</a></li>
+<li><a href="unexport.html">unexport                                                         [Function]</a></li>
+<li><a href="unintern.html">unintern                                                         [Function]</a></li>
+<li><a href="in_002dpackage.html">in-package                                                          [Macro]</a></li>
+<li><a href="unuse_002dpackage.html">unuse-package                                                    [Function]</a></li>
+<li><a href="use_002dpackage.html">use-package                                                      [Function]</a></li>
+<li><a href="defpackage.html">defpackage                                                          [Macro]</a></li>
+<li><a href="do_002dsymbols.html">do-symbols, do-external-symbols, do-all-symbols                     [Macro]</a></li>
+<li><a href="intern.html">intern                                                           [Function]</a></li>
+<li><a href="package_002dname.html">package-name                                                     [Function]</a></li>
+<li><a href="package_002dnicknames.html">package-nicknames                                                [Function]</a></li>
+<li><a href="package_002dshadowing_002dsymbols.html">package-shadowing-symbols                                        [Function]</a></li>
+<li><a href="package_002duse_002dlist.html">package-use-list                                                 [Function]</a></li>
+<li><a href="package_002dused_002dby_002dlist.html">package-used-by-list                                             [Function]</a></li>
+<li><a href="packagep.html">packagep                                                         [Function]</a></li>
+<li><a href="_002apackage_002a.html">*package*                                                        [Variable]</a></li>
+<li><a href="package_002derror.html">package-error                                              [Condition Type]</a></li>
+<li><a href="package_002derror_002dpackage.html">package-error-package                                            [Function]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Packages-No-Longer-Required.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Packages No Longer Required (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Packages No Longer Required (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Packages No Longer Required (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Removed-Language-Features.html" rel="up" title="Removed Language Features">
+<link href="Removed-Reader-Syntax.html" rel="prev" title="Removed Reader Syntax">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Packages-No-Longer-Required">
+<div class="nav-panel">
+<p>
+Previous: <a href="Removed-Reader-Syntax.html" accesskey="p" rel="prev">Removed Reader Syntax</a>, Up: <a href="Removed-Language-Features.html" accesskey="u" rel="up">Removed Language Features</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Packages-No-Longer-Required-1"><span>27.1.7 Packages No Longer Required<a class="copiable-link" href="#Packages-No-Longer-Required-1"> &para;</a></span></h4>
+
+<p>The <i class="i">packages</i> 
+     <code class="t">LISP</code>
+<a class="index-entry-id" id="index-lisp"></a>
+,
+     <code class="t">USER</code>
+<a class="index-entry-id" id="index-user-1"></a>
+,
+ and <code class="t">SYSTEM</code>
+<a class="index-entry-id" id="index-system"></a>
+</p>
+<p>are no longer required.  It is valid for <i class="i">packages</i> with one or more of these
+names to be provided by a <i class="i">conforming implementation</i> as extensions.
+</p>
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Packages.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Packages (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Packages (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Packages (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Numbers-_0028Numbers_0029.html" rel="next" title="Numbers (Numbers)">
+<link href="Symbols.html" rel="prev" title="Symbols">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Packages">
+<div class="nav-panel">
+<p>
+Next: <a href="Numbers-_0028Numbers_0029.html" accesskey="n" rel="next">Numbers</a>, Previous: <a href="Symbols.html" accesskey="p" rel="prev">Symbols</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Packages-1"><span>11 Packages<a class="copiable-link" href="#Packages-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Package-Concepts.html" accesskey="1">Package Concepts</a></li>
+<li><a href="Packages-Dictionary.html" accesskey="2">Packages Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Parsing-Loop-Clauses.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Parsing Loop Clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Parsing Loop Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Parsing Loop Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-the-Loop-Facility.html" rel="up" title="Overview of the Loop Facility">
+<link href="Expanding-Loop-Forms.html" rel="next" title="Expanding Loop Forms">
+<link href="Loop-Keywords.html" rel="prev" title="Loop Keywords">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Parsing-Loop-Clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Expanding-Loop-Forms.html" accesskey="n" rel="next">Expanding Loop Forms</a>, Previous: <a href="Loop-Keywords.html" accesskey="p" rel="prev">Loop Keywords</a>, Up: <a href="Overview-of-the-Loop-Facility.html" accesskey="u" rel="up">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Parsing-Loop-Clauses-1"><span>6.1.1.5 Parsing Loop Clauses<a class="copiable-link" href="#Parsing-Loop-Clauses-1"> &para;</a></span></h4>
+
+<p>The syntactic parts of an extended <b class="b">loop</b> <i class="i">form</i> are called clauses; 
+the rules for parsing are determined by 
+that clause&rsquo;s keyword.
+The following example shows a <b class="b">loop</b> <i class="i">form</i> with six clauses:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (loop for i from 1 to (compute-top-value)       ; first clause
+       while (not (unacceptable i))              ; second clause
+       collect (square i)                        ; third clause
+       do (format t &quot;Working on ~D now&quot; i)       ; fourth clause
+       when (evenp i)                            ; fifth clause
+         do (format t &quot;~D is a non-odd number&quot; i)
+       finally (format t &quot;About to exit!&quot;))      ; sixth clause
+</pre></div>
+
+<p>Each <i class="i">loop keyword</i> introduces 
+either a compound loop clause or a simple loop clause
+that can consist of a <i class="i">loop keyword</i> followed by a single <i class="i">form</i>.
+The number of <i class="i">forms</i> in a clause is determined by the <i class="i">loop keyword</i> 
+that begins the clause and by the auxiliary keywords in the clause.
+The keywords <code class="t">do</code>, 
+</p>
+<p><code class="t">doing</code>,
+</p>
+<p><code class="t">initially</code>, and <code class="t">finally</code> 
+are the only loop keywords that can take any number of <i class="i">forms</i> and 
+group them as an <i class="i">implicit progn</i>.
+</p>
+<p>Loop clauses can contain auxiliary keywords, which are sometimes
+called prepositions.  For example, the first clause in the code
+above includes the prepositions <code class="t">from</code> and <code class="t">to</code>, 
+which mark the value from which stepping begins and the value at which stepping
+ends.
+</p>
+<p>For detailed information about <b class="b">loop</b> syntax,
+see the <i class="i">macro</i> <b class="b">loop</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Parsing-Namestrings-Into-Pathnames.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Parsing Namestrings Into Pathnames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Parsing Namestrings Into Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Parsing Namestrings Into Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-Filenames.html" rel="up" title="Overview of Filenames">
+<link href="Pathnames-as-Filenames.html" rel="prev" title="Pathnames as Filenames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Parsing-Namestrings-Into-Pathnames">
+<div class="nav-panel">
+<p>
+Previous: <a href="Pathnames-as-Filenames.html" accesskey="p" rel="prev">Pathnames as Filenames</a>, Up: <a href="Overview-of-Filenames.html" accesskey="u" rel="up">Overview of Filenames</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Parsing-Namestrings-Into-Pathnames-1"><span>19.1.3 Parsing Namestrings Into Pathnames<a class="copiable-link" href="#Parsing-Namestrings-Into-Pathnames-1"> &para;</a></span></h4>
+
+<p>Parsing is the operation used to convert a <i class="i">namestring</i> into a <i class="i">pathname</i>.
+</p>
+<p>Except in the case of parsing <i class="i">logical pathname</i> <i class="i">namestrings</i>,
+</p>
+<p>this operation is <i class="i">implementation-dependent</i>,
+because the format of <i class="i">namestrings</i> is <i class="i">implementation-dependent</i>.
+</p>
+<p>A <i class="i">conforming implementation</i> is free to accommodate other <i class="i">file system</i>
+features in its <i class="i">pathname</i> representation and provides a parser that can process 
+such specifications in <i class="i">namestrings</i>.  
+<i class="i">Conforming programs</i> must not depend on any such features, 
+since those features will not be portable.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Pathname-Components.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Pathname Components (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Pathname Components (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Pathname Components (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Pathnames.html" rel="up" title="Pathnames">
+<link href="Interpreting-Pathname-Component-Values.html" rel="next" title="Interpreting Pathname Component Values">
+<link href="Pathnames.html" rel="prev" title="Pathnames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Pathname-Components">
+<div class="nav-panel">
+<p>
+Next: <a href="Interpreting-Pathname-Component-Values.html" accesskey="n" rel="next">Interpreting Pathname Component Values</a>, Previous: <a href="Pathnames.html" accesskey="p" rel="prev">Pathnames</a>, Up: <a href="Pathnames.html" accesskey="u" rel="up">Pathnames</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Pathname-Components-1"><span>19.2.1 Pathname Components<a class="copiable-link" href="#Pathname-Components-1"> &para;</a></span></h4>
+
+<p>A <i class="i">pathname</i> has six components:
+     a host,
+     a device,
+     a directory,
+     a name,
+     a type,
+ and a version.
+</p>
+
+<ul class="mini-toc">
+<li><a href="The-Pathname-Host-Component.html" accesskey="1">The Pathname Host Component</a></li>
+<li><a href="The-Pathname-Device-Component.html" accesskey="2">The Pathname Device Component</a></li>
+<li><a href="The-Pathname-Directory-Component.html" accesskey="3">The Pathname Directory Component</a></li>
+<li><a href="The-Pathname-Name-Component.html" accesskey="4">The Pathname Name Component</a></li>
+<li><a href="The-Pathname-Type-Component.html" accesskey="5">The Pathname Type Component</a></li>
+<li><a href="The-Pathname-Version-Component.html" accesskey="6">The Pathname Version Component</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Pathnames-as-Filenames.html
@@ -0,0 +1,127 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Pathnames as Filenames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Pathnames as Filenames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Pathnames as Filenames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-Filenames.html" rel="up" title="Overview of Filenames">
+<link href="Parsing-Namestrings-Into-Pathnames.html" rel="next" title="Parsing Namestrings Into Pathnames">
+<link href="Namestrings-as-Filenames.html" rel="prev" title="Namestrings as Filenames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Pathnames-as-Filenames">
+<div class="nav-panel">
+<p>
+Next: <a href="Parsing-Namestrings-Into-Pathnames.html" accesskey="n" rel="next">Parsing Namestrings Into Pathnames</a>, Previous: <a href="Namestrings-as-Filenames.html" accesskey="p" rel="prev">Namestrings as Filenames</a>, Up: <a href="Overview-of-Filenames.html" accesskey="u" rel="up">Overview of Filenames</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Pathnames-as-Filenames-1"><span>19.1.2 Pathnames as Filenames<a class="copiable-link" href="#Pathnames-as-Filenames-1"> &para;</a></span></h4>
+
+<p><i class="i">Pathnames</i>
+<a class="index-entry-id" id="index-pathname"></a>
+ are structured <i class="i">objects</i> that can represent,
+in an <i class="i">implementation-independent</i> way,
+the <i class="i">filenames</i> that are used natively by an underlying <i class="i">file system</i>.
+</p>
+<p>In addition, <i class="i">pathnames</i> can also represent certain partially composed 
+<i class="i">filenames</i> for which an underlying <i class="i">file system</i> 
+might not have a specific <i class="i">namestring</i> representation.
+</p>
+<p>A <i class="i">pathname</i> need not correspond to any file that actually exists, 
+and more than one <i class="i">pathname</i> can refer to the same file.
+For example, the <i class="i">pathname</i> with a version of <code class="t">:newest</code> 
+might refer to the same file as a <i class="i">pathname</i> 
+with the same components except a certain number as the version.
+Indeed, a <i class="i">pathname</i> with version <code class="t">:newest</code> might refer to
+different files as time passes, because the meaning of such a <i class="i">pathname</i>
+depends on the state of the file system.  
+</p>
+<p>Some <i class="i">file systems</i> naturally use a structural model for their
+<i class="i">filenames</i>, while others do not.  Within the <span class="r">Common Lisp</span> <i class="i">pathname</i> model, 
+all <i class="i">filenames</i> are seen as having a particular structure,
+even if that structure is not reflected in the underlying <i class="i">file system</i>.
+The nature of the mapping between structure imposed by <i class="i">pathnames</i>
+and the structure, if any, that is used by the underlying <i class="i">file system</i>
+is <i class="i">implementation-defined</i>.
+</p>
+<p>Every <i class="i">pathname</i> has six components:
+     a host,
+     a device,
+     a directory,
+     a name,
+     a type,
+ and a version.
+By naming <i class="i">files</i> with <i class="i">pathnames</i>, 
+<span class="r">Common Lisp</span> programs can work in essentially the same way even in <i class="i">file systems</i>
+that seem superficially quite different.
+For a detailed description of these components, see <a class="ref" href="Pathname-Components.html">Pathname Components</a>.
+</p>
+<p>The mapping of the <i class="i">pathname</i> components into the concepts peculiar to
+each <i class="i">file system</i> is <i class="i">implementation-defined</i>.
+There exist conceivable <i class="i">pathnames</i>
+for which there is no mapping to a syntactically valid <i class="i">filename</i>
+in a particular <i class="i">implementation</i>.
+An <i class="i">implementation</i> may use various strategies in an attempt to find a mapping;
+for example, 
+an <i class="i">implementation</i> may quietly truncate <i class="i">filenames</i>
+that exceed length limitations imposed by the underlying <i class="i">file system</i>,
+or ignore certain <i class="i">pathname</i> components
+for which the <i class="i">file system</i> provides no support.
+If such a mapping cannot be found,
+an error of <i class="i">type</i> <b class="b">file-error</b> is signaled.
+</p>
+<p>The time at which this mapping and associated error signaling 
+occurs is <i class="i">implementation-dependent</i>.
+Specifically, it may occur 
+    at the time the <i class="i">pathname</i> is constructed,
+    when coercing a <i class="i">pathname</i> to a <i class="i">namestring</i>,
+ or when an attempt is made to <i class="i">open</i> or otherwise access the <i class="i">file</i> 
+     designated by the <i class="i">pathname</i>.
+</p>
+<p>Figure 19&ndash;1 lists some <i class="i">defined names</i> that are applicable to <i class="i">pathnames</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  *default-pathname-defaults*  namestring          pathname-name          <!-- /@w -->
+  directory-namestring         open                pathname-type          <!-- /@w -->
+  enough-namestring            parse-namestring    pathname-version       <!-- /@w -->
+  file-namestring              pathname            pathnamep              <!-- /@w -->
+  file-string-length           pathname-device     translate-pathname     <!-- /@w -->
+  host-namestring              pathname-directory  truename               <!-- /@w -->
+  make-pathname                pathname-host       user-homedir-pathname  <!-- /@w -->
+  merge-pathnames              pathname-match-p    wild-pathname-p        <!-- /@w -->
+
+                     Figure 19&ndash;1: Pathname Operations                    <!-- /@w -->
+
+</pre></div></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Parsing-Namestrings-Into-Pathnames.html">Parsing Namestrings Into Pathnames</a>, Previous: <a href="Namestrings-as-Filenames.html">Namestrings as Filenames</a>, Up: <a href="Overview-of-Filenames.html">Overview of Filenames</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Pathnames.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Pathnames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames.html" rel="up" title="Filenames">
+<link href="Logical-Pathnames.html" rel="next" title="Logical Pathnames">
+<link href="Overview-of-Filenames.html" rel="prev" title="Overview of Filenames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Pathnames">
+<div class="nav-panel">
+<p>
+Next: <a href="Logical-Pathnames.html" accesskey="n" rel="next">Logical Pathnames</a>, Previous: <a href="Overview-of-Filenames.html" accesskey="p" rel="prev">Overview of Filenames</a>, Up: <a href="Filenames.html" accesskey="u" rel="up">Filenames</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Pathnames-1"><span>19.2 Pathnames<a class="copiable-link" href="#Pathnames-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Pathname-Components.html" accesskey="1">Pathname Components</a></li>
+<li><a href="Interpreting-Pathname-Component-Values.html" accesskey="2">Interpreting Pathname Component Values</a></li>
+<li><a href="Merging-Pathnames.html" accesskey="3">Merging Pathnames</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Potential-Numbers-as-Tokens.html
@@ -0,0 +1,116 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Potential Numbers as Tokens (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Potential Numbers as Tokens (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Potential Numbers as Tokens (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-as-Tokens.html" rel="up" title="Numbers as Tokens">
+<link href="Escape-Characters-and-Potential-Numbers.html" rel="next" title="Escape Characters and Potential Numbers">
+<link href="Numbers-as-Tokens.html" rel="prev" title="Numbers as Tokens">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Potential-Numbers-as-Tokens">
+<div class="nav-panel">
+<p>
+Next: <a href="Escape-Characters-and-Potential-Numbers.html" accesskey="n" rel="next">Escape Characters and Potential Numbers</a>, Previous: <a href="Numbers-as-Tokens.html" accesskey="p" rel="prev">Numbers as Tokens</a>, Up: <a href="Numbers-as-Tokens.html" accesskey="u" rel="up">Numbers as Tokens</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Potential-Numbers-as-Tokens-1"><span>2.3.1.1 Potential Numbers as Tokens<a class="copiable-link" href="#Potential-Numbers-as-Tokens-1"> &para;</a></span></h4>
+
+<p>To allow implementors and future <span class="r">Common Lisp</span> standards
+to extend the syntax of numbers, a
+syntax for <i class="i">potential numbers</i> is defined that is
+more general than the syntax for numbers.
+A <i class="i">token</i> is a <i class="i">potential number</i> if it satisfies all of the following
+requirements:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>The <i class="i">token</i> consists entirely of 
+  <i class="i">digits</i>,
+  <i class="i">signs</i>,
+  <i class="i">ratio markers</i>,
+  decimal points (<code class="t">.</code>),
+  extension characters (<code class="t">^</code> or <code class="t">_</code>),
+  and number markers.
+A number marker is a letter. 
+Whether a letter may be treated as a number marker depends on context,
+but no letter that is adjacent to another letter may ever be treated as a number marker.
+<i class="i">Exponent markers</i> are number markers.
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p>The <i class="i">token</i> contains at least one digit.  Letters may be considered to be
+digits, depending on the <i class="i">current input base</i>, but only
+in <i class="i">tokens</i> containing no decimal points.
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>The <i class="i">token</i> begins with a <i class="i">digit</i>, <i class="i">sign</i>, decimal point, or extension character,
+</p>
+<p>[Reviewer Note by Barmar: This section is unnecessary because the first bullet already 
+		  omits discussion of a colon (<i class="i">package marker</i>).]
+but not a 
+<i class="i">package marker</i>.
+The syntax involving a leading 
+<i class="i">package marker</i> followed by a <i class="i">potential number</i> is
+not well-defined. The consequences of the use 
+of notation such as <code class="t">:1</code>, <code class="t">:1/2</code>, and <code class="t">:2^3</code> in a
+position where an expression appropriate for <b class="b">read</b> 
+is expected are unspecified.
+</p>
+</dd>
+<dt>4.</dt>
+<dd><p>The <i class="i">token</i> does not end with a sign.
+</p></dd>
+</dl>
+
+<p>If a <i class="i">potential number</i> has number syntax, 
+a <i class="i">number</i> of the appropriate type is constructed and returned, 
+if the <i class="i">number</i> is representable in an implementation.
+A <i class="i">number</i> will not be representable in an implementation 
+if it is outside the boundaries set by the <i class="i">implementation-dependent</i> 
+constants for <i class="i">numbers</i>.
+For example, specifying too large or too small an exponent for a <i class="i">float</i>
+may make the <i class="i">number</i> impossible to represent in the implementation.
+A <i class="i">ratio</i> with denominator zero (such as <code class="t">-35/000</code>)
+is not represented in any implementation.
+When a <i class="i">token</i> with the syntax of a number cannot be converted to an internal
+<i class="i">number</i>, an error of <i class="i">type</i> <b class="b">reader-error</b> is signaled.  An error
+must not be signaled for specifying too many significant digits
+for a <i class="i">float</i>; a truncated or rounded value should be produced.
+</p>
+<p>If there is an ambiguity as to whether
+a letter should be treated as a digit or as a number marker,
+the letter is treated as a digit.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Escape-Characters-and-Potential-Numbers.html">Escape Characters and Potential Numbers</a>, Previous: <a href="Numbers-as-Tokens.html">Numbers as Tokens</a>, Up: <a href="Numbers-as-Tokens.html">Numbers as Tokens</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Pretty-Print-Dispatch-Tables.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Pretty Print Dispatch Tables (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Pretty Print Dispatch Tables (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Pretty Print Dispatch Tables (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Pretty-Printer-Concepts.html" rel="up" title="Pretty Printer Concepts">
+<link href="Pretty-Printer-Margins.html" rel="next" title="Pretty Printer Margins">
+<link href="Compiling-Format-Strings.html" rel="prev" title="Compiling Format Strings">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Pretty-Print-Dispatch-Tables">
+<div class="nav-panel">
+<p>
+Next: <a href="Pretty-Printer-Margins.html" accesskey="n" rel="next">Pretty Printer Margins</a>, Previous: <a href="Compiling-Format-Strings.html" accesskey="p" rel="prev">Compiling Format Strings</a>, Up: <a href="Pretty-Printer-Concepts.html" accesskey="u" rel="up">Pretty Printer Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Pretty-Print-Dispatch-Tables-1"><span>22.2.1.4 Pretty Print Dispatch Tables<a class="copiable-link" href="#Pretty-Print-Dispatch-Tables-1"> &para;</a></span></h4>
+
+<p>A <i class="i">pprint dispatch table</i>
+<a class="index-entry-id" id="index-pprint-dispatch-table"></a>
+ is a mapping from keys to pairs of values.  
+Each key is a <i class="i">type specifier</i>.  
+The values associated with a key are
+     a &ldquo;function&rdquo; (specifically, a <i class="i">function designator</i> or <b class="b">nil</b>)
+ and a &ldquo;numerical priority&rdquo; (specifically, a <i class="i">real</i>).
+Basic insertion and retrieval is done based on the keys with the equality
+of keys being tested by <b class="b">equal</b>.
+</p>
+<p>When <b class="b">*print-pretty*</b> is <i class="i">true</i>, 
+the <i class="i">current pprint dispatch table</i>
+<a class="index-entry-id" id="index-current-pprint-dispatch-table"></a>
+ (in <b class="b">*print-pprint-dispatch*</b>)
+controls how <i class="i">objects</i> are printed.
+The information in this table takes precedence over
+all other mechanisms for specifying how to print <i class="i">objects</i>.
+In particular, it 
+has priority over
+user-defined <b class="b">print-object</b> <i class="i">methods</i> 
+</p>
+<p>because the <i class="i">current pprint dispatch table</i> is consulted first.
+</p>
+<p>The function is chosen from the <i class="i">current pprint dispatch table</i>
+by finding the highest priority function 
+that is associated with a <i class="i">type specifier</i> that matches the <i class="i">object</i>;
+if there is more than one such function, 
+it is <i class="i">implementation-dependent</i> which is used.
+</p>
+<p>However, if there is no 
+information in the table
+about how to <i class="i">pretty print</i> a particular kind of <i class="i">object</i>, 
+a <i class="i">function</i> is invoked which uses <b class="b">print-object</b> to print the <i class="i">object</i>.
+The value of <b class="b">*print-pretty*</b> is still <i class="i">true</i> 
+when this function is <i class="i">called</i>,
+and individual methods for <b class="b">print-object</b> might still elect to
+produce output in a special format conditional on the <i class="i">value</i> of <b class="b">*print-pretty*</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Pretty-Printer-Concepts.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Pretty Printer Concepts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Pretty Printer Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Pretty Printer Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Lisp-Pretty-Printer.html" rel="up" title="The Lisp Pretty Printer">
+<link href="Examples-of-using-the-Pretty-Printer.html" rel="next" title="Examples of using the Pretty Printer">
+<link href="The-Lisp-Pretty-Printer.html" rel="prev" title="The Lisp Pretty Printer">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Pretty-Printer-Concepts">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-using-the-Pretty-Printer.html" accesskey="n" rel="next">Examples of using the Pretty Printer</a>, Previous: <a href="The-Lisp-Pretty-Printer.html" accesskey="p" rel="prev">The Lisp Pretty Printer</a>, Up: <a href="The-Lisp-Pretty-Printer.html" accesskey="u" rel="up">The Lisp Pretty Printer</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Pretty-Printer-Concepts-1"><span>22.2.1 Pretty Printer Concepts<a class="copiable-link" href="#Pretty-Printer-Concepts-1"> &para;</a></span></h4>
+
+<p>The facilities provided by the <i class="i">pretty printer</i>
+<a class="index-entry-id" id="index-pretty-printer"></a>
+ permit
+<i class="i">programs</i> to redefine the way in which <i class="i">code</i> is displayed, 
+and allow the full power of <i class="i">pretty printing</i> to be applied 
+to complex combinations of data structures.
+</p>
+<p>Whether any given style of output is in fact &ldquo;pretty&rdquo; is inherently a
+somewhat subjective issue.  However, since the effect of the 
+<i class="i">pretty printer</i> can be customized by <i class="i">conforming programs</i>,
+the necessary flexibility is provided for individual <i class="i">programs</i>
+to achieve an arbitrary degree of aesthetic control.
+</p>
+<p>By providing direct access to the mechanisms within the pretty printer
+that make dynamic decisions about layout, the macros and functions
+<b class="b">pprint-logical-block</b>, <b class="b">pprint-newline</b>, and
+<b class="b">pprint-indent</b> make it possible to specify pretty printing
+layout rules as a part of any function that produces output.  They also
+make it very easy for the detection of circularity and sharing, and
+abbreviation based on length and nesting depth to be supported by the
+function.
+</p>
+<p>The <i class="i">pretty printer</i> is driven entirely by dispatch based on
+the <i class="i">value</i> of <b class="b">*print-pprint-dispatch*</b>.
+The <i class="i">function</i> <b class="b">set-pprint-dispatch</b> makes it possible
+for <i class="i">conforming programs</i> to associate new pretty printing 
+functions with a <i class="i">type</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Dynamic-Control-of-the-Arrangement-of-Output.html" accesskey="1">Dynamic Control of the Arrangement of Output</a></li>
+<li><a href="Format-Directive-Interface.html" accesskey="2">Format Directive Interface</a></li>
+<li><a href="Compiling-Format-Strings.html" accesskey="3">Compiling Format Strings</a></li>
+<li><a href="Pretty-Print-Dispatch-Tables.html" accesskey="4">Pretty Print Dispatch Tables</a></li>
+<li><a href="Pretty-Printer-Margins.html" accesskey="5">Pretty Printer Margins</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Pretty-Printer-Margins.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Pretty Printer Margins (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Pretty Printer Margins (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Pretty Printer Margins (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Pretty-Printer-Concepts.html" rel="up" title="Pretty Printer Concepts">
+<link href="Pretty-Print-Dispatch-Tables.html" rel="prev" title="Pretty Print Dispatch Tables">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Pretty-Printer-Margins">
+<div class="nav-panel">
+<p>
+Previous: <a href="Pretty-Print-Dispatch-Tables.html" accesskey="p" rel="prev">Pretty Print Dispatch Tables</a>, Up: <a href="Pretty-Printer-Concepts.html" accesskey="u" rel="up">Pretty Printer Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Pretty-Printer-Margins-1"><span>22.2.1.5 Pretty Printer Margins<a class="copiable-link" href="#Pretty-Printer-Margins-1"> &para;</a></span></h4>
+
+<p>A primary goal of pretty printing is to keep the output between a pair of
+margins. 
+The column where the output begins is taken as the left margin.
+If the current column cannot be determined at the time output begins,
+the left margin is assumed to be zero.
+The right margin is controlled by <b class="b">*print-right-margin*</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Prevention-of-Name-Conflicts-in-Packages.html
@@ -0,0 +1,151 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Prevention of Name Conflicts in Packages (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Prevention of Name Conflicts in Packages (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Prevention of Name Conflicts in Packages (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Packages.html" rel="up" title="Introduction to Packages">
+<link href="Locating-a-Symbol-in-a-Package.html" rel="prev" title="Locating a Symbol in a Package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Prevention-of-Name-Conflicts-in-Packages">
+<div class="nav-panel">
+<p>
+Previous: <a href="Locating-a-Symbol-in-a-Package.html" accesskey="p" rel="prev">Locating a Symbol in a Package</a>, Up: <a href="Introduction-to-Packages.html" accesskey="u" rel="up">Introduction to Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Prevention-of-Name-Conflicts-in-Packages-1"><span>11.1.1.7 Prevention of Name Conflicts in Packages<a class="copiable-link" href="#Prevention-of-Name-Conflicts-in-Packages-1"> &para;</a></span></h4>
+
+<p>Within one <i class="i">package</i>, any particular name can refer to at most one
+<i class="i">symbol</i>.  A name conflict is said to occur when there would be more than
+one candidate <i class="i">symbol</i>.  Any time a name conflict is about to occur,
+a <i class="i">correctable</i> <i class="i">error</i> is signaled.  
+</p>
+<p>The following rules apply to name conflicts:
+</p><dl class="table">
+<dt>&ndash;</dt>
+<dd><p>Name conflicts are detected when they become possible, that is, when the
+package structure is altered.  Name
+conflicts are not checked during every name lookup.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>If the <i class="i">same</i> <i class="i">symbol</i> is <i class="i">accessible</i> to a <i class="i">package</i> 
+through more than one path, there is no name conflict.
+A <i class="i">symbol</i> cannot conflict with itself. 
+Name conflicts occur only between <i class="i">distinct</i> <i class="i">symbols</i> with
+the same name (under <b class="b">string=</b>).
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>Every <i class="i">package</i> has a list of shadowing <i class="i">symbols</i>.  
+A shadowing <i class="i">symbol</i> takes precedence over any other <i class="i">symbol</i> of
+the same name that would otherwise be <i class="i">accessible</i> in the <i class="i">package</i>.  
+A name conflict involving a shadowing symbol is always resolved in favor of
+the shadowing <i class="i">symbol</i>, without signaling an error (except for one
+exception involving <b class="b">import</b>).
+See <b class="b">shadow</b> and <b class="b">shadowing-import</b>.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>The functions <b class="b">use-package</b>, <b class="b">import</b>, and 
+<b class="b">export</b> check for name conflicts.  
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p><b class="b">shadow</b> and <b class="b">shadowing-import</b> 
+never signal a name-conflict error.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p><b class="b">unuse-package</b> and <b class="b">unexport</b>
+do not need to do any name-conflict checking.
+<b class="b">unintern</b> does name-conflict checking only when a <i class="i">symbol</i> 
+being <i class="i">uninterned</i> is a <i class="i">shadowing symbol</i>
+<a class="index-entry-id" id="index-shadowing-symbol"></a>
+.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>Giving a shadowing symbol to <b class="b">unintern</b> 
+can uncover a name conflict that had
+previously been resolved by the shadowing.  
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>Package functions signal name-conflict errors of <i class="i">type</i> <b class="b">package-error</b> before making any
+  change to the package structure.  When multiple changes are to be made,
+  it is
+  permissible for the implementation to process each change separately.
+  For example, when <b class="b">export</b> is given a 
+<i class="i">list</i> of 
+<i class="i">symbols</i>,
+  aborting from a name
+  conflict caused by the second <i class="i">symbol</i> 
+  in the <i class="i">list</i> might still export the
+  first <i class="i">symbol</i> in the <i class="i">list</i>.  
+  However, a name-conflict error caused by <b class="b">export</b>
+  of a single <i class="i">symbol</i> will be signaled before
+  that <i class="i">symbol</i>&rsquo;s <i class="i">accessibility</i> in any <i class="i">package</i> is changed.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>Continuing from a name-conflict error must offer the user a chance to
+resolve the name conflict in favor of either of the candidates.  The
+<i class="i">package</i> 
+structure should be altered to reflect the resolution of the
+name conflict, via <b class="b">shadowing-import</b>, 
+<b class="b">unintern</b>,
+or <b class="b">unexport</b>.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>A name conflict in <b class="b">use-package</b> between a <i class="i">symbol</i> 
+<i class="i">present</i> in the using <i class="i">package</i> and an <i class="i">external symbol</i> of the used 
+<i class="i">package</i> is resolved in favor of the first <i class="i">symbol</i> by making it a
+shadowing <i class="i">symbol</i>, or in favor of the second <i class="i">symbol</i> by uninterning
+the first <i class="i">symbol</i> from the using <i class="i">package</i>. 
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>A name conflict in <b class="b">export</b> or <b class="b">unintern</b> 
+due to a <i class="i">package</i>&rsquo;s inheriting two <i class="i">distinct</i> <i class="i">symbols</i> 
+with the <i class="i">same</i> <i class="i">name</i> (under <b class="b">string=</b>)
+from two other <i class="i">packages</i> can be resolved in
+favor of either <i class="i">symbol</i> by importing it into the using
+<i class="i">package</i> and making it a <i class="i">shadowing symbol</i>
+<a class="index-entry-id" id="index-shadowing-symbol-1"></a>
+,
+just as with <b class="b">use-package</b>.
+</p></dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Locating-a-Symbol-in-a-Package.html">Locating a Symbol in a Package</a>, Up: <a href="Introduction-to-Packages.html">Introduction to Packages</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Principal-Values-and-Branch-Cuts.html
@@ -0,0 +1,97 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Principal Values and Branch Cuts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Principal Values and Branch Cuts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Principal Values and Branch Cuts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Complex-Computations.html" rel="up" title="Complex Computations">
+<link href="Examples-of-Rule-of-Canonical-Representation-for-Complex-Rationals.html" rel="prev" title="Examples of Rule of Canonical Representation for Complex Rationals">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Principal-Values-and-Branch-Cuts">
+<div class="nav-panel">
+<p>
+Previous: <a href="Examples-of-Rule-of-Canonical-Representation-for-Complex-Rationals.html" accesskey="p" rel="prev">Examples of Rule of Canonical Representation for Complex Rationals</a>, Up: <a href="Complex-Computations.html" accesskey="u" rel="up">Complex Computations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Principal-Values-and-Branch-Cuts-1"><span>12.1.5.5 Principal Values and Branch Cuts<a class="copiable-link" href="#Principal-Values-and-Branch-Cuts-1"> &para;</a></span></h4>
+
+<p>Many of the irrational and transcendental functions are multiply defined
+in the complex domain; for example, there are in general an infinite
+number of complex values for the logarithm function.  In each such
+case, a <i class="i">principal</i> <i class="i">value</i> must be chosen for the function to return.
+In general, such values cannot be chosen so as to make the range
+continuous; lines in the domain
+called branch cuts must be defined, which in turn
+define the discontinuities in the range.
+<span class="r">Common Lisp</span> defines the branch cuts, <i class="i">principal</i> <i class="i">values</i>, and boundary
+conditions for the complex functions following &ldquo;Principal Values and Branch Cuts in Complex APL.&rdquo; The branch
+cut rules that apply to each function are located with the description of
+that function.
+</p>
+<p>Figure 12&ndash;9 lists
+the identities that are obeyed
+throughout the applicable portion of the complex domain, even on
+the branch cuts:
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  sin i z = i sinh z  sinh i z = i sin z        arctan i z = i arctanh z  <!-- /@w -->
+  cos i z = cosh z    cosh i z = cos z          arcsinh i z = i arcsin z  <!-- /@w -->
+  tan i z = i tanh z  arcsin i z = i arcsinh z  arctanh i z = i arctan z  <!-- /@w -->
+
+         Figure 12&ndash;9: Trigonometric Identities for Complex Domain        <!-- /@w -->
+
+</pre></div></div>
+
+<p>The quadrant numbers referred to in the discussions of branch cuts are as illustrated
+in Figure 12&ndash;10.
+</p>
+<div class="example">
+<pre class="example-preformatted">                           Imaginary Axis
+	                         |
+	        		 |
+	        	II       |        I
+	        	         |
+	        	         |
+	        	         |
+	       ______________________________________ Real Axis
+	        	         |
+	        	         |
+	        	         |
+	               III       |     	   IV
+	        		 |
+	        		 |
+	        		 |
+	        		 |
+
+</pre></div>
+
+<p>&nbsp;Figure&nbsp;12&ndash;9:&nbsp;Quadrant&nbsp;Numbering&nbsp;for&nbsp;Branch&nbsp;Cuts<!-- /@w -->
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printer-Dictionary.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printer Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printer Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printer Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer.html" rel="up" title="Printer">
+<link href="Formatted-Output.html" rel="prev" title="Formatted Output">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Printer-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Formatted-Output.html" accesskey="p" rel="prev">Formatted Output</a>, Up: <a href="Printer.html" accesskey="u" rel="up">Printer</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Printer-Dictionary-1"><span>22.4 Printer Dictionary<a class="copiable-link" href="#Printer-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="copy_002dpprint_002ddispatch.html" accesskey="1">copy-pprint-dispatch                                             [Function]</a></li>
+<li><a href="formatter.html" accesskey="2">formatter                                                           [Macro]</a></li>
+<li><a href="pprint_002ddispatch.html" accesskey="3">pprint-dispatch                                                  [Function]</a></li>
+<li><a href="pprint_002dexit_002dif_002dlist_002dexhausted.html" accesskey="4">pprint-exit-if-list-exhausted                                 [Local Macro]</a></li>
+<li><a href="pprint_002dfill.html" accesskey="5">pprint-fill, pprint-linear, pprint-tabular                       [Function]</a></li>
+<li><a href="pprint_002dindent.html" accesskey="6">pprint-indent                                                    [Function]</a></li>
+<li><a href="pprint_002dlogical_002dblock.html" accesskey="7">pprint-logical-block                                                [Macro]</a></li>
+<li><a href="pprint_002dnewline.html" accesskey="8">pprint-newline                                                   [Function]</a></li>
+<li><a href="pprint_002dpop.html" accesskey="9">pprint-pop                                                    [Local Macro]</a></li>
+<li><a href="pprint_002dtab.html">pprint-tab                                                       [Function]</a></li>
+<li><a href="print_002dobject.html">print-object                                    [Standard Generic Function]</a></li>
+<li><a href="print_002dunreadable_002dobject.html">print-unreadable-object                                             [Macro]</a></li>
+<li><a href="set_002dpprint_002ddispatch.html">set-pprint-dispatch                                              [Function]</a></li>
+<li><a href="write.html">write, prin1, print, pprint, princ                               [Function]</a></li>
+<li><a href="write_002dto_002dstring.html">write-to-string, prin1-to-string, princ-to-string                [Function]</a></li>
+<li><a href="_002aprint_002darray_002a.html">*print-array*                                                    [Variable]</a></li>
+<li><a href="_002aprint_002dbase_002a.html">*print-base*, *print-radix*                                      [Variable]</a></li>
+<li><a href="_002aprint_002dcase_002a.html">*print-case*                                                     [Variable]</a></li>
+<li><a href="_002aprint_002dcircle_002a.html">*print-circle*                                                   [Variable]</a></li>
+<li><a href="_002aprint_002descape_002a.html">*print-escape*                                                   [Variable]</a></li>
+<li><a href="_002aprint_002dgensym_002a.html">*print-gensym*                                                   [Variable]</a></li>
+<li><a href="_002aprint_002dlevel_002a.html">*print-level*, *print-length*                                    [Variable]</a></li>
+<li><a href="_002aprint_002dlines_002a.html">*print-lines*                                                    [Variable]</a></li>
+<li><a href="_002aprint_002dmiser_002dwidth_002a.html">*print-miser-width*                                              [Variable]</a></li>
+<li><a href="_002aprint_002dpprint_002ddispatch_002a.html">*print-pprint-dispatch*                                          [Variable]</a></li>
+<li><a href="_002aprint_002dpretty_002a.html">*print-pretty*                                                   [Variable]</a></li>
+<li><a href="_002aprint_002dreadably_002a.html">*print-readably*                                                 [Variable]</a></li>
+<li><a href="_002aprint_002dright_002dmargin_002a.html">*print-right-margin*                                             [Variable]</a></li>
+<li><a href="print_002dnot_002dreadable.html">print-not-readable                                         [Condition Type]</a></li>
+<li><a href="print_002dnot_002dreadable_002dobject.html">print-not-readable-object                                        [Function]</a></li>
+<li><a href="format.html">format                                                           [Function]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printer-Dispatching.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printer Dispatching (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printer Dispatching (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printer Dispatching (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Lisp-Printer.html" rel="up" title="The Lisp Printer">
+<link href="Default-Print_002dObject-Methods.html" rel="next" title="Default Print-Object Methods">
+<link href="Overview-of-The-Lisp-Printer.html" rel="prev" title="Overview of The Lisp Printer">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Printer-Dispatching">
+<div class="nav-panel">
+<p>
+Next: <a href="Default-Print_002dObject-Methods.html" accesskey="n" rel="next">Default Print-Object Methods</a>, Previous: <a href="Overview-of-The-Lisp-Printer.html" accesskey="p" rel="prev">Overview of The Lisp Printer</a>, Up: <a href="The-Lisp-Printer.html" accesskey="u" rel="up">The Lisp Printer</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Printer-Dispatching-1"><span>22.1.2 Printer Dispatching<a class="copiable-link" href="#Printer-Dispatching-1"> &para;</a></span></h4>
+
+<p>The <i class="i">Lisp printer</i> makes its determination of how to print an
+<i class="i">object</i> as follows:
+</p>
+<p>If the <i class="i">value</i> of <b class="b">*print-pretty*</b> is <i class="i">true</i>, 
+printing is controlled by the <i class="i">current pprint dispatch table</i>;
+see <a class="ref" href="Pretty-Print-Dispatch-Tables.html">Pretty Print Dispatch Tables</a>.
+</p>
+<p>Otherwise (if the <i class="i">value</i> of <b class="b">*print-pretty*</b> is <i class="i">false</i>),
+the object&rsquo;s <b class="b">print-object</b> method is used;
+see <a class="ref" href="Default-Print_002dObject-Methods.html">Default Print-Object Methods</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printer-Escaping.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printer Escaping (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printer Escaping (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printer Escaping (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-The-Lisp-Printer.html" rel="up" title="Overview of The Lisp Printer">
+<link href="Multiple-Possible-Textual-Representations.html" rel="prev" title="Multiple Possible Textual Representations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printer-Escaping">
+<div class="nav-panel">
+<p>
+Previous: <a href="Multiple-Possible-Textual-Representations.html" accesskey="p" rel="prev">Multiple Possible Textual Representations</a>, Up: <a href="Overview-of-The-Lisp-Printer.html" accesskey="u" rel="up">Overview of The Lisp Printer</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printer-Escaping-1"><span>22.1.1.2 Printer Escaping<a class="copiable-link" href="#Printer-Escaping-1"> &para;</a></span></h4>
+
+<p>The <i class="i">variable</i> <b class="b">*print-escape*</b> controls whether the <i class="i">Lisp printer</i>
+tries to produce notations such as escape characters and package prefixes.
+</p>
+<p>The <i class="i">variable</i> <b class="b">*print-readably*</b> can be used to override
+many of the individual aspects controlled by the other 
+<i class="i">printer control variables</i> when program-readable output
+is especially important.
+</p>
+<p>One of the many effects of making the <i class="i">value</i> of <b class="b">*print-readably*</b> be <i class="i">true</i>
+is that the <i class="i">Lisp printer</i> behaves as if <b class="b">*print-escape*</b> were also <i class="i">true</i>.
+For notational convenience, we say that 
+if the value of either <b class="b">*print-readably*</b> or <b class="b">*print-escape*</b> is <i class="i">true</i>, 
+then <i class="i">printer escaping</i>
+<a class="index-entry-id" id="index-printer-escaping"></a>
+ is &ldquo;enabled&rdquo;;
+and we say that
+if the values of both <b class="b">*print-readably*</b> and <b class="b">*print-escape*</b> are <i class="i">false</i>, 
+then <i class="i">printer escaping</i> is &ldquo;disabled&rdquo;.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printer.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printer (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printer (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printer (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Reader.html" rel="next" title="Reader">
+<link href="Streams.html" rel="prev" title="Streams">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Printer">
+<div class="nav-panel">
+<p>
+Next: <a href="Reader.html" accesskey="n" rel="next">Reader</a>, Previous: <a href="Streams.html" accesskey="p" rel="prev">Streams</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Printer-1"><span>22 Printer<a class="copiable-link" href="#Printer-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="The-Lisp-Printer.html" accesskey="1">The Lisp Printer</a></li>
+<li><a href="The-Lisp-Pretty-Printer.html" accesskey="2">The Lisp Pretty Printer</a></li>
+<li><a href="Formatted-Output.html" accesskey="3">Formatted Output</a></li>
+<li><a href="Printer-Dictionary.html" accesskey="4">Printer Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Bit-Vectors.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Bit Vectors (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Bit Vectors (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Bit Vectors (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Printing-Other-Vectors.html" rel="next" title="Printing Other Vectors">
+<link href="Printing-Lists-and-Conses.html" rel="prev" title="Printing Lists and Conses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printing-Bit-Vectors">
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Other-Vectors.html" accesskey="n" rel="next">Printing Other Vectors</a>, Previous: <a href="Printing-Lists-and-Conses.html" accesskey="p" rel="prev">Printing Lists and Conses</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printing-Bit-Vectors-1"><span>22.1.3.14 Printing Bit Vectors<a class="copiable-link" href="#Printing-Bit-Vectors-1"> &para;</a></span></h4>
+
+<p>A <i class="i">bit vector</i> is printed as <code class="t">#*</code> followed by the bits of the <i class="i">bit vector</i>
+in order.  If <b class="b">*print-array*</b> is <i class="i">false</i>, then the <i class="i">bit vector</i> is
+printed in a format (using <code class="t">#&lt;</code>) that is concise but not readable.
+Only the <i class="i">active</i> <i class="i">elements</i> of the <i class="i">bit vector</i> are printed.
+</p>
+<p>[Reviewer Note by Barrett: Need to provide for <code class="t">#5*0</code> as an alternate 
+  	  notation for <code class="t">#*00000</code>.]
+</p>
+<p>For information on <i class="i">Lisp reader</i> parsing of <i class="i">bit vectors</i>,
+see <a class="ref" href="Sharpsign-Asterisk.html">Sharpsign Asterisk</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Characters.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Printing-Symbols.html" rel="next" title="Printing Symbols">
+<link href="Note-about-Printing-Numbers.html" rel="prev" title="Note about Printing Numbers">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printing-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Symbols.html" accesskey="n" rel="next">Printing Symbols</a>, Previous: <a href="Note-about-Printing-Numbers.html" accesskey="p" rel="prev">Note about Printing Numbers</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printing-Characters-1"><span>22.1.3.7 Printing Characters<a class="copiable-link" href="#Printing-Characters-1"> &para;</a></span></h4>
+
+<p>When <i class="i">printer escaping</i> is disabled,
+</p>
+<p>a <i class="i">character</i> prints as itself;
+it is sent directly to the output <i class="i">stream</i>.
+</p>
+<p>When <i class="i">printer escaping</i> is enabled,
+</p>
+<p>then <code class="t">#\</code> syntax is used.
+</p>
+<p>When the printer types out the name of a <i class="i">character</i>,
+it uses the same table as the <code class="t">#\</code> <i class="i">reader macro</i> would use;
+therefore any <i class="i">character</i> name that is typed out
+is acceptable as input (in that <i class="i">implementation</i>).
+If a <i class="i">non-graphic</i> <i class="i">character</i> has a <i class="i">standardized</i> <i class="i">name</i>_5,
+that <i class="i">name</i> is preferred over non-standard <i class="i">names</i>
+for printing in <code class="t">#\</code> notation.
+For the <i class="i">graphic</i> <i class="i">standard characters</i>,
+the <i class="i">character</i> itself is always used
+for printing in <code class="t">#\</code> notation&mdash;even if 
+the <i class="i">character</i> also has a <i class="i">name</i>_5.
+</p>
+<p>For details about the <code class="t">#\</code> <i class="i">reader macro</i>, see <a class="ref" href="Sharpsign-Backslash.html">Sharpsign Backslash</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Complexes.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Complexes (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Complexes (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Complexes (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Note-about-Printing-Numbers.html" rel="next" title="Note about Printing Numbers">
+<link href="Printing-Floats.html" rel="prev" title="Printing Floats">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printing-Complexes">
+<div class="nav-panel">
+<p>
+Next: <a href="Note-about-Printing-Numbers.html" accesskey="n" rel="next">Note about Printing Numbers</a>, Previous: <a href="Printing-Floats.html" accesskey="p" rel="prev">Printing Floats</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printing-Complexes-1"><span>22.1.3.5 Printing Complexes<a class="copiable-link" href="#Printing-Complexes-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-complex-1"></a>
+
+<p>A <i class="i">complex</i> is printed as <code class="t">#C</code>, an open parenthesis,
+the printed representation of its real part, a space,
+the printed representation of its imaginary part, and finally
+a close parenthesis.
+</p>
+<p>For related information about the syntax of a <i class="i">complex</i>,
+see <a class="ref" href="Syntax-of-a-Complex.html">Syntax of a Complex</a> and <a class="ref" href="Sharpsign-C.html">Sharpsign C</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Conditions.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Conditions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Conditions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Conditions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Condition-System-Concepts.html" rel="up" title="Condition System Concepts">
+<link href="Signaling-and-Handling-Conditions.html" rel="next" title="Signaling and Handling Conditions">
+<link href="Creating-Conditions.html" rel="prev" title="Creating Conditions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Printing-Conditions">
+<div class="nav-panel">
+<p>
+Next: <a href="Signaling-and-Handling-Conditions.html" accesskey="n" rel="next">Signaling and Handling Conditions</a>, Previous: <a href="Creating-Conditions.html" accesskey="p" rel="prev">Creating Conditions</a>, Up: <a href="Condition-System-Concepts.html" accesskey="u" rel="up">Condition System Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Printing-Conditions-1"><span>9.1.3 Printing Conditions<a class="copiable-link" href="#Printing-Conditions-1"> &para;</a></span></h4>
+
+<p>If the <code class="t">:report</code> argument to <b class="b">define-condition</b> is used,
+a print function is defined that is called whenever 
+the defined <i class="i">condition</i> is printed while the <i class="i">value</i> of <b class="b">*print-escape*</b> is <i class="i">false</i>. 
+This function is called the <i class="i">condition reporter</i>
+<a class="index-entry-id" id="index-condition-reporter"></a>
+;
+the text which it outputs is called a <i class="i">report message</i>
+<a class="index-entry-id" id="index-report-message"></a>
+.
+</p>
+<p>When a <i class="i">condition</i> is printed and <b class="b">*print-escape*</b>
+is <i class="i">false</i>, the <i class="i">condition reporter</i> for the <i class="i">condition</i> is invoked.
+<i class="i">Conditions</i> are printed automatically by functions such as
+<b class="b">invoke-debugger</b>, <b class="b">break</b>, and <b class="b">warn</b>.
+</p>
+<p>When <b class="b">*print-escape*</b> is <i class="i">true</i>, the <i class="i">object</i> should print in an
+abbreviated fashion according to the style of the implementation
+(<i class="i">e.g.</i>, by <b class="b">print-unreadable-object</b>).  It is not required that a
+<i class="i">condition</i> can be recreated by reading its printed representation.
+</p>
+<p>No <i class="i">function</i> is provided for directly <i class="i">accessing</i> 
+or invoking <i class="i">condition reporters</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Recommended-Style-in-Condition-Reporting.html" accesskey="1">Recommended Style in Condition Reporting</a></li>
+<li><a href="Capitalization-and-Punctuation-in-Condition-Reports.html" accesskey="2">Capitalization and Punctuation in Condition Reports</a></li>
+<li><a href="Leading-and-Trailing-Newlines-in-Condition-Reports.html" accesskey="3">Leading and Trailing Newlines in Condition Reports</a></li>
+<li><a href="Embedded-Newlines-in-Condition-Reports.html" accesskey="4">Embedded Newlines in Condition Reports</a></li>
+<li><a href="Note-about-Tabs-in-Condition-Reports.html" accesskey="5">Note about Tabs in Condition Reports</a></li>
+<li><a href="Mentioning-Containing-Function-in-Condition-Reports.html" accesskey="6">Mentioning Containing Function in Condition Reports</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Floats.html
@@ -0,0 +1,85 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Floats (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Floats (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Floats (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Printing-Complexes.html" rel="next" title="Printing Complexes">
+<link href="Printing-Ratios.html" rel="prev" title="Printing Ratios">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printing-Floats">
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Complexes.html" accesskey="n" rel="next">Printing Complexes</a>, Previous: <a href="Printing-Ratios.html" accesskey="p" rel="prev">Printing Ratios</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printing-Floats-1"><span>22.1.3.4 Printing Floats<a class="copiable-link" href="#Printing-Floats-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-float-1"></a>
+
+<p>If the magnitude of the <i class="i">float</i> is either zero or between 10^<span class="r">-3</span> (inclusive)
+and 10^7 (exclusive), it is printed as the integer part of the number,
+then a decimal point,
+followed by the fractional part of the number;
+there is always at least one
+digit on each side of the decimal point.    
+If the sign of the number
+(as determined by <b class="b">float-sign</b>)
+is negative, then a minus sign is printed before the number.
+If the format of the number
+does not match that specified by
+<b class="b">*read-default-float-format*</b>, then the <i class="i">exponent marker</i> for
+that format and the digit <code class="t">0</code> are also printed.
+For example, the base of the natural logarithms as a <i class="i">short float</i>
+might be printed as <code class="t">2.71828S0</code>.
+</p>
+<p>For non-zero magnitudes outside of the range 10^<span class="r">-3</span> to 10^7,
+a <i class="i">float</i> is printed in computerized scientific notation.
+The representation of the number is scaled to be between
+1 (inclusive) and 10 (exclusive) and then printed, with one digit
+before the decimal point and at least one digit after the decimal point.
+Next the <i class="i">exponent marker</i> for the format is printed,
+except that
+if the format of the number matches that specified by 
+<b class="b">*read-default-float-format*</b>, then the <i class="i">exponent marker</i> <code class="t">E</code>
+is used.
+Finally, the power of ten by which the fraction must be multiplied
+to equal the original number is printed as a decimal integer.
+For example, Avogadro&rsquo;s number as a <i class="i">short float</i> 
+is printed as <code class="t">6.02S23</code>.
+</p>
+<p>For related information about the syntax of a <i class="i">float</i>,
+see <a class="ref" href="Syntax-of-a-Float.html">Syntax of a Float</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Complexes.html">Printing Complexes</a>, Previous: <a href="Printing-Ratios.html">Printing Ratios</a>, Up: <a href="Default-Print_002dObject-Methods.html">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Integers.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Integers (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Integers (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Integers (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Printing-Ratios.html" rel="next" title="Printing Ratios">
+<link href="Printing-Numbers.html" rel="prev" title="Printing Numbers">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printing-Integers">
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Ratios.html" accesskey="n" rel="next">Printing Ratios</a>, Previous: <a href="Printing-Numbers.html" accesskey="p" rel="prev">Printing Numbers</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printing-Integers-1"><span>22.1.3.2 Printing Integers<a class="copiable-link" href="#Printing-Integers-1"> &para;</a></span></h4>
+
+<p><i class="i">Integers</i> are printed in the radix specified by the <i class="i">current output base</i>
+in positional notation, most significant digit first.
+If appropriate, a radix specifier can be printed; see <b class="b">*print-radix*</b>.
+If an <i class="i">integer</i> is negative, a minus sign is printed and then the
+absolute value of the <i class="i">integer</i> is printed.
+The <i class="i">integer</i> zero is represented
+by the single digit <code class="t">0</code> and never has a sign.
+A decimal point might be printed, 
+depending on the <i class="i">value</i> of <b class="b">*print-radix*</b>.
+</p>
+<p>For related information about the syntax of an <i class="i">integer</i>,
+see <a class="ref" href="Syntax-of-an-Integer.html">Syntax of an Integer</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Lists-and-Conses.html
@@ -0,0 +1,136 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Lists and Conses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Lists and Conses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Lists and Conses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Printing-Bit-Vectors.html" rel="next" title="Printing Bit Vectors">
+<link href="Printing-Strings.html" rel="prev" title="Printing Strings">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printing-Lists-and-Conses">
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Bit-Vectors.html" accesskey="n" rel="next">Printing Bit Vectors</a>, Previous: <a href="Printing-Strings.html" accesskey="p" rel="prev">Printing Strings</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printing-Lists-and-Conses-1"><span>22.1.3.13 Printing Lists and Conses<a class="copiable-link" href="#Printing-Lists-and-Conses-1"> &para;</a></span></h4>
+
+<p>Wherever possible, list notation is preferred over dot notation.  
+Therefore the following algorithm is used to print a <i class="i">cons</i> x:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>A <i class="i">left-parenthesis</i> is printed.
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p>The <i class="i">car</i> of x is printed. 
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>If the <i class="i">cdr</i> of x is itself a <i class="i">cons</i>,
+          it is made to be the current <i class="i">cons</i> 
+	  (<i class="i">i.e.</i>, x becomes that <i class="i">cons</i>), 
+</p>
+<p>a <i class="i">space</i>
+</p>
+<p>is printed,
+          and step 2 is re-entered.
+</p>
+</dd>
+<dt>4.</dt>
+<dd><p>If the <i class="i">cdr</i> of x is not <i class="i">null</i>, 
+</p>
+<p>a <i class="i">space</i>,
+</p>
+<p>a <i class="i">dot</i>,
+</p>
+<p>a <i class="i">space</i>,
+</p>
+<p>and the <i class="i">cdr</i> of x are printed.
+</p>
+</dd>
+<dt>5.</dt>
+<dd><p>A <i class="i">right-parenthesis</i> is printed.
+</p></dd>
+</dl>
+
+<p>Actually, the above algorithm is only used when <b class="b">*print-pretty*</b>
+is <i class="i">false</i>.  When <b class="b">*print-pretty*</b> is <i class="i">true</i> (or 
+when <b class="b">pprint</b> is used),
+additional <i class="i">whitespace</i>_1 
+may replace the use of a single <i class="i">space</i>,
+and a more elaborate algorithm with similar goals but more presentational 
+flexibility is used; see <a class="ref" href="Printer-Dispatching.html">Printer Dispatching</a>.
+</p>
+<p>Although the two expressions below are equivalent,
+and the reader accepts
+either one and 
+produces
+the same <i class="i">cons</i>, the printer
+always prints such a <i class="i">cons</i> in the second form.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (a . (b . ((c . (d . nil)) . (e . nil))))
+ (a b (c d) e)
+</pre></div>
+
+<p>The printing of <i class="i">conses</i> is affected by <b class="b">*print-level*</b>,
+<b class="b">*print-length*</b>, and <b class="b">*print-circle*</b>.
+</p>
+<p>Following are examples of printed representations of <i class="i">lists</i>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (a . b)     ;A dotted pair of a and b
+ (a.b)       ;A list of one element, the symbol named a.b
+ (a. b)      ;A list of two elements a. and b
+ (a .b)      ;A list of two elements a and .b
+ (a b . c)   ;A dotted list of a and b with c at the end; two conses
+ .iot        ;The symbol whose name is .iot
+ (. b)       ;Invalid -- an error is signaled if an attempt is made to read 
+             ;this syntax.
+ (a .)       ;Invalid -- an error is signaled.
+ (a .. b)    ;Invalid -- an error is signaled.
+ (a . . b)   ;Invalid -- an error is signaled.
+ (a b c ...) ;Invalid -- an error is signaled.
+ (a \. b)    ;A list of three elements a, ., and b
+ (a |.| b)   ;A list of three elements a, ., and b
+ (a \... b)  ;A list of three elements a, ..., and b
+ (a |...| b) ;A list of three elements a, ..., and b
+</pre></div>
+
+<p>For information on how the <i class="i">Lisp reader</i> parses <i class="i">lists</i> and <i class="i">conses</i>,
+see <a class="ref" href="Left_002dParenthesis.html">Left-Parenthesis</a>. 
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Bit-Vectors.html">Printing Bit Vectors</a>, Previous: <a href="Printing-Strings.html">Printing Strings</a>, Up: <a href="Default-Print_002dObject-Methods.html">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Numbers.html
@@ -0,0 +1,43 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Numbers (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Numbers (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Numbers (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Printing-Integers.html" rel="next" title="Printing Integers">
+<link href="Default-Print_002dObject-Methods.html" rel="prev" title="Default Print-Object Methods">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printing-Numbers">
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Integers.html" accesskey="n" rel="next">Printing Integers</a>, Previous: <a href="Default-Print_002dObject-Methods.html" accesskey="p" rel="prev">Default Print-Object Methods</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printing-Numbers-1"><span>22.1.3.1 Printing Numbers<a class="copiable-link" href="#Printing-Numbers-1"> &para;</a></span></h4>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Other-Arrays.html
@@ -0,0 +1,110 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Other Arrays (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Other Arrays (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Other Arrays (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Examples-of-Printing-Arrays.html" rel="next" title="Examples of Printing Arrays">
+<link href="Printing-Other-Vectors.html" rel="prev" title="Printing Other Vectors">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printing-Other-Arrays">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Printing-Arrays.html" accesskey="n" rel="next">Examples of Printing Arrays</a>, Previous: <a href="Printing-Other-Vectors.html" accesskey="p" rel="prev">Printing Other Vectors</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printing-Other-Arrays-1"><span>22.1.3.16 Printing Other Arrays<a class="copiable-link" href="#Printing-Other-Arrays-1"> &para;</a></span></h4>
+
+<p>If  <b class="b">*print-array*</b> is <i class="i">true</i> 
+and <b class="b">*print-readably*</b> is <i class="i">false</i>,
+any
+</p>
+<p><i class="i">array</i> other than a <i class="i">vector</i> is printed
+using <code class="t">#</code><code class="t">n</code><code class="t">A</code> format.
+Let <code class="t">n</code> be the <i class="i">rank</i> of the <i class="i">array</i>.
+Then <code class="t">#</code> is printed, then <code class="t">n</code> as a decimal integer,
+then <code class="t">A</code>, then <code class="t">n</code> open parentheses.  
+Next the <i class="i">elements</i> are scanned in row-major order,
+using <b class="b">write</b> on each <i class="i">element</i>, 
+and separating <i class="i">elements</i> from each other with <i class="i">whitespace</i>_1.
+The array&rsquo;s dimensions are numbered 0 to <code class="t">n</code>-1 from left to right,
+and are enumerated with the rightmost index changing fastest.
+Every time the index for dimension <code class="t">j</code> is incremented,
+the following actions are taken:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>If <code class="t">j</code> &lt; <code class="t">n</code>-1, then a close parenthesis is printed.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If incrementing the index for dimension <code class="t">j</code> caused it to equal
+dimension <code class="t">j</code>, that index is reset to zero and the
+index for dimension <code class="t">j</code>-1 is incremented (thereby performing these three steps recursively),
+unless <code class="t">j</code>=0, in which case the entire algorithm is terminated.
+If incrementing the index for dimension <code class="t">j</code> did not cause it to
+equal dimension <code class="t">j</code>, then a space is printed.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If <code class="t">j</code> &lt; <code class="t">n</code>-1, then an open parenthesis is printed.
+</p></dd>
+</dl>
+
+<p>This causes the contents to be printed in a format suitable for
+<code class="t">:initial-contents</code> to <b class="b">make-array</b>.
+The lists effectively printed by this procedure are subject to
+truncation by <b class="b">*print-level*</b> and <b class="b">*print-length*</b>.
+</p>
+<p>If the <i class="i">array</i> 
+is of a specialized <i class="i">type</i>, containing bits or characters,
+then the innermost lists generated by the algorithm given above can instead
+be printed using bit-vector or string syntax, provided that these innermost
+lists would not be subject to truncation by <b class="b">*print-length*</b>.  
+</p>
+<p>If both <b class="b">*print-array*</b> and <b class="b">*print-readably*</b> are <i class="i">false</i>,
+</p>
+<p>then the <i class="i">array</i> is printed
+in a format (using <code class="t">#&lt;</code>) that is concise but not readable.
+</p>
+<p>If <b class="b">*print-readably*</b> is <i class="i">true</i>,
+the <i class="i">array</i> prints in an <i class="i">implementation-defined</i> manner; 
+see the <i class="i">variable</i> <b class="b">*print-readably*</b>.
+</p>
+<p>In particular,
+this may be important for arrays having some dimension <code class="t">0</code>.
+</p>
+<p>For information on how the <i class="i">Lisp reader</i> parses these &ldquo;other <i class="i">arrays</i>,&rdquo;
+see <a class="ref" href="Sharpsign-A.html">Sharpsign A</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Printing-Arrays.html">Examples of Printing Arrays</a>, Previous: <a href="Printing-Other-Vectors.html">Printing Other Vectors</a>, Up: <a href="Default-Print_002dObject-Methods.html">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Other-Objects.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Other Objects (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Other Objects (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Other Objects (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Printing-Structures.html" rel="prev" title="Printing Structures">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printing-Other-Objects">
+<div class="nav-panel">
+<p>
+Previous: <a href="Printing-Structures.html" accesskey="p" rel="prev">Printing Structures</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printing-Other-Objects-1"><span>22.1.3.21 Printing Other Objects<a class="copiable-link" href="#Printing-Other-Objects-1"> &para;</a></span></h4>
+
+<p>Other <i class="i">objects</i> are printed in an <i class="i">implementation-dependent</i> manner.
+It is not required that an <i class="i">implementation</i> print those <i class="i">objects</i>
+<i class="i">readably</i>.
+</p>
+<p>For example, <i class="i">hash tables</i>, 
+	     <i class="i">readtables</i>,
+             <i class="i">packages</i>,
+             <i class="i">streams</i>,
+         and <i class="i">functions</i>
+might not print <i class="i">readably</i>.
+</p>
+<p>A common notation to use in this circumstance is <code class="t">#&lt;...&gt;</code>.
+Since <code class="t">#&lt;</code> is not readable by the <i class="i">Lisp reader</i>,
+the precise format of the text which follows is not important,
+but a common format to use is that provided by the <b class="b">print-unreadable-object</b> <i class="i">macro</i>.
+</p>
+<p>For information on how the <i class="i">Lisp reader</i> treats this notation,
+see <a class="ref" href="Sharpsign-Less_002dThan_002dSign.html">Sharpsign Less-Than-Sign</a>.
+For information on how to notate <i class="i">objects</i> that cannot be printed <i class="i">readably</i>,
+see <a class="ref" href="Sharpsign-Dot.html">Sharpsign Dot</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Other-Vectors.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Other Vectors (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Other Vectors (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Other Vectors (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Printing-Other-Arrays.html" rel="next" title="Printing Other Arrays">
+<link href="Printing-Bit-Vectors.html" rel="prev" title="Printing Bit Vectors">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printing-Other-Vectors">
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Other-Arrays.html" accesskey="n" rel="next">Printing Other Arrays</a>, Previous: <a href="Printing-Bit-Vectors.html" accesskey="p" rel="prev">Printing Bit Vectors</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printing-Other-Vectors-1"><span>22.1.3.15 Printing Other Vectors<a class="copiable-link" href="#Printing-Other-Vectors-1"> &para;</a></span></h4>
+
+<p>If <b class="b">*print-array*</b> is <i class="i">true</i> 
+and <b class="b">*print-readably*</b> is <i class="i">false</i>,
+any
+</p>
+<p><i class="i">vector</i> 
+other than a <i class="i">string</i> or <i class="i">bit vector</i> is printed using
+general-vector syntax; this means that information
+about specialized vector representations does not appear.
+The printed representation of a zero-length <i class="i">vector</i> is <code class="t">#()</code>.
+The printed representation of a non-zero-length <i class="i">vector</i> begins with <code class="t">#(</code>.
+Following that, the first element of the <i class="i">vector</i> is printed.  
+</p>
+<p>If there are any other elements, they are printed in turn, with 
+each such additional element preceded by
+a <i class="i">space</i> if <b class="b">*print-pretty*</b> is <i class="i">false</i>,
+or <i class="i">whitespace</i>_1 if <b class="b">*print-pretty*</b> is <i class="i">true</i>.
+</p>
+<p>A <i class="i">right-parenthesis</i> after the last element
+terminates the printed representation of the <i class="i">vector</i>. 
+The printing of <i class="i">vectors</i> 
+is affected by <b class="b">*print-level*</b> and <b class="b">*print-length*</b>.
+If the <i class="i">vector</i> has a <i class="i">fill pointer</i>, 
+then only those elements below
+the <i class="i">fill pointer</i> are printed.
+</p>
+<p>If both <b class="b">*print-array*</b> and <b class="b">*print-readably*</b> are <i class="i">false</i>,
+</p>
+<p>the <i class="i">vector</i> is not printed as described above,
+but in a format (using <code class="t">#&lt;</code>) that is concise but not readable.
+</p>
+<p>If <b class="b">*print-readably*</b> is <i class="i">true</i>,
+the <i class="i">vector</i> prints in an <i class="i">implementation-defined</i> manner;
+see the <i class="i">variable</i> <b class="b">*print-readably*</b>.
+</p>
+<p>For information on how the <i class="i">Lisp reader</i> parses these &ldquo;other <i class="i">vectors</i>,&rdquo;
+see <a class="ref" href="Sharpsign-Left_002dParenthesis.html">Sharpsign Left-Parenthesis</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Pathnames.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Pathnames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Printing-Structures.html" rel="next" title="Printing Structures">
+<link href="Printing-Random-States.html" rel="prev" title="Printing Random States">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printing-Pathnames">
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Structures.html" accesskey="n" rel="next">Printing Structures</a>, Previous: <a href="Printing-Random-States.html" accesskey="p" rel="prev">Printing Random States</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printing-Pathnames-1"><span>22.1.3.19 Printing Pathnames<a class="copiable-link" href="#Printing-Pathnames-1"> &para;</a></span></h4>
+
+<p>When <i class="i">printer escaping</i> is enabled,
+</p>
+<p>the syntax <code class="t">#P&quot;...&quot;</code> is how a
+<i class="i">pathname</i> is printed by <b class="b">write</b> and the other functions herein described.
+The <code class="t">&quot;...&quot;</code> is the namestring representation of the pathname.
+</p>
+<p>When <i class="i">printer escaping</i> is disabled,
+</p>
+<p><b class="b">write</b> writes a <i class="i">pathname</i> <i class="i">P</i>
+by writing <code class="t">(namestring <i class="i">P</i>)</code> instead.
+</p>
+<p>For information on how the <i class="i">Lisp reader</i> parses <i class="i">pathnames</i>,
+see <a class="ref" href="Sharpsign-P.html">Sharpsign P</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Random-States.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Random States (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Random States (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Random States (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Printing-Pathnames.html" rel="next" title="Printing Pathnames">
+<link href="Examples-of-Printing-Arrays.html" rel="prev" title="Examples of Printing Arrays">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printing-Random-States">
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Pathnames.html" accesskey="n" rel="next">Printing Pathnames</a>, Previous: <a href="Examples-of-Printing-Arrays.html" accesskey="p" rel="prev">Examples of Printing Arrays</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printing-Random-States-1"><span>22.1.3.18 Printing Random States<a class="copiable-link" href="#Printing-Random-States-1"> &para;</a></span></h4>
+
+<p>A specific syntax for printing <i class="i">objects</i> of <i class="i">type</i> <b class="b">random-state</b> is
+not specified. However, every <i class="i">implementation</i>
+must arrange to print a <i class="i">random state</i> <i class="i">object</i> in such a way that,
+within the same implementation, <b class="b">read</b>
+can construct from the printed representation a copy of the 
+<i class="i">random state</i>
+object as if the copy had been made by <b class="b">make-random-state</b>.
+</p>
+<p>If the type <i class="i">random state</i> is effectively implemented 
+by using the machinery for <b class="b">defstruct</b>,
+the usual structure syntax can then be used for printing 
+<i class="i">random state</i>
+objects; one might look something like
+</p>
+<div class="example">
+<pre class="example-preformatted"> #S(RANDOM-STATE :DATA #(14 49 98436589 786345 8734658324 ... ))
+</pre></div>
+
+<p>where the components are <i class="i">implementation-dependent</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Ratios.html
@@ -0,0 +1,59 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Ratios (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Ratios (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Ratios (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Printing-Floats.html" rel="next" title="Printing Floats">
+<link href="Printing-Integers.html" rel="prev" title="Printing Integers">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printing-Ratios">
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Floats.html" accesskey="n" rel="next">Printing Floats</a>, Previous: <a href="Printing-Integers.html" accesskey="p" rel="prev">Printing Integers</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printing-Ratios-1"><span>22.1.3.3 Printing Ratios<a class="copiable-link" href="#Printing-Ratios-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-ratio-1"></a>
+
+<p><i class="i">Ratios</i> are printed as follows:
+the absolute value of the numerator is printed, as for an <i class="i">integer</i>;
+then a <code class="t">/</code>; then the denominator.  The numerator and denominator are
+both printed in the radix specified by the <i class="i">current output base</i>; 
+they are obtained as if by
+<b class="b">numerator</b> and <b class="b">denominator</b>, and so <i class="i">ratios</i>
+are printed in reduced form (lowest terms).
+If appropriate, a radix specifier can be printed; see 
+<b class="b">*print-radix*</b>.
+If the ratio is negative, a minus sign is printed before the numerator.
+</p>
+<p>For related information about the syntax of a <i class="i">ratio</i>,
+see <a class="ref" href="Syntax-of-a-Ratio.html">Syntax of a Ratio</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Strings.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Strings (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Strings (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Strings (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Printing-Lists-and-Conses.html" rel="next" title="Printing Lists and Conses">
+<link href="Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Printer.html" rel="prev" title="Examples of Effect of Readtable Case on the Lisp Printer">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printing-Strings">
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Lists-and-Conses.html" accesskey="n" rel="next">Printing Lists and Conses</a>, Previous: <a href="Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Printer.html" accesskey="p" rel="prev">Examples of Effect of Readtable Case on the Lisp Printer</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printing-Strings-1"><span>22.1.3.12 Printing Strings<a class="copiable-link" href="#Printing-Strings-1"> &para;</a></span></h4>
+
+<p>The characters of the <i class="i">string</i> are output in order.
+</p>
+<p>If <i class="i">printer escaping</i> is enabled,
+</p>
+<p>a <i class="i">double-quote</i> is output before and after, and all
+<i class="i">double-quotes</i> and <i class="i">single escapes</i> are preceded by <i class="i">backslash</i>.
+The printing of <i class="i">strings</i> is not affected by <b class="b">*print-array*</b>.
+Only the <i class="i">active</i> <i class="i">elements</i> of the <i class="i">string</i> are printed.
+</p>
+<p>For information on how the <i class="i">Lisp reader</i> parses <i class="i">strings</i>,
+see <a class="ref" href="Double_002dQuote.html">Double-Quote</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Structures.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Structures (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Structures (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Structures (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Printing-Other-Objects.html" rel="next" title="Printing Other Objects">
+<link href="Printing-Pathnames.html" rel="prev" title="Printing Pathnames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printing-Structures">
+<div class="nav-panel">
+<p>
+Next: <a href="Printing-Other-Objects.html" accesskey="n" rel="next">Printing Other Objects</a>, Previous: <a href="Printing-Pathnames.html" accesskey="p" rel="prev">Printing Pathnames</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printing-Structures-1"><span>22.1.3.20 Printing Structures<a class="copiable-link" href="#Printing-Structures-1"> &para;</a></span></h4>
+
+<p>By default, a <i class="i">structure</i> of type S is printed using <code class="t">#S</code> syntax.
+This behavior can be customized by specifying a <code class="t">:print-function</code> 
+or <code class="t">:print-object</code> option to the <b class="b">defstruct</b> <i class="i">form</i> that defines S,
+or by writing a <b class="b">print-object</b> <i class="i">method</i> 
+that is <i class="i">specialized</i> for <i class="i">objects</i> of type S.
+</p>
+<p>Different structures might print out in different ways;
+the default notation for structures is:
+</p>
+<div class="example">
+<pre class="example-preformatted"> #S(<i class="i">structure-name</i> {<i class="i">slot-key</i> <i class="i">slot-value</i>}*)
+</pre></div>
+
+<p>where <code class="t">#S</code> indicates structure syntax,
+<i class="i">structure-name</i> is a <i class="i">structure name</i>,
+each <i class="i">slot-key</i> is an initialization argument <i class="i">name</i>
+for a <i class="i">slot</i> in the <i class="i">structure</i>,
+and each corresponding <i class="i">slot-value</i> is a representation
+of the <i class="i">object</i> in that <i class="i">slot</i>.
+</p>
+<p>For information on how the <i class="i">Lisp reader</i> parses <i class="i">structures</i>,
+see <a class="ref" href="Sharpsign-S.html">Sharpsign S</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Printing-Symbols.html
@@ -0,0 +1,86 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Printing Symbols (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Printing Symbols (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Printing Symbols (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Default-Print_002dObject-Methods.html" rel="up" title="Default Print-Object Methods">
+<link href="Package-Prefixes-for-Symbols.html" rel="next" title="Package Prefixes for Symbols">
+<link href="Printing-Characters.html" rel="prev" title="Printing Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Printing-Symbols">
+<div class="nav-panel">
+<p>
+Next: <a href="Package-Prefixes-for-Symbols.html" accesskey="n" rel="next">Package Prefixes for Symbols</a>, Previous: <a href="Printing-Characters.html" accesskey="p" rel="prev">Printing Characters</a>, Up: <a href="Default-Print_002dObject-Methods.html" accesskey="u" rel="up">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Printing-Symbols-1"><span>22.1.3.8 Printing Symbols<a class="copiable-link" href="#Printing-Symbols-1"> &para;</a></span></h4>
+
+<p>When <i class="i">printer escaping</i> is disabled,
+</p>
+<p>only the characters of the <i class="i">symbol</i>&rsquo;s <i class="i">name</i> are output 
+</p>
+<p>(but the case in which to print characters in the <i class="i">name</i> is
+controlled by <b class="b">*print-case*</b>;
+see <a class="ref" href="Effect-of-Readtable-Case-on-the-Lisp-Printer.html">Effect of Readtable Case on the Lisp Printer</a>).
+</p>
+<p>The remainder of this section applies only 
+</p>
+<p>when <i class="i">printer escaping</i> is enabled.
+</p>
+<p>When printing a <i class="i">symbol</i>, the printer inserts enough 
+<i class="i">single escape</i> and/or <i class="i">multiple escape</i>
+characters (<i class="i">backslashes</i> and/or <i class="i">vertical-bars</i>) so that if
+<b class="b">read</b> were called with the same <b class="b">*readtable*</b> and
+with <b class="b">*read-base*</b> bound to the <i class="i">current output base</i>, it
+would return the same <i class="i">symbol</i> (if it is not 
+<i class="i">apparently uninterned</i>) or an <i class="i">uninterned</i> <i class="i">symbol</i>
+with the same <i class="i">print name</i> (otherwise).
+</p>
+<p>For example, if the <i class="i">value</i> of <b class="b">*print-base*</b> were <code class="t">16</code> 
+when printing the symbol <code class="t">face</code>, it would have to be printed as
+<code class="t">\FACE</code> or <code class="t">\Face</code> or <code class="t">|FACE|</code>, 
+because the token <code class="t">face</code> would be read as a hexadecimal
+number (decimal value 64206) if the <i class="i">value</i> of <b class="b">*read-base*</b> were <code class="t">16</code>.
+</p>
+<p>For additional restrictions concerning characters with  nonstandard
+<i class="i">syntax types</i> in the <i class="i">current readtable</i>, see the <i class="i">variable</i> <b class="b">*print-readably*</b> 
+</p>
+<p>For information about how the <i class="i">Lisp reader</i> parses <i class="i">symbols</i>,
+see <a class="ref" href="Symbols-as-Tokens.html">Symbols as Tokens</a> and <a class="ref" href="Sharpsign-Colon.html">Sharpsign Colon</a>.
+</p>
+<p><b class="b">nil</b> might be printed as <code class="t">()</code> 
+</p>
+<p>when <b class="b">*print-pretty*</b> is <i class="i">true</i>
+and <i class="i">printer escaping</i> is enabled.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Package-Prefixes-for-Symbols.html">Package Prefixes for Symbols</a>, Previous: <a href="Printing-Characters.html">Printing Characters</a>, Up: <a href="Default-Print_002dObject-Methods.html">Default Print-Object Methods</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Processing-of-Defining-Macros.html
@@ -0,0 +1,105 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Processing of Defining Macros (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Processing of Defining Macros (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Processing of Defining Macros (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="File-Compilation.html" rel="up" title="File Compilation">
+<link href="Constraints-on-Macros-and-Compiler-Macros.html" rel="next" title="Constraints on Macros and Compiler Macros">
+<link href="Processing-of-Top-Level-Forms.html" rel="prev" title="Processing of Top Level Forms">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Processing-of-Defining-Macros">
+<div class="nav-panel">
+<p>
+Next: <a href="Constraints-on-Macros-and-Compiler-Macros.html" accesskey="n" rel="next">Constraints on Macros and Compiler Macros</a>, Previous: <a href="Processing-of-Top-Level-Forms.html" accesskey="p" rel="prev">Processing of Top Level Forms</a>, Up: <a href="File-Compilation.html" accesskey="u" rel="up">File Compilation</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Processing-of-Defining-Macros-1"><span>3.2.3.2 Processing of Defining Macros<a class="copiable-link" href="#Processing-of-Defining-Macros-1"> &para;</a></span></h4>
+
+<p>Defining <i class="i">macros</i> (such as <b class="b">defmacro</b> or <b class="b">defvar</b>)
+appearing within a file being processed by <b class="b">compile-file</b>
+normally have compile-time side effects which affect how subsequent <i class="i">forms</i>
+in the same <i class="i">file</i> are compiled.  A convenient model for explaining how these
+side effects happen is that the defining macro expands into one or
+more <b class="b">eval-when</b> <i class="i">forms</i>, and that the calls which cause the compile-time
+side effects to happen appear 
+in the body of an <code class="t">(eval-when (:compile-toplevel) ...)</code> <i class="i">form</i>.
+</p>
+<p>The compile-time side effects may cause information about the definition to
+be stored differently than if the defining macro had been processed in the
+&lsquo;normal&rsquo; way (either interpretively or by loading the compiled file).
+</p>
+<p>In particular, the information stored by the defining <i class="i">macros</i> at compile time
+might or might not be available to the interpreter (either during or after compilation),
+or during subsequent calls to the <i class="i">compiler</i>.  For example,
+the following code is nonportable because it assumes that the <i class="i">compiler</i>
+stores the macro definition of <code class="t">foo</code> where it is available to the interpreter:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmacro foo (x) `(car ,x))
+ (eval-when (:execute :compile-toplevel :load-toplevel)
+   (print (foo '(a b c))))
+</pre></div>
+
+<p>A portable way to do the same thing would be to include the macro
+definition inside the <b class="b">eval-when</b> <i class="i">form</i>, as in:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (eval-when (:execute :compile-toplevel :load-toplevel)
+   (defmacro foo (x) `(car ,x))
+   (print (foo '(a b c))))
+</pre></div>
+
+<p>Figure 3&ndash;8 lists macros that make definitions
+available both in the compilation and run-time <i class="i">environments</i>.
+It is not specified whether definitions made available in the
+<i class="i">compilation environment</i> are available in the evaluation
+<i class="i">environment</i>, nor is it specified whether they are available
+in subsequent compilation units or subsequent invocations of the
+compiler.  As with <b class="b">eval-when</b>, these compile-time side
+effects happen only when the defining macros appear at 
+top level.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  declaim                define-modify-macro   defsetf    <!-- /@w -->
+  defclass               define-setf-expander  defstruct  <!-- /@w -->
+  defconstant            defmacro              deftype    <!-- /@w -->
+  define-compiler-macro  defpackage            defvar     <!-- /@w -->
+  define-condition       defparameter                     <!-- /@w -->
+
+  Figure 3&ndash;8: Defining Macros That Affect the Compile-Time Environment<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Constraints-on-Macros-and-Compiler-Macros.html">Constraints on Macros and Compiler Macros</a>, Previous: <a href="Processing-of-Top-Level-Forms.html">Processing of Top Level Forms</a>, Up: <a href="File-Compilation.html">File Compilation</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Processing-of-Top-Level-Forms.html
@@ -0,0 +1,167 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Processing of Top Level Forms (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Processing of Top Level Forms (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Processing of Top Level Forms (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="File-Compilation.html" rel="up" title="File Compilation">
+<link href="Processing-of-Defining-Macros.html" rel="next" title="Processing of Defining Macros">
+<link href="File-Compilation.html" rel="prev" title="File Compilation">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Processing-of-Top-Level-Forms">
+<div class="nav-panel">
+<p>
+Next: <a href="Processing-of-Defining-Macros.html" accesskey="n" rel="next">Processing of Defining Macros</a>, Previous: <a href="File-Compilation.html" accesskey="p" rel="prev">File Compilation</a>, Up: <a href="File-Compilation.html" accesskey="u" rel="up">File Compilation</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Processing-of-Top-Level-Forms-1"><span>3.2.3.1 Processing of Top Level Forms<a class="copiable-link" href="#Processing-of-Top-Level-Forms-1"> &para;</a></span></h4>
+
+<p>Processing of <i class="i">top level forms</i> in the file compiler is defined
+as follows:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>If the <i class="i">form</i> is a <i class="i">compiler macro form</i>
+(not disabled by a <b class="b">notinline</b> <i class="i">declaration</i>),
+the <i class="i">implementation</i> might or might not choose to compute
+the <i class="i">compiler macro expansion</i> of the <i class="i">form</i> and,
+having performed the expansion, might or might not choose to process the result
+as a <i class="i">top level form</i> in the same processing mode
+(compile-time-too or not-compile-time).
+If it declines to obtain or use the expansion, it must process the original <i class="i">form</i>.
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p>If the form is a <i class="i">macro form</i>,
+its <i class="i">macro expansion</i> is computed and processed as a 
+<i class="i">top level form</i> in
+the same processing mode (compile-time-too or not-compile-time).
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>If the form is a <b class="b">progn</b> form, each of its
+body <i class="i">forms</i> is sequentially processed as a 
+<i class="i">top level form</i> in the same processing mode.
+</p>
+</dd>
+<dt>4.</dt>
+<dd><p>If the form is a <b class="b">locally</b>, 
+<b class="b">macrolet</b>, or <b class="b">symbol-macrolet</b>, 
+<b class="b">compile-file</b> establishes the appropriate bindings and processes the
+body forms as <i class="i">top level forms</i> with those bindings in effect
+in the same processing mode.  (Note that this implies that the lexical
+<i class="i">environment</i> in which <i class="i">top level forms</i> are processed
+is not necessarily the <i class="i">null lexical environment</i>.)
+</p>
+</dd>
+<dt>5.</dt>
+<dd><p>If the form is an <b class="b">eval-when</b>
+<a class="index-entry-id" id="index-eval_002dwhen"></a>
+ form, it is
+handled according to Figure 3&ndash;7.
+</p>
+<p>plus .5 fil
+\offinterlineskip
+</p><div class="format">
+<div class="group"><pre class="format-preformatted">  <b class="b">CT</b>   <b class="b">LT</b>   <b class="b">E</b>    <b class="b">Mode</b>  <b class="b">Action</b>    <b class="b">New Mode</b>          <!-- /@w -->
+  _________________________________________________<!-- /@w -->
+  Yes  Yes  &mdash;  &mdash;   Process   compile-time-too  <!-- /@w -->
+  No   Yes  Yes   CTT  Process   compile-time-too  <!-- /@w -->
+  No   Yes  Yes   NCT  Process   not-compile-time  <!-- /@w -->
+  No   Yes  No   &mdash;   Process   not-compile-time  <!-- /@w -->
+  Yes  No   &mdash;  &mdash;   Evaluate  &mdash;               <!-- /@w -->
+  No   No   Yes   CTT  Evaluate  &mdash;               <!-- /@w -->
+  No   No   Yes   NCT  Discard   &mdash;               <!-- /@w -->
+  No   No   No   &mdash;   Discard   &mdash;               <!-- /@w -->
+</pre></div></div>
+
+<p>&nbsp;Figure&nbsp;3&ndash;7:&nbsp;EVAL-WHEN&nbsp;processing<!-- /@w -->
+</p>
+<p>Column <b class="b">CT</b>   indicates whether <code class="t">:compile-toplevel</code> is specified.
+Column <b class="b">LT</b>   indicates whether <code class="t">:load-toplevel</code> is specified.
+Column <b class="b">E</b>    indicates whether <code class="t">:execute</code> is specified.  
+Column <b class="b">Mode</b> indicates the processing mode; 
+		a dash (&mdash;) indicates that the processing mode is not relevant.
+</p>
+<p>The <b class="b">Action</b> column specifies one of three actions:
+</p>
+<dl class="table">
+<dt><code class="t"></code></dt>
+<dd><p><b class="b">Process:</b> process the body as <i class="i">top level forms</i> in the
+specified mode.
+</p>
+</dd>
+<dt><code class="t"></code></dt>
+<dd><p><b class="b">Evaluate:</b> evaluate the body in the dynamic execution
+context of the compiler, using the <i class="i">evaluation environment</i> as
+the global environment and the <i class="i">lexical environment</i> in which
+the <b class="b">eval-when</b> appears.
+</p>
+</dd>
+<dt><code class="t"></code></dt>
+<dd><p><b class="b">Discard:</b> ignore the <i class="i">form</i>.
+</p></dd>
+</dl>
+
+<p>The <b class="b">New Mode</b> column indicates the new processing mode. 
+A dash (&mdash;) indicates the compiler remains in its current mode.
+</p>
+</dd>
+<dt>6.</dt>
+<dd><p>Otherwise, the form is a <i class="i">top level form</i> that
+is not one of the special cases.  In compile-time-too mode, the
+compiler first evaluates the form in the evaluation 
+<i class="i">environment</i> and then minimally compiles it.  In not-compile-time
+mode, the <i class="i">form</i> is simply minimally compiled.  All <i class="i">subforms</i>
+are treated as <i class="i">non-top-level forms</i>.
+</p>
+<p>Note that <i class="i">top level forms</i> are processed in the order in
+which they textually appear in the file and that each 
+<i class="i">top level form</i> read by the compiler is processed before the next is
+read.  However, the order of processing (including macro expansion) of
+<i class="i">subforms</i> that are not <i class="i">top level forms</i> and the order of
+further compilation is unspecified as long as Common Lisp semantics
+are preserved.
+</p>
+</dd>
+</dl>
+
+<p><b class="b">eval-when</b> forms cause compile-time evaluation only at
+top level.  Both <code class="t">:compile-toplevel</code> and <code class="t">:load-toplevel</code> situation specifications
+are ignored for <i class="i">non-top-level forms</i>. For <i class="i">non-top-level forms</i>, 
+an <b class="b">eval-when</b>
+specifying the <code class="t">:execute</code> situation is treated as an <i class="i">implicit progn</i>
+including the <i class="i">forms</i> in the body of the <b class="b">eval-when</b> <i class="i">form</i>;
+otherwise, the <i class="i">forms</i> in the body are ignored.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Processing-of-Defining-Macros.html">Processing of Defining Macros</a>, Previous: <a href="File-Compilation.html">File Compilation</a>, Up: <a href="File-Compilation.html">File Compilation</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Purpose-of-Compiler-Macros.html
@@ -0,0 +1,78 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Purpose of Compiler Macros (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Purpose of Compiler Macros (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Purpose of Compiler Macros (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Compilation-Semantics.html" rel="up" title="Compilation Semantics">
+<link href="Naming-of-Compiler-Macros.html" rel="next" title="Naming of Compiler Macros">
+<link href="Compiler-Macros.html" rel="prev" title="Compiler Macros">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Purpose-of-Compiler-Macros">
+<div class="nav-panel">
+<p>
+Next: <a href="Naming-of-Compiler-Macros.html" accesskey="n" rel="next">Naming of Compiler Macros</a>, Previous: <a href="Compiler-Macros.html" accesskey="p" rel="prev">Compiler Macros</a>, Up: <a href="Compilation-Semantics.html" accesskey="u" rel="up">Compilation Semantics</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Purpose-of-Compiler-Macros-1"><span>3.2.2.2 Purpose of Compiler Macros<a class="copiable-link" href="#Purpose-of-Compiler-Macros-1"> &para;</a></span></h4>
+
+<p>The purpose of the <i class="i">compiler macro</i> facility is to permit 
+selective source code transformations as optimization advice 
+to the <i class="i">compiler</i>.  When a <i class="i">compound form</i> is being
+processed (as by the compiler), if the <i class="i">operator</i> names a
+<i class="i">compiler macro</i> then the <i class="i">compiler macro function</i> may be
+invoked on the form, and the resulting expansion recursively processed
+in preference to performing the usual processing on the original <i class="i">form</i>
+according to its normal interpretation as a <i class="i">function form</i> or
+<i class="i">macro form</i>.
+</p>
+<p>A <i class="i">compiler macro function</i>, like a <i class="i">macro function</i>,
+is a <i class="i">function</i> of two <i class="i">arguments</i>: the entire call <i class="i">form</i>
+and the <i class="i">environment</i>. Unlike an ordinary <i class="i">macro function</i>, a 
+<i class="i">compiler macro function</i> can decline to provide an expansion merely by
+returning a value that is the <i class="i">same</i> as the original <i class="i">form</i>.
+The consequences are undefined if a <i class="i">compiler macro function</i>
+destructively modifies any part of its <i class="i">form</i> argument.
+</p>
+<p>The <i class="i">form</i> passed to the compiler macro function can either be a <i class="i">list</i>
+whose <i class="i">car</i> is the function name, or a <i class="i">list</i> whose <i class="i">car</i> is
+<b class="b">funcall</b> and whose <i class="i">cadr</i> is a list <code class="t">(function <i class="i">name</i>)</code>;
+note that this affects destructuring of the form argument by the 
+<i class="i">compiler macro function</i>.
+<b class="b">define-compiler-macro</b> arranges for destructuring of arguments to be
+performed correctly for both possible formats.
+</p>
+<p>When <b class="b">compile-file</b> chooses to expand a <i class="i">top level form</i> that is
+a <i class="i">compiler macro</i> <i class="i">form</i>, the expansion is also treated as a <i class="i">top level form</i>
+for the purposes of <b class="b">eval-when</b> processing; see <a class="ref" href="Processing-of-Top-Level-Forms.html">Processing of Top Level Forms</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Naming-of-Compiler-Macros.html">Naming of Compiler Macros</a>, Previous: <a href="Compiler-Macros.html">Compiler Macros</a>, Up: <a href="Compilation-Semantics.html">Compilation Semantics</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Random_002dState-Operations.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Random-State Operations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Random-State Operations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Random-State Operations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Number-Concepts.html" rel="up" title="Number Concepts">
+<link href="Interval-Designators.html" rel="prev" title="Interval Designators">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Random_002dState-Operations">
+<div class="nav-panel">
+<p>
+Previous: <a href="Interval-Designators.html" accesskey="p" rel="prev">Interval Designators</a>, Up: <a href="Number-Concepts.html" accesskey="u" rel="up">Number Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Random_002dState-Operations-1"><span>12.1.7 Random-State Operations<a class="copiable-link" href="#Random_002dState-Operations-1"> &para;</a></span></h4>
+
+<p>Figure 12&ndash;10 lists some <i class="i">defined names</i> that are applicable to <i class="i">random states</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  *random-state*     random            <!-- /@w -->
+  make-random-state  random-state-p    <!-- /@w -->
+
+  Figure 12&ndash;10: Random-state defined names<!-- /@w -->
+
+</pre></div></div>
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Rational-Computations.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Rational Computations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Rational Computations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Rational Computations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Number-Concepts.html" rel="up" title="Number Concepts">
+<link href="Floating_002dpoint-Computations.html" rel="next" title="Floating-point Computations">
+<link href="Implementation_002dDependent-Numeric-Constants.html" rel="prev" title="Implementation-Dependent Numeric Constants">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Rational-Computations">
+<div class="nav-panel">
+<p>
+Next: <a href="Floating_002dpoint-Computations.html" accesskey="n" rel="next">Floating-point Computations</a>, Previous: <a href="Implementation_002dDependent-Numeric-Constants.html" accesskey="p" rel="prev">Implementation-Dependent Numeric Constants</a>, Up: <a href="Number-Concepts.html" accesskey="u" rel="up">Number Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Rational-Computations-1"><span>12.1.3 Rational Computations<a class="copiable-link" href="#Rational-Computations-1"> &para;</a></span></h4>
+
+<p>The rules in this section apply to <i class="i">rational</i> computations.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Rule-of-Unbounded-Rational-Precision.html" accesskey="1">Rule of Unbounded Rational Precision</a></li>
+<li><a href="Rule-of-Canonical-Representation-for-Rationals.html" accesskey="2">Rule of Canonical Representation for Rationals</a></li>
+<li><a href="Rule-of-Float-Substitutability.html" accesskey="3">Rule of Float Substitutability</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Re_002dReading-Abbreviated-Expressions.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Re-Reading Abbreviated Expressions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Re-Reading Abbreviated Expressions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Re-Reading Abbreviated Expressions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standard-Macro-Characters.html" rel="up" title="Standard Macro Characters">
+<link href="Sharpsign.html" rel="prev" title="Sharpsign">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Re_002dReading-Abbreviated-Expressions">
+<div class="nav-panel">
+<p>
+Previous: <a href="Sharpsign.html" accesskey="p" rel="prev">Sharpsign</a>, Up: <a href="Standard-Macro-Characters.html" accesskey="u" rel="up">Standard Macro Characters</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Re_002dReading-Abbreviated-Expressions-1"><span>2.4.9 Re-Reading Abbreviated Expressions<a class="copiable-link" href="#Re_002dReading-Abbreviated-Expressions-1"> &para;</a></span></h4>
+
+<p>Note that the <i class="i">Lisp reader</i> will 
+generally
+signal an error of <i class="i">type</i> <b class="b">reader-error</b>
+when reading an <i class="i">expression</i>_2 that has been
+abbreviated because of length or level limits 
+(see <b class="b">*print-level*</b>,
+     <b class="b">*print-length*</b>,
+ and <b class="b">*print-lines*</b>)
+due to restrictions on &ldquo;<code class="t">..</code>&rdquo;, &ldquo;<code class="t">...</code>&rdquo;, &ldquo;<code class="t">#</code>&rdquo; followed by <i class="i">whitespace</i>_1,
+and &ldquo;<code class="t">#)</code>&rdquo;.
+</p>
+
+
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Reader-Algorithm.html
@@ -0,0 +1,246 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Reader Algorithm (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Reader Algorithm (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Reader Algorithm (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Syntax.html" rel="up" title="Syntax">
+<link href="Interpretation-of-Tokens.html" rel="next" title="Interpretation of Tokens">
+<link href="Character-Syntax.html" rel="prev" title="Character Syntax">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Reader-Algorithm">
+<div class="nav-panel">
+<p>
+Next: <a href="Interpretation-of-Tokens.html" accesskey="n" rel="next">Interpretation of Tokens</a>, Previous: <a href="Character-Syntax.html" accesskey="p" rel="prev">Character Syntax</a>, Up: <a href="Syntax.html" accesskey="u" rel="up">Syntax</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Reader-Algorithm-1"><span>2.2 Reader Algorithm<a class="copiable-link" href="#Reader-Algorithm-1"> &para;</a></span></h3>
+
+
+<p>This section describes the algorithm used by the <i class="i">Lisp reader</i>
+to parse <i class="i">objects</i> from an <i class="i">input</i> <i class="i">character</i> <i class="i">stream</i>,
+including how the <i class="i">Lisp reader</i> processes <i class="i">macro characters</i>.
+</p>
+<p>When dealing with <i class="i">tokens</i>, the reader&rsquo;s basic function is to distinguish
+representations of <i class="i">symbols</i> from those of <i class="i">numbers</i>.
+When a <i class="i">token</i> is accumulated, it is assumed to represent a <i class="i">number</i> if it
+satisfies the syntax for numbers listed in <i class="i">Figure~2&ndash;9</i>.
+If it does not represent a <i class="i">number</i>,
+it is then assumed to be a <i class="i">potential number</i> 
+if it satisfies the rules governing the syntax for a <i class="i">potential number</i>.
+If a valid <i class="i">token</i> is neither a representation of a <i class="i">number</i> 
+			       nor a <i class="i">potential number</i>,
+it represents a <i class="i">symbol</i>.
+</p>
+<p>The algorithm performed by the <i class="i">Lisp reader</i> is as follows:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>If at end of file, end-of-file processing is performed as specified
+in <b class="b">read</b>.
+Otherwise,
+one <i class="i">character</i>, <i class="i">x</i>,  is read from the <i class="i">input</i> <i class="i">stream</i>, and
+dispatched according to the <i class="i">syntax type</i> of <i class="i">x</i> to one
+of steps 2 to 7.
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p>If <i class="i">x</i> is an <i class="i">invalid</i> <i class="i">character</i>,
+an error of <i class="i">type</i> <b class="b">reader-error</b> is signaled.
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>If <i class="i">x</i> is a <i class="i">whitespace</i>_2 <i class="i">character</i>,
+then it is discarded and step 1 is re-entered.
+</p>
+</dd>
+<dt>4.</dt>
+<dd><p>If <i class="i">x</i> is a <i class="i">terminating</i> or <i class="i">non-terminating</i> <i class="i">macro character</i>
+then its associated <i class="i">reader macro function</i> is called with two <i class="i">arguments</i>,
+the <i class="i">input</i> <i class="i">stream</i> and <i class="i">x</i>.
+</p>
+<p>The <i class="i">reader macro function</i> may read <i class="i">characters</i> 
+from the <i class="i">input</i> <i class="i">stream</i>; 
+if it does, it will see those <i class="i">characters</i> following the <i class="i">macro character</i>.
+The <i class="i">Lisp reader</i> may be invoked recursively from the <i class="i">reader macro function</i>.
+</p>
+<p>The <i class="i">reader macro function</i> must not have any side effects other than on the
+<i class="i">input</i> <i class="i">stream</i>;
+because of backtracking and restarting of the <b class="b">read</b> operation,
+front ends to the <i class="i">Lisp reader</i> (<i class="i">e.g.</i>, &ldquo;editors&rdquo; and &ldquo;rubout handlers&rdquo;) 
+may cause the <i class="i">reader macro function</i> to be called repeatedly during the
+reading of a single <i class="i">expression</i> in which <i class="i">x</i> only appears once.
+</p>
+<p>The <i class="i">reader macro function</i> may return zero values or one value.
+If one value is returned,
+then that value is returned as the result of the read operation;
+the algorithm is done.
+If zero values are returned, then step 1 is re-entered.
+</p>
+</dd>
+<dt>5.</dt>
+<dd><p>If <i class="i">x</i> is a <i class="i">single escape</i> <i class="i">character</i>
+then the next <i class="i">character</i>, <i class="i">y</i>, is read, or an error of <i class="i">type</i> <b class="b">end-of-file</b> 
+is signaled if at the end of file.
+<i class="i">y</i> is treated as if it is a <i class="i">constituent</i> 
+whose only <i class="i">constituent trait</i> is <i class="i">alphabetic</i>_2.
+<i class="i">y</i> is used to begin a <i class="i">token</i>, and step 8 is entered.
+</p>
+</dd>
+<dt>6.</dt>
+<dd><p>If <i class="i">x</i> is a <i class="i">multiple escape</i> <i class="i">character</i>
+then a <i class="i">token</i> (initially
+containing no <i class="i">characters</i>) is  begun and step 9 is entered.
+</p>
+</dd>
+<dt>7.</dt>
+<dd><p>If <i class="i">x</i> is a <i class="i">constituent</i> <i class="i">character</i>, then it begins a <i class="i">token</i>.
+After the <i class="i">token</i> is read in, it will be interpreted
+either as a <span class="r">Lisp</span> <i class="i">object</i> or as being of invalid syntax.
+If the <i class="i">token</i> represents an <i class="i">object</i>,
+that <i class="i">object</i> is returned as the result of the read operation.
+If the <i class="i">token</i> is of invalid syntax, an error is signaled.
+If <i class="i">x</i> is a <i class="i">character</i> with <i class="i">case</i>,
+it might be replaced with the corresponding <i class="i">character</i> of the opposite <i class="i">case</i>, 
+depending on the <i class="i">readtable case</i> of the <i class="i">current readtable</i>,
+as outlined in <a class="ref" href="Effect-of-Readtable-Case-on-the-Lisp-Reader.html">Effect of Readtable Case on the Lisp Reader</a>.
+<i class="i">X</i> is used to begin a <i class="i">token</i>, and step 8 is entered.
+</p>
+</dd>
+<dt>8.</dt>
+<dd><p>At this point a <i class="i">token</i> is being accumulated, and an even number
+of <i class="i">multiple escape</i> <i class="i">characters</i> have been encountered.
+If at end of file, step 10 is entered.
+Otherwise, a <i class="i">character</i>, <i class="i">y</i>, is read, and
+one of the following actions is performed according to its <i class="i">syntax type</i>:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>If <i class="i">y</i> is a <i class="i">constituent</i> or <i class="i">non-terminating</i> <i class="i">macro character</i>:
+</p><dl class="table">
+<dt>&ndash;</dt>
+<dd><p>If <i class="i">y</i> is a <i class="i">character</i> with <i class="i">case</i>,
+it might be replaced with the corresponding <i class="i">character</i> of the opposite <i class="i">case</i>, 
+depending on the <i class="i">readtable case</i> of the <i class="i">current readtable</i>,
+as outlined in <a class="ref" href="Effect-of-Readtable-Case-on-the-Lisp-Reader.html">Effect of Readtable Case on the Lisp Reader</a>.
+</p></dd>
+<dt>&ndash;</dt>
+<dd><p><i class="i">Y</i> is appended to the <i class="i">token</i> being built.
+</p></dd>
+<dt>&ndash;</dt>
+<dd><p>Step 8 is repeated.
+</p></dd>
+</dl>
+
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If <i class="i">y</i> is a <i class="i">single escape</i> <i class="i">character</i>, then the next <i class="i">character</i>,
+<i class="i">z</i>, is read, or an error of <i class="i">type</i> <b class="b">end-of-file</b> is signaled if at end of file.
+<i class="i">Z</i> is treated as if it is a <i class="i">constituent</i> 
+whose only <i class="i">constituent trait</i> is <i class="i">alphabetic</i>_2.
+<i class="i">Z</i> is appended to the <i class="i">token</i> being built,
+and step 8 is repeated.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If <i class="i">y</i> is a <i class="i">multiple escape</i> <i class="i">character</i>,
+then step 9 is entered.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If <i class="i">y</i> is an <i class="i">invalid</i> <i class="i">character</i>,
+an error of <i class="i">type</i> <b class="b">reader-error</b> is signaled.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If <i class="i">y</i> is a <i class="i">terminating</i> <i class="i">macro character</i>,
+then it terminates the <i class="i">token</i>.
+First the <i class="i">character</i> <i class="i">y</i> is unread (see <b class="b">unread-char</b>),
+and then step 10 is entered.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If <i class="i">y</i> is a <i class="i">whitespace</i>_2 <i class="i">character</i>, then it terminates
+the <i class="i">token</i>.  First the <i class="i">character</i> <i class="i">y</i> is unread
+if appropriate (see <b class="b">read-preserving-whitespace</b>),
+and then step 10 is entered.
+</p></dd>
+</dl>
+
+</dd>
+<dt>9.</dt>
+<dd><p>At this point a <i class="i">token</i> is being accumulated, and an odd number
+of <i class="i">multiple escape</i> <i class="i">characters</i> have been encountered.
+If at end of file, an error of <i class="i">type</i> <b class="b">end-of-file</b> is signaled.
+Otherwise, a <i class="i">character</i>, <i class="i">y</i>, is read, and
+one of the following actions is performed according to its <i class="i">syntax type</i>:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>If <i class="i">y</i> is a <i class="i">constituent</i>, macro, or <i class="i">whitespace</i>_2 <i class="i">character</i>,
+<i class="i">y</i> is treated as a <i class="i">constituent</i> 
+whose only <i class="i">constituent trait</i> is <i class="i">alphabetic</i>_2.             
+<i class="i">Y</i> is appended to the <i class="i">token</i> being built, and step 9 is repeated.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If <i class="i">y</i> is a <i class="i">single escape</i> <i class="i">character</i>, then the next <i class="i">character</i>,
+<i class="i">z</i>, is read, or an error of <i class="i">type</i> <b class="b">end-of-file</b> is signaled if at end of file.
+<i class="i">Z</i> is treated as a <i class="i">constituent</i>
+whose only <i class="i">constituent trait</i> is <i class="i">alphabetic</i>_2.
+<i class="i">Z</i> is appended to the <i class="i">token</i> being built,
+and step 9 is repeated.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If <i class="i">y</i> is a <i class="i">multiple escape</i> <i class="i">character</i>,
+then step 8 is entered.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If <i class="i">y</i> is an <i class="i">invalid</i> <i class="i">character</i>,
+an error of <i class="i">type</i> <b class="b">reader-error</b> is signaled.
+</p></dd>
+</dl>
+
+</dd>
+<dt>10.</dt>
+<dd><p>An entire <i class="i">token</i> has been accumulated.
+The <i class="i">object</i> represented by the <i class="i">token</i> is returned 
+as the result of the read operation,
+or an error of <i class="i">type</i> <b class="b">reader-error</b> is signaled if the <i class="i">token</i> is not of valid syntax.
+</p></dd>
+</dl>
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Interpretation-of-Tokens.html">Interpretation of Tokens</a>, Previous: <a href="Character-Syntax.html">Character Syntax</a>, Up: <a href="Syntax.html">Syntax</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Reader-Concepts.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Reader Concepts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Reader Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Reader Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader.html" rel="up" title="Reader">
+<link href="Reader-Dictionary.html" rel="next" title="Reader Dictionary">
+<link href="Reader.html" rel="prev" title="Reader">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Reader-Concepts">
+<div class="nav-panel">
+<p>
+Next: <a href="Reader-Dictionary.html" accesskey="n" rel="next">Reader Dictionary</a>, Previous: <a href="Reader.html" accesskey="p" rel="prev">Reader</a>, Up: <a href="Reader.html" accesskey="u" rel="up">Reader</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Reader-Concepts-1"><span>23.1 Reader Concepts<a class="copiable-link" href="#Reader-Concepts-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Dynamic-Control-of-the-Lisp-Reader.html" accesskey="1">Dynamic Control of the Lisp Reader</a></li>
+<li><a href="Effect-of-Readtable-Case-on-the-Lisp-Reader.html" accesskey="2">Effect of Readtable Case on the Lisp Reader</a></li>
+<li><a href="Argument-Conventions-of-Some-Reader-Functions.html" accesskey="3">Argument Conventions of Some Reader Functions</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Reader-Dictionary.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Reader Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Reader Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Reader Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader.html" rel="up" title="Reader">
+<link href="Reader-Concepts.html" rel="prev" title="Reader Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Reader-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Reader-Concepts.html" accesskey="p" rel="prev">Reader Concepts</a>, Up: <a href="Reader.html" accesskey="u" rel="up">Reader</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Reader-Dictionary-1"><span>23.2 Reader Dictionary<a class="copiable-link" href="#Reader-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="readtable.html" accesskey="1">readtable                                                    [System Class]</a></li>
+<li><a href="copy_002dreadtable.html" accesskey="2">copy-readtable                                                   [Function]</a></li>
+<li><a href="make_002ddispatch_002dmacro_002dcharacter.html" accesskey="3">make-dispatch-macro-character                                    [Function]</a></li>
+<li><a href="read.html" accesskey="4">read, read-preserving-whitespace                                 [Function]</a></li>
+<li><a href="read_002ddelimited_002dlist.html" accesskey="5">read-delimited-list                                              [Function]</a></li>
+<li><a href="read_002dfrom_002dstring.html" accesskey="6">read-from-string                                                 [Function]</a></li>
+<li><a href="readtable_002dcase.html" accesskey="7">readtable-case                                                   [Accessor]</a></li>
+<li><a href="readtablep.html" accesskey="8">readtablep                                                       [Function]</a></li>
+<li><a href="set_002ddispatch_002dmacro_002dcharacter.html" accesskey="9">set-dispatch-macro-character, get-dispatch-macro-character</a></li>
+<li><a href="set_002dmacro_002dcharacter.html">set-macro-character, get-macro-character                         [Function]</a></li>
+<li><a href="set_002dsyntax_002dfrom_002dchar.html">set-syntax-from-char                                             [Function]</a></li>
+<li><a href="with_002dstandard_002dio_002dsyntax.html">with-standard-io-syntax                                             [Macro]</a></li>
+<li><a href="_002aread_002dbase_002a.html">*read-base*                                                      [Variable]</a></li>
+<li><a href="_002aread_002ddefault_002dfloat_002dformat_002a.html">*read-default-float-format*                                      [Variable]</a></li>
+<li><a href="_002aread_002deval_002a.html">*read-eval*                                                      [Variable]</a></li>
+<li><a href="_002aread_002dsuppress_002a.html">*read-suppress*                                                  [Variable]</a></li>
+<li><a href="_002areadtable_002a.html">*readtable*                                                      [Variable]</a></li>
+<li><a href="reader_002derror.html">reader-error                                               [Condition Type]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Reader.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Reader (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Reader (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Reader (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="System-Construction.html" rel="next" title="System Construction">
+<link href="Printer.html" rel="prev" title="Printer">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Reader">
+<div class="nav-panel">
+<p>
+Next: <a href="System-Construction.html" accesskey="n" rel="next">System Construction</a>, Previous: <a href="Printer.html" accesskey="p" rel="prev">Printer</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Reader-1"><span>23 Reader<a class="copiable-link" href="#Reader-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Reader-Concepts.html" accesskey="1">Reader Concepts</a></li>
+<li><a href="Reader-Dictionary.html" accesskey="2">Reader Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Readtables.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Readtables (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Readtables (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Readtables (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Syntax.html" rel="up" title="Character Syntax">
+<link href="Variables-that-affect-the-Lisp-Reader.html" rel="next" title="Variables that affect the Lisp Reader">
+<link href="Character-Syntax.html" rel="prev" title="Character Syntax">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Readtables">
+<div class="nav-panel">
+<p>
+Next: <a href="Variables-that-affect-the-Lisp-Reader.html" accesskey="n" rel="next">Variables that affect the Lisp Reader</a>, Previous: <a href="Character-Syntax.html" accesskey="p" rel="prev">Character Syntax</a>, Up: <a href="Character-Syntax.html" accesskey="u" rel="up">Character Syntax</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Readtables-1"><span>2.1.1 Readtables<a class="copiable-link" href="#Readtables-1"> &para;</a></span></h4>
+
+<p>Syntax information for use by the <i class="i">Lisp reader</i> is embodied in an
+<i class="i">object</i> called a <i class="i">readtable</i>
+<a class="index-entry-id" id="index-readtable"></a>
+.  Among other things, 
+the <i class="i">readtable</i> contains the association between <i class="i">characters</i> 
+and <i class="i">syntax types</i>.
+</p>
+<p>Figure 2&ndash;1 lists some <i class="i">defined names</i> that are applicable to
+<i class="i">readtables</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  *readtable*                    readtable-case                <!-- /@w -->
+  copy-readtable                 readtablep                    <!-- /@w -->
+  get-dispatch-macro-character   set-dispatch-macro-character  <!-- /@w -->
+  get-macro-character            set-macro-character           <!-- /@w -->
+  make-dispatch-macro-character  set-syntax-from-char          <!-- /@w -->
+
+              Figure 2&ndash;1: Readtable defined names             <!-- /@w -->
+
+</pre></div></div>
+
+
+<ul class="mini-toc">
+<li><a href="The-Current-Readtable.html" accesskey="1">The Current Readtable</a></li>
+<li><a href="The-Standard-Readtable.html" accesskey="2">The Standard Readtable</a></li>
+<li><a href="The-Initial-Readtable.html" accesskey="3">The Initial Readtable</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Recommended-Style-in-Condition-Reporting.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Recommended Style in Condition Reporting (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Recommended Style in Condition Reporting (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Recommended Style in Condition Reporting (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printing-Conditions.html" rel="up" title="Printing Conditions">
+<link href="Capitalization-and-Punctuation-in-Condition-Reports.html" rel="next" title="Capitalization and Punctuation in Condition Reports">
+<link href="Printing-Conditions.html" rel="prev" title="Printing Conditions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Recommended-Style-in-Condition-Reporting">
+<div class="nav-panel">
+<p>
+Next: <a href="Capitalization-and-Punctuation-in-Condition-Reports.html" accesskey="n" rel="next">Capitalization and Punctuation in Condition Reports</a>, Previous: <a href="Printing-Conditions.html" accesskey="p" rel="prev">Printing Conditions</a>, Up: <a href="Printing-Conditions.html" accesskey="u" rel="up">Printing Conditions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Recommended-Style-in-Condition-Reporting-1"><span>9.1.3.1 Recommended Style in Condition Reporting<a class="copiable-link" href="#Recommended-Style-in-Condition-Reporting-1"> &para;</a></span></h4>
+
+<p>In order to ensure a properly aesthetic result when presenting
+<i class="i">report messages</i> to the user, certain stylistic conventions are
+recommended.
+</p>
+<p>There are stylistic recommendations for the content of the messages
+output by <i class="i">condition reporters</i>, but there are no formal requirements 
+on those <i class="i">programs</i>.
+If a <i class="i">program</i> violates the recommendations for some message, the
+display of that message might be less aesthetic than if the guideline
+had been observed, but the <i class="i">program</i> is still considered a
+<i class="i">conforming program</i>.
+</p>
+<p>The requirements on a <i class="i">program</i> or <i class="i">implementation</i> which
+invokes a <i class="i">condition reporter</i> are somewhat stronger.  A <i class="i">conforming
+program</i> must be permitted to assume that if these style guidelines are
+followed, proper aesthetics will be maintained.  Where appropriate, any
+specific requirements on such routines are explicitly mentioned below.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Redefining-Classes.html
@@ -0,0 +1,115 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Redefining Classes (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Redefining Classes (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Redefining Classes (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Classes.html" rel="up" title="Classes">
+<link href="Integrating-Types-and-Classes.html" rel="next" title="Integrating Types and Classes">
+<link href="Determining-the-Class-Precedence-List.html" rel="prev" title="Determining the Class Precedence List">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Redefining-Classes">
+<div class="nav-panel">
+<p>
+Next: <a href="Integrating-Types-and-Classes.html" accesskey="n" rel="next">Integrating Types and Classes</a>, Previous: <a href="Determining-the-Class-Precedence-List.html" accesskey="p" rel="prev">Determining the Class Precedence List</a>, Up: <a href="Classes.html" accesskey="u" rel="up">Classes</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Redefining-Classes-1"><span>4.3.6 Redefining Classes<a class="copiable-link" href="#Redefining-Classes-1"> &para;</a></span></h4>
+
+<p>A <i class="i">class</i> that is a <i class="i">direct instance</i> of <b class="b">standard-class</b> can
+be redefined if the new <i class="i">class</i> is also
+a <i class="i">direct instance</i> of <b class="b">standard-class</b>.
+Redefining a <i class="i">class</i> modifies the existing
+<i class="i">class</i> <i class="i">object</i> to reflect the new <i class="i">class</i> definition; it does not
+create a new <i class="i">class</i> <i class="i">object</i> for the <i class="i">class</i>.  
+Any <i class="i">method</i> <i class="i">object</i> created by a <code class="t">:reader</code>, <code class="t">:writer</code>, 
+or <code class="t">:accessor</code> option specified by the old <b class="b">defclass</b> form is
+removed from the corresponding <i class="i">generic function</i>.
+<i class="i">Methods</i> specified by the new <b class="b">defclass</b> form are added.
+</p>
+<p>When the class C is redefined, changes are propagated to its <i class="i">instances</i>
+and to <i class="i">instances</i> of any of its <i class="i">subclasses</i>.  Updating such an
+<i class="i">instance</i> occurs at an <i class="i">implementation-dependent</i> time, but no later than
+the next time a <i class="i">slot</i> 
+of that <i class="i">instance</i> is read or written.  Updating an
+<i class="i">instance</i> 
+does not change its identity as defined by the <i class="i">function</i> <b class="b">eq</b>.
+The updating process may change the <i class="i">slots</i> of that
+particular <i class="i">instance</i>, 
+but it does not create a new <i class="i">instance</i>.  Whether
+updating an <i class="i">instance</i> consumes storage is <i class="i">implementation-dependent</i>.
+</p>
+<p>Note that redefining a <i class="i">class</i> may cause <i class="i">slots</i> to be added or 
+deleted.  If a <i class="i">class</i> is redefined in a way that changes the set of
+<i class="i">local slots</i> <i class="i">accessible</i> in <i class="i">instances</i>, the <i class="i">instances</i> 
+are updated.  It is <i class="i">implementation-dependent</i> whether <i class="i">instances</i> 
+are updated if a <i class="i">class</i> is redefined in a way that does not change 
+the set of <i class="i">local slots</i> <i class="i">accessible</i> in <i class="i">instances</i>.
+</p>
+<p>The value of a <i class="i">slot</i> 
+that is specified as shared both in the old <i class="i">class</i>
+and in the new <i class="i">class</i> is retained.  
+If such a <i class="i">shared slot</i> was unbound
+in the old <i class="i">class</i>, it is unbound in the new <i class="i">class</i>.  
+<i class="i">Slots</i> that
+were local in the old <i class="i">class</i> and that are shared in the new 
+<i class="i">class</i> are
+initialized.  Newly added <i class="i">shared slots</i> are initialized.
+</p>
+<p>Each newly added <i class="i">shared slot</i> is set to the result of evaluating the
+<i class="i">captured initialization form</i> for the <i class="i">slot</i> that was specified 
+in the <b class="b">defclass</b> <i class="i">form</i> for the new <i class="i">class</i>.  
+If there was no <i class="i">initialization form</i>, the <i class="i">slot</i> is unbound.
+</p>
+<p>If a <i class="i">class</i> is redefined in such a way that the set of
+<i class="i">local slots</i> <i class="i">accessible</i> in an <i class="i">instance</i> of the <i class="i">class</i> 
+is changed, a two-step process of updating the <i class="i">instances</i> of the
+<i class="i">class</i> takes place.  The process may be explicitly started by 
+invoking the generic function <b class="b">make-instances-obsolete</b>.  This
+two-step process can happen in other circumstances in some implementations.
+For example, in some implementations this two-step process is
+triggered if the order of <i class="i">slots</i> in storage is changed.
+</p>
+<p>The first step modifies the structure of the <i class="i">instance</i> by adding new
+<i class="i">local slots</i> and discarding <i class="i">local slots</i> that are not
+defined in the new version of the <i class="i">class</i>.  The second step
+initializes the newly-added <i class="i">local slots</i> and performs any other
+user-defined actions. These two steps are further specified
+in the next two sections.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Modifying-the-Structure-of-Instances.html" accesskey="1">Modifying the Structure of Instances</a></li>
+<li><a href="Initializing-Newly-Added-Local-Slots-_0028Redefining-Classes_0029.html" accesskey="2">Initializing Newly Added Local Slots</a></li>
+<li><a href="Customizing-Class-Redefinition.html" accesskey="3">Customizing Class Redefinition</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Integrating-Types-and-Classes.html">Integrating Types and Classes</a>, Previous: <a href="Determining-the-Class-Precedence-List.html">Determining the Class Precedence List</a>, Up: <a href="Classes.html">Classes</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Referenced-Publications.html
@@ -0,0 +1,204 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Referenced Publications (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Referenced Publications (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Referenced Publications (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-_0028Introduction_0029.html" rel="up" title="Introduction (Introduction)">
+<link href="Definitions.html" rel="next" title="Definitions">
+<link href="Organization-of-the-Document.html" rel="prev" title="Organization of the Document">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Referenced-Publications">
+<div class="nav-panel">
+<p>
+Next: <a href="Definitions.html" accesskey="n" rel="next">Definitions</a>, Previous: <a href="Organization-of-the-Document.html" accesskey="p" rel="prev">Organization of the Document</a>, Up: <a href="Introduction-_0028Introduction_0029.html" accesskey="u" rel="up">Introduction</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Referenced-Publications-1"><span>1.3 Referenced Publications<a class="copiable-link" href="#Referenced-Publications-1"> &para;</a></span></h3>
+
+
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">The Anatomy of Lisp</b>,
+        John Allen, McGraw-Hill, Inc., 1978.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">The Art of Computer Programming, Volume 3</b>,
+             Donald E. Knuth, Addison-Wesley Company (Reading, MA), 1973.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">The Art of the Metaobject Protocol</b>,
+	Kiczales et al., MIT Press (Cambridge, MA), 1991.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">Common Lisp Object System Specification</b>,
+        D. Bobrow, L. DiMichiel, R.P. Gabriel, S. Keene, G. Kiczales, D. Moon,
+        <i class="i">SIGPLAN Notices</i> V23, September, 1988.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">Common Lisp: The Language</b>,
+        Guy L. Steele Jr., Digital Press (Burlington, MA), 1984.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">Common Lisp: The Language, Second Edition</b>,
+        Guy L. Steele Jr., Digital Press (Bedford, MA), 1990.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">Exceptional Situations in Lisp</b>,
+	Kent M. Pitman,
+	<i class="i">Proceedings of the First European Conference
+	     on the Practical Application of LISP\/</i>
+        (EUROPAL &rsquo;90),
+	Churchill College, Cambridge, England,
+	March 27-29, 1990.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">Flavors: A Non-Hierarchical Approach to Object-Oriented Programming</b>,
+	Howard I. Cannon, 1982.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">IEEE Standard for Binary Floating-Point Arithmetic</b>,
+        ANSI/IEEE Std 754-1985,
+        Institute of Electrical and Electronics Engineers, Inc. (New York), 1985.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">IEEE Standard for the Scheme Programming Language</b>,
+	IEEE Std 1178-1990,
+	Institute of Electrical and Electronic Engineers, Inc. (New York), 1991.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">Interlisp Reference Manual</b>, Third Revision,
+	Teitelman, Warren, et al,
+	Xerox Palo Alto Research Center (Palo Alto, CA), 1978.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><span class="r">ISO 6937/2</span>,
+	<i class="i">Information processing&mdash;Coded character sets 
+           for text communication&mdash;Part 2: Latin alphabetic and non-alphabetic
+           graphic characters</i>, 
+	ISO, 1983.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">Lisp 1.5 Programmer&rsquo;s Manual</b>,
+	John McCarthy, MIT Press (Cambridge, MA), August, 1962.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">Lisp Machine Manual</b>,
+	D.L. Weinreb and D.A. Moon,
+	Artificial Intelligence Laboratory, MIT (Cambridge, MA), July, 1981.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">Maclisp Reference Manual, Revision~0</b>,
+	David A. Moon, Project MAC (Laboratory for Computer Science),
+        MIT (Cambridge, MA), March, 1974.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">NIL&mdash;A Perspective</b>, 
+        JonL White, <i class="i">Macsyma User&rsquo;s Conference</i>, 1979.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">Performance and Evaluation of Lisp Programs</b>,
+	Richard P. Gabriel, MIT Press (Cambridge, MA), 1985.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">Principal Values and Branch Cuts in Complex APL</b>, 
+        Paul Penfield Jr., <i class="i">APL 81 Conference Proceedings</i>,
+        ACM SIGAPL (San Francisco, September 1981), 248-256.
+        Proceedings published as <i class="i">APL Quote Quad 12</i>, 1 (September 1981).
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">The Revised Maclisp Manual</b>,
+	Kent M. Pitman, 
+	Technical Report 295,
+	Laboratory for Computer Science, MIT (Cambridge, MA), May 1983.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">Revised^3 Report on the Algorithmic Language Scheme</b>,
+        Jonathan Rees and William Clinger (editors), 
+        <i class="i">SIGPLAN Notices</i> V21, #12, December, 1986.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">S-1 Common Lisp Implementation</b>,
+	R.A. Brooks, R.P. Gabriel, and G.L. Steele,
+	<i class="i">Conference Record of the 1982 ACM Symposium on Lisp and Functional Programming</i>,
+	108-113, 1982.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">Smalltalk-80: The Language and its Implementation</b>,
+        A. Goldberg and D. Robson, Addison-Wesley, 1983.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">Standard LISP Report</b>,
+        J.B. Marti, A.C. Hearn, M.L. Griss, and C. Griss,
+        <i class="i">SIGPLAN Notices</i> V14, #10, October, 1979.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">Webster&rsquo;s Third New International Dictionary
+ the English Language, Unabridged</b>,
+	Merriam Webster (Springfield, MA), 1986.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">XP: A Common Lisp Pretty Printing System</b>,
+        R.C. Waters,
+	Memo 1102a,
+	Artificial Intelligence Laboratory, MIT (Cambridge, MA), September 1989.
+</p>
+</dd>
+</dl>
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Definitions.html">Definitions</a>, Previous: <a href="Organization-of-the-Document.html">Organization of the Document</a>, Up: <a href="Introduction-_0028Introduction_0029.html">Introduction</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Reinitializing-an-Instance.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Reinitializing an Instance (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Reinitializing an Instance (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Reinitializing an Instance (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects.html" rel="up" title="Objects">
+<link href="Meta_002dObjects.html" rel="next" title="Meta-Objects">
+<link href="Changing-the-Class-of-an-Instance.html" rel="prev" title="Changing the Class of an Instance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Reinitializing-an-Instance">
+<div class="nav-panel">
+<p>
+Next: <a href="Meta_002dObjects.html" accesskey="n" rel="next">Meta-Objects</a>, Previous: <a href="Changing-the-Class-of-an-Instance.html" accesskey="p" rel="prev">Changing the Class of an Instance</a>, Up: <a href="Objects.html" accesskey="u" rel="up">Objects</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Reinitializing-an-Instance-1"><span>7.3 Reinitializing an Instance<a class="copiable-link" href="#Reinitializing-an-Instance-1"> &para;</a></span></h3>
+
+
+<p>The generic function <b class="b">reinitialize-instance</b> may be used to change
+the values of <i class="i">slots</i> according to initialization arguments.
+</p>
+<p>The process of reinitialization changes the values of some <i class="i">slots</i> and
+performs any user-defined actions.  It does not modify the structure
+of an <i class="i">instance</i> to add or delete <i class="i">slots</i>, 
+and it does not use any <code class="t">:initform</code> forms to initialize <i class="i">slots</i>.
+</p>
+<p>The generic function <b class="b">reinitialize-instance</b> may be called
+directly.  It takes one required argument, the <i class="i">instance</i>.  It also
+takes any number of initialization arguments to be used by <i class="i">methods</i> for
+<b class="b">reinitialize-instance</b> or for <b class="b">shared-initialize</b>. The
+arguments after the required <i class="i">instance</i> must form an 
+<i class="i">initialization argument list</i>.
+</p>
+<p>There is a system-supplied primary <i class="i">method</i> for 
+<b class="b">reinitialize-instance</b> whose <i class="i">parameter specializer</i> is 
+the <i class="i">class</i> <b class="b">standard-object</b>.  First this <i class="i">method</i> checks the validity of
+initialization arguments and signals an error if an initialization
+argument is supplied that is not declared as valid. 
+(For more information, see <a class="ref" href="Declaring-the-Validity-of-Initialization-Arguments.html">Declaring the Validity of Initialization Arguments</a>.)
+Then it calls the generic function 
+<b class="b">shared-initialize</b> with the following arguments: the <i class="i">instance</i>,
+<b class="b">nil</b>, and the initialization arguments it received.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Customizing-Reinitialization.html" accesskey="1">Customizing Reinitialization</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Relation-between-component-values-NIL-and-_002d_003eUNSPECIFIC.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Relation between component values NIL and -&gt;UNSPECIFIC (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Relation between component values NIL and -&gt;UNSPECIFIC (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Relation between component values NIL and -&gt;UNSPECIFIC (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Restrictions-on-Wildcard-Pathnames.html" rel="next" title="Restrictions on Wildcard Pathnames">
+<link href="_002d_003eUNSPECIFIC-as-a-Component-Value.html" rel="prev" title="-&gt;UNSPECIFIC as a Component Value">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Relation-between-component-values-NIL-and-_002d_003eUNSPECIFIC">
+<div class="nav-panel">
+<p>
+Next: <a href="Restrictions-on-Wildcard-Pathnames.html" accesskey="n" rel="next">Restrictions on Wildcard Pathnames</a>, Previous: <a href="_002d_003eUNSPECIFIC-as-a-Component-Value.html" accesskey="p" rel="prev">:UNSPECIFIC as a Component Value</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Relation-between-component-values-NIL-and-_003aUNSPECIFIC"><span>19.2.2.10 Relation between component values NIL and :UNSPECIFIC<a class="copiable-link" href="#Relation-between-component-values-NIL-and-_003aUNSPECIFIC"> &para;</a></span></h4>
+
+<p>If a <i class="i">pathname</i> is converted to a <i class="i">namestring</i>, 
+the <i class="i">symbols</i> <b class="b">nil</b> and <code class="t">:unspecific</code>
+cause the field to be treated as if it were empty.
+That is,
+both <b class="b">nil</b> and <code class="t">:unspecific</code> 
+cause the component not to appear in the <i class="i">namestring</i>.
+</p>
+<p>However, when merging a <i class="i">pathname</i> with a set of defaults,
+only a <b class="b">nil</b> value for a component 
+will be replaced with the default for that component, 
+while a value of <code class="t">:unspecific</code>
+will be left alone as if the field were &ldquo;filled&rdquo;;
+see the <i class="i">function</i> <b class="b">merge-pathnames</b> and <a class="ref" href="Merging-Pathnames.html">Merging Pathnames</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Removed-Argument-Conventions.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Removed Argument Conventions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Removed Argument Conventions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Removed Argument Conventions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Removed-Language-Features.html" rel="up" title="Removed Language Features">
+<link href="Removed-Variables.html" rel="next" title="Removed Variables">
+<link href="Removed-Operators.html" rel="prev" title="Removed Operators">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Removed-Argument-Conventions">
+<div class="nav-panel">
+<p>
+Next: <a href="Removed-Variables.html" accesskey="n" rel="next">Removed Variables</a>, Previous: <a href="Removed-Operators.html" accesskey="p" rel="prev">Removed Operators</a>, Up: <a href="Removed-Language-Features.html" accesskey="u" rel="up">Removed Language Features</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Removed-Argument-Conventions-1"><span>27.1.4 Removed Argument Conventions<a class="copiable-link" href="#Removed-Argument-Conventions-1"> &para;</a></span></h4>
+
+<p>The <i class="i">font</i> argument to <b class="b">digit-char</b>
+<a class="index-entry-id" id="index-digit_002dchar"></a>
+ was removed.
+The <i class="i">bits</i> and <i class="i">font</i> arguments to <b class="b">code-char</b>
+<a class="index-entry-id" id="index-code_002dchar"></a>
+</p>
+<p>were removed.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Removed-Language-Features.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Removed Language Features (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Removed Language Features (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Removed Language Features (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Appendix.html" rel="up" title="Appendix">
+<link href="Appendix.html" rel="prev" title="Appendix">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Removed-Language-Features">
+<div class="nav-panel">
+<p>
+Previous: <a href="Appendix.html" accesskey="p" rel="prev">Appendix</a>, Up: <a href="Appendix.html" accesskey="u" rel="up">Appendix</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Removed-Language-Features-1"><span>27.1 Removed Language Features<a class="copiable-link" href="#Removed-Language-Features-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Requirements-for-removed-and-deprecated-features.html" accesskey="1">Requirements for removed and deprecated features</a></li>
+<li><a href="Removed-Types.html" accesskey="2">Removed Types</a></li>
+<li><a href="Removed-Operators.html" accesskey="3">Removed Operators</a></li>
+<li><a href="Removed-Argument-Conventions.html" accesskey="4">Removed Argument Conventions</a></li>
+<li><a href="Removed-Variables.html" accesskey="5">Removed Variables</a></li>
+<li><a href="Removed-Reader-Syntax.html" accesskey="6">Removed Reader Syntax</a></li>
+<li><a href="Packages-No-Longer-Required.html" accesskey="7">Packages No Longer Required</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Removed-Operators.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Removed Operators (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Removed Operators (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Removed Operators (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Removed-Language-Features.html" rel="up" title="Removed Language Features">
+<link href="Removed-Argument-Conventions.html" rel="next" title="Removed Argument Conventions">
+<link href="Removed-Types.html" rel="prev" title="Removed Types">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Removed-Operators">
+<div class="nav-panel">
+<p>
+Next: <a href="Removed-Argument-Conventions.html" accesskey="n" rel="next">Removed Argument Conventions</a>, Previous: <a href="Removed-Types.html" accesskey="p" rel="prev">Removed Types</a>, Up: <a href="Removed-Language-Features.html" accesskey="u" rel="up">Removed Language Features</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Removed-Operators-1"><span>27.1.3 Removed Operators<a class="copiable-link" href="#Removed-Operators-1"> &para;</a></span></h4>
+
+<p>The functions
+</p>
+<p><code class="t">int-char</code>
+<a class="index-entry-id" id="index-int_002dchar"></a>
+,
+<code class="t">char-bits</code>
+<a class="index-entry-id" id="index-char_002dbits"></a>
+,
+<code class="t">char-font</code>
+<a class="index-entry-id" id="index-char_002dfont"></a>
+,
+<code class="t">make-char</code>
+<a class="index-entry-id" id="index-make_002dchar"></a>
+,
+<code class="t">char-bit</code>
+<a class="index-entry-id" id="index-char_002dbit"></a>
+,
+<code class="t">set-char-bit</code>
+<a class="index-entry-id" id="index-set_002dchar_002dbit"></a>
+,
+<code class="t">string-char-p</code>
+<a class="index-entry-id" id="index-string_002dchar_002dp"></a>
+,
+</p>
+<p>and
+<code class="t">commonp</code>
+<a class="index-entry-id" id="index-commonp"></a>
+</p>
+<p>were removed.
+</p>
+<p>The <i class="i">special operator</i> <code class="t">compiler-let</code> was removed.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Removed-Reader-Syntax.html
@@ -0,0 +1,45 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Removed Reader Syntax (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Removed Reader Syntax (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Removed Reader Syntax (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Removed-Language-Features.html" rel="up" title="Removed Language Features">
+<link href="Packages-No-Longer-Required.html" rel="next" title="Packages No Longer Required">
+<link href="Removed-Variables.html" rel="prev" title="Removed Variables">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Removed-Reader-Syntax">
+<div class="nav-panel">
+<p>
+Next: <a href="Packages-No-Longer-Required.html" accesskey="n" rel="next">Packages No Longer Required</a>, Previous: <a href="Removed-Variables.html" accesskey="p" rel="prev">Removed Variables</a>, Up: <a href="Removed-Language-Features.html" accesskey="u" rel="up">Removed Language Features</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Removed-Reader-Syntax-1"><span>27.1.6 Removed Reader Syntax<a class="copiable-link" href="#Removed-Reader-Syntax-1"> &para;</a></span></h4>
+
+<p>The &ldquo;<code class="t">#,</code>&rdquo; <i class="i">reader macro</i> in <i class="i">standard syntax</i> was removed.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Removed-Types.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Removed Types (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Removed Types (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Removed Types (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Removed-Language-Features.html" rel="up" title="Removed Language Features">
+<link href="Removed-Operators.html" rel="next" title="Removed Operators">
+<link href="Requirements-for-removed-and-deprecated-features.html" rel="prev" title="Requirements for removed and deprecated features">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Removed-Types">
+<div class="nav-panel">
+<p>
+Next: <a href="Removed-Operators.html" accesskey="n" rel="next">Removed Operators</a>, Previous: <a href="Requirements-for-removed-and-deprecated-features.html" accesskey="p" rel="prev">Requirements for removed and deprecated features</a>, Up: <a href="Removed-Language-Features.html" accesskey="u" rel="up">Removed Language Features</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Removed-Types-1"><span>27.1.2 Removed Types<a class="copiable-link" href="#Removed-Types-1"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <code class="t">string-char</code>
+<a class="index-entry-id" id="index-string_002dchar"></a>
+ was removed.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Removed-Variables.html
@@ -0,0 +1,69 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Removed Variables (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Removed Variables (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Removed Variables (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Removed-Language-Features.html" rel="up" title="Removed Language Features">
+<link href="Removed-Reader-Syntax.html" rel="next" title="Removed Reader Syntax">
+<link href="Removed-Argument-Conventions.html" rel="prev" title="Removed Argument Conventions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Removed-Variables">
+<div class="nav-panel">
+<p>
+Next: <a href="Removed-Reader-Syntax.html" accesskey="n" rel="next">Removed Reader Syntax</a>, Previous: <a href="Removed-Argument-Conventions.html" accesskey="p" rel="prev">Removed Argument Conventions</a>, Up: <a href="Removed-Language-Features.html" accesskey="u" rel="up">Removed Language Features</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Removed-Variables-1"><span>27.1.5 Removed Variables<a class="copiable-link" href="#Removed-Variables-1"> &para;</a></span></h4>
+
+<p>The variables
+</p>
+<p><code class="t">char-font-limit</code>
+<a class="index-entry-id" id="index-char_002dfont_002dlimit"></a>
+,
+<code class="t">char-bits-limit</code>
+<a class="index-entry-id" id="index-char_002dbits_002dlimit"></a>
+,
+<code class="t">char-control-bit</code>
+<a class="index-entry-id" id="index-char_002dcontrol_002dbit"></a>
+,
+<code class="t">char-meta-bit</code>
+<a class="index-entry-id" id="index-char_002dmeta_002dbit"></a>
+,
+<code class="t">char-super-bit</code>
+<a class="index-entry-id" id="index-char_002dsuper_002dbit"></a>
+,
+<code class="t">char-hyper-bit</code>
+<a class="index-entry-id" id="index-char_002dhyper_002dbit"></a>
+,
+</p>
+<p>and <code class="t">*break-on-warnings*</code>
+<a class="index-entry-id" id="index-_002abreak_002don_002dwarnings_002a"></a>
+</p>
+<p>were removed.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Required-Kinds-of-Specialized-Arrays.html
@@ -0,0 +1,93 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Required Kinds of Specialized Arrays (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Required Kinds of Specialized Arrays (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Required Kinds of Specialized Arrays (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Specialized-Arrays.html" rel="up" title="Specialized Arrays">
+<link href="Array-Upgrading.html" rel="prev" title="Array Upgrading">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Required-Kinds-of-Specialized-Arrays">
+<div class="nav-panel">
+<p>
+Previous: <a href="Array-Upgrading.html" accesskey="p" rel="prev">Array Upgrading</a>, Up: <a href="Specialized-Arrays.html" accesskey="u" rel="up">Specialized Arrays</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Required-Kinds-of-Specialized-Arrays-1"><span>15.1.2.2 Required Kinds of Specialized Arrays<a class="copiable-link" href="#Required-Kinds-of-Specialized-Arrays-1"> &para;</a></span></h4>
+
+<p><i class="i">Vectors</i> whose <i class="i">elements</i> are restricted to <i class="i">type</i>
+</p>
+<p><b class="b">character</b> or a <i class="i">subtype</i> of <b class="b">character</b>
+</p>
+<p>are called <i class="i">strings</i>
+<a class="index-entry-id" id="index-string"></a>
+. 
+<i class="i">Strings</i> are of <i class="i">type</i> <b class="b">string</b>.
+Figure 15&ndash;2 lists some <i class="i">defined names</i> related to <i class="i">strings</i>.
+</p>
+<p><i class="i">Strings</i> are <i class="i">specialized</i> <i class="i">arrays</i> 
+and might logically have been included in this chapter.
+However, for purposes of readability
+most information about <i class="i">strings</i> does not appear in this chapter;
+see instead <a class="ref" href="Strings.html">Strings</a>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  char                string-equal         string-upcase  <!-- /@w -->
+  make-string         string-greaterp      string<code class="t">/=</code>       <!-- /@w -->
+  nstring-capitalize  string-left-trim     string<code class="t">&lt;</code>        <!-- /@w -->
+  nstring-downcase    string-lessp         string<code class="t">&lt;=</code>       <!-- /@w -->
+  nstring-upcase      string-not-equal     string<code class="t">=</code>        <!-- /@w -->
+  schar               string-not-greaterp  string<code class="t">&gt;</code>        <!-- /@w -->
+  string              string-not-lessp     string<code class="t">&gt;=</code>       <!-- /@w -->
+  string-capitalize   string-right-trim                   <!-- /@w -->
+  string-downcase     string-trim                         <!-- /@w -->
+
+      Figure 15&ndash;2: Operators that Manipulate Strings     <!-- /@w -->
+
+</pre></div></div>
+
+<p><i class="i">Vectors</i> whose <i class="i">elements</i> are restricted to <i class="i">type</i>
+<b class="b">bit</b> are called <i class="i">bit vectors</i>
+<a class="index-entry-id" id="index-bit-vector"></a>
+.
+<i class="i">Bit vectors</i> are of <i class="i">type</i> <b class="b">bit-vector</b>.
+Figure 15&ndash;3 lists some <i class="i">defined names</i> for operations on <i class="i">bit arrays</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  bit        bit-ior   bit-orc2  <!-- /@w -->
+  bit-and    bit-nand  bit-xor   <!-- /@w -->
+  bit-andc1  bit-nor   sbit      <!-- /@w -->
+  bit-andc2  bit-not             <!-- /@w -->
+  bit-eqv    bit-orc1            <!-- /@w -->
+
+  Figure 15&ndash;3: Operators that Manipulate Bit Arrays<!-- /@w -->
+
+</pre></div></div>
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Required-Language-Features.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Required Language Features (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Required Language Features (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Required Language Features (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conforming-Implementations.html" rel="up" title="Conforming Implementations">
+<link href="Documentation-of-Implementation_002dDependent-Features.html" rel="next" title="Documentation of Implementation-Dependent Features">
+<link href="Conforming-Implementations.html" rel="prev" title="Conforming Implementations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Required-Language-Features">
+<div class="nav-panel">
+<p>
+Next: <a href="Documentation-of-Implementation_002dDependent-Features.html" accesskey="n" rel="next">Documentation of Implementation-Dependent Features</a>, Previous: <a href="Conforming-Implementations.html" accesskey="p" rel="prev">Conforming Implementations</a>, Up: <a href="Conforming-Implementations.html" accesskey="u" rel="up">Conforming Implementations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Required-Language-Features-1"><span>1.5.1.1 Required Language Features<a class="copiable-link" href="#Required-Language-Features-1"> &para;</a></span></h4>
+
+<p>A <i class="i">conforming implementation</i> shall accept all features 
+(including deprecated features)
+of the language specified in this standard,
+with the meanings defined in this standard.
+</p>
+<p>A <i class="i">conforming implementation</i> shall not require the inclusion of substitute
+or additional language elements in code in order to accomplish a feature of
+the language that is specified in this standard.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Requirements-for-removed-and-deprecated-features.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Requirements for removed and deprecated features (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Requirements for removed and deprecated features (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Requirements for removed and deprecated features (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Removed-Language-Features.html" rel="up" title="Removed Language Features">
+<link href="Removed-Types.html" rel="next" title="Removed Types">
+<link href="Removed-Language-Features.html" rel="prev" title="Removed Language Features">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Requirements-for-removed-and-deprecated-features">
+<div class="nav-panel">
+<p>
+Next: <a href="Removed-Types.html" accesskey="n" rel="next">Removed Types</a>, Previous: <a href="Removed-Language-Features.html" accesskey="p" rel="prev">Removed Language Features</a>, Up: <a href="Removed-Language-Features.html" accesskey="u" rel="up">Removed Language Features</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Requirements-for-removed-and-deprecated-features-1"><span>27.1.1 Requirements for removed and deprecated features<a class="copiable-link" href="#Requirements-for-removed-and-deprecated-features-1"> &para;</a></span></h4>
+
+<p>For this standard,
+    some features from the language described in <i class="i">Common Lisp: The Language</i> have been removed,
+and others have been deprecated (and will most likely not appear
+in future <span class="r">Common Lisp</span> standards).
+Which features were removed and which were deprecated
+was decided on a case-by-case basis by the X3J13 committee.
+</p>
+<p><i class="i">Conforming implementations</i> that wish to retain any removed 
+features for compatibility must assure that such compatibility 
+does not interfere with the correct function of <i class="i">conforming programs</i>.
+For example, symbols corresponding to the names of removed functions
+may not appear in the the <code class="t">COMMON-LISP</code> <i class="i">package</i>.
+(Note, however, that this specification has been devised in such a way 
+that there can be a package named <code class="t">LISP</code> which can contain such symbols.)
+</p>
+<p><i class="i">Conforming implementations</i> must implement all deprecated features.
+For a list of deprecated features, see <a class="ref" href="Deprecated-Language-Features.html">Deprecated Language Features</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Requiring-Non_002dNull-Rest-Parameters-in-The-_0022Syntax_0022-Section.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Requiring Non-Null Rest Parameters in The &quot;Syntax&quot; Section (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Requiring Non-Null Rest Parameters in The &quot;Syntax&quot; Section (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Requiring Non-Null Rest Parameters in The &quot;Syntax&quot; Section (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="Return-values-in-The-_0022Syntax_0022-Section.html" rel="next" title="Return values in The &quot;Syntax&quot; Section">
+<link href="Naming-Conventions-for-Rest-Parameters.html" rel="prev" title="Naming Conventions for Rest Parameters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Requiring-Non_002dNull-Rest-Parameters-in-The-_0022Syntax_0022-Section">
+<div class="nav-panel">
+<p>
+Next: <a href="Return-values-in-The-_0022Syntax_0022-Section.html" accesskey="n" rel="next">Return values in The &quot;Syntax&quot; Section</a>, Previous: <a href="Naming-Conventions-for-Rest-Parameters.html" accesskey="p" rel="prev">Naming Conventions for Rest Parameters</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Requiring-Non_002dNull-Rest-Parameters-in-The-_0022Syntax_0022-Section-1"><span>1.4.4.27 Requiring Non-Null Rest Parameters in The &quot;Syntax&quot; Section<a class="copiable-link" href="#Requiring-Non_002dNull-Rest-Parameters-in-The-_0022Syntax_0022-Section-1"> &para;</a></span></h4>
+
+<p>In some cases it is useful to refer to all arguments equally as a single
+aggregation using a <i class="i">rest parameter</i> while at the same time
+requiring at least one argument.  A variety of imperative and
+declarative means are available in <i class="i">code</i> for expressing such a
+restriction, however they generally do not manifest themselves in a
+<i class="i">lambda list</i>.  For descriptive purposes within this specification,
+</p>
+<p><code class="code">F</code>  <i class="i"><span class="r">&amp;rest</span> arguments^+</i>
+</p>
+<p>means the same as
+</p>
+<p><code class="code">F</code>  <i class="i"><span class="r">&amp;rest</span> arguments</i>
+</p>
+<p>but introduces the additional requirement that there be 
+at least one <i class="i">argument</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Resignaling-a-Condition.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Resignaling a Condition (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Resignaling a Condition (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Resignaling a Condition (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Signaling-and-Handling-Conditions.html" rel="up" title="Signaling and Handling Conditions">
+<link href="Restarts.html" rel="next" title="Restarts">
+<link href="Signaling.html" rel="prev" title="Signaling">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Resignaling-a-Condition">
+<div class="nav-panel">
+<p>
+Next: <a href="Restarts.html" accesskey="n" rel="next">Restarts</a>, Previous: <a href="Signaling.html" accesskey="p" rel="prev">Signaling</a>, Up: <a href="Signaling-and-Handling-Conditions.html" accesskey="u" rel="up">Signaling and Handling Conditions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Resignaling-a-Condition-1"><span>9.1.4.2 Resignaling a Condition<a class="copiable-link" href="#Resignaling-a-Condition-1"> &para;</a></span></h4>
+
+<p>During the <i class="i">dynamic extent</i> of the <i class="i">signaling</i> process for
+a particular <i class="i">condition</i> <i class="i">object</i>, 
+<b class="b">signaling</b> the same <i class="i">condition</i> <i class="i">object</i> again
+is permitted if and only if the <i class="i">situation</i> represented in both
+cases are the same.
+</p>
+<p>For example, a <i class="i">handler</i> might legitimately <i class="i">signal</i> 
+the <i class="i">condition</i> <i class="i">object</i> that is its <i class="i">argument</i>
+in order to allow outer <i class="i">handlers</i> first opportunity to <i class="i">handle</i> 
+the condition.  (Such a <i class="i">handlers</i> is sometimes called a &ldquo;default handler.&rdquo;)
+This action is permitted because the <i class="i">situation</i> which the second
+<i class="i">signaling</i> process is addressing is really the same <i class="i">situation</i>.
+</p>
+<p>On the other hand, in an <i class="i">implementation</i> that implemented asynchronous 
+keyboard events by interrupting the user process with a call to <b class="b">signal</b>,
+it would not be permissible for two distinct asynchronous keyboard events
+to <i class="i">signal</i> <i class="i">identical</i> <i class="i">condition</i> <i class="i">objects</i>
+at the same time for different 
+situations.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Resolution-of-Apparent-Conflicts-in-Exceptional-Situations.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Resolution of Apparent Conflicts in Exceptional Situations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Resolution of Apparent Conflicts in Exceptional Situations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Resolution of Apparent Conflicts in Exceptional Situations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conforming-Implementations.html" rel="up" title="Conforming Implementations">
+<link href="Examples-of-Resolution-of-Apparent-Conflict-in-Exceptional-Situations.html" rel="next" title="Examples of Resolution of Apparent Conflict in Exceptional Situations">
+<link href="Treatment-of-Exceptional-Situations.html" rel="prev" title="Treatment of Exceptional Situations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Resolution-of-Apparent-Conflicts-in-Exceptional-Situations">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Resolution-of-Apparent-Conflict-in-Exceptional-Situations.html" accesskey="n" rel="next">Examples of Resolution of Apparent Conflict in Exceptional Situations</a>, Previous: <a href="Treatment-of-Exceptional-Situations.html" accesskey="p" rel="prev">Treatment of Exceptional Situations</a>, Up: <a href="Conforming-Implementations.html" accesskey="u" rel="up">Conforming Implementations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Resolution-of-Apparent-Conflicts-in-Exceptional-Situations-1"><span>1.5.1.5 Resolution of Apparent Conflicts in Exceptional Situations<a class="copiable-link" href="#Resolution-of-Apparent-Conflicts-in-Exceptional-Situations-1"> &para;</a></span></h4>
+
+<p>If more than one passage in this specification appears to apply to the
+same situation but in conflicting ways, the passage that appears
+to describe the situation in the most specific way (not necessarily the
+passage that provides the most constrained kind of error detection) 
+takes precedence.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Restart-Tests.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Restart Tests (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Restart Tests (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Restart Tests (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Signaling-and-Handling-Conditions.html" rel="up" title="Signaling and Handling Conditions">
+<link href="Associating-a-Restart-with-a-Condition.html" rel="next" title="Associating a Restart with a Condition">
+<link href="Interfaces-to-Restarts.html" rel="prev" title="Interfaces to Restarts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Restart-Tests">
+<div class="nav-panel">
+<p>
+Next: <a href="Associating-a-Restart-with-a-Condition.html" accesskey="n" rel="next">Associating a Restart with a Condition</a>, Previous: <a href="Interfaces-to-Restarts.html" accesskey="p" rel="prev">Interfaces to Restarts</a>, Up: <a href="Signaling-and-Handling-Conditions.html" accesskey="u" rel="up">Signaling and Handling Conditions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Restart-Tests-1"><span>9.1.4.6 Restart Tests<a class="copiable-link" href="#Restart-Tests-1"> &para;</a></span></h4>
+
+<p>Each <i class="i">restart</i> has an associated test, which is a function of one
+argument (a <i class="i">condition</i> or <b class="b">nil</b>) which returns <i class="i">true</i> if the <i class="i">restart</i>
+should be visible in the current <i class="i">situation</i>.  This test is created by 
+the <code class="t">:test-function</code> option to <b class="b">restart-bind</b> or 
+the <code class="t">:test</code> option to <b class="b">restart-case</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Restarts.html
@@ -0,0 +1,109 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Restarts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Restarts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Restarts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Signaling-and-Handling-Conditions.html" rel="up" title="Signaling and Handling Conditions">
+<link href="Interactive-Use-of-Restarts.html" rel="next" title="Interactive Use of Restarts">
+<link href="Resignaling-a-Condition.html" rel="prev" title="Resignaling a Condition">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Restarts">
+<div class="nav-panel">
+<p>
+Next: <a href="Interactive-Use-of-Restarts.html" accesskey="n" rel="next">Interactive Use of Restarts</a>, Previous: <a href="Resignaling-a-Condition.html" accesskey="p" rel="prev">Resignaling a Condition</a>, Up: <a href="Signaling-and-Handling-Conditions.html" accesskey="u" rel="up">Signaling and Handling Conditions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Restarts-1"><span>9.1.4.3 Restarts<a class="copiable-link" href="#Restarts-1"> &para;</a></span></h4>
+
+<p>The interactive condition handler returns only through
+non-local transfer of control to specially defined <i class="i">restarts</i>
+that can be set up either by the system or by user code.  Transferring
+control to a restart is called &ldquo;invoking&rdquo; the restart.  Like
+handlers, active <i class="i">restarts</i> are <i class="i">established</i>
+dynamically, and 
+only active <i class="i">restarts</i>
+can be invoked.  An active 
+<i class="i">restart</i> can be invoked by the user from
+the debugger or by a program by using <b class="b">invoke-restart</b>.
+</p>
+<p>A <i class="i">restart</i> contains a 
+<i class="i">function</i> to be <i class="i">called</i> when the <i class="i">restart</i> is
+invoked, an optional name that can be used to find or invoke the 
+<i class="i">restart</i>, and
+an optional set of interaction information for the debugger to use to
+enable the user to manually invoke a <i class="i">restart</i>. 
+</p>
+<p>The name of a <i class="i">restart</i> is
+used by <b class="b">invoke-restart</b>. <i class="i">Restarts</i> that can be invoked
+only within the debugger do not need names.
+</p>
+<p><i class="i">Restarts</i> can be established by using <b class="b">restart-bind</b>, 
+<b class="b">restart-case</b>, and <b class="b">with-simple-restart</b>.
+A <i class="i">restart</i> function can itself invoke any other <i class="i">restart</i>
+that was active at the time of establishment of the <i class="i">restart</i> 
+of which the <i class="i">function</i> is part.
+</p>
+<p>The <i class="i">restarts</i> <i class="i">established</i> by 
+    a <b class="b">restart-bind</b> <i class="i">form</i>, 
+    a <b class="b">restart-case</b> <i class="i">form</i>,
+ or a <b class="b">with-simple-restart</b> <i class="i">form</i>
+have <i class="i">dynamic extent</i>
+which extends for the duration of that <i class="i">form</i>&rsquo;s execution.
+</p>
+<p><i class="i">Restarts</i> of the same name can be ordered from least recent to
+most recent according to the following two rules:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>Each <i class="i">restart</i> in a set of active restarts
+R_1 is more recent than every <i class="i">restart</i> in a
+set R_2 if the <i class="i">restarts</i> 
+in R_2 were active when the  <i class="i">restarts</i> in R_1 were
+established.
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p>Let r_1 and r_2 be two active <i class="i">restarts</i> with
+the same name established by the same <i class="i">form</i>. Then r_1 is
+more recent than r_2 if r_1 was defined to the
+left of r_2 in the <i class="i">form</i> that established them.
+</p>
+</dd>
+</dl>
+
+<p>If a <i class="i">restart</i> is invoked but does not transfer control,
+the values resulting from the <i class="i">restart</i> function are
+returned by the function that invoked the restart, either
+<b class="b">invoke-restart</b> or <b class="b">invoke-restart-interactively</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Interactive-Use-of-Restarts.html">Interactive Use of Restarts</a>, Previous: <a href="Resignaling-a-Condition.html">Resignaling a Condition</a>, Up: <a href="Signaling-and-Handling-Conditions.html">Signaling and Handling Conditions</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Restrictions-on-Composite-Streams.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Restrictions on Composite Streams (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Restrictions on Composite Streams (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Restrictions on Composite Streams (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Stream-Concepts.html" rel="up" title="Stream Concepts">
+<link href="Stream-Arguments-to-Standardized-Functions.html" rel="prev" title="Stream Arguments to Standardized Functions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Restrictions-on-Composite-Streams">
+<div class="nav-panel">
+<p>
+Previous: <a href="Stream-Arguments-to-Standardized-Functions.html" accesskey="p" rel="prev">Stream Arguments to Standardized Functions</a>, Up: <a href="Stream-Concepts.html" accesskey="u" rel="up">Stream Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Restrictions-on-Composite-Streams-1"><span>21.1.4 Restrictions on Composite Streams<a class="copiable-link" href="#Restrictions-on-Composite-Streams-1"> &para;</a></span></h4>
+
+<p>The consequences are undefined if any <i class="i">component</i> of a <i class="i">composite stream</i>
+is <i class="i">closed</i> before the <i class="i">composite stream</i> is <i class="i">closed</i>.
+</p>
+<p>The consequences are undefined if the <i class="i">synonym stream symbol</i> is not <i class="i">bound</i>
+to an <i class="i">open</i> <i class="i">stream</i> from the time of the <i class="i">synonym stream</i>&rsquo;s creation
+until the time it is <i class="i">closed</i>.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Restrictions-on-Constructing-Pathnames.html
@@ -0,0 +1,90 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Restrictions on Constructing Pathnames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Restrictions on Constructing Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Restrictions on Constructing Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Notes-about-the-Pathname-Version-Component.html" rel="prev" title="Notes about the Pathname Version Component">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Restrictions-on-Constructing-Pathnames">
+<div class="nav-panel">
+<p>
+Previous: <a href="Notes-about-the-Pathname-Version-Component.html" accesskey="p" rel="prev">Notes about the Pathname Version Component</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Restrictions-on-Constructing-Pathnames-1"><span>19.2.2.21 Restrictions on Constructing Pathnames<a class="copiable-link" href="#Restrictions-on-Constructing-Pathnames-1"> &para;</a></span></h4>
+
+<p>When constructing a <i class="i">pathname</i> from components, conforming programs
+  must follow these rules:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>Any component can be <b class="b">nil</b>.
+  <b class="b">nil</b> in the host might mean a default host 
+  rather than an actual <b class="b">nil</b> in some implementations.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The host, device, directory, name, and type can be <i class="i">strings</i>.  There
+  are <i class="i">implementation-dependent</i> limits on the number and type of
+  <i class="i">characters</i> in these <i class="i">strings</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The directory can be a <i class="i">list</i> of <i class="i">strings</i> and <i class="i">symbols</i>.
+  There are <i class="i">implementation-dependent</i> limits on the <i class="i">list</i>&rsquo;s
+  length and contents.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The version can be <code class="t">:newest</code>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Any component can be taken 
+  from the corresponding component of another <i class="i">pathname</i>.
+  When the two <i class="i">pathnames</i> are for different file systems
+    (in implementations that support multiple file systems),
+  an appropriate translation occurs.
+  If no meaningful translation is possible,
+  an error is signaled.
+  The definitions of &ldquo;appropriate&rdquo; and &ldquo;meaningful&rdquo; 
+  are <i class="i">implementation-dependent</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>An implementation might support other values for some components,
+  but a portable program cannot use those values.
+  A conforming program can use <i class="i">implementation-dependent</i> values
+  but this can make it non-portable;
+  for example, it might work only with <span class="r">Unix</span> file systems.
+</p></dd>
+</dl>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Restrictions-on-Examining-Pathname-Components.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Restrictions on Examining Pathname Components (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Restrictions on Examining Pathname Components (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Restrictions on Examining Pathname Components (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Restrictions-on-Examining-a-Pathname-Host-Component.html" rel="next" title="Restrictions on Examining a Pathname Host Component">
+<link href="Restrictions-on-Wildcard-Pathnames.html" rel="prev" title="Restrictions on Wildcard Pathnames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Restrictions-on-Examining-Pathname-Components">
+<div class="nav-panel">
+<p>
+Next: <a href="Restrictions-on-Examining-a-Pathname-Host-Component.html" accesskey="n" rel="next">Restrictions on Examining a Pathname Host Component</a>, Previous: <a href="Restrictions-on-Wildcard-Pathnames.html" accesskey="p" rel="prev">Restrictions on Wildcard Pathnames</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Restrictions-on-Examining-Pathname-Components-1"><span>19.2.2.12 Restrictions on Examining Pathname Components<a class="copiable-link" href="#Restrictions-on-Examining-Pathname-Components-1"> &para;</a></span></h4>
+
+<p>The space of possible <i class="i">objects</i> that a <i class="i">conforming program</i> 
+must be prepared to <i class="i">read</i>_1 
+as the value of a <i class="i">pathname</i> component
+is substantially larger than the space of possible <i class="i">objects</i> 
+that a <i class="i">conforming program</i> is permitted to <i class="i">write</i>_1
+into such a component.
+</p>
+<p>While the values discussed 
+    in the subsections of this section,
+    in <a class="ref" href="Special-Pathname-Component-Values.html">Special Pathname Component Values</a>,
+and in <a class="ref" href="Restrictions-on-Wildcard-Pathnames.html">Restrictions on Wildcard Pathnames</a> 
+apply to values that might be seen when 
+reading the component values,
+substantially more restrictive rules apply to constructing pathnames;
+see <a class="ref" href="Restrictions-on-Constructing-Pathnames.html">Restrictions on Constructing Pathnames</a>.
+</p>
+<p>When examining <i class="i">pathname</i> components,
+<i class="i">conforming programs</i> should be aware of the following restrictions.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Restrictions-on-Examining-a-Pathname-Device-Component.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Restrictions on Examining a Pathname Device Component (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Restrictions on Examining a Pathname Device Component (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Restrictions on Examining a Pathname Device Component (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Restrictions-on-Examining-a-Pathname-Directory-Component.html" rel="next" title="Restrictions on Examining a Pathname Directory Component">
+<link href="Restrictions-on-Examining-a-Pathname-Host-Component.html" rel="prev" title="Restrictions on Examining a Pathname Host Component">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Restrictions-on-Examining-a-Pathname-Device-Component">
+<div class="nav-panel">
+<p>
+Next: <a href="Restrictions-on-Examining-a-Pathname-Directory-Component.html" accesskey="n" rel="next">Restrictions on Examining a Pathname Directory Component</a>, Previous: <a href="Restrictions-on-Examining-a-Pathname-Host-Component.html" accesskey="p" rel="prev">Restrictions on Examining a Pathname Host Component</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Restrictions-on-Examining-a-Pathname-Device-Component-1"><span>19.2.2.14 Restrictions on Examining a Pathname Device Component<a class="copiable-link" href="#Restrictions-on-Examining-a-Pathname-Device-Component-1"> &para;</a></span></h4>
+
+<p>The device might be a <i class="i">string</i>,
+<code class="t">:wild</code>, <code class="t">:unspecific</code>, or <b class="b">nil</b>.
+</p>
+<p>Note that <code class="t">:wild</code> might result from an attempt to <i class="i">read</i>_1
+the <i class="i">pathname</i> component, even though portable programs are restricted
+from <i class="i">writing</i>_1 such a component value; 
+see <a class="ref" href="Restrictions-on-Wildcard-Pathnames.html">Restrictions on Wildcard Pathnames</a> and <a class="ref" href="Restrictions-on-Constructing-Pathnames.html">Restrictions on Constructing Pathnames</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Restrictions-on-Examining-a-Pathname-Directory-Component.html
@@ -0,0 +1,154 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Restrictions on Examining a Pathname Directory Component (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Restrictions on Examining a Pathname Directory Component (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Restrictions on Examining a Pathname Directory Component (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Directory-Components-in-Non_002dHierarchical-File-Systems.html" rel="next" title="Directory Components in Non-Hierarchical File Systems">
+<link href="Restrictions-on-Examining-a-Pathname-Device-Component.html" rel="prev" title="Restrictions on Examining a Pathname Device Component">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Restrictions-on-Examining-a-Pathname-Directory-Component">
+<div class="nav-panel">
+<p>
+Next: <a href="Directory-Components-in-Non_002dHierarchical-File-Systems.html" accesskey="n" rel="next">Directory Components in Non-Hierarchical File Systems</a>, Previous: <a href="Restrictions-on-Examining-a-Pathname-Device-Component.html" accesskey="p" rel="prev">Restrictions on Examining a Pathname Device Component</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Restrictions-on-Examining-a-Pathname-Directory-Component-1"><span>19.2.2.15 Restrictions on Examining a Pathname Directory Component<a class="copiable-link" href="#Restrictions-on-Examining-a-Pathname-Directory-Component-1"> &para;</a></span></h4>
+
+<p>The directory might be a <i class="i">string</i>,
+<code class="t">:wild</code>, <code class="t">:unspecific</code>, or <b class="b">nil</b>.
+</p>
+<p>The directory can be a <i class="i">list</i> of <i class="i">strings</i> and <i class="i">symbols</i>. 
+</p>
+<p>The <i class="i">car</i> of the <i class="i">list</i> is one of the symbols <code class="t">:absolute</code>
+ or 
+<code class="t">:relative</code>
+, meaning:
+</p>
+<dl class="table">
+<dt><code class="t">:absolute</code></dt>
+<dd><p>A <i class="i">list</i> whose <i class="i">car</i> is the symbol <code class="t">:absolute</code> represents 
+  a directory path starting from the root directory.  The list 
+  <code class="t">(:absolute)</code> represents the root directory.  The list 
+  <code class="t">(:absolute &quot;foo&quot; &quot;bar&quot; &quot;baz&quot;)</code> represents the directory called
+  <code class="t">&quot;/foo/bar/baz&quot;</code> in Unix (except possibly for <i class="i">case</i>).
+</p>
+</dd>
+<dt><code class="t">:relative</code></dt>
+<dd><p>A <i class="i">list</i> whose <i class="i">car</i> is the symbol <code class="t">:relative</code> represents 
+  a directory path starting from a default directory.  
+  The list <code class="t">(:relative)</code> has the same meaning as <b class="b">nil</b> and hence is not used.
+  The list <code class="t">(:relative &quot;foo&quot; &quot;bar&quot;)</code> represents the directory named <code class="t">&quot;bar&quot;</code> 
+  in the directory named <code class="t">&quot;foo&quot;</code> in the default directory.
+</p>
+</dd>
+</dl>
+
+<p>Each remaining element of the <i class="i">list</i> is a <i class="i">string</i> or a <i class="i">symbol</i>.
+</p>
+<p>Each <i class="i">string</i> names a single level of directory structure.
+The <i class="i">strings</i> should contain only the directory names 
+themselves&mdash;no punctuation characters.
+</p>
+<p>In place of a <i class="i">string</i>, at any point in the <i class="i">list</i>, <i class="i">symbols</i> 
+can occur to indicate special file notations.
+Figure 19&ndash;3 lists the <i class="i">symbols</i> that have standard meanings.
+Implementations are permitted to add additional <i class="i">objects</i> 
+of any <i class="i">type</i> that is disjoint from <b class="b">string</b>
+if necessary to represent features of their file systems that cannot be
+represented with the standard <i class="i">strings</i> and <i class="i">symbols</i>.
+</p>
+<p>Supplying any non-<i class="i">string</i>, including any of the <i class="i">symbols</i> listed below, 
+to a file system for which it does not make sense
+signals an error of <i class="i">type</i> <b class="b">file-error</b>.
+For example, Unix does not support <code class="t">:wild-inferiors</code> in most implementations.
+</p>
+
+
+
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Symbol           Meaning                                             <!-- /@w -->
+  <code class="t">:wild</code>            Wildcard match of one level of directory structure  <!-- /@w -->
+  <code class="t">:wild-inferiors</code>  Wildcard match of any number of directory levels    <!-- /@w -->
+  <code class="t">:up</code>              Go upward in directory structure (semantic)         <!-- /@w -->
+  <code class="t">:back</code>            Go upward in directory structure (syntactic)        <!-- /@w -->
+
+          Figure 19&ndash;3: Special Markers In Directory Component         <!-- /@w -->
+
+</pre></div></div>
+
+<p>The following notes apply to the previous figure:
+</p>
+<dl class="table">
+<dt>Invalid Combinations</dt>
+<dd><p>Using <code class="t">:absolute</code> or <code class="t">:wild-inferiors</code> 
+immediately followed by <code class="t">:up</code> or <code class="t">:back</code>
+signals an error of <i class="i">type</i> <b class="b">file-error</b>.
+</p>
+</dd>
+<dt>Syntactic vs Semantic</dt>
+<dd><p>&ldquo;Syntactic&rdquo; means that the action of <code class="t">:back</code> 
+depends only on the <i class="i">pathname</i>
+and not on the contents of the file system.  
+</p>
+<p>&ldquo;Semantic&rdquo; means that the action of <code class="t">:up</code> 
+depends on the contents of the file system; 
+to resolve a <i class="i">pathname</i> containing 
+<code class="t">:up</code> to a <i class="i">pathname</i> whose directory component
+contains only <code class="t">:absolute</code> and 
+<i class="i">strings</i> requires probing the file system.
+</p>
+<p><code class="t">:up</code> differs from 
+<code class="t">:back</code> only in file systems that support multiple
+  names for directories, perhaps via symbolic links.  For example,
+  suppose that there is a directory
+<code class="t">(:absolute &quot;X&quot; &quot;Y&quot; &quot;Z&quot;)</code>
+  linked to 
+<code class="t">(:absolute &quot;A&quot; &quot;B&quot; &quot;C&quot;)</code>
+  and there also exist directories
+<code class="t">(:absolute &quot;A&quot; &quot;B&quot; &quot;Q&quot;)</code> and 
+<code class="t">(:absolute &quot;X&quot; &quot;Y&quot; &quot;Q&quot;)</code>.
+Then
+<code class="t">(:absolute &quot;X&quot; &quot;Y&quot; &quot;Z&quot; :up &quot;Q&quot;)</code>
+  designates
+<code class="t">(:absolute &quot;A&quot; &quot;B&quot; &quot;Q&quot;)</code>
+  while
+<code class="t">(:absolute &quot;X&quot; &quot;Y&quot; &quot;Z&quot; :back &quot;Q&quot;)</code>
+  designates
+<code class="t">(:absolute &quot;X&quot; &quot;Y&quot; &quot;Q&quot;)</code>
+</p></dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Directory-Components-in-Non_002dHierarchical-File-Systems.html">Directory Components in Non-Hierarchical File Systems</a>, Previous: <a href="Restrictions-on-Examining-a-Pathname-Device-Component.html">Restrictions on Examining a Pathname Device Component</a>, Up: <a href="Interpreting-Pathname-Component-Values.html">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Restrictions-on-Examining-a-Pathname-Host-Component.html
@@ -0,0 +1,45 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Restrictions on Examining a Pathname Host Component (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Restrictions on Examining a Pathname Host Component (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Restrictions on Examining a Pathname Host Component (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Restrictions-on-Examining-a-Pathname-Device-Component.html" rel="next" title="Restrictions on Examining a Pathname Device Component">
+<link href="Restrictions-on-Examining-Pathname-Components.html" rel="prev" title="Restrictions on Examining Pathname Components">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Restrictions-on-Examining-a-Pathname-Host-Component">
+<div class="nav-panel">
+<p>
+Next: <a href="Restrictions-on-Examining-a-Pathname-Device-Component.html" accesskey="n" rel="next">Restrictions on Examining a Pathname Device Component</a>, Previous: <a href="Restrictions-on-Examining-Pathname-Components.html" accesskey="p" rel="prev">Restrictions on Examining Pathname Components</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Restrictions-on-Examining-a-Pathname-Host-Component-1"><span>19.2.2.13 Restrictions on Examining a Pathname Host Component<a class="copiable-link" href="#Restrictions-on-Examining-a-Pathname-Host-Component-1"> &para;</a></span></h4>
+
+<p>It is <i class="i">implementation-dependent</i> what <i class="i">object</i> is used to represent the host. 
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Restrictions-on-Examining-a-Pathname-Name-Component.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Restrictions on Examining a Pathname Name Component (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Restrictions on Examining a Pathname Name Component (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Restrictions on Examining a Pathname Name Component (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Restrictions-on-Examining-a-Pathname-Type-Component.html" rel="next" title="Restrictions on Examining a Pathname Type Component">
+<link href="Directory-Components-in-Non_002dHierarchical-File-Systems.html" rel="prev" title="Directory Components in Non-Hierarchical File Systems">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Restrictions-on-Examining-a-Pathname-Name-Component">
+<div class="nav-panel">
+<p>
+Next: <a href="Restrictions-on-Examining-a-Pathname-Type-Component.html" accesskey="n" rel="next">Restrictions on Examining a Pathname Type Component</a>, Previous: <a href="Directory-Components-in-Non_002dHierarchical-File-Systems.html" accesskey="p" rel="prev">Directory Components in Non-Hierarchical File Systems</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Restrictions-on-Examining-a-Pathname-Name-Component-1"><span>19.2.2.17 Restrictions on Examining a Pathname Name Component<a class="copiable-link" href="#Restrictions-on-Examining-a-Pathname-Name-Component-1"> &para;</a></span></h4>
+
+<p>The name might be a <i class="i">string</i>,
+<code class="t">:wild</code>, <code class="t">:unspecific</code>, or <b class="b">nil</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Restrictions-on-Examining-a-Pathname-Type-Component.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Restrictions on Examining a Pathname Type Component (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Restrictions on Examining a Pathname Type Component (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Restrictions on Examining a Pathname Type Component (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Restrictions-on-Examining-a-Pathname-Version-Component.html" rel="next" title="Restrictions on Examining a Pathname Version Component">
+<link href="Restrictions-on-Examining-a-Pathname-Name-Component.html" rel="prev" title="Restrictions on Examining a Pathname Name Component">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Restrictions-on-Examining-a-Pathname-Type-Component">
+<div class="nav-panel">
+<p>
+Next: <a href="Restrictions-on-Examining-a-Pathname-Version-Component.html" accesskey="n" rel="next">Restrictions on Examining a Pathname Version Component</a>, Previous: <a href="Restrictions-on-Examining-a-Pathname-Name-Component.html" accesskey="p" rel="prev">Restrictions on Examining a Pathname Name Component</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Restrictions-on-Examining-a-Pathname-Type-Component-1"><span>19.2.2.18 Restrictions on Examining a Pathname Type Component<a class="copiable-link" href="#Restrictions-on-Examining-a-Pathname-Type-Component-1"> &para;</a></span></h4>
+
+<p>The type might be a <i class="i">string</i>,
+<code class="t">:wild</code>, <code class="t">:unspecific</code>, or <b class="b">nil</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Restrictions-on-Examining-a-Pathname-Version-Component.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Restrictions on Examining a Pathname Version Component (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Restrictions on Examining a Pathname Version Component (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Restrictions on Examining a Pathname Version Component (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Notes-about-the-Pathname-Version-Component.html" rel="next" title="Notes about the Pathname Version Component">
+<link href="Restrictions-on-Examining-a-Pathname-Type-Component.html" rel="prev" title="Restrictions on Examining a Pathname Type Component">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Restrictions-on-Examining-a-Pathname-Version-Component">
+<div class="nav-panel">
+<p>
+Next: <a href="Notes-about-the-Pathname-Version-Component.html" accesskey="n" rel="next">Notes about the Pathname Version Component</a>, Previous: <a href="Restrictions-on-Examining-a-Pathname-Type-Component.html" accesskey="p" rel="prev">Restrictions on Examining a Pathname Type Component</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Restrictions-on-Examining-a-Pathname-Version-Component-1"><span>19.2.2.19 Restrictions on Examining a Pathname Version Component<a class="copiable-link" href="#Restrictions-on-Examining-a-Pathname-Version-Component-1"> &para;</a></span></h4>
+
+<p>The version can be any <i class="i">symbol</i> or any <i class="i">integer</i>.  
+</p>
+<p>The symbol <code class="t">:newest</code> refers to the largest version number 
+that already exists in the <i class="i">file system</i>
+when reading, overwriting, appending, superseding, or directory listing 
+an existing <i class="i">file</i>.
+The symbol <code class="t">:newest</code> refers to the smallest version number
+greater than any existing version number when creating a new file.
+</p>
+<p>The symbols <b class="b">nil</b>, <code class="t">:unspecific</code>, and <code class="t">:wild</code> have special meanings and
+restrictions; see <a class="ref" href="Special-Pathname-Component-Values.html">Special Pathname Component Values</a> and <a class="ref" href="Restrictions-on-Constructing-Pathnames.html">Restrictions on Constructing Pathnames</a>.
+</p>
+<p>Other <i class="i">symbols</i> and <i class="i">integers</i>
+have <i class="i">implementation-defined</i> meaning.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Restrictions-on-Side_002dEffects.html
@@ -0,0 +1,44 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Restrictions on Side-Effects (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Restrictions on Side-Effects (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Restrictions on Side-Effects (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-the-Loop-Facility.html" rel="up" title="Overview of the Loop Facility">
+<link href="Destructuring.html" rel="prev" title="Destructuring">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Restrictions-on-Side_002dEffects">
+<div class="nav-panel">
+<p>
+Previous: <a href="Destructuring.html" accesskey="p" rel="prev">Destructuring</a>, Up: <a href="Overview-of-the-Loop-Facility.html" accesskey="u" rel="up">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Restrictions-on-Side_002dEffects-1"><span>6.1.1.16 Restrictions on Side-Effects<a class="copiable-link" href="#Restrictions-on-Side_002dEffects-1"> &para;</a></span></h4>
+
+<p>See <a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Restrictions-on-Wildcard-Pathnames.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Restrictions on Wildcard Pathnames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Restrictions on Wildcard Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Restrictions on Wildcard Pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Restrictions-on-Examining-Pathname-Components.html" rel="next" title="Restrictions on Examining Pathname Components">
+<link href="Relation-between-component-values-NIL-and-_002d_003eUNSPECIFIC.html" rel="prev" title="Relation between component values NIL and -&gt;UNSPECIFIC">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Restrictions-on-Wildcard-Pathnames">
+<div class="nav-panel">
+<p>
+Next: <a href="Restrictions-on-Examining-Pathname-Components.html" accesskey="n" rel="next">Restrictions on Examining Pathname Components</a>, Previous: <a href="Relation-between-component-values-NIL-and-_002d_003eUNSPECIFIC.html" accesskey="p" rel="prev">Relation between component values NIL and :UNSPECIFIC</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Restrictions-on-Wildcard-Pathnames-1"><span>19.2.2.11 Restrictions on Wildcard Pathnames<a class="copiable-link" href="#Restrictions-on-Wildcard-Pathnames-1"> &para;</a></span></h4>
+
+<p>Wildcard <i class="i">pathnames</i> can be used with <b class="b">directory</b> but not with 
+  <b class="b">open</b>,
+  and return true from <b class="b">wild-pathname-p</b>. When examining
+  wildcard components of a wildcard <i class="i">pathname</i>, conforming programs
+  must be prepared to encounter any of the following additional values
+  in any component or any element of a <i class="i">list</i> that is the directory component:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The <i class="i">symbol</i> <code class="t">:wild</code>, which matches anything.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>A <i class="i">string</i> containing <i class="i">implementation-dependent</i> 
+		 special wildcard <i class="i">characters</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Any <i class="i">object</i>,
+		 representing an <i class="i">implementation-dependent</i> wildcard pattern.
+</p>
+</dd>
+</dl>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Return-Values.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Return Values (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Return Values (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Return Values (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation.html" rel="up" title="Evaluation">
+<link href="Extent.html" rel="prev" title="Extent">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Return-Values">
+<div class="nav-panel">
+<p>
+Previous: <a href="Extent.html" accesskey="p" rel="prev">Extent</a>, Up: <a href="Evaluation.html" accesskey="u" rel="up">Evaluation</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Return-Values-1"><span>3.1.7 Return Values<a class="copiable-link" href="#Return-Values-1"> &para;</a></span></h4>
+
+<p>Ordinarily the result of calling a <i class="i">function</i> is a single <i class="i">object</i>.
+Sometimes, however, it is convenient for a function to compute several
+<i class="i">objects</i> and return them.
+</p>
+<p>In order to receive other than exactly one value from a <i class="i">form</i>,
+one of several <i class="i">special forms</i> or <i class="i">macros</i> must be used to request those
+values.  If a <i class="i">form</i> produces <i class="i">multiple values</i> which were not
+requested in this way, then the first value is given to the caller and
+all others are discarded; if the <i class="i">form</i> produces zero values,
+then the caller receives <b class="b">nil</b> as a value.
+</p>
+<p>Figure 3&ndash;5 lists 
+some <i class="i">operators</i> for receiving <i class="i">multiple values</i>_2.
+These <i class="i">operators</i> can be used to specify 
+    one or more <i class="i">forms</i> to <i class="i">evaluate</i> 
+and where to put the <i class="i">values</i> returned by those <i class="i">forms</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  multiple-value-bind  multiple-value-prog1  return-from  <!-- /@w -->
+  multiple-value-call  multiple-value-setq   throw        <!-- /@w -->
+  multiple-value-list  return                             <!-- /@w -->
+
+  Figure 3&ndash;5: Some operators applicable to receiving multiple values<!-- /@w -->
+
+</pre></div></div>
+
+<p>The <i class="i">function</i> <b class="b">values</b> can produce <i class="i">multiple values</i>_2.
+<code class="t">(values)</code> returns zero values;
+<code class="t">(values <i class="i">form</i>)</code> returns the <i class="i">primary value</i> returned by <i class="i">form</i>;
+<code class="t">(values <i class="i">form1</i> <i class="i">form2</i>)</code> returns two values,
+    the <i class="i">primary value</i> of <i class="i">form1</i>
+and the <i class="i">primary value</i> of <i class="i">form2</i>;
+and so on.
+</p>
+<p>See <b class="b">multiple-values-limit</b> and <b class="b">values-list</b>.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Return-values-in-The-_0022Syntax_0022-Section.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Return values in The &quot;Syntax&quot; Section (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Return values in The &quot;Syntax&quot; Section (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Return values in The &quot;Syntax&quot; Section (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="No-Arguments-or-Values-in-The-_0022Syntax_0022-Section.html" rel="next" title="No Arguments or Values in The &quot;Syntax&quot; Section">
+<link href="Requiring-Non_002dNull-Rest-Parameters-in-The-_0022Syntax_0022-Section.html" rel="prev" title="Requiring Non-Null Rest Parameters in The &quot;Syntax&quot; Section">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Return-values-in-The-_0022Syntax_0022-Section">
+<div class="nav-panel">
+<p>
+Next: <a href="No-Arguments-or-Values-in-The-_0022Syntax_0022-Section.html" accesskey="n" rel="next">No Arguments or Values in The &quot;Syntax&quot; Section</a>, Previous: <a href="Requiring-Non_002dNull-Rest-Parameters-in-The-_0022Syntax_0022-Section.html" accesskey="p" rel="prev">Requiring Non-Null Rest Parameters in The &quot;Syntax&quot; Section</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Return-values-in-The-_0022Syntax_0022-Section-1"><span>1.4.4.28 Return values in The &quot;Syntax&quot; Section<a class="copiable-link" href="#Return-values-in-The-_0022Syntax_0022-Section-1"> &para;</a></span></h4>
+
+<p>An evaluation arrow &ldquo;&rArr;&rdquo; precedes a list of <i class="i">values</i> to be returned.
+For example:
+</p>
+<p><code class="code">F</code>  <i class="i">a b c</i> &rArr;  <i class="i">x</i>
+</p>
+<p>indicates that <code class="t">F</code> is an operator that has three <i class="i">required parameters</i>
+(<i class="i">i.e.</i>, <i class="i">a</i>, <i class="i">b</i>, and <i class="i">c</i>) and that returns one <i class="i">value</i> (<i class="i">i.e.</i>, <i class="i">x</i>).
+If more than one <i class="i">value</i> is returned by an operator, the <i class="i">names</i> of the
+<i class="i">values</i> are separated by commas, as in:
+</p>
+<p><code class="code">F</code>  <i class="i">a b c</i> &rArr;  <i class="i">x, y, z</i>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Right_002dParenthesis.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Right-Parenthesis (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Right-Parenthesis (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Right-Parenthesis (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standard-Macro-Characters.html" rel="up" title="Standard Macro Characters">
+<link href="Single_002dQuote.html" rel="next" title="Single-Quote">
+<link href="Left_002dParenthesis.html" rel="prev" title="Left-Parenthesis">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Right_002dParenthesis">
+<div class="nav-panel">
+<p>
+Next: <a href="Single_002dQuote.html" accesskey="n" rel="next">Single-Quote</a>, Previous: <a href="Left_002dParenthesis.html" accesskey="p" rel="prev">Left-Parenthesis</a>, Up: <a href="Standard-Macro-Characters.html" accesskey="u" rel="up">Standard Macro Characters</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Right_002dParenthesis-1"><span>2.4.2 Right-Parenthesis<a class="copiable-link" href="#Right_002dParenthesis-1"> &para;</a></span></h4>
+
+<p>The <i class="i">right-parenthesis</i> is invalid 
+except when used in conjunction with the left parenthesis character.
+For more information, see <a class="ref" href="Reader-Algorithm.html">Reader Algorithm</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Rule-of-Canonical-Representation-for-Complex-Rationals.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Rule of Canonical Representation for Complex Rationals (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Rule of Canonical Representation for Complex Rationals (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Rule of Canonical Representation for Complex Rationals (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Complex-Computations.html" rel="up" title="Complex Computations">
+<link href="Examples-of-Rule-of-Canonical-Representation-for-Complex-Rationals.html" rel="next" title="Examples of Rule of Canonical Representation for Complex Rationals">
+<link href="Rule-of-Complex-Contagion.html" rel="prev" title="Rule of Complex Contagion">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Rule-of-Canonical-Representation-for-Complex-Rationals">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Rule-of-Canonical-Representation-for-Complex-Rationals.html" accesskey="n" rel="next">Examples of Rule of Canonical Representation for Complex Rationals</a>, Previous: <a href="Rule-of-Complex-Contagion.html" accesskey="p" rel="prev">Rule of Complex Contagion</a>, Up: <a href="Complex-Computations.html" accesskey="u" rel="up">Complex Computations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Rule-of-Canonical-Representation-for-Complex-Rationals-1"><span>12.1.5.3 Rule of Canonical Representation for Complex Rationals<a class="copiable-link" href="#Rule-of-Canonical-Representation-for-Complex-Rationals-1"> &para;</a></span></h4>
+
+<p>If the result of any computation would be a <i class="i">complex</i>
+number whose real part is of <i class="i">type</i> <b class="b">rational</b> and whose imaginary
+part is zero, the result is converted to the <i class="i">rational</i> 
+which is the real part.
+This rule does not apply to <i class="i">complex</i> numbers whose parts
+are <i class="i">floats</i>. 
+For example, <code class="t">#C(5 0)</code> and <code class="t">5</code> are not <i class="i">different</i> <i class="i">objects</i> in <span class="r">Common Lisp</span>
+(they are always the <i class="i">same</i> under <b class="b">eql</b>);
+<code class="t">#C(5.0 0.0)</code> and <code class="t">5.0</code> are always <i class="i">different</i> <i class="i">objects</i> in <span class="r">Common Lisp</span>
+(they are never the <i class="i">same</i> under <b class="b">eql</b>,
+although they are the <i class="i">same</i> under <b class="b">equalp</b> and <b class="b">=</b>).
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Rule-of-Canonical-Representation-for-Rationals.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Rule of Canonical Representation for Rationals (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Rule of Canonical Representation for Rationals (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Rule of Canonical Representation for Rationals (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Rational-Computations.html" rel="up" title="Rational Computations">
+<link href="Rule-of-Float-Substitutability.html" rel="next" title="Rule of Float Substitutability">
+<link href="Rule-of-Unbounded-Rational-Precision.html" rel="prev" title="Rule of Unbounded Rational Precision">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Rule-of-Canonical-Representation-for-Rationals">
+<div class="nav-panel">
+<p>
+Next: <a href="Rule-of-Float-Substitutability.html" accesskey="n" rel="next">Rule of Float Substitutability</a>, Previous: <a href="Rule-of-Unbounded-Rational-Precision.html" accesskey="p" rel="prev">Rule of Unbounded Rational Precision</a>, Up: <a href="Rational-Computations.html" accesskey="u" rel="up">Rational Computations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Rule-of-Canonical-Representation-for-Rationals-1"><span>12.1.3.2 Rule of Canonical Representation for Rationals<a class="copiable-link" href="#Rule-of-Canonical-Representation-for-Rationals-1"> &para;</a></span></h4>
+
+<p>If any computation produces a result that is a mathematical ratio of two integers
+such that the denominator evenly divides the numerator, then the result is converted
+to the equivalent <i class="i">integer</i>.  
+</p>
+<p>If the denominator does not evenly divide the numerator,
+the canonical representation of a <i class="i">rational</i> number is as the <i class="i">ratio</i>
+that numerator and that denominator, where the greatest common divisor of
+the numerator and denominator is one, and where the denominator is positive
+and greater than one.
+</p>
+<p>When used as input (in the default syntax),
+the notation <code class="t">-0</code> always denotes the <i class="i">integer</i> <code class="t">0</code>.
+A <i class="i">conforming implementation</i> must not have a
+representation of &ldquo;minus zero&rdquo; for <i class="i">integers</i>
+that is distinct from its representation of zero for <i class="i">integers</i>.
+However, such a distinction is possible for <i class="i">floats</i>; 
+see the <i class="i">type</i> <b class="b">float</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Rule-of-Complex-Contagion.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Rule of Complex Contagion (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Rule of Complex Contagion (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Rule of Complex Contagion (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Complex-Computations.html" rel="up" title="Complex Computations">
+<link href="Rule-of-Canonical-Representation-for-Complex-Rationals.html" rel="next" title="Rule of Canonical Representation for Complex Rationals">
+<link href="Rule-of-Complex-Substitutability.html" rel="prev" title="Rule of Complex Substitutability">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Rule-of-Complex-Contagion">
+<div class="nav-panel">
+<p>
+Next: <a href="Rule-of-Canonical-Representation-for-Complex-Rationals.html" accesskey="n" rel="next">Rule of Canonical Representation for Complex Rationals</a>, Previous: <a href="Rule-of-Complex-Substitutability.html" accesskey="p" rel="prev">Rule of Complex Substitutability</a>, Up: <a href="Complex-Computations.html" accesskey="u" rel="up">Complex Computations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Rule-of-Complex-Contagion-1"><span>12.1.5.2 Rule of Complex Contagion<a class="copiable-link" href="#Rule-of-Complex-Contagion-1"> &para;</a></span></h4>
+
+<p>When a 
+</p>
+<p><i class="i">real</i>
+</p>
+<p>and 
+a <i class="i">complex</i> are both part of a computation, 
+the 
+</p>
+<p><i class="i">real</i>
+</p>
+<p>is first converted to a <i class="i">complex</i> by providing an imaginary part of <code class="t">0</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Rule-of-Complex-Substitutability.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Rule of Complex Substitutability (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Rule of Complex Substitutability (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Rule of Complex Substitutability (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Complex-Computations.html" rel="up" title="Complex Computations">
+<link href="Rule-of-Complex-Contagion.html" rel="next" title="Rule of Complex Contagion">
+<link href="Complex-Computations.html" rel="prev" title="Complex Computations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Rule-of-Complex-Substitutability">
+<div class="nav-panel">
+<p>
+Next: <a href="Rule-of-Complex-Contagion.html" accesskey="n" rel="next">Rule of Complex Contagion</a>, Previous: <a href="Complex-Computations.html" accesskey="p" rel="prev">Complex Computations</a>, Up: <a href="Complex-Computations.html" accesskey="u" rel="up">Complex Computations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Rule-of-Complex-Substitutability-1"><span>12.1.5.1 Rule of Complex Substitutability<a class="copiable-link" href="#Rule-of-Complex-Substitutability-1"> &para;</a></span></h4>
+
+<p>Except during the execution of irrational and transcendental <i class="i">functions</i>,
+no numerical <i class="i">function</i> ever <i class="i">yields</i> a <i class="i">complex</i> unless 
+one or more of its <i class="i">arguments</i> is a <i class="i">complex</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Rule-of-Float-Approximation.html
@@ -0,0 +1,65 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Rule of Float Approximation (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Rule of Float Approximation (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Rule of Float Approximation (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Floating_002dpoint-Computations.html" rel="up" title="Floating-point Computations">
+<link href="Rule-of-Float-Underflow-and-Overflow.html" rel="next" title="Rule of Float Underflow and Overflow">
+<link href="Examples-of-Rule-of-Float-and-Rational-Contagion.html" rel="prev" title="Examples of Rule of Float and Rational Contagion">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Rule-of-Float-Approximation">
+<div class="nav-panel">
+<p>
+Next: <a href="Rule-of-Float-Underflow-and-Overflow.html" accesskey="n" rel="next">Rule of Float Underflow and Overflow</a>, Previous: <a href="Examples-of-Rule-of-Float-and-Rational-Contagion.html" accesskey="p" rel="prev">Examples of Rule of Float and Rational Contagion</a>, Up: <a href="Floating_002dpoint-Computations.html" accesskey="u" rel="up">Floating-point Computations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Rule-of-Float-Approximation-1"><span>12.1.4.3 Rule of Float Approximation<a class="copiable-link" href="#Rule-of-Float-Approximation-1"> &para;</a></span></h4>
+
+<p>Computations with <i class="i">floats</i> are only approximate,
+although they are described as if the results
+were mathematically accurate. 
+Two mathematically identical
+expressions may be computationally different because of errors
+inherent in the floating-point approximation process.
+The precision of a <i class="i">float</i> is not necessarily
+correlated with the accuracy of that number.
+For instance, 3.142857142857142857 is a more precise approximation
+to \pi than 3.14159, but the latter is more accurate.
+The precision refers to the number of bits retained in the representation.
+When an operation combines a <i class="i">short float</i> with a 
+<i class="i">long float</i>,
+the result will be a <i class="i">long float</i>. 
+<span class="r">Common Lisp</span> functions assume that the accuracy of
+arguments to them does not exceed their precision.  Therefore
+when two <i class="i">small floats</i> 
+are combined, the result is a <i class="i">small float</i>. 
+<span class="r">Common Lisp</span> functions 
+never convert automatically from a larger size to a smaller one.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Rule-of-Float-Precision-Contagion.html
@@ -0,0 +1,45 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Rule of Float Precision Contagion (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Rule of Float Precision Contagion (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Rule of Float Precision Contagion (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Floating_002dpoint-Computations.html" rel="up" title="Floating-point Computations">
+<link href="Rule-of-Float-Underflow-and-Overflow.html" rel="prev" title="Rule of Float Underflow and Overflow">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Rule-of-Float-Precision-Contagion">
+<div class="nav-panel">
+<p>
+Previous: <a href="Rule-of-Float-Underflow-and-Overflow.html" accesskey="p" rel="prev">Rule of Float Underflow and Overflow</a>, Up: <a href="Floating_002dpoint-Computations.html" accesskey="u" rel="up">Floating-point Computations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Rule-of-Float-Precision-Contagion-1"><span>12.1.4.5 Rule of Float Precision Contagion<a class="copiable-link" href="#Rule-of-Float-Precision-Contagion-1"> &para;</a></span></h4>
+
+<p>The result of a numerical function is a <i class="i">float</i> of the 
+largest format among all the floating-point arguments to the <i class="i">function</i>. 
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Rule-of-Float-Substitutability.html
@@ -0,0 +1,108 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Rule of Float Substitutability (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Rule of Float Substitutability (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Rule of Float Substitutability (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Rational-Computations.html" rel="up" title="Rational Computations">
+<link href="Rule-of-Canonical-Representation-for-Rationals.html" rel="prev" title="Rule of Canonical Representation for Rationals">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Rule-of-Float-Substitutability">
+<div class="nav-panel">
+<p>
+Previous: <a href="Rule-of-Canonical-Representation-for-Rationals.html" accesskey="p" rel="prev">Rule of Canonical Representation for Rationals</a>, Up: <a href="Rational-Computations.html" accesskey="u" rel="up">Rational Computations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Rule-of-Float-Substitutability-1"><span>12.1.3.3 Rule of Float Substitutability<a class="copiable-link" href="#Rule-of-Float-Substitutability-1"> &para;</a></span></h4>
+
+<p>When the arguments to an irrational mathematical <i class="i">function</i> 
+</p>
+<p>[Reviewer Note by Barmar: There should be a table of these functions.]
+are all <i class="i">rational</i> and the true mathematical result
+is also (mathematically) rational, then unless otherwise noted
+an implementation is free to return either an accurate
+<i class="i">rational</i> result
+or a <i class="i">single float</i> approximation.
+If the arguments are all <i class="i">rational</i> 
+but the result cannot be expressed
+as a <i class="i">rational</i> number, then a <i class="i">single float</i> 
+approximation is always returned.
+</p>
+<p>If the arguments to a mathematical <i class="i">function</i> are all of type
+  <code class="t">(or rational (complex rational))</code> 
+and the true mathematical result is
+  (mathematically) a complex number with rational real and imaginary
+  parts, then unless otherwise noted an implementation is free to return
+  either an accurate result of type <code class="t">(or rational (complex rational))</code> 
+or
+  a <i class="i">single float</i>
+  (permissible only if the imaginary part of the true mathematical
+  result is zero) or <code class="t">(complex single-float)</code>. If the arguments are
+  all of type <code class="t">(or rational (complex rational))</code>
+but the result cannot be
+  expressed as a <i class="i">rational</i> or <i class="i">complex rational</i>,
+then the returned
+  value will be of <i class="i">type</i> <b class="b">single-float</b> 
+(permissible only if the imaginary
+  part of the true mathematical result is zero) or <code class="t">(complex single-float)</code>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Function  Sample Results                                   <!-- /@w -->
+  <b class="b">abs</b>       <code class="t">(abs #c(3 4)) &rArr;  5 <i class="i">or</i> 5.0</code>                       <!-- /@w -->
+  <b class="b">acos</b>      <code class="t">(acos 1) &rArr;  0 <i class="i">or</i> 0.0</code>                            <!-- /@w -->
+  <b class="b">acosh</b>     <code class="t">(acosh 1) &rArr;  0 <i class="i">or</i> 0.0</code>                           <!-- /@w -->
+  <b class="b">asin</b>      <code class="t">(asin 0) &rArr;  0 <i class="i">or</i> 0.0</code>                            <!-- /@w -->
+  <b class="b">asinh</b>     <code class="t">(asinh 0) &rArr;  0 <i class="i">or</i> 0.0</code>                           <!-- /@w -->
+  <b class="b">atan</b>      <code class="t">(atan 0) &rArr;  0 <i class="i">or</i> 0.0</code>                            <!-- /@w -->
+  <b class="b">atanh</b>     <code class="t">(atanh 0) &rArr;  0 <i class="i">or</i> 0.0</code>                           <!-- /@w -->
+  <b class="b">cis</b>       <code class="t">(cis 0) &rArr;  #c(1 0) <i class="i">or</i> #c(1.0 0.0)</code>               <!-- /@w -->
+  <b class="b">cos</b>       <code class="t">(cos 0) &rArr;  1 <i class="i">or</i> 1.0</code>                             <!-- /@w -->
+  <b class="b">cosh</b>      <code class="t">(cosh 0) &rArr;  1 <i class="i">or</i> 1.0</code>                            <!-- /@w -->
+  <b class="b">exp</b>       <code class="t">(exp 0) &rArr;  1 <i class="i">or</i> 1.0</code>                             <!-- /@w -->
+  <b class="b">expt</b>      <code class="t">(expt 8 1/3) &rArr;  2 <i class="i">or</i> 2.0</code>                        <!-- /@w -->
+  <b class="b">log</b>       <code class="t">(log 1) &rArr;  0 <i class="i">or</i> 0.0</code>                             <!-- /@w -->
+            <code class="t">(log 8 2) &rArr;  3 <i class="i">or</i> 3.0</code>                           <!-- /@w -->
+  <b class="b">phase</b>     <code class="t">(phase 7) &rArr;  0 <i class="i">or</i> 0.0</code>                           <!-- /@w -->
+  <b class="b">signum</b>    <code class="t">(signum #c(3 4)) &rArr;  #c(3/5 4/5) <i class="i">or</i> #c(0.6 0.8)</code>  <!-- /@w -->
+  <b class="b">sin</b>       <code class="t">(sin 0) &rArr;  0 <i class="i">or</i> 0.0</code>                             <!-- /@w -->
+  <b class="b">sinh</b>      <code class="t">(sinh 0) &rArr;  0 <i class="i">or</i> 0.0</code>                            <!-- /@w -->
+  <b class="b">sqrt</b>      <code class="t">(sqrt 4) &rArr;  2 <i class="i">or</i> 2.0</code>                            <!-- /@w -->
+            <code class="t">(sqrt 9/16) &rArr;  3/4 <i class="i">or</i> 0.75</code>                      <!-- /@w -->
+  <b class="b">tan</b>       <code class="t">(tan 0) &rArr;  0 <i class="i">or</i> 0.0</code>                             <!-- /@w -->
+  <b class="b">tanh</b>      <code class="t">(tanh 0) &rArr;  0 <i class="i">or</i> 0.0</code>                            <!-- /@w -->
+
+  Figure 12&ndash;8: Functions Affected by Rule of Float Substitutability<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Rule-of-Canonical-Representation-for-Rationals.html">Rule of Canonical Representation for Rationals</a>, Up: <a href="Rational-Computations.html">Rational Computations</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Rule-of-Float-Underflow-and-Overflow.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Rule of Float Underflow and Overflow (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Rule of Float Underflow and Overflow (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Rule of Float Underflow and Overflow (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Floating_002dpoint-Computations.html" rel="up" title="Floating-point Computations">
+<link href="Rule-of-Float-Precision-Contagion.html" rel="next" title="Rule of Float Precision Contagion">
+<link href="Rule-of-Float-Approximation.html" rel="prev" title="Rule of Float Approximation">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Rule-of-Float-Underflow-and-Overflow">
+<div class="nav-panel">
+<p>
+Next: <a href="Rule-of-Float-Precision-Contagion.html" accesskey="n" rel="next">Rule of Float Precision Contagion</a>, Previous: <a href="Rule-of-Float-Approximation.html" accesskey="p" rel="prev">Rule of Float Approximation</a>, Up: <a href="Floating_002dpoint-Computations.html" accesskey="u" rel="up">Floating-point Computations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Rule-of-Float-Underflow-and-Overflow-1"><span>12.1.4.4 Rule of Float Underflow and Overflow<a class="copiable-link" href="#Rule-of-Float-Underflow-and-Overflow-1"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">floating-point-overflow</b>
+or <b class="b">floating-point-underflow</b> should be signaled if a 
+floating-point computation causes exponent overflow or underflow, respectively.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Rule-of-Float-and-Rational-Contagion.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Rule of Float and Rational Contagion (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Rule of Float and Rational Contagion (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Rule of Float and Rational Contagion (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Floating_002dpoint-Computations.html" rel="up" title="Floating-point Computations">
+<link href="Examples-of-Rule-of-Float-and-Rational-Contagion.html" rel="next" title="Examples of Rule of Float and Rational Contagion">
+<link href="Floating_002dpoint-Computations.html" rel="prev" title="Floating-point Computations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Rule-of-Float-and-Rational-Contagion">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Rule-of-Float-and-Rational-Contagion.html" accesskey="n" rel="next">Examples of Rule of Float and Rational Contagion</a>, Previous: <a href="Floating_002dpoint-Computations.html" accesskey="p" rel="prev">Floating-point Computations</a>, Up: <a href="Floating_002dpoint-Computations.html" accesskey="u" rel="up">Floating-point Computations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Rule-of-Float-and-Rational-Contagion-1"><span>12.1.4.1 Rule of Float and Rational Contagion<a class="copiable-link" href="#Rule-of-Float-and-Rational-Contagion-1"> &para;</a></span></h4>
+
+<p>When <i class="i">rationals</i> and <i class="i">floats</i> are combined by a numerical function, 
+the <i class="i">rational</i> is first converted to a <i class="i">float</i> of the same format.
+For <i class="i">functions</i> such as <b class="b">+</b> that take more than two arguments,
+it is permitted that part of the operation be carried out exactly using
+<i class="i">rationals</i> and the rest be done using floating-point arithmetic.
+</p>
+<p>When <i class="i">rationals</i> and <i class="i">floats</i> are compared by a numerical function, 
+the <i class="i">function</i> <b class="b">rational</b> is effectively called to convert the <i class="i">float</i> 
+to a <i class="i">rational</i> and then an exact
+comparison is performed. In the case of <i class="i">complex</i> numbers,
+the real and imaginary parts are effectively handled individually.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Rule-of-Unbounded-Rational-Precision.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Rule of Unbounded Rational Precision (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Rule of Unbounded Rational Precision (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Rule of Unbounded Rational Precision (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Rational-Computations.html" rel="up" title="Rational Computations">
+<link href="Rule-of-Canonical-Representation-for-Rationals.html" rel="next" title="Rule of Canonical Representation for Rationals">
+<link href="Rational-Computations.html" rel="prev" title="Rational Computations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Rule-of-Unbounded-Rational-Precision">
+<div class="nav-panel">
+<p>
+Next: <a href="Rule-of-Canonical-Representation-for-Rationals.html" accesskey="n" rel="next">Rule of Canonical Representation for Rationals</a>, Previous: <a href="Rational-Computations.html" accesskey="p" rel="prev">Rational Computations</a>, Up: <a href="Rational-Computations.html" accesskey="u" rel="up">Rational Computations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Rule-of-Unbounded-Rational-Precision-1"><span>12.1.3.1 Rule of Unbounded Rational Precision<a class="copiable-link" href="#Rule-of-Unbounded-Rational-Precision-1"> &para;</a></span></h4>
+
+<p>Rational computations cannot overflow in the usual sense 
+(though there may not be enough storage to represent a result), 
+since <i class="i">integers</i> and <i class="i">ratios</i> may in principle be of any magnitude.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Rules-about-Test-Functions.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Rules about Test Functions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Rules about Test Functions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Rules about Test Functions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences.html" rel="up" title="Sequences">
+<link href="Sequences-Dictionary.html" rel="next" title="Sequences Dictionary">
+<link href="Sequence-Concepts.html" rel="prev" title="Sequence Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Rules-about-Test-Functions">
+<div class="nav-panel">
+<p>
+Next: <a href="Sequences-Dictionary.html" accesskey="n" rel="next">Sequences Dictionary</a>, Previous: <a href="Sequence-Concepts.html" accesskey="p" rel="prev">Sequence Concepts</a>, Up: <a href="Sequences.html" accesskey="u" rel="up">Sequences</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Rules-about-Test-Functions-1"><span>17.2 Rules about Test Functions<a class="copiable-link" href="#Rules-about-Test-Functions-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Satisfying-a-Two_002dArgument-Test.html" accesskey="1">Satisfying a Two-Argument Test</a></li>
+<li><a href="Satisfying-a-One_002dArgument-Test.html" accesskey="2">Satisfying a One-Argument Test</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Rules-for-Initialization-Arguments.html
@@ -0,0 +1,143 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Rules for Initialization Arguments (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Rules for Initialization Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Rules for Initialization Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Object-Creation-and-Initialization.html" rel="up" title="Object Creation and Initialization">
+<link href="Shared_002dInitialize.html" rel="next" title="Shared-Initialize">
+<link href="Defaulting-of-Initialization-Arguments.html" rel="prev" title="Defaulting of Initialization Arguments">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Rules-for-Initialization-Arguments">
+<div class="nav-panel">
+<p>
+Next: <a href="Shared_002dInitialize.html" accesskey="n" rel="next">Shared-Initialize</a>, Previous: <a href="Defaulting-of-Initialization-Arguments.html" accesskey="p" rel="prev">Defaulting of Initialization Arguments</a>, Up: <a href="Object-Creation-and-Initialization.html" accesskey="u" rel="up">Object Creation and Initialization</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Rules-for-Initialization-Arguments-1"><span>7.1.4 Rules for Initialization Arguments<a class="copiable-link" href="#Rules-for-Initialization-Arguments-1"> &para;</a></span></h4>
+
+<p>The <code class="t">:initarg</code> slot option may be specified more than
+once for a given <i class="i">slot</i>.
+</p>
+<p>The following rules specify when initialization arguments may be
+multiply defined:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>A given initialization argument can be used to
+initialize more than one <i class="i">slot</i> if the same initialization argument name
+appears in more than one <code class="t">:initarg</code> slot option.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>A given initialization argument name can appear 
+in the <i class="i">lambda list</i> of more than one initialization <i class="i">method</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>A given initialization argument name can
+appear both in an <code class="t">:initarg</code> slot option and 
+in the <i class="i">lambda list</i>
+of an initialization <i class="i">method</i>.
+</p>
+</dd>
+</dl>
+
+<p>[Reviewer Note by The next three paragraphs could be replaced by &ldquo;If two or more
+initialization arguments that initialize the same slot appear in the
+<i class="i">defaulted initialization argument list</i>, the leftmost of these supplies
+the value, even if they have different names.&rdquo;  And the rest would follow
+from the rules above.]
+</p>
+<p>If two or more initialization arguments that initialize the same
+<i class="i">slot</i> are given in the arguments to <b class="b">make-instance</b>, the
+leftmost of these initialization arguments in the <i class="i">initialization
+argument list</i> supplies the value, even if the initialization arguments
+have different names.
+</p>
+<p>If two or more different initialization arguments that initialize the
+same <i class="i">slot</i> have default values and none is given explicitly in the
+arguments to <b class="b">make-instance</b>, the initialization argument that
+appears in a <code class="t">:default-initargs</code> class option in the most specific
+of the <i class="i">classes</i> supplies the value. If a single
+<code class="t">:default-initargs</code> class option specifies two or more initialization
+arguments that initialize the same <i class="i">slot</i> and none is given
+explicitly in the arguments to <b class="b">make-instance</b>, the leftmost in
+the <code class="t">:default-initargs</code> class option supplies the value, and the
+values of the remaining default value <i class="i">forms</i> are ignored.
+</p>
+<p>Initialization arguments given explicitly in the arguments to
+<b class="b">make-instance</b> appear to the left of defaulted initialization
+arguments. Suppose that the classes C_1 and C_2 supply the
+values of defaulted initialization arguments for different <i class="i">slots</i>,
+and suppose that C_1 is more specific than C_2; then the
+defaulted initialization argument whose value is supplied by C_1
+is to the left of the defaulted initialization argument whose value is
+supplied by C_2 in the <i class="i">defaulted initialization argument
+list</i>.  If a single <code class="t">:default-initargs</code> class option supplies the
+values of initialization arguments for two different <i class="i">slots</i>, the
+initialization argument whose value is specified farther to the left in
+the <code class="t">:default-initargs</code> class option appears farther to the left in
+the <i class="i">defaulted initialization argument list</i>.
+</p>
+<p>[Reviewer Note by Barmar: End of claim made three paragraphs back.]
+</p>
+<p>If a <i class="i">slot</i> has both an <code class="t">:initform</code> form and an 
+<code class="t">:initarg</code> slot option, and the initialization argument is defaulted
+using <code class="t">:default-initargs</code> or is supplied to <b class="b">make-instance</b>,
+the captured <code class="t">:initform</code> form is neither used nor evaluated.
+</p>
+<p>The following is an example of the above rules:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defclass q () ((x :initarg a)))
+ (defclass r (q) ((x :initarg b))
+   (:default-initargs a 1 b 2))
+</pre></div>
+
+<div class="example">
+<div class="format">
+<div class="group"><pre class="example-preformatted"> <code class="t"></code>                           Defaulted                    <code class="t"></code>                 <!-- /@w -->
+ Form                         Initialization Argument List Contents of Slot X <!-- /@w -->
+ _____________________________________________________________________________<!-- /@w -->
+ <code class="t">(make-instance 'r)</code>           <code class="t">(a 1 b 2)</code>                    <code class="t">1</code>                  <!-- /@w -->
+ <code class="t">(make-instance 'r 'a 3)</code>      <code class="t">(a 3 b 2)</code>                    <code class="t">3</code>                  <!-- /@w -->
+ <code class="t">(make-instance 'r 'b 4)</code>      <code class="t">(b 4 a 1)</code>                    <code class="t">4</code>                  <!-- /@w -->
+ <code class="t">(make-instance 'r 'a 1 'a 2)</code> <code class="t">(a 1 a 2 b 2)</code>                <code class="t">1</code>                  <!-- /@w -->
+</pre></div></div>
+<pre class="example-preformatted">
+
+</pre></div>
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Shared_002dInitialize.html">Shared-Initialize</a>, Previous: <a href="Defaulting-of-Initialization-Arguments.html">Defaulting of Initialization Arguments</a>, Up: <a href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Safe-and-Unsafe-Calls.html
@@ -0,0 +1,156 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Safe and Unsafe Calls (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Safe and Unsafe Calls (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Safe and Unsafe Calls (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Argument-Mismatch-Detection.html" rel="up" title="Argument Mismatch Detection">
+<link href="Error-Detection-Time-in-Safe-Calls.html" rel="next" title="Error Detection Time in Safe Calls">
+<link href="Argument-Mismatch-Detection.html" rel="prev" title="Argument Mismatch Detection">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Safe-and-Unsafe-Calls">
+<div class="nav-panel">
+<p>
+Next: <a href="Error-Detection-Time-in-Safe-Calls.html" accesskey="n" rel="next">Error Detection Time in Safe Calls</a>, Previous: <a href="Argument-Mismatch-Detection.html" accesskey="p" rel="prev">Argument Mismatch Detection</a>, Up: <a href="Argument-Mismatch-Detection.html" accesskey="u" rel="up">Argument Mismatch Detection</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Safe-and-Unsafe-Calls-1"><span>3.5.1.1 Safe and Unsafe Calls<a class="copiable-link" href="#Safe-and-Unsafe-Calls-1"> &para;</a></span></h4>
+
+<p>A <i class="i">call</i> is a <i class="i">safe call</i>
+<a class="index-entry-id" id="index-safe-call"></a>
+ if each of the following is
+either <i class="i">safe</i> <i class="i">code</i> or <i class="i">system code</i> (other than
+<i class="i">system code</i> that results from <i class="i">macro expansion</i> of 
+<i class="i">programmer code</i>):
+</p><dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>the <i class="i">call</i>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>the definition of the <i class="i">function</i> being <i class="i">called</i>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>the point of <i class="i">functional evaluation</i> 
+</p></dd>
+</dl>
+
+<p>The following special cases require some elaboration:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>If the <i class="i">function</i> being called is a <i class="i">generic function</i>,
+it is considered <i class="i">safe</i> if all of the following are
+</p>
+<p><i class="i">safe code</i> or <i class="i">system code</i>:
+</p>
+<dl class="table">
+<dt>&ndash;</dt>
+<dd><p>its definition (if it was defined explicitly).
+</p></dd>
+<dt>&ndash;</dt>
+<dd><p>the <i class="i">method</i> definitions for all <i class="i">applicable</i> <i class="i">methods</i>.
+</p></dd>
+<dt>&ndash;</dt>
+<dd><p>the definition of its <i class="i">method combination</i>.
+</p></dd>
+</dl>
+
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>For the form <code class="t">(coerce <i class="i">x</i> 'function)</code>, 
+where <i class="i">x</i> is a <i class="i">lambda expression</i>,
+the value of the <i class="i">optimize quality</i> <b class="b">safety</b>
+in the global environment at the time the <b class="b">coerce</b>
+is <i class="i">executed</i> applies to the resulting <i class="i">function</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>For a call to the <i class="i">function</i> <b class="b">ensure-generic-function</b>, the value of the
+<i class="i">optimize quality</i> <b class="b">safety</b> in the <i class="i">environment</i>
+<i class="i">object</i> passed as the <code class="t">:environment</code> <i class="i">argument</i> applies 
+to the resulting <i class="i">generic function</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>For a call to <b class="b">compile</b> with a <i class="i">lambda expression</i> as the
+<i class="i">argument</i>, the value of the <i class="i">optimize quality</i> <b class="b">safety</b>
+in the <i class="i">global environment</i> at the time <b class="b">compile</b> is <i class="i">called</i>
+applies to the resulting <i class="i">compiled function</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>For a call to <b class="b">compile</b> with only one argument, if the original definition
+of the <i class="i">function</i> was <i class="i">safe</i>, then the resulting <i class="i">compiled function</i>
+must also be <i class="i">safe</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>A <i class="i">call</i> to a <i class="i">method</i> by <b class="b">call-next-method</b> must be 
+considered <i class="i">safe</i> if each of the following is 
+</p>
+<p><i class="i">safe code</i> or <i class="i">system code</i>:
+</p>
+<dl class="table">
+<dt>&ndash;</dt>
+<dd><p>the definition of the <i class="i">generic function</i> (if it was defined explicitly).
+</p></dd>
+<dt>&ndash;</dt>
+<dd><p>the <i class="i">method</i> definitions for all <i class="i">applicable</i> <i class="i">methods</i>.
+</p></dd>
+<dt>&ndash;</dt>
+<dd><p>the definition of the <i class="i">method combination</i>.
+</p></dd>
+<dt>&ndash;</dt>
+<dd><p>the point of entry into the body of the <i class="i">method defining form</i>,
+	      where the <i class="i">binding</i> of <b class="b">call-next-method</b> is established.
+</p></dd>
+<dt>&ndash;</dt>
+<dd><p>the point of <i class="i">functional evaluation</i> of the name <b class="b">call-next-method</b>.
+</p></dd>
+</dl>
+
+</dd>
+</dl>
+
+<p>An <i class="i">unsafe call</i>
+<a class="index-entry-id" id="index-unsafe-call"></a>
+ is a <i class="i">call</i> that is not a <i class="i">safe call</i>.
+</p>
+<p>The informal intent is that the <i class="i">programmer</i> can rely on a <i class="i">call</i>
+to be <i class="i">safe</i>, even when <i class="i">system code</i> is involved, if all reasonable
+steps have been taken to ensure that the <i class="i">call</i> is <i class="i">safe</i>.
+For example, if a <i class="i">programmer</i> calls <b class="b">mapcar</b> from <i class="i">safe</i>
+<i class="i">code</i> and supplies a <i class="i">function</i> that was <i class="i">compiled</i> 
+as <i class="i">safe</i>, the <i class="i">implementation</i> is required to ensure that
+<b class="b">mapcar</b> makes a <i class="i">safe call</i> as well.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Error-Detection-Time-in-Safe-Calls.html">Error Detection Time in Safe Calls</a>, Previous: <a href="Argument-Mismatch-Detection.html">Argument Mismatch Detection</a>, Up: <a href="Argument-Mismatch-Detection.html">Argument Mismatch Detection</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Satisfying-a-One_002dArgument-Test.html
@@ -0,0 +1,96 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Satisfying a One-Argument Test (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Satisfying a One-Argument Test (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Satisfying a One-Argument Test (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Rules-about-Test-Functions.html" rel="up" title="Rules about Test Functions">
+<link href="Satisfying-a-Two_002dArgument-Test.html" rel="prev" title="Satisfying a Two-Argument Test">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Satisfying-a-One_002dArgument-Test">
+<div class="nav-panel">
+<p>
+Previous: <a href="Satisfying-a-Two_002dArgument-Test.html" accesskey="p" rel="prev">Satisfying a Two-Argument Test</a>, Up: <a href="Rules-about-Test-Functions.html" accesskey="u" rel="up">Rules about Test Functions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Satisfying-a-One_002dArgument-Test-1"><span>17.2.2 Satisfying a One-Argument Test<a class="copiable-link" href="#Satisfying-a-One_002dArgument-Test-1"> &para;</a></span></h4>
+
+<p>When using one of the <i class="i">functions</i> in Figure 17&ndash;3,
+the elements E of a <i class="i">sequence</i> S are filtered
+not on the basis of the presence or absence of an object O 
+under a two <i class="i">argument</i> <i class="i">predicate</i>,
+as with the <i class="i">functions</i> described in <a class="ref" href="Satisfying-a-Two_002dArgument-Test.html">Satisfying a Two-Argument Test</a>,
+but rather on the basis of a one <i class="i">argument</i> <i class="i">predicate</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  assoc-if       member-if           rassoc-if          <!-- /@w -->
+  assoc-if-not   member-if-not       rassoc-if-not      <!-- /@w -->
+  count-if       nsubst-if           remove-if          <!-- /@w -->
+  count-if-not   nsubst-if-not       remove-if-not      <!-- /@w -->
+  delete-if      nsubstitute-if      subst-if           <!-- /@w -->
+  delete-if-not  nsubstitute-if-not  subst-if-not       <!-- /@w -->
+  find-if        position-if         substitute-if      <!-- /@w -->
+  find-if-not    position-if-not     substitute-if-not  <!-- /@w -->
+
+  Figure 17&ndash;3: Operators that have One-Argument Tests to be Satisfied<!-- /@w -->
+
+</pre></div></div>
+
+<p>The element E_i might not be considered directly.
+If a <code class="t">:key</code> <i class="i">argument</i> is provided,
+it is a <i class="i">designator</i> for a <i class="i">function</i> of one <i class="i">argument</i> 
+to be called with each E_i as an <i class="i">argument</i>, 
+and <i class="i">yielding</i> an <i class="i">object</i> Z_i to be used for comparison.
+(If there is no <code class="t">:key</code> <i class="i">argument</i>, Z_i is E_i.)
+</p>
+<p><i class="i">Functions</i> defined in this specification and having a name that
+ends in &ldquo;<code class="t">-if</code>&rdquo; accept a first <i class="i">argument</i> that is a <i class="i">designator</i> for a 
+<i class="i">function</i> of one <i class="i">argument</i>, Z_i.
+An E_i is said to <i class="i">satisfy the test</i>
+<a class="index-entry-id" id="index-satisfy-the-test-2"></a>
+ if this <code class="t">:test</code> <i class="i">function</i>
+returns a <i class="i">generalized boolean</i> representing <i class="i">true</i>.
+</p>
+<p><i class="i">Functions</i> defined in this specification and having a name that
+ends in &ldquo;<code class="t">-if-not</code>&rdquo; accept a first <i class="i">argument</i> that is a <i class="i">designator</i> for a 
+<i class="i">function</i> of one <i class="i">argument</i>, Z_i.
+An E_i is said to <i class="i">satisfy the test</i>
+<a class="index-entry-id" id="index-satisfy-the-test-3"></a>
+ if this <code class="t">:test</code> <i class="i">function</i>
+returns a <i class="i">generalized boolean</i> representing <i class="i">false</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Examples-of-Satisfying-a-One_002dArgument-Test.html" accesskey="1">Examples of Satisfying a One-Argument Test</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Satisfying-a-Two_002dArgument-Test.html">Satisfying a Two-Argument Test</a>, Up: <a href="Rules-about-Test-Functions.html">Rules about Test Functions</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Satisfying-a-Two_002dArgument-Test.html
@@ -0,0 +1,117 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Satisfying a Two-Argument Test (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Satisfying a Two-Argument Test (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Satisfying a Two-Argument Test (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Rules-about-Test-Functions.html" rel="up" title="Rules about Test Functions">
+<link href="Satisfying-a-One_002dArgument-Test.html" rel="next" title="Satisfying a One-Argument Test">
+<link href="Rules-about-Test-Functions.html" rel="prev" title="Rules about Test Functions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Satisfying-a-Two_002dArgument-Test">
+<div class="nav-panel">
+<p>
+Next: <a href="Satisfying-a-One_002dArgument-Test.html" accesskey="n" rel="next">Satisfying a One-Argument Test</a>, Previous: <a href="Rules-about-Test-Functions.html" accesskey="p" rel="prev">Rules about Test Functions</a>, Up: <a href="Rules-about-Test-Functions.html" accesskey="u" rel="up">Rules about Test Functions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Satisfying-a-Two_002dArgument-Test-1"><span>17.2.1 Satisfying a Two-Argument Test<a class="copiable-link" href="#Satisfying-a-Two_002dArgument-Test-1"> &para;</a></span></h4>
+
+<p>When an <i class="i">object</i> O is being considered iteratively 
+against each <i class="i">element</i> E_i
+of a <i class="i">sequence</i> S
+by an <i class="i">operator</i> F listed in Figure 17&ndash;2,
+it is sometimes useful to control the way in which the presence of O 
+is tested in S is tested by F.
+This control is offered on the basis of a <i class="i">function</i> designated with 
+either a <code class="t">:test</code> or <code class="t">:test-not</code> <i class="i">argument</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  adjoin           nset-exclusive-or  search            <!-- /@w -->
+  assoc            nsublis            set-difference    <!-- /@w -->
+  count            nsubst             set-exclusive-or  <!-- /@w -->
+  delete           nsubstitute        sublis            <!-- /@w -->
+  find             nunion             subsetp           <!-- /@w -->
+  intersection     position           subst             <!-- /@w -->
+  member           pushnew            substitute        <!-- /@w -->
+  mismatch         rassoc             tree-equal        <!-- /@w -->
+  nintersection    remove             union             <!-- /@w -->
+  nset-difference  remove-duplicates                    <!-- /@w -->
+
+  Figure 17&ndash;2: Operators that have Two-Argument Tests to be Satisfied<!-- /@w -->
+
+</pre></div></div>
+
+<p>The object O might not be compared directly to E_i.
+If a <code class="t">:key</code> <i class="i">argument</i> is provided,
+it is a <i class="i">designator</i> for a <i class="i">function</i> of one <i class="i">argument</i> 
+to be called with each E_i as an <i class="i">argument</i>, 
+and <i class="i">yielding</i> an <i class="i">object</i> Z_i to be used for comparison.
+(If there is no <code class="t">:key</code> <i class="i">argument</i>, Z_i is E_i.)
+</p>
+<p>The <i class="i">function</i> designated by the <code class="t">:key</code> <i class="i">argument</i> is never called on O itself.
+However, if the function operates on multiple sequences
+(<i class="i">e.g.</i>, as happens in <b class="b">set-difference</b>), O
+will be the result of calling the <code class="t">:key</code> function on an
+<i class="i">element</i> of the other sequence.  
+</p>
+<p>A <code class="t">:test</code> <i class="i">argument</i>, if supplied to F,
+is a <i class="i">designator</i> for a  <i class="i">function</i>
+of two <i class="i">arguments</i>, O and Z_i.
+An E_i is said (or, sometimes, an O and an E_i are said)
+to <i class="i">satisfy the test</i>
+<a class="index-entry-id" id="index-satisfy-the-test"></a>
+</p>
+<p>if this <code class="t">:test</code> <i class="i">function</i> returns a <i class="i">generalized boolean</i> representing 
+<i class="i">true</i>.
+</p>
+<p>A <code class="t">:test-not</code> <i class="i">argument</i>, if supplied to F, 
+is <i class="i">designator</i> for a <i class="i">function</i> 
+of two <i class="i">arguments</i>, O and Z_i.
+An E_i is said (or, sometimes, an O and an E_i are said)
+to <i class="i">satisfy the test</i>
+<a class="index-entry-id" id="index-satisfy-the-test-1"></a>
+</p>
+<p>if this <code class="t">:test-not</code> <i class="i">function</i>
+returns a <i class="i">generalized boolean</i> representing <i class="i">false</i>.
+</p>
+<p>If neither a <code class="t">:test</code> nor a <code class="t">:test-not</code> <i class="i">argument</i> is supplied, 
+it is as if a <code class="t">:test</code> argument of <code class="t">#'eql</code> was supplied.
+</p>
+<p>The consequences are unspecified if both a <code class="t">:test</code> and a <code class="t">:test-not</code> <i class="i">argument</i>
+are supplied in the same <i class="i">call</i> to F.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Examples-of-Satisfying-a-Two_002dArgument-Test.html" accesskey="1">Examples of Satisfying a Two-Argument Test</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Satisfying-a-One_002dArgument-Test.html">Satisfying a One-Argument Test</a>, Previous: <a href="Rules-about-Test-Functions.html">Rules about Test Functions</a>, Up: <a href="Rules-about-Test-Functions.html">Rules about Test Functions</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Scope-and-Purpose.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Scope and Purpose (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Scope and Purpose (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Scope and Purpose (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Scope.html" rel="up" title="Scope">
+<link href="History.html" rel="next" title="History">
+<link href="Scope.html" rel="prev" title="Scope">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Scope-and-Purpose">
+<div class="nav-panel">
+<p>
+Next: <a href="History.html" accesskey="n" rel="next">History</a>, Previous: <a href="Scope.html" accesskey="p" rel="prev">Scope, Purpose, and History</a>, Up: <a href="Scope.html" accesskey="u" rel="up">Scope, Purpose, and History</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Scope-and-Purpose-1"><span>1.1.1 Scope and Purpose<a class="copiable-link" href="#Scope-and-Purpose-1"> &para;</a></span></h4>
+
+<p>The specification set forth in this document is designed to promote
+the portability of <span class="r">Common Lisp</span> programs among a variety of data processing
+systems. It is a language specification aimed at an audience of
+implementors and knowledgeable programmers. It is neither a tutorial nor
+an implementation guide.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Scope.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Scope (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Scope (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Scope (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-_0028Introduction_0029.html" rel="up" title="Introduction (Introduction)">
+<link href="Organization-of-the-Document.html" rel="next" title="Organization of the Document">
+<link href="Introduction-_0028Introduction_0029.html" rel="prev" title="Introduction (Introduction)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Scope">
+<div class="nav-panel">
+<p>
+Next: <a href="Organization-of-the-Document.html" accesskey="n" rel="next">Organization of the Document</a>, Previous: <a href="Introduction-_0028Introduction_0029.html" accesskey="p" rel="prev">Introduction</a>, Up: <a href="Introduction-_0028Introduction_0029.html" accesskey="u" rel="up">Introduction</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Scope_002c-Purpose_002c-and-History"><span>1.1 Scope, Purpose, and History<a class="copiable-link" href="#Scope_002c-Purpose_002c-and-History"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Scope-and-Purpose.html" accesskey="1">Scope and Purpose</a></li>
+<li><a href="History.html" accesskey="2">History</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Seconds.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Seconds (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Seconds (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Seconds (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Time.html" rel="up" title="Time">
+<link href="Internal-Time.html" rel="prev" title="Internal Time">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Seconds">
+<div class="nav-panel">
+<p>
+Previous: <a href="Internal-Time.html" accesskey="p" rel="prev">Internal Time</a>, Up: <a href="Time.html" accesskey="u" rel="up">Time</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Seconds-1"><span>25.1.4.4 Seconds<a class="copiable-link" href="#Seconds-1"> &para;</a></span></h4>
+
+<p>One function, <b class="b">sleep</b>, takes its argument as a non-negative <i class="i">real</i> number
+of seconds.  Informally, it may be useful to think of this as 
+a <i class="i">relative</i> <i class="i">universal time</i>, but it differs in one important way:
+<i class="i">universal times</i> are always non-negative <i class="i">integers</i>, whereas the argument to
+<b class="b">sleep</b> can be any kind of non-negative <i class="i">real</i>, in order to allow for
+the possibility of fractional seconds.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  sleep    <!-- /@w -->
+
+  Figure 25&ndash;8: Defined names involving time in Seconds.<!-- /@w -->
+
+</pre></div></div>
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sections-Not-Formally-Part-Of-This-Standard.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sections Not Formally Part Of This Standard (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sections Not Formally Part Of This Standard (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sections Not Formally Part Of This Standard (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Definitions.html" rel="up" title="Definitions">
+<link href="Interpreting-Dictionary-Entries.html" rel="next" title="Interpreting Dictionary Entries">
+<link href="Error-Terminology.html" rel="prev" title="Error Terminology">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Sections-Not-Formally-Part-Of-This-Standard">
+<div class="nav-panel">
+<p>
+Next: <a href="Interpreting-Dictionary-Entries.html" accesskey="n" rel="next">Interpreting Dictionary Entries</a>, Previous: <a href="Error-Terminology.html" accesskey="p" rel="prev">Error Terminology</a>, Up: <a href="Definitions.html" accesskey="u" rel="up">Definitions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Sections-Not-Formally-Part-Of-This-Standard-1"><span>1.4.3 Sections Not Formally Part Of This Standard<a class="copiable-link" href="#Sections-Not-Formally-Part-Of-This-Standard-1"> &para;</a></span></h4>
+
+<p>Front matter and back matter, such as the &ldquo;Table of Contents,&rdquo; 
+&ldquo;Index,&rdquo; &ldquo;Figures,&rdquo; &ldquo;Credits,&rdquo; and &ldquo;Appendix&rdquo; are not considered formally 
+part of this standard, so that we retain the flexibility needed to update
+these sections even at the last minute without fear of needing a formal 
+vote to change those parts of the document.  These items are quite short 
+and very useful, however, and it is not recommended that they be removed 
+even in an abridged version of this document.
+</p>
+<p>Within the concept sections, subsections whose names begin with 
+the words &ldquo;Note&rdquo; or &ldquo;Notes&rdquo; or &ldquo;Example&rdquo; or &ldquo;Examples&rdquo; 
+are provided for illustration purposes only, and are not considered
+part of the standard.
+</p>
+<p>An attempt has been made to place these sections last in their parent section,
+so that they could be removed without disturbing the contiguous numbering of the 
+surrounding sections in order to produce a document of smaller size.
+</p>
+<p>Likewise, the &ldquo;Examples&rdquo; and &ldquo;Notes&rdquo; sections in a dictionary entry
+are not considered part of the standard and could be removed if necessary.
+</p>
+<p>Nevertheless, the examples provide important clarifications and consistency 
+checks for the rest of the material, and such abridging is not recommended
+unless absolutely unavoidable.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Selecting-the-Applicable-Methods.html
@@ -0,0 +1,45 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Selecting the Applicable Methods (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Selecting the Applicable Methods (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Selecting the Applicable Methods (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Method-Selection-and-Combination.html" rel="up" title="Method Selection and Combination">
+<link href="Sorting-the-Applicable-Methods-by-Precedence-Order.html" rel="next" title="Sorting the Applicable Methods by Precedence Order">
+<link href="Determining-the-Effective-Method.html" rel="prev" title="Determining the Effective Method">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Selecting-the-Applicable-Methods">
+<div class="nav-panel">
+<p>
+Next: <a href="Sorting-the-Applicable-Methods-by-Precedence-Order.html" accesskey="n" rel="next">Sorting the Applicable Methods by Precedence Order</a>, Previous: <a href="Determining-the-Effective-Method.html" accesskey="p" rel="prev">Determining the Effective Method</a>, Up: <a href="Method-Selection-and-Combination.html" accesskey="u" rel="up">Method Selection and Combination</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Selecting-the-Applicable-Methods-1"><span>7.6.6.2 Selecting the Applicable Methods<a class="copiable-link" href="#Selecting-the-Applicable-Methods-1"> &para;</a></span></h4>
+
+<p>This step is described in <a class="ref" href="Introduction-to-Methods.html">Introduction to Methods</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Self_002dEvaluating-Objects.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Self-Evaluating Objects (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Self-Evaluating Objects (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Self-Evaluating Objects (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Evaluation-Model.html" rel="up" title="The Evaluation Model">
+<link href="Examples-of-Self_002dEvaluating-Objects.html" rel="next" title="Examples of Self-Evaluating Objects">
+<link href="Lambda-Forms.html" rel="prev" title="Lambda Forms">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Self_002dEvaluating-Objects">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Self_002dEvaluating-Objects.html" accesskey="n" rel="next">Examples of Self-Evaluating Objects</a>, Previous: <a href="Lambda-Forms.html" accesskey="p" rel="prev">Lambda Forms</a>, Up: <a href="The-Evaluation-Model.html" accesskey="u" rel="up">The Evaluation Model</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Self_002dEvaluating-Objects-1"><span>3.1.2.12 Self-Evaluating Objects<a class="copiable-link" href="#Self_002dEvaluating-Objects-1"> &para;</a></span></h4>
+
+<p>A <i class="i">form</i> that is neither a <i class="i">symbol</i> nor a <i class="i">cons</i> is 
+defined to be a <i class="i">self-evaluating object</i>.  <i class="i">Evaluating</i>
+such an <i class="i">object</i> <i class="i">yields</i> the <i class="i">same</i> <i class="i">object</i> 
+as a result.
+</p>
+<p>Certain specific <i class="i">symbols</i> and <i class="i">conses</i> might also happen 
+to be &ldquo;self-evaluating&rdquo; but only as a special case of a more 
+general set of rules for the <i class="i">evaluation</i> of <i class="i">symbols</i> and
+<i class="i">conses</i>; such <i class="i">objects</i> are not considered to be
+<i class="i">self-evaluating objects</i>.
+</p>
+<p>The consequences are undefined if <i class="i">literal objects</i> (including
+<i class="i">self-evaluating objects</i>) are destructively modified.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Semantic-Constraints.html
@@ -0,0 +1,162 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Semantic Constraints (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Semantic Constraints (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Semantic Constraints (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Compilation-Semantics.html" rel="up" title="Compilation Semantics">
+<link href="Minimal-Compilation.html" rel="prev" title="Minimal Compilation">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Semantic-Constraints">
+<div class="nav-panel">
+<p>
+Previous: <a href="Minimal-Compilation.html" accesskey="p" rel="prev">Minimal Compilation</a>, Up: <a href="Compilation-Semantics.html" accesskey="u" rel="up">Compilation Semantics</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Semantic-Constraints-1"><span>3.2.2.7 Semantic Constraints<a class="copiable-link" href="#Semantic-Constraints-1"> &para;</a></span></h4>
+
+<p>All <i class="i">conforming programs</i> must obey the following constraints,
+which are designed to minimize the observable differences 
+between compiled and interpreted programs:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>Definitions of any referenced <i class="i">macros</i>
+must be present in the <i class="i">compilation environment</i>.  
+Any <i class="i">form</i> that is a <i class="i">list</i>
+beginning with a <i class="i">symbol</i> that does not name a
+<i class="i">special operator</i> or a <i class="i">macro</i> defined in the 
+<i class="i">compilation environment</i> is treated by the compiler as a 
+function call.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">Special</b> proclamations for <i class="i">dynamic variables</i>
+must be made in the <i class="i">compilation environment</i>.  Any <i class="i">binding</i>
+for which there is no <b class="b">special</b> declaration or proclamation in
+the <i class="i">compilation environment</i> is treated by the compiler as
+a <i class="i">lexical binding</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The definition of a function that is defined and
+declared <b class="b">inline</b> in the <i class="i">compilation environment</i> must be
+the same at run time.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Within a <i class="i">function</i> named F, the compiler may
+(but is not required to)
+assume that an apparent recursive call to a <i class="i">function</i> named F 
+refers to the same definition of F,
+unless that function has been declared <b class="b">notinline</b>.
+The consequences of redefining such a recursively defined <i class="i">function</i> F 
+while it is executing are undefined.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>A call within a file to a named function that is
+defined in the same file refers to that function, unless that function
+has been declared <b class="b">notinline</b>.  The consequences are unspecified
+if functions are redefined individually at run time or multiply
+defined in the same file.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The argument syntax and number of return values for
+all functions whose <b class="b">ftype</b> is declared at compile time must
+remain the same at run time.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><i class="i">Constant variables</i> defined in
+the <i class="i">compilation environment</i> must have a <i class="i">similar</i> value at
+run time.  A reference to 
+a <i class="i">constant variable</i> 
+in <i class="i">source code</i> is equivalent to a reference to 
+a <i class="i">literal</i> <i class="i">object</i> that is the <i class="i">value</i> of the <i class="i">constant variable</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Type definitions made with <b class="b">deftype</b> or
+<b class="b">defstruct</b> in the <i class="i">compilation environment</i> must
+retain the same definition at run time.  Classes defined by <b class="b">defclass</b>
+in the <i class="i">compilation environment</i> must be defined
+at run time to have the same <i class="i">superclasses</i> and same 
+<i class="i">metaclass</i>.
+</p>
+<p>This implies that <i class="i">subtype</i>/<i class="i">supertype</i> relationships of 
+<i class="i">type specifiers</i> must not change between <i class="i">compile time</i> and <i class="i">run time</i>.  
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Type declarations present in the compilation 
+<i class="i">environment</i> must accurately describe the corresponding values at run time;
+otherwise, the consequences are undefined.  It is permissible
+for an unknown <i class="i">type</i> to appear in a declaration at 
+compile time, though a warning might be signaled in such a case.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Except in the situations explicitly listed above, a
+<i class="i">function</i> defined in the <i class="i">evaluation environment</i>
+is permitted to have a different definition or a different <i class="i">signature</i>
+at run time, and the run-time definition prevails.
+</p>
+</dd>
+</dl>
+
+<p><i class="i">Conforming programs</i> should not be written using any additional
+assumptions about consistency between the run-time 
+<i class="i">environment</i> and the startup, evaluation, and compilation 
+<i class="i">environments</i>.
+</p>
+<p>Except where noted, when a compile-time and a run-time definition are
+different, one of the following occurs at run time:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>an error of <i class="i">type</i> <b class="b">error</b> is signaled
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>the compile-time definition prevails
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>the run-time definition prevails
+</p>
+</dd>
+</dl>
+
+<p>If the <i class="i">compiler</i> processes a <i class="i">function form</i> whose <i class="i">operator</i> 
+is not defined at compile time, no error is signaled at compile time.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Minimal-Compilation.html">Minimal Compilation</a>, Up: <a href="Compilation-Semantics.html">Compilation Semantics</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Semicolon.html
@@ -0,0 +1,59 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Semicolon (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Semicolon (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Semicolon (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standard-Macro-Characters.html" rel="up" title="Standard Macro Characters">
+<link href="Double_002dQuote.html" rel="next" title="Double-Quote">
+<link href="Single_002dQuote.html" rel="prev" title="Single-Quote">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Semicolon">
+<div class="nav-panel">
+<p>
+Next: <a href="Double_002dQuote.html" accesskey="n" rel="next">Double-Quote</a>, Previous: <a href="Single_002dQuote.html" accesskey="p" rel="prev">Single-Quote</a>, Up: <a href="Standard-Macro-Characters.html" accesskey="u" rel="up">Standard Macro Characters</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Semicolon-1"><span>2.4.4 Semicolon<a class="copiable-link" href="#Semicolon-1"> &para;</a></span></h4>
+
+<p><b class="b">Syntax:</b> <code class="t">;&lt;&lt;<i class="i">text</i>&gt;&gt;</code>
+</p>
+<p>A <i class="i">semicolon</i> introduces <i class="i">characters</i> that are to be ignored,
+such as comments.  The <i class="i">semicolon</i> and all <i class="i">characters</i> up to
+and including the next <i class="i">newline</i> or end of file are ignored.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Examples-of-Semicolon.html" accesskey="1">Examples of Semicolon</a></li>
+<li><a href="Notes-about-Style-for-Semicolon.html" accesskey="2">Notes about Style for Semicolon</a></li>
+<li><a href="Use-of-Single-Semicolon.html" accesskey="3">Use of Single Semicolon</a></li>
+<li><a href="Use-of-Double-Semicolon.html" accesskey="4">Use of Double Semicolon</a></li>
+<li><a href="Use-of-Triple-Semicolon.html" accesskey="5">Use of Triple Semicolon</a></li>
+<li><a href="Use-of-Quadruple-Semicolon.html" accesskey="6">Use of Quadruple Semicolon</a></li>
+<li><a href="Examples-of-Style-for-Semicolon.html" accesskey="7">Examples of Style for Semicolon</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sequence-Concepts.html
@@ -0,0 +1,90 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sequence Concepts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sequence Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sequence Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences.html" rel="up" title="Sequences">
+<link href="Rules-about-Test-Functions.html" rel="next" title="Rules about Test Functions">
+<link href="Sequences.html" rel="prev" title="Sequences">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Sequence-Concepts">
+<div class="nav-panel">
+<p>
+Next: <a href="Rules-about-Test-Functions.html" accesskey="n" rel="next">Rules about Test Functions</a>, Previous: <a href="Sequences.html" accesskey="p" rel="prev">Sequences</a>, Up: <a href="Sequences.html" accesskey="u" rel="up">Sequences</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Sequence-Concepts-1"><span>17.1 Sequence Concepts<a class="copiable-link" href="#Sequence-Concepts-1"> &para;</a></span></h3>
+
+
+<p>A <i class="i">sequence</i>
+<a class="index-entry-id" id="index-sequence"></a>
+ is an ordered collection of <i class="i">elements</i>,
+implemented as either a <i class="i">vector</i> or a <i class="i">list</i>.
+</p>
+<p><i class="i">Sequences</i> can be created by the <i class="i">function</i> <b class="b">make-sequence</b>,
+as well as other <i class="i">functions</i> that create <i class="i">objects</i> 
+of <i class="i">types</i> that are <i class="i">subtypes</i> of <b class="b">sequence</b> 
+(<i class="i">e.g.</i>, <b class="b">list</b>, <b class="b">make-list</b>, <b class="b">mapcar</b>, and <b class="b">vector</b>).
+</p>
+<p>A <i class="i">sequence function</i>
+<a class="index-entry-id" id="index-sequence-function"></a>
+ is a <i class="i">function</i> 
+   defined by this specification
+or added as an extension by the <i class="i">implementation</i> 
+that operates on one or more <i class="i">sequences</i>.
+Whenever a <i class="i">sequence function</i> must construct and return
+a new <i class="i">vector</i>, it always returns a <i class="i">simple vector</i>.
+Similarly, any <i class="i">strings</i> constructed will be <i class="i">simple strings</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  concatenate        length              remove             <!-- /@w -->
+  copy-seq           map                 remove-duplicates  <!-- /@w -->
+  count              map-into            remove-if          <!-- /@w -->
+  count-if           merge               remove-if-not      <!-- /@w -->
+  count-if-not       mismatch            replace            <!-- /@w -->
+  delete             notany              reverse            <!-- /@w -->
+  delete-duplicates  notevery            search             <!-- /@w -->
+  delete-if          nreverse            some               <!-- /@w -->
+  delete-if-not      nsubstitute         sort               <!-- /@w -->
+  elt                nsubstitute-if      stable-sort        <!-- /@w -->
+  every              nsubstitute-if-not  subseq             <!-- /@w -->
+  fill               position            substitute         <!-- /@w -->
+  find               position-if         substitute-if      <!-- /@w -->
+  find-if            position-if-not     substitute-if-not  <!-- /@w -->
+  find-if-not        reduce                                 <!-- /@w -->
+
+        Figure 17&ndash;1: Standardized Sequence Functions       <!-- /@w -->
+
+</pre></div></div>
+
+
+<ul class="mini-toc">
+<li><a href="General-Restrictions-on-Parameters-that-must-be-Sequences.html" accesskey="1">General Restrictions on Parameters that must be Sequences</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sequences-Dictionary.html
@@ -0,0 +1,69 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sequences Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sequences Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sequences Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences.html" rel="up" title="Sequences">
+<link href="Rules-about-Test-Functions.html" rel="prev" title="Rules about Test Functions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Sequences-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Rules-about-Test-Functions.html" accesskey="p" rel="prev">Rules about Test Functions</a>, Up: <a href="Sequences.html" accesskey="u" rel="up">Sequences</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Sequences-Dictionary-1"><span>17.3 Sequences Dictionary<a class="copiable-link" href="#Sequences-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="sequence.html" accesskey="1">sequence                                                     [System Class]</a></li>
+<li><a href="copy_002dseq.html" accesskey="2">copy-seq                                                         [Function]</a></li>
+<li><a href="elt.html" accesskey="3">elt                                                              [Accessor]</a></li>
+<li><a href="fill.html" accesskey="4">fill                                                             [Function]</a></li>
+<li><a href="make_002dsequence.html" accesskey="5">make-sequence                                                    [Function]</a></li>
+<li><a href="subseq.html" accesskey="6">subseq                                                           [Accessor]</a></li>
+<li><a href="map.html" accesskey="7">map                                                              [Function]</a></li>
+<li><a href="map_002dinto.html" accesskey="8">map-into                                                         [Function]</a></li>
+<li><a href="reduce.html" accesskey="9">reduce                                                           [Function]</a></li>
+<li><a href="count.html">count, count-if, count-if-not                                    [Function]</a></li>
+<li><a href="length.html">length                                                           [Function]</a></li>
+<li><a href="reverse.html">reverse, nreverse                                                [Function]</a></li>
+<li><a href="sort.html">sort, stable-sort                                                [Function]</a></li>
+<li><a href="find.html">find, find-if, find-if-not                                       [Function]</a></li>
+<li><a href="position.html">position, position-if, position-if-not                           [Function]</a></li>
+<li><a href="search.html">search                                                           [Function]</a></li>
+<li><a href="mismatch.html">mismatch                                                         [Function]</a></li>
+<li><a href="replace.html">replace                                                          [Function]</a></li>
+<li><a href="substitute.html">substitute, substitute-if, substitute-if-not,</a></li>
+<li><a href="concatenate.html">concatenate                                                      [Function]</a></li>
+<li><a href="merge.html">merge                                                            [Function]</a></li>
+<li><a href="remove.html">remove, remove-if, remove-if-not,</a></li>
+<li><a href="remove_002dduplicates.html">remove-duplicates, delete-duplicates                             [Function]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sequences.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sequences (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sequences (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sequences (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Hash-Tables.html" rel="next" title="Hash Tables">
+<link href="Strings.html" rel="prev" title="Strings">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Sequences">
+<div class="nav-panel">
+<p>
+Next: <a href="Hash-Tables.html" accesskey="n" rel="next">Hash Tables</a>, Previous: <a href="Strings.html" accesskey="p" rel="prev">Strings</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Sequences-1"><span>17 Sequences<a class="copiable-link" href="#Sequences-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Sequence-Concepts.html" accesskey="1">Sequence Concepts</a></li>
+<li><a href="Rules-about-Test-Functions.html" accesskey="2">Rules about Test Functions</a></li>
+<li><a href="Sequences-Dictionary.html" accesskey="3">Sequences Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Serious-Conditions.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Serious Conditions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Serious Conditions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Serious Conditions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Condition-Types.html" rel="up" title="Condition Types">
+<link href="Condition-Types.html" rel="prev" title="Condition Types">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Serious-Conditions">
+<div class="nav-panel">
+<p>
+Previous: <a href="Condition-Types.html" accesskey="p" rel="prev">Condition Types</a>, Up: <a href="Condition-Types.html" accesskey="u" rel="up">Condition Types</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Serious-Conditions-1"><span>9.1.1.1 Serious Conditions<a class="copiable-link" href="#Serious-Conditions-1"> &para;</a></span></h4>
+
+<p>A <i class="i">serious condition</i> is a <i class="i">condition</i> serious
+enough to require interactive intervention if not handled.  
+<i class="i">Serious conditions</i> are typically signaled with <b class="b">error</b> or <b class="b">cerror</b>;
+non-serious <i class="i">conditions</i> are typically signaled with <b class="b">signal</b> or <b class="b">warn</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Setf-Expansions-and-Places.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Setf Expansions and Places (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Setf Expansions and Places (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Setf Expansions and Places (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Kinds-of-Places.html" rel="up" title="Kinds of Places">
+<link href="Macro-Forms-as-Places.html" rel="next" title="Macro Forms as Places">
+<link href="APPLY-Forms-as-Places.html" rel="prev" title="APPLY Forms as Places">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Setf-Expansions-and-Places">
+<div class="nav-panel">
+<p>
+Next: <a href="Macro-Forms-as-Places.html" accesskey="n" rel="next">Macro Forms as Places</a>, Previous: <a href="APPLY-Forms-as-Places.html" accesskey="p" rel="prev">APPLY Forms as Places</a>, Up: <a href="Kinds-of-Places.html" accesskey="u" rel="up">Kinds of Places</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Setf-Expansions-and-Places-1"><span>5.1.2.6 Setf Expansions and Places<a class="copiable-link" href="#Setf-Expansions-and-Places-1"> &para;</a></span></h4>
+
+<p>Any <i class="i">compound form</i> for which the <i class="i">operator</i> has a
+</p>
+<p><i class="i">setf expander</i>
+</p>
+<p>defined can be used as a <i class="i">place</i>.
+</p>
+<p>The 
+<i class="i">operator</i>
+must refer to the global function definition,
+rather than a locally defined <i class="i">function</i> or <i class="i">macro</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Setf-Expansions.html
@@ -0,0 +1,111 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Setf Expansions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Setf Expansions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Setf Expansions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-Places-and-Generalized-Reference.html" rel="up" title="Overview of Places and Generalized Reference">
+<link href="Examples-of-Setf-Expansions.html" rel="next" title="Examples of Setf Expansions">
+<link href="Examples-of-Evaluation-of-Subforms-to-Places.html" rel="prev" title="Examples of Evaluation of Subforms to Places">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Setf-Expansions">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Setf-Expansions.html" accesskey="n" rel="next">Examples of Setf Expansions</a>, Previous: <a href="Examples-of-Evaluation-of-Subforms-to-Places.html" accesskey="p" rel="prev">Examples of Evaluation of Subforms to Places</a>, Up: <a href="Overview-of-Places-and-Generalized-Reference.html" accesskey="u" rel="up">Overview of Places and Generalized Reference</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Setf-Expansions-1"><span>5.1.1.3 Setf Expansions<a class="copiable-link" href="#Setf-Expansions-1"> &para;</a></span></h4>
+
+<p>Sometimes it is possible to avoid evaluating <i class="i">subforms</i> of a 
+<i class="i">place</i> multiple times or in the wrong order.  A
+</p>
+<p><i class="i">setf expansion</i>
+</p>
+<p>for a given access form can be expressed as an ordered collection of five <i class="i">objects</i>:
+</p>
+<dl class="table">
+<dt><b class="b">List of temporary variables</b></dt>
+<dd><p>a list of symbols naming temporary variables to be bound
+sequentially, as if by <b class="b">let*</b>, to <i class="i">values</i> 
+resulting from value forms.
+</p>
+</dd>
+<dt><b class="b">List of value forms</b></dt>
+<dd><p>a list of forms (typically, <i class="i">subforms</i> of the
+<i class="i">place</i>) which when evaluated 
+yield the values to which the corresponding temporary 
+variables should be bound.
+</p>
+</dd>
+<dt><b class="b">List of store variables</b></dt>
+<dd><p>a list of symbols naming temporary store variables which are
+to hold the new values that will be assigned to the
+<i class="i">place</i>.
+</p>
+</dd>
+<dt><b class="b">Storing form</b></dt>
+<dd><p>a form which can reference both the temporary and the store variables,
+and which changes the <i class="i">value</i> of the <i class="i">place</i>
+and guarantees to return as its values the values of the store variables,
+which are the correct values for <b class="b">setf</b> to return.
+</p>
+</dd>
+<dt><b class="b">Accessing form</b></dt>
+<dd><p>a <i class="i">form</i> which can reference the temporary variables,
+and which returns the <i class="i">value</i> of the <i class="i">place</i>.
+</p></dd>
+</dl>
+
+<p>The value returned by the accessing form is
+affected by execution of the storing form, but either of these
+forms might be evaluated any number of times.
+</p>
+<p>It is possible
+to do more than one <b class="b">setf</b> in parallel via
+<b class="b">psetf</b>, <b class="b">shiftf</b>, and <b class="b">rotatef</b>.  
+Because of this, the 
+</p>
+<p><i class="i">setf expander</i>
+</p>
+<p>must produce new temporary 
+and store variable names every time.  For examples of how to do this,
+see <b class="b">gensym</b>.
+</p>
+<p>For each <i class="i">standardized</i> accessor function <i class="i">F</i>,
+unless it is explicitly documented otherwise,
+it is <i class="i">implementation-dependent</i> whether the ability to 
+use an <i class="i">F</i> <i class="i">form</i> as a <b class="b">setf</b> <i class="i">place</i>
+is implemented by a <i class="i">setf expander</i> or a <i class="i">setf function</i>.
+Also, it follows from this that it is <i class="i">implementation-dependent</i> 
+whether the name <code class="t">(setf <i class="i">F</i>)</code> is <i class="i">fbound</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Setf-Expansions.html">Examples of Setf Expansions</a>, Previous: <a href="Examples-of-Evaluation-of-Subforms-to-Places.html">Examples of Evaluation of Subforms to Places</a>, Up: <a href="Overview-of-Places-and-Generalized-Reference.html">Overview of Places and Generalized Reference</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Shadowing.html
@@ -0,0 +1,137 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Shadowing (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Shadowing (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Shadowing (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation.html" rel="up" title="Evaluation">
+<link href="Extent.html" rel="next" title="Extent">
+<link href="Closures-and-Lexical-Binding.html" rel="prev" title="Closures and Lexical Binding">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Shadowing">
+<div class="nav-panel">
+<p>
+Next: <a href="Extent.html" accesskey="n" rel="next">Extent</a>, Previous: <a href="Closures-and-Lexical-Binding.html" accesskey="p" rel="prev">Closures and Lexical Binding</a>, Up: <a href="Evaluation.html" accesskey="u" rel="up">Evaluation</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Shadowing-1"><span>3.1.5 Shadowing<a class="copiable-link" href="#Shadowing-1"> &para;</a></span></h4>
+
+<p>If two <i class="i">forms</i> that <i class="i">establish</i> <i class="i">lexical bindings</i> with
+the same <i class="i">name</i> N are textually nested, then references to N
+within the inner <i class="i">form</i> refer to the <i class="i">binding</i> established by
+the inner <i class="i">form</i>; the inner <i class="i">binding</i> for N
+<i class="i">shadows</i>
+<a class="index-entry-id" id="index-shadow"></a>
+ the outer <i class="i">binding</i> for N.  Outside the inner
+<i class="i">form</i> but inside the outer one, references to N refer to the
+<i class="i">binding</i> established by the outer <i class="i">form</i>.  For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun test (x z)
+   (let ((z (* x 2)))
+     (print z))
+   z)
+</pre></div>
+
+<p>The <i class="i">binding</i> of the variable <code class="t">z</code> by
+<b class="b">let</b> shadows
+the <i class="i">parameter</i> binding for the function <code class="t">test</code>.  The reference to the
+variable <code class="t">z</code> in the <b class="b">print</b> <i class="i">form</i> refers to the <b class="b">let</b> binding.
+The reference to <code class="t">z</code> at the end of the function <code class="t">test</code> 
+refers to the <i class="i">parameter</i> named <code class="t">z</code>.
+</p>
+<p>Constructs that are lexically scoped act as if new names were
+generated for each <i class="i">object</i> on each execution.  Therefore,
+dynamic shadowing cannot occur.  For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun contorted-example (f g x)
+   (if (= x 0)
+       (funcall f)
+       (block here
+          (+ 5 (contorted-example g
+                                  #'(lambda () (return-from here 4))
+                                  (- x 1))))))
+</pre></div>
+
+<p>Consider the call <code class="t">(contorted-example nil nil 2)</code>.  This produces
+<code class="t">4</code>.  During the course of execution, there are three
+calls to <code class="t">contorted-example</code>, interleaved with two 
+blocks:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (contorted-example nil nil 2)
+   (block here_1 ...)
+     (contorted-example nil #'(lambda () (return-from here_1 4)) 1)
+       (block here_2 ...)
+         (contorted-example #'(lambda () (return-from here_1 4))
+                            #'(lambda () (return-from here_2 4))
+                            0)
+             (funcall f)
+                    where f &rArr;  #'(lambda () (return-from here_1 4))
+                 (return-from here_1 4)
+</pre></div>
+
+<p>At the time the <code class="t">funcall</code> is executed
+there are two <b class="b">block</b> <i class="i">exit points</i> outstanding, each apparently
+named <code class="t">here</code>.
+The <b class="b">return-from</b> <i class="i">form</i> executed as a result of the <code class="t">funcall</code>
+operation
+refers to the outer outstanding <i class="i">exit point</i>
+(here_1), not the
+inner one (here_2).
+It
+refers to that <i class="i">exit point</i> textually visible at the point of
+execution of <b class="b">function</b>
+(here abbreviated by the <code class="t">#'</code> syntax) that resulted
+in creation of the <i class="i">function</i> <i class="i">object</i> actually invoked by 
+<b class="b">funcall</b>.                       
+</p>
+<p>If, in this example, one were to change the <code class="t">(funcall f)</code> to
+<code class="t">(funcall g)</code>, then the value of the call <code class="t">(contorted-example nil nil 2)</code>
+would be <code class="t">9</code>.  The value would change because 
+<b class="b">funcall</b> would cause the
+execution of <code class="t">(return-from here_2 4)</code>, thereby causing
+a return from the inner <i class="i">exit point</i> (here_2).
+When that occurs, the value <code class="t">4</code> is returned from the
+middle invocation of <code class="t">contorted-example</code>, <code class="t">5</code> is added to that
+to get <code class="t">9</code>, and that value is returned from the outer block
+and the outermost call to <code class="t">contorted-example</code>.  The point
+is that the choice of <i class="i">exit point</i>
+returned from has nothing to do with its
+being innermost or outermost; rather,
+it depends on the lexical environment
+that is packaged up with a <i class="i">lambda expression</i> when
+<b class="b">function</b> is executed.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Extent.html">Extent</a>, Previous: <a href="Closures-and-Lexical-Binding.html">Closures and Lexical Binding</a>, Up: <a href="Evaluation.html">Evaluation</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Shared_002dInitialize.html
@@ -0,0 +1,128 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Shared-Initialize (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Shared-Initialize (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Shared-Initialize (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Object-Creation-and-Initialization.html" rel="up" title="Object Creation and Initialization">
+<link href="Initialize_002dInstance.html" rel="next" title="Initialize-Instance">
+<link href="Rules-for-Initialization-Arguments.html" rel="prev" title="Rules for Initialization Arguments">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Shared_002dInitialize">
+<div class="nav-panel">
+<p>
+Next: <a href="Initialize_002dInstance.html" accesskey="n" rel="next">Initialize-Instance</a>, Previous: <a href="Rules-for-Initialization-Arguments.html" accesskey="p" rel="prev">Rules for Initialization Arguments</a>, Up: <a href="Object-Creation-and-Initialization.html" accesskey="u" rel="up">Object Creation and Initialization</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Shared_002dInitialize-1"><span>7.1.5 Shared-Initialize<a class="copiable-link" href="#Shared_002dInitialize-1"> &para;</a></span></h4>
+
+<p>The <i class="i">generic function</i> <b class="b">shared-initialize</b> is used to fill the 
+<i class="i">slots</i>
+of an <i class="i">instance</i> 
+using initialization arguments and <code class="t">:initform</code>
+forms when an <i class="i">instance</i> is created, when an 
+<i class="i">instance</i> is re-initialized,
+when an <i class="i">instance</i> 
+is updated to conform to a redefined <i class="i">class</i>, and when
+an <i class="i">instance</i> is updated to conform to a different <i class="i">class</i>.
+It uses
+standard <i class="i">method</i> combination. It takes the following arguments: the
+<i class="i">instance</i> to be initialized, a 
+specification of a set of <i class="i">names</i> of <i class="i">slots</i>
+<i class="i">accessible</i> in that <i class="i">instance</i>, and any number of initialization
+arguments.  The arguments after the first two must form an
+<i class="i">initialization argument list</i>.
+</p>
+<p>The second argument to <b class="b">shared-initialize</b> may be one of the following:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>It can be a (possibly empty) <i class="i">list</i> of <i class="i">slot</i> names,
+which specifies the set of those <i class="i">slot</i> names. 
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>It can be the symbol <b class="b">t</b>, which specifies the set of all of the <i class="i">slots</i>.
+</p>
+</dd>
+</dl>
+
+<p>There is a system-supplied primary <i class="i">method</i> for <b class="b">shared-initialize</b>
+whose first <i class="i">parameter specializer</i> is the <i class="i">class</i> <b class="b">standard-object</b>.
+This <i class="i">method</i> behaves as follows on each <i class="i">slot</i>, 
+whether shared or local:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>If an initialization argument in the 
+<i class="i">initialization argument list</i> specifies a value for that <i class="i">slot</i>, 
+that value is stored
+into the <i class="i">slot</i>, even if a value has already been stored in the <i class="i">slot</i>
+before the <i class="i">method</i> is run.  
+The affected <i class="i">slots</i> are independent of which
+<i class="i">slots</i> are indicated by the second argument to <b class="b">shared-initialize</b>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Any <i class="i">slots</i> 
+indicated by the second argument that are still
+unbound at this point are initialized according to their 
+<code class="t">:initform</code> forms.  For any such <i class="i">slot</i> 
+that has an <code class="t">:initform</code> form,
+that <i class="i">form</i> is evaluated in the 
+lexical environment of its defining 
+<b class="b">defclass</b> form and the result is stored into the <i class="i">slot</i>.  
+For example,
+if a <i class="i">before method</i> stores a value in the 
+<i class="i">slot</i>, the <code class="t">:initform</code> form will not be used to supply a value 
+for the <i class="i">slot</i>.  If
+the second argument specifies a <i class="i">name</i> that does not correspond to any
+<i class="i">slots</i> <i class="i">accessible</i> 
+in the <i class="i">instance</i>, the results are unspecified.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The rules mentioned in <a class="ref" href="Rules-for-Initialization-Arguments.html">Rules for Initialization Arguments</a> are obeyed.
+</p>
+</dd>
+</dl>
+
+<p>The generic function <b class="b">shared-initialize</b> is called by the
+system-supplied primary <i class="i">methods</i> 
+for <b class="b">reinitialize-instance</b>,
+<b class="b">update-instance-for-different-class</b>, 
+<b class="b">update-instance-for-redefined-class</b>, and 
+<b class="b">initialize-instance</b>.  Thus, <i class="i">methods</i> can be written for 
+<b class="b">shared-initialize</b> to specify actions that should be taken in all of
+these contexts.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Initialize_002dInstance.html">Initialize-Instance</a>, Previous: <a href="Rules-for-Initialization-Arguments.html">Rules for Initialization Arguments</a>, Up: <a href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-A.html
@@ -0,0 +1,90 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign A (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign A (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign A (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-S.html" rel="next" title="Sharpsign S">
+<link href="Sharpsign-C.html" rel="prev" title="Sharpsign C">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-A">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-S.html" accesskey="n" rel="next">Sharpsign S</a>, Previous: <a href="Sharpsign-C.html" accesskey="p" rel="prev">Sharpsign C</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-A-1"><span>2.4.8.13 Sharpsign A<a class="copiable-link" href="#Sharpsign-A-1"> &para;</a></span></h4>
+
+<p><code class="t">#<i class="i">n</i>A</code>
+</p>
+<p><code class="t">#<i class="i">n</i><code class="t">A</code><i class="i">object</i></code> constructs an <i class="i">n</i>-dimensional <i class="i">array</i>,
+using <i class="i">object</i> as the value of the <code class="t">:initial-contents</code> argument
+to <b class="b">make-array</b>.
+</p>
+<p>For example, <code class="t">#2A((0 1 5) (foo 2 (hot dog)))</code> represents a 2-by-3 matrix:
+</p>
+<div class="example">
+<pre class="example-preformatted"> 0       1       5
+ foo     2       (hot dog)
+</pre></div>
+
+<p>In contrast, <code class="t">#1A((0 1 5) (foo 2 (hot dog)))</code> 
+represents a <i class="i">vector</i> of <i class="i">length</i> <code class="t">2</code> 
+whose <i class="i">elements</i> are <i class="i">lists</i>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (0 1 5) (foo 2 (hot dog))
+</pre></div>
+
+<p><code class="t">#0A((0 1 5) (foo 2 (hot dog)))</code> represents a zero-dimensional
+<i class="i">array</i> whose sole element is a <i class="i">list</i>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> ((0 1 5) (foo 2 (hot dog)))
+</pre></div>
+
+<p><code class="t">#0A foo</code> represents 
+a zero-dimensional <i class="i">array</i> whose sole element is the 
+<i class="i">symbol</i> <code class="t">foo</code>.
+The notation <code class="t">#1A foo</code> is not valid because <code class="t">foo</code> is
+not a <i class="i">sequence</i>.
+</p>
+<p>If some <i class="i">dimension</i> of the <i class="i">array</i>
+whose representation is being parsed is found to be <code class="t">0</code>,
+all <i class="i">dimensions</i> to the right 
+(<i class="i">i.e.</i>, the higher numbered <i class="i">dimensions</i>)
+are also considered to be <code class="t">0</code>.
+</p>
+<p>For information on how the <i class="i">Lisp printer</i> prints <i class="i">arrays</i>,
+see <a class="ref" href="Printing-Strings.html">Printing Strings</a>,
+    <a class="ref" href="Printing-Bit-Vectors.html">Printing Bit Vectors</a>,
+    <a class="ref" href="Printing-Other-Vectors.html">Printing Other Vectors</a>,
+ or <a class="ref" href="Printing-Other-Arrays.html">Printing Other Arrays</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-Asterisk.html
@@ -0,0 +1,72 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign Asterisk (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign Asterisk (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign Asterisk (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Examples-of-Sharpsign-Asterisk.html" rel="next" title="Examples of Sharpsign Asterisk">
+<link href="Sharpsign-Left_002dParenthesis.html" rel="prev" title="Sharpsign Left-Parenthesis">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-Asterisk">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Sharpsign-Asterisk.html" accesskey="n" rel="next">Examples of Sharpsign Asterisk</a>, Previous: <a href="Sharpsign-Left_002dParenthesis.html" accesskey="p" rel="prev">Sharpsign Left-Parenthesis</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-Asterisk-1"><span>2.4.8.4 Sharpsign Asterisk<a class="copiable-link" href="#Sharpsign-Asterisk-1"> &para;</a></span></h4>
+
+<p><b class="b">Syntax:</b> <code class="t">#*&lt;&lt;<i class="i">bits</i>&gt;&gt;</code>
+</p>
+<p>A <i class="i">simple bit vector</i> is constructed containing the indicated <i class="i">bits</i>
+(<code class="t">0</code>&rsquo;s and <code class="t">1</code>&rsquo;s), where the leftmost <i class="i">bit</i> has index zero 
+and the subsequent <i class="i">bits</i> have increasing indices.
+</p>
+<p><b class="b">Syntax:</b> <code class="t">#&lt;&lt;<i class="i">n</i>&gt;&gt;*&lt;&lt;<i class="i">bits</i>&gt;&gt;</code>
+</p>
+<p>With an argument <i class="i">n</i>,
+the <i class="i">vector</i> to be created is of <i class="i">length</i> <i class="i">n</i>.
+If the number of <i class="i">bits</i> is less than <i class="i">n</i> but greater than zero,
+the last bit is used to fill all remaining bits of the <i class="i">bit vector</i>.
+</p>
+<p>The notations <code class="t">#*</code> and <code class="t">#0*</code> each denote an empty <i class="i">bit vector</i>.
+</p>
+<p>Regardless of whether the optional numeric argument <i class="i">n</i> is provided,
+the <i class="i">token</i> that follows the <i class="i">asterisk</i> is delimited by 
+a normal <i class="i">token</i> delimiter.
+However, (unless the <i class="i">value</i> of <b class="b">*read-suppress*</b> is <i class="i">true</i>)
+an error of <i class="i">type</i> <b class="b">reader-error</b> is signaled 
+     if that <i class="i">token</i> is not composed entirely of <code class="t">0</code>&rsquo;s and <code class="t">1</code>&rsquo;s,
+  or if <i class="i">n</i> was supplied 
+        and the <i class="i">token</i> is composed of more than <i class="i">n</i> <i class="i">bits</i>,
+  or if <i class="i">n</i> is greater than one, but no <i class="i">bits</i> were specified.
+Neither a <i class="i">single escape</i> nor a <i class="i">multiple escape</i> is permitted in this <i class="i">token</i>.
+</p>
+<p>For information on how the <i class="i">Lisp printer</i> prints <i class="i">bit vectors</i>,
+see <a class="ref" href="Printing-Bit-Vectors.html">Printing Bit Vectors</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-B.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign B (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign B (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign B (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-O.html" rel="next" title="Sharpsign O">
+<link href="Sharpsign-Dot.html" rel="prev" title="Sharpsign Dot">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-B">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-O.html" accesskey="n" rel="next">Sharpsign O</a>, Previous: <a href="Sharpsign-Dot.html" accesskey="p" rel="prev">Sharpsign Dot</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-B-1"><span>2.4.8.8 Sharpsign B<a class="copiable-link" href="#Sharpsign-B-1"> &para;</a></span></h4>
+
+<p><code class="t">#B</code><i class="i">rational</i> reads <i class="i">rational</i> in binary (radix 2).
+For example, 
+</p>
+<div class="example">
+<pre class="example-preformatted"> #B1101 &equiv; 13 ;1101_2
+ #b101/11 &equiv; 5/3
+</pre></div>
+
+<p>The consequences are undefined if the token immediately following
+the <code class="t">#B</code> does not have the syntax of a binary (<i class="i">i.e.</i>, radix 2) <i class="i">rational</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-Backslash.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign Backslash (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign Backslash (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign Backslash (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-Single_002dQuote.html" rel="next" title="Sharpsign Single-Quote">
+<link href="Sharpsign.html" rel="prev" title="Sharpsign">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-Backslash">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-Single_002dQuote.html" accesskey="n" rel="next">Sharpsign Single-Quote</a>, Previous: <a href="Sharpsign.html" accesskey="p" rel="prev">Sharpsign</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-Backslash-1"><span>2.4.8.1 Sharpsign Backslash<a class="copiable-link" href="#Sharpsign-Backslash-1"> &para;</a></span></h4>
+
+<p><b class="b">Syntax:</b> <code class="t">#\&lt;&lt;<i class="i">x</i>&gt;&gt;</code>
+</p>
+<p>When the <i class="i">token</i> <i class="i">x</i> is a single <i class="i">character</i> long, 
+this parses as the literal <i class="i">character</i> <i class="i">char</i>.
+<i class="i">Uppercase</i> and <i class="i">lowercase</i> letters are distinguished after <code class="t">#\</code>;
+<code class="t">#\A</code> and <code class="t">#\a</code> denote different <i class="i">character</i> <i class="i">objects</i>.
+Any single <i class="i">character</i> works after <code class="t">#\</code>,
+even those that are normally special to <b class="b">read</b>, 
+such as <i class="i">left-parenthesis</i> and <i class="i">right-parenthesis</i>.
+</p>
+<p>In the single <i class="i">character</i> case,
+the <i class="i">x</i> must be followed by a non-constituent <i class="i">character</i>.
+After <code class="t">#\</code> is read,
+the reader backs up over the <i class="i">slash</i> and then reads a <i class="i">token</i>,
+treating the initial <i class="i">slash</i> as a <i class="i">single escape</i> <i class="i">character</i>
+(whether it really is or not in the <i class="i">current readtable</i>).
+</p>
+<p>When the <i class="i">token</i> <i class="i">x</i> is more than one <i class="i">character</i> long,
+the <i class="i">x</i> must have the syntax of a <i class="i">symbol</i> 
+with no embedded <i class="i">package markers</i>.
+In this case, the <i class="i">sharpsign</i> <i class="i">backslash</i> notation
+parses as the <i class="i">character</i> whose <i class="i">name</i> is <code class="t">(string-upcase <i class="i">x</i>)</code>;
+see <a class="ref" href="Character-Names.html">Character Names</a>.
+</p>
+<p>For information about how the <i class="i">Lisp printer</i> prints <i class="i">character</i> <i class="i">objects</i>,
+see <a class="ref" href="Printing-Characters.html">Printing Characters</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-C.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign C (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign C (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign C (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-A.html" rel="next" title="Sharpsign A">
+<link href="Sharpsign-R.html" rel="prev" title="Sharpsign R">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-C">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-A.html" accesskey="n" rel="next">Sharpsign A</a>, Previous: <a href="Sharpsign-R.html" accesskey="p" rel="prev">Sharpsign R</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-C-1"><span>2.4.8.12 Sharpsign C<a class="copiable-link" href="#Sharpsign-C-1"> &para;</a></span></h4>
+
+<p><code class="t">#C</code> reads a following <i class="i">object</i>, which must be a <i class="i">list</i> of
+length two whose <i class="i">elements</i> are both <i class="i">reals</i>.
+These <i class="i">reals</i> denote, respectively,
+the real and imaginary parts of a <i class="i">complex</i> number.
+</p>
+<p>If the two parts as notated are not of the same data type,
+then they are converted 
+according to the rules of floating-point <i class="i">contagion</i>
+described in <a class="ref" href="Contagion-in-Numeric-Operations.html">Contagion in Numeric Operations</a>.
+</p>
+<p><code class="t">#C(<i class="i">real</i> <i class="i">imag</i>)</code> is equivalent to 
+<code class="t">#.(complex (quote <i class="i">real</i>) (quote <i class="i">imag</i>))</code>,
+except that <code class="t">#C</code> is not affected by <b class="b">*read-eval*</b>.
+See the <i class="i">function</i> <b class="b">complex</b>.
+</p>
+<p>Figure 2&ndash;21 contains examples of the use of <code class="t">#C</code>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">#C(3.0s1 2.0s-1)</code>  ;A <i class="i">complex</i> with <i class="i">small float</i> parts.                <!-- /@w -->
+  <code class="t">#C(5 -3) </code>         ;A &ldquo;Gaussian integer&rdquo;                             <!-- /@w -->
+  <code class="t">#C(5/3 7.0) </code>      ;Will be converted internally to <code class="t">#C(1.66666 7.0)</code>  <!-- /@w -->
+  <code class="t">#C(0 1)</code>           ;The imaginary unit; that is, i.                  <!-- /@w -->
+
+                  Figure 2&ndash;21: Complex Number Example                <!-- /@w -->
+
+</pre></div></div>
+
+<p>For further information, 
+see <a class="ref" href="Printing-Complexes.html">Printing Complexes</a> and <a class="ref" href="Syntax-of-a-Complex.html">Syntax of a Complex</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-Colon.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign Colon (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign Colon (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign Colon (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-Dot.html" rel="next" title="Sharpsign Dot">
+<link href="Examples-of-Sharpsign-Asterisk.html" rel="prev" title="Examples of Sharpsign Asterisk">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-Colon">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-Dot.html" accesskey="n" rel="next">Sharpsign Dot</a>, Previous: <a href="Examples-of-Sharpsign-Asterisk.html" accesskey="p" rel="prev">Examples of Sharpsign Asterisk</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-Colon-1"><span>2.4.8.6 Sharpsign Colon<a class="copiable-link" href="#Sharpsign-Colon-1"> &para;</a></span></h4>
+
+<p><b class="b">Syntax:</b>  <code class="t">#:&lt;&lt;<i class="i">symbol-name</i>&gt;&gt;</code>
+</p>
+<p><code class="t">#:</code> introduces an <i class="i">uninterned</i> <i class="i">symbol</i> whose <i class="i">name</i> 
+is <i class="i">symbol-name</i>.  Every time this syntax is encountered,
+a <i class="i">distinct</i> <i class="i">uninterned</i> <i class="i">symbol</i> is created.
+The <i class="i">symbol-name</i> must have the syntax of a <i class="i">symbol</i> 
+with no <i class="i">package prefix</i>.
+</p>
+<p>For information on how the <i class="i">Lisp reader</i> 
+prints <i class="i">uninterned</i> <i class="i">symbols</i>,
+see <a class="ref" href="Printing-Symbols.html">Printing Symbols</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-Dot.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign Dot (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign Dot (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign Dot (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-B.html" rel="next" title="Sharpsign B">
+<link href="Sharpsign-Colon.html" rel="prev" title="Sharpsign Colon">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-Dot">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-B.html" accesskey="n" rel="next">Sharpsign B</a>, Previous: <a href="Sharpsign-Colon.html" accesskey="p" rel="prev">Sharpsign Colon</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-Dot-1"><span>2.4.8.7 Sharpsign Dot<a class="copiable-link" href="#Sharpsign-Dot-1"> &para;</a></span></h4>
+
+<p><code class="t">#.<i class="i">foo</i></code> is read as the <i class="i">object</i> resulting from the evaluation
+of the <i class="i">object</i> represented by <i class="i">foo</i>.
+The evaluation is done during the <b class="b">read</b> process,
+when the <code class="t">#.</code> notation is encountered.
+The <code class="t">#.</code> syntax therefore performs a read-time evaluation of <i class="i">foo</i>.
+</p>
+<p>The normal effect of <code class="t">#.</code> is inhibited when the <i class="i">value</i> of <b class="b">*read-eval*</b> is <i class="i">false</i>.
+</p>
+<p>In that situation, an error of <i class="i">type</i> <b class="b">reader-error</b> is signaled.
+</p>
+<p>For an <i class="i">object</i>
+that does not have a convenient printed
+representation, a <i class="i">form</i> that computes the <i class="i">object</i> can be given using
+the <code class="t">#.</code> notation.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-Equal_002dSign.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign Equal-Sign (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign Equal-Sign (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign Equal-Sign (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-Sharpsign.html" rel="next" title="Sharpsign Sharpsign">
+<link href="Sharpsign-P.html" rel="prev" title="Sharpsign P">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-Equal_002dSign">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-Sharpsign.html" accesskey="n" rel="next">Sharpsign Sharpsign</a>, Previous: <a href="Sharpsign-P.html" accesskey="p" rel="prev">Sharpsign P</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-Equal_002dSign-1"><span>2.4.8.16 Sharpsign Equal-Sign<a class="copiable-link" href="#Sharpsign-Equal_002dSign-1"> &para;</a></span></h4>
+
+<p><code class="t">#<i class="i">n</i>=</code>
+</p>
+<p><code class="t">#<i class="i">n</i>=<i class="i">object</i></code> reads as whatever <i class="i">object</i>
+has <i class="i">object</i> as its printed representation.  However, that <i class="i">object</i>
+is labeled by <i class="i">n</i>, a required unsigned decimal integer, for
+possible reference by the syntax <code class="t">#<i class="i">n</i>#</code>.
+The scope of the label is the <i class="i">expression</i> being read by the outermost
+call to <b class="b">read</b>; within this <i class="i">expression</i>,
+the same label may not appear twice.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-Left_002dParenthesis.html
@@ -0,0 +1,89 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign Left-Parenthesis (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign Left-Parenthesis (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign Left-Parenthesis (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-Asterisk.html" rel="next" title="Sharpsign Asterisk">
+<link href="Sharpsign-Single_002dQuote.html" rel="prev" title="Sharpsign Single-Quote">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-Left_002dParenthesis">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-Asterisk.html" accesskey="n" rel="next">Sharpsign Asterisk</a>, Previous: <a href="Sharpsign-Single_002dQuote.html" accesskey="p" rel="prev">Sharpsign Single-Quote</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-Left_002dParenthesis-1"><span>2.4.8.3 Sharpsign Left-Parenthesis<a class="copiable-link" href="#Sharpsign-Left_002dParenthesis-1"> &para;</a></span></h4>
+
+<p><code class="t">#(</code> and <code class="t">)</code> are used to notate a <i class="i">simple vector</i>. 
+</p>
+<p>If an unsigned decimal integer
+appears between the <code class="t">#</code> and <code class="t">(</code>,
+it specifies explicitly the length of the <i class="i">vector</i>.  
+The consequences are undefined if the number of <i class="i">objects</i> 
+specified before the closing <code class="t">)</code>
+exceeds the unsigned decimal integer.
+If the number of <i class="i">objects</i> supplied before the closing <code class="t">)</code>
+is less than the unsigned decimal integer but greater than zero,
+the last <i class="i">object</i>
+is used to fill all
+remaining elements of the <i class="i">vector</i>.
+</p>
+<p>[Editorial Note by Barmar: This should say &quot;signals...&quot;.]
+The consequences are undefined if the unsigned decimal integer is non-zero and
+number of <i class="i">objects</i> supplied before the closing <code class="t">)</code>
+is zero.
+For example,
+</p>
+<div class="example">
+<pre class="example-preformatted"> #(a b c c c c)
+ #6(a b c c c c)
+ #6(a b c)
+ #6(a b c c)
+</pre></div>
+
+<p>all mean the same thing: a <i class="i">vector</i> of length <code class="t">6</code>
+with <i class="i">elements</i> <code class="t">a</code>, <code class="t">b</code>, and four occurrences of <code class="t">c</code>.  
+Other examples follow:
+</p>
+<div class="example">
+<pre class="example-preformatted"> #(a b c)               ;A vector of length 3
+ #(2 3 5 7 11 13 17 19 23 29 31 37 41 43 47)
+                        ;A vector containing the primes below 50
+ #()                    ;An empty vector
+</pre></div>
+
+<p>The notation <code class="t">#()</code> denotes an empty <i class="i">vector</i>, as does <code class="t">#0()</code>.
+</p>
+<p>For information on how the <i class="i">Lisp printer</i> prints <i class="i">vectors</i>,
+see <a class="ref" href="Printing-Strings.html">Printing Strings</a>,
+    <a class="ref" href="Printing-Bit-Vectors.html">Printing Bit Vectors</a>,
+ or <a class="ref" href="Printing-Other-Vectors.html">Printing Other Vectors</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-Less_002dThan_002dSign.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign Less-Than-Sign (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign Less-Than-Sign (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign Less-Than-Sign (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-Whitespace.html" rel="next" title="Sharpsign Whitespace">
+<link href="Notes-about-Style-for-Sharpsign-Vertical_002dBar.html" rel="prev" title="Notes about Style for Sharpsign Vertical-Bar">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-Less_002dThan_002dSign">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-Whitespace.html" accesskey="n" rel="next">Sharpsign Whitespace</a>, Previous: <a href="Notes-about-Style-for-Sharpsign-Vertical_002dBar.html" accesskey="p" rel="prev">Notes about Style for Sharpsign Vertical-Bar</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-Less_002dThan_002dSign-1"><span>2.4.8.23 Sharpsign Less-Than-Sign<a class="copiable-link" href="#Sharpsign-Less_002dThan_002dSign-1"> &para;</a></span></h4>
+
+<p><code class="t">#&lt;</code> is not valid reader syntax.
+The <i class="i">Lisp reader</i> will signal an error 
+</p>
+<p>of <i class="i">type</i> <b class="b">reader-error</b>
+</p>
+<p>on encountering <code class="t">#&lt;</code>.
+This syntax is typically used in the printed representation 
+of <i class="i">objects</i> that cannot be read back in.  
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-Minus.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign Minus (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign Minus (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign Minus (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-Vertical_002dBar.html" rel="next" title="Sharpsign Vertical-Bar">
+<link href="Sharpsign-Plus.html" rel="prev" title="Sharpsign Plus">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-Minus">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-Vertical_002dBar.html" accesskey="n" rel="next">Sharpsign Vertical-Bar</a>, Previous: <a href="Sharpsign-Plus.html" accesskey="p" rel="prev">Sharpsign Plus</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-Minus-1"><span>2.4.8.19 Sharpsign Minus<a class="copiable-link" href="#Sharpsign-Minus-1"> &para;</a></span></h4>
+
+<p><code class="t">#-</code> is like <code class="t">#+</code> 
+except that it skips the <i class="i">expression</i> if the <i class="i">test</i> succeeds; 
+that is,
+</p>
+<div class="example">
+<pre class="example-preformatted">#-<i class="i">test</i> <i class="i">expression</i> &equiv; #+(not <i class="i">test</i>) <i class="i">expression</i>
+</pre></div>
+
+<p>For examples, see <a class="ref" href="Examples-of-Feature-Expressions.html">Examples of Feature Expressions</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-O.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign O (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign O (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign O (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-X.html" rel="next" title="Sharpsign X">
+<link href="Sharpsign-B.html" rel="prev" title="Sharpsign B">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-O">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-X.html" accesskey="n" rel="next">Sharpsign X</a>, Previous: <a href="Sharpsign-B.html" accesskey="p" rel="prev">Sharpsign B</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-O-1"><span>2.4.8.9 Sharpsign O<a class="copiable-link" href="#Sharpsign-O-1"> &para;</a></span></h4>
+
+<p><code class="t">#O</code><i class="i">rational</i> reads <i class="i">rational</i> in octal (radix 8).
+For example, 
+</p>
+<div class="example">
+<pre class="example-preformatted"> #o37/15 &equiv; 31/13
+ #o777 &equiv; 511
+ #o105 &equiv; 69 ;105_8
+</pre></div>
+
+<p>The consequences are undefined if the token immediately following
+the <code class="t">#O</code> does not have the syntax of an octal (<i class="i">i.e.</i>, radix 8) <i class="i">rational</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-P.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign P (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign P (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign P (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-Equal_002dSign.html" rel="next" title="Sharpsign Equal-Sign">
+<link href="Sharpsign-S.html" rel="prev" title="Sharpsign S">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-P">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-Equal_002dSign.html" accesskey="n" rel="next">Sharpsign Equal-Sign</a>, Previous: <a href="Sharpsign-S.html" accesskey="p" rel="prev">Sharpsign S</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-P-1"><span>2.4.8.15 Sharpsign P<a class="copiable-link" href="#Sharpsign-P-1"> &para;</a></span></h4>
+
+<p><code class="t">#P</code> reads a following <i class="i">object</i>, which must be a <i class="i">string</i>.
+</p>
+<p><code class="t">#P&lt;&lt;<i class="i">expression</i>&gt;&gt;</code> is equivalent to 
+<code class="t">#.(parse-namestring '&lt;&lt;<i class="i">expression</i>&gt;&gt;)</code>,
+except that <code class="t">#P</code> is not affected by <b class="b">*read-eval*</b>.
+</p>
+<p>For information on how the <i class="i">Lisp printer</i> prints <i class="i">pathnames</i>,
+see <a class="ref" href="Printing-Pathnames.html">Printing Pathnames</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-Plus.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign Plus (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign Plus (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign Plus (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-Minus.html" rel="next" title="Sharpsign Minus">
+<link href="Sharpsign-Sharpsign.html" rel="prev" title="Sharpsign Sharpsign">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-Plus">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-Minus.html" accesskey="n" rel="next">Sharpsign Minus</a>, Previous: <a href="Sharpsign-Sharpsign.html" accesskey="p" rel="prev">Sharpsign Sharpsign</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-Plus-1"><span>2.4.8.18 Sharpsign Plus<a class="copiable-link" href="#Sharpsign-Plus-1"> &para;</a></span></h4>
+
+<p><code class="t">#+</code> provides a read-time conditionalization facility;
+the syntax is <code class="t">#+<i class="i">test</i> <i class="i">expression</i></code>.
+If the <i class="i">feature expression</i> <i class="i">test</i> succeeds,
+then this textual notation represents an <i class="i">object</i>
+ whose printed representation is <i class="i">expression</i>.
+If the <i class="i">feature expression</i> <i class="i">test</i> fails,
+then this textual notation is treated as <i class="i">whitespace</i>_2; 
+ that is, it is as if the &ldquo;<code class="t">#+</code> <i class="i">test</i> <i class="i">expression</i>&rdquo; 
+ did not appear and only a <i class="i">space</i> appeared in its place.
+</p>
+<p>For a detailed description of success and failure in <i class="i">feature expressions</i>,
+see <a class="ref" href="Feature-Expressions.html">Feature Expressions</a>.
+</p>
+<p><code class="t">#+</code> operates by first reading the <i class="i">feature expression</i>
+and then skipping over the <i class="i">form</i> if the <i class="i">feature expression</i> fails.
+</p>
+<p>While reading the <i class="i">test</i>, the <i class="i">current package</i> is the <code class="t">KEYWORD</code> <i class="i">package</i>.
+</p>
+<p>Skipping over the <i class="i">form</i> is accomplished by <i class="i">binding</i> 
+<b class="b">*read-suppress*</b> to <i class="i">true</i> and then calling <b class="b">read</b>.
+</p>
+<p>For examples, see <a class="ref" href="Examples-of-Feature-Expressions.html">Examples of Feature Expressions</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-R.html
@@ -0,0 +1,83 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign R (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign R (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign R (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-C.html" rel="next" title="Sharpsign C">
+<link href="Sharpsign-X.html" rel="prev" title="Sharpsign X">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-R">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-C.html" accesskey="n" rel="next">Sharpsign C</a>, Previous: <a href="Sharpsign-X.html" accesskey="p" rel="prev">Sharpsign X</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-R-1"><span>2.4.8.11 Sharpsign R<a class="copiable-link" href="#Sharpsign-R-1"> &para;</a></span></h4>
+
+<p><code class="t">#<i class="i">n</i>R</code>
+</p>
+<p><code class="t">#<i class="i">radix</i>R<i class="i">rational</i></code> reads <i class="i">rational</i> in radix <i class="i">radix</i>.
+<i class="i">radix</i> must consist of only digits
+that are interpreted as an <i class="i">integer</i>
+in decimal radix; its value must be between 2 and 36 (inclusive).
+Only valid digits
+for the specified radix may be used.
+</p>
+<p>For example, <code class="t">#3r102</code> is another way of writing <code class="t">11</code> (decimal), 
+and <code class="t">#11R32</code>
+is another way of writing <code class="t">35</code> (decimal).  
+For radices larger than 10, letters of
+the alphabet are used in order for the digits after <code class="t">9</code>.
+No alternate <code class="t">#</code> notation exists for the decimal radix since a
+decimal point suffices.
+</p>
+<p>Figure 2&ndash;20 contains examples of the use of <code class="t">#B</code>,
+<code class="t">#O</code>, <code class="t">#X</code>, and <code class="t">#R</code>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">#2r11010101</code>  ;Another way of writing <code class="t">213</code> decimal  <!-- /@w -->
+  <code class="t">#b11010101</code>   ;Ditto                               <!-- /@w -->
+  <code class="t">#b+11010101</code>  ;Ditto                               <!-- /@w -->
+  <code class="t">#o325</code>        ;Ditto, in octal radix               <!-- /@w -->
+  <code class="t">#xD5</code>         ;Ditto, in hexadecimal radix         <!-- /@w -->
+  <code class="t">#16r+D5</code>      ;Ditto                               <!-- /@w -->
+  <code class="t">#o-300</code>       ;Decimal <code class="t">-192</code>, written in base 8     <!-- /@w -->
+  <code class="t">#3r-21010</code>    ;Same thing in base 3                <!-- /@w -->
+  <code class="t">#25R-7H</code>      ;Same thing in base 25               <!-- /@w -->
+  <code class="t">#xACCEDED</code>    ;<code class="t">181202413</code>, in hexadecimal radix     <!-- /@w -->
+
+        Figure 2&ndash;20: Radix Indicator Example       <!-- /@w -->
+
+</pre></div></div>
+
+<p>The consequences are undefined if the token immediately following
+the <code class="t">#<i class="i">n</i>R</code> does not have the syntax of a <i class="i">rational</i> in radix <i class="i">n</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-Right_002dParenthesis.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign Right-Parenthesis (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign Right-Parenthesis (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign Right-Parenthesis (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-Whitespace.html" rel="prev" title="Sharpsign Whitespace">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-Right_002dParenthesis">
+<div class="nav-panel">
+<p>
+Previous: <a href="Sharpsign-Whitespace.html" accesskey="p" rel="prev">Sharpsign Whitespace</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-Right_002dParenthesis-1"><span>2.4.8.25 Sharpsign Right-Parenthesis<a class="copiable-link" href="#Sharpsign-Right_002dParenthesis-1"> &para;</a></span></h4>
+
+<p>This is not valid reader syntax.
+</p>
+<p>The <i class="i">Lisp reader</i> will signal an error 
+</p>
+<p>of <i class="i">type</i> <b class="b">reader-error</b>
+</p>
+<p>upon encountering <code class="t">#)</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-S.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign S (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign S (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign S (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-P.html" rel="next" title="Sharpsign P">
+<link href="Sharpsign-A.html" rel="prev" title="Sharpsign A">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-S">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-P.html" accesskey="n" rel="next">Sharpsign P</a>, Previous: <a href="Sharpsign-A.html" accesskey="p" rel="prev">Sharpsign A</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-S-1"><span>2.4.8.14 Sharpsign S<a class="copiable-link" href="#Sharpsign-S-1"> &para;</a></span></h4>
+
+<p><code class="t">#s(name slot1 value1 slot2 value2 ...)</code>
+denotes a <i class="i">structure</i>.  This is valid only if <i class="i">name</i> is the name
+of a <i class="i">structure</i> <i class="i">type</i> already defined by <b class="b">defstruct</b> 
+and if the <i class="i">structure</i> <i class="i">type</i> has a standard constructor function.
+Let <i class="i">cm</i> stand for the name of this constructor function;
+then this syntax is equivalent to
+</p>
+<div class="example">
+<pre class="example-preformatted"> #.(cm keyword1 'value1 keyword2 'value2 ...)
+</pre></div>
+
+<p>where each <i class="i">keywordj</i> is the result of computing
+</p>
+<div class="example">
+<pre class="example-preformatted"> (intern (string slotj) (find-package 'keyword))
+</pre></div>
+
+<p>The net effect is that the constructor function is called with the specified
+slots having the specified values. 
+</p>
+<p>(This coercion feature is deprecated; in the future, keyword names will 
+ be taken in the package they are read in, so <i class="i">symbols</i> that are 
+ actually in the <code class="t">KEYWORD</code> <i class="i">package</i> should be used if that is what is desired.)
+</p>
+<p>Whatever <i class="i">object</i> the constructor function returns
+is returned by the <code class="t">#S</code> syntax.
+</p>
+<p>For information on how the <i class="i">Lisp printer</i> prints <i class="i">structures</i>,
+see <a class="ref" href="Printing-Structures.html">Printing Structures</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-Sharpsign.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign Sharpsign (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign Sharpsign (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign Sharpsign (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-Plus.html" rel="next" title="Sharpsign Plus">
+<link href="Sharpsign-Equal_002dSign.html" rel="prev" title="Sharpsign Equal-Sign">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-Sharpsign">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-Plus.html" accesskey="n" rel="next">Sharpsign Plus</a>, Previous: <a href="Sharpsign-Equal_002dSign.html" accesskey="p" rel="prev">Sharpsign Equal-Sign</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-Sharpsign-1"><span>2.4.8.17 Sharpsign Sharpsign<a class="copiable-link" href="#Sharpsign-Sharpsign-1"> &para;</a></span></h4>
+
+<p><code class="t">#<i class="i">n</i>#</code>
+</p>
+<p><code class="t">#<i class="i">n</i>#</code>, where <i class="i">n</i> is a required unsigned decimal
+<i class="i">integer</i>,
+provides a reference to some <i class="i">object</i> labeled by <code class="t">#<i class="i">n</i>=</code>;
+that is, <code class="t">#<i class="i">n</i>#</code> represents a pointer to the same 
+(<b class="b">eq</b>) <i class="i">object</i> labeled by <code class="t">#<i class="i">n</i>=</code>.
+For example, a structure created in the variable <code class="t">y</code> by this code:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq x (list 'p 'q))
+ (setq y (list (list 'a 'b) x 'foo x))
+ (rplacd (last y) (cdr y))
+</pre></div>
+
+<p>could be represented in this way:
+</p>
+<div class="example">
+<pre class="example-preformatted"> ((a b) . #1=(#2=(p q) foo #2# . #1#))
+</pre></div>
+
+<p>Without this notation, but with <b class="b">*print-length*</b> set to <code class="t">10</code>
+and <b class="b">*print-circle*</b> set to <b class="b">nil</b>,
+the structure would print in this way:
+</p>
+<div class="example">
+<pre class="example-preformatted"> ((a b) (p q) foo (p q) (p q) foo (p q) (p q) foo (p q) ...)
+</pre></div>
+
+<p>A reference <code class="t">#<i class="i">n</i>#</code> may only occur after a label <code class="t">#<i class="i">n</i>=</code>;
+forward references are not permitted.  The reference
+may not appear as the labeled object itself (that is,
+<code class="t">#<i class="i">n</i>=#<i class="i">n</i>#</code>) may not be written 
+because the <i class="i">object</i>
+labeled by <code class="t">#<i class="i">n</i>=</code> is not well defined in this case.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-Single_002dQuote.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign Single-Quote (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign Single-Quote (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign Single-Quote (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-Left_002dParenthesis.html" rel="next" title="Sharpsign Left-Parenthesis">
+<link href="Sharpsign-Backslash.html" rel="prev" title="Sharpsign Backslash">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-Single_002dQuote">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-Left_002dParenthesis.html" accesskey="n" rel="next">Sharpsign Left-Parenthesis</a>, Previous: <a href="Sharpsign-Backslash.html" accesskey="p" rel="prev">Sharpsign Backslash</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-Single_002dQuote-1"><span>2.4.8.2 Sharpsign Single-Quote<a class="copiable-link" href="#Sharpsign-Single_002dQuote-1"> &para;</a></span></h4>
+
+<p>Any <i class="i">expression</i> preceded by <code class="t">#'</code> 
+(<i class="i">sharpsign</i> followed by <i class="i">single-quote</i>),
+as in <code class="t">#'<i class="i">expression</i></code>,
+is treated by the <i class="i">Lisp reader</i> as an abbreviation for and parsed identically 
+to the <i class="i">expression</i> <code class="t">(function <i class="i">expression</i>)</code>.
+See <b class="b">function</b>.  For example,
+</p>
+<div class="example">
+<pre class="example-preformatted">(apply #'+ l) &equiv; (apply (function +) l)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-Vertical_002dBar.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign Vertical-Bar (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign Vertical-Bar (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign Vertical-Bar (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Examples-of-Sharpsign-Vertical_002dBar.html" rel="next" title="Examples of Sharpsign Vertical-Bar">
+<link href="Sharpsign-Minus.html" rel="prev" title="Sharpsign Minus">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-Vertical_002dBar">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Sharpsign-Vertical_002dBar.html" accesskey="n" rel="next">Examples of Sharpsign Vertical-Bar</a>, Previous: <a href="Sharpsign-Minus.html" accesskey="p" rel="prev">Sharpsign Minus</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-Vertical_002dBar-1"><span>2.4.8.20 Sharpsign Vertical-Bar<a class="copiable-link" href="#Sharpsign-Vertical_002dBar-1"> &para;</a></span></h4>
+
+<p><code class="t">#|...|#</code> is treated as a comment by the reader.
+It must be balanced with respect to other occurrences of <code class="t">#|</code> and <code class="t">|#</code>,
+but otherwise may contain any characters whatsoever.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-Whitespace.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign Whitespace (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign Whitespace (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign Whitespace (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-Right_002dParenthesis.html" rel="next" title="Sharpsign Right-Parenthesis">
+<link href="Sharpsign-Less_002dThan_002dSign.html" rel="prev" title="Sharpsign Less-Than-Sign">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-Whitespace">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-Right_002dParenthesis.html" accesskey="n" rel="next">Sharpsign Right-Parenthesis</a>, Previous: <a href="Sharpsign-Less_002dThan_002dSign.html" accesskey="p" rel="prev">Sharpsign Less-Than-Sign</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-Whitespace-1"><span>2.4.8.24 Sharpsign Whitespace<a class="copiable-link" href="#Sharpsign-Whitespace-1"> &para;</a></span></h4>
+
+<p><code class="t">#</code> followed immediately by <i class="i">whitespace</i>_1 is not valid reader syntax.
+The <i class="i">Lisp reader</i> will signal an error of <i class="i">type</i> <b class="b">reader-error</b> if it
+encounters the reader macro notation <code class="t">#&lt;<i class="i">Newline</i>&gt;</code> or <code class="t">#&lt;<i class="i">Space</i>&gt;</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign-X.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign X (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign X (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign X (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sharpsign.html" rel="up" title="Sharpsign">
+<link href="Sharpsign-R.html" rel="next" title="Sharpsign R">
+<link href="Sharpsign-O.html" rel="prev" title="Sharpsign O">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sharpsign-X">
+<div class="nav-panel">
+<p>
+Next: <a href="Sharpsign-R.html" accesskey="n" rel="next">Sharpsign R</a>, Previous: <a href="Sharpsign-O.html" accesskey="p" rel="prev">Sharpsign O</a>, Up: <a href="Sharpsign.html" accesskey="u" rel="up">Sharpsign</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sharpsign-X-1"><span>2.4.8.10 Sharpsign X<a class="copiable-link" href="#Sharpsign-X-1"> &para;</a></span></h4>
+
+<p><code class="t">#X</code><i class="i">rational</i> reads <i class="i">rational</i> in hexadecimal (radix 16).
+The digits above <code class="t">9</code> are the letters <code class="t">A</code> through <code class="t">F</code> (the lowercase
+letters <code class="t">a</code> through <code class="t">f</code> are also acceptable).  For example,
+</p>
+<div class="example">
+<pre class="example-preformatted"> #xF00 &equiv; 3840             
+ #x105 &equiv; 261 ;105_<code class="t">16</code>
+</pre></div>
+
+<p>The consequences are undefined if the token immediately following
+the <code class="t">#X</code> does not have the syntax of a hexadecimal (<i class="i">i.e.</i>, radix 16) <i class="i">rational</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sharpsign.html
@@ -0,0 +1,153 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sharpsign (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sharpsign (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sharpsign (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standard-Macro-Characters.html" rel="up" title="Standard Macro Characters">
+<link href="Re_002dReading-Abbreviated-Expressions.html" rel="next" title="Re-Reading Abbreviated Expressions">
+<link href="Comma.html" rel="prev" title="Comma">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Sharpsign">
+<div class="nav-panel">
+<p>
+Next: <a href="Re_002dReading-Abbreviated-Expressions.html" accesskey="n" rel="next">Re-Reading Abbreviated Expressions</a>, Previous: <a href="Comma.html" accesskey="p" rel="prev">Comma</a>, Up: <a href="Standard-Macro-Characters.html" accesskey="u" rel="up">Standard Macro Characters</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Sharpsign-1"><span>2.4.8 Sharpsign<a class="copiable-link" href="#Sharpsign-1"> &para;</a></span></h4>
+
+<p><i class="i">Sharpsign</i> is a <i class="i">non-terminating</i> <i class="i">dispatching macro character</i>.
+It reads an optional 
+sequence of digits and then one more character,
+and uses that character to select a <i class="i">function</i> to run as a
+<i class="i">reader macro function</i>.
+</p>
+<p>The <i class="i">standard syntax</i> includes constructs introduced by the <code class="t">#</code> character.
+The syntax of these constructs is as follows:
+a character that identifies the type of construct is 
+followed by arguments in some form.
+If the character is a letter, its <i class="i">case</i> is not important;
+<code class="t">#O</code> and <code class="t">#o</code> are considered to be equivalent, for example.
+</p>
+<p>Certain <code class="t">#</code> constructs allow an unsigned decimal number to appear
+between the <code class="t">#</code> and the character.
+</p>
+<p>The <i class="i">reader macros</i> associated with the <i class="i">dispatching macro character</i> <code class="t">#</code>
+are described later in this section and summarized in Figure 2&ndash;19.
+</p>
+
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  dispatch char  purpose                  dispatch char  purpose                <!-- /@w -->
+  Backspace      signals error            <code class="t">{</code>              undefined*             <!-- /@w -->
+  Tab            signals error            <code class="t">}</code>              undefined*             <!-- /@w -->
+  Newline        signals error            +              read-time conditional  <!-- /@w -->
+  Linefeed       signals error            -              read-time conditional  <!-- /@w -->
+  Page           signals error            .              read-time evaluation   <!-- /@w -->
+  Return         signals error            /              undefined              <!-- /@w -->
+  Space          signals error            A, a           array                  <!-- /@w -->
+  !              undefined*               B, b           binary rational        <!-- /@w -->
+  <code class="t">&quot;</code>              undefined                C, c           complex number         <!-- /@w -->
+  #              reference to = label     D, d           undefined              <!-- /@w -->
+  $             undefined                E, e           undefined              <!-- /@w -->
+  %              undefined                F, f           undefined              <!-- /@w -->
+  &amp;              undefined                G, g           undefined              <!-- /@w -->
+  &rsquo;              function abbreviation    H, h           undefined              <!-- /@w -->
+  (              simple vector            I, i           undefined              <!-- /@w -->
+  )              signals error            J, j           undefined              <!-- /@w -->
+  <code class="t">*</code>              bit vector               K, k           undefined              <!-- /@w -->
+  ,              undefined                L, l           undefined              <!-- /@w -->
+  :              uninterned symbol        M, m           undefined              <!-- /@w -->
+  ;              undefined                N, n           undefined              <!-- /@w -->
+  <code class="t">&lt;</code>              signals error            O, o           octal rational         <!-- /@w -->
+  <code class="t">=</code>              labels following object  P, p           pathname               <!-- /@w -->
+  <code class="t">&gt;</code>              undefined                Q, q           undefined              <!-- /@w -->
+  ?              undefined*               R, r           radix-n rational       <!-- /@w -->
+  @              undefined                S, s           structure              <!-- /@w -->
+  [              undefined*               T, t           undefined              <!-- /@w -->
+  <code class="t">\</code>              character object         U, u           undefined              <!-- /@w -->
+  ]              undefined*               V, v           undefined              <!-- /@w -->
+  <code class="t">^</code>            undefined                W, w           undefined              <!-- /@w -->
+  <code class="t">_</code>              undefined                X, x           hexadecimal rational   <!-- /@w -->
+  &lsquo;              undefined                Y, y           undefined              <!-- /@w -->
+  <code class="t">|</code>              balanced comment         Z, z           undefined              <!-- /@w -->
+  <code class="t">~</code>              undefined                Rubout         undefined              <!-- /@w -->
+
+           Figure 2&ndash;19: Standard # Dispatching Macro Character Syntax         <!-- /@w -->
+
+</pre></div></div>
+
+
+<p>The combinations marked by an asterisk (*) are explicitly reserved to the
+user.  No <i class="i">conforming implementation</i> defines them.
+</p>
+<p>Note also that <i class="i">digits</i> do not appear in the preceding table.  This is
+because the notations <code class="t">#0</code>, <code class="t">#1</code>, ..., <code class="t">#9</code> are
+reserved for another purpose which occupies the same syntactic space.
+When a <i class="i">digit</i> follows a <i class="i">sharpsign</i>,
+it is not treated as a dispatch character.
+Instead, an unsigned integer argument is accumulated 
+and passed as an <i class="i">argument</i> to the <i class="i">reader macro</i> 
+for the <i class="i">character</i> that follows the digits.
+For example,
+<code class="t">#2A((1 2) (3 4))</code> is a use of <code class="t">#A</code> with an argument of <code class="t">2</code>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Sharpsign-Backslash.html" accesskey="1">Sharpsign Backslash</a></li>
+<li><a href="Sharpsign-Single_002dQuote.html" accesskey="2">Sharpsign Single-Quote</a></li>
+<li><a href="Sharpsign-Left_002dParenthesis.html" accesskey="3">Sharpsign Left-Parenthesis</a></li>
+<li><a href="Sharpsign-Asterisk.html" accesskey="4">Sharpsign Asterisk</a></li>
+<li><a href="Examples-of-Sharpsign-Asterisk.html" accesskey="5">Examples of Sharpsign Asterisk</a></li>
+<li><a href="Sharpsign-Colon.html" accesskey="6">Sharpsign Colon</a></li>
+<li><a href="Sharpsign-Dot.html" accesskey="7">Sharpsign Dot</a></li>
+<li><a href="Sharpsign-B.html" accesskey="8">Sharpsign B</a></li>
+<li><a href="Sharpsign-O.html" accesskey="9">Sharpsign O</a></li>
+<li><a href="Sharpsign-X.html">Sharpsign X</a></li>
+<li><a href="Sharpsign-R.html">Sharpsign R</a></li>
+<li><a href="Sharpsign-C.html">Sharpsign C</a></li>
+<li><a href="Sharpsign-A.html">Sharpsign A</a></li>
+<li><a href="Sharpsign-S.html">Sharpsign S</a></li>
+<li><a href="Sharpsign-P.html">Sharpsign P</a></li>
+<li><a href="Sharpsign-Equal_002dSign.html">Sharpsign Equal-Sign</a></li>
+<li><a href="Sharpsign-Sharpsign.html">Sharpsign Sharpsign</a></li>
+<li><a href="Sharpsign-Plus.html">Sharpsign Plus</a></li>
+<li><a href="Sharpsign-Minus.html">Sharpsign Minus</a></li>
+<li><a href="Sharpsign-Vertical_002dBar.html">Sharpsign Vertical-Bar</a></li>
+<li><a href="Examples-of-Sharpsign-Vertical_002dBar.html">Examples of Sharpsign Vertical-Bar</a></li>
+<li><a href="Notes-about-Style-for-Sharpsign-Vertical_002dBar.html">Notes about Style for Sharpsign Vertical-Bar</a></li>
+<li><a href="Sharpsign-Less_002dThan_002dSign.html">Sharpsign Less-Than-Sign</a></li>
+<li><a href="Sharpsign-Whitespace.html">Sharpsign Whitespace</a></li>
+<li><a href="Sharpsign-Right_002dParenthesis.html">Sharpsign Right-Parenthesis</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Re_002dReading-Abbreviated-Expressions.html">Re-Reading Abbreviated Expressions</a>, Previous: <a href="Comma.html">Comma</a>, Up: <a href="Standard-Macro-Characters.html">Standard Macro Characters</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Shorthand-notation-for-Type-Declarations.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Shorthand notation for Type Declarations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Shorthand notation for Type Declarations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Shorthand notation for Type Declarations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Declaration-Identifiers.html" rel="up" title="Declaration Identifiers">
+<link href="Declaration-Identifiers.html" rel="prev" title="Declaration Identifiers">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Shorthand-notation-for-Type-Declarations">
+<div class="nav-panel">
+<p>
+Previous: <a href="Declaration-Identifiers.html" accesskey="p" rel="prev">Declaration Identifiers</a>, Up: <a href="Declaration-Identifiers.html" accesskey="u" rel="up">Declaration Identifiers</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Shorthand-notation-for-Type-Declarations-1"><span>3.3.3.1 Shorthand notation for Type Declarations<a class="copiable-link" href="#Shorthand-notation-for-Type-Declarations-1"> &para;</a></span></h4>
+
+<p>A <i class="i">type specifier</i> can be used as a <i class="i">declaration identifier</i>.
+<code class="t">(<i class="i">type-specifier</i> {<i class="i">var</i>}*)</code> is taken as shorthand for
+<code class="t">(type <i class="i">type-specifier</i> {<i class="i">var</i>}*)</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Signaling-and-Handling-Conditions.html
@@ -0,0 +1,115 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Signaling and Handling Conditions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Signaling and Handling Conditions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Signaling and Handling Conditions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Condition-System-Concepts.html" rel="up" title="Condition System Concepts">
+<link href="Assertions.html" rel="next" title="Assertions">
+<link href="Printing-Conditions.html" rel="prev" title="Printing Conditions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Signaling-and-Handling-Conditions">
+<div class="nav-panel">
+<p>
+Next: <a href="Assertions.html" accesskey="n" rel="next">Assertions</a>, Previous: <a href="Printing-Conditions.html" accesskey="p" rel="prev">Printing Conditions</a>, Up: <a href="Condition-System-Concepts.html" accesskey="u" rel="up">Condition System Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Signaling-and-Handling-Conditions-1"><span>9.1.4 Signaling and Handling Conditions<a class="copiable-link" href="#Signaling-and-Handling-Conditions-1"> &para;</a></span></h4>
+
+<p>The operation of the condition system depends on the ordering of
+active <i class="i">applicable handlers</i> from most recent to least recent.
+</p>
+<p>Each <i class="i">handler</i> is associated with a <i class="i">type specifier</i>
+that must designate a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">condition</b>.  A <i class="i">handler</i>
+is said to be <i class="i">applicable</i> to a <i class="i">condition</i> if that
+<i class="i">condition</i> is of the <i class="i">type</i> designated by the associated
+<i class="i">type specifier</i>.
+</p>
+<p><i class="i">Active</i> <i class="i">handlers</i> are <i class="i">established</i> by using 
+<b class="b">handler-bind</b> (or an abstraction based on <b class="b">handler-bind</b>, 
+such as <b class="b">handler-case</b> or <b class="b">ignore-errors</b>).
+</p>
+<p><i class="i">Active</i> <i class="i">handlers</i> can be <i class="i">established</i> within the
+dynamic scope of other <i class="i">active</i> <i class="i">handlers</i>.
+At any point during program execution, there is a set of <i class="i">active</i> <i class="i">handlers</i>.
+When a <i class="i">condition</i> is signaled, the <i class="i">most recent</i> active <i class="i">applicable handler</i>
+for that <i class="i">condition</i> is selected from this set.
+Given a <i class="i">condition</i>, the order of recentness of 
+active <i class="i">applicable handlers</i> is defined by the following two rules:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>Each handler in a set of active handlers H_1 is
+more recent than every handler in a set H_2 if the
+handlers in H_2 were active when the handlers in H_1 were
+established.
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p>Let h_1 and h_2 be two applicable active
+handlers established by the same <i class="i">form</i>. Then h_1 is
+more recent than h_2 if h_1 was defined to the left of
+h_2 in the <i class="i">form</i> that established them.
+</p>
+</dd>
+</dl>
+
+<p>Once a handler in a handler binding <i class="i">form</i> (such as 
+<b class="b">handler-bind</b> or <b class="b">handler-case</b>) has been selected, all
+handlers in that <i class="i">form</i> become inactive for 
+the remainder of the signaling process.
+While the selected <i class="i">handler</i> runs, no other <i class="i">handler</i> established
+by that <i class="i">form</i> is active. That is, if the <i class="i">handler</i> declines, 
+no other handler established by that <i class="i">form</i> will be considered for possible invocation.
+</p>
+<p>Figure 9&ndash;4 shows <i class="i">operators</i> relating to 
+the <i class="i">handling</i> of <i class="i">conditions</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  handler-bind  handler-case  ignore-errors  <!-- /@w -->
+
+  Figure 9&ndash;4: Operators relating to handling conditions.<!-- /@w -->
+
+</pre></div></div>
+
+
+<ul class="mini-toc">
+<li><a href="Signaling.html" accesskey="1">Signaling</a></li>
+<li><a href="Resignaling-a-Condition.html" accesskey="2">Resignaling a Condition</a></li>
+<li><a href="Restarts.html" accesskey="3">Restarts</a></li>
+<li><a href="Interactive-Use-of-Restarts.html" accesskey="4">Interactive Use of Restarts</a></li>
+<li><a href="Interfaces-to-Restarts.html" accesskey="5">Interfaces to Restarts</a></li>
+<li><a href="Restart-Tests.html" accesskey="6">Restart Tests</a></li>
+<li><a href="Associating-a-Restart-with-a-Condition.html" accesskey="7">Associating a Restart with a Condition</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Assertions.html">Assertions</a>, Previous: <a href="Printing-Conditions.html">Printing Conditions</a>, Up: <a href="Condition-System-Concepts.html">Condition System Concepts</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Signaling.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Signaling (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Signaling (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Signaling (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Signaling-and-Handling-Conditions.html" rel="up" title="Signaling and Handling Conditions">
+<link href="Resignaling-a-Condition.html" rel="next" title="Resignaling a Condition">
+<link href="Signaling-and-Handling-Conditions.html" rel="prev" title="Signaling and Handling Conditions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Signaling">
+<div class="nav-panel">
+<p>
+Next: <a href="Resignaling-a-Condition.html" accesskey="n" rel="next">Resignaling a Condition</a>, Previous: <a href="Signaling-and-Handling-Conditions.html" accesskey="p" rel="prev">Signaling and Handling Conditions</a>, Up: <a href="Signaling-and-Handling-Conditions.html" accesskey="u" rel="up">Signaling and Handling Conditions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Signaling-1"><span>9.1.4.1 Signaling<a class="copiable-link" href="#Signaling-1"> &para;</a></span></h4>
+
+<p>When a <i class="i">condition</i> is signaled, the most recent
+applicable <i class="i">active</i> <i class="i">handler</i> is invoked.  
+Sometimes a handler will decline by simply returning
+without a transfer of control.
+In such cases, the next most recent applicable active handler is
+invoked. 
+</p>
+<p>If there are no applicable handlers for a <i class="i">condition</i> that
+has been signaled, or if all applicable handlers decline, the
+<i class="i">condition</i> is unhandled.
+</p>
+<p>The functions <b class="b">cerror</b> and <b class="b">error</b> invoke the
+interactive <i class="i">condition</i> handler (the debugger) rather than
+return if the <i class="i">condition</i> being signaled, regardless of
+its <i class="i">type</i>, is unhandled.  In contrast, <b class="b">signal</b>
+returns <b class="b">nil</b> if the <i class="i">condition</i> being signaled,
+regardless of its <i class="i">type</i>, is unhandled.
+</p>
+<p>The <i class="i">variable</i> <b class="b">*break-on-signals*</b> can be used to cause the
+debugger to be entered before the signaling process begins.
+</p>
+<p>Figure 9&ndash;5 shows <i class="i">defined names</i> relating to
+the <i class="i">signaling</i> of <i class="i">conditions</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  *break-on-signals*  error   warn  <!-- /@w -->
+  cerror              signal        <!-- /@w -->
+
+  Figure 9&ndash;5: Defined names relating to signaling conditions.<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Similarity-of-Aggregate-Objects.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Similarity of Aggregate Objects (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Similarity of Aggregate Objects (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Similarity of Aggregate Objects (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Literal-Objects-in-Compiled-Files.html" rel="up" title="Literal Objects in Compiled Files">
+<link href="Definition-of-Similarity.html" rel="next" title="Definition of Similarity">
+<link href="Similarity-of-Literal-Objects.html" rel="prev" title="Similarity of Literal Objects">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Similarity-of-Aggregate-Objects">
+<div class="nav-panel">
+<p>
+Next: <a href="Definition-of-Similarity.html" accesskey="n" rel="next">Definition of Similarity</a>, Previous: <a href="Similarity-of-Literal-Objects.html" accesskey="p" rel="prev">Similarity of Literal Objects</a>, Up: <a href="Literal-Objects-in-Compiled-Files.html" accesskey="u" rel="up">Literal Objects in Compiled Files</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Similarity-of-Aggregate-Objects-1"><span>3.2.4.3 Similarity of Aggregate Objects<a class="copiable-link" href="#Similarity-of-Aggregate-Objects-1"> &para;</a></span></h4>
+
+<p>Of the <i class="i">types</i> over which <i class="i">similarity</i> is defined, 
+some are treated as aggregate objects.  For these types, 
+<i class="i">similarity</i> is defined recursively.  
+We say that an <i class="i">object</i> of these types has certain &ldquo;basic qualities&rdquo;
+and to satisfy the <i class="i">similarity</i> relationship, the values of the
+corresponding qualities of the two <i class="i">objects</i> must also be similar.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Similarity-of-Literal-Objects.html
@@ -0,0 +1,43 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Similarity of Literal Objects (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Similarity of Literal Objects (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Similarity of Literal Objects (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Literal-Objects-in-Compiled-Files.html" rel="up" title="Literal Objects in Compiled Files">
+<link href="Similarity-of-Aggregate-Objects.html" rel="next" title="Similarity of Aggregate Objects">
+<link href="Externalizable-Objects.html" rel="prev" title="Externalizable Objects">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Similarity-of-Literal-Objects">
+<div class="nav-panel">
+<p>
+Next: <a href="Similarity-of-Aggregate-Objects.html" accesskey="n" rel="next">Similarity of Aggregate Objects</a>, Previous: <a href="Externalizable-Objects.html" accesskey="p" rel="prev">Externalizable Objects</a>, Up: <a href="Literal-Objects-in-Compiled-Files.html" accesskey="u" rel="up">Literal Objects in Compiled Files</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Similarity-of-Literal-Objects-1"><span>3.2.4.2 Similarity of Literal Objects<a class="copiable-link" href="#Similarity-of-Literal-Objects-1"> &para;</a></span></h4>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Simple-Loop.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Simple Loop (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Simple Loop (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Simple Loop (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-the-Loop-Facility.html" rel="up" title="Overview of the Loop Facility">
+<link href="Extended-Loop.html" rel="next" title="Extended Loop">
+<link href="Simple-vs-Extended-Loop.html" rel="prev" title="Simple vs Extended Loop">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Simple-Loop">
+<div class="nav-panel">
+<p>
+Next: <a href="Extended-Loop.html" accesskey="n" rel="next">Extended Loop</a>, Previous: <a href="Simple-vs-Extended-Loop.html" accesskey="p" rel="prev">Simple vs Extended Loop</a>, Up: <a href="Overview-of-the-Loop-Facility.html" accesskey="u" rel="up">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Simple-Loop-1"><span>6.1.1.2 Simple Loop<a class="copiable-link" href="#Simple-Loop-1"> &para;</a></span></h4>
+
+<p>A simple <b class="b">loop</b> <i class="i">form</i> is one that has a body containing
+only <i class="i">compound forms</i>.
+Each <i class="i">form</i> is <i class="i">evaluated</i> in turn from left to right.
+When the last <i class="i">form</i> has been <i class="i">evaluated</i>, 
+then the first <i class="i">form</i> is evaluated again, and so on, in a never-ending cycle.
+A simple <b class="b">loop</b> <i class="i">form</i> establishes an <i class="i">implicit block</i> named <b class="b">nil</b>.
+The execution of a simple <b class="b">loop</b> can be terminated by explicitly
+transfering control to the <i class="i">implicit block</i> (using <b class="b">return</b> or
+<b class="b">return-from</b>) or to some <i class="i">exit point</i> outside of the <i class="i">block</i> 
+(<i class="i">e.g.</i>, using <b class="b">throw</b>, <b class="b">go</b>, or <b class="b">return-from</b>).
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Simple-vs-Extended-Loop.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Simple vs Extended Loop (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Simple vs Extended Loop (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Simple vs Extended Loop (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-the-Loop-Facility.html" rel="up" title="Overview of the Loop Facility">
+<link href="Simple-Loop.html" rel="next" title="Simple Loop">
+<link href="Overview-of-the-Loop-Facility.html" rel="prev" title="Overview of the Loop Facility">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Simple-vs-Extended-Loop">
+<div class="nav-panel">
+<p>
+Next: <a href="Simple-Loop.html" accesskey="n" rel="next">Simple Loop</a>, Previous: <a href="Overview-of-the-Loop-Facility.html" accesskey="p" rel="prev">Overview of the Loop Facility</a>, Up: <a href="Overview-of-the-Loop-Facility.html" accesskey="u" rel="up">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Simple-vs-Extended-Loop-1"><span>6.1.1.1 Simple vs Extended Loop<a class="copiable-link" href="#Simple-vs-Extended-Loop-1"> &para;</a></span></h4>
+
+<p><b class="b">loop</b> <i class="i">forms</i> are partitioned into two categories: 
+     simple <b class="b">loop</b> <i class="i">forms</i> 
+ and extended <b class="b">loop</b> <i class="i">forms</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Single-Escape-Character.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Single Escape Character (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Single Escape Character (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Single Escape Character (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Syntax-Types.html" rel="up" title="Character Syntax Types">
+<link href="Examples-of-Single-Escape-Characters.html" rel="next" title="Examples of Single Escape Characters">
+<link href="Examples-of-Multiple-Escape-Characters.html" rel="prev" title="Examples of Multiple Escape Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Single-Escape-Character">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Single-Escape-Characters.html" accesskey="n" rel="next">Examples of Single Escape Characters</a>, Previous: <a href="Examples-of-Multiple-Escape-Characters.html" accesskey="p" rel="prev">Examples of Multiple Escape Characters</a>, Up: <a href="Character-Syntax-Types.html" accesskey="u" rel="up">Character Syntax Types</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Single-Escape-Character-1"><span>2.1.4.7 Single Escape Character<a class="copiable-link" href="#Single-Escape-Character-1"> &para;</a></span></h4>
+
+<p>A <i class="i">single escape</i>
+<a class="index-entry-id" id="index-single-escape"></a>
+ is used to indicate that 
+the next <i class="i">character</i> is to be treated as 
+an <i class="i">alphabetic</i>_2 <i class="i">character</i>
+with its <i class="i">case</i> preserved,
+no matter what the <i class="i">character</i> is 
+or which <i class="i">constituent traits</i> it has.  
+</p>
+<p><i class="i">Slash</i> is a <i class="i">single escape</i> <i class="i">character</i>
+in <i class="i">standard syntax</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Single_002dQuote.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Single-Quote (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Single-Quote (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Single-Quote (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standard-Macro-Characters.html" rel="up" title="Standard Macro Characters">
+<link href="Semicolon.html" rel="next" title="Semicolon">
+<link href="Right_002dParenthesis.html" rel="prev" title="Right-Parenthesis">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Single_002dQuote">
+<div class="nav-panel">
+<p>
+Next: <a href="Semicolon.html" accesskey="n" rel="next">Semicolon</a>, Previous: <a href="Right_002dParenthesis.html" accesskey="p" rel="prev">Right-Parenthesis</a>, Up: <a href="Standard-Macro-Characters.html" accesskey="u" rel="up">Standard Macro Characters</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Single_002dQuote-1"><span>2.4.3 Single-Quote<a class="copiable-link" href="#Single_002dQuote-1"> &para;</a></span></h4>
+
+<p><b class="b">Syntax:</b>  <code class="t">'&lt;&lt;<i class="i">exp</i>&gt;&gt;</code>
+</p>
+<p>A <i class="i">single-quote</i> introduces an <i class="i">expression</i> to be &ldquo;quoted.&rdquo;
+<i class="i">Single-quote</i> followed by an <i class="i">expression</i> <i class="i">exp</i> 
+is treated by the <i class="i">Lisp reader</i> as an abbreviation for
+and is parsed identically to the <i class="i">expression</i> <code class="t">(quote <i class="i">exp</i>)</code>.
+See the <i class="i">special operator</i> <b class="b">quote</b>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Examples-of-Single_002dQuote.html" accesskey="1">Examples of Single-Quote</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Slots.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Slots (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Slots (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Slots (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects.html" rel="up" title="Objects">
+<link href="Generic-Functions-and-Methods.html" rel="next" title="Generic Functions and Methods">
+<link href="Meta_002dObjects.html" rel="prev" title="Meta-Objects">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Slots">
+<div class="nav-panel">
+<p>
+Next: <a href="Generic-Functions-and-Methods.html" accesskey="n" rel="next">Generic Functions and Methods</a>, Previous: <a href="Meta_002dObjects.html" accesskey="p" rel="prev">Meta-Objects</a>, Up: <a href="Objects.html" accesskey="u" rel="up">Objects</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Slots-1"><span>7.5 Slots<a class="copiable-link" href="#Slots-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Introduction-to-Slots.html" accesskey="1">Introduction to Slots</a></li>
+<li><a href="Accessing-Slots.html" accesskey="2">Accessing Slots</a></li>
+<li><a href="Inheritance-of-Slots-and-Slot-Options.html" accesskey="3">Inheritance of Slots and Slot Options</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Some-Exceptions-to-Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs.html
@@ -0,0 +1,83 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Some Exceptions to Constraints on the COMMON-LISP Package for Conforming Programs (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Some Exceptions to Constraints on the COMMON-LISP Package for Conforming Programs (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Some Exceptions to Constraints on the COMMON-LISP Package for Conforming Programs (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standardized-Packages.html" rel="up" title="Standardized Packages">
+<link href="The-COMMON_002dLISP_002dUSER-Package.html" rel="next" title="The COMMON-LISP-USER Package">
+<link href="Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs.html" rel="prev" title="Constraints on the COMMON-LISP Package for Conforming Programs">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Some-Exceptions-to-Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs">
+<div class="nav-panel">
+<p>
+Next: <a href="The-COMMON_002dLISP_002dUSER-Package.html" accesskey="n" rel="next">The COMMON-LISP-USER Package</a>, Previous: <a href="Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs.html" accesskey="p" rel="prev">Constraints on the COMMON-LISP Package for Conforming Programs</a>, Up: <a href="Standardized-Packages.html" accesskey="u" rel="up">Standardized Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Some-Exceptions-to-Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs-1"><span>11.1.2.4 Some Exceptions to Constraints on the COMMON-LISP Package for Conforming Programs<a class="copiable-link" href="#Some-Exceptions-to-Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs-1"> &para;</a></span></h4>
+
+<p>If an <i class="i">external symbol</i> of the <code class="t">COMMON-LISP</code> <i class="i">package</i>
+is not globally defined as a <i class="i">standardized</i> <i class="i">dynamic variable</i> 
+					      or <i class="i">constant variable</i>,
+it is allowed to lexically <i class="i">bind</i> it 
+          and to declare the <b class="b">type</b> of that <i class="i">binding</i>, 
+and
+it is allowed to locally <i class="i">establish</i> it as a <i class="i">symbol macro</i> 
+(<i class="i">e.g.</i>, with <b class="b">symbol-macrolet</b>).
+</p>
+<p>Unless explicitly specified otherwise,
+if an <i class="i">external symbol</i> of the <code class="t">COMMON-LISP</code> <i class="i">package</i> 
+is globally defined as a <i class="i">standardized</i> <i class="i">dynamic variable</i>,
+it is permitted to <i class="i">bind</i> or <i class="i">assign</i> that <i class="i">dynamic variable</i>
+provided that the &ldquo;Value Type&rdquo; constraints on the <i class="i">dynamic variable</i> 
+are maintained, and that the new <i class="i">value</i> of the <i class="i">variable</i> 
+is consistent with the stated purpose of the <i class="i">variable</i>.
+</p>
+<p>If an <i class="i">external symbol</i> of the <code class="t">COMMON-LISP</code> <i class="i">package</i> is not defined
+as a <i class="i">standardized</i> <i class="i">function</i>, <i class="i">macro</i>, or <i class="i">special operator</i>,
+it is allowed to lexically <i class="i">bind</i> it as a <i class="i">function</i> (<i class="i">e.g.</i>, with <b class="b">flet</b>),
+              to declare the <b class="b">ftype</b> of that <i class="i">binding</i>, 
+          and 
+              (in <i class="i">implementations</i> which provide the ability to do so)
+	      to <b class="b">trace</b> that <i class="i">binding</i>.
+</p>
+<p>If an <i class="i">external symbol</i> of the <code class="t">COMMON-LISP</code> <i class="i">package</i> is not defined
+as a <i class="i">standardized</i> <i class="i">function</i>, <i class="i">macro</i>, or <i class="i">special operator</i>,
+it is allowed to lexically <i class="i">bind</i> it as a <i class="i">macro</i> (<i class="i">e.g.</i>, with <b class="b">macrolet</b>).
+</p>
+<p>If an <i class="i">external symbol</i> of the <code class="t">COMMON-LISP</code> <i class="i">package</i> is not defined 
+as a <i class="i">standardized</i> <i class="i">function</i>, <i class="i">macro</i>, or <i class="i">special operator</i>,
+it is allowed to lexically <i class="i">bind</i> its <i class="i">setf function name</i>
+as a <i class="i">function</i>,
+and to declare the <b class="b">ftype</b> of that <i class="i">binding</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="The-COMMON_002dLISP_002dUSER-Package.html">The COMMON-LISP-USER Package</a>, Previous: <a href="Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs.html">Constraints on the COMMON-LISP Package for Conforming Programs</a>, Up: <a href="Standardized-Packages.html">Standardized Packages</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Sorting-the-Applicable-Methods-by-Precedence-Order.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Sorting the Applicable Methods by Precedence Order (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Sorting the Applicable Methods by Precedence Order (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Sorting the Applicable Methods by Precedence Order (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Method-Selection-and-Combination.html" rel="up" title="Method Selection and Combination">
+<link href="Applying-method-combination-to-the-sorted-list-of-applicable-methods.html" rel="next" title="Applying method combination to the sorted list of applicable methods">
+<link href="Selecting-the-Applicable-Methods.html" rel="prev" title="Selecting the Applicable Methods">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Sorting-the-Applicable-Methods-by-Precedence-Order">
+<div class="nav-panel">
+<p>
+Next: <a href="Applying-method-combination-to-the-sorted-list-of-applicable-methods.html" accesskey="n" rel="next">Applying method combination to the sorted list of applicable methods</a>, Previous: <a href="Selecting-the-Applicable-Methods.html" accesskey="p" rel="prev">Selecting the Applicable Methods</a>, Up: <a href="Method-Selection-and-Combination.html" accesskey="u" rel="up">Method Selection and Combination</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Sorting-the-Applicable-Methods-by-Precedence-Order-1"><span>7.6.6.3 Sorting the Applicable Methods by Precedence Order<a class="copiable-link" href="#Sorting-the-Applicable-Methods-by-Precedence-Order-1"> &para;</a></span></h4>
+
+<p>To compare the precedence of two methods, their <i class="i">parameter specializers</i>
+are examined in order.  The default examination order is from left to
+right, but an alternative order may be specified by the 
+<code class="t">:argument-precedence-order</code> option to <b class="b">defgeneric</b> or to any of
+the other operators that specify generic function options.
+</p>
+<p>The corresponding <i class="i">parameter specializers</i> from each method are
+compared.  When a pair of <i class="i">parameter specializers</i> agree, the next
+pair are compared for agreement.  If all corresponding parameter
+specializers agree, the two methods must have different
+<i class="i">qualifiers</i>; in this case, either method can be selected to precede the
+other.  For information about agreement, see <a class="ref" href="Agreement-on-Parameter-Specializers-and-Qualifiers.html">Agreement on Parameter Specializers and Qualifiers</a>.
+</p>
+<p>If some corresponding <i class="i">parameter specializers</i> do not agree, the first
+pair of <i class="i">parameter specializers</i> that do not agree determines the
+precedence.  If both <i class="i">parameter specializers</i> are classes, the more
+specific of the two methods is the method whose <i class="i">parameter specializer</i>
+appears earlier in the <i class="i">class precedence list</i> of the corresponding
+argument.  Because of the way in which the set of applicable methods
+is chosen, the <i class="i">parameter specializers</i> are guaranteed to be present in
+the class precedence list of the class of the argument.
+</p>
+<p>If just one of a pair of corresponding <i class="i">parameter specializers</i> is <code class="t">(eql <i class="i">object</i>)</code>,
+the <i class="i">method</i> with that <i class="i">parameter specializer</i> precedes the
+other <i class="i">method</i>.  If both <i class="i">parameter specializers</i> are <b class="b">eql</b>
+<i class="i">expressions</i>, the
+specializers must agree (otherwise the two <i class="i">methods</i> would
+not both have been applicable to this argument).
+</p>
+<p>The resulting list of <i class="i">applicable methods</i> has the most specific
+<i class="i">method</i> first and the least specific <i class="i">method</i> last.    
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Applying-method-combination-to-the-sorted-list-of-applicable-methods.html">Applying method combination to the sorted list of applicable methods</a>, Previous: <a href="Selecting-the-Applicable-Methods.html">Selecting the Applicable Methods</a>, Up: <a href="Method-Selection-and-Combination.html">Method Selection and Combination</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Special-Characters-in-Pathname-Components.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Special Characters in Pathname Components (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Special Characters in Pathname Components (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Special Characters in Pathname Components (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Case-in-Pathname-Components.html" rel="next" title="Case in Pathname Components">
+<link href="Strings-in-Component-Values.html" rel="prev" title="Strings in Component Values">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Special-Characters-in-Pathname-Components">
+<div class="nav-panel">
+<p>
+Next: <a href="Case-in-Pathname-Components.html" accesskey="n" rel="next">Case in Pathname Components</a>, Previous: <a href="Strings-in-Component-Values.html" accesskey="p" rel="prev">Strings in Component Values</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Special-Characters-in-Pathname-Components-1"><span>19.2.2.2 Special Characters in Pathname Components<a class="copiable-link" href="#Special-Characters-in-Pathname-Components-1"> &para;</a></span></h4>
+
+<p><i class="i">Strings</i> in <i class="i">pathname</i> component values 
+never contain special <i class="i">characters</i> that represent
+separation between <i class="i">pathname</i> fields, 
+such as <i class="i">slash</i> in <span class="r">Unix</span> <i class="i">filenames</i>.
+Whether separator <i class="i">characters</i> are permitted as 
+part of a <i class="i">string</i> in a <i class="i">pathname</i> component
+is <i class="i">implementation-defined</i>; 
+however, if the <i class="i">implementation</i> does permit it, 
+it must arrange to properly &ldquo;quote&rdquo; the character for the 
+<i class="i">file system</i> when constructing a <i class="i">namestring</i>.
+For example,
+</p>
+<div class="example">
+<pre class="example-preformatted"> ;; In a TOPS-20 implementation, which uses <code class="t">^</code>V to quote 
+ (NAMESTRING (MAKE-PATHNAME :HOST &quot;OZ&quot; :NAME &quot;&lt;TEST&gt;&quot;))
+&rArr;  #P&quot;OZ:PS:<code class="t">^</code>V&lt;TEST<code class="t">^</code>V&gt;&quot;
+<i class="i">NOT</i>&rArr; #P&quot;OZ:PS:&lt;TEST&gt;&quot;
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Special-Forms.html
@@ -0,0 +1,83 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Special Forms (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Special Forms (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Special Forms (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Evaluation-Model.html" rel="up" title="The Evaluation Model">
+<link href="Macro-Forms.html" rel="next" title="Macro Forms">
+<link href="Conses-as-Forms.html" rel="prev" title="Conses as Forms">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Special-Forms">
+<div class="nav-panel">
+<p>
+Next: <a href="Macro-Forms.html" accesskey="n" rel="next">Macro Forms</a>, Previous: <a href="Conses-as-Forms.html" accesskey="p" rel="prev">Conses as Forms</a>, Up: <a href="The-Evaluation-Model.html" accesskey="u" rel="up">The Evaluation Model</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Special-Forms-1"><span>3.1.2.8 Special Forms<a class="copiable-link" href="#Special-Forms-1"> &para;</a></span></h4>
+
+<p>A <i class="i">special form</i> is a <i class="i">form</i> with special syntax,
+special evaluation rules, or both, possibly manipulating the
+evaluation environment, control flow, or both.
+A <i class="i">special operator</i> has access to
+    the current <i class="i">lexical environment</i> 
+and the current <i class="i">dynamic environment</i>.
+Each <i class="i">special operator</i> defines the manner in which its <i class="i">subexpressions</i>
+are treated&mdash;which are <i class="i">forms</i>, which are special syntax, <i class="i">etc.</i>
+</p>
+<p>Some <i class="i">special operators</i> create new 
+lexical or dynamic <i class="i">environments</i> for use during the 
+<i class="i">evaluation</i> of <i class="i">subforms</i>
+of the <i class="i">special form</i>.  For example, <b class="b">block</b> creates a
+new <i class="i">lexical environment</i> that is the same as the one in force
+at the point of evaluation of the <b class="b">block</b> <i class="i">form</i>
+with the addition of a <i class="i">binding</i> of the <b class="b">block</b> name
+to an <i class="i">exit point</i> from the <b class="b">block</b>.
+</p>
+<p>The set of <i class="i">special operator</i> <i class="i">names</i> is fixed in <span class="r">Common Lisp</span>; 
+no way is provided for the user to define a <i class="i">special operator</i>.
+Figure 3&ndash;2 lists all of the <span class="r">Common Lisp</span> <i class="i">symbols</i>
+that have definitions as <i class="i">special operators</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  block      let*                  return-from      <!-- /@w -->
+  catch      load-time-value       setq             <!-- /@w -->
+  eval-when  locally               symbol-macrolet  <!-- /@w -->
+  flet       macrolet              tagbody          <!-- /@w -->
+  function   multiple-value-call   the              <!-- /@w -->
+  go         multiple-value-prog1  throw            <!-- /@w -->
+  if         progn                 unwind-protect   <!-- /@w -->
+  labels     progv                                  <!-- /@w -->
+  let        quote                                  <!-- /@w -->
+
+      Figure 3&ndash;2: Common Lisp Special Operators    <!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Special-Pathname-Component-Values.html
@@ -0,0 +1,43 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Special Pathname Component Values (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Special Pathname Component Values (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Special Pathname Component Values (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="NIL-as-a-Component-Value.html" rel="next" title="NIL as a Component Value">
+<link href="Common-Case-in-Pathname-Components.html" rel="prev" title="Common Case in Pathname Components">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Special-Pathname-Component-Values">
+<div class="nav-panel">
+<p>
+Next: <a href="NIL-as-a-Component-Value.html" accesskey="n" rel="next">NIL as a Component Value</a>, Previous: <a href="Common-Case-in-Pathname-Components.html" accesskey="p" rel="prev">Common Case in Pathname Components</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Special-Pathname-Component-Values-1"><span>19.2.2.6 Special Pathname Component Values<a class="copiable-link" href="#Special-Pathname-Component-Values-1"> &para;</a></span></h4>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Special-Symbols.html
@@ -0,0 +1,196 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Special Symbols (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Special Symbols (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Special Symbols (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Notational-Conventions.html" rel="up" title="Notational Conventions">
+<link href="Objects-with-Multiple-Notations.html" rel="next" title="Objects with Multiple Notations">
+<link href="Additional-Uses-for-Indirect-Definitions-in-Modified-BNF-Syntax.html" rel="prev" title="Additional Uses for Indirect Definitions in Modified BNF Syntax">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Special-Symbols">
+<div class="nav-panel">
+<p>
+Next: <a href="Objects-with-Multiple-Notations.html" accesskey="n" rel="next">Objects with Multiple Notations</a>, Previous: <a href="Additional-Uses-for-Indirect-Definitions-in-Modified-BNF-Syntax.html" accesskey="p" rel="prev">Additional Uses for Indirect Definitions in Modified BNF Syntax</a>, Up: <a href="Notational-Conventions.html" accesskey="u" rel="up">Notational Conventions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Special-Symbols-1"><span>1.4.1.6 Special Symbols<a class="copiable-link" href="#Special-Symbols-1"> &para;</a></span></h4>
+
+<p>The special symbols described here are used as a notational convenience
+within this document, and are part of neither the <span class="r">Common Lisp</span> language nor
+its environment.
+</p>
+<dl class="table">
+<dt>&rArr;</dt>
+<dd><p>This indicates evaluation.
+For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (+ 4 5) &rArr;  9 
+</pre></div>
+
+<p>This means that the result of
+evaluating the <i class="i">form</i> <code class="t">(+ 4 5)</code> is <code class="t">9</code>.
+</p>
+<p>If a <i class="i">form</i> returns <i class="i">multiple values</i>, those values might
+be shown separated by spaces, line breaks, or commas.
+For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (truncate 7 5)
+&rArr;  1 2
+ (truncate 7 5) 
+&rArr;  1
+   2
+ (truncate 7 5)
+&rArr;  1, 2
+</pre></div>
+
+<p>Each of the above three examples is equivalent, and specifies
+that <code class="t">(truncate 7 5)</code> returns two values, which are <code class="t">1</code> and <code class="t">2</code>.
+</p>
+<p>Some <i class="i">conforming implementations</i> actually type an arrow (or some
+other indicator) before showing return values, while others do not.
+</p>
+</dd>
+<dt><i class="i">OR</i>&rArr;</dt>
+<dd><p>The notation &ldquo;<i class="i">OR</i>&rArr;&rdquo; is used to denote one of several possible
+alternate results.  The example
+</p>
+<div class="example">
+<pre class="example-preformatted"> (char-name #\a)
+&rArr;  NIL
+<i class="i">OR</i>&rArr; &quot;LOWERCASE-a&quot;
+<i class="i">OR</i>&rArr; &quot;Small-A&quot;
+<i class="i">OR</i>&rArr; &quot;LA01&quot;
+</pre></div>
+
+<p>indicates that <b class="b">nil</b>, <code class="t">&quot;LOWERCASE-a&quot;</code>, <code class="t">&quot;Small-A&quot;</code>, <code class="t">&quot;LA01&quot;</code> are
+among the possible results of <code class="t">(char-name #\a)</code>&mdash;each with equal preference.
+Unless explicitly specified otherwise, it should not be assumed that the set of possible 
+results shown is exhaustive.
+Formally, the above example is equivalent to
+</p>
+<div class="example">
+<pre class="example-preformatted"> (char-name #\a) &rArr;  <i class="i">implementation-dependent</i>
+</pre></div>
+
+<p>but it is intended to provide additional information to illustrate some
+of the ways in which it is permitted for implementations to diverge.
+</p>
+</dd>
+<dt><i class="i">NOT</i>&rArr;</dt>
+<dd><p>The notation &ldquo;<i class="i">NOT</i>&rArr;&rdquo; is used to denote a result which is not possible.
+This might be used, for example, in order to emphasize a situation where
+some anticipated misconception might lead the reader to falsely believe
+that the result might be possible.  For example,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (function-lambda-expression 
+    (funcall #'(lambda (x) #'(lambda () x)) nil))
+&rArr;  NIL, <i class="i">true</i>, NIL
+<i class="i">OR</i>&rArr; (LAMBDA () X), <i class="i">true</i>, NIL
+<i class="i">NOT</i>&rArr; NIL, <i class="i">false</i>, NIL
+<i class="i">NOT</i>&rArr; (LAMBDA () X), <i class="i">false</i>, NIL
+</pre></div>
+
+</dd>
+<dt>&equiv;</dt>
+<dd><p>This indicates code equivalence. For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (gcd x (gcd y z)) &equiv; (gcd (gcd x y) z)
+</pre></div>
+
+<p>This means that the results and observable side-effects of evaluating
+the <i class="i">form</i>
+<code class="t">(gcd x (gcd y z))</code>  are always the same as the results
+and observable side-effects of
+<code class="t">(gcd (gcd x y) z)</code>  for any 
+<code class="t">x</code>, <code class="t">y</code>, and <code class="t">z</code>.
+</p>
+</dd>
+<dt><code class="t"> |&gt; </code></dt>
+<dd><p><span class="r">Common Lisp</span> specifies input and output with respect to a non-interactive stream model.
+The specific details of how interactive input and output are mapped onto that
+non-interactive model are <i class="i">implementation-defined</i>.
+</p>
+<p>For example, <i class="i">conforming implementations</i> are permitted to differ in issues 
+of how interactive input is terminated.  For example, the <i class="i">function</i> <b class="b">read</b>
+terminates when the final delimiter is typed on a non-interactive stream.
+In some <i class="i">implementations</i>, an interactive call to <b class="b">read</b> returns
+as soon as the final delimiter is typed, even if that delimiter is not a <i class="i">newline</i>.
+In other <i class="i">implementations</i>, a final <i class="i">newline</i> is always required.
+In still other <i class="i">implementations</i>, there might be a command which &ldquo;activates&rdquo;
+a buffer full of input without the command itself being visible on the program&rsquo;s
+input stream.
+</p>
+<p>In the examples in this document, the notation &ldquo;<code class="t"> |&gt; </code>&rdquo; precedes 
+lines where interactive input and output occurs.  Within such a scenario,
+&ldquo;<b class="b">|&gt;&gt;</b><code class="t">this notation</code><b class="b">&lt;&lt;|</b>&rdquo; notates user input.
+</p>
+<p>For example, the notation
+</p>
+<div class="example">
+<pre class="example-preformatted"> (+ 1 (print (+ (sqrt (read)) (sqrt (read)))))
+<code class="t"> |&gt; </code> <b class="b">|&gt;&gt;</b><code class="t">9 16 </code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> 7
+&rArr;  8
+</pre></div>
+
+<p>shows an interaction in which
+  &ldquo;<code class="t">(+ 1 (print (+ (sqrt (read)) (sqrt (read)))))</code>&rdquo;
+    is a <i class="i">form</i> to be <i class="i">evaluated</i>,
+  &ldquo;<code class="t">9 16 </code>&rdquo; is interactive input,
+  &ldquo;<code class="t">7</code>&rdquo; is interactive output, and 
+  &ldquo;<code class="t">8</code>&rdquo; is the <i class="i">value</i> <i class="i">yielded</i> from the <i class="i">evaluation</i>.
+</p>
+<p>The use of this notation is intended to disguise small differences 
+in interactive input and output behavior between <i class="i">implementations</i>.
+</p>
+<p>Sometimes, the non-interactive stream model calls for a <i class="i">newline</i>.
+How that <i class="i">newline</i> character is interactively entered is an 
+<i class="i">implementation-defined</i> detail of the user interface, but in that
+case, either the notation &ldquo;&lt;<i class="i">Newline</i>&gt;&rdquo; or &ldquo;<i class="i">[&lt;&ndash;</i>~]&rdquo; might be used.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (progn (format t &quot;~&amp;Who? &quot;) (read-line))
+<code class="t"> |&gt; </code> Who? <b class="b">|&gt;&gt;</b><code class="t">Fred, Mary, and Sally <i class="i">[&lt;--</i>~]</code><b class="b">&lt;&lt;|</b>
+&rArr;  &quot;Fred, Mary, and Sally&quot;, <i class="i">false</i>
+</pre></div>
+
+</dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Objects-with-Multiple-Notations.html">Objects with Multiple Notations</a>, Previous: <a href="Additional-Uses-for-Indirect-Definitions-in-Modified-BNF-Syntax.html">Additional Uses for Indirect Definitions in Modified BNF Syntax</a>, Up: <a href="Notational-Conventions.html">Notational Conventions</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Special-_0022Syntax_0022-Notations-for-Overloaded-Operators.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Special &quot;Syntax&quot; Notations for Overloaded Operators (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Special &quot;Syntax&quot; Notations for Overloaded Operators (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Special &quot;Syntax&quot; Notations for Overloaded Operators (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="Naming-Conventions-for-Rest-Parameters.html" rel="next" title="Naming Conventions for Rest Parameters">
+<link href="The-_0022Syntax_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Syntax&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Special-_0022Syntax_0022-Notations-for-Overloaded-Operators">
+<div class="nav-panel">
+<p>
+Next: <a href="Naming-Conventions-for-Rest-Parameters.html" accesskey="n" rel="next">Naming Conventions for Rest Parameters</a>, Previous: <a href="The-_0022Syntax_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Syntax&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Special-_0022Syntax_0022-Notations-for-Overloaded-Operators-1"><span>1.4.4.25 Special &quot;Syntax&quot; Notations for Overloaded Operators<a class="copiable-link" href="#Special-_0022Syntax_0022-Notations-for-Overloaded-Operators-1"> &para;</a></span></h4>
+
+<p>If two descriptions exist for the same operation but with different numbers of
+arguments, then the extra arguments are to be treated as optional.  For example,
+this pair of lines:
+</p>
+<p><code class="code">file-position</code>  <i class="i">stream</i> &rArr;  <i class="i">position</i>
+</p>
+<p><code class="code">file-position</code>  <i class="i">stream position-spec</i> &rArr;  <i class="i">success-p</i>
+</p>
+<p>is operationally equivalent to this line:
+</p>
+<p><code class="code">file-position</code>  <i class="i">stream <span class="r">&amp;optional</span> position-spec</i> &rArr;  <i class="i">result</i>
+</p>
+<p>and differs only in that it provides on opportunity to introduce different
+names for <i class="i">parameter</i> and <i class="i">values</i> for each case.
+The separated (multi-line) notation is used when an <i class="i">operator</i> is overloaded in
+such a way that the <i class="i">parameters</i> are used in different ways
+depending on how many <i class="i">arguments</i> are supplied (<i class="i">e.g.</i>, for the <i class="i">function</i> <b class="b">/</b>)
+or the return values are different in the two cases (<i class="i">e.g.</i>, for the <i class="i">function</i> <b class="b">file-position</b>).
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Specialized-Arrays.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Specialized Arrays (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Specialized Arrays (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Specialized Arrays (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Array-Concepts.html" rel="up" title="Array Concepts">
+<link href="Array-Elements.html" rel="prev" title="Array Elements">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Specialized-Arrays">
+<div class="nav-panel">
+<p>
+Previous: <a href="Array-Elements.html" accesskey="p" rel="prev">Array Elements</a>, Up: <a href="Array-Concepts.html" accesskey="u" rel="up">Array Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Specialized-Arrays-1"><span>15.1.2 Specialized Arrays<a class="copiable-link" href="#Specialized-Arrays-1"> &para;</a></span></h4>
+
+<p>An <i class="i">array</i> can be a <i class="i">general</i> <i class="i">array</i>, 
+    meaning each <i class="i">element</i> may be any <i class="i">object</i>,
+or it may be a <i class="i">specialized</i> <i class="i">array</i>,
+    meaning that each <i class="i">element</i> must be of a restricted <i class="i">type</i>.
+</p>
+<p>The phrasing &ldquo;an <i class="i">array</i> <i class="i">specialized</i> to <i class="i">type</i> &lt;&lt;<i class="i">type</i>&gt;&gt;&rdquo;
+is sometimes used to emphasize the <i class="i">element type</i> of an <i class="i">array</i>.
+This phrasing is tolerated even when the &lt;&lt;<i class="i">type</i>&gt;&gt; is <b class="b">t</b>,
+even though an <i class="i">array</i> <i class="i">specialized</i> to <i class="i">type</i> <i class="i">t</i>
+is a <i class="i">general</i> <i class="i">array</i>, not a <i class="i">specialized</i> <i class="i">array</i>.
+</p>
+<p>Figure 15&ndash;1 lists some <i class="i">defined names</i> that are applicable to <i class="i">array</i> 
+creation, <i class="i">access</i>, and information operations.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted"> adjust-array             array-in-bounds-p      svref                       <!-- /@w -->
+ adjustable-array-p       array-rank             upgraded-array-element-type <!-- /@w -->
+ aref                     array-rank-limit       upgraded-complex-part-type  <!-- /@w -->
+ array-dimension          array-row-major-index  vector                      <!-- /@w -->
+ array-dimension-limit    array-total-size       vector-pop                  <!-- /@w -->
+ array-dimensions         array-total-size-limit vector-push                 <!-- /@w -->
+ array-element-type       fill-pointer           vector-push-extend          <!-- /@w -->
+ array-has-fill-pointer-p make-array                                         <!-- /@w -->
+
+           Figure 15&ndash;1: General Purpose Array-Related Defined Names          <!-- /@w -->
+
+</pre></div></div>
+
+
+<ul class="mini-toc">
+<li><a href="Array-Upgrading.html" accesskey="1">Array Upgrading</a></li>
+<li><a href="Required-Kinds-of-Specialized-Arrays.html" accesskey="2">Required Kinds of Specialized Arrays</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Specialized-Lambda-Lists.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Specialized Lambda Lists (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Specialized Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Specialized Lambda Lists (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Lambda-Lists.html" rel="up" title="Lambda Lists">
+<link href="Macro-Lambda-Lists.html" rel="next" title="Macro Lambda Lists">
+<link href="Generic-Function-Lambda-Lists.html" rel="prev" title="Generic Function Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Specialized-Lambda-Lists">
+<div class="nav-panel">
+<p>
+Next: <a href="Macro-Lambda-Lists.html" accesskey="n" rel="next">Macro Lambda Lists</a>, Previous: <a href="Generic-Function-Lambda-Lists.html" accesskey="p" rel="prev">Generic Function Lambda Lists</a>, Up: <a href="Lambda-Lists.html" accesskey="u" rel="up">Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Specialized-Lambda-Lists-1"><span>3.4.3 Specialized Lambda Lists<a class="copiable-link" href="#Specialized-Lambda-Lists-1"> &para;</a></span></h4>
+
+<p>A <i class="i">specialized lambda list</i>
+<a class="index-entry-id" id="index-specialized-lambda-list"></a>
+ is used to <i class="i">specialize</i> a <i class="i">method</i>
+for a particular <i class="i">signature</i> and to describe how <i class="i">arguments</i> matching
+that <i class="i">signature</i> are received by the <i class="i">method</i>.  
+The <i class="i">defined names</i> in Figure 3&ndash;15 use <i class="i">specialized lambda lists</i>
+in some way; see the dictionary entry for each for information about how.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  defmethod  defgeneric    <!-- /@w -->
+
+  Figure 3&ndash;15: Standardized Operators that use Specialized Lambda Lists<!-- /@w -->
+
+</pre></div></div>
+
+<p>A <i class="i">specialized lambda list</i> can contain the <i class="i">lambda list keywords</i> shown
+in Figure 3&ndash;16.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <b class="b">&amp;allow-other-keys</b>  <b class="b">&amp;key</b>       <b class="b">&amp;rest</b>  <!-- /@w -->
+  <b class="b">&amp;aux</b>               <b class="b">&amp;optional</b>         <!-- /@w -->
+
+  Figure 3&ndash;16: Lambda List Keywords used by Specialized Lambda Lists<!-- /@w -->
+
+</pre></div></div>
+
+<p>A <i class="i">specialized lambda list</i> is syntactically the same as an <i class="i">ordinary lambda list</i>
+except that each <i class="i">required parameter</i> may optionally be associated with a <i class="i">class</i>
+or <i class="i">object</i> for which that <i class="i">parameter</i> is <i class="i">specialized</i>.
+</p>
+<p><i class="i">lambda-list</i>&nbsp;::=<span class="r">(</span>{<i class="i">var</i>&nbsp;|&nbsp;<span class="r">(</span><i class="i">var</i>&nbsp;<span class="r">[</span><i class="i">specializer</i><span class="r">]</span><span class="r">)</span>}*<!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;optional</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;		&nbsp;<span class="r">(</span><i class="i">var</i>&nbsp;<span class="r">[</span>init-form&nbsp;<span class="r">[</span>supplied-p-parameter<span class="r">]</span><span class="r">]</span><span class="r">)</span>}*<code class="t">]</code><!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;rest</span>&nbsp;<i class="i">var</i><code class="t">]</code><!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;key</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;		&nbsp;	&nbsp;<span class="r">(</span>{<i class="i">var</i>&nbsp;|&nbsp;					&nbsp;<span class="r">(</span><i class="i">keyword-name</i>&nbsp;<i class="i">var</i><span class="r">)</span>}&nbsp;				&nbsp;	<span class="r">[</span>init-form&nbsp;<span class="r">[</span>supplied-p-parameter<span class="r">]</span><span class="r">]</span><span class="r">)</span>}*&nbsp;<span class="r">[</span><code class="t">&amp;allow-other-keys</code><span class="r">]</span><code class="t">]</code><!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;aux</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;<span class="r">(</span><i class="i">var</i>&nbsp;<span class="r">[</span><i class="i">init-form</i><span class="r">]</span><span class="r">)</span>}*<code class="t">]</code><span class="r">)</span><!-- /@w -->
+&nbsp;<!-- /@w -->
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Specifiers-for-_0026aux-variables.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Specifiers for &amp;aux variables (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Specifiers for &amp;aux variables (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Specifiers for &amp;aux variables (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Ordinary-Lambda-Lists.html" rel="up" title="Ordinary Lambda Lists">
+<link href="Examples-of-Ordinary-Lambda-Lists.html" rel="next" title="Examples of Ordinary Lambda Lists">
+<link href="Examples-of-Suppressing-Keyword-Argument-Checking.html" rel="prev" title="Examples of Suppressing Keyword Argument Checking">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Specifiers-for-_0026aux-variables">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Ordinary-Lambda-Lists.html" accesskey="n" rel="next">Examples of Ordinary Lambda Lists</a>, Previous: <a href="Examples-of-Suppressing-Keyword-Argument-Checking.html" accesskey="p" rel="prev">Examples of Suppressing Keyword Argument Checking</a>, Up: <a href="Ordinary-Lambda-Lists.html" accesskey="u" rel="up">Ordinary Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Specifiers-for-_0026aux-variables-1"><span>3.4.1.7 Specifiers for <b class="b">&amp;aux</b> variables<a class="copiable-link" href="#Specifiers-for-_0026aux-variables-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-_0026aux"></a>
+
+<p>These are not really parameters.  If the <i class="i">lambda list keyword</i>
+<b class="b">&amp;aux</b> is present, all specifiers after it are auxiliary variable
+specifiers.  After all parameter specifiers have been processed, the
+auxiliary variable specifiers (those following <b class="b">&amp;aux</b>) are processed
+from left to right.  For each one, <i class="i">init-form</i> is evaluated and
+<i class="i">var</i> is bound to that value (or to <b class="b">nil</b> if no <i class="i">init-form</i>
+was specified).  <b class="b">&amp;aux</b> variable processing is analogous to
+<b class="b">let*</b> processing.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (lambda (x y &amp;aux (a (car x)) (b 2) c) (list x y a b c))
+    &equiv; (lambda (x y) (let* ((a (car x)) (b 2) c) (list x y a b c)))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Specifiers-for-keyword-parameters.html
@@ -0,0 +1,133 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Specifiers for keyword parameters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Specifiers for keyword parameters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Specifiers for keyword parameters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Ordinary-Lambda-Lists.html" rel="up" title="Ordinary Lambda Lists">
+<link href="Suppressing-Keyword-Argument-Checking.html" rel="next" title="Suppressing Keyword Argument Checking">
+<link href="A-specifier-for-a-rest-parameter.html" rel="prev" title="A specifier for a rest parameter">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Specifiers-for-keyword-parameters">
+<div class="nav-panel">
+<p>
+Next: <a href="Suppressing-Keyword-Argument-Checking.html" accesskey="n" rel="next">Suppressing Keyword Argument Checking</a>, Previous: <a href="A-specifier-for-a-rest-parameter.html" accesskey="p" rel="prev">A specifier for a rest parameter</a>, Up: <a href="Ordinary-Lambda-Lists.html" accesskey="u" rel="up">Ordinary Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Specifiers-for-keyword-parameters-1"><span>3.4.1.4 Specifiers for keyword parameters<a class="copiable-link" href="#Specifiers-for-keyword-parameters-1"> &para;</a></span></h4>
+
+<p>If <b class="b">&amp;key</b> 
+is present, all specifiers up to the next <i class="i">lambda list keyword</i>
+or the end of the <i class="i">list</i> are keyword parameter specifiers.
+When keyword parameters are processed,
+the same arguments are processed that
+would be made into a <i class="i">list</i> for a <i class="i">rest parameter</i>.
+It is permitted to specify both <b class="b">&amp;rest</b> and <b class="b">&amp;key</b>.
+In this case the remaining arguments are used for both purposes;
+that is, all remaining arguments are made into a <i class="i">list</i> for the
+<i class="i">rest parameter</i>, and are also processed for the <b class="b">&amp;key</b> parameters.
+</p>
+<p>If <b class="b">&amp;key</b> is specified, there must remain
+an even number of arguments; see <a class="ref" href="Odd-Number-of-Keyword-Arguments.html">Odd Number of Keyword Arguments</a>.
+</p>
+<p>These arguments are considered as pairs,
+the first argument in each pair being interpreted as a name
+and the second as the corresponding value.
+The first <i class="i">object</i> of each pair must be a <i class="i">symbol</i>;
+see <a class="ref" href="Invalid-Keyword-Arguments.html">Invalid Keyword Arguments</a>.
+The keyword parameter specifiers may optionally be followed by the
+<i class="i">lambda list keyword</i> <b class="b">&amp;allow-other-keys</b>.
+</p>
+<p>In each keyword parameter specifier must be a name <i class="i">var</i> for
+the parameter variable.
+</p>
+<p>If the <i class="i">var</i> appears alone or in a <code class="t">(<i class="i">var</i> <i class="i">init-form</i>)</code>
+combination, the keyword name used when matching <i class="i">arguments</i> to <i class="i">parameters</i>
+is a <i class="i">symbol</i> in the <code class="t">KEYWORD</code> <i class="i">package</i> whose <i class="i">name</i> is the
+<i class="i">same</i> (under <b class="b">string=</b>) as <i class="i">var</i>&rsquo;s.
+If the notation <code class="t">((<i class="i">keyword-name</i> <i class="i">var</i>) <i class="i">init-form</i>)</code> is used,
+then the keyword name used to match <i class="i">arguments</i> to <i class="i">parameters</i> is
+<i class="i">keyword-name</i>, which may be a <i class="i">symbol</i> in any <i class="i">package</i>.
+(Of course, if it is not a <i class="i">symbol</i> in the <code class="t">KEYWORD</code> <i class="i">package</i>,
+it does not necessarily self-evaluate, so care must be taken when calling the function
+to make sure that normal evaluation still yields the keyword name.)
+</p>
+<p>Thus
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun foo (&amp;key radix (type 'integer)) ...)
+</pre></div>
+
+<p>means exactly the same as
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun foo (&amp;key ((:radix radix)) ((:type type) 'integer)) ...)
+</pre></div>
+
+<p>The keyword parameter specifiers are, like all parameter specifiers,
+effectively processed from left to right.  For each keyword parameter
+specifier, if there is an argument pair whose name matches that
+specifier&rsquo;s name (that is, the names are <b class="b">eq</b>), then the
+parameter variable for that specifier is bound to the second item (the
+value) of that argument pair.  If more than one such argument pair
+matches, the leftmost argument pair is used.  If no such argument pair
+exists, then the <i class="i">init-form</i> for that specifier is evaluated and
+the parameter variable is bound to that value (or to <b class="b">nil</b> if no
+<i class="i">init-form</i> was specified).  <i class="i">supplied-p-parameter</i> is
+treated as for <b class="b">&amp;optional</b> parameters: it is bound to <i class="i">true</i> if there
+was a matching argument pair, and to <i class="i">false</i> otherwise.
+</p>
+<p>Unless keyword argument checking is suppressed,
+an argument pair must a name matched by a parameter specifier;
+see <a class="ref" href="Unrecognized-Keyword-Arguments.html">Unrecognized Keyword Arguments</a>.
+</p>
+<p>If keyword argument checking is suppressed, 
+then it is permitted for an argument pair
+to match no parameter specifier, and the argument pair is ignored, but
+such an argument pair is accessible through the <i class="i">rest parameter</i> if
+one was supplied.  The purpose of these mechanisms is to allow sharing
+of argument lists among several <i class="i">lambda expressions</i> and to
+allow either the caller or the called <i class="i">lambda expression</i> to
+specify that such sharing may be taking place.
+</p>
+<p>Note that if <b class="b">&amp;key</b> is present, a keyword argument of <code class="t">:allow-other-keys</code>
+is always permitted&mdash;regardless of whether the associated value is <i class="i">true</i>
+or <i class="i">false</i>.  However, if the value is <i class="i">false</i>, other non-matching
+keywords are not tolerated (unless <b class="b">&amp;allow-other-keys</b> was used).
+</p>
+<p>Furthermore, if the receiving argument list specifies a regular argument which
+would be flagged by <code class="t">:allow-other-keys</code>, then <code class="t">:allow-other-keys</code> has both
+its special-cased meaning (identifying whether additional keywords are permitted)
+and its normal meaning (data flow into the function in question).
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Suppressing-Keyword-Argument-Checking.html">Suppressing Keyword Argument Checking</a>, Previous: <a href="A-specifier-for-a-rest-parameter.html">A specifier for a rest parameter</a>, Up: <a href="Ordinary-Lambda-Lists.html">Ordinary Lambda Lists</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Specifiers-for-optional-parameters.html
@@ -0,0 +1,65 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Specifiers for optional parameters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Specifiers for optional parameters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Specifiers for optional parameters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Ordinary-Lambda-Lists.html" rel="up" title="Ordinary Lambda Lists">
+<link href="A-specifier-for-a-rest-parameter.html" rel="next" title="A specifier for a rest parameter">
+<link href="Specifiers-for-the-required-parameters.html" rel="prev" title="Specifiers for the required parameters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Specifiers-for-optional-parameters">
+<div class="nav-panel">
+<p>
+Next: <a href="A-specifier-for-a-rest-parameter.html" accesskey="n" rel="next">A specifier for a rest parameter</a>, Previous: <a href="Specifiers-for-the-required-parameters.html" accesskey="p" rel="prev">Specifiers for the required parameters</a>, Up: <a href="Ordinary-Lambda-Lists.html" accesskey="u" rel="up">Ordinary Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Specifiers-for-optional-parameters-1"><span>3.4.1.2 Specifiers for optional parameters<a class="copiable-link" href="#Specifiers-for-optional-parameters-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-_0026optional"></a>
+
+<p>If <b class="b">&amp;optional</b> is present,
+the optional parameter specifiers are those following 
+<b class="b">&amp;optional</b> 
+up to the next <i class="i">lambda list keyword</i> or the end of the list.
+If optional parameters are specified, then each one is processed as
+follows.  If any unprocessed arguments remain, then the parameter variable
+<i class="i">var</i> is bound to the next remaining argument, just as for a required
+parameter.  If no arguments remain, however, then <i class="i">init-form</i> 
+is evaluated, and the parameter variable
+is bound to the resulting value 
+(or to <b class="b">nil</b> if no <i class="i">init-form</i> appears
+in the parameter specifier).
+If another variable name <i class="i">supplied-p-parameter</i> 
+appears in the specifier, it is bound
+to <i class="i">true</i> if an argument had been available, and to <i class="i">false</i> if no
+argument remained (and therefore <i class="i">init-form</i> had to be evaluated).
+<i class="i">Supplied-p-parameter</i>
+is bound not to an argument but to a value indicating whether or not
+an argument had been supplied for the corresponding <i class="i">var</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Specifiers-for-the-required-parameters.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Specifiers for the required parameters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Specifiers for the required parameters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Specifiers for the required parameters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Ordinary-Lambda-Lists.html" rel="up" title="Ordinary Lambda Lists">
+<link href="Specifiers-for-optional-parameters.html" rel="next" title="Specifiers for optional parameters">
+<link href="Ordinary-Lambda-Lists.html" rel="prev" title="Ordinary Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Specifiers-for-the-required-parameters">
+<div class="nav-panel">
+<p>
+Next: <a href="Specifiers-for-optional-parameters.html" accesskey="n" rel="next">Specifiers for optional parameters</a>, Previous: <a href="Ordinary-Lambda-Lists.html" accesskey="p" rel="prev">Ordinary Lambda Lists</a>, Up: <a href="Ordinary-Lambda-Lists.html" accesskey="u" rel="up">Ordinary Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Specifiers-for-the-required-parameters-1"><span>3.4.1.1 Specifiers for the required parameters<a class="copiable-link" href="#Specifiers-for-the-required-parameters-1"> &para;</a></span></h4>
+
+<p>These are all the parameter specifiers up to 
+the first <i class="i">lambda list keyword</i>;
+if there are no <i class="i">lambda list keywords</i>, 
+then all the specifiers are for required parameters.
+Each required parameter is specified by a parameter variable <i class="i">var</i>.
+<i class="i">var</i> is bound as a lexical variable unless it is declared <b class="b">special</b>.
+</p>
+<p>If there are <code class="t">n</code> required parameters (<code class="t">n</code> may be zero), 
+there must be at least <code class="t">n</code> passed arguments, and the 
+required parameters are bound to the first <code class="t">n</code> passed arguments;
+see <a class="ref" href="Error-Checking-in-Function-Calls.html">Error Checking in Function Calls</a>.
+The other parameters are then processed using any remaining arguments.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Splicing-in-Modified-BNF-Syntax.html
@@ -0,0 +1,151 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Splicing in Modified BNF Syntax (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Splicing in Modified BNF Syntax (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Splicing in Modified BNF Syntax (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Notational-Conventions.html" rel="up" title="Notational Conventions">
+<link href="Indirection-in-Modified-BNF-Syntax.html" rel="next" title="Indirection in Modified BNF Syntax">
+<link href="Modified-BNF-Syntax.html" rel="prev" title="Modified BNF Syntax">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.center {text-align:center}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Splicing-in-Modified-BNF-Syntax">
+<div class="nav-panel">
+<p>
+Next: <a href="Indirection-in-Modified-BNF-Syntax.html" accesskey="n" rel="next">Indirection in Modified BNF Syntax</a>, Previous: <a href="Modified-BNF-Syntax.html" accesskey="p" rel="prev">Modified BNF Syntax</a>, Up: <a href="Notational-Conventions.html" accesskey="u" rel="up">Notational Conventions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Splicing-in-Modified-BNF-Syntax-1"><span>1.4.1.3 Splicing in Modified BNF Syntax<a class="copiable-link" href="#Splicing-in-Modified-BNF-Syntax-1"> &para;</a></span></h4>
+
+<p>The primary extension used is the following:
+</p>
+<div class="center">[[O]]
+</div>
+<p>An expression of this form appears whenever a list of elements is
+to be spliced into a larger structure and the elements can appear in
+any order. The symbol O represents a description of the syntax of
+some number of syntactic elements to be spliced; that description must
+be of the form
+</p>
+<div class="center">O_1 | ... | O_l
+</div>
+<p>where each O_i can be of the form S or of
+the form S<span class="r">*</span> or of the form S^1.
+</p>
+<p>The expression [[O]] means that a list of the form
+</p>
+<div class="center">(O_{i_1}... O_{i_j})  1&lt;= j
+</div>
+<p>is spliced into the enclosing expression,
+such that if n != m and 1&lt;= n,m&lt;= j,
+then either O_{i_n}!= O_{i_m}
+         or O_{i_n} = O_{i_m} = Q_k, 
+where for some 1&lt;= k &lt;= n, O_k is of the form Q_k<span class="r">*</span>.
+</p>
+<p>Furthermore, for each O_{i_n} that is of the form Q_k^1,
+that element is required to appear somewhere in the list to be spliced.
+</p>
+<p>For example, the expression
+</p>
+<p><code class="t">(x [[A | B<span class="r">*</span> | C]] y)</code>
+</p>
+<p>means that at most one <code class="t">A</code>, any number of <code class="t">B</code>&rsquo;s, and
+at most one <code class="t">C</code> can occur in any order.
+It is a description of any of these:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (x y)
+ (x B A C y)
+ (x A B B B B B C y)
+ (x C B A B B B y)
+</pre></div>
+
+<p>but not any of these:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (x B B A A C C y)
+ (x C B C y)
+</pre></div>
+
+<p>In the first case, both <code class="t">A</code> and <code class="t">C</code> appear too often,
+and in the second case <code class="t">C</code> appears too often.
+</p>
+<p>The notation [[O_1 | O_2 | ...]]^+ 
+adds the additional restriction that at least one item from among the possible
+choices must be used.  For example:
+</p>
+<p><code class="t">(x [[A | B<span class="r">*</span> | C]]^+ y)</code>
+</p>
+<p>means that at most one <code class="t">A</code>, any number of <code class="t">B</code>&rsquo;s, and
+at most one <code class="t">C</code> can occur in any order, but that in any case at least
+one of these options must be selected.
+It is a description of any of these:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (x B y)
+ (x B A C y)
+ (x A B B B B B C y)
+ (x C B A B B B y)
+</pre></div>
+
+<p>but not any of these:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (x y)
+ (x B B A A C C y)
+ (x C B C y)
+</pre></div>
+
+<p>In the first case, no item was used;
+in the second case, both <code class="t">A</code> and <code class="t">C</code> appear too often;
+and in the third case <code class="t">C</code> appears too often.
+</p>
+<p>Also, the expression:
+</p>
+<p><code class="t">(x [[A^1 | B^1 | C]] y)</code>
+</p>
+<p>can generate exactly these and no others:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (x A B C y)
+ (x A C B y)
+ (x A B y)
+ (x B A C y)
+ (x B C A y)
+ (x B A y)
+ (x C A B y)
+ (x C B A y)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Indirection-in-Modified-BNF-Syntax.html">Indirection in Modified BNF Syntax</a>, Previous: <a href="Modified-BNF-Syntax.html">Modified BNF Syntax</a>, Up: <a href="Notational-Conventions.html">Notational Conventions</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Standard-Characters.html
@@ -0,0 +1,152 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Standard Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Standard Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Standard Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Syntax.html" rel="up" title="Character Syntax">
+<link href="Character-Syntax-Types.html" rel="next" title="Character Syntax Types">
+<link href="Variables-that-affect-the-Lisp-Reader.html" rel="prev" title="Variables that affect the Lisp Reader">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Standard-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Character-Syntax-Types.html" accesskey="n" rel="next">Character Syntax Types</a>, Previous: <a href="Variables-that-affect-the-Lisp-Reader.html" accesskey="p" rel="prev">Variables that affect the Lisp Reader</a>, Up: <a href="Character-Syntax.html" accesskey="u" rel="up">Character Syntax</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Standard-Characters-1"><span>2.1.3 Standard Characters<a class="copiable-link" href="#Standard-Characters-1"> &para;</a></span></h4>
+
+<p>All <i class="i">implementations</i> must support a <i class="i">character</i> <i class="i">repertoire</i>
+called <b class="b">standard-char</b>; <i class="i">characters</i> that are members of that
+<i class="i">repertoire</i> are called <i class="i">standard characters</i>
+<a class="index-entry-id" id="index-standard-character"></a>
+.
+</p>
+<p>The <b class="b">standard-char</b> <i class="i">repertoire</i> consists of
+the <i class="i">non-graphic</i> <i class="i">character</i> <i class="i">newline</i>,
+the <i class="i">graphic</i> <i class="i">character</i> <i class="i">space</i>,
+and the following additional
+ninety-four <i class="i">graphic</i> <i class="i">characters</i> or their equivalents:
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Graphic ID  Glyph  Description  Graphic ID  Glyph  Description  <!-- /@w -->
+  LA01        <code class="t">a</code>      small a      LN01        <code class="t">n</code>      small n      <!-- /@w -->
+  LA02        <code class="t">A</code>      capital A    LN02        <code class="t">N</code>      capital N    <!-- /@w -->
+  LB01        <code class="t">b</code>      small b      LO01        <code class="t">o</code>      small o      <!-- /@w -->
+  LB02        <code class="t">B</code>      capital B    LO02        <code class="t">O</code>      capital O    <!-- /@w -->
+  LC01        <code class="t">c</code>      small c      LP01        <code class="t">p</code>      small p      <!-- /@w -->
+  LC02        <code class="t">C</code>      capital C    LP02        <code class="t">P</code>      capital P    <!-- /@w -->
+  LD01        <code class="t">d</code>      small d      LQ01        <code class="t">q</code>      small q      <!-- /@w -->
+  LD02        <code class="t">D</code>      capital D    LQ02        <code class="t">Q</code>      capital Q    <!-- /@w -->
+  LE01        <code class="t">e</code>      small e      LR01        <code class="t">r</code>      small r      <!-- /@w -->
+  LE02        <code class="t">E</code>      capital E    LR02        <code class="t">R</code>      capital R    <!-- /@w -->
+  LF01        <code class="t">f</code>      small f      LS01        <code class="t">s</code>      small s      <!-- /@w -->
+  LF02        <code class="t">F</code>      capital F    LS02        <code class="t">S</code>      capital S    <!-- /@w -->
+  LG01        <code class="t">g</code>      small g      LT01        <code class="t">t</code>      small t      <!-- /@w -->
+  LG02        <code class="t">G</code>      capital G    LT02        <code class="t">T</code>      capital T    <!-- /@w -->
+  LH01        <code class="t">h</code>      small h      LU01        <code class="t">u</code>      small u      <!-- /@w -->
+  LH02        <code class="t">H</code>      capital H    LU02        <code class="t">U</code>      capital U    <!-- /@w -->
+  LI01        <code class="t">i</code>      small i      LV01        <code class="t">v</code>      small v      <!-- /@w -->
+  LI02        <code class="t">I</code>      capital I    LV02        <code class="t">V</code>      capital V    <!-- /@w -->
+  LJ01        <code class="t">j</code>      small j      LW01        <code class="t">w</code>      small w      <!-- /@w -->
+  LJ02        <code class="t">J</code>      capital J    LW02        <code class="t">W</code>      capital W    <!-- /@w -->
+  LK01        <code class="t">k</code>      small k      LX01        <code class="t">x</code>      small x      <!-- /@w -->
+  LK02        <code class="t">K</code>      capital K    LX02        <code class="t">X</code>      capital X    <!-- /@w -->
+  LL01        <code class="t">l</code>      small l      LY01        <code class="t">y</code>      small y      <!-- /@w -->
+  LL02        <code class="t">L</code>      capital L    LY02        <code class="t">Y</code>      capital Y    <!-- /@w -->
+  LM01        <code class="t">m</code>      small m      LZ01        <code class="t">z</code>      small z      <!-- /@w -->
+  LM02        <code class="t">M</code>      capital M    LZ02        <code class="t">Z</code>      capital Z    <!-- /@w -->
+
+  Figure 2&ndash;3: Standard Character Subrepertoire (Part 1 of 3: Latin Characters)<!-- /@w -->
+
+</pre></div></div>
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Graphic ID  Glyph  Description  Graphic ID  Glyph  Description  <!-- /@w -->
+  ND01        <code class="t">1</code>      digit 1      ND06        <code class="t">6</code>      digit 6      <!-- /@w -->
+  ND02        <code class="t">2</code>      digit 2      ND07        <code class="t">7</code>      digit 7      <!-- /@w -->
+  ND03        <code class="t">3</code>      digit 3      ND08        <code class="t">8</code>      digit 8      <!-- /@w -->
+  ND04        <code class="t">4</code>      digit 4      ND09        <code class="t">9</code>      digit 9      <!-- /@w -->
+  ND05        <code class="t">5</code>      digit 5      ND10        <code class="t">0</code>      digit 0      <!-- /@w -->
+
+  Figure 2&ndash;4: Standard Character Subrepertoire (Part 2 of 3: Numeric Characters)<!-- /@w -->
+
+</pre></div></div>
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Graphic ID  Glyph  Description                              <!-- /@w -->
+  SP02        <code class="t">!</code>      exclamation mark                         <!-- /@w -->
+  SC03        <code class="t">$</code>     dollar sign                              <!-- /@w -->
+  SP04        <code class="t">&quot;</code>      quotation mark, or double quote          <!-- /@w -->
+  SP05        <code class="t">'</code>      apostrophe, or <span class="r">[</span>single<span class="r">]</span> quote            <!-- /@w -->
+  SP06        <code class="t">(</code>      left parenthesis, or open parenthesis    <!-- /@w -->
+  SP07        <code class="t">)</code>      right parenthesis, or close parenthesis  <!-- /@w -->
+  SP08        <code class="t">,</code>      comma                                    <!-- /@w -->
+  SP09        <code class="t">_</code>      low line, or underscore                  <!-- /@w -->
+  SP10        <code class="t">-</code>      hyphen, or minus <span class="r">[</span>sign<span class="r">]</span>                  <!-- /@w -->
+  SP11        <code class="t">.</code>      full stop, period, or dot                <!-- /@w -->
+  SP12        <code class="t">/</code>      solidus, or slash                        <!-- /@w -->
+  SP13        <code class="t">:</code>      colon                                    <!-- /@w -->
+  SP14        <code class="t">;</code>      semicolon                                <!-- /@w -->
+  SP15        <code class="t">?</code>      question mark                            <!-- /@w -->
+  SA01        <code class="t">+</code>      plus <span class="r">[</span>sign<span class="r">]</span>                              <!-- /@w -->
+  SA03        <code class="t">&lt;</code>      less-than <span class="r">[</span>sign<span class="r">]</span>                         <!-- /@w -->
+  SA04        <code class="t">=</code>      equals <span class="r">[</span>sign<span class="r">]</span>                            <!-- /@w -->
+  SA05        <code class="t">&gt;</code>      greater-than <span class="r">[</span>sign<span class="r">]</span>                      <!-- /@w -->
+  SM01        <code class="t">#</code>      number sign, or sharp<span class="r">[</span>sign<span class="r">]</span>              <!-- /@w -->
+  SM02        <code class="t">%</code>      percent <span class="r">[</span>sign<span class="r">]</span>                           <!-- /@w -->
+  SM03        <code class="t">&amp;</code>      ampersand                                <!-- /@w -->
+  SM04        <code class="t">*</code>      asterisk, or star                        <!-- /@w -->
+  SM05        <code class="t">@</code>      commercial at, or at-sign                <!-- /@w -->
+  SM06        <code class="t">[</code>      left <span class="r">[</span>square<span class="r">]</span> bracket                    <!-- /@w -->
+  SM07        <code class="t">\</code>      reverse solidus, or backslash            <!-- /@w -->
+  SM08        <code class="t">]</code>      right <span class="r">[</span>square<span class="r">]</span> bracket                   <!-- /@w -->
+  SM11        <code class="t">{</code>      left curly bracket, or left brace        <!-- /@w -->
+  SM13        <code class="t">|</code>      vertical bar                             <!-- /@w -->
+  SM14        <code class="t">}</code>      right curly bracket, or right brace      <!-- /@w -->
+  SD13        <code class="t">`</code>      grave accent, or backquote               <!-- /@w -->
+  SD15        <code class="t"><code class="t">^</code></code>      circumflex accent                        <!-- /@w -->
+  SD19        <code class="t">~</code>      tilde                                    <!-- /@w -->
+
+  Figure 2&ndash;5: Standard Character Subrepertoire (Part 3 of 3: Special Characters)<!-- /@w -->
+
+</pre></div></div>
+
+<p>The graphic IDs are not used within <span class="r">Common Lisp</span>,
+but are provided for cross reference purposes with <span class="r">ISO 6937/2</span>.
+Note that the first letter of the graphic ID 
+categorizes the character as follows:
+L&mdash;Latin, N&mdash;Numeric, S&mdash;Special.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Character-Syntax-Types.html">Character Syntax Types</a>, Previous: <a href="Variables-that-affect-the-Lisp-Reader.html">Variables that affect the Lisp Reader</a>, Up: <a href="Character-Syntax.html">Character Syntax</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Standard-Macro-Characters.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Standard Macro Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Standard Macro Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Standard Macro Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Syntax.html" rel="up" title="Syntax">
+<link href="Interpretation-of-Tokens.html" rel="prev" title="Interpretation of Tokens">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Standard-Macro-Characters">
+<div class="nav-panel">
+<p>
+Previous: <a href="Interpretation-of-Tokens.html" accesskey="p" rel="prev">Interpretation of Tokens</a>, Up: <a href="Syntax.html" accesskey="u" rel="up">Syntax</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Standard-Macro-Characters-1"><span>2.4 Standard Macro Characters<a class="copiable-link" href="#Standard-Macro-Characters-1"> &para;</a></span></h3>
+
+
+<p>If the reader encounters a <i class="i">macro character</i>,
+then its associated <i class="i">reader macro function</i> 
+is invoked and may produce an <i class="i">object</i> to be returned.
+This <i class="i">function</i> may read the <i class="i">characters</i> 
+following the <i class="i">macro character</i> in the <i class="i">stream</i> 
+in any syntax and return the <i class="i">object</i> represented by that syntax.
+</p>
+<p>Any <i class="i">character</i> can be made to be a <i class="i">macro character</i>.
+The <i class="i">macro characters</i> defined initially in a <i class="i">conforming implementation</i>
+include
+the following:
+</p>
+
+<ul class="mini-toc">
+<li><a href="Left_002dParenthesis.html" accesskey="1">Left-Parenthesis</a></li>
+<li><a href="Right_002dParenthesis.html" accesskey="2">Right-Parenthesis</a></li>
+<li><a href="Single_002dQuote.html" accesskey="3">Single-Quote</a></li>
+<li><a href="Semicolon.html" accesskey="4">Semicolon</a></li>
+<li><a href="Double_002dQuote.html" accesskey="5">Double-Quote</a></li>
+<li><a href="Backquote.html" accesskey="6">Backquote</a></li>
+<li><a href="Comma.html" accesskey="7">Comma</a></li>
+<li><a href="Sharpsign.html" accesskey="8">Sharpsign</a></li>
+<li><a href="Re_002dReading-Abbreviated-Expressions.html" accesskey="9">Re-Reading Abbreviated Expressions</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Standard-Meta_002dobjects.html
@@ -0,0 +1,84 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Standard Meta-objects (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Standard Meta-objects (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Standard Meta-objects (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Meta_002dObjects.html" rel="up" title="Meta-Objects">
+<link href="Meta_002dObjects.html" rel="prev" title="Meta-Objects">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Standard-Meta_002dobjects">
+<div class="nav-panel">
+<p>
+Previous: <a href="Meta_002dObjects.html" accesskey="p" rel="prev">Meta-Objects</a>, Up: <a href="Meta_002dObjects.html" accesskey="u" rel="up">Meta-Objects</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Standard-Meta_002dobjects-1"><span>7.4.1 Standard Meta-objects<a class="copiable-link" href="#Standard-Meta_002dobjects-1"> &para;</a></span></h4>
+
+<p>The object system supplies a set of meta-objects, called standard meta-objects.
+These include the <i class="i">class</i> <b class="b">standard-object</b> and
+<i class="i">instances</i> of the classes <b class="b">standard-method</b>, 
+<b class="b">standard-generic-function</b>, and <b class="b">method-combination</b>.
+</p>
+<dl class="table">
+<dd>
+<p>[Editorial Note by KMP: This is said redundantly in the definition of STANDARD-METHOD.]
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <i class="i">class</i> <b class="b">standard-method</b> is the default <i class="i">class</i> of 
+<i class="i">methods</i> defined by the 
+ <b class="b">defmethod</b> and
+ <b class="b">defgeneric</b> <i class="i">forms</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <i class="i">class</i> <b class="b">standard-generic-function</b> is the default <i class="i">class</i> of 
+<i class="i">generic functions</i> defined by the forms
+  <b class="b">defmethod</b>,
+  <b class="b">defgeneric</b>,
+</p>
+<p>and
+  <b class="b">defclass</b>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <i class="i">class</i> named <b class="b">standard-object</b> 
+is an <i class="i">instance</i> of the <i class="i">class</i> <b class="b">standard-class</b> 
+and is a <i class="i">superclass</i> of every <i class="i">class</i> that is an
+<i class="i">instance</i> of <b class="b">standard-class</b> except itself and 
+<b class="b">structure-class</b>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Every <i class="i">method</i> combination object is 
+an <i class="i">instance</i> of a <i class="i">subclass</i> of <i class="i">class</i> <b class="b">method-combination</b>.
+</p>
+</dd>
+</dl>
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Standard-Metaclasses.html
@@ -0,0 +1,69 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Standard Metaclasses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Standard Metaclasses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Standard Metaclasses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Classes.html" rel="up" title="Introduction to Classes">
+<link href="Introduction-to-Classes.html" rel="prev" title="Introduction to Classes">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Standard-Metaclasses">
+<div class="nav-panel">
+<p>
+Previous: <a href="Introduction-to-Classes.html" accesskey="p" rel="prev">Introduction to Classes</a>, Up: <a href="Introduction-to-Classes.html" accesskey="u" rel="up">Introduction to Classes</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Standard-Metaclasses-1"><span>4.3.1.1 Standard Metaclasses<a class="copiable-link" href="#Standard-Metaclasses-1"> &para;</a></span></h4>
+
+<p>The object system provides a number of predefined <i class="i">metaclasses</i>. 
+These include the <i class="i">classes</i> <b class="b">standard-class</b>, 
+<b class="b">built-in-class</b>, and <b class="b">structure-class</b>:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The <i class="i">class</i> <b class="b">standard-class</b> is the default <i class="i">class</i> of 
+<i class="i">classes</i> defined by <b class="b">defclass</b>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <i class="i">class</i> <b class="b">built-in-class</b> is the <i class="i">class</i> whose
+<i class="i">instances</i> are <i class="i">classes</i> that have special implementations with
+restricted capabilities.  Any <i class="i">class</i> that corresponds to a standard
+<i class="i">type</i> might be an <i class="i">instance</i> of <b class="b">built-in-class</b>.
+The predefined <i class="i">type</i> specifiers that are required to have
+corresponding <i class="i">classes</i> are listed in <i class="i">Figure~4&ndash;8</i>.  
+It is <i class="i">implementation-dependent</i> whether each of these <i class="i">classes</i> 
+is implemented as a <i class="i">built-in class</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>All <i class="i">classes</i> defined by means of <b class="b">defstruct</b> are
+<i class="i">instances</i> of the <i class="i">class</i> <b class="b">structure-class</b>.
+</p></dd>
+</dl>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Standard-Method-Combination.html
@@ -0,0 +1,177 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Standard Method Combination (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Standard Method Combination (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Standard Method Combination (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Method-Selection-and-Combination.html" rel="up" title="Method Selection and Combination">
+<link href="Declarative-Method-Combination.html" rel="next" title="Declarative Method Combination">
+<link href="Applying-method-combination-to-the-sorted-list-of-applicable-methods.html" rel="prev" title="Applying method combination to the sorted list of applicable methods">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Standard-Method-Combination">
+<div class="nav-panel">
+<p>
+Next: <a href="Declarative-Method-Combination.html" accesskey="n" rel="next">Declarative Method Combination</a>, Previous: <a href="Applying-method-combination-to-the-sorted-list-of-applicable-methods.html" accesskey="p" rel="prev">Applying method combination to the sorted list of applicable methods</a>, Up: <a href="Method-Selection-and-Combination.html" accesskey="u" rel="up">Method Selection and Combination</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Standard-Method-Combination-1"><span>7.6.6.5 Standard Method Combination<a class="copiable-link" href="#Standard-Method-Combination-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-standard"></a>
+
+<p>Standard method combination is supported by the <i class="i">class</i> <b class="b">standard-generic-function</b>.
+It is used if no other type of method
+combination is specified or if the built-in method combination type
+<b class="b">standard</b> is specified. 
+</p>
+<p>Primary methods define the main action of the effective method,  
+while auxiliary methods modify that action in one of three ways.
+A primary method has no method <i class="i">qualifiers</i>.
+</p>
+<p>An auxiliary method is a method whose 
+<i class="i">qualifier</i> is <code class="t">:before</code>, <code class="t">:after</code>, or <code class="t">:around</code>.
+Standard method combination
+allows no more than one <i class="i">qualifier</i> per method; if a method definition
+specifies more than one <i class="i">qualifier</i> per method, an error is signaled.
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>A <i class="i">before method</i> has the keyword <code class="t">:before</code> as its only <i class="i">qualifier</i>.
+A <i class="i">before method</i> specifies <i class="i">code</i> that is to be run before any 
+<i class="i">primary methods</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>An <i class="i">after method</i> has the keyword <code class="t">:after</code> as its only <i class="i">qualifier</i>.
+An <i class="i">after method</i> specifies <i class="i">code</i> that is to be run after
+<i class="i">primary methods</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>An <i class="i">around method</i> has the keyword <code class="t">:around</code> as its only <i class="i">qualifier</i>.
+An <i class="i">around method</i> specifies <i class="i">code</i> that is to be run instead of other
+<i class="i">applicable methods</i>,
+but which might contain explicit <i class="i">code</i>
+which calls some of those <i class="i">shadowed</i> <i class="i">methods</i>
+(via <b class="b">call-next-method</b>).
+</p>
+</dd>
+</dl>
+
+<p>The semantics of standard method combination is as follows:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>If there are any <i class="i">around methods</i>, the most specific
+<i class="i">around method</i> is called.  It supplies the value or values of the
+generic function.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Inside the body of an <i class="i">around method</i>, 
+<b class="b">call-next-method</b> can be used to call the <i class="i">next method</i>.  When the next
+method returns, the <i class="i">around method</i> can execute more code,
+perhaps based on the returned value or values.
+The <i class="i">generic function</i> <b class="b">no-next-method</b> is invoked if <b class="b">call-next-method</b> is used and
+there is no <i class="i">applicable method</i> to call.  The <i class="i">function</i> <b class="b">next-method-p</b>
+may be used to determine whether a <i class="i">next method</i> exists.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If an <i class="i">around method</i> invokes <b class="b">call-next-method</b>,
+the next most specific <i class="i">around method</i>
+is called, if one is applicable.  If there are no <i class="i">around methods</i> 
+or if <b class="b">call-next-method</b> is called by the least
+specific <i class="i">around method</i>, the other methods are called as
+follows:
+</p><dl class="table">
+<dt>&ndash;</dt>
+<dd><p>All the <i class="i">before methods</i> are called, in
+most-specific-first order.  Their values are ignored.
+An error is signaled if <b class="b">call-next-method</b> is used in a
+<i class="i">before method</i>.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>The most specific primary method is called.  Inside the
+body of a primary method, <b class="b">call-next-method</b> may be used to call
+the next most specific primary method.  When that method returns, the
+previous primary method can execute more code, perhaps based on the
+returned value or values.  The generic function <b class="b">no-next-method</b>
+is invoked if <b class="b">call-next-method</b> is used and there are no more
+applicable primary methods.  The <i class="i">function</i> <b class="b">next-method-p</b> may be
+used to determine whether a <i class="i">next method</i> exists.  If <b class="b">call-next-method</b>
+is not used, only the most specific <i class="i">primary method</i> is called.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>All the <i class="i">after methods</i> are called in
+most-specific-last order.  Their values are ignored.
+An error is signaled if <b class="b">call-next-method</b> is used in an
+<i class="i">after method</i>.
+</p></dd>
+</dl>
+
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If no <i class="i">around methods</i> were invoked, the most
+specific primary method supplies the value or values returned by the
+generic function.  The value or values returned by the invocation of
+<b class="b">call-next-method</b> in the least specific <i class="i">around method</i> are
+those returned by the most specific primary method.
+</p>
+</dd>
+</dl>
+
+<p>In standard method combination, if there is an applicable method
+but no applicable primary method, an error is signaled.
+</p>
+<p>The <i class="i">before methods</i> are run in most-specific-first order while
+the <i class="i">after methods</i> are run in least-specific-first order.  The
+design rationale for this difference can be illustrated with an
+example.  Suppose class C_1 modifies the behavior of its
+superclass, C_2, by adding <i class="i">before methods</i> and <i class="i">after methods</i>.
+Whether the behavior of the class C_2 is defined
+directly by methods on C_2 or is inherited from its superclasses
+does not affect the relative order of invocation of methods on
+instances of the class C_1.  Class C_1&rsquo;s 
+<i class="i">before method</i> runs before all of class C_2&rsquo;s methods.  
+Class C_1&rsquo;s <i class="i">after method</i> runs after all of class C_2&rsquo;s methods.
+</p>
+<p>By contrast, all <i class="i">around methods</i> run before any other methods
+run.  Thus a less specific <i class="i">around method</i> runs before a more
+specific primary method.
+</p>
+<p>If only primary methods are used and if <b class="b">call-next-method</b> is not
+used, only the most specific method is invoked; that is, more specific
+methods shadow more general ones. 
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Declarative-Method-Combination.html">Declarative Method Combination</a>, Previous: <a href="Applying-method-combination-to-the-sorted-list-of-applicable-methods.html">Applying method combination to the sorted list of applicable methods</a>, Up: <a href="Method-Selection-and-Combination.html">Method Selection and Combination</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Standardized-Packages.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Standardized Packages (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Standardized Packages (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Standardized Packages (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Package-Concepts.html" rel="up" title="Package Concepts">
+<link href="Introduction-to-Packages.html" rel="prev" title="Introduction to Packages">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Standardized-Packages">
+<div class="nav-panel">
+<p>
+Previous: <a href="Introduction-to-Packages.html" accesskey="p" rel="prev">Introduction to Packages</a>, Up: <a href="Package-Concepts.html" accesskey="u" rel="up">Package Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Standardized-Packages-1"><span>11.1.2 Standardized Packages<a class="copiable-link" href="#Standardized-Packages-1"> &para;</a></span></h4>
+
+<p>This section describes the <i class="i">packages</i> that are available
+in every <i class="i">conforming implementation</i>.  A summary of the
+<i class="i">names</i> and <i class="i">nicknames</i> of those <i class="i">standardized</i> <i class="i">packages</i> 
+is given in Figure 11&ndash;2.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Name              Nicknames  <!-- /@w -->
+  <code class="t">COMMON-LISP</code>       <code class="t">CL</code>         <!-- /@w -->
+  <code class="t">COMMON-LISP-USER</code>  <code class="t">CL-USER</code>    <!-- /@w -->
+  <code class="t">KEYWORD</code>           <i class="i">none</i>       <!-- /@w -->
+
+  Figure 11&ndash;2: Standardized Package Names<!-- /@w -->
+
+</pre></div></div>
+
+
+<ul class="mini-toc">
+<li><a href="The-COMMON_002dLISP-Package.html" accesskey="1">The COMMON-LISP Package</a></li>
+<li><a href="Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Implementations.html" accesskey="2">Constraints on the COMMON-LISP Package for Conforming Implementations</a></li>
+<li><a href="Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs.html" accesskey="3">Constraints on the COMMON-LISP Package for Conforming Programs</a></li>
+<li><a href="Some-Exceptions-to-Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs.html" accesskey="4">Some Exceptions to Constraints on the COMMON-LISP Package for Conforming Programs</a></li>
+<li><a href="The-COMMON_002dLISP_002dUSER-Package.html" accesskey="5">The COMMON-LISP-USER Package</a></li>
+<li><a href="The-KEYWORD-Package.html" accesskey="6">The KEYWORD Package</a></li>
+<li><a href="Interning-a-Symbol-in-the-KEYWORD-Package.html" accesskey="7">Interning a Symbol in the KEYWORD Package</a></li>
+<li><a href="Notes-about-The-KEYWORD-Package.html" accesskey="8">Notes about The KEYWORD Package</a></li>
+<li><a href="Implementation_002dDefined-Packages.html" accesskey="9">Implementation-Defined Packages</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Storage-Layout-for-Multidimensional-Arrays.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Storage Layout for Multidimensional Arrays (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Storage Layout for Multidimensional Arrays (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Storage Layout for Multidimensional Arrays (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Array-Elements.html" rel="up" title="Array Elements">
+<link href="Implementation-Limits-on-Array-Rank.html" rel="next" title="Implementation Limits on Array Rank">
+<link href="Multidimensional-Arrays.html" rel="prev" title="Multidimensional Arrays">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Storage-Layout-for-Multidimensional-Arrays">
+<div class="nav-panel">
+<p>
+Next: <a href="Implementation-Limits-on-Array-Rank.html" accesskey="n" rel="next">Implementation Limits on Array Rank</a>, Previous: <a href="Multidimensional-Arrays.html" accesskey="p" rel="prev">Multidimensional Arrays</a>, Up: <a href="Array-Elements.html" accesskey="u" rel="up">Array Elements</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Storage-Layout-for-Multidimensional-Arrays-1"><span>15.1.1.8 Storage Layout for Multidimensional Arrays<a class="copiable-link" href="#Storage-Layout-for-Multidimensional-Arrays-1"> &para;</a></span></h4>
+
+<p>Multidimensional <i class="i">arrays</i> store their components in row-major order;
+that is, internally a multidimensional <i class="i">array</i> is stored as a
+one-dimensional <i class="i">array</i>, with the multidimensional index sets
+ordered lexicographically, last index varying fastest.  
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Stream-Arguments-to-Standardized-Functions.html
@@ -0,0 +1,93 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Stream Arguments to Standardized Functions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Stream Arguments to Standardized Functions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Stream Arguments to Standardized Functions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Stream-Concepts.html" rel="up" title="Stream Concepts">
+<link href="Restrictions-on-Composite-Streams.html" rel="next" title="Restrictions on Composite Streams">
+<link href="Stream-Variables.html" rel="prev" title="Stream Variables">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Stream-Arguments-to-Standardized-Functions">
+<div class="nav-panel">
+<p>
+Next: <a href="Restrictions-on-Composite-Streams.html" accesskey="n" rel="next">Restrictions on Composite Streams</a>, Previous: <a href="Stream-Variables.html" accesskey="p" rel="prev">Stream Variables</a>, Up: <a href="Stream-Concepts.html" accesskey="u" rel="up">Stream Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Stream-Arguments-to-Standardized-Functions-1"><span>21.1.3 Stream Arguments to Standardized Functions<a class="copiable-link" href="#Stream-Arguments-to-Standardized-Functions-1"> &para;</a></span></h4>
+
+<p>The <i class="i">operators</i> in Figure 21&ndash;7 accept <i class="i">stream</i> <i class="i">arguments</i> that
+might be either <i class="i">open</i> or <i class="i">closed</i> <i class="i">streams</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  broadcast-stream-streams     file-author       pathnamep                     <!-- /@w -->
+  close                        file-namestring   probe-file                    <!-- /@w -->
+  compile-file                 file-write-date   rename-file                   <!-- /@w -->
+  compile-file-pathname        host-namestring   streamp                       <!-- /@w -->
+  concatenated-stream-streams  load              synonym-stream-symbol         <!-- /@w -->
+  delete-file                  logical-pathname  translate-logical-pathname    <!-- /@w -->
+  directory                    merge-pathnames   translate-pathname            <!-- /@w -->
+  directory-namestring         namestring        truename                      <!-- /@w -->
+  dribble                      open              two-way-stream-input-stream   <!-- /@w -->
+  echo-stream-input-stream     open-stream-p     two-way-stream-output-stream  <!-- /@w -->
+  echo-stream-ouput-stream     parse-namestring  wild-pathname-p               <!-- /@w -->
+  ed                           pathname          with-open-file                <!-- /@w -->
+  enough-namestring            pathname-match-p                                <!-- /@w -->
+
+        Figure 21&ndash;7: Operators that accept either Open or Closed Streams      <!-- /@w -->
+
+</pre></div></div>
+
+<p>The <i class="i">operators</i> in Figure 21&ndash;8 accept <i class="i">stream</i> <i class="i">arguments</i> that
+must be <i class="i">open</i> <i class="i">streams</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted"> clear-input              output-stream-p         read-char-no-hang          <!-- /@w -->
+ clear-output             peek-char               read-delimited-list        <!-- /@w -->
+ file-length              pprint                  read-line                  <!-- /@w -->
+ file-position            pprint-fill             read-preserving-whitespace <!-- /@w -->
+ file-string-length       pprint-indent           stream-element-type        <!-- /@w -->
+ finish-output            pprint-linear           stream-external-format     <!-- /@w -->
+ force-output             pprint-logical-block    terpri                     <!-- /@w -->
+ format                   pprint-newline          unread-char                <!-- /@w -->
+ fresh-line               pprint-tab              with-open-stream           <!-- /@w -->
+ get-output-stream-string pprint-tabular          write                      <!-- /@w -->
+ input-stream-p           prin1                   write-byte                 <!-- /@w -->
+ interactive-stream-p     princ                   write-char                 <!-- /@w -->
+ listen                   print                   write-line                 <!-- /@w -->
+ make-broadcast-stream    print-object            write-string               <!-- /@w -->
+ make-concatenated-stream print-unreadable-object y-or-n-p                   <!-- /@w -->
+ make-echo-stream         read                    yes-or-no-p                <!-- /@w -->
+ make-synonym-stream      read-byte                                          <!-- /@w -->
+ make-two-way-stream      read-char                                          <!-- /@w -->
+
+             Figure 21&ndash;8: Operators that accept Open Streams only            <!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Stream-Concepts.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Stream Concepts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Stream Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Stream Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams.html" rel="up" title="Streams">
+<link href="Streams-Dictionary.html" rel="next" title="Streams Dictionary">
+<link href="Streams.html" rel="prev" title="Streams">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Stream-Concepts">
+<div class="nav-panel">
+<p>
+Next: <a href="Streams-Dictionary.html" accesskey="n" rel="next">Streams Dictionary</a>, Previous: <a href="Streams.html" accesskey="p" rel="prev">Streams</a>, Up: <a href="Streams.html" accesskey="u" rel="up">Streams</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Stream-Concepts-1"><span>21.1 Stream Concepts<a class="copiable-link" href="#Stream-Concepts-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Introduction-to-Streams.html" accesskey="1">Introduction to Streams</a></li>
+<li><a href="Stream-Variables.html" accesskey="2">Stream Variables</a></li>
+<li><a href="Stream-Arguments-to-Standardized-Functions.html" accesskey="3">Stream Arguments to Standardized Functions</a></li>
+<li><a href="Restrictions-on-Composite-Streams.html" accesskey="4">Restrictions on Composite Streams</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Stream-Variables.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Stream Variables (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Stream Variables (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Stream Variables (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Stream-Concepts.html" rel="up" title="Stream Concepts">
+<link href="Stream-Arguments-to-Standardized-Functions.html" rel="next" title="Stream Arguments to Standardized Functions">
+<link href="Introduction-to-Streams.html" rel="prev" title="Introduction to Streams">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Stream-Variables">
+<div class="nav-panel">
+<p>
+Next: <a href="Stream-Arguments-to-Standardized-Functions.html" accesskey="n" rel="next">Stream Arguments to Standardized Functions</a>, Previous: <a href="Introduction-to-Streams.html" accesskey="p" rel="prev">Introduction to Streams</a>, Up: <a href="Stream-Concepts.html" accesskey="u" rel="up">Stream Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Stream-Variables-1"><span>21.1.2 Stream Variables<a class="copiable-link" href="#Stream-Variables-1"> &para;</a></span></h4>
+
+<p><i class="i">Variables</i> whose <i class="i">values</i> must be <i class="i">streams</i> are sometimes called 
+<i class="i">stream variables</i>
+<a class="index-entry-id" id="index-stream-variable"></a>
+.
+</p>
+<p>Certain <i class="i">stream variables</i> are defined by this specification 
+to be the proper source of input or output in various <i class="i">situations</i> 
+where no specific <i class="i">stream</i> has been specified instead.
+A complete list of such <i class="i">standardized</i> <i class="i">stream variables</i>
+appears in Figure 21&ndash;6.  
+The consequences are undefined if at any time
+the <i class="i">value</i> of any of these <i class="i">variables</i> is not an <i class="i">open</i> <i class="i">stream</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Glossary Term    Variable Name      <!-- /@w -->
+  <i class="i">debug I/O</i>        <b class="b">*debug-io*</b>         <!-- /@w -->
+  <i class="i">error output</i>     <b class="b">*error-output*</b>     <!-- /@w -->
+  <i class="i">query I/O</i>        <b class="b">*query-io*</b>         <!-- /@w -->
+  <i class="i">standard input</i>   <b class="b">*standard-input*</b>   <!-- /@w -->
+  <i class="i">standard output</i>  <b class="b">*standard-output*</b>  <!-- /@w -->
+  <i class="i">terminal I/O</i>     <b class="b">*terminal-io*</b>      <!-- /@w -->
+  <i class="i">trace output</i>     <b class="b">*trace-output*</b>     <!-- /@w -->
+
+  Figure 21&ndash;6: Standardized Stream Variables<!-- /@w -->
+
+</pre></div></div>
+
+<p>Note that, by convention, <i class="i">standardized</i> <i class="i">stream variables</i> have names 
+    ending in &ldquo;<code class="t">-input*</code>&rdquo;  if they must be <i class="i">input</i> <i class="i">streams</i>,
+    ending in &ldquo;<code class="t">-output*</code>&rdquo; if they must be <i class="i">output</i> <i class="i">streams</i>,
+ or ending in &ldquo;<code class="t">-io*</code>&rdquo;     if they must be <i class="i">bidirectional</i> <i class="i">streams</i>.
+</p>
+<p>User programs may <i class="i">assign</i> or <i class="i">bind</i> any <i class="i">standardized</i> <i class="i">stream variable</i>
+except <b class="b">*terminal-io*</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Streams-Dictionary.html
@@ -0,0 +1,103 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Streams Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Streams Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Streams Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams.html" rel="up" title="Streams">
+<link href="Stream-Concepts.html" rel="prev" title="Stream Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Streams-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Stream-Concepts.html" accesskey="p" rel="prev">Stream Concepts</a>, Up: <a href="Streams.html" accesskey="u" rel="up">Streams</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Streams-Dictionary-1"><span>21.2 Streams Dictionary<a class="copiable-link" href="#Streams-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="stream.html" accesskey="1">stream                                                       [System Class]</a></li>
+<li><a href="broadcast_002dstream.html" accesskey="2">broadcast-stream                                             [System Class]</a></li>
+<li><a href="concatenated_002dstream.html" accesskey="3">concatenated-stream                                          [System Class]</a></li>
+<li><a href="echo_002dstream.html" accesskey="4">echo-stream                                                  [System Class]</a></li>
+<li><a href="file_002dstream.html" accesskey="5">file-stream                                                  [System Class]</a></li>
+<li><a href="string_002dstream.html" accesskey="6">string-stream                                                [System Class]</a></li>
+<li><a href="synonym_002dstream.html" accesskey="7">synonym-stream                                               [System Class]</a></li>
+<li><a href="two_002dway_002dstream.html" accesskey="8">two-way-stream                                               [System Class]</a></li>
+<li><a href="input_002dstream_002dp.html" accesskey="9">input-stream-p, output-stream-p                                  [Function]</a></li>
+<li><a href="interactive_002dstream_002dp.html">interactive-stream-p                                             [Function]</a></li>
+<li><a href="open_002dstream_002dp.html">open-stream-p                                                    [Function]</a></li>
+<li><a href="stream_002delement_002dtype.html">stream-element-type                                              [Function]</a></li>
+<li><a href="streamp.html">streamp                                                          [Function]</a></li>
+<li><a href="read_002dbyte.html">read-byte                                                        [Function]</a></li>
+<li><a href="write_002dbyte.html">write-byte                                                       [Function]</a></li>
+<li><a href="peek_002dchar.html">peek-char                                                        [Function]</a></li>
+<li><a href="read_002dchar.html">read-char                                                        [Function]</a></li>
+<li><a href="read_002dchar_002dno_002dhang.html">read-char-no-hang                                                [Function]</a></li>
+<li><a href="terpri.html">terpri, fresh-line                                               [Function]</a></li>
+<li><a href="unread_002dchar.html">unread-char                                                      [Function]</a></li>
+<li><a href="write_002dchar.html">write-char                                                       [Function]</a></li>
+<li><a href="read_002dline.html">read-line                                                        [Function]</a></li>
+<li><a href="write_002dstring.html">write-string, write-line                                         [Function]</a></li>
+<li><a href="read_002dsequence.html">read-sequence                                                    [Function]</a></li>
+<li><a href="write_002dsequence.html">write-sequence                                                   [Function]</a></li>
+<li><a href="file_002dlength.html">file-length                                                      [Function]</a></li>
+<li><a href="file_002dposition.html">file-position                                                    [Function]</a></li>
+<li><a href="file_002dstring_002dlength.html">file-string-length                                               [Function]</a></li>
+<li><a href="open.html">open                                                             [Function]</a></li>
+<li><a href="stream_002dexternal_002dformat.html">stream-external-format                                           [Function]</a></li>
+<li><a href="with_002dopen_002dfile.html">with-open-file                                                      [macro]</a></li>
+<li><a href="close.html">close                                                            [Function]</a></li>
+<li><a href="with_002dopen_002dstream.html">with-open-stream                                                    [Macro]</a></li>
+<li><a href="listen.html">listen                                                           [Function]</a></li>
+<li><a href="clear_002dinput.html">clear-input                                                      [Function]</a></li>
+<li><a href="finish_002doutput.html">finish-output, force-output, clear-output                        [Function]</a></li>
+<li><a href="y_002dor_002dn_002dp.html">y-or-n-p, yes-or-no-p                                            [Function]</a></li>
+<li><a href="make_002dsynonym_002dstream.html">make-synonym-stream                                              [Function]</a></li>
+<li><a href="synonym_002dstream_002dsymbol.html">synonym-stream-symbol                                            [Function]</a></li>
+<li><a href="broadcast_002dstream_002dstreams.html">broadcast-stream-streams                                         [Function]</a></li>
+<li><a href="make_002dbroadcast_002dstream.html">make-broadcast-stream                                            [Function]</a></li>
+<li><a href="make_002dtwo_002dway_002dstream.html">make-two-way-stream                                              [Function]</a></li>
+<li><a href="two_002dway_002dstream_002dinput_002dstream.html">two-way-stream-input-stream, two-way-stream-output-stream</a></li>
+<li><a href="echo_002dstream_002dinput_002dstream.html">echo-stream-input-stream, echo-stream-output-stream              [Function]</a></li>
+<li><a href="make_002decho_002dstream.html">make-echo-stream                                                 [Function]</a></li>
+<li><a href="concatenated_002dstream_002dstreams.html">concatenated-stream-streams                                      [Function]</a></li>
+<li><a href="make_002dconcatenated_002dstream.html">make-concatenated-stream                                         [Function]</a></li>
+<li><a href="get_002doutput_002dstream_002dstring.html">get-output-stream-string                                         [Function]</a></li>
+<li><a href="make_002dstring_002dinput_002dstream.html">make-string-input-stream                                         [Function]</a></li>
+<li><a href="make_002dstring_002doutput_002dstream.html">make-string-output-stream                                        [Function]</a></li>
+<li><a href="with_002dinput_002dfrom_002dstring.html">with-input-from-string                                              [Macro]</a></li>
+<li><a href="with_002doutput_002dto_002dstring.html">with-output-to-string                                               [Macro]</a></li>
+<li><a href="_002adebug_002dio_002a.html">*debug-io*, *error-output*, *query-io*,</a></li>
+<li><a href="_002aterminal_002dio_002a.html">*terminal-io*                                                    [Variable]</a></li>
+<li><a href="stream_002derror.html">stream-error                                               [Condition Type]</a></li>
+<li><a href="stream_002derror_002dstream.html">stream-error-stream                                              [Function]</a></li>
+<li><a href="end_002dof_002dfile.html">end-of-file                                                [Condition Type]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Streams.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Streams (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Streams (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Streams (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Printer.html" rel="next" title="Printer">
+<link href="Files.html" rel="prev" title="Files">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Streams">
+<div class="nav-panel">
+<p>
+Next: <a href="Printer.html" accesskey="n" rel="next">Printer</a>, Previous: <a href="Files.html" accesskey="p" rel="prev">Files</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Streams-1"><span>21 Streams<a class="copiable-link" href="#Streams-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Stream-Concepts.html" accesskey="1">Stream Concepts</a></li>
+<li><a href="Streams-Dictionary.html" accesskey="2">Streams Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/String-Concepts.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>String Concepts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="String Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="String Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Strings.html" rel="up" title="Strings">
+<link href="Strings-Dictionary.html" rel="next" title="Strings Dictionary">
+<link href="Strings.html" rel="prev" title="Strings">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="String-Concepts">
+<div class="nav-panel">
+<p>
+Next: <a href="Strings-Dictionary.html" accesskey="n" rel="next">Strings Dictionary</a>, Previous: <a href="Strings.html" accesskey="p" rel="prev">Strings</a>, Up: <a href="Strings.html" accesskey="u" rel="up">Strings</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="String-Concepts-1"><span>16.1 String Concepts<a class="copiable-link" href="#String-Concepts-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Implications-of-Strings-Being-Arrays.html" accesskey="1">Implications of Strings Being Arrays</a></li>
+<li><a href="Subtypes-of-STRING.html" accesskey="2">Subtypes of STRING</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Strings-Dictionary.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Strings Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Strings Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Strings Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Strings.html" rel="up" title="Strings">
+<link href="String-Concepts.html" rel="prev" title="String Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Strings-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="String-Concepts.html" accesskey="p" rel="prev">String Concepts</a>, Up: <a href="Strings.html" accesskey="u" rel="up">Strings</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Strings-Dictionary-1"><span>16.2 Strings Dictionary<a class="copiable-link" href="#Strings-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="string-_0028System-Class_0029.html" accesskey="1">string                                                       [System Class]</a></li>
+<li><a href="base_002dstring.html" accesskey="2">base-string                                                          [Type]</a></li>
+<li><a href="simple_002dstring.html" accesskey="3">simple-string                                                        [Type]</a></li>
+<li><a href="simple_002dbase_002dstring.html" accesskey="4">simple-base-string                                                   [Type]</a></li>
+<li><a href="simple_002dstring_002dp.html" accesskey="5">simple-string-p                                                  [Function]</a></li>
+<li><a href="char.html" accesskey="6">char, schar                                                      [Accessor]</a></li>
+<li><a href="string.html" accesskey="7">string                                                           [Function]</a></li>
+<li><a href="string_002dupcase.html" accesskey="8">string-upcase, string-downcase, string-capitalize,</a></li>
+<li><a href="string_002dtrim.html" accesskey="9">string-trim, string-left-trim, string-right-trim                 [Function]</a></li>
+<li><a href="string_003d.html">string=, string/=, string&lt;, string&gt;, string&lt;=, string&gt;=,</a></li>
+<li><a href="stringp.html">stringp                                                          [Function]</a></li>
+<li><a href="make_002dstring.html">make-string                                                      [Function]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Strings-in-Component-Values.html
@@ -0,0 +1,43 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Strings in Component Values (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Strings in Component Values (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Strings in Component Values (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Special-Characters-in-Pathname-Components.html" rel="next" title="Special Characters in Pathname Components">
+<link href="Interpreting-Pathname-Component-Values.html" rel="prev" title="Interpreting Pathname Component Values">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Strings-in-Component-Values">
+<div class="nav-panel">
+<p>
+Next: <a href="Special-Characters-in-Pathname-Components.html" accesskey="n" rel="next">Special Characters in Pathname Components</a>, Previous: <a href="Interpreting-Pathname-Component-Values.html" accesskey="p" rel="prev">Interpreting Pathname Component Values</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Strings-in-Component-Values-1"><span>19.2.2.1 Strings in Component Values<a class="copiable-link" href="#Strings-in-Component-Values-1"> &para;</a></span></h4>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Strings.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Strings (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Strings (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Strings (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Sequences.html" rel="next" title="Sequences">
+<link href="Arrays.html" rel="prev" title="Arrays">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Strings">
+<div class="nav-panel">
+<p>
+Next: <a href="Sequences.html" accesskey="n" rel="next">Sequences</a>, Previous: <a href="Arrays.html" accesskey="p" rel="prev">Arrays</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Strings-1"><span>16 Strings<a class="copiable-link" href="#Strings-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="String-Concepts.html" accesskey="1">String Concepts</a></li>
+<li><a href="Strings-Dictionary.html" accesskey="2">Strings Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Structures-Dictionary.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Structures Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Structures Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Structures Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Structures.html" rel="up" title="Structures">
+<link href="Structures.html" rel="prev" title="Structures">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Structures-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Structures.html" accesskey="p" rel="prev">Structures</a>, Up: <a href="Structures.html" accesskey="u" rel="up">Structures</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Structures-Dictionary-1"><span>8.1 Structures Dictionary<a class="copiable-link" href="#Structures-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="defstruct.html" accesskey="1">defstruct                                                           [Macro]</a></li>
+<li><a href="copy_002dstructure.html" accesskey="2">copy-structure                                                   [Function]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Structures.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Structures (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Structures (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Structures (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Conditions.html" rel="next" title="Conditions">
+<link href="Objects.html" rel="prev" title="Objects">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Structures">
+<div class="nav-panel">
+<p>
+Next: <a href="Conditions.html" accesskey="n" rel="next">Conditions</a>, Previous: <a href="Objects.html" accesskey="p" rel="prev">Objects</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Structures-1"><span>8 Structures<a class="copiable-link" href="#Structures-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Structures-Dictionary.html" accesskey="1">Structures Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Subtypes-of-STRING.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Subtypes of STRING (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Subtypes of STRING (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Subtypes of STRING (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="String-Concepts.html" rel="up" title="String Concepts">
+<link href="Implications-of-Strings-Being-Arrays.html" rel="prev" title="Implications of Strings Being Arrays">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Subtypes-of-STRING">
+<div class="nav-panel">
+<p>
+Previous: <a href="Implications-of-Strings-Being-Arrays.html" accesskey="p" rel="prev">Implications of Strings Being Arrays</a>, Up: <a href="String-Concepts.html" accesskey="u" rel="up">String Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Subtypes-of-STRING-1"><span>16.1.2 Subtypes of STRING<a class="copiable-link" href="#Subtypes-of-STRING-1"> &para;</a></span></h4>
+
+<p>All functions that operate on <i class="i">strings</i> 
+will operate on <i class="i">subtypes</i> of <i class="i">string</i> as well.
+</p>
+<p>However,
+the consequences are undefined if a <i class="i">character</i> is inserted into a <i class="i">string</i>
+for which the <i class="i">element type</i> of the <i class="i">string</i> does not include that <i class="i">character</i>.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Summary-of-Conditional-Execution-Clauses.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Summary of Conditional Execution Clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Summary of Conditional Execution Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Summary of Conditional Execution Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-the-Loop-Facility.html" rel="up" title="Overview of the Loop Facility">
+<link href="Summary-of-Miscellaneous-Clauses.html" rel="next" title="Summary of Miscellaneous Clauses">
+<link href="Summary-of-Unconditional-Execution-Clauses.html" rel="prev" title="Summary of Unconditional Execution Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Summary-of-Conditional-Execution-Clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Summary-of-Miscellaneous-Clauses.html" accesskey="n" rel="next">Summary of Miscellaneous Clauses</a>, Previous: <a href="Summary-of-Unconditional-Execution-Clauses.html" accesskey="p" rel="prev">Summary of Unconditional Execution Clauses</a>, Up: <a href="Overview-of-the-Loop-Facility.html" accesskey="u" rel="up">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Summary-of-Conditional-Execution-Clauses-1"><span>6.1.1.12 Summary of Conditional Execution Clauses<a class="copiable-link" href="#Summary-of-Conditional-Execution-Clauses-1"> &para;</a></span></h4>
+
+<p>The <code class="t">if</code> and <code class="t">when</code> constructs take one <i class="i">form</i> as a test 
+and a clause that is executed when the test <i class="i">yields</i> <i class="i">true</i>.
+The clause can be a value accumulation, unconditional, or 
+another conditional clause; it can also be any combination
+of such clauses connected by the <b class="b">loop</b> <code class="t">and</code> keyword.
+</p>
+<p>The <b class="b">loop</b> <code class="t">unless</code> construct is similar to the <b class="b">loop</b> <code class="t">when</code> construct
+except that it complements the test result.
+</p>
+<p>The <b class="b">loop</b> <code class="t">else</code> construct provides an optional component of <code class="t">if</code>,
+<code class="t">when</code>, and <code class="t">unless</code> clauses that is executed 
+     when an <code class="t">if</code> or <code class="t">when</code> test <i class="i">yields</i> <i class="i">false</i>
+  or when an <code class="t">unless</code> test <i class="i">yields</i> <i class="i">true</i>.
+The component is one of the clauses described under <code class="t">if</code>.
+</p>
+<p>The <b class="b">loop</b> <code class="t">end</code> construct provides an optional component to mark the
+end of a conditional clause.
+</p>
+<p>For more information, see <a class="ref" href="Conditional-Execution-Clauses.html">Conditional Execution Clauses</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Summary-of-Loop-Clauses.html
@@ -0,0 +1,45 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Summary of Loop Clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Summary of Loop Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Summary of Loop Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-the-Loop-Facility.html" rel="up" title="Overview of the Loop Facility">
+<link href="Summary-of-Variable-Initialization-and-Stepping-Clauses.html" rel="next" title="Summary of Variable Initialization and Stepping Clauses">
+<link href="Expanding-Loop-Forms.html" rel="prev" title="Expanding Loop Forms">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Summary-of-Loop-Clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Summary-of-Variable-Initialization-and-Stepping-Clauses.html" accesskey="n" rel="next">Summary of Variable Initialization and Stepping Clauses</a>, Previous: <a href="Expanding-Loop-Forms.html" accesskey="p" rel="prev">Expanding Loop Forms</a>, Up: <a href="Overview-of-the-Loop-Facility.html" accesskey="u" rel="up">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Summary-of-Loop-Clauses-1"><span>6.1.1.7 Summary of Loop Clauses<a class="copiable-link" href="#Summary-of-Loop-Clauses-1"> &para;</a></span></h4>
+
+<p>Loop clauses fall into one of the following categories:
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Summary-of-Miscellaneous-Clauses.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Summary of Miscellaneous Clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Summary of Miscellaneous Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Summary of Miscellaneous Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-the-Loop-Facility.html" rel="up" title="Overview of the Loop Facility">
+<link href="Order-of-Execution.html" rel="next" title="Order of Execution">
+<link href="Summary-of-Conditional-Execution-Clauses.html" rel="prev" title="Summary of Conditional Execution Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Summary-of-Miscellaneous-Clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Order-of-Execution.html" accesskey="n" rel="next">Order of Execution</a>, Previous: <a href="Summary-of-Conditional-Execution-Clauses.html" accesskey="p" rel="prev">Summary of Conditional Execution Clauses</a>, Up: <a href="Overview-of-the-Loop-Facility.html" accesskey="u" rel="up">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Summary-of-Miscellaneous-Clauses-1"><span>6.1.1.13 Summary of Miscellaneous Clauses<a class="copiable-link" href="#Summary-of-Miscellaneous-Clauses-1"> &para;</a></span></h4>
+
+<p>The <b class="b">loop</b> <code class="t">named</code> construct gives a name for the <i class="i">block</i> of the loop.
+</p>
+<p>The <b class="b">loop</b> <code class="t">initially</code> construct causes its <i class="i">forms</i> to be
+evaluated in the loop prologue, which precedes all <b class="b">loop</b> code
+except for initial settings supplied by the constructs <code class="t">with</code>,
+<code class="t">for</code>, or <code class="t">as</code>.
+</p>
+<p>The <b class="b">loop</b> <code class="t">finally</code> construct causes its <i class="i">forms</i> to
+be evaluated in the loop epilogue after normal iteration terminates.
+</p>
+<p>For more information, see <a class="ref" href="Miscellaneous-Clauses.html">Miscellaneous Clauses</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Summary-of-Termination-Test-Clauses.html
@@ -0,0 +1,88 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Summary of Termination Test Clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Summary of Termination Test Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Summary of Termination Test Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-the-Loop-Facility.html" rel="up" title="Overview of the Loop Facility">
+<link href="Summary-of-Unconditional-Execution-Clauses.html" rel="next" title="Summary of Unconditional Execution Clauses">
+<link href="Summary-of-Value-Accumulation-Clauses.html" rel="prev" title="Summary of Value Accumulation Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Summary-of-Termination-Test-Clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Summary-of-Unconditional-Execution-Clauses.html" accesskey="n" rel="next">Summary of Unconditional Execution Clauses</a>, Previous: <a href="Summary-of-Value-Accumulation-Clauses.html" accesskey="p" rel="prev">Summary of Value Accumulation Clauses</a>, Up: <a href="Overview-of-the-Loop-Facility.html" accesskey="u" rel="up">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Summary-of-Termination-Test-Clauses-1"><span>6.1.1.10 Summary of Termination Test Clauses<a class="copiable-link" href="#Summary-of-Termination-Test-Clauses-1"> &para;</a></span></h4>
+
+<p>The <code class="t">for</code> and <code class="t">as</code> constructs provide a termination test
+that is determined by the iteration control clause.
+</p>
+<p>The <code class="t">repeat</code> construct causes termination after a specified
+number of iterations.
+(It uses an internal variable to keep track of the number of iterations.)
+</p>
+<p>The <code class="t">while</code> construct takes one <i class="i">form</i>, a <i class="i">test</i>, 
+and terminates the iteration if the <i class="i">test</i> evaluates to <i class="i">false</i>.
+A <code class="t">while</code> clause is equivalent to the expression 
+<code class="t">(if (not <i class="i">test</i>) (loop-finish))</code>.
+</p>
+<p>The <code class="t">until</code> construct is the inverse of <code class="t">while</code>;
+it terminates the iteration if the <i class="i">test</i> evaluates to
+any <i class="i">non-nil</i> value.
+An <code class="t">until</code> clause is equivalent to the expression
+<code class="t">(if <i class="i">test</i> (loop-finish))</code>.
+</p>
+<p>The <code class="t">always</code> construct takes one <i class="i">form</i> and
+terminates the <b class="b">loop</b> if the <i class="i">form</i> ever evaluates to <i class="i">false</i>;
+in this case, the <b class="b">loop</b> <i class="i">form</i> returns <b class="b">nil</b>.
+Otherwise, it provides a default return value of <b class="b">t</b>.
+</p>
+<p>The <code class="t">never</code> construct takes one <i class="i">form</i> and
+terminates the <b class="b">loop</b> if the <i class="i">form</i> ever evaluates to <i class="i">true</i>;
+in this case, the <b class="b">loop</b> <i class="i">form</i> returns <b class="b">nil</b>.
+Otherwise, it provides a default return value of <b class="b">t</b>.
+</p>
+<p>The <code class="t">thereis</code> construct takes one <i class="i">form</i> and
+terminates the <b class="b">loop</b> if the <i class="i">form</i> ever evaluates to
+a <i class="i">non-nil</i> <i class="i">object</i>;
+in this case, the <b class="b">loop</b> <i class="i">form</i> returns that <i class="i">object</i>.
+</p>
+<p>Otherwise, it provides a default return value of <b class="b">nil</b>.
+</p>
+<p>If multiple termination test clauses are specified, 
+the <b class="b">loop</b> <i class="i">form</i> terminates if any are satisfied.
+</p>
+<p>For more information, see <a class="ref" href="Termination-Test-Clauses.html">Termination Test Clauses</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Summary-of-Unconditional-Execution-Clauses.html">Summary of Unconditional Execution Clauses</a>, Previous: <a href="Summary-of-Value-Accumulation-Clauses.html">Summary of Value Accumulation Clauses</a>, Up: <a href="Overview-of-the-Loop-Facility.html">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Summary-of-Unconditional-Execution-Clauses.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Summary of Unconditional Execution Clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Summary of Unconditional Execution Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Summary of Unconditional Execution Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-the-Loop-Facility.html" rel="up" title="Overview of the Loop Facility">
+<link href="Summary-of-Conditional-Execution-Clauses.html" rel="next" title="Summary of Conditional Execution Clauses">
+<link href="Summary-of-Termination-Test-Clauses.html" rel="prev" title="Summary of Termination Test Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Summary-of-Unconditional-Execution-Clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Summary-of-Conditional-Execution-Clauses.html" accesskey="n" rel="next">Summary of Conditional Execution Clauses</a>, Previous: <a href="Summary-of-Termination-Test-Clauses.html" accesskey="p" rel="prev">Summary of Termination Test Clauses</a>, Up: <a href="Overview-of-the-Loop-Facility.html" accesskey="u" rel="up">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Summary-of-Unconditional-Execution-Clauses-1"><span>6.1.1.11 Summary of Unconditional Execution Clauses<a class="copiable-link" href="#Summary-of-Unconditional-Execution-Clauses-1"> &para;</a></span></h4>
+
+<p>The <code class="t">do</code> (or <code class="t">doing</code>) construct evaluates all <i class="i">forms</i> in its clause.
+</p>
+<p>The <code class="t">return</code> construct takes one 
+</p>
+<p><i class="i">form</i>. Any <i class="i">values</i> returned by the <i class="i">form</i> are
+  immediately returned by the <b class="b">loop</b> form.
+   It is equivalent to the clause
+   <code class="t">do (return-from <i class="i">block-name</i> <i class="i">value</i>)</code>,
+   where <i class="i">block-name</i> is the name specified in a <code class="t">named</code>
+   clause, or <b class="b">nil</b> if there is no <code class="t">named</code> clause.
+</p>
+<p>For more information, see <a class="ref" href="Unconditional-Execution-Clauses.html">Unconditional Execution Clauses</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Summary-of-Value-Accumulation-Clauses.html
@@ -0,0 +1,89 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Summary of Value Accumulation Clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Summary of Value Accumulation Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Summary of Value Accumulation Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-the-Loop-Facility.html" rel="up" title="Overview of the Loop Facility">
+<link href="Summary-of-Termination-Test-Clauses.html" rel="next" title="Summary of Termination Test Clauses">
+<link href="Summary-of-Variable-Initialization-and-Stepping-Clauses.html" rel="prev" title="Summary of Variable Initialization and Stepping Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Summary-of-Value-Accumulation-Clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Summary-of-Termination-Test-Clauses.html" accesskey="n" rel="next">Summary of Termination Test Clauses</a>, Previous: <a href="Summary-of-Variable-Initialization-and-Stepping-Clauses.html" accesskey="p" rel="prev">Summary of Variable Initialization and Stepping Clauses</a>, Up: <a href="Overview-of-the-Loop-Facility.html" accesskey="u" rel="up">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Summary-of-Value-Accumulation-Clauses-1"><span>6.1.1.9 Summary of Value Accumulation Clauses<a class="copiable-link" href="#Summary-of-Value-Accumulation-Clauses-1"> &para;</a></span></h4>
+
+<p>The <code class="t">collect</code> (or <code class="t">collecting</code>) construct
+takes one <i class="i">form</i> in its clause
+and adds the value of that <i class="i">form</i> to the end of a <i class="i">list</i> 
+of values.  By default, the <i class="i">list</i> of values is returned 
+when the <b class="b">loop</b> finishes.
+</p>
+<p>The <code class="t">append</code> (or <code class="t">appending</code>) construct 
+takes one <i class="i">form</i> in its clause
+and appends the value of that <i class="i">form</i> to the end of a <i class="i">list</i>
+of values.  By default, the <i class="i">list</i> of values is returned when the 
+<b class="b">loop</b> finishes.
+</p>
+<p>The <code class="t">nconc</code> (or <code class="t">nconcing</code>) construct 
+is similar to the <code class="t">append</code> construct,  
+but its <i class="i">list</i> values are concatenated as if by the function
+<code class="t">nconc</code>.  By default, the <i class="i">list</i> of values is returned when 
+the <b class="b">loop</b> finishes.
+</p>
+<p>The <code class="t">sum</code> (or <code class="t">summing</code>) construct 
+takes one <i class="i">form</i> in its clause 
+that must evaluate to a <i class="i">number</i> and accumulates the sum of all these
+<i class="i">numbers</i>.  By default, the cumulative sum is returned when the
+<b class="b">loop</b> finishes.
+</p>
+<p>The <code class="t">count</code> (or <code class="t">counting</code>) construct 
+takes one <i class="i">form</i> in its clause 
+and counts the number of times that the <i class="i">form</i> evaluates to <i class="i">true</i>.
+By default, the count is returned when the <b class="b">loop</b> finishes.
+</p>
+<p>The <code class="t">minimize</code> (or <code class="t">minimizing</code>) construct
+takes one <i class="i">form</i> in its clause 
+and determines the minimum value obtained by evaluating that <i class="i">form</i>.
+By default, the minimum value is returned when the <b class="b">loop</b> finishes.
+</p>
+<p>The <code class="t">maximize</code> (or <code class="t">maximizing</code>) construct
+takes one <i class="i">form</i> in its clause 
+and determines the maximum value obtained by evaluating that <i class="i">form</i>.
+By default, the maximum value is returned when the <b class="b">loop</b> finishes.
+</p>
+<p>For more information, see <a class="ref" href="Value-Accumulation-Clauses.html">Value Accumulation Clauses</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Summary-of-Termination-Test-Clauses.html">Summary of Termination Test Clauses</a>, Previous: <a href="Summary-of-Variable-Initialization-and-Stepping-Clauses.html">Summary of Variable Initialization and Stepping Clauses</a>, Up: <a href="Overview-of-the-Loop-Facility.html">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Summary-of-Variable-Initialization-and-Stepping-Clauses.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Summary of Variable Initialization and Stepping Clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Summary of Variable Initialization and Stepping Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Summary of Variable Initialization and Stepping Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Overview-of-the-Loop-Facility.html" rel="up" title="Overview of the Loop Facility">
+<link href="Summary-of-Value-Accumulation-Clauses.html" rel="next" title="Summary of Value Accumulation Clauses">
+<link href="Summary-of-Loop-Clauses.html" rel="prev" title="Summary of Loop Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Summary-of-Variable-Initialization-and-Stepping-Clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Summary-of-Value-Accumulation-Clauses.html" accesskey="n" rel="next">Summary of Value Accumulation Clauses</a>, Previous: <a href="Summary-of-Loop-Clauses.html" accesskey="p" rel="prev">Summary of Loop Clauses</a>, Up: <a href="Overview-of-the-Loop-Facility.html" accesskey="u" rel="up">Overview of the Loop Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Summary-of-Variable-Initialization-and-Stepping-Clauses-1"><span>6.1.1.8 Summary of Variable Initialization and Stepping Clauses<a class="copiable-link" href="#Summary-of-Variable-Initialization-and-Stepping-Clauses-1"> &para;</a></span></h4>
+
+<p>The <code class="t">for</code> and <code class="t">as</code> constructs provide iteration control clauses
+that establish a variable to be initialized.
+<code class="t">for</code> and <code class="t">as</code> clauses can be combined with the loop
+keyword <code class="t">and</code> to get <i class="i">parallel</i> initialization and <i class="i">stepping</i>_1.
+Otherwise, the initialization and <i class="i">stepping</i>_1 are <i class="i">sequential</i>.
+</p>
+<p>The <code class="t">with</code> construct is similar to a single <b class="b">let</b> clause.
+<code class="t">with</code> clauses can be combined using the <i class="i">loop keyword</i> <code class="t">and</code>
+to get <i class="i">parallel</i> initialization.
+</p>
+<p>For more information, see <a class="ref" href="Variable-Initialization-and-Stepping-Clauses.html">Variable Initialization and Stepping Clauses</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Suppressing-Keyword-Argument-Checking.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Suppressing Keyword Argument Checking (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Suppressing Keyword Argument Checking (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Suppressing Keyword Argument Checking (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Ordinary-Lambda-Lists.html" rel="up" title="Ordinary Lambda Lists">
+<link href="Examples-of-Suppressing-Keyword-Argument-Checking.html" rel="next" title="Examples of Suppressing Keyword Argument Checking">
+<link href="Specifiers-for-keyword-parameters.html" rel="prev" title="Specifiers for keyword parameters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Suppressing-Keyword-Argument-Checking">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Suppressing-Keyword-Argument-Checking.html" accesskey="n" rel="next">Examples of Suppressing Keyword Argument Checking</a>, Previous: <a href="Specifiers-for-keyword-parameters.html" accesskey="p" rel="prev">Specifiers for keyword parameters</a>, Up: <a href="Ordinary-Lambda-Lists.html" accesskey="u" rel="up">Ordinary Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Suppressing-Keyword-Argument-Checking-1"><span>3.4.1.5 Suppressing Keyword Argument Checking<a class="copiable-link" href="#Suppressing-Keyword-Argument-Checking-1"> &para;</a></span></h4>
+
+<p>If <b class="b">&amp;allow-other-keys</b> was specified in the <i class="i">lambda list</i> of a <i class="i">function</i>,
+<i class="i">keyword</i>_2 <i class="i">argument</i> checking is suppressed in calls
+to that <i class="i">function</i>.
+</p>
+<p>If the <code class="t">:allow-other-keys</code> <i class="i">argument</i> is <i class="i">true</i> in a call to a <i class="i">function</i>,
+<i class="i">keyword</i>_2 <i class="i">argument</i> checking is suppressed 
+in that call.
+</p>
+<p>The <code class="t">:allow-other-keys</code> <i class="i">argument</i> is permissible in all situations involving
+<i class="i">keyword</i>_2 <i class="i">arguments</i>, even when its associated <i class="i">value</i>
+is <i class="i">false</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Symbol-Concepts.html
@@ -0,0 +1,68 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Symbol Concepts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Symbol Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Symbol Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols.html" rel="up" title="Symbols">
+<link href="Symbols-Dictionary.html" rel="next" title="Symbols Dictionary">
+<link href="Symbols.html" rel="prev" title="Symbols">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Symbol-Concepts">
+<div class="nav-panel">
+<p>
+Next: <a href="Symbols-Dictionary.html" accesskey="n" rel="next">Symbols Dictionary</a>, Previous: <a href="Symbols.html" accesskey="p" rel="prev">Symbols</a>, Up: <a href="Symbols.html" accesskey="u" rel="up">Symbols</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Symbol-Concepts-1"><span>10.1 Symbol Concepts<a class="copiable-link" href="#Symbol-Concepts-1"> &para;</a></span></h3>
+
+
+<p>Figure 10&ndash;1 lists some
+<i class="i">defined names</i> that are applicable to the <i class="i">property lists</i> of <i class="i">symbols</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  get  remprop  symbol-plist  <!-- /@w -->
+
+  Figure 10&ndash;1: Property list defined names<!-- /@w -->
+
+</pre></div></div>
+
+<p>Figure 10&ndash;2 lists some <i class="i">defined names</i> that are applicable 
+to the creation of and inquiry about <i class="i">symbols</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  copy-symbol  keywordp     symbol-package  <!-- /@w -->
+  gensym       make-symbol  symbol-value    <!-- /@w -->
+  gentemp      symbol-name                  <!-- /@w -->
+
+  Figure 10&ndash;2: Symbol creation and inquiry defined names<!-- /@w -->
+
+</pre></div></div>
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Symbol-Macros-as-Places.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Symbol Macros as Places (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Symbol Macros as Places (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Symbol Macros as Places (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Kinds-of-Places.html" rel="up" title="Kinds of Places">
+<link href="Other-Compound-Forms-as-Places.html" rel="next" title="Other Compound Forms as Places">
+<link href="Macro-Forms-as-Places.html" rel="prev" title="Macro Forms as Places">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Symbol-Macros-as-Places">
+<div class="nav-panel">
+<p>
+Next: <a href="Other-Compound-Forms-as-Places.html" accesskey="n" rel="next">Other Compound Forms as Places</a>, Previous: <a href="Macro-Forms-as-Places.html" accesskey="p" rel="prev">Macro Forms as Places</a>, Up: <a href="Kinds-of-Places.html" accesskey="u" rel="up">Kinds of Places</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Symbol-Macros-as-Places-1"><span>5.1.2.8 Symbol Macros as Places<a class="copiable-link" href="#Symbol-Macros-as-Places-1"> &para;</a></span></h4>
+
+<p>A reference to a <i class="i">symbol</i> that has been <i class="i">established</i> as a <i class="i">symbol macro</i> 
+can be used as a <i class="i">place</i>.  In this case,
+<b class="b">setf</b> expands the reference and then analyzes the resulting <i class="i">form</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Symbols-Dictionary.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Symbols Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Symbols Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Symbols Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols.html" rel="up" title="Symbols">
+<link href="Symbol-Concepts.html" rel="prev" title="Symbol Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Symbols-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Symbol-Concepts.html" accesskey="p" rel="prev">Symbol Concepts</a>, Up: <a href="Symbols.html" accesskey="u" rel="up">Symbols</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Symbols-Dictionary-1"><span>10.2 Symbols Dictionary<a class="copiable-link" href="#Symbols-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="symbol.html" accesskey="1">symbol                                                       [System Class]</a></li>
+<li><a href="keyword.html" accesskey="2">keyword                                                              [Type]</a></li>
+<li><a href="symbolp.html" accesskey="3">symbolp                                                          [Function]</a></li>
+<li><a href="keywordp.html" accesskey="4">keywordp                                                         [Function]</a></li>
+<li><a href="make_002dsymbol.html" accesskey="5">make-symbol                                                      [Function]</a></li>
+<li><a href="copy_002dsymbol.html" accesskey="6">copy-symbol                                                      [Function]</a></li>
+<li><a href="gensym.html" accesskey="7">gensym                                                           [Function]</a></li>
+<li><a href="_002agensym_002dcounter_002a.html" accesskey="8">*gensym-counter*                                                 [Variable]</a></li>
+<li><a href="gentemp.html" accesskey="9">gentemp                                                          [Function]</a></li>
+<li><a href="symbol_002dfunction.html">symbol-function                                                  [Accessor]</a></li>
+<li><a href="symbol_002dname.html">symbol-name                                                      [Function]</a></li>
+<li><a href="symbol_002dpackage.html">symbol-package                                                   [Function]</a></li>
+<li><a href="symbol_002dplist.html">symbol-plist                                                     [Accessor]</a></li>
+<li><a href="symbol_002dvalue.html">symbol-value                                                     [Accessor]</a></li>
+<li><a href="get.html">get                                                              [Accessor]</a></li>
+<li><a href="remprop.html">remprop                                                          [Function]</a></li>
+<li><a href="boundp.html">boundp                                                           [Function]</a></li>
+<li><a href="makunbound.html">makunbound                                                       [Function]</a></li>
+<li><a href="set.html">set                                                              [Function]</a></li>
+<li><a href="unbound_002dvariable.html">unbound-variable                                           [Condition Type]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Symbols-Naming-Both-Lexical-and-Dynamic-Variables.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Symbols Naming Both Lexical and Dynamic Variables (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Symbols Naming Both Lexical and Dynamic Variables (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Symbols Naming Both Lexical and Dynamic Variables (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Evaluation-Model.html" rel="up" title="The Evaluation Model">
+<link href="Conses-as-Forms.html" rel="next" title="Conses as Forms">
+<link href="Constant-Variables.html" rel="prev" title="Constant Variables">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Symbols-Naming-Both-Lexical-and-Dynamic-Variables">
+<div class="nav-panel">
+<p>
+Next: <a href="Conses-as-Forms.html" accesskey="n" rel="next">Conses as Forms</a>, Previous: <a href="Constant-Variables.html" accesskey="p" rel="prev">Constant Variables</a>, Up: <a href="The-Evaluation-Model.html" accesskey="u" rel="up">The Evaluation Model</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Symbols-Naming-Both-Lexical-and-Dynamic-Variables-1"><span>3.1.2.6 Symbols Naming Both Lexical and Dynamic Variables<a class="copiable-link" href="#Symbols-Naming-Both-Lexical-and-Dynamic-Variables-1"> &para;</a></span></h4>
+
+<p>The same <i class="i">symbol</i> can name both 
+    a <i class="i">lexical variable</i> 
+and a <i class="i">dynamic variable</i>,
+but never in the same <i class="i">lexical environment</i>.
+</p>
+<p>In the following example, the <i class="i">symbol</i> <code class="t">x</code> is used,
+at different times, 
+    as the <i class="i">name</i> of a <i class="i">lexical variable</i>
+and as the <i class="i">name</i> of a <i class="i">dynamic variable</i>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((x 1))            ;Binds a special variable X
+   (declare (special x))
+   (let ((x 2))          ;Binds a lexical variable X
+     (+ x                ;Reads a lexical variable X
+        (locally (declare (special x))
+                 x))))   ;Reads a special variable X
+&rArr;  3
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Symbols-as-Forms.html
@@ -0,0 +1,106 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Symbols as Forms (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Symbols as Forms (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Symbols as Forms (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-Evaluation-Model.html" rel="up" title="The Evaluation Model">
+<link href="Lexical-Variables.html" rel="next" title="Lexical Variables">
+<link href="Form-Evaluation.html" rel="prev" title="Form Evaluation">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Symbols-as-Forms">
+<div class="nav-panel">
+<p>
+Next: <a href="Lexical-Variables.html" accesskey="n" rel="next">Lexical Variables</a>, Previous: <a href="Form-Evaluation.html" accesskey="p" rel="prev">Form Evaluation</a>, Up: <a href="The-Evaluation-Model.html" accesskey="u" rel="up">The Evaluation Model</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Symbols-as-Forms-1"><span>3.1.2.2 Symbols as Forms<a class="copiable-link" href="#Symbols-as-Forms-1"> &para;</a></span></h4>
+
+<p>If a <i class="i">form</i> is a <i class="i">symbol</i>,
+then it is either a <i class="i">symbol macro</i> or a <i class="i">variable</i>.
+</p>
+<p>The <i class="i">symbol</i> names a <i class="i">symbol macro</i> 
+if there is a <i class="i">binding</i> of the <i class="i">symbol</i> as a <i class="i">symbol macro</i>
+in the current <i class="i">lexical environment</i> 
+</p>
+<p>(see <b class="b">define-symbol-macro</b> and <b class="b">symbol-macrolet</b>).
+</p>
+<p>If the <i class="i">symbol</i> is a <i class="i">symbol macro</i>,
+its expansion function is obtained.
+The expansion function is a function of two arguments, and is invoked
+by calling the <i class="i">macroexpand hook</i> with 
+     the expansion function as its first argument,
+     the <i class="i">symbol</i> as its second argument,
+ and an <i class="i">environment object</i> (corresponding to the current <i class="i">lexical environment</i>)
+      as its third argument.
+The <i class="i">macroexpand hook</i>, in turn, calls the expansion function with the
+<i class="i">form</i> as its first argument and the <i class="i">environment</i> as its second argument.
+The <i class="i">value</i> of the expansion function, which is passed through
+by the <i class="i">macroexpand hook</i>, is a <i class="i">form</i>. 
+This resulting <i class="i">form</i> is processed in place of the original <i class="i">symbol</i>.
+</p>
+<p>If a <i class="i">form</i> is a <i class="i">symbol</i> that is not a <i class="i">symbol macro</i>,
+then it is the <i class="i">name</i> of a <i class="i">variable</i>, and the <i class="i">value</i> of that
+<i class="i">variable</i> is returned. There are three kinds of variables:
+ <i class="i">lexical variables</i>,
+ <i class="i">dynamic variables</i>,
+and
+ <i class="i">constant variables</i>.
+A <i class="i">variable</i> can store one <i class="i">object</i>.
+The main operations on a <i class="i">variable</i> are 
+ to <i class="i">read</i>_1 and 
+ to <i class="i">write</i>_1
+its <i class="i">value</i>.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">unbound-variable</b> should be signaled if
+an <i class="i">unbound variable</i> is referenced.
+</p>
+<p><i class="i">Non-constant variables</i> can be <i class="i">assigned</i> by using <b class="b">setq</b> 
+or <i class="i">bound</i>_3 by using <b class="b">let</b>.
+Figure 3&ndash;1 lists some <i class="i">defined names</i> that
+are applicable to assigning, binding, and defining <i class="i">variables</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  boundp        let                  progv         <!-- /@w -->
+  defconstant   let*                 psetq         <!-- /@w -->
+  defparameter  makunbound           set           <!-- /@w -->
+  defvar        multiple-value-bind  setq          <!-- /@w -->
+  lambda        multiple-value-setq  symbol-value  <!-- /@w -->
+
+  Figure 3&ndash;1: Some Defined Names Applicable to Variables<!-- /@w -->
+
+</pre></div></div>
+
+<p>The following is a description of each kind of variable.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Lexical-Variables.html">Lexical Variables</a>, Previous: <a href="Form-Evaluation.html">Form Evaluation</a>, Up: <a href="The-Evaluation-Model.html">The Evaluation Model</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Symbols-as-Tokens.html
@@ -0,0 +1,128 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Symbols as Tokens (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Symbols as Tokens (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Symbols as Tokens (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpretation-of-Tokens.html" rel="up" title="Interpretation of Tokens">
+<link href="Valid-Patterns-for-Tokens.html" rel="next" title="Valid Patterns for Tokens">
+<link href="The-Consing-Dot.html" rel="prev" title="The Consing Dot">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Symbols-as-Tokens">
+<div class="nav-panel">
+<p>
+Next: <a href="Valid-Patterns-for-Tokens.html" accesskey="n" rel="next">Valid Patterns for Tokens</a>, Previous: <a href="The-Consing-Dot.html" accesskey="p" rel="prev">The Consing Dot</a>, Up: <a href="Interpretation-of-Tokens.html" accesskey="u" rel="up">Interpretation of Tokens</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Symbols-as-Tokens-1"><span>2.3.4 Symbols as Tokens<a class="copiable-link" href="#Symbols-as-Tokens-1"> &para;</a></span></h4>
+
+<p>Any <i class="i">token</i> that is not a <i class="i">potential number</i>,
+does not contain a <i class="i">package marker</i>,
+and does not consist entirely of dots
+will always be interpreted as a <i class="i">symbol</i>.
+Any <i class="i">token</i> that is a <i class="i">potential number</i> but does not fit the       
+number syntax is a reserved <i class="i">token</i> and
+has an <i class="i">implementation-dependent</i> interpretation.
+In all other cases, the <i class="i">token</i> is construed to be the name of a <i class="i">symbol</i>.
+</p>
+<p>Examples of the printed representation of <i class="i">symbols</i> are in Figure 2&ndash;15. 
+For presentational simplicity,
+these examples assume that
+the <i class="i">readtable case</i> of the <i class="i">current readtable</i> is <code class="t">:upcase</code>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">FROBBOZ</code>         The <i class="i">symbol</i> whose <i class="i">name</i> is <code class="t">FROBBOZ</code>.                <!-- /@w -->
+  <code class="t">frobboz</code>         Another way to notate the same <i class="i">symbol</i>.           <!-- /@w -->
+  <code class="t">fRObBoz</code>         Yet another way to notate it.                    <!-- /@w -->
+  <code class="t">unwind-protect</code>  A <i class="i">symbol</i> with a hyphen in its <i class="i">name</i>.              <!-- /@w -->
+  <code class="t">+$</code>             The <i class="i">symbol</i> named <code class="t">+$</code>.                            <!-- /@w -->
+  <code class="t">1+</code>              The <i class="i">symbol</i> named <code class="t">1+</code>.                             <!-- /@w -->
+  <code class="t">+1</code>              This is the <i class="i">integer</i> <code class="t">1</code>, not a <i class="i">symbol</i>.             <!-- /@w -->
+  <code class="t">pascal_style</code>    This <i class="i">symbol</i> has an underscore in its <i class="i">name</i>.       <!-- /@w -->
+  <code class="t">file.rel.43</code>     This <i class="i">symbol</i> has periods in its <i class="i">name</i>.             <!-- /@w -->
+  <code class="t">\(</code>              The <i class="i">symbol</i> whose <i class="i">name</i> is <code class="t">(</code>.                      <!-- /@w -->
+  <code class="t">\+1</code>             The <i class="i">symbol</i> whose <i class="i">name</i> is <code class="t">+1</code>.                     <!-- /@w -->
+  <code class="t">+\1</code>             Also the <i class="i">symbol</i> whose <i class="i">name</i> is <code class="t">+1</code>.                <!-- /@w -->
+  <code class="t">\frobboz</code>        The <i class="i">symbol</i> whose <i class="i">name</i> is <code class="t">fROBBOZ</code>.                <!-- /@w -->
+  <code class="t">3.14159265\s0</code>   The <i class="i">symbol</i> whose <i class="i">name</i> is <code class="t">3.14159265s0</code>.           <!-- /@w -->
+  <code class="t">3.14159265\S0</code>   A different <i class="i">symbol</i>, whose <i class="i">name</i> is <code class="t">3.14159265S0</code>.  <!-- /@w -->
+  <code class="t">3.14159265s0</code>    A possible <i class="i">short float</i> approximation to \pi.     <!-- /@w -->
+
+  Figure 2&ndash;15: Examples of the printed representation of symbols (Part 1 of 2)<!-- /@w -->
+
+</pre></div></div>
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">APL\\360</code>               The <i class="i">symbol</i> whose <i class="i">name</i> is <code class="t">APL\360</code>.       <!-- /@w -->
+  <code class="t">apl\\360</code>               Also the <i class="i">symbol</i> whose <i class="i">name</i> is <code class="t">APL\360</code>.  <!-- /@w -->
+  <code class="t">\(b<code class="t">^</code>2\)\ -\ 4*a<code class="t">*c</code></code>    The <i class="i">name</i> is <code class="t">(B<code class="t">^</code>2) - 4*A*C</code>.            <!-- /@w -->
+                         Parentheses and two spaces in it.       <!-- /@w -->
+  <code class="t">\(\b<code class="t">^</code>2\)\ -\4*\a*\c</code>  The <i class="i">name</i> is <code class="t">(b<code class="t">^</code>2) - 4*a*c</code>.            <!-- /@w -->
+                         Letters explicitly lowercase.           <!-- /@w -->
+  <code class="t">|&quot;|</code>                    The same as writing <code class="t">\&quot;</code>.                 <!-- /@w -->
+  <code class="t">|(b<code class="t">^</code>2) - 4*a*c|</code>      The <i class="i">name</i> is <code class="t">(b<code class="t">^</code>2) - 4*a*c</code>.            <!-- /@w -->
+  <code class="t">|frobboz|</code>              The <i class="i">name</i> is <code class="t">frobboz</code>, not <code class="t">FROBBOZ</code>.       <!-- /@w -->
+  <code class="t">|APL\360|</code>              The <i class="i">name</i> is <code class="t">APL360</code>.                     <!-- /@w -->
+  <code class="t">|APL\\360|</code>             The <i class="i">name</i> is <code class="t">APL\360</code>.                    <!-- /@w -->
+  <code class="t">|apl\\360|</code>             The <i class="i">name</i> is <code class="t">apl\360</code>.                    <!-- /@w -->
+  <code class="t">|\|\||</code>                 Same as <code class="t">\|\|</code> &mdash;the <i class="i">name</i> is <code class="t">||</code>.          <!-- /@w -->
+  <code class="t">|(B<code class="t">^</code>2) - 4*A*C|</code>      The <i class="i">name</i> is <code class="t">(B<code class="t">^</code>2) - 4*A*C</code>.            <!-- /@w -->
+                         Parentheses and two spaces in it.       <!-- /@w -->
+  <code class="t">|(b<code class="t">^</code>2) - 4*a*c|</code>      The <i class="i">name</i> is <code class="t">(b<code class="t">^</code>2) - 4*a*c</code>.            <!-- /@w -->
+
+  Figure 2&ndash;16: Examples of the printed representation of symbols (Part 2 of 2)<!-- /@w -->
+
+</pre></div></div>
+
+<p>In the process of parsing a <i class="i">symbol</i>,
+it is <i class="i">implementation-dependent</i> which
+<i class="i">implementation-defined</i> <i class="i">attributes</i> are removed
+from the <i class="i">characters</i> forming a <i class="i">token</i> that represents a <i class="i">symbol</i>.
+</p>
+<p>When parsing the syntax for a <i class="i">symbol</i>,
+the <i class="i">Lisp reader</i> looks up the <i class="i">name</i> of that <i class="i">symbol</i> 
+in the <i class="i">current package</i>.
+This lookup may involve looking in other 
+<i class="i">packages</i> whose <i class="i">external symbols</i>
+are inherited by the <i class="i">current package</i>.  If the name is found,
+the corresponding <i class="i">symbol</i> is returned.  If the name is not found
+(that is, there is no <i class="i">symbol</i> 
+of that name <i class="i">accessible</i> in the <i class="i">current package</i>),
+a new <i class="i">symbol</i> is created and is placed in the <i class="i">current package</i>
+as an <i class="i">internal symbol</i>.  The <i class="i">current package</i> becomes the owner
+(<i class="i">home package</i>) of the <i class="i">symbol</i>, 
+and the <i class="i">symbol</i> becomes interned in the <i class="i">current package</i>.
+If the name is later read again while this same <i class="i">package</i> is
+current, the same <i class="i">symbol</i> will be found and returned.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Valid-Patterns-for-Tokens.html">Valid Patterns for Tokens</a>, Previous: <a href="The-Consing-Dot.html">The Consing Dot</a>, Up: <a href="Interpretation-of-Tokens.html">Interpretation of Tokens</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Symbols-in-a-Package.html
@@ -0,0 +1,43 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Symbols in a Package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Symbols in a Package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Symbols in a Package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Packages.html" rel="up" title="Introduction to Packages">
+<link href="Internal-and-External-Symbols.html" rel="next" title="Internal and External Symbols">
+<link href="Package-Names-and-Nicknames.html" rel="prev" title="Package Names and Nicknames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Symbols-in-a-Package">
+<div class="nav-panel">
+<p>
+Next: <a href="Internal-and-External-Symbols.html" accesskey="n" rel="next">Internal and External Symbols</a>, Previous: <a href="Package-Names-and-Nicknames.html" accesskey="p" rel="prev">Package Names and Nicknames</a>, Up: <a href="Introduction-to-Packages.html" accesskey="u" rel="up">Introduction to Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Symbols-in-a-Package-1"><span>11.1.1.2 Symbols in a Package<a class="copiable-link" href="#Symbols-in-a-Package-1"> &para;</a></span></h4>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Symbols-in-the-COMMON_002dLISP-Package.html
@@ -0,0 +1,592 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Symbols in the COMMON-LISP Package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Symbols in the COMMON-LISP Package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Symbols in the COMMON-LISP Package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-_0028Introduction_0029.html" rel="up" title="Introduction (Introduction)">
+<link href="Deprecated-Language-Features.html" rel="prev" title="Deprecated Language Features">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Symbols-in-the-COMMON_002dLISP-Package">
+<div class="nav-panel">
+<p>
+Previous: <a href="Deprecated-Language-Features.html" accesskey="p" rel="prev">Deprecated Language Features</a>, Up: <a href="Introduction-_0028Introduction_0029.html" accesskey="u" rel="up">Introduction</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Symbols-in-the-COMMON_002dLISP-Package-1"><span>1.9 Symbols in the COMMON-LISP Package<a class="copiable-link" href="#Symbols-in-the-COMMON_002dLISP-Package-1"> &para;</a></span></h3>
+
+
+<p>The figures on the next twelve pages contain a complete enumeration
+of the 978 <i class="i">external</i> <i class="i">symbols</i> in the <code class="t">COMMON-LISP</code> <i class="i">package</i>.
+<a class="index-entry-id" id="index-common_002dlisp"></a>
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  &amp;allow-other-keys            *print-miser-width*          <!-- /@w -->
+  &amp;aux                         *print-pprint-dispatch*      <!-- /@w -->
+  &amp;body                        *print-pretty*               <!-- /@w -->
+  &amp;environment                 *print-radix*                <!-- /@w -->
+  &amp;key                         *print-readably*             <!-- /@w -->
+  &amp;optional                    *print-right-margin*         <!-- /@w -->
+  &amp;rest                        *query-io*                   <!-- /@w -->
+  &amp;whole                       *random-state*               <!-- /@w -->
+  *                            *read-base*                  <!-- /@w -->
+  **                           *read-default-float-format*  <!-- /@w -->
+  ***                          *read-eval*                  <!-- /@w -->
+  *break-on-signals*           *read-suppress*              <!-- /@w -->
+  *compile-file-pathname*      *readtable*                  <!-- /@w -->
+  *compile-file-truename*      *standard-input*             <!-- /@w -->
+  *compile-print*              *standard-output*            <!-- /@w -->
+  *compile-verbose*            *terminal-io*                <!-- /@w -->
+  *debug-io*                   *trace-output*               <!-- /@w -->
+  *debugger-hook*              +                            <!-- /@w -->
+  *default-pathname-defaults*  ++                           <!-- /@w -->
+  *error-output*               +++                          <!-- /@w -->
+  *features*                   -                            <!-- /@w -->
+  *gensym-counter*             /                            <!-- /@w -->
+  *load-pathname*              //                           <!-- /@w -->
+  *load-print*                 ///                          <!-- /@w -->
+  *load-truename*              /=                           <!-- /@w -->
+  *load-verbose*               1+                           <!-- /@w -->
+  *macroexpand-hook*           1-                           <!-- /@w -->
+  *modules*                    &lt;                            <!-- /@w -->
+  *package*                    &lt;=                           <!-- /@w -->
+  *print-array*                =                            <!-- /@w -->
+  *print-base*                 &gt;                            <!-- /@w -->
+  *print-case*                 &gt;=                           <!-- /@w -->
+  *print-circle*               abort                        <!-- /@w -->
+  *print-escape*               abs                          <!-- /@w -->
+  *print-gensym*               acons                        <!-- /@w -->
+  *print-length*               acos                         <!-- /@w -->
+  *print-level*                acosh                        <!-- /@w -->
+  *print-lines*                add-method                   <!-- /@w -->
+
+  Figure 1&ndash;4: Symbols in the COMMON-LISP package (part one of twelve).<!-- /@w -->
+
+</pre></div></div>
+
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  adjoin                      atom          boundp                    <!-- /@w -->
+  adjust-array                base-char     break                     <!-- /@w -->
+  adjustable-array-p          base-string   broadcast-stream          <!-- /@w -->
+  allocate-instance           bignum        broadcast-stream-streams  <!-- /@w -->
+  alpha-char-p                bit           built-in-class            <!-- /@w -->
+  alphanumericp               bit-and       butlast                   <!-- /@w -->
+  and                         bit-andc1     byte                      <!-- /@w -->
+  append                      bit-andc2     byte-position             <!-- /@w -->
+  apply                       bit-eqv       byte-size                 <!-- /@w -->
+  apropos                     bit-ior       caaaar                    <!-- /@w -->
+  apropos-list                bit-nand      caaadr                    <!-- /@w -->
+  aref                        bit-nor       caaar                     <!-- /@w -->
+  arithmetic-error            bit-not       caadar                    <!-- /@w -->
+  arithmetic-error-operands   bit-orc1      caaddr                    <!-- /@w -->
+  arithmetic-error-operation  bit-orc2      caadr                     <!-- /@w -->
+  array                       bit-vector    caar                      <!-- /@w -->
+  array-dimension             bit-vector-p  cadaar                    <!-- /@w -->
+  array-dimension-limit       bit-xor       cadadr                    <!-- /@w -->
+  array-dimensions            block         cadar                     <!-- /@w -->
+  array-displacement          boole         caddar                    <!-- /@w -->
+  array-element-type          boole-1       cadddr                    <!-- /@w -->
+  array-has-fill-pointer-p    boole-2       caddr                     <!-- /@w -->
+  array-in-bounds-p           boole-and     cadr                      <!-- /@w -->
+  array-rank                  boole-andc1   call-arguments-limit      <!-- /@w -->
+  array-rank-limit            boole-andc2   call-method               <!-- /@w -->
+  array-row-major-index       boole-c1      call-next-method          <!-- /@w -->
+  array-total-size            boole-c2      car                       <!-- /@w -->
+  array-total-size-limit      boole-clr     case                      <!-- /@w -->
+  arrayp                      boole-eqv     catch                     <!-- /@w -->
+  ash                         boole-ior     ccase                     <!-- /@w -->
+  asin                        boole-nand    cdaaar                    <!-- /@w -->
+  asinh                       boole-nor     cdaadr                    <!-- /@w -->
+  assert                      boole-orc1    cdaar                     <!-- /@w -->
+  assoc                       boole-orc2    cdadar                    <!-- /@w -->
+  assoc-if                    boole-set     cdaddr                    <!-- /@w -->
+  assoc-if-not                boole-xor     cdadr                     <!-- /@w -->
+  atan                        boolean       cdar                      <!-- /@w -->
+  atanh                       both-case-p   cddaar                    <!-- /@w -->
+
+  Figure 1&ndash;5: Symbols in the COMMON-LISP package (part two of twelve).<!-- /@w -->
+
+</pre></div></div>
+
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  cddadr             clear-input                  copy-tree                  <!-- /@w -->
+  cddar              clear-output                 cos                        <!-- /@w -->
+  cdddar             close                        cosh                       <!-- /@w -->
+  cddddr             clrhash                      count                      <!-- /@w -->
+  cdddr              code-char                    count-if                   <!-- /@w -->
+  cddr               coerce                       count-if-not               <!-- /@w -->
+  cdr                compilation-speed            ctypecase                  <!-- /@w -->
+  ceiling            compile                      debug                      <!-- /@w -->
+  cell-error         compile-file                 decf                       <!-- /@w -->
+  cell-error-name    compile-file-pathname        declaim                    <!-- /@w -->
+  cerror             compiled-function            declaration                <!-- /@w -->
+  change-class       compiled-function-p          declare                    <!-- /@w -->
+  char               compiler-macro               decode-float               <!-- /@w -->
+  char-code          compiler-macro-function      decode-universal-time      <!-- /@w -->
+  char-code-limit    complement                   defclass                   <!-- /@w -->
+  char-downcase      complex                      defconstant                <!-- /@w -->
+  char-equal         complexp                     defgeneric                 <!-- /@w -->
+  char-greaterp      compute-applicable-methods   define-compiler-macro      <!-- /@w -->
+  char-int           compute-restarts             define-condition           <!-- /@w -->
+  char-lessp         concatenate                  define-method-combination  <!-- /@w -->
+  char-name          concatenated-stream          define-modify-macro        <!-- /@w -->
+  char-not-equal     concatenated-stream-streams  define-setf-expander       <!-- /@w -->
+  char-not-greaterp  cond                         define-symbol-macro        <!-- /@w -->
+  char-not-lessp     condition                    defmacro                   <!-- /@w -->
+  char-upcase        conjugate                    defmethod                  <!-- /@w -->
+  char/=             cons                         defpackage                 <!-- /@w -->
+  char&lt;              consp                        defparameter               <!-- /@w -->
+  char&lt;=             constantly                   defsetf                    <!-- /@w -->
+  char=              constantp                    defstruct                  <!-- /@w -->
+  char&gt;              continue                     deftype                    <!-- /@w -->
+  char&gt;=             control-error                defun                      <!-- /@w -->
+  character          copy-alist                   defvar                     <!-- /@w -->
+  characterp         copy-list                    delete                     <!-- /@w -->
+  check-type         copy-pprint-dispatch         delete-duplicates          <!-- /@w -->
+  cis                copy-readtable               delete-file                <!-- /@w -->
+  class              copy-seq                     delete-if                  <!-- /@w -->
+  class-name         copy-structure               delete-if-not              <!-- /@w -->
+  class-of           copy-symbol                  delete-package             <!-- /@w -->
+
+    Figure 1&ndash;6: Symbols in the COMMON-LISP package (part three of twelve).  <!-- /@w -->
+
+</pre></div></div>
+
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  denominator                    eq                   <!-- /@w -->
+  deposit-field                  eql                  <!-- /@w -->
+  describe                       equal                <!-- /@w -->
+  describe-object                equalp               <!-- /@w -->
+  destructuring-bind             error                <!-- /@w -->
+  digit-char                     etypecase            <!-- /@w -->
+  digit-char-p                   eval                 <!-- /@w -->
+  directory                      eval-when            <!-- /@w -->
+  directory-namestring           evenp                <!-- /@w -->
+  disassemble                    every                <!-- /@w -->
+  division-by-zero               exp                  <!-- /@w -->
+  do                             export               <!-- /@w -->
+  do*                            expt                 <!-- /@w -->
+  do-all-symbols                 extended-char        <!-- /@w -->
+  do-external-symbols            fboundp              <!-- /@w -->
+  do-symbols                     fceiling             <!-- /@w -->
+  documentation                  fdefinition          <!-- /@w -->
+  dolist                         ffloor               <!-- /@w -->
+  dotimes                        fifth                <!-- /@w -->
+  double-float                   file-author          <!-- /@w -->
+  double-float-epsilon           file-error           <!-- /@w -->
+  double-float-negative-epsilon  file-error-pathname  <!-- /@w -->
+  dpb                            file-length          <!-- /@w -->
+  dribble                        file-namestring      <!-- /@w -->
+  dynamic-extent                 file-position        <!-- /@w -->
+  ecase                          file-stream          <!-- /@w -->
+  echo-stream                    file-string-length   <!-- /@w -->
+  echo-stream-input-stream       file-write-date      <!-- /@w -->
+  echo-stream-output-stream      fill                 <!-- /@w -->
+  ed                             fill-pointer         <!-- /@w -->
+  eighth                         find                 <!-- /@w -->
+  elt                            find-all-symbols     <!-- /@w -->
+  encode-universal-time          find-class           <!-- /@w -->
+  end-of-file                    find-if              <!-- /@w -->
+  endp                           find-if-not          <!-- /@w -->
+  enough-namestring              find-method          <!-- /@w -->
+  ensure-directories-exist       find-package         <!-- /@w -->
+  ensure-generic-function        find-restart         <!-- /@w -->
+
+  Figure 1&ndash;7: Symbols in the COMMON-LISP package (part four of twelve).<!-- /@w -->
+
+</pre></div></div>
+
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  find-symbol                       get-internal-run-time        <!-- /@w -->
+  finish-output                     get-macro-character          <!-- /@w -->
+  first                             get-output-stream-string     <!-- /@w -->
+  fixnum                            get-properties               <!-- /@w -->
+  flet                              get-setf-expansion           <!-- /@w -->
+  float                             get-universal-time           <!-- /@w -->
+  float-digits                      getf                         <!-- /@w -->
+  float-precision                   gethash                      <!-- /@w -->
+  float-radix                       go                           <!-- /@w -->
+  float-sign                        graphic-char-p               <!-- /@w -->
+  floating-point-inexact            handler-bind                 <!-- /@w -->
+  floating-point-invalid-operation  handler-case                 <!-- /@w -->
+  floating-point-overflow           hash-table                   <!-- /@w -->
+  floating-point-underflow          hash-table-count             <!-- /@w -->
+  floatp                            hash-table-p                 <!-- /@w -->
+  floor                             hash-table-rehash-size       <!-- /@w -->
+  fmakunbound                       hash-table-rehash-threshold  <!-- /@w -->
+  force-output                      hash-table-size              <!-- /@w -->
+  format                            hash-table-test              <!-- /@w -->
+  formatter                         host-namestring              <!-- /@w -->
+  fourth                            identity                     <!-- /@w -->
+  fresh-line                        if                           <!-- /@w -->
+  fround                            ignorable                    <!-- /@w -->
+  ftruncate                         ignore                       <!-- /@w -->
+  ftype                             ignore-errors                <!-- /@w -->
+  funcall                           imagpart                     <!-- /@w -->
+  function                          import                       <!-- /@w -->
+  function-keywords                 in-package                   <!-- /@w -->
+  function-lambda-expression        incf                         <!-- /@w -->
+  functionp                         initialize-instance          <!-- /@w -->
+  gcd                               inline                       <!-- /@w -->
+  generic-function                  input-stream-p               <!-- /@w -->
+  gensym                            inspect                      <!-- /@w -->
+  gentemp                           integer                      <!-- /@w -->
+  get                               integer-decode-float         <!-- /@w -->
+  get-decoded-time                  integer-length               <!-- /@w -->
+  get-dispatch-macro-character      integerp                     <!-- /@w -->
+  get-internal-real-time            interactive-stream-p         <!-- /@w -->
+
+  Figure 1&ndash;8: Symbols in the COMMON-LISP package (part five of twelve).<!-- /@w -->
+
+</pre></div></div>
+
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  intern                                  lisp-implementation-type            <!-- /@w -->
+  internal-time-units-per-second          lisp-implementation-version         <!-- /@w -->
+  intersection                            list                                <!-- /@w -->
+  invalid-method-error                    list*                               <!-- /@w -->
+  invoke-debugger                         list-all-packages                   <!-- /@w -->
+  invoke-restart                          list-length                         <!-- /@w -->
+  invoke-restart-interactively            listen                              <!-- /@w -->
+  isqrt                                   listp                               <!-- /@w -->
+  keyword                                 load                                <!-- /@w -->
+  keywordp                                load-logical-pathname-translations  <!-- /@w -->
+  labels                                  load-time-value                     <!-- /@w -->
+  lambda                                  locally                             <!-- /@w -->
+  lambda-list-keywords                    log                                 <!-- /@w -->
+  lambda-parameters-limit                 logand                              <!-- /@w -->
+  last                                    logandc1                            <!-- /@w -->
+  lcm                                     logandc2                            <!-- /@w -->
+  ldb                                     logbitp                             <!-- /@w -->
+  ldb-test                                logcount                            <!-- /@w -->
+  ldiff                                   logeqv                              <!-- /@w -->
+  least-negative-double-float             logical-pathname                    <!-- /@w -->
+  least-negative-long-float               logical-pathname-translations       <!-- /@w -->
+  least-negative-normalized-double-float  logior                              <!-- /@w -->
+  least-negative-normalized-long-float    lognand                             <!-- /@w -->
+  least-negative-normalized-short-float   lognor                              <!-- /@w -->
+  least-negative-normalized-single-float  lognot                              <!-- /@w -->
+  least-negative-short-float              logorc1                             <!-- /@w -->
+  least-negative-single-float             logorc2                             <!-- /@w -->
+  least-positive-double-float             logtest                             <!-- /@w -->
+  least-positive-long-float               logxor                              <!-- /@w -->
+  least-positive-normalized-double-float  long-float                          <!-- /@w -->
+  least-positive-normalized-long-float    long-float-epsilon                  <!-- /@w -->
+  least-positive-normalized-short-float   long-float-negative-epsilon         <!-- /@w -->
+  least-positive-normalized-single-float  long-site-name                      <!-- /@w -->
+  least-positive-short-float              loop                                <!-- /@w -->
+  least-positive-single-float             loop-finish                         <!-- /@w -->
+  length                                  lower-case-p                        <!-- /@w -->
+  let                                     machine-instance                    <!-- /@w -->
+  let*                                    machine-type                        <!-- /@w -->
+
+     Figure 1&ndash;9: Symbols in the COMMON-LISP package (part six of twelve).    <!-- /@w -->
+
+</pre></div></div>
+
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  machine-version                mask-field                  <!-- /@w -->
+  macro-function                 max                         <!-- /@w -->
+  macroexpand                    member                      <!-- /@w -->
+  macroexpand-1                  member-if                   <!-- /@w -->
+  macrolet                       member-if-not               <!-- /@w -->
+  make-array                     merge                       <!-- /@w -->
+  make-broadcast-stream          merge-pathnames             <!-- /@w -->
+  make-concatenated-stream       method                      <!-- /@w -->
+  make-condition                 method-combination          <!-- /@w -->
+  make-dispatch-macro-character  method-combination-error    <!-- /@w -->
+  make-echo-stream               method-qualifiers           <!-- /@w -->
+  make-hash-table                min                         <!-- /@w -->
+  make-instance                  minusp                      <!-- /@w -->
+  make-instances-obsolete        mismatch                    <!-- /@w -->
+  make-list                      mod                         <!-- /@w -->
+  make-load-form                 most-negative-double-float  <!-- /@w -->
+  make-load-form-saving-slots    most-negative-fixnum        <!-- /@w -->
+  make-method                    most-negative-long-float    <!-- /@w -->
+  make-package                   most-negative-short-float   <!-- /@w -->
+  make-pathname                  most-negative-single-float  <!-- /@w -->
+  make-random-state              most-positive-double-float  <!-- /@w -->
+  make-sequence                  most-positive-fixnum        <!-- /@w -->
+  make-string                    most-positive-long-float    <!-- /@w -->
+  make-string-input-stream       most-positive-short-float   <!-- /@w -->
+  make-string-output-stream      most-positive-single-float  <!-- /@w -->
+  make-symbol                    muffle-warning              <!-- /@w -->
+  make-synonym-stream            multiple-value-bind         <!-- /@w -->
+  make-two-way-stream            multiple-value-call         <!-- /@w -->
+  makunbound                     multiple-value-list         <!-- /@w -->
+  map                            multiple-value-prog1        <!-- /@w -->
+  map-into                       multiple-value-setq         <!-- /@w -->
+  mapc                           multiple-values-limit       <!-- /@w -->
+  mapcan                         name-char                   <!-- /@w -->
+  mapcar                         namestring                  <!-- /@w -->
+  mapcon                         nbutlast                    <!-- /@w -->
+  maphash                        nconc                       <!-- /@w -->
+  mapl                           next-method-p               <!-- /@w -->
+  maplist                        nil                         <!-- /@w -->
+
+  Figure 1&ndash;10: Symbols in the COMMON-LISP package (part seven of twelve).<!-- /@w -->
+
+</pre></div></div>
+
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  nintersection         package-error                  <!-- /@w -->
+  ninth                 package-error-package          <!-- /@w -->
+  no-applicable-method  package-name                   <!-- /@w -->
+  no-next-method        package-nicknames              <!-- /@w -->
+  not                   package-shadowing-symbols      <!-- /@w -->
+  notany                package-use-list               <!-- /@w -->
+  notevery              package-used-by-list           <!-- /@w -->
+  notinline             packagep                       <!-- /@w -->
+  nreconc               pairlis                        <!-- /@w -->
+  nreverse              parse-error                    <!-- /@w -->
+  nset-difference       parse-integer                  <!-- /@w -->
+  nset-exclusive-or     parse-namestring               <!-- /@w -->
+  nstring-capitalize    pathname                       <!-- /@w -->
+  nstring-downcase      pathname-device                <!-- /@w -->
+  nstring-upcase        pathname-directory             <!-- /@w -->
+  nsublis               pathname-host                  <!-- /@w -->
+  nsubst                pathname-match-p               <!-- /@w -->
+  nsubst-if             pathname-name                  <!-- /@w -->
+  nsubst-if-not         pathname-type                  <!-- /@w -->
+  nsubstitute           pathname-version               <!-- /@w -->
+  nsubstitute-if        pathnamep                      <!-- /@w -->
+  nsubstitute-if-not    peek-char                      <!-- /@w -->
+  nth                   phase                          <!-- /@w -->
+  nth-value             pi                             <!-- /@w -->
+  nthcdr                plusp                          <!-- /@w -->
+  null                  pop                            <!-- /@w -->
+  number                position                       <!-- /@w -->
+  numberp               position-if                    <!-- /@w -->
+  numerator             position-if-not                <!-- /@w -->
+  nunion                pprint                         <!-- /@w -->
+  oddp                  pprint-dispatch                <!-- /@w -->
+  open                  pprint-exit-if-list-exhausted  <!-- /@w -->
+  open-stream-p         pprint-fill                    <!-- /@w -->
+  optimize              pprint-indent                  <!-- /@w -->
+  or                    pprint-linear                  <!-- /@w -->
+  otherwise             pprint-logical-block           <!-- /@w -->
+  output-stream-p       pprint-newline                 <!-- /@w -->
+  package               pprint-pop                     <!-- /@w -->
+
+  Figure 1&ndash;11: Symbols in the COMMON-LISP package (part eight of twelve).<!-- /@w -->
+
+</pre></div></div>
+
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  pprint-tab                 read-char                   <!-- /@w -->
+  pprint-tabular             read-char-no-hang           <!-- /@w -->
+  prin1                      read-delimited-list         <!-- /@w -->
+  prin1-to-string            read-from-string            <!-- /@w -->
+  princ                      read-line                   <!-- /@w -->
+  princ-to-string            read-preserving-whitespace  <!-- /@w -->
+  print                      read-sequence               <!-- /@w -->
+  print-not-readable         reader-error                <!-- /@w -->
+  print-not-readable-object  readtable                   <!-- /@w -->
+  print-object               readtable-case              <!-- /@w -->
+  print-unreadable-object    readtablep                  <!-- /@w -->
+  probe-file                 real                        <!-- /@w -->
+  proclaim                   realp                       <!-- /@w -->
+  prog                       realpart                    <!-- /@w -->
+  prog*                      reduce                      <!-- /@w -->
+  prog1                      reinitialize-instance       <!-- /@w -->
+  prog2                      rem                         <!-- /@w -->
+  progn                      remf                        <!-- /@w -->
+  program-error              remhash                     <!-- /@w -->
+  progv                      remove                      <!-- /@w -->
+  provide                    remove-duplicates           <!-- /@w -->
+  psetf                      remove-if                   <!-- /@w -->
+  psetq                      remove-if-not               <!-- /@w -->
+  push                       remove-method               <!-- /@w -->
+  pushnew                    remprop                     <!-- /@w -->
+  quote                      rename-file                 <!-- /@w -->
+  random                     rename-package              <!-- /@w -->
+  random-state               replace                     <!-- /@w -->
+  random-state-p             require                     <!-- /@w -->
+  rassoc                     rest                        <!-- /@w -->
+  rassoc-if                  restart                     <!-- /@w -->
+  rassoc-if-not              restart-bind                <!-- /@w -->
+  ratio                      restart-case                <!-- /@w -->
+  rational                   restart-name                <!-- /@w -->
+  rationalize                return                      <!-- /@w -->
+  rationalp                  return-from                 <!-- /@w -->
+  read                       revappend                   <!-- /@w -->
+  read-byte                  reverse                     <!-- /@w -->
+
+  Figure 1&ndash;12: Symbols in the COMMON-LISP package (part nine of twelve).<!-- /@w -->
+
+</pre></div></div>
+
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  room                          simple-bit-vector                  <!-- /@w -->
+  rotatef                       simple-bit-vector-p                <!-- /@w -->
+  round                         simple-condition                   <!-- /@w -->
+  row-major-aref                simple-condition-format-arguments  <!-- /@w -->
+  rplaca                        simple-condition-format-control    <!-- /@w -->
+  rplacd                        simple-error                       <!-- /@w -->
+  safety                        simple-string                      <!-- /@w -->
+  satisfies                     simple-string-p                    <!-- /@w -->
+  sbit                          simple-type-error                  <!-- /@w -->
+  scale-float                   simple-vector                      <!-- /@w -->
+  schar                         simple-vector-p                    <!-- /@w -->
+  search                        simple-warning                     <!-- /@w -->
+  second                        sin                                <!-- /@w -->
+  sequence                      single-float                       <!-- /@w -->
+  serious-condition             single-float-epsilon               <!-- /@w -->
+  set                           single-float-negative-epsilon      <!-- /@w -->
+  set-difference                sinh                               <!-- /@w -->
+  set-dispatch-macro-character  sixth                              <!-- /@w -->
+  set-exclusive-or              sleep                              <!-- /@w -->
+  set-macro-character           slot-boundp                        <!-- /@w -->
+  set-pprint-dispatch           slot-exists-p                      <!-- /@w -->
+  set-syntax-from-char          slot-makunbound                    <!-- /@w -->
+  setf                          slot-missing                       <!-- /@w -->
+  setq                          slot-unbound                       <!-- /@w -->
+  seventh                       slot-value                         <!-- /@w -->
+  shadow                        software-type                      <!-- /@w -->
+  shadowing-import              software-version                   <!-- /@w -->
+  shared-initialize             some                               <!-- /@w -->
+  shiftf                        sort                               <!-- /@w -->
+  short-float                   space                              <!-- /@w -->
+  short-float-epsilon           special                            <!-- /@w -->
+  short-float-negative-epsilon  special-operator-p                 <!-- /@w -->
+  short-site-name               speed                              <!-- /@w -->
+  signal                        sqrt                               <!-- /@w -->
+  signed-byte                   stable-sort                        <!-- /@w -->
+  signum                        standard                           <!-- /@w -->
+  simple-array                  standard-char                      <!-- /@w -->
+  simple-base-string            standard-char-p                    <!-- /@w -->
+
+  Figure 1&ndash;13: Symbols in the COMMON-LISP package (part ten of twelve).<!-- /@w -->
+
+</pre></div></div>
+
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  standard-class             sublis                      <!-- /@w -->
+  standard-generic-function  subseq                      <!-- /@w -->
+  standard-method            subsetp                     <!-- /@w -->
+  standard-object            subst                       <!-- /@w -->
+  step                       subst-if                    <!-- /@w -->
+  storage-condition          subst-if-not                <!-- /@w -->
+  store-value                substitute                  <!-- /@w -->
+  stream                     substitute-if               <!-- /@w -->
+  stream-element-type        substitute-if-not           <!-- /@w -->
+  stream-error               subtypep                    <!-- /@w -->
+  stream-error-stream        svref                       <!-- /@w -->
+  stream-external-format     sxhash                      <!-- /@w -->
+  streamp                    symbol                      <!-- /@w -->
+  string                     symbol-function             <!-- /@w -->
+  string-capitalize          symbol-macrolet             <!-- /@w -->
+  string-downcase            symbol-name                 <!-- /@w -->
+  string-equal               symbol-package              <!-- /@w -->
+  string-greaterp            symbol-plist                <!-- /@w -->
+  string-left-trim           symbol-value                <!-- /@w -->
+  string-lessp               symbolp                     <!-- /@w -->
+  string-not-equal           synonym-stream              <!-- /@w -->
+  string-not-greaterp        synonym-stream-symbol       <!-- /@w -->
+  string-not-lessp           t                           <!-- /@w -->
+  string-right-trim          tagbody                     <!-- /@w -->
+  string-stream              tailp                       <!-- /@w -->
+  string-trim                tan                         <!-- /@w -->
+  string-upcase              tanh                        <!-- /@w -->
+  string/=                   tenth                       <!-- /@w -->
+  string&lt;                    terpri                      <!-- /@w -->
+  string&lt;=                   the                         <!-- /@w -->
+  string=                    third                       <!-- /@w -->
+  string&gt;                    throw                       <!-- /@w -->
+  string&gt;=                   time                        <!-- /@w -->
+  stringp                    trace                       <!-- /@w -->
+  structure                  translate-logical-pathname  <!-- /@w -->
+  structure-class            translate-pathname          <!-- /@w -->
+  structure-object           tree-equal                  <!-- /@w -->
+  style-warning              truename                    <!-- /@w -->
+
+  Figure 1&ndash;14: Symbols in the COMMON-LISP package (part eleven of twelve).<!-- /@w -->
+
+</pre></div></div>
+
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  truncate                             values-list               <!-- /@w -->
+  two-way-stream                       variable                  <!-- /@w -->
+  two-way-stream-input-stream          vector                    <!-- /@w -->
+  two-way-stream-output-stream         vector-pop                <!-- /@w -->
+  type                                 vector-push               <!-- /@w -->
+  type-error                           vector-push-extend        <!-- /@w -->
+  type-error-datum                     vectorp                   <!-- /@w -->
+  type-error-expected-type             warn                      <!-- /@w -->
+  type-of                              warning                   <!-- /@w -->
+  typecase                             when                      <!-- /@w -->
+  typep                                wild-pathname-p           <!-- /@w -->
+  unbound-slot                         with-accessors            <!-- /@w -->
+  unbound-slot-instance                with-compilation-unit     <!-- /@w -->
+  unbound-variable                     with-condition-restarts   <!-- /@w -->
+  undefined-function                   with-hash-table-iterator  <!-- /@w -->
+  unexport                             with-input-from-string    <!-- /@w -->
+  unintern                             with-open-file            <!-- /@w -->
+  union                                with-open-stream          <!-- /@w -->
+  unless                               with-output-to-string     <!-- /@w -->
+  unread-char                          with-package-iterator     <!-- /@w -->
+  unsigned-byte                        with-simple-restart       <!-- /@w -->
+  untrace                              with-slots                <!-- /@w -->
+  unuse-package                        with-standard-io-syntax   <!-- /@w -->
+  unwind-protect                       write                     <!-- /@w -->
+  update-instance-for-different-class  write-byte                <!-- /@w -->
+  update-instance-for-redefined-class  write-char                <!-- /@w -->
+  upgraded-array-element-type          write-line                <!-- /@w -->
+  upgraded-complex-part-type           write-sequence            <!-- /@w -->
+  upper-case-p                         write-string              <!-- /@w -->
+  use-package                          write-to-string           <!-- /@w -->
+  use-value                            y-or-n-p                  <!-- /@w -->
+  user-homedir-pathname                yes-or-no-p               <!-- /@w -->
+  values                               zerop                     <!-- /@w -->
+
+  Figure 1&ndash;15: Symbols in the COMMON-LISP package (part twelve of twelve).<!-- /@w -->
+
+</pre></div></div>
+
+
+
+
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Deprecated-Language-Features.html">Deprecated Language Features</a>, Up: <a href="Introduction-_0028Introduction_0029.html">Introduction</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Symbols.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Symbols (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Symbols (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Symbols (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Packages.html" rel="next" title="Packages">
+<link href="Conditions.html" rel="prev" title="Conditions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Symbols">
+<div class="nav-panel">
+<p>
+Next: <a href="Packages.html" accesskey="n" rel="next">Packages</a>, Previous: <a href="Conditions.html" accesskey="p" rel="prev">Conditions</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Symbols-1"><span>10 Symbols<a class="copiable-link" href="#Symbols-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Symbol-Concepts.html" accesskey="1">Symbol Concepts</a></li>
+<li><a href="Symbols-Dictionary.html" accesskey="2">Symbols Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Syntactic-Interaction-of-Documentation-Strings-and-Declarations.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Syntactic Interaction of Documentation Strings and Declarations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Syntactic Interaction of Documentation Strings and Declarations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Syntactic Interaction of Documentation Strings and Declarations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Lambda-Lists.html" rel="up" title="Lambda Lists">
+<link href="Define_002dmethod_002dcombination-Arguments-Lambda-Lists.html" rel="prev" title="Define-method-combination Arguments Lambda Lists">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Syntactic-Interaction-of-Documentation-Strings-and-Declarations">
+<div class="nav-panel">
+<p>
+Previous: <a href="Define_002dmethod_002dcombination-Arguments-Lambda-Lists.html" accesskey="p" rel="prev">Define-method-combination Arguments Lambda Lists</a>, Up: <a href="Lambda-Lists.html" accesskey="u" rel="up">Lambda Lists</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Syntactic-Interaction-of-Documentation-Strings-and-Declarations-1"><span>3.4.11 Syntactic Interaction of Documentation Strings and Declarations<a class="copiable-link" href="#Syntactic-Interaction-of-Documentation-Strings-and-Declarations-1"> &para;</a></span></h4>
+
+<p>In a number of situations, a <i class="i">documentation string</i> can appear amidst a
+series of <b class="b">declare</b> <i class="i">expressions</i> prior to a series of <i class="i">forms</i>.
+</p>
+<p>In that case, if a <i class="i">string</i> S appears where a <i class="i">documentation string</i> is
+permissible and is not followed by 
+  either a <b class="b">declare</b> <i class="i">expression</i> 
+      or a <i class="i">form</i>
+then S is taken to be a <i class="i">form</i>;
+otherwise, S is taken as a <i class="i">documentation string</i>.
+The consequences are unspecified if more than one such <i class="i">documentation string</i> 
+is present.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Syntax-of-Logical-Pathname-Namestrings.html
@@ -0,0 +1,105 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Syntax of Logical Pathname Namestrings (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Syntax of Logical Pathname Namestrings (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Syntax of Logical Pathname Namestrings (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Logical-Pathnames.html" rel="up" title="Logical Pathnames">
+<link href="Logical-Pathname-Components.html" rel="next" title="Logical Pathname Components">
+<link href="Logical-Pathnames.html" rel="prev" title="Logical Pathnames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Syntax-of-Logical-Pathname-Namestrings">
+<div class="nav-panel">
+<p>
+Next: <a href="Logical-Pathname-Components.html" accesskey="n" rel="next">Logical Pathname Components</a>, Previous: <a href="Logical-Pathnames.html" accesskey="p" rel="prev">Logical Pathnames</a>, Up: <a href="Logical-Pathnames.html" accesskey="u" rel="up">Logical Pathnames</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Syntax-of-Logical-Pathname-Namestrings-1"><span>19.3.1 Syntax of Logical Pathname Namestrings<a class="copiable-link" href="#Syntax-of-Logical-Pathname-Namestrings-1"> &para;</a></span></h4>
+
+<p>The syntax of a <i class="i">logical pathname</i> <i class="i">namestring</i> is as follows.
+(Note that unlike many notational descriptions in this document,
+ this is a syntactic description of character sequences,
+ not a structural description of <i class="i">objects</i>.)
+</p>
+<p><i class="i">logical-pathname</i>&nbsp;::=<span class="r">[</span>!<i class="i">host</i>&nbsp;<i class="i">host-marker</i><span class="r">]</span>&nbsp;<!-- /@w -->
+&nbsp;<span class="r">[</span>!<i class="i"><i class="i">relative-directory-marker</i></i><span class="r">]</span>&nbsp;{!<i class="i">directory</i>&nbsp;<i class="i">directory-marker</i>}*&nbsp;<!-- /@w -->
+&nbsp;<span class="r">[</span>!<i class="i">name</i><span class="r">]</span>&nbsp;<span class="r">[</span><i class="i">type-marker</i>&nbsp;!<i class="i">type</i>&nbsp;<span class="r">[</span><i class="i">version-marker</i>&nbsp;!<i class="i">version</i><span class="r">]</span><span class="r">]</span><!-- /@w -->
+</p>
+<p><i class="i">host</i>&nbsp;::=!<i class="i">word</i><!-- /@w -->
+</p>
+<p><i class="i">directory</i>&nbsp;::=!<i class="i">word</i>&nbsp;|&nbsp;!<i class="i">wildcard-word</i>&nbsp;|&nbsp;!<i class="i">wild-inferiors-word</i><!-- /@w -->
+</p>
+<p><i class="i">name</i>&nbsp;::=!<i class="i">word</i>&nbsp;|&nbsp;!<i class="i">wildcard-word</i><!-- /@w -->
+</p>
+<p><i class="i">type</i>&nbsp;::=!<i class="i">word</i>&nbsp;|&nbsp;!<i class="i">wildcard-word</i><!-- /@w -->
+</p>
+<p><i class="i">version</i>&nbsp;::=!<i class="i">pos-int</i>&nbsp;|&nbsp;<i class="i">newest-word</i>&nbsp;|&nbsp;<i class="i">wildcard-version</i><!-- /@w -->
+</p>
+<p><i class="i">host-marker</i>&mdash;a <i class="i">colon</i>.
+</p>
+<p><i class="i">relative-directory-marker</i>&mdash;a <i class="i">semicolon</i>.
+</p>
+<p><i class="i">directory-marker</i>&mdash;a <i class="i">semicolon</i>.
+</p>
+<p><i class="i">type-marker</i>&mdash;a <i class="i">dot</i>.
+</p>
+<p><i class="i">version-marker</i>&mdash;a <i class="i">dot</i>.
+</p>
+<p><i class="i">wild-inferiors-word</i>&mdash;The two character sequence &ldquo;<code class="t">**</code>&rdquo; (two <i class="i">asterisks</i>).
+</p>
+<p><i class="i">newest-word</i>&mdash;The six character sequence &ldquo;<code class="t">newest</code>&rdquo; 
+		   or the six character sequence &ldquo;<code class="t">NEWEST</code>&rdquo;.
+</p>
+<p><i class="i">wildcard-version</i>&mdash;an <i class="i">asterisk</i>.
+</p>
+<p><i class="i">wildcard-word</i>&mdash;one or more <i class="i">asterisks</i>, uppercase letters,
+   digits, and hyphens, including at least one <i class="i">asterisk</i>, 
+   with no two <i class="i">asterisks</i> adjacent.
+</p>
+<p><i class="i">word</i>&mdash;one or more uppercase letters, digits, and hyphens.
+</p>
+<p><i class="i">pos-int</i>&mdash;a positive <i class="i">integer</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Additional-Information-about-Parsing-Logical-Pathname-Namestrings.html" accesskey="1">Additional Information about Parsing Logical Pathname Namestrings</a></li>
+<li><a href="The-Host-part-of-a-Logical-Pathname-Namestring.html" accesskey="2">The Host part of a Logical Pathname Namestring</a></li>
+<li><a href="The-Device-part-of-a-Logical-Pathname-Namestring.html" accesskey="3">The Device part of a Logical Pathname Namestring</a></li>
+<li><a href="The-Directory-part-of-a-Logical-Pathname-Namestring.html" accesskey="4">The Directory part of a Logical Pathname Namestring</a></li>
+<li><a href="The-Type-part-of-a-Logical-Pathname-Namestring.html" accesskey="5">The Type part of a Logical Pathname Namestring</a></li>
+<li><a href="The-Version-part-of-a-Logical-Pathname-Namestring.html" accesskey="6">The Version part of a Logical Pathname Namestring</a></li>
+<li><a href="Wildcard-Words-in-a-Logical-Pathname-Namestring.html" accesskey="7">Wildcard Words in a Logical Pathname Namestring</a></li>
+<li><a href="Lowercase-Letters-in-a-Logical-Pathname-Namestring.html" accesskey="8">Lowercase Letters in a Logical Pathname Namestring</a></li>
+<li><a href="Other-Syntax-in-a-Logical-Pathname-Namestring.html" accesskey="9">Other Syntax in a Logical Pathname Namestring</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Logical-Pathname-Components.html">Logical Pathname Components</a>, Previous: <a href="Logical-Pathnames.html">Logical Pathnames</a>, Up: <a href="Logical-Pathnames.html">Logical Pathnames</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Syntax-of-a-Complex.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Syntax of a Complex (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Syntax of a Complex (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Syntax of a Complex (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Constructing-Numbers-from-Tokens.html" rel="up" title="Constructing Numbers from Tokens">
+<link href="Syntax-of-a-Float.html" rel="prev" title="Syntax of a Float">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Syntax-of-a-Complex">
+<div class="nav-panel">
+<p>
+Previous: <a href="Syntax-of-a-Float.html" accesskey="p" rel="prev">Syntax of a Float</a>, Up: <a href="Constructing-Numbers-from-Tokens.html" accesskey="u" rel="up">Constructing Numbers from Tokens</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Syntax-of-a-Complex-1"><span>2.3.2.5 Syntax of a Complex<a class="copiable-link" href="#Syntax-of-a-Complex-1"> &para;</a></span></h4>
+
+<p>A <i class="i">complex</i> has a Cartesian structure, 
+with a real part and an imaginary part each of which is a 
+</p>
+<p><i class="i">real</i>.
+</p>
+<p>The parts of a <i class="i">complex</i> are not necessarily <i class="i">floats</i> 
+but both parts must be of the same <i class="i">type</i>: 
+</p>
+<p>[Editorial Note by KMP: This is not the same as saying they must be the same type.
+                 Maybe we mean they are of the same &lsquo;precision&rsquo; or &lsquo;format&rsquo;?
+		 GLS had suggestions which are not yet merged.]
+either both are <i class="i">rationals</i>, or both are of the same <i class="i">float</i> <i class="i">subtype</i>.
+When constructing a <i class="i">complex</i>, if the specified parts are not the
+same <i class="i">type</i>, the parts are converted to be the same <i class="i">type</i>
+internally (<i class="i">i.e.</i>, the <i class="i">rational</i> part is converted to a <i class="i">float</i>). 
+An <i class="i">object</i> of type <code class="t">(complex rational)</code> is converted internally
+and represented thereafter as a <i class="i">rational</i> if its imaginary part is an 
+<i class="i">integer</i> whose value is 0.
+</p>
+<p>For further information, see <a class="ref" href="Sharpsign-C.html">Sharpsign C</a> and <a class="ref" href="Printing-Complexes.html">Printing Complexes</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Syntax-of-a-Float.html
@@ -0,0 +1,104 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Syntax of a Float (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Syntax of a Float (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Syntax of a Float (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Constructing-Numbers-from-Tokens.html" rel="up" title="Constructing Numbers from Tokens">
+<link href="Syntax-of-a-Complex.html" rel="next" title="Syntax of a Complex">
+<link href="Syntax-of-a-Ratio.html" rel="prev" title="Syntax of a Ratio">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Syntax-of-a-Float">
+<div class="nav-panel">
+<p>
+Next: <a href="Syntax-of-a-Complex.html" accesskey="n" rel="next">Syntax of a Complex</a>, Previous: <a href="Syntax-of-a-Ratio.html" accesskey="p" rel="prev">Syntax of a Ratio</a>, Up: <a href="Constructing-Numbers-from-Tokens.html" accesskey="u" rel="up">Constructing Numbers from Tokens</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Syntax-of-a-Float-1"><span>2.3.2.4 Syntax of a Float<a class="copiable-link" href="#Syntax-of-a-Float-1"> &para;</a></span></h4>
+
+<p><i class="i">Floats</i> can be written in either decimal fraction or computerized
+scientific notation: an optional sign, then a non-empty sequence of digits
+with an embedded decimal point,
+then an optional decimal exponent specification.
+If there is no exponent specifier, then
+the decimal point is required, and there must be digits
+after it.
+The exponent specifier consists of an <i class="i">exponent marker</i>,
+an optional sign, and a non-empty sequence of digits.
+If no exponent specifier is present, or if the <i class="i">exponent marker</i> <code class="t">e</code>
+(or <code class="t">E</code>) is used, then
+the format specified
+by <b class="b">*read-default-float-format*</b> is used.
+See <i class="i">Figure~2&ndash;9</i>.
+</p>
+<p>An implementation may provide one or more kinds of <i class="i">float</i>
+that collectively make up the <i class="i">type</i> <b class="b">float</b>.
+The letters <code class="t">s</code>, <code class="t">f</code>, <code class="t">d</code>, and <code class="t">l</code> (or their
+respective uppercase equivalents) explicitly specify the
+use of the <i class="i">types</i> <b class="b">short-float</b>, <b class="b">single-float</b>, 
+<b class="b">double-float</b>, and <b class="b">long-float</b>, respectively.
+</p>
+<p>The internal format used for an external representation depends only
+on the <i class="i">exponent marker</i>, and not on the number of decimal digits
+in the external representation.
+</p>
+<p>Figure 2&ndash;14 contains examples of notations for <i class="i">floats</i>: 
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">0.0</code>       ;Floating-point zero in default format                          <!-- /@w -->
+  <code class="t">0E0</code>       ;As input, this is also floating-point zero in default format.  <!-- /@w -->
+            ;As output, this would appear as <code class="t">0.0</code>.                           <!-- /@w -->
+  <code class="t">0e0</code>       ;As input, this is also floating-point zero in default format.  <!-- /@w -->
+            ;As output, this would appear as <code class="t">0.0</code>.                           <!-- /@w -->
+  <code class="t">-.0</code>       ;As input, this might be a zero or a minus zero,                <!-- /@w -->
+            ; depending on whether the implementation supports              <!-- /@w -->
+            ; a distinct minus zero.                                        <!-- /@w -->
+            ;As output, <code class="t">0.0</code> is zero and <code class="t">-0.0</code> is minus zero.                 <!-- /@w -->
+  <code class="t">0.</code>        ;On input, the integer zero&mdash;<i class="i">not</i> a floating-point number!      <!-- /@w -->
+            ;Whether this appears as <code class="t">0</code> or <code class="t">0.</code> on output depends              <!-- /@w -->
+            ;on the <i class="i">value</i> of <b class="b">*print-radix*</b>.                                 <!-- /@w -->
+  <code class="t">0.0s0</code>     ;A floating-point zero in short format                          <!-- /@w -->
+  <code class="t">0s0</code>       ;As input, this is a floating-point zero in short format.       <!-- /@w -->
+            ;As output, such a zero would appear as <code class="t">0.0s0</code>                   <!-- /@w -->
+            ; (or as <code class="t">0.0</code> if <b class="b">short-float</b> was the default format).            <!-- /@w -->
+  <code class="t">6.02E+23</code>  ;Avogadro&rsquo;s number, in default format                           <!-- /@w -->
+  <code class="t">602E+21</code>   ;Also Avogadro&rsquo;s number, in default format                      <!-- /@w -->
+
+               Figure 2&ndash;14: Examples of Floating-point numbers             <!-- /@w -->
+
+</pre></div></div>
+
+<p>For information on how <i class="i">floats</i> are printed,
+see <a class="ref" href="Printing-Floats.html">Printing Floats</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Syntax-of-a-Complex.html">Syntax of a Complex</a>, Previous: <a href="Syntax-of-a-Ratio.html">Syntax of a Ratio</a>, Up: <a href="Constructing-Numbers-from-Tokens.html">Constructing Numbers from Tokens</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Syntax-of-a-Ratio.html
@@ -0,0 +1,72 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Syntax of a Ratio (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Syntax of a Ratio (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Syntax of a Ratio (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Constructing-Numbers-from-Tokens.html" rel="up" title="Constructing Numbers from Tokens">
+<link href="Syntax-of-a-Float.html" rel="next" title="Syntax of a Float">
+<link href="Syntax-of-an-Integer.html" rel="prev" title="Syntax of an Integer">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Syntax-of-a-Ratio">
+<div class="nav-panel">
+<p>
+Next: <a href="Syntax-of-a-Float.html" accesskey="n" rel="next">Syntax of a Float</a>, Previous: <a href="Syntax-of-an-Integer.html" accesskey="p" rel="prev">Syntax of an Integer</a>, Up: <a href="Constructing-Numbers-from-Tokens.html" accesskey="u" rel="up">Constructing Numbers from Tokens</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Syntax-of-a-Ratio-1"><span>2.3.2.3 Syntax of a Ratio<a class="copiable-link" href="#Syntax-of-a-Ratio-1"> &para;</a></span></h4>
+
+<p><i class="i">Ratios</i> can be written as an optional <i class="i">sign</i> followed by two
+non-empty sequences of <i class="i">digits</i> separated by a <i class="i">slash</i>;
+see <i class="i">Figure~2&ndash;9</i>.
+The second sequence may not consist
+entirely of zeros.
+Examples of <i class="i">ratios</i> are in Figure 2&ndash;13.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">2/3</code>                 ;This is in canonical form                  <!-- /@w -->
+  <code class="t">4/6</code>                 ;A non-canonical form for 2/3               <!-- /@w -->
+  <code class="t">-17/23</code>              ;A ratio preceded by a sign                 <!-- /@w -->
+  <code class="t">-30517578125/32768</code>  ;This is (-5/2)^15                        <!-- /@w -->
+  <code class="t">10/5</code>                ;The canonical form for this is <code class="t">2</code>           <!-- /@w -->
+  <code class="t">#o-101/75</code>           ;Octal notation for -65/61                  <!-- /@w -->
+  <code class="t">#3r120/21</code>           ;Ternary notation for 15/7                  <!-- /@w -->
+  <code class="t">#Xbc/ad</code>             ;Hexadecimal notation for 188/173           <!-- /@w -->
+  <code class="t">#xFADED/FACADE</code>      ;Hexadecimal notation for 1027565/16435934  <!-- /@w -->
+
+                  Figure 2&ndash;13: Examples of Ratios                <!-- /@w -->
+
+</pre></div></div>
+
+<p>[Reviewer Note by Barmar: #o, #3r, #X, and #x mentioned above 
+		  are not in the syntax rules defined just above that.]
+</p>
+<p>For information on how <i class="i">ratios</i> are printed,
+see <a class="ref" href="Printing-Ratios.html">Printing Ratios</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Syntax-of-a-Rational.html
@@ -0,0 +1,43 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Syntax of a Rational (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Syntax of a Rational (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Syntax of a Rational (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Constructing-Numbers-from-Tokens.html" rel="up" title="Constructing Numbers from Tokens">
+<link href="Syntax-of-an-Integer.html" rel="next" title="Syntax of an Integer">
+<link href="Constructing-Numbers-from-Tokens.html" rel="prev" title="Constructing Numbers from Tokens">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Syntax-of-a-Rational">
+<div class="nav-panel">
+<p>
+Next: <a href="Syntax-of-an-Integer.html" accesskey="n" rel="next">Syntax of an Integer</a>, Previous: <a href="Constructing-Numbers-from-Tokens.html" accesskey="p" rel="prev">Constructing Numbers from Tokens</a>, Up: <a href="Constructing-Numbers-from-Tokens.html" accesskey="u" rel="up">Constructing Numbers from Tokens</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Syntax-of-a-Rational-1"><span>2.3.2.1 Syntax of a Rational<a class="copiable-link" href="#Syntax-of-a-Rational-1"> &para;</a></span></h4>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Syntax-of-an-Integer.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Syntax of an Integer (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Syntax of an Integer (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Syntax of an Integer (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Constructing-Numbers-from-Tokens.html" rel="up" title="Constructing Numbers from Tokens">
+<link href="Syntax-of-a-Ratio.html" rel="next" title="Syntax of a Ratio">
+<link href="Syntax-of-a-Rational.html" rel="prev" title="Syntax of a Rational">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Syntax-of-an-Integer">
+<div class="nav-panel">
+<p>
+Next: <a href="Syntax-of-a-Ratio.html" accesskey="n" rel="next">Syntax of a Ratio</a>, Previous: <a href="Syntax-of-a-Rational.html" accesskey="p" rel="prev">Syntax of a Rational</a>, Up: <a href="Constructing-Numbers-from-Tokens.html" accesskey="u" rel="up">Constructing Numbers from Tokens</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Syntax-of-an-Integer-1"><span>2.3.2.2 Syntax of an Integer<a class="copiable-link" href="#Syntax-of-an-Integer-1"> &para;</a></span></h4>
+
+<p><i class="i">Integers</i> can be written as a sequence of <i class="i">digits</i>, 
+optionally preceded by a <i class="i">sign</i> and optionally followed by a decimal point;
+see <i class="i">Figure~2&ndash;9</i>.
+When a decimal point is used,
+the <i class="i">digits</i> are taken to be in <i class="i">radix</i> <code class="t">10</code>;
+when no decimal point is used,
+the <i class="i">digits</i> are taken to be in radix given by the <i class="i">current input base</i>.
+</p>
+<p>For information on how <i class="i">integers</i> are printed, see <a class="ref" href="Printing-Integers.html">Printing Integers</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Syntax.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Syntax (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Syntax (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Syntax (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Evaluation-and-Compilation.html" rel="next" title="Evaluation and Compilation">
+<link href="Introduction-_0028Introduction_0029.html" rel="prev" title="Introduction (Introduction)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Syntax">
+<div class="nav-panel">
+<p>
+Next: <a href="Evaluation-and-Compilation.html" accesskey="n" rel="next">Evaluation and Compilation</a>, Previous: <a href="Introduction-_0028Introduction_0029.html" accesskey="p" rel="prev">Introduction</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Syntax-1"><span>2 Syntax<a class="copiable-link" href="#Syntax-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Character-Syntax.html" accesskey="1">Character Syntax</a></li>
+<li><a href="Reader-Algorithm.html" accesskey="2">Reader Algorithm</a></li>
+<li><a href="Interpretation-of-Tokens.html" accesskey="3">Interpretation of Tokens</a></li>
+<li><a href="Standard-Macro-Characters.html" accesskey="4">Standard Macro Characters</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/System-Construction-Concepts.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>System Construction Concepts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="System Construction Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="System Construction Concepts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="System-Construction.html" rel="up" title="System Construction">
+<link href="System-Construction-Dictionary.html" rel="next" title="System Construction Dictionary">
+<link href="System-Construction.html" rel="prev" title="System Construction">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="System-Construction-Concepts">
+<div class="nav-panel">
+<p>
+Next: <a href="System-Construction-Dictionary.html" accesskey="n" rel="next">System Construction Dictionary</a>, Previous: <a href="System-Construction.html" accesskey="p" rel="prev">System Construction</a>, Up: <a href="System-Construction.html" accesskey="u" rel="up">System Construction</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="System-Construction-Concepts-1"><span>24.1 System Construction Concepts<a class="copiable-link" href="#System-Construction-Concepts-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Loading.html" accesskey="1">Loading</a></li>
+<li><a href="Features.html" accesskey="2">Features</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/System-Construction-Dictionary.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>System Construction Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="System Construction Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="System Construction Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="System-Construction.html" rel="up" title="System Construction">
+<link href="System-Construction-Concepts.html" rel="prev" title="System Construction Concepts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="System-Construction-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="System-Construction-Concepts.html" accesskey="p" rel="prev">System Construction Concepts</a>, Up: <a href="System-Construction.html" accesskey="u" rel="up">System Construction</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="System-Construction-Dictionary-1"><span>24.2 System Construction Dictionary<a class="copiable-link" href="#System-Construction-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="compile_002dfile.html" accesskey="1">compile-file                                                     [Function]</a></li>
+<li><a href="compile_002dfile_002dpathname.html" accesskey="2">compile-file-pathname                                            [Function]</a></li>
+<li><a href="load.html" accesskey="3">load                                                             [Function]</a></li>
+<li><a href="with_002dcompilation_002dunit.html" accesskey="4">with-compilation-unit                                               [Macro]</a></li>
+<li><a href="_002afeatures_002a.html" accesskey="5">*features*                                                       [Variable]</a></li>
+<li><a href="_002acompile_002dfile_002dpathname_002a.html" accesskey="6">*compile-file-pathname*, *compile-file-truename*                 [Variable]</a></li>
+<li><a href="_002aload_002dpathname_002a.html" accesskey="7">*load-pathname*, *load-truename*                                 [Variable]</a></li>
+<li><a href="_002acompile_002dprint_002a.html" accesskey="8">*compile-print*, *compile-verbose*                               [Variable]</a></li>
+<li><a href="_002aload_002dprint_002a.html" accesskey="9">*load-print*, *load-verbose*                                     [Variable]</a></li>
+<li><a href="_002amodules_002a.html">*modules*                                                        [Variable]</a></li>
+<li><a href="provide.html">provide, require                                                 [Function]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/System-Construction.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>System Construction (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="System Construction (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="System Construction (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Environment.html" rel="next" title="Environment">
+<link href="Reader.html" rel="prev" title="Reader">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="System-Construction">
+<div class="nav-panel">
+<p>
+Next: <a href="Environment.html" accesskey="n" rel="next">Environment</a>, Previous: <a href="Reader.html" accesskey="p" rel="prev">Reader</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="System-Construction-1"><span>24 System Construction<a class="copiable-link" href="#System-Construction-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="System-Construction-Concepts.html" accesskey="1">System Construction Concepts</a></li>
+<li><a href="System-Construction-Dictionary.html" accesskey="2">System Construction Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/THE-Forms-as-Places.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>THE Forms as Places (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="THE Forms as Places (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="THE Forms as Places (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Kinds-of-Places.html" rel="up" title="Kinds of Places">
+<link href="APPLY-Forms-as-Places.html" rel="next" title="APPLY Forms as Places">
+<link href="VALUES-Forms-as-Places.html" rel="prev" title="VALUES Forms as Places">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="THE-Forms-as-Places">
+<div class="nav-panel">
+<p>
+Next: <a href="APPLY-Forms-as-Places.html" accesskey="n" rel="next">APPLY Forms as Places</a>, Previous: <a href="VALUES-Forms-as-Places.html" accesskey="p" rel="prev">VALUES Forms as Places</a>, Up: <a href="Kinds-of-Places.html" accesskey="u" rel="up">Kinds of Places</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="THE-Forms-as-Places-1"><span>5.1.2.4 THE Forms as Places<a class="copiable-link" href="#THE-Forms-as-Places-1"> &para;</a></span></h4>
+
+<p>A <b class="b">the</b> <i class="i">form</i> can be used as a <i class="i">place</i>,
+in which case the declaration is transferred to the <i class="i">newvalue</i> form,
+and the resulting <b class="b">setf</b> is analyzed.  For example,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setf (the integer (cadr x)) (+ y 3))
+</pre></div>
+
+<p>is processed as if it were
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setf (cadr x) (the integer (+ y 3)))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Termination-Test-Clauses.html
@@ -0,0 +1,180 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Termination Test Clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Termination Test Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Termination Test Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-LOOP-Facility.html" rel="up" title="The LOOP Facility">
+<link href="Unconditional-Execution-Clauses.html" rel="next" title="Unconditional Execution Clauses">
+<link href="Value-Accumulation-Clauses.html" rel="prev" title="Value Accumulation Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Termination-Test-Clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Unconditional-Execution-Clauses.html" accesskey="n" rel="next">Unconditional Execution Clauses</a>, Previous: <a href="Value-Accumulation-Clauses.html" accesskey="p" rel="prev">Value Accumulation Clauses</a>, Up: <a href="The-LOOP-Facility.html" accesskey="u" rel="up">The LOOP Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Termination-Test-Clauses-1"><span>6.1.4 Termination Test Clauses<a class="copiable-link" href="#Termination-Test-Clauses-1"> &para;</a></span></h4>
+
+<p>The <code class="t">repeat</code> construct causes iteration to terminate after a
+specified number of times.
+ The loop body executes <i class="i">n</i> times, where <i class="i">n</i> is the value 
+of the expression <i class="i">form</i>.  The <i class="i">form</i> argument is evaluated one time
+in the loop prologue.  If the expression evaluates to 0 or 
+to a negative <i class="i">number</i>, the loop body is not evaluated.
+</p>
+<p>The constructs <code class="t">always</code>,
+<code class="t">never</code>,
+<code class="t">thereis</code>,
+<code class="t">while</code>,
+<code class="t">until</code>,
+and the macro <b class="b">loop-finish</b>
+allow conditional termination of iteration within
+a <b class="b">loop</b>.
+</p>
+<p>The constructs <code class="t">always</code>, <code class="t">never</code>, and <code class="t">thereis</code> provide
+specific values to be returned when a <b class="b">loop</b> terminates.  
+Using <code class="t">always</code>, <code class="t">never</code>, or <code class="t">thereis</code> in a loop with 
+value accumulation clauses that are not <code class="t">into</code> causes 
+an error of <i class="i">type</i> <b class="b">program-error</b> to be signaled (at macro expansion time).
+Since <code class="t">always</code>, <code class="t">never</code>, and <code class="t">thereis</code>
+use 
+</p>
+<p>the <b class="b">return-from</b> <i class="i">special operator</i>
+</p>
+<p>to terminate iteration,
+any <code class="t">finally</code> clause that is supplied is not evaluated
+when exit occurs due to any of these constructs.
+In all other respects these
+constructs behave like the <code class="t">while</code> and <code class="t">until</code> constructs.
+</p>
+<p>The <code class="t">always</code> construct takes one <i class="i">form</i> and terminates the 
+<b class="b">loop</b>
+  if the <i class="i">form</i> ever evaluates to <b class="b">nil</b>; in this case, it returns
+  <b class="b">nil</b>.  Otherwise, it provides a default return value of <b class="b">t</b>.
+If the value of the supplied <i class="i">form</i> is never <b class="b">nil</b>, some other construct
+can terminate the iteration.
+</p>
+<p>The <code class="t">never</code> construct terminates iteration the first time that
+the value of the supplied <i class="i">form</i> is <i class="i">non-nil</i>; the <b class="b">loop</b> returns 
+<b class="b">nil</b>.                                         
+If the value of the supplied <i class="i">form</i> is always  <b class="b">nil</b>, some other 
+construct can terminate the iteration.  
+Unless some other clause contributes 
+a return value, the default value returned is <b class="b">t</b>.
+</p>
+<p>The <code class="t">thereis</code> construct terminates iteration the first time that the
+value of the supplied <i class="i">form</i> is <i class="i">non-nil</i>; the <b class="b">loop</b> returns the
+value of the supplied <i class="i">form</i>.
+If the value of the supplied <i class="i">form</i> 
+is always  <b class="b">nil</b>, some other
+construct can terminate the iteration.  Unless some other clause contributes a 
+return value, the default value returned is <b class="b">nil</b>.
+</p>
+<p>There are two differences between the <code class="t">thereis</code> and <code class="t">until</code>
+constructs: 
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">until</code> construct does not return a value or 
+<b class="b">nil</b> based on the value of the supplied <i class="i">form</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">until</code> construct executes 
+any <code class="t">finally</code> clause.
+Since <code class="t">thereis</code> uses
+</p>
+<p>the <b class="b">return-from</b> <i class="i">special operator</i>
+</p>
+<p>to terminate iteration,
+any <code class="t">finally</code> clause that is supplied is not evaluated
+when exit occurs due to <code class="t">thereis</code>.
+</p>
+</dd>
+</dl>
+
+<p>The <code class="t">while</code> construct allows iteration to continue until the 
+supplied <i class="i">form</i> 
+evaluates to <i class="i">false</i>.  The supplied <i class="i">form</i> 
+is reevaluated at the location of the <code class="t">while</code> clause.
+</p>
+<p>The <code class="t">until</code> construct is equivalent to 
+<code class="t">while (not <i class="i">form</i>)\dots</code>.  If the value of the
+supplied <i class="i">form</i> is <i class="i">non-nil</i>, iteration terminates.
+</p>
+<p>Termination-test control constructs can be used anywhere within the loop body.
+The termination tests are used in the order in which they appear.
+If an <code class="t">until</code> or <code class="t">while</code> clause causes
+termination, any clauses that precede it in the source
+are still evaluated.  
+If the <code class="t">until</code> and <code class="t">while</code> constructs cause termination,
+control is passed to the loop epilogue, where any <code class="t">finally</code>
+clauses will be executed.  
+</p>
+<p>There are two differences between the <code class="t">never</code> and <code class="t">until</code>
+constructs: 
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">until</code> construct does not return 
+<b class="b">t</b> or <b class="b">nil</b> based on the value of the supplied <i class="i">form</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">until</code> construct 
+does not bypass any <code class="t">finally</code> clauses.
+Since <code class="t">never</code> uses 
+</p>
+<p>the <b class="b">return-from</b> <i class="i">special operator</i>
+</p>
+<p>to terminate iteration,
+any <code class="t">finally</code> clause that is supplied is not evaluated
+when exit occurs due to <code class="t">never</code>. 
+</p></dd>
+</dl>
+
+<p>In most cases it is not necessary to use <b class="b">loop-finish</b>
+because other loop control clauses terminate the <b class="b">loop</b>.  
+The macro <b class="b">loop-finish</b> is used to provide a normal exit
+from a nested conditional inside a <b class="b">loop</b>.
+Since <b class="b">loop-finish</b> transfers control to the loop epilogue,
+using <b class="b">loop-finish</b> within a <code class="t">finally</code> expression can cause
+infinite looping.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Examples-of-REPEAT-clause.html" accesskey="1">Examples of REPEAT clause</a></li>
+<li><a href="Examples-of-ALWAYS.html" accesskey="2">Examples of ALWAYS, NEVER, and THEREIS clauses</a></li>
+<li><a href="Examples-of-WHILE-and-UNTIL-clauses.html" accesskey="3">Examples of WHILE and UNTIL clauses</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Unconditional-Execution-Clauses.html">Unconditional Execution Clauses</a>, Previous: <a href="Value-Accumulation-Clauses.html">Value Accumulation Clauses</a>, Up: <a href="The-LOOP-Facility.html">The LOOP Facility</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-COMMON_002dLISP-Package.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The COMMON-LISP Package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The COMMON-LISP Package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The COMMON-LISP Package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standardized-Packages.html" rel="up" title="Standardized Packages">
+<link href="Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Implementations.html" rel="next" title="Constraints on the COMMON-LISP Package for Conforming Implementations">
+<link href="Standardized-Packages.html" rel="prev" title="Standardized Packages">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-COMMON_002dLISP-Package">
+<div class="nav-panel">
+<p>
+Next: <a href="Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Implementations.html" accesskey="n" rel="next">Constraints on the COMMON-LISP Package for Conforming Implementations</a>, Previous: <a href="Standardized-Packages.html" accesskey="p" rel="prev">Standardized Packages</a>, Up: <a href="Standardized-Packages.html" accesskey="u" rel="up">Standardized Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-COMMON_002dLISP-Package-1"><span>11.1.2.1 The COMMON-LISP Package<a class="copiable-link" href="#The-COMMON_002dLISP-Package-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-common_002dlisp-1"></a>
+
+<a class="index-entry-id" id="index-cl"></a>
+
+<p>The <code class="t">COMMON-LISP</code> <i class="i">package</i> contains the primitives of the <span class="r">Common Lisp</span> system as
+defined by this specification.  Its <i class="i">external</i> <i class="i">symbols</i> include
+all of the <i class="i">defined names</i> (except for <i class="i">defined names</i> in
+the <code class="t">KEYWORD</code> <i class="i">package</i>) that are present in the <span class="r">Common Lisp</span> system, 
+such as <b class="b">car</b>, <b class="b">cdr</b>,  <b class="b">*package*</b>, etc.
+The <code class="t">COMMON-LISP</code> <i class="i">package</i> has the <i class="i">nickname</i> <code class="t">CL</code>.
+</p>
+<p>The <code class="t">COMMON-LISP</code> <i class="i">package</i> has as <i class="i">external</i> <i class="i">symbols</i> those 
+symbols enumerated in the figures in <a class="ref" href="Symbols-in-the-COMMON_002dLISP-Package.html">Symbols in the COMMON-LISP Package</a>, and no others.
+These <i class="i">external</i> <i class="i">symbols</i> are <i class="i">present</i> in the <code class="t">COMMON-LISP</code> <i class="i">package</i>
+but their <i class="i">home package</i> need not be the <code class="t">COMMON-LISP</code> <i class="i">package</i>.
+</p>
+<p>For example, the symbol <code class="t">HELP</code> cannot be an <i class="i">external symbol</i> of
+the <code class="t">COMMON-LISP</code> <i class="i">package</i> because it is not mentioned in <a class="ref" href="Symbols-in-the-COMMON_002dLISP-Package.html">Symbols in the COMMON-LISP Package</a>.
+In contrast, the <i class="i">symbol</i> <b class="b">variable</b>
+must be an <i class="i">external symbol</i> of the <code class="t">COMMON-LISP</code> <i class="i">package</i> 
+even though it has no definition
+because it is listed in that section
+(to support its use as a valid second <i class="i">argument</i> to the <i class="i">function</i> <b class="b">documentation</b>). 
+</p>
+<p>The <code class="t">COMMON-LISP</code> <i class="i">package</i> can have additional <i class="i">internal symbols</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-COMMON_002dLISP_002dUSER-Package.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The COMMON-LISP-USER Package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The COMMON-LISP-USER Package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The COMMON-LISP-USER Package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standardized-Packages.html" rel="up" title="Standardized Packages">
+<link href="The-KEYWORD-Package.html" rel="next" title="The KEYWORD Package">
+<link href="Some-Exceptions-to-Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs.html" rel="prev" title="Some Exceptions to Constraints on the COMMON-LISP Package for Conforming Programs">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-COMMON_002dLISP_002dUSER-Package">
+<div class="nav-panel">
+<p>
+Next: <a href="The-KEYWORD-Package.html" accesskey="n" rel="next">The KEYWORD Package</a>, Previous: <a href="Some-Exceptions-to-Constraints-on-the-COMMON_002dLISP-Package-for-Conforming-Programs.html" accesskey="p" rel="prev">Some Exceptions to Constraints on the COMMON-LISP Package for Conforming Programs</a>, Up: <a href="Standardized-Packages.html" accesskey="u" rel="up">Standardized Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-COMMON_002dLISP_002dUSER-Package-1"><span>11.1.2.5 The COMMON-LISP-USER Package<a class="copiable-link" href="#The-COMMON_002dLISP_002dUSER-Package-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-common_002dlisp_002duser"></a>
+
+<a class="index-entry-id" id="index-cl_002duser"></a>
+
+<p>The <code class="t">COMMON-LISP-USER</code> <i class="i">package</i> is the <i class="i">current package</i> when 
+a <span class="r">Common Lisp</span> system starts up.  This <i class="i">package</i> <i class="i">uses</i> the <code class="t">COMMON-LISP</code> <i class="i">package</i>.
+The <code class="t">COMMON-LISP-USER</code> <i class="i">package</i> has the <i class="i">nickname</i> <code class="t">CL-USER</code>.
+</p>
+<p>The <code class="t">COMMON-LISP-USER</code> <i class="i">package</i> can have additional <i class="i">symbols</i> <i class="i">interned</i> within it;
+it can <i class="i">use</i> other <i class="i">implementation-defined</i> <i class="i">packages</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Consing-Dot.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Consing Dot (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Consing Dot (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Consing Dot (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpretation-of-Tokens.html" rel="up" title="Interpretation of Tokens">
+<link href="Symbols-as-Tokens.html" rel="next" title="Symbols as Tokens">
+<link href="Constructing-Numbers-from-Tokens.html" rel="prev" title="Constructing Numbers from Tokens">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="The-Consing-Dot">
+<div class="nav-panel">
+<p>
+Next: <a href="Symbols-as-Tokens.html" accesskey="n" rel="next">Symbols as Tokens</a>, Previous: <a href="Constructing-Numbers-from-Tokens.html" accesskey="p" rel="prev">Constructing Numbers from Tokens</a>, Up: <a href="Interpretation-of-Tokens.html" accesskey="u" rel="up">Interpretation of Tokens</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="The-Consing-Dot-1"><span>2.3.3 The Consing Dot<a class="copiable-link" href="#The-Consing-Dot-1"> &para;</a></span></h4>
+
+<p>If a <i class="i">token</i> consists solely of dots (with no escape characters),
+then an error of <i class="i">type</i> <b class="b">reader-error</b> is signaled,
+except in one circumstance:
+if the <i class="i">token</i> is a single <i class="i">dot</i>
+and appears in a situation where <i class="i">dotted pair</i> notation permits a <i class="i">dot</i>,
+then it is accepted as part of such syntax and no error is signaled. 
+See <a class="ref" href="Left_002dParenthesis.html">Left-Parenthesis</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Current-Readtable.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Current Readtable (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Current Readtable (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Current Readtable (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Readtables.html" rel="up" title="Readtables">
+<link href="The-Standard-Readtable.html" rel="next" title="The Standard Readtable">
+<link href="Readtables.html" rel="prev" title="Readtables">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-Current-Readtable">
+<div class="nav-panel">
+<p>
+Next: <a href="The-Standard-Readtable.html" accesskey="n" rel="next">The Standard Readtable</a>, Previous: <a href="Readtables.html" accesskey="p" rel="prev">Readtables</a>, Up: <a href="Readtables.html" accesskey="u" rel="up">Readtables</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-Current-Readtable-1"><span>2.1.1.1 The Current Readtable<a class="copiable-link" href="#The-Current-Readtable-1"> &para;</a></span></h4>
+
+<p>Several <i class="i">readtables</i> describing different syntaxes can exist,
+but at any given time only one, called the <i class="i">current readtable</i>
+<a class="index-entry-id" id="index-current-readtable"></a>
+, 
+affects the way in which <i class="i">expressions</i>_2 are parsed 
+into <i class="i">objects</i> by the <i class="i">Lisp reader</i>.
+The <i class="i">current readtable</i> in a given <i class="i">dynamic environment</i>
+is the <i class="i">value</i> of <b class="b">*readtable*</b> in that <i class="i">environment</i>.
+To make a different <i class="i">readtable</i> become the <i class="i">current readtable</i>,
+<b class="b">*readtable*</b> can be <i class="i">assigned</i> or <i class="i">bound</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Device-part-of-a-Logical-Pathname-Namestring.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Device part of a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Device part of a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Device part of a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Syntax-of-Logical-Pathname-Namestrings.html" rel="up" title="Syntax of Logical Pathname Namestrings">
+<link href="The-Directory-part-of-a-Logical-Pathname-Namestring.html" rel="next" title="The Directory part of a Logical Pathname Namestring">
+<link href="The-Host-part-of-a-Logical-Pathname-Namestring.html" rel="prev" title="The Host part of a Logical Pathname Namestring">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-Device-part-of-a-Logical-Pathname-Namestring">
+<div class="nav-panel">
+<p>
+Next: <a href="The-Directory-part-of-a-Logical-Pathname-Namestring.html" accesskey="n" rel="next">The Directory part of a Logical Pathname Namestring</a>, Previous: <a href="The-Host-part-of-a-Logical-Pathname-Namestring.html" accesskey="p" rel="prev">The Host part of a Logical Pathname Namestring</a>, Up: <a href="Syntax-of-Logical-Pathname-Namestrings.html" accesskey="u" rel="up">Syntax of Logical Pathname Namestrings</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-Device-part-of-a-Logical-Pathname-Namestring-1"><span>19.3.1.3 The Device part of a Logical Pathname Namestring<a class="copiable-link" href="#The-Device-part-of-a-Logical-Pathname-Namestring-1"> &para;</a></span></h4>
+
+<p>There is no syntax for a <i class="i">logical pathname</i> device since
+the device component of a <i class="i">logical pathname</i> is always <code class="t">:unspecific</code>;
+see <a class="ref" href="Unspecific-Components-of-a-Logical-Pathname.html">Unspecific Components of a Logical Pathname</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Directory-part-of-a-Logical-Pathname-Namestring.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Directory part of a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Directory part of a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Directory part of a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Syntax-of-Logical-Pathname-Namestrings.html" rel="up" title="Syntax of Logical Pathname Namestrings">
+<link href="The-Type-part-of-a-Logical-Pathname-Namestring.html" rel="next" title="The Type part of a Logical Pathname Namestring">
+<link href="The-Device-part-of-a-Logical-Pathname-Namestring.html" rel="prev" title="The Device part of a Logical Pathname Namestring">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-Directory-part-of-a-Logical-Pathname-Namestring">
+<div class="nav-panel">
+<p>
+Next: <a href="The-Type-part-of-a-Logical-Pathname-Namestring.html" accesskey="n" rel="next">The Type part of a Logical Pathname Namestring</a>, Previous: <a href="The-Device-part-of-a-Logical-Pathname-Namestring.html" accesskey="p" rel="prev">The Device part of a Logical Pathname Namestring</a>, Up: <a href="Syntax-of-Logical-Pathname-Namestrings.html" accesskey="u" rel="up">Syntax of Logical Pathname Namestrings</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-Directory-part-of-a-Logical-Pathname-Namestring-1"><span>19.3.1.4 The Directory part of a Logical Pathname Namestring<a class="copiable-link" href="#The-Directory-part-of-a-Logical-Pathname-Namestring-1"> &para;</a></span></h4>
+
+<p>If a <i class="i">relative-directory-marker</i> precedes the <i class="i">directories</i>,
+the directory component parsed is as <i class="i">relative</i>;
+otherwise, the directory component is parsed as <i class="i">absolute</i>.
+</p>
+<p>If a <i class="i">wild-inferiors-marker</i> is specified,
+it parses into <code class="t">:wild-inferiors</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-EOF_002dERROR_002dP-argument.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The EOF-ERROR-P argument (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The EOF-ERROR-P argument (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The EOF-ERROR-P argument (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Argument-Conventions-of-Some-Reader-Functions.html" rel="up" title="Argument Conventions of Some Reader Functions">
+<link href="The-RECURSIVE_002dP-argument.html" rel="next" title="The RECURSIVE-P argument">
+<link href="Argument-Conventions-of-Some-Reader-Functions.html" rel="prev" title="Argument Conventions of Some Reader Functions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-EOF_002dERROR_002dP-argument">
+<div class="nav-panel">
+<p>
+Next: <a href="The-RECURSIVE_002dP-argument.html" accesskey="n" rel="next">The RECURSIVE-P argument</a>, Previous: <a href="Argument-Conventions-of-Some-Reader-Functions.html" accesskey="p" rel="prev">Argument Conventions of Some Reader Functions</a>, Up: <a href="Argument-Conventions-of-Some-Reader-Functions.html" accesskey="u" rel="up">Argument Conventions of Some Reader Functions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-EOF_002dERROR_002dP-argument-1"><span>23.1.3.1 The EOF-ERROR-P argument<a class="copiable-link" href="#The-EOF_002dERROR_002dP-argument-1"> &para;</a></span></h4>
+
+<p><i class="i">Eof-error-p</i> in input function calls
+controls what happens if input is from a file (or any other
+input source that has a definite end) and the end of the file is reached.
+If <i class="i">eof-error-p</i> is <i class="i">true</i> (the default), 
+an error of <i class="i">type</i> <b class="b">end-of-file</b> is signaled
+at end of file.  If it is <i class="i">false</i>, then no error is signaled, and instead
+the function returns <i class="i">eof-value</i>.
+</p>
+<p>Functions such as <b class="b">read</b> that read the representation
+of an <i class="i">object</i> rather than a single
+character always signals an error, regardless of <i class="i">eof-error-p</i>, if
+the file ends in the middle of an object representation.
+For example, if a file does
+not contain enough right parentheses to balance the left parentheses in
+it, <b class="b">read</b> signals an error.  If a file ends in a 
+<i class="i">symbol</i> or a <i class="i">number</i>
+immediately followed by end-of-file, <b class="b">read</b> reads the 
+<i class="i">symbol</i> or
+<i class="i">number</i> 
+successfully and when called again will
+act according to <i class="i">eof-error-p</i>.
+Similarly, the <i class="i">function</i> <b class="b">read-line</b>
+successfully reads the last line of a file even if that line
+is terminated by end-of-file rather than the newline character.
+Ignorable text, such as lines containing only <i class="i">whitespace</i>_2 or comments,
+are not considered to begin an <i class="i">object</i>; 
+if <b class="b">read</b> begins to read an <i class="i">expression</i> but sees only such
+ignorable text, it does not consider the file to end in the middle of an <i class="i">object</i>.
+Thus an <i class="i">eof-error-p</i> argument controls what happens
+when the file ends between <i class="i">objects</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="The-RECURSIVE_002dP-argument.html">The RECURSIVE-P argument</a>, Previous: <a href="Argument-Conventions-of-Some-Reader-Functions.html">Argument Conventions of Some Reader Functions</a>, Up: <a href="Argument-Conventions-of-Some-Reader-Functions.html">Argument Conventions of Some Reader Functions</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Evaluation-Model.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Evaluation Model (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Evaluation Model (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Evaluation Model (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation.html" rel="up" title="Evaluation">
+<link href="Lambda-Expressions.html" rel="next" title="Lambda Expressions">
+<link href="Introduction-to-Environments.html" rel="prev" title="Introduction to Environments">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="The-Evaluation-Model">
+<div class="nav-panel">
+<p>
+Next: <a href="Lambda-Expressions.html" accesskey="n" rel="next">Lambda Expressions</a>, Previous: <a href="Introduction-to-Environments.html" accesskey="p" rel="prev">Introduction to Environments</a>, Up: <a href="Evaluation.html" accesskey="u" rel="up">Evaluation</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="The-Evaluation-Model-1"><span>3.1.2 The Evaluation Model<a class="copiable-link" href="#The-Evaluation-Model-1"> &para;</a></span></h4>
+
+<p>A <span class="r">Common Lisp</span> system evaluates <i class="i">forms</i> with respect to lexical,
+dynamic, and global <i class="i">environments</i>.  The following sections
+describe the components of the <span class="r">Common Lisp</span> evaluation model.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Form-Evaluation.html" accesskey="1">Form Evaluation</a></li>
+<li><a href="Symbols-as-Forms.html" accesskey="2">Symbols as Forms</a></li>
+<li><a href="Lexical-Variables.html" accesskey="3">Lexical Variables</a></li>
+<li><a href="Dynamic-Variables.html" accesskey="4">Dynamic Variables</a></li>
+<li><a href="Constant-Variables.html" accesskey="5">Constant Variables</a></li>
+<li><a href="Symbols-Naming-Both-Lexical-and-Dynamic-Variables.html" accesskey="6">Symbols Naming Both Lexical and Dynamic Variables</a></li>
+<li><a href="Conses-as-Forms.html" accesskey="7">Conses as Forms</a></li>
+<li><a href="Special-Forms.html" accesskey="8">Special Forms</a></li>
+<li><a href="Macro-Forms.html" accesskey="9">Macro Forms</a></li>
+<li><a href="Function-Forms.html">Function Forms</a></li>
+<li><a href="Lambda-Forms.html">Lambda Forms</a></li>
+<li><a href="Self_002dEvaluating-Objects.html">Self-Evaluating Objects</a></li>
+<li><a href="Examples-of-Self_002dEvaluating-Objects.html">Examples of Self-Evaluating Objects</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-External-Environment.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The External Environment (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The External Environment (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The External Environment (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment.html" rel="up" title="Environment">
+<link href="Environment-Dictionary.html" rel="next" title="Environment Dictionary">
+<link href="Environment.html" rel="prev" title="Environment">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="The-External-Environment">
+<div class="nav-panel">
+<p>
+Next: <a href="Environment-Dictionary.html" accesskey="n" rel="next">Environment Dictionary</a>, Previous: <a href="Environment.html" accesskey="p" rel="prev">Environment</a>, Up: <a href="Environment.html" accesskey="u" rel="up">Environment</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="The-External-Environment-1"><span>25.1 The External Environment<a class="copiable-link" href="#The-External-Environment-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Top-level-loop.html" accesskey="1">Top level loop</a></li>
+<li><a href="Debugging-Utilities.html" accesskey="2">Debugging Utilities</a></li>
+<li><a href="Environment-Inquiry.html" accesskey="3">Environment Inquiry</a></li>
+<li><a href="Time.html" accesskey="4">Time</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Global-Environment.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Global Environment (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Global Environment (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Global Environment (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Environments.html" rel="up" title="Introduction to Environments">
+<link href="Dynamic-Environments.html" rel="next" title="Dynamic Environments">
+<link href="Introduction-to-Environments.html" rel="prev" title="Introduction to Environments">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-Global-Environment">
+<div class="nav-panel">
+<p>
+Next: <a href="Dynamic-Environments.html" accesskey="n" rel="next">Dynamic Environments</a>, Previous: <a href="Introduction-to-Environments.html" accesskey="p" rel="prev">Introduction to Environments</a>, Up: <a href="Introduction-to-Environments.html" accesskey="u" rel="up">Introduction to Environments</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-Global-Environment-1"><span>3.1.1.1 The Global Environment<a class="copiable-link" href="#The-Global-Environment-1"> &para;</a></span></h4>
+
+<p>The <i class="i">global environment</i>
+<a class="index-entry-id" id="index-global-environment"></a>
+ is that part of an <i class="i">environment</i>
+that contains <i class="i">bindings</i> with both <i class="i">indefinite scope</i> 
+and <i class="i">indefinite extent</i>.
+The <i class="i">global environment</i> contains, among other things, the following:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p><i class="i">bindings</i> of <i class="i">dynamic variables</i> and <i class="i">constant variables</i>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p><i class="i">bindings</i> of <i class="i">functions</i>, <i class="i">macros</i>, and <i class="i">special operators</i>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd>
+<p><i class="i">bindings</i> of <i class="i">compiler macros</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><i class="i">bindings</i> of <i class="i">type</i> and <i class="i">class</i> <i class="i">names</i>
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>information about <i class="i">proclamations</i>.
+</p></dd>
+</dl>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Host-part-of-a-Logical-Pathname-Namestring.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Host part of a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Host part of a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Host part of a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Syntax-of-Logical-Pathname-Namestrings.html" rel="up" title="Syntax of Logical Pathname Namestrings">
+<link href="The-Device-part-of-a-Logical-Pathname-Namestring.html" rel="next" title="The Device part of a Logical Pathname Namestring">
+<link href="Additional-Information-about-Parsing-Logical-Pathname-Namestrings.html" rel="prev" title="Additional Information about Parsing Logical Pathname Namestrings">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-Host-part-of-a-Logical-Pathname-Namestring">
+<div class="nav-panel">
+<p>
+Next: <a href="The-Device-part-of-a-Logical-Pathname-Namestring.html" accesskey="n" rel="next">The Device part of a Logical Pathname Namestring</a>, Previous: <a href="Additional-Information-about-Parsing-Logical-Pathname-Namestrings.html" accesskey="p" rel="prev">Additional Information about Parsing Logical Pathname Namestrings</a>, Up: <a href="Syntax-of-Logical-Pathname-Namestrings.html" accesskey="u" rel="up">Syntax of Logical Pathname Namestrings</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-Host-part-of-a-Logical-Pathname-Namestring-1"><span>19.3.1.2 The Host part of a Logical Pathname Namestring<a class="copiable-link" href="#The-Host-part-of-a-Logical-Pathname-Namestring-1"> &para;</a></span></h4>
+
+<p>The <i class="i">host</i> must have been defined as a <i class="i">logical pathname</i> host;
+this can be done by using <b class="b">setf</b> of <b class="b">logical-pathname-translations</b>.
+</p>
+<p>The <i class="i">logical pathname</i> host name <code class="t">&quot;SYS&quot;</code> is reserved for the implementation.
+The existence and meaning of <code class="t">SYS:</code> <i class="i">logical pathnames</i> 
+is <i class="i">implementation-defined</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Initial-Readtable.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Initial Readtable (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Initial Readtable (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Initial Readtable (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Readtables.html" rel="up" title="Readtables">
+<link href="The-Standard-Readtable.html" rel="prev" title="The Standard Readtable">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-Initial-Readtable">
+<div class="nav-panel">
+<p>
+Previous: <a href="The-Standard-Readtable.html" accesskey="p" rel="prev">The Standard Readtable</a>, Up: <a href="Readtables.html" accesskey="u" rel="up">Readtables</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-Initial-Readtable-1"><span>2.1.1.3 The Initial Readtable<a class="copiable-link" href="#The-Initial-Readtable-1"> &para;</a></span></h4>
+
+<p>The <i class="i">initial readtable</i>
+<a class="index-entry-id" id="index-initial-readtable"></a>
+ is
+the <i class="i">readtable</i> that is the <i class="i">current readtable</i>
+at the time when the <i class="i">Lisp image</i> starts.
+At that time, it conforms to <i class="i">standard syntax</i>.
+The <i class="i">initial readtable</i> is <i class="i">distinct</i> 
+from the <i class="i">standard readtable</i>.
+It is permissible for a <i class="i">conforming program</i> 
+to modify the <i class="i">initial readtable</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-KEYWORD-Package.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The KEYWORD Package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The KEYWORD Package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The KEYWORD Package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Standardized-Packages.html" rel="up" title="Standardized Packages">
+<link href="Interning-a-Symbol-in-the-KEYWORD-Package.html" rel="next" title="Interning a Symbol in the KEYWORD Package">
+<link href="The-COMMON_002dLISP_002dUSER-Package.html" rel="prev" title="The COMMON-LISP-USER Package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-KEYWORD-Package">
+<div class="nav-panel">
+<p>
+Next: <a href="Interning-a-Symbol-in-the-KEYWORD-Package.html" accesskey="n" rel="next">Interning a Symbol in the KEYWORD Package</a>, Previous: <a href="The-COMMON_002dLISP_002dUSER-Package.html" accesskey="p" rel="prev">The COMMON-LISP-USER Package</a>, Up: <a href="Standardized-Packages.html" accesskey="u" rel="up">Standardized Packages</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-KEYWORD-Package-1"><span>11.1.2.6 The KEYWORD Package<a class="copiable-link" href="#The-KEYWORD-Package-1"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-keyword-1"></a>
+
+<p>The <code class="t">KEYWORD</code> <i class="i">package</i> contains <i class="i">symbols</i>, called <i class="i">keywords</i>_1,
+that are typically used as special markers in <i class="i">programs</i> 
+and their associated data <i class="i">expressions</i>_1.
+</p>
+<p><i class="i">Symbol</i> <i class="i">tokens</i> that start with a <i class="i">package marker</i> 
+are parsed by the <i class="i">Lisp reader</i> as <i class="i">symbols</i> 
+in the <code class="t">KEYWORD</code> <i class="i">package</i>; see <a class="ref" href="Symbols-as-Tokens.html">Symbols as Tokens</a>.
+This makes it notationally convenient to use <i class="i">keywords</i>
+when communicating between programs in different <i class="i">packages</i>.  
+For example, the mechanism for passing <i class="i">keyword parameters</i> in a <i class="i">call</i> uses 
+<i class="i">keywords</i>_1 to name the corresponding <i class="i">arguments</i>;
+see <a class="ref" href="Ordinary-Lambda-Lists.html">Ordinary Lambda Lists</a>.
+</p>
+<p><i class="i">Symbols</i> in the <code class="t">KEYWORD</code> <i class="i">package</i> are, by definition, of <i class="i">type</i> <b class="b">keyword</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-LOOP-Facility.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The LOOP Facility (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The LOOP Facility (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The LOOP Facility (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Iteration.html" rel="up" title="Iteration">
+<link href="Iteration-Dictionary.html" rel="next" title="Iteration Dictionary">
+<link href="Iteration.html" rel="prev" title="Iteration">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="The-LOOP-Facility">
+<div class="nav-panel">
+<p>
+Next: <a href="Iteration-Dictionary.html" accesskey="n" rel="next">Iteration Dictionary</a>, Previous: <a href="Iteration.html" accesskey="p" rel="prev">Iteration</a>, Up: <a href="Iteration.html" accesskey="u" rel="up">Iteration</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="The-LOOP-Facility-1"><span>6.1 The LOOP Facility<a class="copiable-link" href="#The-LOOP-Facility-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Overview-of-the-Loop-Facility.html" accesskey="1">Overview of the Loop Facility</a></li>
+<li><a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="2">Variable Initialization and Stepping Clauses</a></li>
+<li><a href="Value-Accumulation-Clauses.html" accesskey="3">Value Accumulation Clauses</a></li>
+<li><a href="Termination-Test-Clauses.html" accesskey="4">Termination Test Clauses</a></li>
+<li><a href="Unconditional-Execution-Clauses.html" accesskey="5">Unconditional Execution Clauses</a></li>
+<li><a href="Conditional-Execution-Clauses.html" accesskey="6">Conditional Execution Clauses</a></li>
+<li><a href="Miscellaneous-Clauses.html" accesskey="7">Miscellaneous Clauses</a></li>
+<li><a href="Examples-of-Miscellaneous-Loop-Features.html" accesskey="8">Examples of Miscellaneous Loop Features</a></li>
+<li><a href="Notes-about-Loop.html" accesskey="9">Notes about Loop</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Lisp-Pretty-Printer.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Lisp Pretty Printer (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Lisp Pretty Printer (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Lisp Pretty Printer (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer.html" rel="up" title="Printer">
+<link href="Formatted-Output.html" rel="next" title="Formatted Output">
+<link href="The-Lisp-Printer.html" rel="prev" title="The Lisp Printer">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="The-Lisp-Pretty-Printer">
+<div class="nav-panel">
+<p>
+Next: <a href="Formatted-Output.html" accesskey="n" rel="next">Formatted Output</a>, Previous: <a href="The-Lisp-Printer.html" accesskey="p" rel="prev">The Lisp Printer</a>, Up: <a href="Printer.html" accesskey="u" rel="up">Printer</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="The-Lisp-Pretty-Printer-1"><span>22.2 The Lisp Pretty Printer<a class="copiable-link" href="#The-Lisp-Pretty-Printer-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Pretty-Printer-Concepts.html" accesskey="1">Pretty Printer Concepts</a></li>
+<li><a href="Examples-of-using-the-Pretty-Printer.html" accesskey="2">Examples of using the Pretty Printer</a></li>
+<li><a href="Notes-about-the-Pretty-Printer_0060s-Background.html" accesskey="3">Notes about the Pretty Printer&lsquo;s Background</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Lisp-Printer.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Lisp Printer (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Lisp Printer (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Lisp Printer (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer.html" rel="up" title="Printer">
+<link href="The-Lisp-Pretty-Printer.html" rel="next" title="The Lisp Pretty Printer">
+<link href="Printer.html" rel="prev" title="Printer">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="The-Lisp-Printer">
+<div class="nav-panel">
+<p>
+Next: <a href="The-Lisp-Pretty-Printer.html" accesskey="n" rel="next">The Lisp Pretty Printer</a>, Previous: <a href="Printer.html" accesskey="p" rel="prev">Printer</a>, Up: <a href="Printer.html" accesskey="u" rel="up">Printer</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="The-Lisp-Printer-1"><span>22.1 The Lisp Printer<a class="copiable-link" href="#The-Lisp-Printer-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Overview-of-The-Lisp-Printer.html" accesskey="1">Overview of The Lisp Printer</a></li>
+<li><a href="Printer-Dispatching.html" accesskey="2">Printer Dispatching</a></li>
+<li><a href="Default-Print_002dObject-Methods.html" accesskey="3">Default Print-Object Methods</a></li>
+<li><a href="Examples-of-Printer-Behavior.html" accesskey="4">Examples of Printer Behavior</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Null-Lexical-Environment.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Null Lexical Environment (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Null Lexical Environment (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Null Lexical Environment (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Introduction-to-Environments.html" rel="up" title="Introduction to Environments">
+<link href="Environment-Objects.html" rel="next" title="Environment Objects">
+<link href="Lexical-Environments.html" rel="prev" title="Lexical Environments">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-Null-Lexical-Environment">
+<div class="nav-panel">
+<p>
+Next: <a href="Environment-Objects.html" accesskey="n" rel="next">Environment Objects</a>, Previous: <a href="Lexical-Environments.html" accesskey="p" rel="prev">Lexical Environments</a>, Up: <a href="Introduction-to-Environments.html" accesskey="u" rel="up">Introduction to Environments</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-Null-Lexical-Environment-1"><span>3.1.1.4 The Null Lexical Environment<a class="copiable-link" href="#The-Null-Lexical-Environment-1"> &para;</a></span></h4>
+
+<p>The <i class="i">null lexical environment</i>
+<a class="index-entry-id" id="index-null-lexical-environment"></a>
+ is equivalent to the <i class="i">global environment</i>.
+</p>
+<p>Although in general the representation of an <i class="i">environment</i> <i class="i">object</i>
+is <i class="i">implementation-dependent</i>, <b class="b">nil</b> can be used in any situation where an
+<i class="i">environment</i> <i class="i">object</i> is called for in order to denote 
+the <i class="i">null lexical environment</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Pathname-Device-Component.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Pathname Device Component (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Pathname Device Component (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Pathname Device Component (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Pathname-Components.html" rel="up" title="Pathname Components">
+<link href="The-Pathname-Directory-Component.html" rel="next" title="The Pathname Directory Component">
+<link href="The-Pathname-Host-Component.html" rel="prev" title="The Pathname Host Component">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-Pathname-Device-Component">
+<div class="nav-panel">
+<p>
+Next: <a href="The-Pathname-Directory-Component.html" accesskey="n" rel="next">The Pathname Directory Component</a>, Previous: <a href="The-Pathname-Host-Component.html" accesskey="p" rel="prev">The Pathname Host Component</a>, Up: <a href="Pathname-Components.html" accesskey="u" rel="up">Pathname Components</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-Pathname-Device-Component-1"><span>19.2.1.2 The Pathname Device Component<a class="copiable-link" href="#The-Pathname-Device-Component-1"> &para;</a></span></h4>
+
+<p>Corresponds to the &ldquo;device&rdquo; or &ldquo;file structure&rdquo; concept in many
+host file systems: the name of a logical or physical device containing files.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Pathname-Directory-Component.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Pathname Directory Component (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Pathname Directory Component (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Pathname Directory Component (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Pathname-Components.html" rel="up" title="Pathname Components">
+<link href="The-Pathname-Name-Component.html" rel="next" title="The Pathname Name Component">
+<link href="The-Pathname-Device-Component.html" rel="prev" title="The Pathname Device Component">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-Pathname-Directory-Component">
+<div class="nav-panel">
+<p>
+Next: <a href="The-Pathname-Name-Component.html" accesskey="n" rel="next">The Pathname Name Component</a>, Previous: <a href="The-Pathname-Device-Component.html" accesskey="p" rel="prev">The Pathname Device Component</a>, Up: <a href="Pathname-Components.html" accesskey="u" rel="up">Pathname Components</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-Pathname-Directory-Component-1"><span>19.2.1.3 The Pathname Directory Component<a class="copiable-link" href="#The-Pathname-Directory-Component-1"> &para;</a></span></h4>
+
+<p>Corresponds to the &ldquo;directory&rdquo; concept in many host file systems:
+the name of a group of related files.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Pathname-Host-Component.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Pathname Host Component (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Pathname Host Component (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Pathname Host Component (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Pathname-Components.html" rel="up" title="Pathname Components">
+<link href="The-Pathname-Device-Component.html" rel="next" title="The Pathname Device Component">
+<link href="Pathname-Components.html" rel="prev" title="Pathname Components">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-Pathname-Host-Component">
+<div class="nav-panel">
+<p>
+Next: <a href="The-Pathname-Device-Component.html" accesskey="n" rel="next">The Pathname Device Component</a>, Previous: <a href="Pathname-Components.html" accesskey="p" rel="prev">Pathname Components</a>, Up: <a href="Pathname-Components.html" accesskey="u" rel="up">Pathname Components</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-Pathname-Host-Component-1"><span>19.2.1.1 The Pathname Host Component<a class="copiable-link" href="#The-Pathname-Host-Component-1"> &para;</a></span></h4>
+
+<p>The name of the file system on which the file resides,
+or the name of a <i class="i">logical host</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Pathname-Name-Component.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Pathname Name Component (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Pathname Name Component (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Pathname Name Component (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Pathname-Components.html" rel="up" title="Pathname Components">
+<link href="The-Pathname-Type-Component.html" rel="next" title="The Pathname Type Component">
+<link href="The-Pathname-Directory-Component.html" rel="prev" title="The Pathname Directory Component">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-Pathname-Name-Component">
+<div class="nav-panel">
+<p>
+Next: <a href="The-Pathname-Type-Component.html" accesskey="n" rel="next">The Pathname Type Component</a>, Previous: <a href="The-Pathname-Directory-Component.html" accesskey="p" rel="prev">The Pathname Directory Component</a>, Up: <a href="Pathname-Components.html" accesskey="u" rel="up">Pathname Components</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-Pathname-Name-Component-1"><span>19.2.1.4 The Pathname Name Component<a class="copiable-link" href="#The-Pathname-Name-Component-1"> &para;</a></span></h4>
+
+<p>The &ldquo;name&rdquo; part of a group of <i class="i">files</i> that can be thought of
+as conceptually related.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Pathname-Type-Component.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Pathname Type Component (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Pathname Type Component (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Pathname Type Component (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Pathname-Components.html" rel="up" title="Pathname Components">
+<link href="The-Pathname-Version-Component.html" rel="next" title="The Pathname Version Component">
+<link href="The-Pathname-Name-Component.html" rel="prev" title="The Pathname Name Component">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-Pathname-Type-Component">
+<div class="nav-panel">
+<p>
+Next: <a href="The-Pathname-Version-Component.html" accesskey="n" rel="next">The Pathname Version Component</a>, Previous: <a href="The-Pathname-Name-Component.html" accesskey="p" rel="prev">The Pathname Name Component</a>, Up: <a href="Pathname-Components.html" accesskey="u" rel="up">Pathname Components</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-Pathname-Type-Component-1"><span>19.2.1.5 The Pathname Type Component<a class="copiable-link" href="#The-Pathname-Type-Component-1"> &para;</a></span></h4>
+
+<p>Corresponds to the &ldquo;filetype&rdquo; or &ldquo;extension&rdquo; concept in many host
+file systems.  This says what kind of file this is.  
+This component is always a <i class="i">string</i>, <b class="b">nil</b>, <code class="t">:wild</code>, or <code class="t">:unspecific</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Pathname-Version-Component.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Pathname Version Component (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Pathname Version Component (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Pathname Version Component (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Pathname-Components.html" rel="up" title="Pathname Components">
+<link href="The-Pathname-Type-Component.html" rel="prev" title="The Pathname Type Component">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-Pathname-Version-Component">
+<div class="nav-panel">
+<p>
+Previous: <a href="The-Pathname-Type-Component.html" accesskey="p" rel="prev">The Pathname Type Component</a>, Up: <a href="Pathname-Components.html" accesskey="u" rel="up">Pathname Components</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-Pathname-Version-Component-1"><span>19.2.1.6 The Pathname Version Component<a class="copiable-link" href="#The-Pathname-Version-Component-1"> &para;</a></span></h4>
+
+<p>Corresponds to the &ldquo;version number&rdquo; concept in many host file systems.
+</p>
+<p>The version is either a positive <i class="i">integer</i> 
+or a <i class="i">symbol</i> from the following list:
+<b class="b">nil</b>, <code class="t">:wild</code>, <code class="t">:unspecific</code>, or <code class="t">:newest</code>
+(refers to the largest version number that already exists in 
+the file system when reading a file, or to
+a version number
+greater than any already existing in the file system
+when writing a new file).  Implementations 
+can define other special version <i class="i">symbols</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-RECURSIVE_002dP-argument.html
@@ -0,0 +1,118 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The RECURSIVE-P argument (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The RECURSIVE-P argument (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The RECURSIVE-P argument (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Argument-Conventions-of-Some-Reader-Functions.html" rel="up" title="Argument Conventions of Some Reader Functions">
+<link href="The-EOF_002dERROR_002dP-argument.html" rel="prev" title="The EOF-ERROR-P argument">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-RECURSIVE_002dP-argument">
+<div class="nav-panel">
+<p>
+Previous: <a href="The-EOF_002dERROR_002dP-argument.html" accesskey="p" rel="prev">The EOF-ERROR-P argument</a>, Up: <a href="Argument-Conventions-of-Some-Reader-Functions.html" accesskey="u" rel="up">Argument Conventions of Some Reader Functions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-RECURSIVE_002dP-argument-1"><span>23.1.3.2 The RECURSIVE-P argument<a class="copiable-link" href="#The-RECURSIVE_002dP-argument-1"> &para;</a></span></h4>
+
+<p>If <i class="i">recursive-p</i> is supplied and not <b class="b">nil</b>, it specifies that
+this function call is not an outermost call to <b class="b">read</b> but an 
+embedded call, typically from a <i class="i">reader macro function</i>.
+It is important to distinguish such recursive calls for three reasons.
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>An outermost call establishes the context within which the
+<code class="t">#<i class="i">n</i>=</code> and <code class="t">#<i class="i">n</i>#</code> syntax is scoped.  Consider, for example,
+the expression
+</p>
+<div class="example">
+<pre class="example-preformatted"> (cons '#3=(p q r) '(x y . #3#))
+</pre></div>
+
+<p>If the <i class="i">single-quote</i> <i class="i">reader macro</i> were defined in this way:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (set-macro-character #\'       ;incorrect
+    #'(lambda (stream char)
+         (declare (ignore char))
+         (list 'quote (read stream))))
+</pre></div>
+
+<p>then each call to the <i class="i">single-quote</i> <i class="i">reader macro function</i> would establish
+independent contexts for the scope of <b class="b">read</b> information, including the scope of
+identifications between markers like &ldquo;<code class="t">#3=</code>&rdquo; and &ldquo;<code class="t">#3#</code>&rdquo;.  However, for
+this expression, the scope was clearly intended to be determined by the outer set 
+of parentheses, so such a definition would be incorrect.
+The correct way to define the <i class="i">single-quote</i>
+<i class="i">reader macro</i> uses <i class="i">recursive-p</i>: 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (set-macro-character #\'       ;correct
+    #'(lambda (stream char)
+         (declare (ignore char))
+         (list 'quote (read stream t nil t))))
+</pre></div>
+
+</dd>
+<dt>2.</dt>
+<dd><p>A recursive call does not alter whether the reading process
+is to preserve <i class="i">whitespace</i>_2 or not (as determined by whether the
+outermost call was to <b class="b">read</b> or <b class="b">read-preserving-whitespace</b>).
+Suppose again that <i class="i">single-quote</i> 
+were to be defined as shown above in the incorrect definition.
+Then a call to <b class="b">read-preserving-whitespace</b>
+that read the expression <code class="t">'foo&lt;<i class="i">Space</i>&gt;</code> would fail to preserve the space
+character following the symbol <code class="t">foo</code> because the <i class="i">single-quote</i>
+<i class="i">reader macro function</i> calls <b class="b">read</b>, 
+not <b class="b">read-preserving-whitespace</b>,
+to read the following expression (in this case <code class="t">foo</code>).
+The correct definition, which passes the value <i class="i">true</i> for <i class="i">recursive-p</i>
+to <b class="b">read</b>, allows the outermost call to determine
+whether <i class="i">whitespace</i>_2 is preserved.
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>When end-of-file is encountered and the <i class="i">eof-error-p</i> argument
+is not <b class="b">nil</b>, the kind of error that is signaled may depend on the value
+of <i class="i">recursive-p</i>.  If <i class="i">recursive-p</i> 
+is <i class="i">true</i>, then the end-of-file
+is deemed to have occurred within the middle of a printed representation;
+if <i class="i">recursive-p</i> is <i class="i">false</i>, then the end-of-file may be deemed to have
+occurred between <i class="i">objects</i> rather than within the middle of one.
+</p>
+</dd>
+</dl>
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="The-EOF_002dERROR_002dP-argument.html">The EOF-ERROR-P argument</a>, Up: <a href="Argument-Conventions-of-Some-Reader-Functions.html">Argument Conventions of Some Reader Functions</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Standard-Readtable.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Standard Readtable (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Standard Readtable (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Standard Readtable (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Readtables.html" rel="up" title="Readtables">
+<link href="The-Initial-Readtable.html" rel="next" title="The Initial Readtable">
+<link href="The-Current-Readtable.html" rel="prev" title="The Current Readtable">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-Standard-Readtable">
+<div class="nav-panel">
+<p>
+Next: <a href="The-Initial-Readtable.html" accesskey="n" rel="next">The Initial Readtable</a>, Previous: <a href="The-Current-Readtable.html" accesskey="p" rel="prev">The Current Readtable</a>, Up: <a href="Readtables.html" accesskey="u" rel="up">Readtables</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-Standard-Readtable-1"><span>2.1.1.2 The Standard Readtable<a class="copiable-link" href="#The-Standard-Readtable-1"> &para;</a></span></h4>
+
+<p>The <i class="i">standard readtable</i>
+<a class="index-entry-id" id="index-standard-readtable"></a>
+ conforms to <i class="i">standard syntax</i>.
+The consequences are undefined if an attempt is made
+to modify the <i class="i">standard readtable</i>.
+To achieve the effect of altering or extending <i class="i">standard syntax</i>,
+a copy of the <i class="i">standard readtable</i> can be created; see the <i class="i">function</i> <b class="b">copy-readtable</b>.
+</p>
+<p>The <i class="i">readtable case</i> of the <i class="i">standard readtable</i> is <code class="t">:upcase</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Type-part-of-a-Logical-Pathname-Namestring.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Type part of a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Type part of a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Type part of a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Syntax-of-Logical-Pathname-Namestrings.html" rel="up" title="Syntax of Logical Pathname Namestrings">
+<link href="The-Version-part-of-a-Logical-Pathname-Namestring.html" rel="next" title="The Version part of a Logical Pathname Namestring">
+<link href="The-Directory-part-of-a-Logical-Pathname-Namestring.html" rel="prev" title="The Directory part of a Logical Pathname Namestring">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-Type-part-of-a-Logical-Pathname-Namestring">
+<div class="nav-panel">
+<p>
+Next: <a href="The-Version-part-of-a-Logical-Pathname-Namestring.html" accesskey="n" rel="next">The Version part of a Logical Pathname Namestring</a>, Previous: <a href="The-Directory-part-of-a-Logical-Pathname-Namestring.html" accesskey="p" rel="prev">The Directory part of a Logical Pathname Namestring</a>, Up: <a href="Syntax-of-Logical-Pathname-Namestrings.html" accesskey="u" rel="up">Syntax of Logical Pathname Namestrings</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-Type-part-of-a-Logical-Pathname-Namestring-1"><span>19.3.1.5 The Type part of a Logical Pathname Namestring<a class="copiable-link" href="#The-Type-part-of-a-Logical-Pathname-Namestring-1"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> of a <i class="i">logical pathname</i> for a <i class="i">source file</i>
+is <code class="t">&quot;LISP&quot;</code>.   This should be translated into whatever type is 
+appropriate in a physical pathname.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-Version-part-of-a-Logical-Pathname-Namestring.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The Version part of a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The Version part of a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The Version part of a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Syntax-of-Logical-Pathname-Namestrings.html" rel="up" title="Syntax of Logical Pathname Namestrings">
+<link href="Wildcard-Words-in-a-Logical-Pathname-Namestring.html" rel="next" title="Wildcard Words in a Logical Pathname Namestring">
+<link href="The-Type-part-of-a-Logical-Pathname-Namestring.html" rel="prev" title="The Type part of a Logical Pathname Namestring">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-Version-part-of-a-Logical-Pathname-Namestring">
+<div class="nav-panel">
+<p>
+Next: <a href="Wildcard-Words-in-a-Logical-Pathname-Namestring.html" accesskey="n" rel="next">Wildcard Words in a Logical Pathname Namestring</a>, Previous: <a href="The-Type-part-of-a-Logical-Pathname-Namestring.html" accesskey="p" rel="prev">The Type part of a Logical Pathname Namestring</a>, Up: <a href="Syntax-of-Logical-Pathname-Namestrings.html" accesskey="u" rel="up">Syntax of Logical Pathname Namestrings</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-Version-part-of-a-Logical-Pathname-Namestring-1"><span>19.3.1.6 The Version part of a Logical Pathname Namestring<a class="copiable-link" href="#The-Version-part-of-a-Logical-Pathname-Namestring-1"> &para;</a></span></h4>
+
+<p>Some <i class="i">file systems</i> do not have <i class="i">versions</i>. 
+<i class="i">Logical pathname</i> translation to such a <i class="i">file system</i>
+ignores the <i class="i">version</i>.
+This implies that a program cannot rely on being able to store
+more than one version of a file named by a <i class="i">logical pathname</i>.
+</p>
+<p>If a <i class="i">wildcard-version</i> is specified,
+it parses into <code class="t">:wild</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Affected-By_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Affected By&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Affected By&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Affected By&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Arguments_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Arguments&quot; Section of a Dictionary Entry">
+<link href="Interpreting-Dictionary-Entries.html" rel="prev" title="Interpreting Dictionary Entries">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Affected-By_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Arguments_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Arguments&quot; Section of a Dictionary Entry</a>, Previous: <a href="Interpreting-Dictionary-Entries.html" accesskey="p" rel="prev">Interpreting Dictionary Entries</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Affected-By_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.1 The &quot;Affected By&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Affected-By_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>For an <i class="i">operator</i>, anything that can affect the side effects of
+or <i class="i">values</i> returned by the <i class="i">operator</i>.
+</p>
+<p>For a <i class="i">variable</i>, anything that can affect the <i class="i">value</i> of the <i class="i">variable</i>
+including <i class="i">functions</i> that bind or assign it.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Argument-Precedence-Order_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Argument Precedence Order&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Argument Precedence Order&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Argument Precedence Order&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Method-Signature_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Method Signature&quot; Section of a Dictionary Entry">
+<link href="The-_0022Initial-Value_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Initial Value&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Argument-Precedence-Order_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Method-Signature_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Method Signature&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Initial-Value_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Initial Value&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Argument-Precedence-Order_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.16 The &quot;Argument Precedence Order&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Argument-Precedence-Order_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>This information describes the argument precedence order.
+If it is omitted, the argument precedence order is the default (left to right).
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Arguments-and-Values_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Arguments and Values&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Arguments and Values&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Arguments and Values&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Binding-Types-Affected_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Binding Types Affected&quot; Section of a Dictionary Entry">
+<link href="The-_0022Arguments_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Arguments&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Arguments-and-Values_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Binding-Types-Affected_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Binding Types Affected&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Arguments_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Arguments&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Arguments-and-Values_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.3 The &quot;Arguments and Values&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Arguments-and-Values_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>An English language description of what <i class="i">arguments</i> the <i class="i">operator</i> accepts
+and what <i class="i">values</i> it returns, including information about defaults for <i class="i">parameters</i>
+corresponding to omittable <i class="i">arguments</i>
+(such as <i class="i">optional parameters</i> and <i class="i">keyword parameters</i>).
+For <i class="i">special operators</i> and <i class="i">macros</i>,
+their <i class="i">arguments</i> are not <i class="i">evaluated</i> unless it is explicitly stated in their
+descriptions that they are <i class="i">evaluated</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Arguments_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Arguments&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Arguments&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Arguments&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Arguments-and-Values_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Arguments and Values&quot; Section of a Dictionary Entry">
+<link href="The-_0022Affected-By_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Affected By&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Arguments_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Arguments-and-Values_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Arguments and Values&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Affected-By_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Affected By&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Arguments_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.2 The &quot;Arguments&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Arguments_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>This information describes the syntax information of entries such as those for
+<i class="i">declarations</i> and special <i class="i">expressions</i> which are never <i class="i">evaluated</i>
+as <i class="i">forms</i>, and so do not return <i class="i">values</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Binding-Types-Affected_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Binding Types Affected&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Binding Types Affected&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Binding Types Affected&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Class-Precedence-List_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Class Precedence List&quot; Section of a Dictionary Entry">
+<link href="The-_0022Arguments-and-Values_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Arguments and Values&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Binding-Types-Affected_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Class-Precedence-List_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Class Precedence List&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Arguments-and-Values_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Arguments and Values&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Binding-Types-Affected_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.4 The &quot;Binding Types Affected&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Binding-Types-Affected_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>This information alerts the reader to the kinds of <i class="i">bindings</i> that might 
+potentially be affected by a declaration.  Whether in fact any particular such
+<i class="i">binding</i> is actually affected is dependent on additional factors as well.
+See The &quot;Description&quot; Section of the declaration in question for details.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Class-Precedence-List_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,65 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Class Precedence List&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Class Precedence List&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Class Precedence List&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="Dictionary-Entries-for-Type-Specifiers.html" rel="next" title="Dictionary Entries for Type Specifiers">
+<link href="The-_0022Binding-Types-Affected_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Binding Types Affected&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Class-Precedence-List_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="Dictionary-Entries-for-Type-Specifiers.html" accesskey="n" rel="next">Dictionary Entries for Type Specifiers</a>, Previous: <a href="The-_0022Binding-Types-Affected_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Binding Types Affected&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Class-Precedence-List_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.5 The &quot;Class Precedence List&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Class-Precedence-List_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>This appears in the dictionary entry for a <i class="i">class</i>,
+and contains an ordered list of the <i class="i">classes</i> defined 
+by <span class="r">Common Lisp</span> that must be in the <i class="i">class precedence list</i> of this <i class="i">class</i>.
+</p>
+<p>It is permissible for other (<i class="i">implementation-defined</i>) <i class="i">classes</i>
+to appear in the <i class="i">implementation</i>&rsquo;s <i class="i">class precedence list</i> for the <i class="i">class</i>.
+</p>
+<p>It is permissible for 
+  either <b class="b">standard-object</b>
+      or <b class="b">structure-object</b>
+to appear in the <i class="i">implementation</i>&rsquo;s <i class="i">class precedence list</i>;
+for details, see <a class="ref" href="Type-Relationships.html">Type Relationships</a>.
+</p>
+<p>Except as explicitly indicated otherwise somewhere in this specification,
+no additional <i class="i">standardized</i> <i class="i">classes</i> may appear in 
+the <i class="i">implementation</i>&rsquo;s <i class="i">class precedence list</i>.
+</p>
+<p>By definition of the relationship between <i class="i">classes</i> and <i class="i">types</i>,
+the <i class="i">classes</i> listed in this section are also <i class="i">supertypes</i> of 
+the <i class="i">type</i> denoted by the <i class="i">class</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Compound-Type-Specifier-Arguments_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Compound Type Specifier Arguments&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Compound Type Specifier Arguments&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Compound Type Specifier Arguments&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Compound-Type-Specifier-Description_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Compound Type Specifier Description&quot; Section of a Dictionary Entry">
+<link href="The-_0022Compound-Type-Specifier-Syntax_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Compound Type Specifier Syntax&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Compound-Type-Specifier-Arguments_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Compound-Type-Specifier-Description_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Compound Type Specifier Description&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Compound-Type-Specifier-Syntax_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Compound Type Specifier Syntax&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Compound-Type-Specifier-Arguments_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.9 The &quot;Compound Type Specifier Arguments&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Compound-Type-Specifier-Arguments_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>This information describes <i class="i">type</i> information for the structures defined in
+The &quot;Compound Type Specifier Syntax&quot; Section.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Compound-Type-Specifier-Description_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Compound Type Specifier Description&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Compound Type Specifier Description&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Compound Type Specifier Description&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Constant-Value_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Constant Value&quot; Section of a Dictionary Entry">
+<link href="The-_0022Compound-Type-Specifier-Arguments_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Compound Type Specifier Arguments&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Compound-Type-Specifier-Description_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Constant-Value_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Constant Value&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Compound-Type-Specifier-Arguments_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Compound Type Specifier Arguments&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Compound-Type-Specifier-Description_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.10 The &quot;Compound Type Specifier Description&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Compound-Type-Specifier-Description_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>This information describes the meaning of the structures defined in
+The &quot;Compound Type Specifier Syntax&quot; Section.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Compound-Type-Specifier-Kind_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Compound Type Specifier Kind&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Compound Type Specifier Kind&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Compound Type Specifier Kind&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Compound-Type-Specifier-Syntax_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Compound Type Specifier Syntax&quot; Section of a Dictionary Entry">
+<link href="Dictionary-Entries-for-Type-Specifiers.html" rel="prev" title="Dictionary Entries for Type Specifiers">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Compound-Type-Specifier-Kind_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Compound-Type-Specifier-Syntax_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Compound Type Specifier Syntax&quot; Section of a Dictionary Entry</a>, Previous: <a href="Dictionary-Entries-for-Type-Specifiers.html" accesskey="p" rel="prev">Dictionary Entries for Type Specifiers</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Compound-Type-Specifier-Kind_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.7 The &quot;Compound Type Specifier Kind&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Compound-Type-Specifier-Kind_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>An &ldquo;abbreviating&rdquo; <i class="i">type specifier</i> is one that describes a <i class="i">subtype</i>
+for which it is in principle possible to enumerate the <i class="i">elements</i>,
+but for which in practice it is impractical to do so.
+</p>
+<p>A &ldquo;specializing&rdquo; <i class="i">type specifier</i> is one that describes a <i class="i">subtype</i>
+by restricting the <i class="i">type</i> of one or more components of the <i class="i">type</i>,
+such as <i class="i">element type</i> or <i class="i">complex part type</i>.
+</p>
+<p>A &ldquo;predicating&rdquo; <i class="i">type specifier</i> is one that describes a <i class="i">subtype</i>
+containing only those <i class="i">objects</i> that satisfy a given <i class="i">predicate</i>.
+</p>
+<p>A &ldquo;combining&rdquo; <i class="i">type specifier</i> is one that describes a <i class="i">subtype</i>
+in a compositional way, using combining operations (such as &ldquo;and,&rdquo; &ldquo;or,&rdquo; and
+&ldquo;not&rdquo;) on other <i class="i">types</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Compound-Type-Specifier-Syntax_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Compound Type Specifier Syntax&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Compound Type Specifier Syntax&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Compound Type Specifier Syntax&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Compound-Type-Specifier-Arguments_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Compound Type Specifier Arguments&quot; Section of a Dictionary Entry">
+<link href="The-_0022Compound-Type-Specifier-Kind_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Compound Type Specifier Kind&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Compound-Type-Specifier-Syntax_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Compound-Type-Specifier-Arguments_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Compound Type Specifier Arguments&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Compound-Type-Specifier-Kind_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Compound Type Specifier Kind&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Compound-Type-Specifier-Syntax_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.8 The &quot;Compound Type Specifier Syntax&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Compound-Type-Specifier-Syntax_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>This information about a <i class="i">type</i> describes the syntax of a 
+<i class="i">compound type specifier</i> for that <i class="i">type</i>.
+</p>
+<p>Whether or not the <i class="i">type</i> is acceptable as an <i class="i">atomic type specifier</i>
+is not represented here; see <a class="ref" href="Dictionary-Entries-for-Type-Specifiers.html">Dictionary Entries for Type Specifiers</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Constant-Value_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Constant Value&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Constant Value&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Constant Value&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Description_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Description&quot; Section of a Dictionary Entry">
+<link href="The-_0022Compound-Type-Specifier-Description_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Compound Type Specifier Description&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Constant-Value_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Description_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Description&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Compound-Type-Specifier-Description_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Compound Type Specifier Description&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Constant-Value_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.11 The &quot;Constant Value&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Constant-Value_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>This information describes the unchanging <i class="i">type</i> and <i class="i">value</i> of 
+a <i class="i">constant variable</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Description_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Description&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Description&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Description&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Examples_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Examples&quot; Section of a Dictionary Entry">
+<link href="The-_0022Constant-Value_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Constant Value&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Description_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Examples_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Examples&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Constant-Value_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Constant Value&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Description_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.12 The &quot;Description&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Description_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>A summary of the <i class="i">operator</i> and all intended aspects of the <i class="i">operator</i>, 
+but does not necessarily include all the fields referenced below it 
+(&ldquo;Side Effects,&rdquo; &ldquo;Exceptional Situations,&rdquo; <i class="i">etc.</i>)
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Examples_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Examples&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Examples&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Examples&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Exceptional-Situations_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Exceptional Situations&quot; Section of a Dictionary Entry">
+<link href="The-_0022Description_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Description&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Examples_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Exceptional-Situations_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Exceptional Situations&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Description_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Description&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Examples_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.13 The &quot;Examples&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Examples_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>Examples of use of the <i class="i">operator</i>.
+These examples are not considered part of the standard;
+see <a class="ref" href="Sections-Not-Formally-Part-Of-This-Standard.html">Sections Not Formally Part Of This Standard</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Exceptional-Situations_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Exceptional Situations&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Exceptional Situations&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Exceptional Situations&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Initial-Value_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Initial Value&quot; Section of a Dictionary Entry">
+<link href="The-_0022Examples_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Examples&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Exceptional-Situations_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Initial-Value_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Initial Value&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Examples_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Examples&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Exceptional-Situations_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.14 The &quot;Exceptional Situations&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Exceptional-Situations_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>Three kinds of information may appear here:
+</p><dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>Situations that are detected by the <i class="i">function</i> and formally signaled.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Situations that are handled by the <i class="i">function</i>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Situations that may be detected by the <i class="i">function</i>.
+</p></dd>
+</dl>
+
+<p>This field does not include conditions that could
+be signaled by <i class="i">functions</i> passed to and called by this <i class="i">operator</i>
+as arguments or through dynamic variables, nor by executing subforms of this
+operator if it is a <i class="i">macro</i> or <i class="i">special operator</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Initial-Value_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Initial Value&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Initial Value&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Initial Value&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Argument-Precedence-Order_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Argument Precedence Order&quot; Section of a Dictionary Entry">
+<link href="The-_0022Exceptional-Situations_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Exceptional Situations&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Initial-Value_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Argument-Precedence-Order_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Argument Precedence Order&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Exceptional-Situations_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Exceptional Situations&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Initial-Value_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.15 The &quot;Initial Value&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Initial-Value_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>This information describes the initial <i class="i">value</i> of a <i class="i">dynamic variable</i>.
+Since this variable might change, see <i class="i">type</i> restrictions in The &quot;Value Type&quot; Section.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Method-Signature_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Method Signature&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Method Signature&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Method Signature&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Name_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Name&quot; Section of a Dictionary Entry">
+<link href="The-_0022Argument-Precedence-Order_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Argument Precedence Order&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Method-Signature_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Name_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Name&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Argument-Precedence-Order_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Argument Precedence Order&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Method-Signature_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.17 The &quot;Method Signature&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Method-Signature_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>The description of a <i class="i">generic function</i> includes descriptions of the
+<i class="i">methods</i> that are defined on that <i class="i">generic function</i> by the standard.  
+A method signature is used to describe the <i class="i">parameters</i> and 
+<i class="i">parameter specializers</i> for each <i class="i">method</i>. 
+<i class="i">Methods</i> defined for the <i class="i">generic function</i> must be of the form described
+by the <i class="i">method</i> <i class="i">signature</i>. 
+</p>
+<p><code class="code">F</code>  <i class="i"><span class="r">(</span><i class="i">x</i> <i class="i">class</i><span class="r">)</span>
+	      <span class="r">(</span><i class="i">y</i> t<span class="r">)</span>
+	      <span class="r">&amp;optional</span> <i class="i">z</i> <span class="r">&amp;key</span> <i class="i">k</i></i>
+</p>
+<p>This <i class="i">signature</i> indicates that this method on the <i class="i">generic function</i>
+<b class="b">F</b> has two <i class="i">required parameters</i>:
+     <i class="i">x</i>, which must be a <i class="i">generalized instance</i> of the <i class="i">class</i> <i class="i">class</i>;
+ and <i class="i">y</i>, which can  be any <i class="i">object</i> 
+       (<i class="i">i.e.</i>, a <i class="i">generalized instance</i> of the <i class="i">class</i> <b class="b">t</b>).
+In addition, there is an <i class="i">optional parameter</i> <i class="i">z</i> and a
+<i class="i">keyword parameter</i> <i class="i">k</i>.  This <i class="i">signature</i> also indicates that this
+method on <code class="t">F</code> is a <i class="i">primary method</i> and has no <i class="i">qualifiers</i>.
+</p>
+<p>For each <i class="i">parameter</i>, the <i class="i">argument</i> supplied must be in the
+intersection of the <i class="i">type</i> specified in the description of the
+corresponding <i class="i">generic function</i> and the <i class="i">type</i> given in 
+the <i class="i">signature</i> of some <i class="i">method</i> (including not only those 
+<i class="i">methods</i> defined in this specification, but also
+<i class="i">implementation-defined</i> or user-defined <i class="i">methods</i> in situations
+where the definition of such <i class="i">methods</i> is permitted).
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Name_0022-Section-of-a-Dictionary-Entry.html">The &quot;Name&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Argument-Precedence-Order_0022-Section-of-a-Dictionary-Entry.html">The &quot;Argument Precedence Order&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Name_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,137 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Name&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Name&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Name&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Notes_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Notes&quot; Section of a Dictionary Entry">
+<link href="The-_0022Method-Signature_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Method Signature&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Name_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Notes_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Notes&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Method-Signature_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Method Signature&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Name_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.18 The &quot;Name&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Name_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>This section introduces the dictionary entry.  It is not explicitly labeled.
+It appears preceded and followed by a horizontal bar.
+</p>
+<p>In large print at left, the <i class="i">defined name</i> appears; if more than one
+<i class="i">defined name</i> is to be described by the entry, all such <i class="i">names</i> 
+are shown separated by commas.
+</p>
+<p>In somewhat smaller italic print at right is an indication of what kind
+of dictionary entry this is.  Possible values are:
+</p>
+<dl class="table">
+<dt><i class="i">Accessor</i></dt>
+<dd><p>This is an <i class="i">accessor</i> <i class="i">function</i>.
+</p>
+</dd>
+<dt><i class="i">Class</i></dt>
+<dd><p>This is a <i class="i">class</i>.
+</p>
+</dd>
+<dt><i class="i">Condition Type</i></dt>
+<dd><p>This is a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">condition</b>.
+</p>
+</dd>
+<dt><i class="i">Constant Variable</i></dt>
+<dd><p>This is a <i class="i">constant variable</i>.
+</p>
+</dd>
+<dt><i class="i">Declaration</i></dt>
+<dd><p>This is a <i class="i">declaration identifier</i>.
+</p>
+</dd>
+<dt><i class="i">Function</i></dt>
+<dd><p>This is a <i class="i">function</i>.
+</p>
+</dd>
+<dt><i class="i">Local Function</i></dt>
+<dd><p>This is a <i class="i">function</i> that is defined only lexically within the scope of some
+other <i class="i">macro form</i>.
+</p>
+</dd>
+<dt><i class="i">Local Macro</i></dt>
+<dd><p>This is a <i class="i">macro</i> that is defined only lexically within the scope of some
+other <i class="i">macro form</i>.
+</p>
+</dd>
+<dt><i class="i">Macro</i></dt>
+<dd><p>This is a <i class="i">macro</i>.
+</p>
+</dd>
+<dt><i class="i">Restart</i></dt>
+<dd><p>This is a <i class="i">restart</i>.
+</p>
+</dd>
+<dt><i class="i">Special Operator</i></dt>
+<dd><p>This is a <i class="i">special operator</i>.
+</p>
+</dd>
+<dt><i class="i">Standard Generic Function</i></dt>
+<dd><p>This is a <i class="i">standard generic function</i>.
+</p>
+</dd>
+<dt><i class="i">Symbol</i></dt>
+<dd><p>This is a <i class="i">symbol</i> that is specially recognized in some particular situation,
+such as the syntax of a <i class="i">macro</i>.
+</p>
+</dd>
+<dt><i class="i">System Class</i></dt>
+<dd><p>This is like <i class="i">class</i>, but it identifies a <i class="i">class</i> that is potentially
+a <i class="i">built-in class</i>.  (No <i class="i">class</i> is actually required to be a
+<i class="i">built-in class</i>.)
+</p>
+</dd>
+<dt><i class="i">Type</i></dt>
+<dd><p>This is an <i class="i">atomic type specifier</i>,
+and depending on information for each particular entry,
+may subject to form other <i class="i">type specifiers</i>.
+</p>
+</dd>
+<dt><i class="i">Type Specifier</i></dt>
+<dd><p>This is a <i class="i">defined name</i> that is not an <i class="i">atomic type specifier</i>,
+but that can be used in constructing valid <i class="i">type specifiers</i>.
+</p>
+</dd>
+<dt><i class="i">Variable</i></dt>
+<dd><p>This is a <i class="i">dynamic variable</i>.
+</p>
+</dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Notes_0022-Section-of-a-Dictionary-Entry.html">The &quot;Notes&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Method-Signature_0022-Section-of-a-Dictionary-Entry.html">The &quot;Method Signature&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Notes_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,55 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Notes&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Notes&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Notes&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Pronunciation_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Pronunciation&quot; Section of a Dictionary Entry">
+<link href="The-_0022Name_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Name&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Notes_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Pronunciation_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Pronunciation&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Name_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Name&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Notes_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.19 The &quot;Notes&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Notes_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>Information not found elsewhere in this description
+which pertains to this <i class="i">operator</i>.
+Among other things, this might include 
+ cross reference information,
+ code equivalences, 
+ stylistic hints,
+ implementation hints,
+ typical uses.
+This information is not considered part of the standard;
+any <i class="i">conforming implementation</i> or <i class="i">conforming program</i>
+is permitted to ignore the presence of this information.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Pronunciation_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Pronunciation&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Pronunciation&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Pronunciation&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022See-Also_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;See Also&quot; Section of a Dictionary Entry">
+<link href="The-_0022Notes_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Notes&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Pronunciation_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022See-Also_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;See Also&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Notes_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Notes&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Pronunciation_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.20 The &quot;Pronunciation&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Pronunciation_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>This offers a suggested pronunciation for <i class="i">defined names</i> 
+so that people not in verbal communication with the original designers
+can figure out how to pronounce words that are not in normal English usage.
+This information is advisory only, and is not considered part of the standard.
+For brevity, it is only provided for entries with names that are specific to
+<span class="r">Common Lisp</span> and would not be found in <b class="b">Webster&rsquo;s Third New International Dictionary
+ the English Language, Unabridged</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022See-Also_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;See Also&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;See Also&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;See Also&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Side-Effects_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Side Effects&quot; Section of a Dictionary Entry">
+<link href="The-_0022Pronunciation_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Pronunciation&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022See-Also_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Side-Effects_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Side Effects&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Pronunciation_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Pronunciation&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022See-Also_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.21 The &quot;See Also&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022See-Also_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>List of references to other parts of this standard
+that offer information relevant to this <i class="i">operator</i>. 
+This list is not part of the standard.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Side-Effects_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Side Effects&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Side Effects&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Side Effects&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Supertypes_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Supertypes&quot; Section of a Dictionary Entry">
+<link href="The-_0022See-Also_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;See Also&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Side-Effects_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Supertypes_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Supertypes&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022See-Also_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;See Also&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Side-Effects_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.22 The &quot;Side Effects&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Side-Effects_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>Anything that is changed as a result of the
+evaluation of the <i class="i">form</i> containing this <i class="i">operator</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Supertypes_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Supertypes&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Supertypes&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Supertypes&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Syntax_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Syntax&quot; Section of a Dictionary Entry">
+<link href="The-_0022Side-Effects_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Side Effects&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Supertypes_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Syntax_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Syntax&quot; Section of a Dictionary Entry</a>, Previous: <a href="The-_0022Side-Effects_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Side Effects&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Supertypes_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.23 The &quot;Supertypes&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Supertypes_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>This appears in the dictionary entry for a <i class="i">type</i>,
+and contains a list of the <i class="i">standardized</i> <i class="i">types</i> 
+that must be <i class="i">supertypes</i> of this <i class="i">type</i>.
+</p>
+<p>In <i class="i">implementations</i> where there is a corresponding <i class="i">class</i>,
+the order of the <i class="i">classes</i> in the <i class="i">class precedence list</i> 
+is consistent with the order presented in this section.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Syntax_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,69 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Syntax&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Syntax&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Syntax&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="Special-_0022Syntax_0022-Notations-for-Overloaded-Operators.html" rel="next" title="Special &quot;Syntax&quot; Notations for Overloaded Operators">
+<link href="The-_0022Supertypes_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Supertypes&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Syntax_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="Special-_0022Syntax_0022-Notations-for-Overloaded-Operators.html" accesskey="n" rel="next">Special &quot;Syntax&quot; Notations for Overloaded Operators</a>, Previous: <a href="The-_0022Supertypes_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Supertypes&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Syntax_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.24 The &quot;Syntax&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Syntax_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>This section describes how to use the <i class="i">defined name</i> in code.
+The &quot;Syntax&rdquo; description for a <i class="i">generic function</i> 
+describes the <i class="i">lambda list</i> of the <i class="i">generic function</i> itself, 
+while The &quot;Method Signatures&rdquo; describe the <i class="i">lambda lists</i> 
+of the defined <i class="i">methods</i>.
+The &quot;Syntax&rdquo; description for 
+     an <i class="i">ordinary function</i>,
+     a <i class="i">macro</i>,
+  or a <i class="i">special operator</i>
+describes its <i class="i">parameters</i>.
+</p>
+<p>For example, an <i class="i">operator</i> description might say:
+</p>
+<p><code class="code">F</code>  <i class="i">x y <span class="r">&amp;optional</span> z <span class="r">&amp;key</span> k</i>
+</p>
+<p>This description indicates that the function <b class="b">F</b> 
+has two required parameters, <i class="i">x</i> and <i class="i">y</i>.  In addition,
+there is an optional parameter <i class="i">z</i> and a keyword parameter <i class="i">k</i>.
+</p>
+<p>For <i class="i">macros</i> and <i class="i">special operators</i>, syntax is given 
+in modified BNF notation; see <a class="ref" href="Modified-BNF-Syntax.html">Modified BNF Syntax</a>.
+For <i class="i">functions</i> a <i class="i">lambda list</i> is given.
+In both cases, however, the outermost parentheses are omitted,
+and default value information is omitted.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Valid-Context_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Valid Context&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Valid Context&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Valid Context&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Value-Type_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Value Type&quot; Section of a Dictionary Entry">
+<link href="Unconditional-Transfer-of-Control-in-The-_0022Syntax_0022-Section.html" rel="prev" title="Unconditional Transfer of Control in The &quot;Syntax&quot; Section">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Valid-Context_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Value-Type_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Value Type&quot; Section of a Dictionary Entry</a>, Previous: <a href="Unconditional-Transfer-of-Control-in-The-_0022Syntax_0022-Section.html" accesskey="p" rel="prev">Unconditional Transfer of Control in The &quot;Syntax&quot; Section</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Valid-Context_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.31 The &quot;Valid Context&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Valid-Context_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>This information is used by dictionary entries such as &ldquo;Declarations&rdquo;
+in order to restrict the context in which the declaration may appear.
+</p>
+<p>A given &ldquo;Declaration&rdquo; might appear in 
+     a <i class="i">declaration</i> (<i class="i">i.e.</i>, a <b class="b">declare</b> <i class="i">expression</i>),
+     a <i class="i">proclamation</i> (<i class="i">i.e.</i>, a <b class="b">declaim</b> or <b class="b">proclaim</b> <i class="i">form</i>),
+  or both.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-_0022Value-Type_0022-Section-of-a-Dictionary-Entry.html
@@ -0,0 +1,45 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The &quot;Value Type&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The &quot;Value Type&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The &quot;Value Type&quot; Section of a Dictionary Entry (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Valid-Context_0022-Section-of-a-Dictionary-Entry.html" rel="prev" title="The &quot;Valid Context&quot; Section of a Dictionary Entry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-_0022Value-Type_0022-Section-of-a-Dictionary-Entry">
+<div class="nav-panel">
+<p>
+Previous: <a href="The-_0022Valid-Context_0022-Section-of-a-Dictionary-Entry.html" accesskey="p" rel="prev">The &quot;Valid Context&quot; Section of a Dictionary Entry</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-_0022Value-Type_0022-Section-of-a-Dictionary-Entry-1"><span>1.4.4.32 The &quot;Value Type&quot; Section of a Dictionary Entry<a class="copiable-link" href="#The-_0022Value-Type_0022-Section-of-a-Dictionary-Entry-1"> &para;</a></span></h4>
+
+<p>This information describes any <i class="i">type</i> restrictions on a <i class="i">dynamic variable</i>.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-for_002das_002dacross-subclause.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The for-as-across subclause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The for-as-across subclause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The for-as-across subclause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="up" title="Variable Initialization and Stepping Clauses">
+<link href="Examples-of-for_002das_002dacross-subclause.html" rel="next" title="Examples of for-as-across subclause">
+<link href="Examples-of-for_002das_002dequals_002dthen-subclause.html" rel="prev" title="Examples of for-as-equals-then subclause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-for_002das_002dacross-subclause">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-for_002das_002dacross-subclause.html" accesskey="n" rel="next">Examples of for-as-across subclause</a>, Previous: <a href="Examples-of-for_002das_002dequals_002dthen-subclause.html" accesskey="p" rel="prev">Examples of for-as-equals-then subclause</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="u" rel="up">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-for_002das_002dacross-subclause-1"><span>6.1.2.10 The for-as-across subclause<a class="copiable-link" href="#The-for_002das_002dacross-subclause-1"> &para;</a></span></h4>
+
+<p>In the <i class="i">for-as-across</i> subclause the <code class="t">for</code> 
+  or <code class="t">as</code> construct binds the variable <i class="i">var</i> to the value of
+  each element in the array <i class="i">vector</i>.
+  The <i class="i">loop keyword</i> <code class="t">across</code> marks the array <i class="i">vector</i>; <code class="t">across</code>
+  is used as a preposition in this syntax.
+  Iteration stops when there are no more elements in the supplied
+  <i class="i">array</i> that can be referenced.
+  Some implementations might recognize a <b class="b">the</b> special form
+  in the <i class="i">vector</i> form to produce more efficient code.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-for_002das_002darithmetic-subclause.html
@@ -0,0 +1,160 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The for-as-arithmetic subclause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The for-as-arithmetic subclause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The for-as-arithmetic subclause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="up" title="Variable Initialization and Stepping Clauses">
+<link href="Examples-of-for_002das_002darithmetic-subclause.html" rel="next" title="Examples of for-as-arithmetic subclause">
+<link href="Iteration-Control.html" rel="prev" title="Iteration Control">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-for_002das_002darithmetic-subclause">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-for_002das_002darithmetic-subclause.html" accesskey="n" rel="next">Examples of for-as-arithmetic subclause</a>, Previous: <a href="Iteration-Control.html" accesskey="p" rel="prev">Iteration Control</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="u" rel="up">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-for_002das_002darithmetic-subclause-1"><span>6.1.2.2 The for-as-arithmetic subclause<a class="copiable-link" href="#The-for_002das_002darithmetic-subclause-1"> &para;</a></span></h4>
+
+<p>In the <i class="i">for-as-arithmetic</i> subclause, the <code class="t">for</code> 
+or <code class="t">as</code> construct iterates from the value supplied by
+<i class="i">form1</i> to the value supplied by <i class="i">form2</i> in increments or
+decrements denoted by <i class="i">form3</i>. Each
+expression is evaluated only once and must evaluate to a <i class="i">number</i>.  
+The variable <i class="i">var</i> is bound to the value of 
+<i class="i">form1</i> in the first iteration and is <i class="i">stepped</i>_1
+by the value of <i class="i">form3</i> in each succeeding iteration,
+or by 1 if <i class="i">form3</i> is not provided.  
+The following <i class="i">loop keywords</i> serve as valid prepositions within this 
+syntax.
+At least one of the 
+prepositions must be used; 
+and at most one from each line may be used in a single subclause.
+</p>
+<dl class="table">
+<dt>from | downfrom | upfrom</dt>
+<dt>to | downto | upto | below | above</dt>
+<dt>by</dt>
+</dl>
+
+<p>The prepositional phrases in each subclause may appear in any order.
+For example, either &ldquo;<code class="t">from x by y</code>&rdquo; or &ldquo;<code class="t">by y from x</code>&rdquo; is permitted.
+However, because left-to-right order of evaluation is preserved,
+the effects will be different in the case of side effects.
+</p>
+<a class="index-entry-id" id="index-order-of-evaluation-6"></a>
+
+<a class="index-entry-id" id="index-evaluation-order-6"></a>
+
+<p>Consider:
+</p>
+<div class="example">
+<pre class="example-preformatted">(let ((x 1)) (loop for i from x by (incf x) to 10 collect i))
+&rArr;  (1 3 5 7 9)
+(let ((x 1)) (loop for i by (incf x) from x to 10 collect i))
+&rArr;  (2 4 6 8 10)
+</pre></div>
+
+<p>The descriptions of the prepositions follow:
+</p>
+<dl class="table">
+<dt>from</dt>
+<dd><p>The <i class="i">loop keyword</i> <code class="t">from</code> specifies the value from which
+<i class="i">stepping</i>_1 begins, as supplied by <i class="i">form1</i>.  
+<i class="i">Stepping</i>_1 is incremental by default.  If 
+decremental <i class="i">stepping</i>_1 is desired, 
+the preposition <code class="t">downto</code> 
+or <code class="t">above</code> must be used with <i class="i">form2</i>.  For incremental
+<i class="i">stepping</i>_1, the default <code class="t">from</code> value is 0.
+</p>
+</dd>
+<dt>downfrom, upfrom</dt>
+<dd><p>The <i class="i">loop keyword</i> <code class="t">downfrom</code> 
+indicates that the variable <i class="i">var</i> is decreased in decrements
+supplied by <i class="i">form3</i>; the <i class="i">loop keyword</i> <code class="t">upfrom</code> indicates that 
+<i class="i">var</i> is increased in increments supplied by <i class="i">form3</i>.
+</p>
+</dd>
+<dt>to</dt>
+<dd><p>The <i class="i">loop keyword</i> <code class="t">to</code> marks the end value
+for <i class="i">stepping</i>_1 supplied in <i class="i">form2</i>.
+<i class="i">Stepping</i>_1 is incremental by default.
+If decremental <i class="i">stepping</i>_1 is desired, 
+the preposition <code class="t">downfrom</code> must be used with <i class="i">form1</i>,
+or else the preposition <code class="t">downto</code> or <code class="t">above</code> should be used instead
+   of <code class="t">to</code> with <i class="i">form2</i>.
+</p>
+</dd>
+<dt>downto, upto</dt>
+<dd><p>The <i class="i">loop keyword</i> <code class="t">downto</code> specifies decremental <i class="i">stepping</i>;
+the <i class="i">loop keyword</i> <code class="t">upto</code> specifies incremental <i class="i">stepping</i>.
+In both cases, the amount of change on each step is specified by <i class="i">form3</i>,
+and the <b class="b">loop</b> terminates when the variable <i class="i">var</i> passes 
+the value of <i class="i">form2</i>.
+Since there is no default for <i class="i">form1</i> in decremental <i class="i">stepping</i>_1,
+a <i class="i">form1</i> value must be supplied (using <code class="t">from</code> or <code class="t">downfrom</code>)
+when <code class="t">downto</code> is supplied.
+</p>
+</dd>
+<dt>below, above</dt>
+<dd><p>The <i class="i">loop keywords</i> <code class="t">below</code> and <code class="t">above</code> are analogous to
+<code class="t">upto</code> and <code class="t">downto</code> respectively.  These keywords stop
+iteration just before the value of the variable <i class="i">var</i> reaches the value 
+supplied by <i class="i">form2</i>; the end value of <i class="i">form2</i> is not included.
+Since there is no default for <i class="i">form1</i> in decremental <i class="i">stepping</i>_1,
+a <i class="i">form1</i> value must be supplied (using <code class="t">from</code> or <code class="t">downfrom</code>)
+when <code class="t">above</code> is supplied.
+</p>
+</dd>
+<dt>by</dt>
+<dd><p>The <i class="i">loop keyword</i> <code class="t">by</code> marks the increment or decrement supplied by
+<i class="i">form3</i>.  The value of <i class="i">form3</i> can be any 
+positive 
+<i class="i">number</i>.
+The default value is 1.
+</p>
+</dd>
+</dl>
+
+<p>In an iteration control clause, the <code class="t">for</code> or <code class="t">as</code> construct
+causes termination when the supplied limit is reached.  That is,
+iteration continues until the value <i class="i">var</i> is stepped to the
+exclusive or inclusive limit supplied by <i class="i">form2</i>.  The range is
+exclusive if <i class="i">form3</i> increases or decreases <i class="i">var</i>
+to the value of <i class="i">form2</i> without reaching that value; the loop
+keywords <code class="t">below</code> and <code class="t">above</code> provide exclusive limits.  An
+inclusive limit allows <i class="i">var</i> to attain the value of
+<i class="i">form2</i>; <code class="t">to</code>, <code class="t">downto</code>, and <code class="t">upto</code> provide inclusive
+limits.  
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-for_002das_002darithmetic-subclause.html">Examples of for-as-arithmetic subclause</a>, Previous: <a href="Iteration-Control.html">Iteration Control</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-for_002das_002dequals_002dthen-subclause.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The for-as-equals-then subclause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The for-as-equals-then subclause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The for-as-equals-then subclause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="up" title="Variable Initialization and Stepping Clauses">
+<link href="Examples-of-for_002das_002dequals_002dthen-subclause.html" rel="next" title="Examples of for-as-equals-then subclause">
+<link href="Examples-of-for_002das_002don_002dlist-subclause.html" rel="prev" title="Examples of for-as-on-list subclause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-for_002das_002dequals_002dthen-subclause">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-for_002das_002dequals_002dthen-subclause.html" accesskey="n" rel="next">Examples of for-as-equals-then subclause</a>, Previous: <a href="Examples-of-for_002das_002don_002dlist-subclause.html" accesskey="p" rel="prev">Examples of for-as-on-list subclause</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="u" rel="up">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-for_002das_002dequals_002dthen-subclause-1"><span>6.1.2.8 The for-as-equals-then subclause<a class="copiable-link" href="#The-for_002das_002dequals_002dthen-subclause-1"> &para;</a></span></h4>
+
+<p>In the <i class="i">for-as-equals-then</i> subclause
+the <code class="t">for</code> 
+or <code class="t">as</code> construct 
+initializes the variable <i class="i">var</i> by setting it to the
+  result of evaluating <i class="i">form1</i> on the first iteration, then setting
+  it to the result of evaluating <i class="i">form2</i> on the second and
+  subsequent iterations.  If <i class="i">form2</i> is omitted, the construct
+  uses <i class="i">form1</i> on the second and
+  subsequent iterations.  
+The <i class="i">loop keywords</i> <span class="r">=</span> and <code class="t">then</code> serve as valid prepositions
+in this syntax. 
+This construct does not provide any termination tests.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-for_002das_002dhash-subclause.html
@@ -0,0 +1,118 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The for-as-hash subclause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The for-as-hash subclause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The for-as-hash subclause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="up" title="Variable Initialization and Stepping Clauses">
+<link href="The-for_002das_002dpackage-subclause.html" rel="next" title="The for-as-package subclause">
+<link href="Examples-of-for_002das_002dacross-subclause.html" rel="prev" title="Examples of for-as-across subclause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-for_002das_002dhash-subclause">
+<div class="nav-panel">
+<p>
+Next: <a href="The-for_002das_002dpackage-subclause.html" accesskey="n" rel="next">The for-as-package subclause</a>, Previous: <a href="Examples-of-for_002das_002dacross-subclause.html" accesskey="p" rel="prev">Examples of for-as-across subclause</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="u" rel="up">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-for_002das_002dhash-subclause-1"><span>6.1.2.12 The for-as-hash subclause<a class="copiable-link" href="#The-for_002das_002dhash-subclause-1"> &para;</a></span></h4>
+
+<p>In the <i class="i">for-as-hash</i> subclause
+  the <code class="t">for</code> 
+  or <code class="t">as</code> construct 
+  iterates over the elements, keys, and values of a <i class="i">hash-table</i>.
+  In this syntax, a compound preposition is used to designate access to a
+  <i class="i">hash table</i>.
+  The variable <i class="i">var</i> takes on the value of each hash key
+  or hash value in the supplied <i class="i">hash-table</i>. 
+  The following <i class="i">loop keywords</i> serve as valid prepositions within this syntax:
+</p>
+<dl class="table">
+<dt><code class="t">being</code></dt>
+<dd><p>The keyword <code class="t">being</code> introduces either the Loop schema 
+<code class="t">hash-key</code> or <code class="t">hash-value</code>.
+</p>
+</dd>
+<dt><code class="t">each</code>, <code class="t">the</code></dt>
+<dd><p>The <i class="i">loop keyword</i> <code class="t">each</code>
+follows the <i class="i">loop keyword</i> <code class="t">being</code> when <code class="t">hash-key</code> or
+<code class="t">hash-value</code> is used.  The <i class="i">loop keyword</i> <code class="t">the</code> is used with
+<code class="t">hash-keys</code> and <code class="t">hash-values</code> only for ease of reading.
+This agreement isn&rsquo;t required.
+</p>
+</dd>
+<dt><code class="t">hash-key</code>, <code class="t">hash-keys</code></dt>
+<dd><p>These <i class="i">loop keywords</i> access each key entry of the <i class="i">hash table</i>.  If 
+the name <code class="t">hash-value</code> is supplied in a <code class="t">using</code> construct with one
+of these Loop schemas, the iteration can optionally access the keyed
+value. The order in which the keys are accessed is undefined; empty
+slots in the <i class="i">hash table</i> are ignored.  
+</p>
+</dd>
+<dt><code class="t">hash-value</code>, <code class="t">hash-values</code></dt>
+<dd><p>These <i class="i">loop keywords</i> access each value entry of a 
+<i class="i">hash table</i>.  If 
+the name <code class="t">hash-key</code> is supplied in a <code class="t">using</code> construct with one of
+these Loop schemas, the iteration can optionally access the key that
+corresponds to the value.  The order in which the keys are accessed is
+undefined; empty slots in the <i class="i">hash table</i> are ignored. 
+</p>
+</dd>
+<dt><code class="t">using</code></dt>
+<dd><p>The <i class="i">loop keyword</i> <code class="t">using</code> introduces 
+the optional key or the keyed value to
+be accessed.  It allows access to the hash key if iteration is over
+the hash values, and the hash value if 
+iteration is over the hash keys.
+</p>
+</dd>
+<dt><code class="t">in</code>, <code class="t">of</code></dt>
+<dd><p>These loop prepositions introduce <i class="i">hash-table</i>.
+</p>
+</dd>
+</dl>
+
+<p>In effect 
+</p>
+<p><code class="t">being</code>
+{<code class="t">each</code> | <code class="t">the</code>}
+{<code class="t">hash-value</code>  |
+       <code class="t">hash-values</code> |
+       <code class="t">hash-key</code>    |
+       <code class="t">hash-keys</code>}
+{<code class="t">in</code> | <code class="t">of</code>}
+</p>
+<p>is a compound preposition.
+</p>
+<p>Iteration stops when there are no more hash keys or hash values to be
+referenced in the supplied <i class="i">hash-table</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="The-for_002das_002dpackage-subclause.html">The for-as-package subclause</a>, Previous: <a href="Examples-of-for_002das_002dacross-subclause.html">Examples of for-as-across subclause</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-for_002das_002din_002dlist-subclause.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The for-as-in-list subclause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The for-as-in-list subclause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The for-as-in-list subclause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="up" title="Variable Initialization and Stepping Clauses">
+<link href="Examples-of-for_002das_002din_002dlist-subclause.html" rel="next" title="Examples of for-as-in-list subclause">
+<link href="Examples-of-for_002das_002darithmetic-subclause.html" rel="prev" title="Examples of for-as-arithmetic subclause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-for_002das_002din_002dlist-subclause">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-for_002das_002din_002dlist-subclause.html" accesskey="n" rel="next">Examples of for-as-in-list subclause</a>, Previous: <a href="Examples-of-for_002das_002darithmetic-subclause.html" accesskey="p" rel="prev">Examples of for-as-arithmetic subclause</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="u" rel="up">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-for_002das_002din_002dlist-subclause-1"><span>6.1.2.4 The for-as-in-list subclause<a class="copiable-link" href="#The-for_002das_002din_002dlist-subclause-1"> &para;</a></span></h4>
+
+<p>In the <i class="i">for-as-in-list</i> subclause,
+the <code class="t">for</code> 
+or <code class="t">as</code> construct iterates over the contents of a 
+<i class="i">list</i>.  It checks for 
+the end of the <i class="i">list</i> as if by using <b class="b">endp</b>.  
+The variable <i class="i">var</i> is bound to the successive elements  of 
+the <i class="i">list</i> in <i class="i">form1</i> before each
+iteration.  At the end of each iteration, the function <i class="i">step-fun</i>
+is applied to the <i class="i">list</i>; the default value for <i class="i">step-fun</i> is
+<b class="b">cdr</b>.
+The <i class="i">loop keywords</i> <code class="t">in</code> and <code class="t">by</code> serve as valid prepositions in
+this syntax.
+The <code class="t">for</code> or <code class="t">as</code> construct causes termination when the
+end of the <i class="i">list</i> is reached.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-for_002das_002don_002dlist-subclause.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The for-as-on-list subclause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The for-as-on-list subclause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The for-as-on-list subclause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="up" title="Variable Initialization and Stepping Clauses">
+<link href="Examples-of-for_002das_002don_002dlist-subclause.html" rel="next" title="Examples of for-as-on-list subclause">
+<link href="Examples-of-for_002das_002din_002dlist-subclause.html" rel="prev" title="Examples of for-as-in-list subclause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-for_002das_002don_002dlist-subclause">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-for_002das_002don_002dlist-subclause.html" accesskey="n" rel="next">Examples of for-as-on-list subclause</a>, Previous: <a href="Examples-of-for_002das_002din_002dlist-subclause.html" accesskey="p" rel="prev">Examples of for-as-in-list subclause</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="u" rel="up">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-for_002das_002don_002dlist-subclause-1"><span>6.1.2.6 The for-as-on-list subclause<a class="copiable-link" href="#The-for_002das_002don_002dlist-subclause-1"> &para;</a></span></h4>
+
+<p>In the <i class="i">for-as-on-list</i> subclause, the <code class="t">for</code> or <code class="t">as</code>
+construct iterates over
+a <i class="i">list</i>. It checks for the
+end of the <i class="i">list</i> as if by using <b class="b">atom</b>.
+</p>
+<p>The variable <i class="i">var</i> is bound to the successive tails of the 
+<i class="i">list</i> in 
+<i class="i">form1</i>.  At the end of each iteration, the function <i class="i">step-fun</i>
+ is applied to the <i class="i">list</i>; the default value for <i class="i">step-fun</i> is <b class="b">cdr</b>.
+ The <i class="i">loop keywords</i> <code class="t">on</code> and <code class="t">by</code> serve as valid
+prepositions in this syntax.
+The <code class="t">for</code> or <code class="t">as</code> construct causes termination when the
+end of the <i class="i">list</i> is reached.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/The-for_002das_002dpackage-subclause.html
@@ -0,0 +1,130 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>The for-as-package subclause (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="The for-as-package subclause (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="The for-as-package subclause (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="up" title="Variable Initialization and Stepping Clauses">
+<link href="Examples-of-for_002das_002dpackage-subclause.html" rel="next" title="Examples of for-as-package subclause">
+<link href="The-for_002das_002dhash-subclause.html" rel="prev" title="The for-as-hash subclause">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="The-for_002das_002dpackage-subclause">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-for_002das_002dpackage-subclause.html" accesskey="n" rel="next">Examples of for-as-package subclause</a>, Previous: <a href="The-for_002das_002dhash-subclause.html" accesskey="p" rel="prev">The for-as-hash subclause</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="u" rel="up">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="The-for_002das_002dpackage-subclause-1"><span>6.1.2.13 The for-as-package subclause<a class="copiable-link" href="#The-for_002das_002dpackage-subclause-1"> &para;</a></span></h4>
+
+<p>In the <i class="i">for-as-package</i> subclause
+the <code class="t">for</code> 
+or <code class="t">as</code> construct                    
+iterates over the <i class="i">symbols</i> in a <i class="i">package</i>.
+In this syntax, a compound preposition is used to designate access to a
+<i class="i">package</i>.
+The variable <i class="i">var</i> takes on the value of each <i class="i">symbol</i>
+in the supplied <i class="i">package</i>.  
+ The following <i class="i">loop keywords</i> serve as valid prepositions within this syntax:
+</p>
+<dl class="table">
+<dt><code class="t">being</code></dt>
+<dd><p>The keyword <code class="t">being</code> introduces either the Loop schema 
+<code class="t">symbol</code>, <code class="t">present-symbol</code>,  or <code class="t">external-symbol</code>.
+</p>
+</dd>
+<dt><code class="t">each</code>, <code class="t">the</code></dt>
+<dd><p>The <i class="i">loop keyword</i> <code class="t">each</code>
+follows the <i class="i">loop keyword</i> <code class="t">being</code> when <code class="t">symbol</code>, 
+<code class="t">present-symbol</code>, or <code class="t">external-symbol</code> is used.  
+The <i class="i">loop keyword</i> <code class="t">the</code> is used with <code class="t">symbols</code>, 
+<code class="t">present-symbols</code>, and <code class="t">external-symbols</code> only for ease of reading.
+This agreement isn&rsquo;t required.
+</p>
+</dd>
+<dt><code class="t">present-symbol</code>, <code class="t">present-symbols</code></dt>
+<dd><p>These Loop schemas iterate over the <i class="i">symbols</i> 
+</p>
+<p>that are <i class="i">present</i> in a <i class="i">package</i>.
+</p>
+<p>The <i class="i">package</i> to be iterated over is supplied in the same way
+that <i class="i">package</i> arguments to <b class="b">find-package</b> are supplied.  
+If the <i class="i">package</i> for the iteration is not supplied, 
+the <i class="i">current package</i> is used.  
+If a <i class="i">package</i> that does not exist is supplied, 
+an error of <i class="i">type</i> <b class="b">package-error</b> is signaled.
+</p>
+</dd>
+<dt><code class="t">symbol</code>, <code class="t">symbols</code></dt>
+<dd><p>These Loop schemas iterate over <i class="i">symbols</i> that are
+<i class="i">accessible</i> in a given <i class="i">package</i>.  
+The <i class="i">package</i> to be iterated over is supplied in the same way
+that <i class="i">package</i> arguments to <b class="b">find-package</b> are supplied.
+If the <i class="i">package</i> for the iteration is not supplied, 
+the <i class="i">current package</i> is used.
+If a <i class="i">package</i> that does not exist is supplied, 
+an error of <i class="i">type</i> <b class="b">package-error</b> is signaled.
+</p>
+</dd>
+<dt><code class="t">external-symbol</code>, <code class="t">external-symbols</code></dt>
+<dd><p>These Loop schemas iterate over the <i class="i">external symbols</i> of a <i class="i">package</i>.
+The <i class="i">package</i> to be iterated over is supplied in the same way
+that <i class="i">package</i> arguments to <b class="b">find-package</b> are supplied.
+If the <i class="i">package</i> for the iteration is not supplied, 
+the <i class="i">current package</i> is used.
+If a <i class="i">package</i> that does not exist is supplied, 
+an error of <i class="i">type</i> <b class="b">package-error</b> is signaled.
+</p>
+</dd>
+<dt><code class="t">in</code>, <code class="t">of</code></dt>
+<dd><p>These loop prepositions introduce <i class="i">package</i>.
+</p>
+</dd>
+</dl>
+
+<p>In effect 
+</p>
+<p><code class="t">being</code>
+{<code class="t">each</code> | <code class="t">the</code>}
+{<code class="t">symbol</code>          |
+       <code class="t">symbols</code>         |
+       <code class="t">present-symbol</code>  |
+       <code class="t">present-symbols</code> |
+       <code class="t">external-symbol</code> |
+       <code class="t">external-symbols</code>}
+{<code class="t">in</code> | <code class="t">of</code>}
+</p>
+<p>is a compound preposition.
+</p>
+<p>Iteration stops when there are no more <i class="i">symbols</i> to be referenced 
+in the supplied <i class="i">package</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-for_002das_002dpackage-subclause.html">Examples of for-as-package subclause</a>, Previous: <a href="The-for_002das_002dhash-subclause.html">The for-as-hash subclause</a>, Up: <a href="Variable-Initialization-and-Stepping-Clauses.html">Variable Initialization and Stepping Clauses</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-A_002d_003e-Aesthetic.html
@@ -0,0 +1,72 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde A-&gt; Aesthetic (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde A-&gt; Aesthetic (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde A-&gt; Aesthetic (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Printer-Operations.html" rel="up" title="FORMAT Printer Operations">
+<link href="Tilde-S_002d_003e-Standard.html" rel="next" title="Tilde S-&gt; Standard">
+<link href="FORMAT-Printer-Operations.html" rel="prev" title="FORMAT Printer Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-A_002d_003e-Aesthetic">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-S_002d_003e-Standard.html" accesskey="n" rel="next">Tilde S: Standard</a>, Previous: <a href="FORMAT-Printer-Operations.html" accesskey="p" rel="prev">FORMAT Printer Operations</a>, Up: <a href="FORMAT-Printer-Operations.html" accesskey="u" rel="up">FORMAT Printer Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-A_003a-Aesthetic"><span>22.3.4.1 Tilde A: Aesthetic<a class="copiable-link" href="#Tilde-A_003a-Aesthetic"> &para;</a></span></h4>
+
+<p>An <i class="i">arg</i>, any <i class="i">object</i>, 
+is printed without escape characters
+(as by <b class="b">princ</b>).  If <i class="i">arg</i> is a <i class="i">string</i>, 
+its <i class="i">characters</i>
+will be output verbatim.
+If <i class="i">arg</i> is <b class="b">nil</b> it will be printed as <b class="b">nil</b>;
+the <i class="i">colon</i> modifier (<code class="t">~:A</code>) will cause an <i class="i">arg</i> of <b class="b">nil</b> to be printed as <code class="t">()</code>,
+but if <i class="i">arg</i> is a composite structure, such as a <i class="i">list</i> or <i class="i">vector</i>,
+any contained occurrences of <b class="b">nil</b> will still be printed as <b class="b">nil</b>.
+</p>
+<p><code class="t">~<i class="i">mincol</i>A</code> inserts spaces on the right, if necessary, to make the
+width at least <i class="i">mincol</i> columns.  The <code class="t">@</code>
+modifier causes the spaces
+to be inserted on the left rather than the right.
+</p>
+<p><code class="t">~<i class="i">mincol</i>,<i class="i">colinc</i>,<i class="i">minpad</i>,<i class="i">padchar</i>A</code> 
+is the full form of <code class="t">~A</code>,
+which allows control of the padding.
+The <i class="i">string</i> is padded on the right (or on the left if the
+<code class="t">@</code> modifier is used) with at least <i class="i">minpad</i> copies
+of <i class="i">padchar</i>; padding characters are then inserted <i class="i">colinc</i> characters
+at a time until the total width is at least <i class="i">mincol</i>.
+The defaults are <code class="t">0</code> for <i class="i">mincol</i> and <i class="i">minpad</i>, <code class="t">1</code> for <i class="i">colinc</i>,
+and the space character for <i class="i">padchar</i>.
+</p>
+<p><code class="t">~A</code> binds <b class="b">*print-escape*</b> to <i class="i">false</i>,
+</p>
+<p>and <b class="b">*print-readably*</b> to <i class="i">false</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Ampersand_002d_003e-Fresh_002dLine.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Ampersand-&gt; Fresh-Line (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Ampersand-&gt; Fresh-Line (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Ampersand-&gt; Fresh-Line (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Basic-Output.html" rel="up" title="FORMAT Basic Output">
+<link href="Tilde-Vertical_002dBar_002d_003e-Page.html" rel="next" title="Tilde Vertical-Bar-&gt; Page">
+<link href="Tilde-Percent_002d_003e-Newline.html" rel="prev" title="Tilde Percent-&gt; Newline">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Ampersand_002d_003e-Fresh_002dLine">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Vertical_002dBar_002d_003e-Page.html" accesskey="n" rel="next">Tilde Vertical-Bar: Page</a>, Previous: <a href="Tilde-Percent_002d_003e-Newline.html" accesskey="p" rel="prev">Tilde Percent: Newline</a>, Up: <a href="FORMAT-Basic-Output.html" accesskey="u" rel="up">FORMAT Basic Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Ampersand_003a-Fresh_002dLine"><span>22.3.1.3 Tilde Ampersand: Fresh-Line<a class="copiable-link" href="#Tilde-Ampersand_003a-Fresh_002dLine"> &para;</a></span></h4>
+
+<p>Unless it can be determined that the output stream
+is already at the beginning of a line,
+this outputs a newline.
+<code class="t">~<i class="i">n</i>&amp;</code> calls <b class="b">fresh-line</b>
+and then outputs <i class="i">n</i>- 1 newlines.
+<code class="t">~0&amp;</code> does nothing.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Asterisk_002d_003e-Go_002dTo.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Asterisk-&gt; Go-To (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Asterisk-&gt; Go-To (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Asterisk-&gt; Go-To (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Control_002dFlow-Operations.html" rel="up" title="FORMAT Control-Flow Operations">
+<link href="Tilde-Left_002dBracket_002d_003e-Conditional-Expression.html" rel="next" title="Tilde Left-Bracket-&gt; Conditional Expression">
+<link href="FORMAT-Control_002dFlow-Operations.html" rel="prev" title="FORMAT Control-Flow Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Asterisk_002d_003e-Go_002dTo">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Left_002dBracket_002d_003e-Conditional-Expression.html" accesskey="n" rel="next">Tilde Left-Bracket: Conditional Expression</a>, Previous: <a href="FORMAT-Control_002dFlow-Operations.html" accesskey="p" rel="prev">FORMAT Control-Flow Operations</a>, Up: <a href="FORMAT-Control_002dFlow-Operations.html" accesskey="u" rel="up">FORMAT Control-Flow Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Asterisk_003a-Go_002dTo"><span>22.3.7.1 Tilde Asterisk: Go-To<a class="copiable-link" href="#Tilde-Asterisk_003a-Go_002dTo"> &para;</a></span></h4>
+
+<p>The next <i class="i">arg</i> is ignored.
+<code class="t">~<i class="i">n</i>*</code> ignores the next <i class="i">n</i> arguments.
+</p>
+<p><code class="t">~:*</code> backs up in the list of
+arguments so that the argument last processed will be processed again.
+<code class="t">~<i class="i">n</i>:*</code> backs up <i class="i">n</i> arguments.
+</p>
+<p>When within a <code class="t">~{</code> construct
+(see below), the ignoring (in either direction) is relative to the list
+of arguments being processed by the iteration.
+</p>
+<p><code class="t">~<i class="i">n</i>@*</code> 
+goes to the <i class="i">n</i>th <i class="i">arg</i>, where 0 means the first one;
+<i class="i">n</i> defaults to 0, so <code class="t">~@*</code> goes back to the first <i class="i">arg</i>.      
+Directives after a <code class="t">~<i class="i">n</i>@*</code>
+will take arguments in sequence beginning with the one gone to.
+When within a <code class="t">~{</code> construct, the &ldquo;goto&rdquo;
+is relative to the list of arguments being processed by the iteration.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-B_002d_003e-Binary.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde B-&gt; Binary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde B-&gt; Binary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde B-&gt; Binary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Radix-Control.html" rel="up" title="FORMAT Radix Control">
+<link href="Tilde-O_002d_003e-Octal.html" rel="next" title="Tilde O-&gt; Octal">
+<link href="Tilde-D_002d_003e-Decimal.html" rel="prev" title="Tilde D-&gt; Decimal">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-B_002d_003e-Binary">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-O_002d_003e-Octal.html" accesskey="n" rel="next">Tilde O: Octal</a>, Previous: <a href="Tilde-D_002d_003e-Decimal.html" accesskey="p" rel="prev">Tilde D: Decimal</a>, Up: <a href="FORMAT-Radix-Control.html" accesskey="u" rel="up">FORMAT Radix Control</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-B_003a-Binary"><span>22.3.2.3 Tilde B: Binary<a class="copiable-link" href="#Tilde-B_003a-Binary"> &para;</a></span></h4>
+
+<p>This is just like <code class="t">~D</code> but prints in binary radix (radix 2)
+instead of decimal.  The full form is therefore
+<code class="t">~<i class="i">mincol</i>,<i class="i">padchar</i>,<i class="i">commachar</i>,<i class="i">comma-interval</i>B</code>.
+</p>
+<p><code class="t">~B</code> binds
+     <b class="b">*print-escape*</b> to <i class="i">false</i>,
+     <b class="b">*print-radix*</b> to <i class="i">false</i>,
+     <b class="b">*print-base*</b> to <code class="t">2</code>,
+</p>
+<p>and <b class="b">*print-readably*</b> to <i class="i">false</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-C_002d_003e-Character.html
@@ -0,0 +1,101 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde C-&gt; Character (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde C-&gt; Character (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde C-&gt; Character (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Basic-Output.html" rel="up" title="FORMAT Basic Output">
+<link href="Tilde-Percent_002d_003e-Newline.html" rel="next" title="Tilde Percent-&gt; Newline">
+<link href="FORMAT-Basic-Output.html" rel="prev" title="FORMAT Basic Output">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-C_002d_003e-Character">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Percent_002d_003e-Newline.html" accesskey="n" rel="next">Tilde Percent: Newline</a>, Previous: <a href="FORMAT-Basic-Output.html" accesskey="p" rel="prev">FORMAT Basic Output</a>, Up: <a href="FORMAT-Basic-Output.html" accesskey="u" rel="up">FORMAT Basic Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-C_003a-Character"><span>22.3.1.1 Tilde C: Character<a class="copiable-link" href="#Tilde-C_003a-Character"> &para;</a></span></h4>
+
+<p>The next <i class="i">arg</i> should be a <i class="i">character</i>; 
+it is printed
+according to the modifier flags.
+</p>
+<p><code class="t">~C</code> prints the <i class="i">character</i> 
+as if by using <b class="b">write-char</b> if it is a <i class="i">simple character</i>.
+<i class="i">Characters</i> that are not <i class="i">simple</i>
+are not necessarily printed as if by <b class="b">write-char</b>,
+but are displayed in an <i class="i">implementation-defined</i>, abbreviated format.
+For example,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;~C&quot; #\A) &rArr;  &quot;A&quot;
+ (format nil &quot;~C&quot; #\Space) &rArr;  &quot; &quot;
+</pre></div>
+
+<p><code class="t">~:C</code> is the same as <code class="t">~C</code> for <i class="i">printing</i> <i class="i">characters</i>,
+but other <i class="i">characters</i> are &ldquo;spelled out.&rdquo;  The intent is that this
+is a &ldquo;pretty&rdquo; format for printing characters.
+For <i class="i">simple</i> <i class="i">characters</i> that are not <i class="i">printing</i>,
+what is spelled out is the <i class="i">name</i> of the <i class="i">character</i> (see <b class="b">char-name</b>).
+For <i class="i">characters</i> that are not <i class="i">simple</i> and not <i class="i">printing</i>,
+what is spelled out is <i class="i">implementation-defined</i>.
+For example, 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;~:C&quot; #\A) &rArr;  &quot;A&quot;
+ (format nil &quot;~:C&quot; #\Space) &rArr;  &quot;Space&quot;
+;; This next example assumes an implementation-defined &quot;Control&quot; attribute.
+ (format nil &quot;~:C&quot; #\Control-Space)
+&rArr;  &quot;Control-Space&quot;
+<i class="i">OR</i>&rArr; &quot;c-Space&quot;
+</pre></div>
+
+<p><code class="t">~:@C</code> prints what <code class="t">~:C</code> would, and then
+if the <i class="i">character</i> requires unusual shift keys on the keyboard to type it,
+this fact is mentioned.  For example,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;~:@C&quot; #\Control-Partial) &rArr;  &quot;Control-\partial (Top-F)&quot;  
+</pre></div>
+
+<p>This is the format used for telling the user about a key he is expected to type,
+in prompts, for instance.  The precise output may depend not only
+on the implementation, but on the particular I/O devices in use.
+</p>
+<p><code class="t">~@C</code> 
+prints the <i class="i">character</i> in a way that the <i class="i">Lisp reader</i> can understand,
+using <code class="t">#\</code> syntax.
+</p>
+<p><code class="t">~@C</code>  binds <b class="b">*print-escape*</b> to <b class="b">t</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Percent_002d_003e-Newline.html">Tilde Percent: Newline</a>, Previous: <a href="FORMAT-Basic-Output.html">FORMAT Basic Output</a>, Up: <a href="FORMAT-Basic-Output.html">FORMAT Basic Output</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Circumflex_002d_003e-Escape-Upward.html
@@ -0,0 +1,144 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Circumflex-&gt; Escape Upward (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Circumflex-&gt; Escape Upward (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Circumflex-&gt; Escape Upward (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Miscellaneous-Pseudo_002dOperations.html" rel="up" title="FORMAT Miscellaneous Pseudo-Operations">
+<link href="Tilde-Newline_002d_003e-Ignored-Newline.html" rel="next" title="Tilde Newline-&gt; Ignored Newline">
+<link href="Tilde-Semicolon_002d_003e-Clause-Separator.html" rel="prev" title="Tilde Semicolon-&gt; Clause Separator">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Circumflex_002d_003e-Escape-Upward">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Newline_002d_003e-Ignored-Newline.html" accesskey="n" rel="next">Tilde Newline: Ignored Newline</a>, Previous: <a href="Tilde-Semicolon_002d_003e-Clause-Separator.html" accesskey="p" rel="prev">Tilde Semicolon: Clause Separator</a>, Up: <a href="FORMAT-Miscellaneous-Pseudo_002dOperations.html" accesskey="u" rel="up">FORMAT Miscellaneous Pseudo-Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Circumflex_003a-Escape-Upward"><span>22.3.9.2 Tilde Circumflex: Escape Upward<a class="copiable-link" href="#Tilde-Circumflex_003a-Escape-Upward"> &para;</a></span></h4>
+
+<p><code class="t">~<code class="t">^</code> </code>
+</p>
+<p>This is an escape construct.  If there are no more arguments remaining to
+be processed, then the immediately           
+enclosing <code class="t">~{  </code> or <code class="t">~&lt;</code> construct
+is terminated.  If there is no such enclosing construct, then the entire
+formatting operation is terminated.  
+In the <code class="t">~&lt;</code> case, the formatting
+is performed, but no more segments are processed before doing the
+justification.     
+<code class="t">~<code class="t">^</code> </code> may appear anywhere in a <code class="t">~{  </code>
+construct.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq donestr &quot;Done.~<code class="t">^</code> ~D warning~:P.~<code class="t">^</code> ~D error~:P.&quot;)
+&rArr;  &quot;Done.~<code class="t">^</code> ~D warning~:P.~<code class="t">^</code> ~D error~:P.&quot;
+ (format nil donestr) &rArr;  &quot;Done.&quot;
+ (format nil donestr 3) &rArr;  &quot;Done. 3 warnings.&quot;
+ (format nil donestr 1 5) &rArr;  &quot;Done. 1 warning. 5 errors.&quot;
+</pre></div>
+
+<p>If a prefix parameter is given, then termination occurs if the parameter
+is zero.  (Hence <code class="t">~<code class="t">^</code></code> is equivalent to 
+<code class="t">~#<code class="t">^</code></code>.)  If two
+parameters are given, termination occurs if they are equal.
+</p>
+<p>[Reviewer Note by Barmar: Which equality predicate?]  If three
+parameters are given, termination occurs if the first is less than or
+equal to the second and the second is less than or equal to the third.
+Of course, this is useless if all the prefix parameters are constants; at
+least one of them should be a <code class="t">#</code> or a <code class="t">V</code> parameter.
+</p>
+<p>If <code class="t">~<code class="t">^</code></code> is used within a <code class="t">~:{  </code> 
+construct, then it terminates
+the current iteration step because in the standard case it tests for
+remaining arguments of the current step only; the next iteration step
+commences immediately.  <code class="t">~:<code class="t">^</code></code> is used to terminate
+the iteration process.
+</p>
+<p><code class="t">~:<code class="t">^</code></code> 
+may be used only if the command it would terminate is 
+<code class="t">~:{  </code> or <code class="t">~:@{  </code>.
+The entire iteration process is terminated if and only if the sublist that is
+supplying the arguments for the current iteration step is the last sublist in
+the case of <code class="t">~:{ </code>, 
+or the last <b class="b">format</b>        
+argument in the case of <code class="t">~:@{  </code>. 
+<code class="t">~:<code class="t">^</code></code> is not
+equivalent to <code class="t">~#:<code class="t">^</code></code>; 
+the latter terminates the entire iteration if and only if no
+arguments remain for the current iteration step.
+For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;~:{ ~@?~:<code class="t">^</code> ...~} &quot; '((&quot;a&quot;) (&quot;b&quot;))) &rArr;  &quot;a...b&quot;
+</pre></div>
+
+<p>If <code class="t">~<code class="t">^</code></code> appears within a control string being processed
+under the control of a <code class="t">~?</code> directive, but not within
+any <code class="t">~{  </code> or <code class="t">~&lt;</code> construct within that string,
+then the string being
+processed will be terminated, thereby ending processing
+of the <code class="t">~?</code> directive.  Processing then
+continues within the string   
+containing the <code class="t">~?</code> directive at the point following that directive.
+</p>
+<p>If <code class="t">~<code class="t">^</code></code>                                          
+appears within a <code class="t">~[</code> or <code class="t">~(</code> construct,
+then all the commands up to the <code class="t">~<code class="t">^</code></code> are properly selected
+or case-converted,                   
+the <code class="t">~[</code> or <code class="t">~(</code> processing is terminated,
+and the outward search continues         
+for a <code class="t">~{  </code> or <code class="t">~&lt;</code> construct
+to be terminated.  For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq tellstr &quot;~@(~@[~R~]~<code class="t">^</code> ~A!~)&quot;)
+&rArr;  &quot;~@(~@[~R~]~<code class="t">^</code> ~A!~)&quot;
+ (format nil tellstr 23) &rArr;  &quot;Twenty-three!&quot;
+ (format nil tellstr nil &quot;losers&quot;) &rArr;  &quot; Losers!&quot;
+ (format nil tellstr 23 &quot;losers&quot;) &rArr;  &quot;Twenty-three losers!&quot;
+</pre></div>
+
+<p>Following are examples of the use of <code class="t">~<code class="t">^</code></code> 
+within a <code class="t">~&lt;</code> construct.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;~15&lt;~S~;~<code class="t">^</code>~S~;~<code class="t">^</code>~S~&gt;&quot; 'foo)
+&rArr;   &quot;            FOO&quot;
+ (format nil &quot;~15&lt;~S~;~<code class="t">^</code>~S~;~<code class="t">^</code>~S~&gt;&quot; 'foo 'bar)
+&rArr;   &quot;FOO         BAR&quot;
+ (format nil &quot;~15&lt;~S~;~<code class="t">^</code>~S~;~<code class="t">^</code>~S~&gt;&quot; 'foo 'bar 'baz)
+&rArr;   &quot;FOO   BAR   BAZ&quot;
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Newline_002d_003e-Ignored-Newline.html">Tilde Newline: Ignored Newline</a>, Previous: <a href="Tilde-Semicolon_002d_003e-Clause-Separator.html">Tilde Semicolon: Clause Separator</a>, Up: <a href="FORMAT-Miscellaneous-Pseudo_002dOperations.html">FORMAT Miscellaneous Pseudo-Operations</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-D_002d_003e-Decimal.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde D-&gt; Decimal (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde D-&gt; Decimal (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde D-&gt; Decimal (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Radix-Control.html" rel="up" title="FORMAT Radix Control">
+<link href="Tilde-B_002d_003e-Binary.html" rel="next" title="Tilde B-&gt; Binary">
+<link href="Tilde-R_002d_003e-Radix.html" rel="prev" title="Tilde R-&gt; Radix">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-D_002d_003e-Decimal">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-B_002d_003e-Binary.html" accesskey="n" rel="next">Tilde B: Binary</a>, Previous: <a href="Tilde-R_002d_003e-Radix.html" accesskey="p" rel="prev">Tilde R: Radix</a>, Up: <a href="FORMAT-Radix-Control.html" accesskey="u" rel="up">FORMAT Radix Control</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-D_003a-Decimal"><span>22.3.2.2 Tilde D: Decimal<a class="copiable-link" href="#Tilde-D_003a-Decimal"> &para;</a></span></h4>
+
+<p>An <i class="i">arg</i>, which should be an <i class="i">integer</i>, 
+is printed in decimal radix.
+<code class="t">~D</code> will never put a decimal point after the number.
+</p>
+<p><code class="t">~<i class="i">mincol</i>D</code> uses 
+a column width of <i class="i">mincol</i>; spaces are inserted on
+the left if the number requires fewer than <i class="i">mincol</i> columns for its digits
+and sign.  If the number doesn&rsquo;t fit in <i class="i">mincol</i> columns, additional columns
+are used as needed.
+</p>
+<p><code class="t">~<i class="i">mincol</i>,<i class="i">padchar</i>D</code> uses <i class="i">padchar</i> as the pad character
+instead of space.
+</p>
+<p>If <i class="i">arg</i> is not an <i class="i">integer</i>, it is printed in <code class="t">~A</code> format and decimal base.
+</p>
+<p>The <code class="t">@</code> modifier causes the number&rsquo;s sign to be printed always; the default
+is to print it only if the number is negative.
+</p>
+<p>The <code class="t">:</code> modifier causes commas to be printed between groups of digits;
+<i class="i">commachar</i> may be used to change the character used as the comma.
+<i class="i">comma-interval</i> 
+must be an <i class="i">integer</i> and defaults to 3.  When the <code class="t">:</code> 
+modifier is given to any of
+these directives, the <i class="i">commachar</i> 
+is printed between groups of <i class="i">comma-interval</i>
+digits.
+</p>
+<p>Thus the most general form of <code class="t">~D</code> is
+<code class="t">~<i class="i">mincol</i>,<i class="i">padchar</i>,<i class="i">commachar</i>,<i class="i">comma-interval</i>D</code>.
+</p>
+<p><code class="t">~D</code> binds
+     <b class="b">*print-escape*</b> to <i class="i">false</i>,
+     <b class="b">*print-radix*</b> to <i class="i">false</i>,
+     <b class="b">*print-base*</b> to <code class="t">10</code>,
+</p>
+<p>and <b class="b">*print-readably*</b> to <i class="i">false</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Dollarsign_002d_003e-Monetary-Floating_002dPoint.html
@@ -0,0 +1,98 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Dollarsign-&gt; Monetary Floating-Point (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Dollarsign-&gt; Monetary Floating-Point (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Dollarsign-&gt; Monetary Floating-Point (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Floating_002dPoint-Printers.html" rel="up" title="FORMAT Floating-Point Printers">
+<link href="Tilde-G_002d_003e-General-Floating_002dPoint.html" rel="prev" title="Tilde G-&gt; General Floating-Point">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Dollarsign_002d_003e-Monetary-Floating_002dPoint">
+<div class="nav-panel">
+<p>
+Previous: <a href="Tilde-G_002d_003e-General-Floating_002dPoint.html" accesskey="p" rel="prev">Tilde G: General Floating-Point</a>, Up: <a href="FORMAT-Floating_002dPoint-Printers.html" accesskey="u" rel="up">FORMAT Floating-Point Printers</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Dollarsign_003a-Monetary-Floating_002dPoint"><span>22.3.3.4 Tilde Dollarsign: Monetary Floating-Point<a class="copiable-link" href="#Tilde-Dollarsign_003a-Monetary-Floating_002dPoint"> &para;</a></span></h4>
+
+<p>The next <i class="i">arg</i> is printed as a <i class="i">float</i> in fixed-format notation.  
+</p>
+<p>The full form is <code class="t">~<i class="i">d</i>,<i class="i">n</i>,<i class="i">w</i>,<i class="i">padchar</i>$</code>.
+The parameter <i class="i">d</i> is the number
+of digits to print after the decimal point (default value 2);
+<i class="i">n</i> is the minimum number of digits to print before the decimal
+point (default value 1);
+<i class="i">w</i> is the minimum total width of the field to be printed (default
+value 0).
+</p>
+<p>First padding and the sign are output.
+If the <i class="i">arg</i> is negative, then a minus sign is printed;
+if the <i class="i">arg</i> is not negative, then a plus sign is printed
+if and only if the <code class="t">@</code> modifier was supplied.  
+If the <code class="t">:</code> modifier is used, the sign appears before any padding,
+and otherwise after the padding.
+If <i class="i">w</i> is supplied and the number of other characters to be output
+is less than <i class="i">w</i>, then copies of <i class="i">padchar</i> (which defaults
+to a space) are output to
+make the total field width equal <i class="i">w</i>.
+Then <i class="i">n</i> digits are printed for the integer part of <i class="i">arg</i>,
+with leading zeros if necessary; then a decimal point;
+then <i class="i">d</i> digits of fraction, properly rounded.
+</p>
+<p>If the magnitude of <i class="i">arg</i> is so large that more than <i class="i">m</i> digits would
+have to be printed, where <i class="i">m</i> is the larger of <i class="i">w</i> and 100, then an
+implementation is free, at its discretion, to print the number using
+exponential notation instead, as if by the directive
+<code class="t">~<i class="i">w</i>,<i class="i">q</i>,,,,<i class="i">padchar</i>E</code>, where <i class="i">w</i> and <i class="i">padchar</i> are
+present or omitted according to whether they were present or omitted in
+the <code class="t">~$</code> directive, and where <i class="i">q</i>=<i class="i">d</i>+<i class="i">n</i>- 1,
+where <i class="i">d</i> and <i class="i">n</i> are the (possibly default) values given to the
+<code class="t">~$</code> directive.
+</p>
+<p>If <i class="i">arg</i> is a <i class="i">rational</i> 
+number, then it is coerced to be a <i class="i">single float</i>
+and then printed.  Alternatively, an implementation is permitted to
+process a <i class="i">rational</i> number by any 
+other method that has essentially the
+same behavior but avoids loss of precision or overflow
+because of the coercion.
+</p>
+<p>If <i class="i">arg</i> is a <i class="i">complex</i> number or some non-numeric
+<i class="i">object</i>,
+then it is printed using the format directive <code class="t">~<i class="i">w</i>D</code>,
+thereby printing it in decimal radix and a minimum field width of <i class="i">w</i>.
+</p>
+<p><code class="t">~$</code> binds <b class="b">*print-escape*</b> to <i class="i">false</i>
+</p>
+<p>and <b class="b">*print-readably*</b> to <i class="i">false</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Tilde-G_002d_003e-General-Floating_002dPoint.html">Tilde G: General Floating-Point</a>, Up: <a href="FORMAT-Floating_002dPoint-Printers.html">FORMAT Floating-Point Printers</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-E_002d_003e-Exponential-Floating_002dPoint.html
@@ -0,0 +1,162 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde E-&gt; Exponential Floating-Point (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde E-&gt; Exponential Floating-Point (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde E-&gt; Exponential Floating-Point (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Floating_002dPoint-Printers.html" rel="up" title="FORMAT Floating-Point Printers">
+<link href="Tilde-G_002d_003e-General-Floating_002dPoint.html" rel="next" title="Tilde G-&gt; General Floating-Point">
+<link href="Tilde-F_002d_003e-Fixed_002dFormat-Floating_002dPoint.html" rel="prev" title="Tilde F-&gt; Fixed-Format Floating-Point">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-E_002d_003e-Exponential-Floating_002dPoint">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-G_002d_003e-General-Floating_002dPoint.html" accesskey="n" rel="next">Tilde G: General Floating-Point</a>, Previous: <a href="Tilde-F_002d_003e-Fixed_002dFormat-Floating_002dPoint.html" accesskey="p" rel="prev">Tilde F: Fixed-Format Floating-Point</a>, Up: <a href="FORMAT-Floating_002dPoint-Printers.html" accesskey="u" rel="up">FORMAT Floating-Point Printers</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-E_003a-Exponential-Floating_002dPoint"><span>22.3.3.2 Tilde E: Exponential Floating-Point<a class="copiable-link" href="#Tilde-E_003a-Exponential-Floating_002dPoint"> &para;</a></span></h4>
+
+<p>The next <i class="i">arg</i> is printed as a <i class="i">float</i> in exponential notation.
+</p>
+<p>The full form is
+<code class="t">~<i class="i">w</i>,<i class="i">d</i>,<i class="i">e</i>,<i class="i">k</i>,<i class="i">overflowchar</i>,<i class="i">padchar</i>,<i class="i">exponentchar</i>E</code>.
+The parameter <i class="i">w</i>
+is the width of the field to be printed; <i class="i">d</i> is the number
+of digits to print after the decimal point; <i class="i">e</i> is the number
+of digits to use when printing the exponent;
+<i class="i">k</i> is a scale factor that defaults to one (not zero).
+</p>
+<p>Exactly <i class="i">w</i> characters will
+be output.  First, leading copies of the character <i class="i">padchar</i>
+(which defaults to a space) are printed, if necessary, to pad the
+field on the left.
+If the <i class="i">arg</i> is negative, then a minus sign is printed;
+if the <i class="i">arg</i> is not negative, then a plus sign is printed
+if and only if the <code class="t">@</code>
+modifier was supplied.  Then a sequence
+of digits containing a single embedded decimal point is printed.
+The form of this sequence of digits depends on the scale factor <i class="i">k</i>.
+If <i class="i">k</i> is zero, then <i class="i">d</i> digits are printed after the decimal
+point, and a single zero digit appears before the decimal point if
+the total field width will permit it.  If <i class="i">k</i> is positive,
+then it must be strictly less than <i class="i">d</i>+2;  <i class="i">k</i> significant digits
+are printed before the decimal point, and <i class="i">d</i>- <i class="i">k</i>+1
+digits are printed after the decimal point.  If <i class="i">k</i> is negative,
+then it must be strictly greater than - <i class="i">d</i>;
+a single zero digit appears before the decimal point if
+the total field width will permit it, and after the decimal point
+are printed first
+- <i class="i">k</i> zeros and then <i class="i">d</i>+<i class="i">k</i> significant digits.
+The printed fraction must be properly rounded.         
+When rounding up and rounding down would produce printed values
+equidistant from the scaled value of <i class="i">arg</i>, then the implementation
+is free to use either one.  For example, printing the argument
+<code class="t">637.5</code> using the format <code class="t">~8,2E</code> may correctly produce
+either <code class="t">6.37E+2</code> or <code class="t">6.38E+2</code>.
+</p>
+<p>Following the digit sequence, the exponent is printed.
+First the character parameter <i class="i">exponentchar</i> is printed; if this
+parameter is omitted, then the <i class="i">exponent marker</i> that
+<b class="b">prin1</b> would use is printed, as determined from the
+type of the <i class="i">float</i> and the current value of
+<b class="b">*read-default-float-format*</b>.
+Next, either a plus sign or a minus sign
+is printed, followed by <i class="i">e</i> digits representing the power of
+ten by which the printed fraction must be multiplied
+to properly represent the rounded value of <i class="i">arg</i>.
+</p>
+<p>If it is impossible to print the value in the required format in a field
+of width <i class="i">w</i>, possibly because <i class="i">k</i> is too large or too small
+or because the exponent cannot be printed in <i class="i">e</i> character positions,
+then one of two actions is taken.  If the
+parameter <i class="i">overflowchar</i> is supplied, then <i class="i">w</i> copies of that
+parameter are printed instead of the scaled value of <i class="i">arg</i>.
+If the <i class="i">overflowchar</i> parameter is omitted, then the scaled value
+is printed using more than <i class="i">w</i> characters, as many more as may be
+needed; if the problem is that <i class="i">d</i> is too small for the supplied <i class="i">k</i>
+or that <i class="i">e</i> is too small, then a larger value is used for <i class="i">d</i> or <i class="i">e</i>
+as may be needed.
+</p>
+<p>If the <i class="i">w</i> parameter is omitted, then the field is of variable width.
+In effect a value is chosen
+for <i class="i">w</i> in such a way that no leading pad characters need to be printed.
+</p>
+<p>If the parameter <i class="i">d</i> is omitted, then there is no constraint
+on the number of digits to appear.
+A value is chosen for <i class="i">d</i> in such a way that as many digits
+as possible may be printed subject to the width constraint
+imposed by the parameter <i class="i">w</i>, the constraint of the scale factor <i class="i">k</i>,
+and the constraint that no trailing
+zero digits may appear in the fraction, except that if the
+fraction to be printed is zero then a single zero digit should
+appear after the decimal point.
+</p>
+<p>If the parameter <i class="i">e</i> is omitted, then the exponent is printed
+using the smallest number of digits necessary to represent its value.
+</p>
+<p>If all of <i class="i">w</i>, <i class="i">d</i>, and <i class="i">e</i> are omitted, then the effect is to print
+the value using ordinary free-format exponential-notation output;
+<b class="b">prin1</b> uses 
+</p>
+<p>a similar
+</p>
+<p>format for any non-zero number whose magnitude
+is less than 10^<span class="r">-3</span> or greater than or equal to 10^7.
+</p>
+<p>The only difference is that the <code class="t">~E</code> 
+directive always prints a plus or minus sign in front of the
+    exponent, while <b class="b">prin1</b> omits the plus sign if the exponent is
+    non-negative.
+</p>
+<p>If <i class="i">arg</i> is a <i class="i">rational</i> 
+number, then it is coerced to be a <i class="i">single float</i>
+and then printed.  Alternatively, an implementation is permitted to
+process a <i class="i">rational</i> 
+number by any other method that has essentially the
+same behavior but avoids loss of precision or overflow
+because of the coercion.  If <i class="i">w</i> and <i class="i">d</i> are
+unsupplied and the number has no exact decimal representation,
+for example <code class="t">1/3</code>, some precision cutoff must be chosen
+by the implementation since only a finite number of digits may be printed.
+</p>
+<p>If <i class="i">arg</i> is a <i class="i">complex</i> number or some non-numeric
+<i class="i">object</i>, 
+then it is printed using the format directive <code class="t">~<i class="i">w</i>D</code>,
+thereby printing it in decimal radix and a minimum field width of <i class="i">w</i>.
+</p>
+<p><code class="t">~E</code> binds
+     <b class="b">*print-escape*</b> to <i class="i">false</i>
+</p>
+<p>and <b class="b">*print-readably*</b> to <i class="i">false</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-G_002d_003e-General-Floating_002dPoint.html">Tilde G: General Floating-Point</a>, Previous: <a href="Tilde-F_002d_003e-Fixed_002dFormat-Floating_002dPoint.html">Tilde F: Fixed-Format Floating-Point</a>, Up: <a href="FORMAT-Floating_002dPoint-Printers.html">FORMAT Floating-Point Printers</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-F_002d_003e-Fixed_002dFormat-Floating_002dPoint.html
@@ -0,0 +1,136 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde F-&gt; Fixed-Format Floating-Point (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde F-&gt; Fixed-Format Floating-Point (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde F-&gt; Fixed-Format Floating-Point (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Floating_002dPoint-Printers.html" rel="up" title="FORMAT Floating-Point Printers">
+<link href="Tilde-E_002d_003e-Exponential-Floating_002dPoint.html" rel="next" title="Tilde E-&gt; Exponential Floating-Point">
+<link href="FORMAT-Floating_002dPoint-Printers.html" rel="prev" title="FORMAT Floating-Point Printers">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-F_002d_003e-Fixed_002dFormat-Floating_002dPoint">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-E_002d_003e-Exponential-Floating_002dPoint.html" accesskey="n" rel="next">Tilde E: Exponential Floating-Point</a>, Previous: <a href="FORMAT-Floating_002dPoint-Printers.html" accesskey="p" rel="prev">FORMAT Floating-Point Printers</a>, Up: <a href="FORMAT-Floating_002dPoint-Printers.html" accesskey="u" rel="up">FORMAT Floating-Point Printers</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-F_003a-Fixed_002dFormat-Floating_002dPoint"><span>22.3.3.1 Tilde F: Fixed-Format Floating-Point<a class="copiable-link" href="#Tilde-F_003a-Fixed_002dFormat-Floating_002dPoint"> &para;</a></span></h4>
+
+<p>The next <i class="i">arg</i> is printed as a <i class="i">float</i>.
+</p>
+<p>The full form is <code class="t">~<i class="i">w</i>,<i class="i">d</i>,<i class="i">k</i>,<i class="i">overflowchar</i>,<i class="i">padchar</i>F</code>.
+The parameter <i class="i">w</i>
+is the width of the field to be printed; <i class="i">d</i> is the number
+of digits to print after the decimal point; <i class="i">k</i> is a scale factor
+that defaults to zero.
+</p>
+<p>Exactly <i class="i">w</i> characters will
+be output.  First, leading copies of the character <i class="i">padchar</i>
+(which defaults to a space) are printed, if necessary, to pad the
+field on the left.
+If the <i class="i">arg</i> is negative, then a minus sign is printed;
+if the <i class="i">arg</i> is not negative, then a plus sign is printed
+if and only if the <code class="t">@</code>
+modifier was supplied.  Then a sequence
+of digits, containing a single embedded decimal point, is printed;
+this represents the magnitude of the value of <i class="i">arg</i> times 10^<i class="i">k</i>,
+rounded to <i class="i">d</i> fractional digits.                         
+When rounding up and rounding down would produce printed values
+equidistant from the scaled value of <i class="i">arg</i>, then the implementation
+is free to use either one.  For example, printing the argument
+<code class="t">6.375</code> using the format <code class="t">~4,2F</code> may correctly produce
+either <code class="t">6.37</code> or <code class="t">6.38</code>.
+Leading zeros are not permitted, except that a single
+zero digit is output before the decimal point if the printed value
+is less than one, and this single zero digit is not output
+at all if <i class="i">w</i>=<i class="i">d</i>+1.
+</p>
+<p>If it is impossible to print the value in the required format in a field
+of width <i class="i">w</i>, then one of two actions is taken.  If the
+parameter <i class="i">overflowchar</i> is supplied, then <i class="i">w</i> copies of that
+parameter are printed instead of the scaled value of <i class="i">arg</i>.
+If the <i class="i">overflowchar</i> parameter is omitted, then the scaled value
+is printed using more than <i class="i">w</i> characters, as many more as may be
+needed.
+</p>
+<p>If the <i class="i">w</i> parameter is omitted, then the field is of variable width.
+In effect, a value is chosen
+for <i class="i">w</i> in such a way that no leading pad characters need to be printed
+and exactly <i class="i">d</i> characters will follow the decimal point.
+For example, the directive <code class="t">~,2F</code> will print exactly
+two digits after the decimal point and as many as necessary before the
+decimal point.
+</p>
+<p>If the parameter <i class="i">d</i> is omitted, then there is no constraint
+on the number of digits to appear after the decimal point.
+A value is chosen for <i class="i">d</i> in such a way that as many digits
+as possible may be printed subject to the width constraint
+imposed by the parameter <i class="i">w</i> and the constraint that no trailing
+zero digits may appear in the fraction, except that if the
+fraction to be printed is zero, then a single zero digit should
+appear after the decimal point if permitted by the width constraint.
+</p>
+<p>If both <i class="i">w</i> and <i class="i">d</i> are omitted, then the effect is to print
+the value using ordinary free-format output; <b class="b">prin1</b> uses this format
+for any number whose magnitude is either zero or between
+10^<span class="r">-3</span> (inclusive) and 10^7 (exclusive).
+</p>
+<p>If <i class="i">w</i> is omitted, then if the magnitude of <i class="i">arg</i> is so large (or, if
+<i class="i">d</i> is also omitted, so small) that more than 100 digits would have to
+be printed, then an implementation is free, at its discretion, to print
+the number using exponential notation instead, as if by the directive
+<code class="t">~E</code> (with all parameters to <code class="t">~E</code> defaulted, not
+taking their values from the <code class="t">~F</code> directive).
+</p>
+<p>If <i class="i">arg</i> is a <i class="i">rational</i> 
+number, then it is coerced to be a <i class="i">single float</i>
+and then printed.  Alternatively, an implementation is permitted to
+process a <i class="i">rational</i> 
+number by any other method that has essentially the
+same behavior but avoids loss of precision or overflow
+because of the coercion.  If <i class="i">w</i> and <i class="i">d</i> are
+not supplied and the number has no exact decimal representation,
+for example <code class="t">1/3</code>, some precision cutoff must be chosen
+by the implementation since only a finite number of digits may be printed.
+</p>
+<p>If <i class="i">arg</i> is a <i class="i">complex</i> number or some non-numeric
+<i class="i">object</i>, 
+then it is printed using the format directive <code class="t">~<i class="i">w</i>D</code>,
+thereby printing it in decimal radix and a minimum field width of <i class="i">w</i>.
+</p>
+<p><code class="t">~F</code> binds
+    <b class="b">*print-escape*</b> to <i class="i">false</i>
+</p>
+<p>and <b class="b">*print-readably*</b> to <i class="i">false</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-E_002d_003e-Exponential-Floating_002dPoint.html">Tilde E: Exponential Floating-Point</a>, Previous: <a href="FORMAT-Floating_002dPoint-Printers.html">FORMAT Floating-Point Printers</a>, Up: <a href="FORMAT-Floating_002dPoint-Printers.html">FORMAT Floating-Point Printers</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-G_002d_003e-General-Floating_002dPoint.html
@@ -0,0 +1,85 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde G-&gt; General Floating-Point (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde G-&gt; General Floating-Point (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde G-&gt; General Floating-Point (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Floating_002dPoint-Printers.html" rel="up" title="FORMAT Floating-Point Printers">
+<link href="Tilde-Dollarsign_002d_003e-Monetary-Floating_002dPoint.html" rel="next" title="Tilde Dollarsign-&gt; Monetary Floating-Point">
+<link href="Tilde-E_002d_003e-Exponential-Floating_002dPoint.html" rel="prev" title="Tilde E-&gt; Exponential Floating-Point">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-G_002d_003e-General-Floating_002dPoint">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Dollarsign_002d_003e-Monetary-Floating_002dPoint.html" accesskey="n" rel="next">Tilde Dollarsign: Monetary Floating-Point</a>, Previous: <a href="Tilde-E_002d_003e-Exponential-Floating_002dPoint.html" accesskey="p" rel="prev">Tilde E: Exponential Floating-Point</a>, Up: <a href="FORMAT-Floating_002dPoint-Printers.html" accesskey="u" rel="up">FORMAT Floating-Point Printers</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-G_003a-General-Floating_002dPoint"><span>22.3.3.3 Tilde G: General Floating-Point<a class="copiable-link" href="#Tilde-G_003a-General-Floating_002dPoint"> &para;</a></span></h4>
+
+<p>The next <i class="i">arg</i> is printed as a <i class="i">float</i> 
+in either fixed-format or exponential notation as appropriate.
+</p>
+<p>The full form is <code class="t">~<i class="i">w</i>,<i class="i">d</i>,<i class="i">e</i>,<i class="i">k</i>,<i class="i">overflowchar</i>,<i class="i">padchar</i>,<i class="i">exponentchar</i>G</code>.
+The format in which to print <i class="i">arg</i> depends on the magnitude (absolute
+value) of the <i class="i">arg</i>.  Let <i class="i">n</i> be an integer such that
+10^<span class="r"><span class="r">n</span>-1</span> \le |<i class="i">arg</i>| &lt; 10^<i class="i">n</i>.
+Let <i class="i">ee</i> equal <i class="i">e</i>+2, or 4 if <i class="i">e</i> is omitted.
+Let <i class="i">ww</i> equal <i class="i">w</i>- <i class="i">ee</i>,
+or <b class="b">nil</b> if <i class="i">w</i> is omitted.  If <i class="i">d</i> is omitted, first let <i class="i">q</i>
+be the number of digits needed to print <i class="i">arg</i> with no loss
+of information and without leading or trailing zeros;
+then let <i class="i">d</i> equal <code class="t">(max <i class="i">q</i> (min <i class="i">n</i> 7))</code>.
+Let <i class="i">dd</i> equal <i class="i">d</i>- <i class="i">n</i>.
+</p>
+<p>If 0 \le <i class="i">dd</i> \le <i class="i">d</i>, then <i class="i">arg</i> is printed
+as if by the format directives
+</p>
+<p><code class="t">~<i class="i">ww</i>,<i class="i">dd</i>,,<i class="i">overflowchar</i>,<i class="i">padchar</i>F~<i class="i">ee</i>@T</code>
+</p>
+<p>Note that the scale factor <i class="i">k</i> is not passed to the <code class="t">~F</code>
+directive.  For all other values of <i class="i">dd</i>, <i class="i">arg</i> is printed as if
+by the format directive
+</p>
+<p><code class="t">~<i class="i">w</i>,<i class="i">d</i>,<i class="i">e</i>,<i class="i">k</i>,<i class="i">overflowchar</i>,<i class="i">padchar</i>,<i class="i">exponentchar</i>E</code>
+</p>
+<p>In either case, an <code class="t">@</code>
+modifier is supplied to the <code class="t">~F</code>
+or <code class="t">~E</code> directive if and only if one was supplied to the
+<code class="t">~G</code> directive.
+</p>
+<p><code class="t">~G</code> binds
+     <b class="b">*print-escape*</b> to <i class="i">false</i>
+</p>
+<p>and <b class="b">*print-readably*</b> to <i class="i">false</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Dollarsign_002d_003e-Monetary-Floating_002dPoint.html">Tilde Dollarsign: Monetary Floating-Point</a>, Previous: <a href="Tilde-E_002d_003e-Exponential-Floating_002dPoint.html">Tilde E: Exponential Floating-Point</a>, Up: <a href="FORMAT-Floating_002dPoint-Printers.html">FORMAT Floating-Point Printers</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Greater_002dThan_002dSign_002d_003e-End-of-Justification.html
@@ -0,0 +1,45 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Greater-Than-Sign-&gt; End of Justification (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Greater-Than-Sign-&gt; End of Justification (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Greater-Than-Sign-&gt; End of Justification (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Layout-Control.html" rel="up" title="FORMAT Layout Control">
+<link href="Tilde-Less_002dThan_002dSign_002d_003e-Justification.html" rel="prev" title="Tilde Less-Than-Sign-&gt; Justification">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Greater_002dThan_002dSign_002d_003e-End-of-Justification">
+<div class="nav-panel">
+<p>
+Previous: <a href="Tilde-Less_002dThan_002dSign_002d_003e-Justification.html" accesskey="p" rel="prev">Tilde Less-Than-Sign: Justification</a>, Up: <a href="FORMAT-Layout-Control.html" accesskey="u" rel="up">FORMAT Layout Control</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Greater_002dThan_002dSign_003a-End-of-Justification"><span>22.3.6.3 Tilde Greater-Than-Sign: End of Justification<a class="copiable-link" href="#Tilde-Greater_002dThan_002dSign_003a-End-of-Justification"> &para;</a></span></h4>
+
+<p><code class="t">~&gt;</code> terminates a <code class="t">~&lt;</code>.
+The consequences of using it elsewhere are undefined.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-I_002d_003e-Indent.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde I-&gt; Indent (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde I-&gt; Indent (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde I-&gt; Indent (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Pretty-Printer-Operations.html" rel="up" title="FORMAT Pretty Printer Operations">
+<link href="Tilde-Slash_002d_003e-Call-Function.html" rel="next" title="Tilde Slash-&gt; Call Function">
+<link href="Tilde-Less_002dThan_002dSign_002d_003e-Logical-Block.html" rel="prev" title="Tilde Less-Than-Sign-&gt; Logical Block">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-I_002d_003e-Indent">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Slash_002d_003e-Call-Function.html" accesskey="n" rel="next">Tilde Slash: Call Function</a>, Previous: <a href="Tilde-Less_002dThan_002dSign_002d_003e-Logical-Block.html" accesskey="p" rel="prev">Tilde Less-Than-Sign: Logical Block</a>, Up: <a href="FORMAT-Pretty-Printer-Operations.html" accesskey="u" rel="up">FORMAT Pretty Printer Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-I_003a-Indent"><span>22.3.5.3 Tilde I: Indent<a class="copiable-link" href="#Tilde-I_003a-Indent"> &para;</a></span></h4>
+
+<p><code class="t">~<i class="i">n</i>I</code>  is the same as <code class="t">(pprint-indent :block n)</code>.
+</p>
+<p><code class="t">~<i class="i">n</i>:I</code> is the same as <code class="t">(pprint-indent :current n)</code>.
+In both cases, <i class="i">n</i> defaults to zero, if it is omitted.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Left_002dBrace_002d_003e-Iteration.html
@@ -0,0 +1,148 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Left-Brace-&gt; Iteration (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Left-Brace-&gt; Iteration (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Left-Brace-&gt; Iteration (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Control_002dFlow-Operations.html" rel="up" title="FORMAT Control-Flow Operations">
+<link href="Tilde-Right_002dBrace_002d_003e-End-of-Iteration.html" rel="next" title="Tilde Right-Brace-&gt; End of Iteration">
+<link href="Tilde-Right_002dBracket_002d_003e-End-of-Conditional-Expression.html" rel="prev" title="Tilde Right-Bracket-&gt; End of Conditional Expression">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Left_002dBrace_002d_003e-Iteration">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Right_002dBrace_002d_003e-End-of-Iteration.html" accesskey="n" rel="next">Tilde Right-Brace: End of Iteration</a>, Previous: <a href="Tilde-Right_002dBracket_002d_003e-End-of-Conditional-Expression.html" accesskey="p" rel="prev">Tilde Right-Bracket: End of Conditional Expression</a>, Up: <a href="FORMAT-Control_002dFlow-Operations.html" accesskey="u" rel="up">FORMAT Control-Flow Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Left_002dBrace_003a-Iteration"><span>22.3.7.4 Tilde Left-Brace: Iteration<a class="copiable-link" href="#Tilde-Left_002dBrace_003a-Iteration"> &para;</a></span></h4>
+
+<p><code class="t">~{<i class="i">str</i>~}</code>
+</p>
+<p>This is an iteration construct.  The argument should be a <i class="i">list</i>,
+which is used as a set of arguments 
+as if for a recursive call to <b class="b">format</b>.
+The <i class="i">string</i> <i class="i">str</i> is used repeatedly as the control string.
+Each iteration can absorb as many elements of the <i class="i">list</i> as it likes
+as arguments;
+if <i class="i">str</i> uses up two arguments by itself, then two elements of the
+<i class="i">list</i> will get used up each time around the loop.
+If before any iteration step the <i class="i">list</i> 
+is empty, then the iteration is terminated.
+Also, if a prefix parameter <i class="i">n</i> is given, then there will be at most <i class="i">n</i>
+repetitions of processing of <i class="i">str</i>.  
+Finally, the <code class="t">~<code class="t">^</code> </code> directive can be
+used to terminate the iteration prematurely.
+</p>
+<p>For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;The winners are:~{ ~S~}.&quot; 
+         '(fred harry jill)) 
+&rArr;  &quot;The winners are: FRED HARRY JILL.&quot;                           
+ (format nil &quot;Pairs:~{ &lt;~S,~S&gt;~}.&quot; 
+         '(a 1 b 2 c 3))
+&rArr;  &quot;Pairs: &lt;A,1&gt; &lt;B,2&gt; &lt;C,3&gt;.&quot;
+</pre></div>
+
+<p><code class="t">~:{ <i class="i">str</i>~}  </code> is similar, 
+but the argument should be a <i class="i">list</i> of sublists.
+At each repetition step, one sublist 
+is used as the set of arguments for
+processing <i class="i">str</i>; on the next repetition, a new sublist 
+is used, whether
+or not all of the last sublist had been processed.  
+For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;Pairs:~:{ &lt;~S,~S&gt;~} .&quot; 
+                 '((a 1) (b 2) (c 3)))
+&rArr;  &quot;Pairs: &lt;A,1&gt; &lt;B,2&gt; &lt;C,3&gt;.&quot;
+</pre></div>
+
+<p><code class="t">~@{ <i class="i">str</i>~} </code>
+is similar to <code class="t">~{ <i class="i">str</i>~}  </code>, but instead of
+using one argument that is a list, all the remaining arguments
+are used as the list of arguments for the iteration.
+Example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;Pairs:~@{ &lt;~S,~S&gt;~} .&quot; 'a 1 'b 2 'c 3)
+&rArr;  &quot;Pairs: &lt;A,1&gt; &lt;B,2&gt; &lt;C,3&gt;.&quot;
+</pre></div>
+
+<p>If the iteration is terminated before all the remaining arguments are
+consumed, then any arguments not processed by the iteration remain to be
+processed by any directives following the iteration construct.
+</p>
+<p><code class="t">~:@{ <i class="i">str</i>~}  </code> 
+combines the features                              
+of <code class="t">~:{ <i class="i">str</i>~}  </code>
+and <code class="t">~@{ <i class="i">str</i>~}  </code>.
+All the remaining arguments
+are used, and each one must be a <i class="i">list</i>.
+On each iteration, the next argument is 
+used as a <i class="i">list</i> of arguments to <i class="i">str</i>.
+Example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;Pairs:~:@{ &lt;~S,~S&gt;~} .&quot; 
+              '(a 1) '(b 2) '(c 3)) 
+&rArr;  &quot;Pairs: &lt;A,1&gt; &lt;B,2&gt; &lt;C,3&gt;.&quot;
+</pre></div>
+
+<p>Terminating the repetition construct with <code class="t">~:} </code> 
+instead of <code class="t">~}  </code>
+forces <i class="i">str</i> to be processed at least once, even if the initial
+list of arguments is null. However, this will not override an explicit
+prefix parameter of zero.
+</p>
+<p>If <i class="i">str</i> is empty, then an argument is used as <i class="i">str</i>.  
+It must be a <i class="i">format control</i>
+and precede any arguments processed by the iteration.  As an example,
+the following are equivalent:
+</p>
+<div class="example">
+<pre class="example-preformatted">    (apply #'format stream string arguments)
+ &equiv; (format stream &quot;~1{~:}&quot; string arguments)
+</pre></div>
+
+<p>This will use <code class="t">string</code> as a formatting string.  
+The <code class="t">~1{ </code> says it will                 
+be processed at most once, and the <code class="t">~:} </code> 
+says it will be processed at least once.
+Therefore it is processed exactly once, using <code class="t">arguments</code> as the arguments.
+This case may be handled more clearly by the <code class="t">~?</code> directive,
+but this general feature of <code class="t">~{  </code>
+is more powerful than <code class="t">~?</code>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Right_002dBrace_002d_003e-End-of-Iteration.html">Tilde Right-Brace: End of Iteration</a>, Previous: <a href="Tilde-Right_002dBracket_002d_003e-End-of-Conditional-Expression.html">Tilde Right-Bracket: End of Conditional Expression</a>, Up: <a href="FORMAT-Control_002dFlow-Operations.html">FORMAT Control-Flow Operations</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Left_002dBracket_002d_003e-Conditional-Expression.html
@@ -0,0 +1,118 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Left-Bracket-&gt; Conditional Expression (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Left-Bracket-&gt; Conditional Expression (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Left-Bracket-&gt; Conditional Expression (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Control_002dFlow-Operations.html" rel="up" title="FORMAT Control-Flow Operations">
+<link href="Tilde-Right_002dBracket_002d_003e-End-of-Conditional-Expression.html" rel="next" title="Tilde Right-Bracket-&gt; End of Conditional Expression">
+<link href="Tilde-Asterisk_002d_003e-Go_002dTo.html" rel="prev" title="Tilde Asterisk-&gt; Go-To">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Left_002dBracket_002d_003e-Conditional-Expression">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Right_002dBracket_002d_003e-End-of-Conditional-Expression.html" accesskey="n" rel="next">Tilde Right-Bracket: End of Conditional Expression</a>, Previous: <a href="Tilde-Asterisk_002d_003e-Go_002dTo.html" accesskey="p" rel="prev">Tilde Asterisk: Go-To</a>, Up: <a href="FORMAT-Control_002dFlow-Operations.html" accesskey="u" rel="up">FORMAT Control-Flow Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Left_002dBracket_003a-Conditional-Expression"><span>22.3.7.2 Tilde Left-Bracket: Conditional Expression<a class="copiable-link" href="#Tilde-Left_002dBracket_003a-Conditional-Expression"> &para;</a></span></h4>
+
+<p><code class="t">~[<i class="i">str0</i>~;<i class="i">str1</i>~;<i class="i">...</i>~;<i class="i">strn</i>~]</code>
+</p>
+<p>This is a set of control strings, called <i class="i">clauses</i>, one of which is
+chosen and used.  The clauses are separated by <code class="t">~;</code>
+and the construct is terminated by <code class="t">~]</code>.  For example,
+</p>
+<p><code class="t">&quot;~[Siamese~;Manx~;Persian~] Cat&quot;</code>
+</p>
+<p>The <i class="i">arg</i>th
+clause is selected, where the first clause is number 0.
+If a prefix parameter is given (as <code class="t">~<i class="i">n</i>[</code>),
+then the parameter is used instead of an argument.    
+If <i class="i">arg</i> is out of range then no clause is selected
+and no error is signaled.
+After the selected alternative has been processed, the control string
+continues after the <code class="t">~]</code>.
+</p>
+<p><code class="t">~[<i class="i">str0</i>~;<i class="i">str1</i>~;<i class="i">...</i>~;<i class="i">strn</i>~:;<i class="i">default</i>~]</code>
+has a default case.
+If the <i class="i">last</i> <code class="t">~;</code> used to separate clauses
+is <code class="t">~:;</code> instead, then the last clause is an else clause
+that is performed if no other clause is selected.
+For example:
+</p>
+<p><code class="t">&quot;~[Siamese~;Manx~;Persian~:;Alley~] Cat&quot;</code>
+</p>
+<p><code class="t">~:[<i class="i">alternative</i>~;<i class="i">consequent</i>~]</code> 
+selects the <i class="i">alternative</i> control string if <i class="i">arg</i> is <i class="i">false</i>,
+and selects the <i class="i">consequent</i> control string otherwise.
+</p>
+<p><code class="t">~@[<i class="i">consequent</i>~]</code> 
+tests the argument.  If it is <i class="i">true</i>,           
+then the argument is not used up by the <code class="t">~[</code> command
+but remains as the next one to be processed,
+and the one clause <i class="i">consequent</i> is processed.
+If the <i class="i">arg</i> is <i class="i">false</i>, then the argument is used up,
+and the clause is not processed.
+The clause therefore should normally use exactly one argument,
+and may expect it to be <i class="i">non-nil</i>.
+For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq *print-level* nil *print-length* 5)
+ (format nil
+        &quot;~@[ print level = ~D~]~@[ print length = ~D~]&quot;
+        *print-level* *print-length*)
+&rArr;   &quot; print length = 5&quot;
+</pre></div>
+
+<p>Note also that
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format <i class="i">stream</i> &quot;...~@[<i class="i">str</i>~]...&quot; ...)
+&equiv; (format <i class="i">stream</i> &quot;...~:[~;~:*<i class="i">str</i>~]...&quot; ...)
+</pre></div>
+
+<p>The combination of <code class="t">~[</code> and <code class="t">#</code> is useful, for
+example, for dealing with English conventions for printing lists:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq foo &quot;Items:~#[ none~; ~S~; ~S and ~S~
+           ~:;~@{~#[~; and~] ~S~<code class="t">^</code> ,~}~].&quot;)
+ (format nil foo) &rArr;   &quot;Items: none.&quot;
+ (format nil foo 'foo) &rArr;   &quot;Items: FOO.&quot;
+ (format nil foo 'foo 'bar) &rArr;   &quot;Items: FOO and BAR.&quot;
+ (format nil foo 'foo 'bar 'baz) &rArr;   &quot;Items: FOO, BAR, and BAZ.&quot;
+ (format nil foo 'foo 'bar 'baz 'quux) &rArr;   &quot;Items: FOO, BAR, BAZ, and QUUX.&quot;
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Right_002dBracket_002d_003e-End-of-Conditional-Expression.html">Tilde Right-Bracket: End of Conditional Expression</a>, Previous: <a href="Tilde-Asterisk_002d_003e-Go_002dTo.html">Tilde Asterisk: Go-To</a>, Up: <a href="FORMAT-Control_002dFlow-Operations.html">FORMAT Control-Flow Operations</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Left_002dParen_002d_003e-Case-Conversion.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Left-Paren-&gt; Case Conversion (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Left-Paren-&gt; Case Conversion (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Left-Paren-&gt; Case Conversion (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Miscellaneous-Operations.html" rel="up" title="FORMAT Miscellaneous Operations">
+<link href="Tilde-Right_002dParen_002d_003e-End-of-Case-Conversion.html" rel="next" title="Tilde Right-Paren-&gt; End of Case Conversion">
+<link href="FORMAT-Miscellaneous-Operations.html" rel="prev" title="FORMAT Miscellaneous Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Left_002dParen_002d_003e-Case-Conversion">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Right_002dParen_002d_003e-End-of-Case-Conversion.html" accesskey="n" rel="next">Tilde Right-Paren: End of Case Conversion</a>, Previous: <a href="FORMAT-Miscellaneous-Operations.html" accesskey="p" rel="prev">FORMAT Miscellaneous Operations</a>, Up: <a href="FORMAT-Miscellaneous-Operations.html" accesskey="u" rel="up">FORMAT Miscellaneous Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Left_002dParen_003a-Case-Conversion"><span>22.3.8.1 Tilde Left-Paren: Case Conversion<a class="copiable-link" href="#Tilde-Left_002dParen_003a-Case-Conversion"> &para;</a></span></h4>
+
+<p><code class="t">~(<i class="i">str</i>~)</code>
+</p>
+<p>The contained control string <i class="i">str</i> is processed, and what it produces
+is subject to case conversion.
+</p>
+<p>With no flags, every <i class="i">uppercase</i> <i class="i">character</i>
+is converted to the corresponding <i class="i">lowercase</i> <i class="i">character</i>.
+</p>
+<p><code class="t">~:(</code> capitalizes all words, as if by <b class="b">string-capitalize</b>.
+</p>
+<p><code class="t">~@(</code> 
+capitalizes just the first word and forces the rest to lower
+case.
+</p>
+<p><code class="t">~:@(</code> converts every lowercase character
+to the corresponding uppercase character.
+</p>
+<p>In this example <code class="t">~@(</code> is used to cause the first word
+produced by <code class="t">~@R</code> to be capitalized:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;~@R ~(~@R~)&quot; 14 14) 
+&rArr;  &quot;XIV xiv&quot;
+ (defun f (n) (format nil &quot;~@(~R~) error~:P detected.&quot; n)) &rArr;  F
+ (f 0) &rArr;  &quot;Zero errors detected.&quot;
+ (f 1) &rArr;  &quot;One error detected.&quot;
+ (f 23) &rArr;  &quot;Twenty-three errors detected.&quot;
+</pre></div>
+
+<p>When case conversions appear nested, the outer conversion dominates,
+as illustrated in the following example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;~@(how is ~:(BOB SMITH~)?~)&quot;)
+ &rArr;  &quot;How is bob smith?&quot;
+ <i class="i">NOT</i>&rArr; &quot;How is Bob Smith?&quot;
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Less_002dThan_002dSign_002d_003e-Justification.html
@@ -0,0 +1,123 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Less-Than-Sign-&gt; Justification (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Less-Than-Sign-&gt; Justification (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Less-Than-Sign-&gt; Justification (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Layout-Control.html" rel="up" title="FORMAT Layout Control">
+<link href="Tilde-Greater_002dThan_002dSign_002d_003e-End-of-Justification.html" rel="next" title="Tilde Greater-Than-Sign-&gt; End of Justification">
+<link href="Tilde-T_002d_003e-Tabulate.html" rel="prev" title="Tilde T-&gt; Tabulate">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Less_002dThan_002dSign_002d_003e-Justification">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Greater_002dThan_002dSign_002d_003e-End-of-Justification.html" accesskey="n" rel="next">Tilde Greater-Than-Sign: End of Justification</a>, Previous: <a href="Tilde-T_002d_003e-Tabulate.html" accesskey="p" rel="prev">Tilde T: Tabulate</a>, Up: <a href="FORMAT-Layout-Control.html" accesskey="u" rel="up">FORMAT Layout Control</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Less_002dThan_002dSign_003a-Justification"><span>22.3.6.2 Tilde Less-Than-Sign: Justification<a class="copiable-link" href="#Tilde-Less_002dThan_002dSign_003a-Justification"> &para;</a></span></h4>
+
+<p><code class="t">~<i class="i">mincol</i>,<i class="i">colinc</i>,<i class="i">minpad</i>,<i class="i">padchar</i>&lt;<i class="i">str</i>~&gt;</code>
+</p>
+<p>This justifies the text produced by processing <i class="i">str</i>
+within a field at least <i class="i">mincol</i> columns wide.  <i class="i">str</i>
+may be divided up into segments with <code class="t">~;</code>, in which case the
+spacing is evenly divided between the text segments.
+</p>
+<p>With no modifiers, the leftmost text segment is left justified in the
+field, and the rightmost text segment is right justified.  If there is
+only one text element, as a special case, it is right justified.
+The <code class="t">:</code> modifier causes                                            
+spacing to be introduced before the first text segment;  the 
+<code class="t">@</code> modifier causes spacing to be added after the last.
+The <i class="i">minpad</i> parameter (default <code class="t">0</code>) is the minimum number of
+padding characters to be output between each segment.
+The padding character is supplied by <i class="i">padchar</i>,
+which defaults to the space character.
+If the total width needed to satisfy these constraints is greater
+than <i class="i">mincol</i>, then the width used is <i class="i">mincol</i>+<i class="i">k</i>*<i class="i">colinc</i>
+for the smallest possible non-negative integer value <i class="i">k</i>.
+<i class="i">colinc</i> defaults to <code class="t">1</code>, and <i class="i">mincol</i> defaults to <code class="t">0</code>.
+</p>
+<p>Note that <i class="i">str</i> may include <b class="b">format</b> directives.
+All the clauses in <i class="i">str</i> are processed in order;
+it is the resulting pieces of text that are justified.
+</p>
+<p>The <code class="t">~<code class="t">^</code> </code> directive may be used to terminate processing of the
+clauses prematurely, in which case only the completely processed clauses
+are justified.
+</p>
+<p>If the first clause of a <code class="t">~&lt;</code> 
+is terminated with <code class="t">~:;</code> instead of
+<code class="t">~;</code>, then it is used in a special way.  All of the clauses are
+processed (subject to <code class="t">~<code class="t">^</code> </code>, of course), but the 
+first one is not used
+in performing the spacing and padding.  When the padded result has been
+determined, then if it will fit on the current line of output, it is
+output, and the text for the first clause is discarded.  If, however, the
+padded text will not fit on the current line, then the text segment for
+the first clause is output before the padded text.  The first clause
+ought to contain a newline (such as a <code class="t">~%</code> directive).  The first
+clause is always processed, and so any arguments it refers to will be
+used; the decision is whether to use the resulting segment of text, not
+whether to process the first clause.  If the <code class="t">~:;</code> has a prefix
+parameter <i class="i">n</i>, then the padded text must fit on the current line with
+<i class="i">n</i> character positions to spare to avoid outputting the first clause&rsquo;s
+text.  For example, the control string
+</p>
+<div class="example">
+<pre class="example-preformatted"> &quot;~
+</pre></div>
+
+<p>can be used to print a list of items separated by commas without
+breaking items over line boundaries, beginning each line with
+<code class="t">;; </code>.  The prefix parameter 
+<code class="t">1</code> in <code class="t">~1:;</code> accounts for the width of the
+comma that will follow the justified item if it is not the last
+element in the list, or the period 
+if it is.  If <code class="t">~:;</code> has a second
+prefix parameter, then it is used as the width of the line,
+thus overriding the natural line width of the output stream.  To make
+the preceding example use a line width of 50, one would write
+</p>
+<div class="example">
+<pre class="example-preformatted"> &quot;~
+</pre></div>
+
+<p>If the second argument is not supplied, then <b class="b">format</b> uses the
+line width of the <i class="i">destination</i> output stream.
+If this cannot be determined (for example, when producing a 
+<i class="i">string</i> result), then <b class="b">format</b> uses <code class="t">72</code> as the line length.
+</p>
+<p>See also <a class="ref" href="Tilde-Less_002dThan_002dSign_002d_003e-Logical-Block.html">Tilde Less-Than-Sign: Logical Block</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Greater_002dThan_002dSign_002d_003e-End-of-Justification.html">Tilde Greater-Than-Sign: End of Justification</a>, Previous: <a href="Tilde-T_002d_003e-Tabulate.html">Tilde T: Tabulate</a>, Up: <a href="FORMAT-Layout-Control.html">FORMAT Layout Control</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Less_002dThan_002dSign_002d_003e-Logical-Block.html
@@ -0,0 +1,112 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Less-Than-Sign-&gt; Logical Block (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Less-Than-Sign-&gt; Logical Block (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Less-Than-Sign-&gt; Logical Block (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Pretty-Printer-Operations.html" rel="up" title="FORMAT Pretty Printer Operations">
+<link href="Tilde-I_002d_003e-Indent.html" rel="next" title="Tilde I-&gt; Indent">
+<link href="Tilde-Underscore_002d_003e-Conditional-Newline.html" rel="prev" title="Tilde Underscore-&gt; Conditional Newline">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Less_002dThan_002dSign_002d_003e-Logical-Block">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-I_002d_003e-Indent.html" accesskey="n" rel="next">Tilde I: Indent</a>, Previous: <a href="Tilde-Underscore_002d_003e-Conditional-Newline.html" accesskey="p" rel="prev">Tilde Underscore: Conditional Newline</a>, Up: <a href="FORMAT-Pretty-Printer-Operations.html" accesskey="u" rel="up">FORMAT Pretty Printer Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Less_002dThan_002dSign_003a-Logical-Block"><span>22.3.5.2 Tilde Less-Than-Sign: Logical Block<a class="copiable-link" href="#Tilde-Less_002dThan_002dSign_003a-Logical-Block"> &para;</a></span></h4>
+
+<p><code class="t">~&lt;...~:&gt;</code>
+</p>
+<p>If <code class="t">~:&gt;</code> is used to terminate a <code class="t">~&lt;...~&gt;</code>,
+the directive is equivalent to a call to <b class="b">pprint-logical-block</b>.
+The argument corresponding to the <code class="t">~&lt;...~:&gt;</code> directive is treated in
+the same way as the <i class="i">list</i> argument to <b class="b">pprint-logical-block</b>,
+thereby providing automatic support for non-<i class="i">list</i> arguments and
+the detection of circularity, sharing, and depth abbreviation.  
+The portion of the <i class="i">control-string</i> nested within the <code class="t">~&lt;...~:&gt;</code>
+specifies the <code class="t">:prefix</code> (or <code class="t">:per-line-prefix</code>), <code class="t">:suffix</code>,
+and body of the <b class="b">pprint-logical-block</b>.
+</p>
+<p>The <i class="i">control-string</i> portion enclosed by <code class="t">~&lt;...~:&gt;</code> can be divided
+into segments <code class="t">~&lt;<i class="i">prefix</i>~;<i class="i">body</i>~;<i class="i">suffix</i>~:&gt;</code>
+by <code class="t">~;</code> directives.  If the first section is terminated by <code class="t">~@;</code>, 
+it specifies a per-line prefix rather than a simple prefix.  
+The <i class="i">prefix</i> and <i class="i">suffix</i> cannot contain format directives.  
+An error is signaled if either the prefix or suffix fails to be a
+constant string or if the enclosed portion is divided into more than three segments.
+</p>
+<p>If the enclosed portion is divided into only two segments, the <i class="i">suffix</i>
+defaults to the null string.  If the enclosed portion consists of only
+a single segment, both the <i class="i">prefix</i> and the <i class="i">suffix</i> default to 
+the null string.  If the <i class="i">colon</i> modifier is used (<i class="i">i.e.</i>, <code class="t">~:&lt;...~:&gt;</code>),
+the <i class="i">prefix</i> and <i class="i">suffix</i> default to <code class="t">&quot;(&quot;</code> and <code class="t">&quot;)&quot;</code>
+(respectively) instead of the null string.
+</p>
+<p>The body segment can be any arbitrary <i class="i">format string</i>.
+This <i class="i">format string</i> is applied to the elements of the list
+corresponding to the <code class="t">~&lt;...~:&gt;</code> directive as a whole.
+Elements are extracted from this list using <b class="b">pprint-pop</b>,
+thereby providing automatic support for malformed lists, and the detection
+of circularity, sharing, and length abbreviation.
+Within the body segment, <code class="t">~<code class="t">^</code></code> acts like <b class="b">pprint-exit-if-list-exhausted</b>.
+</p>
+<p><code class="t">~&lt;...~:&gt;</code> supports a feature not supported by <b class="b">pprint-logical-block</b>.
+If <code class="t">~:@&gt;</code> is used to terminate the directive (<i class="i">i.e.</i>, <code class="t">~&lt;...~:@&gt;</code>), 
+then a fill-style conditional newline is automatically inserted after each
+group of blanks immediately contained in the body (except for blanks
+after a ~&lt;<i class="i">Newline</i>&gt; directive).  This makes it easy to achieve the
+equivalent of paragraph filling.
+</p>
+<p>If the <i class="i">at-sign</i> modifier is used with <code class="t">~&lt;...~:&gt;</code>, the entire remaining argument
+list is passed to the directive as its argument.  All of the remaining
+arguments are always consumed by <code class="t">~@&lt;...~:&gt;</code>, even if they are not all used
+by the <i class="i">format string</i> nested in the directive.  Other than the difference in
+its argument, <code class="t">~@&lt;...~:&gt;</code> is exactly the same as <code class="t">~&lt;...~:&gt;</code> except that
+circularity detection is not applied if <code class="t">~@&lt;...~:&gt;</code> is encountered at top
+level in a <i class="i">format string</i>.  This ensures that circularity detection is
+applied only to data lists, not to <i class="i">format argument</i> <i class="i">lists</i>.
+</p>
+<p><code class="t">&quot; . #<i class="i">n</i>#&quot;</code> is printed if circularity or sharing has to be indicated
+for its argument as a whole.
+</p>
+<p>To a considerable extent, the basic form of the directive <code class="t">~&lt;...~&gt;</code> is
+incompatible with the dynamic control of the arrangement of output by
+<code class="t">~W</code>, <code class="t">~_</code>, <code class="t">~&lt;...~:&gt;</code>, <code class="t">~I</code>, and <code class="t">~:T</code>.  As a result, an error 
+is signaled if any of these directives is nested within <code class="t">~&lt;...~&gt;</code>.  
+Beyond this, an error is also signaled if the <code class="t">~&lt;...~:;...~&gt;</code> form of
+<code class="t">~&lt;...~&gt;</code> is used in the same <i class="i">format string</i> with 
+<code class="t">~W</code>, <code class="t">~_</code>, <code class="t">~&lt;...~:&gt;</code>, <code class="t">~I</code>, or <code class="t">~:T</code>.
+</p>
+<p>See also <a class="ref" href="Tilde-Less_002dThan_002dSign_002d_003e-Justification.html">Tilde Less-Than-Sign: Justification</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-I_002d_003e-Indent.html">Tilde I: Indent</a>, Previous: <a href="Tilde-Underscore_002d_003e-Conditional-Newline.html">Tilde Underscore: Conditional Newline</a>, Up: <a href="FORMAT-Pretty-Printer-Operations.html">FORMAT Pretty Printer Operations</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Newline_002d_003e-Ignored-Newline.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Newline-&gt; Ignored Newline (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Newline-&gt; Ignored Newline (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Newline-&gt; Ignored Newline (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Miscellaneous-Pseudo_002dOperations.html" rel="up" title="FORMAT Miscellaneous Pseudo-Operations">
+<link href="Tilde-Circumflex_002d_003e-Escape-Upward.html" rel="prev" title="Tilde Circumflex-&gt; Escape Upward">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Newline_002d_003e-Ignored-Newline">
+<div class="nav-panel">
+<p>
+Previous: <a href="Tilde-Circumflex_002d_003e-Escape-Upward.html" accesskey="p" rel="prev">Tilde Circumflex: Escape Upward</a>, Up: <a href="FORMAT-Miscellaneous-Pseudo_002dOperations.html" accesskey="u" rel="up">FORMAT Miscellaneous Pseudo-Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Newline_003a-Ignored-Newline"><span>22.3.9.3 Tilde Newline: Ignored Newline<a class="copiable-link" href="#Tilde-Newline_003a-Ignored-Newline"> &para;</a></span></h4>
+
+<p><i class="i">Tilde</i> immediately followed by a <i class="i">newline</i> ignores the <i class="i">newline</i>
+and any following non-newline <i class="i">whitespace</i>_1 characters.
+With a <code class="t">:</code>,
+ the <i class="i">newline</i> is ignored, 
+ but any following <i class="i">whitespace</i>_1 is left in place.
+With an <code class="t">@</code>,
+ the <i class="i">newline</i> is left in place,
+ but any following <i class="i">whitespace</i>_1 is ignored.
+For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun type-clash-error (fn nargs argnum right-type wrong-type)
+   (format *error-output*
+           &quot;~&amp;~S requires its ~:[~:R~;~*~]~ 
+           argument to be of type ~S,~
+           with an argument of type ~S.~
+           fn (eql nargs 1) argnum right-type wrong-type))
+ (type-clash-error 'aref nil 2 'integer 'vector)  prints:
+AREF requires its second argument to be of type INTEGER,
+but it was called with an argument of type VECTOR.
+NIL
+ (type-clash-error 'car 1 1 'list 'short-float)  prints:
+CAR requires its argument to be of type LIST,
+but it was called with an argument of type SHORT-FLOAT.
+NIL
+</pre></div>
+
+<p>Note that in this example newlines appear in the output only as specified
+by the <code class="t">~&amp;</code> and <code class="t">~%</code> directives; the 
+actual newline characters
+in the control string are suppressed because each is preceded by a tilde.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-O_002d_003e-Octal.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde O-&gt; Octal (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde O-&gt; Octal (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde O-&gt; Octal (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Radix-Control.html" rel="up" title="FORMAT Radix Control">
+<link href="Tilde-X_002d_003e-Hexadecimal.html" rel="next" title="Tilde X-&gt; Hexadecimal">
+<link href="Tilde-B_002d_003e-Binary.html" rel="prev" title="Tilde B-&gt; Binary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-O_002d_003e-Octal">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-X_002d_003e-Hexadecimal.html" accesskey="n" rel="next">Tilde X: Hexadecimal</a>, Previous: <a href="Tilde-B_002d_003e-Binary.html" accesskey="p" rel="prev">Tilde B: Binary</a>, Up: <a href="FORMAT-Radix-Control.html" accesskey="u" rel="up">FORMAT Radix Control</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-O_003a-Octal"><span>22.3.2.4 Tilde O: Octal<a class="copiable-link" href="#Tilde-O_003a-Octal"> &para;</a></span></h4>
+
+<p>This is just like <code class="t">~D</code> but prints in octal radix (radix 8)
+instead of decimal.  The full form is therefore
+<code class="t">~<i class="i">mincol</i>,<i class="i">padchar</i>,<i class="i">commachar</i>,<i class="i">comma-interval</i>O</code>.
+</p>
+<p><code class="t">~O</code> binds
+     <b class="b">*print-escape*</b> to <i class="i">false</i>,
+     <b class="b">*print-radix*</b> to <i class="i">false</i>,
+     <b class="b">*print-base*</b> to <code class="t">8</code>,
+</p>
+<p>and <b class="b">*print-readably*</b> to <i class="i">false</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-P_002d_003e-Plural.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde P-&gt; Plural (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde P-&gt; Plural (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde P-&gt; Plural (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Miscellaneous-Operations.html" rel="up" title="FORMAT Miscellaneous Operations">
+<link href="Tilde-Right_002dParen_002d_003e-End-of-Case-Conversion.html" rel="prev" title="Tilde Right-Paren-&gt; End of Case Conversion">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-P_002d_003e-Plural">
+<div class="nav-panel">
+<p>
+Previous: <a href="Tilde-Right_002dParen_002d_003e-End-of-Case-Conversion.html" accesskey="p" rel="prev">Tilde Right-Paren: End of Case Conversion</a>, Up: <a href="FORMAT-Miscellaneous-Operations.html" accesskey="u" rel="up">FORMAT Miscellaneous Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-P_003a-Plural"><span>22.3.8.3 Tilde P: Plural<a class="copiable-link" href="#Tilde-P_003a-Plural"> &para;</a></span></h4>
+
+<p>If <i class="i">arg</i> is not <b class="b">eql</b> 
+to the integer <code class="t">1</code>, a lowercase <code class="t">s</code> is
+printed; if <i class="i">arg</i> is <b class="b">eql</b> to <code class="t">1</code>, nothing is printed.  
+If <i class="i">arg</i> is a floating-point <code class="t">1.0</code>, the <code class="t">s</code> is
+printed.
+</p>
+<p><code class="t">~:P</code> does the same thing, 
+after doing a <code class="t">~:*</code> to back up one argument;
+that is, it prints a lowercase <code class="t">s</code> if the previous argument was not
+<code class="t">1</code>.  
+</p>
+<p><code class="t">~@P</code> 
+prints <code class="t">y</code> if the argument is <code class="t">1</code>, or <code class="t">ies</code> if it is
+not.  <code class="t">~:@P</code> does the same thing, but backs up first.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;~D tr~:@P/~D win~:P&quot; 7 1) &rArr;  &quot;7 tries/1 win&quot;
+ (format nil &quot;~D tr~:@P/~D win~:P&quot; 1 0) &rArr;  &quot;1 try/0 wins&quot;
+ (format nil &quot;~D tr~:@P/~D win~:P&quot; 1 3) &rArr;  &quot;1 try/3 wins&quot;
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Percent_002d_003e-Newline.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Percent-&gt; Newline (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Percent-&gt; Newline (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Percent-&gt; Newline (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Basic-Output.html" rel="up" title="FORMAT Basic Output">
+<link href="Tilde-Ampersand_002d_003e-Fresh_002dLine.html" rel="next" title="Tilde Ampersand-&gt; Fresh-Line">
+<link href="Tilde-C_002d_003e-Character.html" rel="prev" title="Tilde C-&gt; Character">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Percent_002d_003e-Newline">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Ampersand_002d_003e-Fresh_002dLine.html" accesskey="n" rel="next">Tilde Ampersand: Fresh-Line</a>, Previous: <a href="Tilde-C_002d_003e-Character.html" accesskey="p" rel="prev">Tilde C: Character</a>, Up: <a href="FORMAT-Basic-Output.html" accesskey="u" rel="up">FORMAT Basic Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Percent_003a-Newline"><span>22.3.1.2 Tilde Percent: Newline<a class="copiable-link" href="#Tilde-Percent_003a-Newline"> &para;</a></span></h4>
+
+<p>This outputs a <code class="t">#\Newline</code> character, thereby terminating the current
+output line and beginning a new one.
+<code class="t">~<i class="i">n</i>%</code> outputs <i class="i">n</i> newlines.
+No <i class="i">arg</i> is used.  
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Question_002dMark_002d_003e-Recursive-Processing.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Question-Mark-&gt; Recursive Processing (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Question-Mark-&gt; Recursive Processing (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Question-Mark-&gt; Recursive Processing (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Control_002dFlow-Operations.html" rel="up" title="FORMAT Control-Flow Operations">
+<link href="Tilde-Right_002dBrace_002d_003e-End-of-Iteration.html" rel="prev" title="Tilde Right-Brace-&gt; End of Iteration">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Question_002dMark_002d_003e-Recursive-Processing">
+<div class="nav-panel">
+<p>
+Previous: <a href="Tilde-Right_002dBrace_002d_003e-End-of-Iteration.html" accesskey="p" rel="prev">Tilde Right-Brace: End of Iteration</a>, Up: <a href="FORMAT-Control_002dFlow-Operations.html" accesskey="u" rel="up">FORMAT Control-Flow Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Question_002dMark_003a-Recursive-Processing"><span>22.3.7.6 Tilde Question-Mark: Recursive Processing<a class="copiable-link" href="#Tilde-Question_002dMark_003a-Recursive-Processing"> &para;</a></span></h4>
+
+<p>The next <i class="i">arg</i> must be a <i class="i">format control</i>, and the one after it a <i class="i">list</i>;
+both are consumed by the <code class="t">~?</code> directive.
+The two are processed as a <i class="i">control-string</i>, with the elements of the <i class="i">list</i> 
+as the arguments.  Once the recursive processing
+has been finished, the processing of the control
+string containing the <code class="t">~?</code> directive is resumed.
+Example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;~? ~D&quot; &quot;&lt;~A ~D&gt;&quot; '(&quot;Foo&quot; 5) 7) &rArr;  &quot;&lt;Foo 5&gt; 7&quot;
+ (format nil &quot;~? ~D&quot; &quot;&lt;~A ~D&gt;&quot; '(&quot;Foo&quot; 5 14) 7) &rArr;  &quot;&lt;Foo 5&gt; 7&quot;
+</pre></div>
+
+<p>Note that in the second example three arguments are supplied
+to the <i class="i">format string</i> <code class="t">&quot;&lt;~A ~D&gt;&quot;</code>, but only two are processed
+and the third is therefore ignored.
+</p>
+<p>With the <code class="t">@</code>
+modifier, only one <i class="i">arg</i> is directly consumed.
+The <i class="i">arg</i> must be a <i class="i">string</i>; 
+it is processed as part of the control
+string as if it had appeared in place of the <code class="t">~@?</code> construct,
+and any directives in the recursively processed control string may      
+consume arguments of the control string containing the <code class="t">~@?</code>
+directive.
+Example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;~@? ~D&quot; &quot;&lt;~A ~D&gt;&quot; &quot;Foo&quot; 5 7) &rArr;  &quot;&lt;Foo 5&gt; 7&quot;
+ (format nil &quot;~@? ~D&quot; &quot;&lt;~A ~D&gt;&quot; &quot;Foo&quot; 5 14 7) &rArr;  &quot;&lt;Foo 5&gt; 14&quot;
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-R_002d_003e-Radix.html
@@ -0,0 +1,94 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde R-&gt; Radix (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde R-&gt; Radix (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde R-&gt; Radix (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Radix-Control.html" rel="up" title="FORMAT Radix Control">
+<link href="Tilde-D_002d_003e-Decimal.html" rel="next" title="Tilde D-&gt; Decimal">
+<link href="FORMAT-Radix-Control.html" rel="prev" title="FORMAT Radix Control">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-R_002d_003e-Radix">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-D_002d_003e-Decimal.html" accesskey="n" rel="next">Tilde D: Decimal</a>, Previous: <a href="FORMAT-Radix-Control.html" accesskey="p" rel="prev">FORMAT Radix Control</a>, Up: <a href="FORMAT-Radix-Control.html" accesskey="u" rel="up">FORMAT Radix Control</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-R_003a-Radix"><span>22.3.2.1 Tilde R: Radix<a class="copiable-link" href="#Tilde-R_003a-Radix"> &para;</a></span></h4>
+
+<p><code class="t">~<i class="i">n</i>R</code> prints <i class="i">arg</i> in radix <i class="i">n</i>.
+The modifier flags and any remaining parameters are used as for
+the <code class="t">~D</code> directive.
+<code class="t">~D</code> is the same as <code class="t">~10R</code>.  
+The full form is 
+<code class="t">~<i class="i">radix</i>,<i class="i">mincol</i>,<i class="i">padchar</i>,<i class="i">commachar</i>,<i class="i">comma-interval</i>R</code>.
+</p>
+<p>If no prefix parameters are given to <code class="t">~R</code>, then a different
+interpretation is given.  The argument should be an <i class="i">integer</i>.
+For example, if <i class="i">arg</i> is 4:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">~R</code> prints <i class="i">arg</i> as a cardinal English number: <code class="t">four</code>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">~:R</code> prints <i class="i">arg</i> as an ordinal English number: <code class="t">fourth</code>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">~@R</code> prints <i class="i">arg</i> as a Roman numeral: <code class="t">IV</code>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">~:@R</code> prints <i class="i">arg</i> as an old Roman numeral: <code class="t">IIII</code>.
+</p></dd>
+</dl>
+
+<p>For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format nil &quot;~,,' ,4:B&quot; 13) &rArr;  &quot;1101&quot;
+ (format nil &quot;~,,' ,4:B&quot; 17) &rArr;  &quot;1 0001&quot;
+ (format nil &quot;~19,0,' ,4:B&quot; 3333) &rArr;  &quot;0000 1101 0000 0101&quot;
+ (format nil &quot;~3,,,' ,2:R&quot; 17) &rArr;  &quot;1 22&quot;
+ (format nil &quot;~,,'|,2:D&quot; #xFFFF) &rArr;   &quot;6|55|35&quot;
+</pre></div>
+
+<p>If and only if the first parameter, <i class="i">n</i>, is supplied,
+<code class="t">~R</code> binds
+     <b class="b">*print-escape*</b> to <i class="i">false</i>,
+     <b class="b">*print-radix*</b> to <i class="i">false</i>, 
+     <b class="b">*print-base*</b> to <i class="i">n</i>,
+</p>
+<p>and <b class="b">*print-readably*</b> to <i class="i">false</i>.
+</p>
+<p>If and only if no parameters are supplied,
+<code class="t">~R</code> binds <b class="b">*print-base*</b> to <code class="t">10</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Right_002dBrace_002d_003e-End-of-Iteration.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Right-Brace-&gt; End of Iteration (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Right-Brace-&gt; End of Iteration (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Right-Brace-&gt; End of Iteration (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Control_002dFlow-Operations.html" rel="up" title="FORMAT Control-Flow Operations">
+<link href="Tilde-Question_002dMark_002d_003e-Recursive-Processing.html" rel="next" title="Tilde Question-Mark-&gt; Recursive Processing">
+<link href="Tilde-Left_002dBrace_002d_003e-Iteration.html" rel="prev" title="Tilde Left-Brace-&gt; Iteration">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Right_002dBrace_002d_003e-End-of-Iteration">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Question_002dMark_002d_003e-Recursive-Processing.html" accesskey="n" rel="next">Tilde Question-Mark: Recursive Processing</a>, Previous: <a href="Tilde-Left_002dBrace_002d_003e-Iteration.html" accesskey="p" rel="prev">Tilde Left-Brace: Iteration</a>, Up: <a href="FORMAT-Control_002dFlow-Operations.html" accesskey="u" rel="up">FORMAT Control-Flow Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Right_002dBrace_003a-End-of-Iteration"><span>22.3.7.5 Tilde Right-Brace: End of Iteration<a class="copiable-link" href="#Tilde-Right_002dBrace_003a-End-of-Iteration"> &para;</a></span></h4>
+
+<p><code class="t">~}</code> terminates a <code class="t">~{</code>.
+The consequences of using it elsewhere are undefined.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Right_002dBracket_002d_003e-End-of-Conditional-Expression.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Right-Bracket-&gt; End of Conditional Expression (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Right-Bracket-&gt; End of Conditional Expression (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Right-Bracket-&gt; End of Conditional Expression (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Control_002dFlow-Operations.html" rel="up" title="FORMAT Control-Flow Operations">
+<link href="Tilde-Left_002dBrace_002d_003e-Iteration.html" rel="next" title="Tilde Left-Brace-&gt; Iteration">
+<link href="Tilde-Left_002dBracket_002d_003e-Conditional-Expression.html" rel="prev" title="Tilde Left-Bracket-&gt; Conditional Expression">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Right_002dBracket_002d_003e-End-of-Conditional-Expression">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Left_002dBrace_002d_003e-Iteration.html" accesskey="n" rel="next">Tilde Left-Brace: Iteration</a>, Previous: <a href="Tilde-Left_002dBracket_002d_003e-Conditional-Expression.html" accesskey="p" rel="prev">Tilde Left-Bracket: Conditional Expression</a>, Up: <a href="FORMAT-Control_002dFlow-Operations.html" accesskey="u" rel="up">FORMAT Control-Flow Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Right_002dBracket_003a-End-of-Conditional-Expression"><span>22.3.7.3 Tilde Right-Bracket: End of Conditional Expression<a class="copiable-link" href="#Tilde-Right_002dBracket_003a-End-of-Conditional-Expression"> &para;</a></span></h4>
+
+<p><code class="t">~]</code> terminates a <code class="t">~[</code>.
+The consequences of using it elsewhere are undefined.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Right_002dParen_002d_003e-End-of-Case-Conversion.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Right-Paren-&gt; End of Case Conversion (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Right-Paren-&gt; End of Case Conversion (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Right-Paren-&gt; End of Case Conversion (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Miscellaneous-Operations.html" rel="up" title="FORMAT Miscellaneous Operations">
+<link href="Tilde-P_002d_003e-Plural.html" rel="next" title="Tilde P-&gt; Plural">
+<link href="Tilde-Left_002dParen_002d_003e-Case-Conversion.html" rel="prev" title="Tilde Left-Paren-&gt; Case Conversion">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Right_002dParen_002d_003e-End-of-Case-Conversion">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-P_002d_003e-Plural.html" accesskey="n" rel="next">Tilde P: Plural</a>, Previous: <a href="Tilde-Left_002dParen_002d_003e-Case-Conversion.html" accesskey="p" rel="prev">Tilde Left-Paren: Case Conversion</a>, Up: <a href="FORMAT-Miscellaneous-Operations.html" accesskey="u" rel="up">FORMAT Miscellaneous Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Right_002dParen_003a-End-of-Case-Conversion"><span>22.3.8.2 Tilde Right-Paren: End of Case Conversion<a class="copiable-link" href="#Tilde-Right_002dParen_003a-End-of-Case-Conversion"> &para;</a></span></h4>
+
+<p><code class="t">~)</code> terminates a <code class="t">~(</code>.
+The consequences of using it elsewhere are undefined.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-S_002d_003e-Standard.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde S-&gt; Standard (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde S-&gt; Standard (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde S-&gt; Standard (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Printer-Operations.html" rel="up" title="FORMAT Printer Operations">
+<link href="Tilde-W_002d_003e-Write.html" rel="next" title="Tilde W-&gt; Write">
+<link href="Tilde-A_002d_003e-Aesthetic.html" rel="prev" title="Tilde A-&gt; Aesthetic">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-S_002d_003e-Standard">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-W_002d_003e-Write.html" accesskey="n" rel="next">Tilde W: Write</a>, Previous: <a href="Tilde-A_002d_003e-Aesthetic.html" accesskey="p" rel="prev">Tilde A: Aesthetic</a>, Up: <a href="FORMAT-Printer-Operations.html" accesskey="u" rel="up">FORMAT Printer Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-S_003a-Standard"><span>22.3.4.2 Tilde S: Standard<a class="copiable-link" href="#Tilde-S_003a-Standard"> &para;</a></span></h4>
+
+<p>This is just like <code class="t">~A</code>, but <i class="i">arg</i> is printed with escape
+characters (as by <b class="b">prin1</b> rather than <code class="t">princ</code>).  The output is
+therefore suitable for input to <b class="b">read</b>.  <code class="t">~S</code> accepts
+all the arguments and modifiers that <code class="t">~A</code> does.
+</p>
+<p><code class="t">~S</code> binds <b class="b">*print-escape*</b> to <b class="b">t</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Semicolon_002d_003e-Clause-Separator.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Semicolon-&gt; Clause Separator (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Semicolon-&gt; Clause Separator (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Semicolon-&gt; Clause Separator (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Miscellaneous-Pseudo_002dOperations.html" rel="up" title="FORMAT Miscellaneous Pseudo-Operations">
+<link href="Tilde-Circumflex_002d_003e-Escape-Upward.html" rel="next" title="Tilde Circumflex-&gt; Escape Upward">
+<link href="FORMAT-Miscellaneous-Pseudo_002dOperations.html" rel="prev" title="FORMAT Miscellaneous Pseudo-Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Semicolon_002d_003e-Clause-Separator">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Circumflex_002d_003e-Escape-Upward.html" accesskey="n" rel="next">Tilde Circumflex: Escape Upward</a>, Previous: <a href="FORMAT-Miscellaneous-Pseudo_002dOperations.html" accesskey="p" rel="prev">FORMAT Miscellaneous Pseudo-Operations</a>, Up: <a href="FORMAT-Miscellaneous-Pseudo_002dOperations.html" accesskey="u" rel="up">FORMAT Miscellaneous Pseudo-Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Semicolon_003a-Clause-Separator"><span>22.3.9.1 Tilde Semicolon: Clause Separator<a class="copiable-link" href="#Tilde-Semicolon_003a-Clause-Separator"> &para;</a></span></h4>
+
+<p>This separates clauses in <code class="t">~[</code> and <code class="t">~&lt;</code> constructs.
+The consequences of using it elsewhere are undefined.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Slash_002d_003e-Call-Function.html
@@ -0,0 +1,84 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Slash-&gt; Call Function (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Slash-&gt; Call Function (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Slash-&gt; Call Function (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Pretty-Printer-Operations.html" rel="up" title="FORMAT Pretty Printer Operations">
+<link href="Tilde-I_002d_003e-Indent.html" rel="prev" title="Tilde I-&gt; Indent">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Slash_002d_003e-Call-Function">
+<div class="nav-panel">
+<p>
+Previous: <a href="Tilde-I_002d_003e-Indent.html" accesskey="p" rel="prev">Tilde I: Indent</a>, Up: <a href="FORMAT-Pretty-Printer-Operations.html" accesskey="u" rel="up">FORMAT Pretty Printer Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Slash_003a-Call-Function"><span>22.3.5.4 Tilde Slash: Call Function<a class="copiable-link" href="#Tilde-Slash_003a-Call-Function"> &para;</a></span></h4>
+
+<p><code class="t">~/<i class="i">name</i>/</code>
+</p>
+<p>User defined functions can be called from within a format
+string by using the directive <code class="t">~/<i class="i">name</i>/</code>.
+The <i class="i">colon</i> modifier, the <i class="i">at-sign</i> modifier, and arbitrarily many parameters 
+can be specified with the <code class="t">~/<i class="i">name</i>/</code> directive.
+<i class="i">name</i> can be any arbitrary string that does not contain a &quot;/&quot;.
+All of the characters in <i class="i">name</i> are treated as if they were upper case.
+If <i class="i">name</i> contains a single <i class="i">colon</i> (<code class="t">:</code>) or double <i class="i">colon</i> (<code class="t">::</code>),
+then everything up to but not including the first <code class="t">&quot;:&quot;</code> or <code class="t">&quot;::&quot;</code>
+is taken to be a <i class="i">string</i> that names a <i class="i">package</i>.
+Everything after the first <code class="t">&quot;:&quot;</code> or <code class="t">&quot;::&quot;</code> (if any) is taken to be a 
+<i class="i">string</i> that names a <code class="t">symbol</code>.  The function corresponding to a 
+<code class="t">~/name/</code> directive is obtained by looking up the <i class="i">symbol</i>
+that has the indicated name in the indicated <i class="i">package</i>.
+If <i class="i">name</i> does not contain a <code class="t">&quot;:&quot;</code> or <code class="t">&quot;::&quot;</code>,
+then the whole <i class="i">name</i> string is looked up in the <code class="t">COMMON-LISP-USER</code> <i class="i">package</i>. 
+</p>
+<p>When a <code class="t">~/name/</code> directive is encountered,
+the indicated function is called with four or more arguments.
+The first four arguments are:
+     the output stream,
+     the <i class="i">format argument</i> corresponding to the directive,
+     a <i class="i">generalized boolean</i> that is <i class="i">true</i> if the <i class="i">colon</i> modifier was used,
+ and a <i class="i">generalized boolean</i> that is <i class="i">true</i> if the <i class="i">at-sign</i> modifier was used.
+The remaining arguments consist of any parameters specified with the directive.
+The function should print the argument appropriately.
+Any values returned by the function are ignored.
+</p>
+<p>The three <i class="i">functions</i> 
+      <b class="b">pprint-linear</b>,
+      <b class="b">pprint-fill</b>,
+  and <b class="b">pprint-tabular</b>
+are specifically designed so that they can be called by <code class="t">~/.../</code>
+(<i class="i">i.e.</i>, <code class="t">~/pprint-linear/</code>, <code class="t">~/pprint-fill/</code>, and <code class="t">~/pprint-tabular/</code>).
+In particular they take <i class="i">colon</i> and <i class="i">at-sign</i> arguments.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Tilde-I_002d_003e-Indent.html">Tilde I: Indent</a>, Up: <a href="FORMAT-Pretty-Printer-Operations.html">FORMAT Pretty Printer Operations</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-T_002d_003e-Tabulate.html
@@ -0,0 +1,95 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde T-&gt; Tabulate (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde T-&gt; Tabulate (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde T-&gt; Tabulate (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Layout-Control.html" rel="up" title="FORMAT Layout Control">
+<link href="Tilde-Less_002dThan_002dSign_002d_003e-Justification.html" rel="next" title="Tilde Less-Than-Sign-&gt; Justification">
+<link href="FORMAT-Layout-Control.html" rel="prev" title="FORMAT Layout Control">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-T_002d_003e-Tabulate">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Less_002dThan_002dSign_002d_003e-Justification.html" accesskey="n" rel="next">Tilde Less-Than-Sign: Justification</a>, Previous: <a href="FORMAT-Layout-Control.html" accesskey="p" rel="prev">FORMAT Layout Control</a>, Up: <a href="FORMAT-Layout-Control.html" accesskey="u" rel="up">FORMAT Layout Control</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-T_003a-Tabulate"><span>22.3.6.1 Tilde T: Tabulate<a class="copiable-link" href="#Tilde-T_003a-Tabulate"> &para;</a></span></h4>
+
+<p>This spaces over to a given column.
+<code class="t">~<i class="i">colnum</i>,<i class="i">colinc</i>T</code> will output
+sufficient spaces to move the cursor to column <i class="i">colnum</i>.  If the cursor
+is already at or beyond column <i class="i">colnum</i>, it will output spaces to move it to
+column <i class="i">colnum</i>+<i class="i">k</i>*<i class="i">colinc</i> for the smallest positive integer
+<i class="i">k</i> possible, unless <i class="i">colinc</i> is zero, in which case no spaces
+are output if the cursor is already at or beyond column <i class="i">colnum</i>.
+<i class="i">colnum</i> and <i class="i">colinc</i> default to <code class="t">1</code>.
+</p>
+<p>If for some reason the current absolute column position cannot be determined
+by direct inquiry,
+<b class="b">format</b> 
+may be able to deduce the current column position by noting         
+that certain directives (such as <code class="t">~%</code>, or <code class="t">~&amp;</code>,
+or <code class="t">~A</code> 
+with the argument being a string containing a newline) cause
+the column position to be reset to zero, and counting the number of characters
+emitted since that point.  If that fails, <b class="b">format</b> 
+may attempt a
+similar deduction on the riskier assumption that the destination was
+at column zero when <b class="b">format</b> 
+was invoked.  If even this heuristic fails
+or is implementationally inconvenient, at worst
+the <code class="t">~T</code> operation will simply output two spaces.
+</p>
+<p><code class="t">~@T</code> performs relative tabulation.
+<code class="t">~<i class="i">colrel</i>,<i class="i">colinc</i>@T</code> outputs <i class="i">colrel</i> spaces
+and then outputs the smallest non-negative
+number of additional spaces necessary to move the cursor
+to a column that is a multiple                                       
+of <i class="i">colinc</i>.  For example, the directive 
+<code class="t">~3,8@T</code> outputs
+three spaces and then moves the cursor to a &ldquo;standard multiple-of-eight
+tab stop&rdquo; if not at one already.
+If the current output column cannot be determined, however,
+then <i class="i">colinc</i> is ignored, and exactly <i class="i">colrel</i> spaces are output.
+</p>
+<p>If the <i class="i">colon</i> modifier is used with the <code class="t">~T</code> directive,
+the tabbing computation is done relative to the horizontal position where the
+section immediately containing the directive begins, rather than with
+respect to a horizontal position of zero.  The numerical parameters are
+both interpreted as being in units of <i class="i">ems</i> and both default to <code class="t">1</code>.
+<code class="t">~<i class="i">n</i>,<i class="i">m</i>:T</code> is the same as 
+  <code class="t">(pprint-tab :section <i class="i">n</i> <i class="i">m</i>)</code>.
+<code class="t">~<i class="i">n</i>,<i class="i">m</i>:@T</code> is the same as
+  <code class="t">(pprint-tab :section-relative <i class="i">n</i> <i class="i">m</i>)</code>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Less_002dThan_002dSign_002d_003e-Justification.html">Tilde Less-Than-Sign: Justification</a>, Previous: <a href="FORMAT-Layout-Control.html">FORMAT Layout Control</a>, Up: <a href="FORMAT-Layout-Control.html">FORMAT Layout Control</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Tilde_002d_003e-Tilde.html
@@ -0,0 +1,44 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Tilde-&gt; Tilde (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Tilde-&gt; Tilde (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Tilde-&gt; Tilde (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Basic-Output.html" rel="up" title="FORMAT Basic Output">
+<link href="Tilde-Vertical_002dBar_002d_003e-Page.html" rel="prev" title="Tilde Vertical-Bar-&gt; Page">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Tilde_002d_003e-Tilde">
+<div class="nav-panel">
+<p>
+Previous: <a href="Tilde-Vertical_002dBar_002d_003e-Page.html" accesskey="p" rel="prev">Tilde Vertical-Bar: Page</a>, Up: <a href="FORMAT-Basic-Output.html" accesskey="u" rel="up">FORMAT Basic Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Tilde_003a-Tilde"><span>22.3.1.5 Tilde Tilde: Tilde<a class="copiable-link" href="#Tilde-Tilde_003a-Tilde"> &para;</a></span></h4>
+
+<p>This outputs a <i class="i">tilde</i>.  <code class="t">~<i class="i">n</i>~</code> outputs <i class="i">n</i> tildes.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Underscore_002d_003e-Conditional-Newline.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Underscore-&gt; Conditional Newline (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Underscore-&gt; Conditional Newline (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Underscore-&gt; Conditional Newline (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Pretty-Printer-Operations.html" rel="up" title="FORMAT Pretty Printer Operations">
+<link href="Tilde-Less_002dThan_002dSign_002d_003e-Logical-Block.html" rel="next" title="Tilde Less-Than-Sign-&gt; Logical Block">
+<link href="FORMAT-Pretty-Printer-Operations.html" rel="prev" title="FORMAT Pretty Printer Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Underscore_002d_003e-Conditional-Newline">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Less_002dThan_002dSign_002d_003e-Logical-Block.html" accesskey="n" rel="next">Tilde Less-Than-Sign: Logical Block</a>, Previous: <a href="FORMAT-Pretty-Printer-Operations.html" accesskey="p" rel="prev">FORMAT Pretty Printer Operations</a>, Up: <a href="FORMAT-Pretty-Printer-Operations.html" accesskey="u" rel="up">FORMAT Pretty Printer Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Underscore_003a-Conditional-Newline"><span>22.3.5.1 Tilde Underscore: Conditional Newline<a class="copiable-link" href="#Tilde-Underscore_003a-Conditional-Newline"> &para;</a></span></h4>
+
+<p>Without any modifiers, <code class="t">~_</code> is the same as <code class="t">(pprint-newline :linear)</code>.
+<code class="t">~@_</code>  is the same as <code class="t">(pprint-newline :miser)</code>.
+<code class="t">~:_</code>  is the same as <code class="t">(pprint-newline :fill)</code>.
+<code class="t">~:@_</code> is the same as <code class="t">(pprint-newline :mandatory)</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-Vertical_002dBar_002d_003e-Page.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde Vertical-Bar-&gt; Page (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde Vertical-Bar-&gt; Page (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde Vertical-Bar-&gt; Page (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Basic-Output.html" rel="up" title="FORMAT Basic Output">
+<link href="Tilde-Tilde_002d_003e-Tilde.html" rel="next" title="Tilde Tilde-&gt; Tilde">
+<link href="Tilde-Ampersand_002d_003e-Fresh_002dLine.html" rel="prev" title="Tilde Ampersand-&gt; Fresh-Line">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-Vertical_002dBar_002d_003e-Page">
+<div class="nav-panel">
+<p>
+Next: <a href="Tilde-Tilde_002d_003e-Tilde.html" accesskey="n" rel="next">Tilde Tilde: Tilde</a>, Previous: <a href="Tilde-Ampersand_002d_003e-Fresh_002dLine.html" accesskey="p" rel="prev">Tilde Ampersand: Fresh-Line</a>, Up: <a href="FORMAT-Basic-Output.html" accesskey="u" rel="up">FORMAT Basic Output</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-Vertical_002dBar_003a-Page"><span>22.3.1.4 Tilde Vertical-Bar: Page<a class="copiable-link" href="#Tilde-Vertical_002dBar_003a-Page"> &para;</a></span></h4>
+
+<p>This outputs a page separator character, if possible.
+<code class="t">~<i class="i">n</i>|</code> does this <i class="i">n</i> times.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-W_002d_003e-Write.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde W-&gt; Write (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde W-&gt; Write (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde W-&gt; Write (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Printer-Operations.html" rel="up" title="FORMAT Printer Operations">
+<link href="Tilde-S_002d_003e-Standard.html" rel="prev" title="Tilde S-&gt; Standard">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-W_002d_003e-Write">
+<div class="nav-panel">
+<p>
+Previous: <a href="Tilde-S_002d_003e-Standard.html" accesskey="p" rel="prev">Tilde S: Standard</a>, Up: <a href="FORMAT-Printer-Operations.html" accesskey="u" rel="up">FORMAT Printer Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-W_003a-Write"><span>22.3.4.3 Tilde W: Write<a class="copiable-link" href="#Tilde-W_003a-Write"> &para;</a></span></h4>
+
+<p>An argument, any <i class="i">object</i>, is printed obeying every printer control
+variable (as by <b class="b">write</b>).  In addition, <code class="t">~W</code> interacts correctly with depth
+abbreviation, by not resetting the depth counter to zero.  <code class="t">~W</code> does not
+accept parameters.  If given the <i class="i">colon</i> modifier, <code class="t">~W</code> binds <b class="b">*print-pretty*</b>
+to <i class="i">true</i>.  If given the <i class="i">at-sign</i> modifier, <code class="t">~W</code> binds <b class="b">*print-level*</b>
+and <b class="b">*print-length*</b> to <b class="b">nil</b>.
+</p>
+<p><code class="t">~W</code> provides automatic support for the detection of circularity and
+sharing.  If the <i class="i">value</i> of <b class="b">*print-circle*</b> is not <b class="b">nil</b> and <code class="t">~W</code> is applied
+to an argument that is a circular (or shared) reference, an appropriate 
+<code class="t">#<i class="i">n</i>#</code> marker is inserted in the output instead of printing the argument.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Tilde-X_002d_003e-Hexadecimal.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Tilde X-&gt; Hexadecimal (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Tilde X-&gt; Hexadecimal (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Tilde X-&gt; Hexadecimal (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="FORMAT-Radix-Control.html" rel="up" title="FORMAT Radix Control">
+<link href="Tilde-O_002d_003e-Octal.html" rel="prev" title="Tilde O-&gt; Octal">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Tilde-X_002d_003e-Hexadecimal">
+<div class="nav-panel">
+<p>
+Previous: <a href="Tilde-O_002d_003e-Octal.html" accesskey="p" rel="prev">Tilde O: Octal</a>, Up: <a href="FORMAT-Radix-Control.html" accesskey="u" rel="up">FORMAT Radix Control</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Tilde-X_003a-Hexadecimal"><span>22.3.2.5 Tilde X: Hexadecimal<a class="copiable-link" href="#Tilde-X_003a-Hexadecimal"> &para;</a></span></h4>
+
+<p>This is just like <code class="t">~D</code> but prints in hexadecimal radix
+(radix 16) instead of decimal.  The full form is therefore
+<code class="t">~<i class="i">mincol</i>,<i class="i">padchar</i>,<i class="i">commachar</i>,<i class="i">comma-interval</i>X</code>.
+</p>
+<p><code class="t">~X</code> binds
+     <b class="b">*print-escape*</b> to <i class="i">false</i>,
+     <b class="b">*print-radix*</b> to <i class="i">false</i>,
+     <b class="b">*print-base*</b> to <code class="t">16</code>,
+</p>
+<p>and <b class="b">*print-readably*</b> to <i class="i">false</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Time.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Time (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Time (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Time (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-External-Environment.html" rel="up" title="The External Environment">
+<link href="Environment-Inquiry.html" rel="prev" title="Environment Inquiry">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Time">
+<div class="nav-panel">
+<p>
+Previous: <a href="Environment-Inquiry.html" accesskey="p" rel="prev">Environment Inquiry</a>, Up: <a href="The-External-Environment.html" accesskey="u" rel="up">The External Environment</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Time-1"><span>25.1.4 Time<a class="copiable-link" href="#Time-1"> &para;</a></span></h4>
+
+<p>Time is represented in four different ways in <span class="r">Common Lisp</span>:
+    <i class="i">decoded time</i>,
+    <i class="i">universal time</i>,
+    <i class="i">internal time</i>,
+and seconds.
+<i class="i">Decoded time</i> and <i class="i">universal time</i> are used primarily to represent calendar time,
+and are precise only to one second.
+<i class="i">Internal time</i> is used primarily to represent measurements of computer
+time (such as run time) and is precise to some <i class="i">implementation-dependent</i>
+fraction of a second called an <i class="i">internal time unit</i>,
+as specified by <b class="b">internal-time-units-per-second</b>.
+An <i class="i">internal time</i> can be used 
+  for either <i class="i">absolute</i> and <i class="i">relative</i> <i class="i">time</i> measurements.
+Both a <i class="i">universal time</i> and a <i class="i">decoded time</i> can be used 
+  only for <i class="i">absolute</i> <i class="i">time</i> measurements.
+In the case of one function, <b class="b">sleep</b>,
+time intervals are represented as a non-negative <i class="i">real</i> number of seconds.
+</p>
+<p>Figure 25&ndash;4 shows <i class="i">defined names</i> relating to <i class="i">time</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  decode-universal-time   get-internal-run-time           <!-- /@w -->
+  encode-universal-time   get-universal-time              <!-- /@w -->
+  get-decoded-time        internal-time-units-per-second  <!-- /@w -->
+  get-internal-real-time  sleep                           <!-- /@w -->
+
+        Figure 25&ndash;4: Defined names involving Time.       <!-- /@w -->
+
+</pre></div></div>
+
+
+<ul class="mini-toc">
+<li><a href="Decoded-Time.html" accesskey="1">Decoded Time</a></li>
+<li><a href="Universal-Time.html" accesskey="2">Universal Time</a></li>
+<li><a href="Internal-Time.html" accesskey="3">Internal Time</a></li>
+<li><a href="Seconds.html" accesskey="4">Seconds</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Too-Few-Arguments.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Too Few Arguments (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Too Few Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Too Few Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Argument-Mismatch-Detection.html" rel="up" title="Argument Mismatch Detection">
+<link href="Too-Many-Arguments.html" rel="next" title="Too Many Arguments">
+<link href="Error-Detection-Time-in-Safe-Calls.html" rel="prev" title="Error Detection Time in Safe Calls">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Too-Few-Arguments">
+<div class="nav-panel">
+<p>
+Next: <a href="Too-Many-Arguments.html" accesskey="n" rel="next">Too Many Arguments</a>, Previous: <a href="Error-Detection-Time-in-Safe-Calls.html" accesskey="p" rel="prev">Error Detection Time in Safe Calls</a>, Up: <a href="Argument-Mismatch-Detection.html" accesskey="u" rel="up">Argument Mismatch Detection</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Too-Few-Arguments-1"><span>3.5.1.3 Too Few Arguments<a class="copiable-link" href="#Too-Few-Arguments-1"> &para;</a></span></h4>
+
+<p>It is not permitted to supply too few <i class="i">arguments</i> to a <i class="i">function</i>.
+Too few arguments means fewer <i class="i">arguments</i> than the number of <i class="i">required parameters</i> 
+for the <i class="i">function</i>.
+</p>
+<p>If this <i class="i">situation</i> occurs in a <i class="i">safe call</i>,
+</p>
+<p>an error of <i class="i">type</i> <b class="b">program-error</b> must be signaled;
+and in an <i class="i">unsafe call</i> the <i class="i">situation</i> has undefined consequences.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Too-Many-Arguments.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Too Many Arguments (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Too Many Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Too Many Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Argument-Mismatch-Detection.html" rel="up" title="Argument Mismatch Detection">
+<link href="Unrecognized-Keyword-Arguments.html" rel="next" title="Unrecognized Keyword Arguments">
+<link href="Too-Few-Arguments.html" rel="prev" title="Too Few Arguments">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Too-Many-Arguments">
+<div class="nav-panel">
+<p>
+Next: <a href="Unrecognized-Keyword-Arguments.html" accesskey="n" rel="next">Unrecognized Keyword Arguments</a>, Previous: <a href="Too-Few-Arguments.html" accesskey="p" rel="prev">Too Few Arguments</a>, Up: <a href="Argument-Mismatch-Detection.html" accesskey="u" rel="up">Argument Mismatch Detection</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Too-Many-Arguments-1"><span>3.5.1.4 Too Many Arguments<a class="copiable-link" href="#Too-Many-Arguments-1"> &para;</a></span></h4>
+
+<p>It is not permitted to supply too many <i class="i">arguments</i> to a <i class="i">function</i>.
+Too many arguments means more <i class="i">arguments</i> than the number of <i class="i">required parameters</i>
+plus the number of <i class="i">optional parameters</i>; however, if the <i class="i">function</i> 
+uses <b class="b">&amp;rest</b> or <b class="b">&amp;key</b>, it is not possible for it to receive too many arguments.
+</p>
+<p>If this <i class="i">situation</i> occurs in a <i class="i">safe call</i>,
+</p>
+<p>an error of <i class="i">type</i> <b class="b">program-error</b> must be signaled;
+and in an <i class="i">unsafe call</i> the <i class="i">situation</i> has undefined consequences.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Top-level-loop.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Top level loop (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Top level loop (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Top level loop (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-External-Environment.html" rel="up" title="The External Environment">
+<link href="Debugging-Utilities.html" rel="next" title="Debugging Utilities">
+<link href="The-External-Environment.html" rel="prev" title="The External Environment">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Top-level-loop">
+<div class="nav-panel">
+<p>
+Next: <a href="Debugging-Utilities.html" accesskey="n" rel="next">Debugging Utilities</a>, Previous: <a href="The-External-Environment.html" accesskey="p" rel="prev">The External Environment</a>, Up: <a href="The-External-Environment.html" accesskey="u" rel="up">The External Environment</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Top-level-loop-1"><span>25.1.1 Top level loop<a class="copiable-link" href="#Top-level-loop-1"> &para;</a></span></h4>
+
+<p>The top level loop is the <span class="r">Common Lisp</span> mechanism by which the user normally
+interacts with the <span class="r">Common Lisp</span> system. This loop is sometimes referred to 
+as the <i class="i">Lisp read-eval-print loop</i>
+because it typically consists of an endless loop that reads an expression,
+evaluates it and prints the results.
+</p>
+<p>The top level loop is not completely specified; thus the user
+interface is <i class="i">implementation-defined</i>.
+The top level loop 
+prints all values resulting from the evaluation of a 
+<i class="i">form</i>.
+Figure 25&ndash;1 lists variables that are maintained by the <i class="i">Lisp read-eval-print loop</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  *    +    /    -  <!-- /@w -->
+  **   ++   //      <!-- /@w -->
+  ***  +++  ///     <!-- /@w -->
+
+  Figure 25&ndash;1: Variables maintained by the Read-Eval-Print Loop<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Topological-Sorting.html
@@ -0,0 +1,92 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Topological Sorting (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Topological Sorting (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Topological Sorting (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Determining-the-Class-Precedence-List.html" rel="up" title="Determining the Class Precedence List">
+<link href="Examples-of-Class-Precedence-List-Determination.html" rel="next" title="Examples of Class Precedence List Determination">
+<link href="Determining-the-Class-Precedence-List.html" rel="prev" title="Determining the Class Precedence List">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Topological-Sorting">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Class-Precedence-List-Determination.html" accesskey="n" rel="next">Examples of Class Precedence List Determination</a>, Previous: <a href="Determining-the-Class-Precedence-List.html" accesskey="p" rel="prev">Determining the Class Precedence List</a>, Up: <a href="Determining-the-Class-Precedence-List.html" accesskey="u" rel="up">Determining the Class Precedence List</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Topological-Sorting-1"><span>4.3.5.1 Topological Sorting<a class="copiable-link" href="#Topological-Sorting-1"> &para;</a></span></h4>
+
+<p>Topological sorting proceeds by finding a class C in~S_C such
+that no other <i class="i">class</i> precedes that element according to the elements
+in~R.  The class C is placed first in the result.
+Remove C from S_C, and remove all pairs of the form (C,D),
+D\in S_C, from R. Repeat the process, adding
+<i class="i">classes</i> with no predecessors to the end of the result.  Stop when no
+element can be found that has no predecessor.
+</p>
+<p>If S_C is not empty and the process has stopped, the set R is
+inconsistent. If every <i class="i">class</i> in the finite set of 
+<i class="i">classes</i> is preceded
+by another, then R contains a loop. That is, there is a chain of
+classes C_1,...,C_n such that C_i precedes
+C_{i+1}, 1&lt;= i&lt;n, and C_n precedes C_1.
+</p>
+<p>Sometimes there are several <i class="i">classes</i> from S_C with no
+predecessors.  In this case select the one that has a direct
+<i class="i">subclass</i> rightmost in the <i class="i">class precedence list</i> computed so far.
+(If there is no such candidate <i class="i">class</i>, R does not generate 
+a partial ordering&mdash;the R_c, c\in S_C, are inconsistent.)
+</p>
+<p>In more precise terms, let {N_1,...,N_m}, m&gt;= 2, be
+the <i class="i">classes</i> from S_C with no predecessors.  Let (C_1... C_n), n&gt;= 1, be the <i class="i">class precedence list</i>
+constructed so far.  C_1 is the most specific <i class="i">class</i>, and C_n is the least specific.  Let 1&lt;= j&lt;= n be the largest number
+such that there exists an i where 1&lt;= i&lt;= m and N_i
+is a direct <i class="i">superclass</i> of C_j; N_i is placed next.
+</p>
+<p>The effect of this rule for selecting from a set of <i class="i">classes</i> with no
+predecessors is that the <i class="i">classes</i> in a simple <i class="i">superclass</i> chain are
+adjacent in the <i class="i">class precedence list</i> and that <i class="i">classes</i> in each
+relatively separated subgraph are adjacent in the <i class="i">class precedence list</i>.
+For example, let T_1 and T_2 be subgraphs whose only
+element in common is the class J.
+Suppose that no superclass of J appears in either T_1 or T_2,
+and that J is in the superclass chain of every class in both T_1 and T_2.
+    Let C_1 be the bottom of T_1; 
+and let C_2 be the bottom of T_2.
+Suppose C is a <i class="i">class</i> whose direct <i class="i">superclasses</i>
+are C_1 and C_2 in that order, then the <i class="i">class precedence list</i>
+for C starts with C and is followed by
+all <i class="i">classes</i> in T_1 except J. 
+All the <i class="i">classes</i> of T_2 are next.
+The <i class="i">class</i> J and its <i class="i">superclasses</i> appear last.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Class-Precedence-List-Determination.html">Examples of Class Precedence List Determination</a>, Previous: <a href="Determining-the-Class-Precedence-List.html">Determining the Class Precedence List</a>, Up: <a href="Determining-the-Class-Precedence-List.html">Determining the Class Precedence List</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Transfer-of-Control-during-a-Destructive-Operation.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Transfer of Control during a Destructive Operation (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Transfer of Control during a Destructive Operation (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Transfer of Control during a Destructive Operation (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Destructive-Operations.html" rel="up" title="Destructive Operations">
+<link href="Modification-of-Literal-Objects.html" rel="prev" title="Modification of Literal Objects">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Transfer-of-Control-during-a-Destructive-Operation">
+<div class="nav-panel">
+<p>
+Previous: <a href="Modification-of-Literal-Objects.html" accesskey="p" rel="prev">Modification of Literal Objects</a>, Up: <a href="Destructive-Operations.html" accesskey="u" rel="up">Destructive Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Transfer-of-Control-during-a-Destructive-Operation-1"><span>3.7.2 Transfer of Control during a Destructive Operation<a class="copiable-link" href="#Transfer-of-Control-during-a-Destructive-Operation-1"> &para;</a></span></h4>
+
+<p>Should a transfer of control out of a <i class="i">destructive</i> operation occur
+(<i class="i">e.g.</i>, due to an error) the state of the <i class="i">object</i> being modified is
+<i class="i">implementation-dependent</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Examples-of-Transfer-of-Control-during-a-Destructive-Operation.html" accesskey="1">Examples of Transfer of Control during a Destructive Operation</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Transfer-of-Control-to-an-Exit-Point.html
@@ -0,0 +1,103 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Transfer of Control to an Exit Point (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Transfer of Control to an Exit Point (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Transfer of Control to an Exit Point (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow.html" rel="up" title="Data and Control Flow">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="next" title="Data and Control Flow Dictionary">
+<link href="Generalized-Reference.html" rel="prev" title="Generalized Reference">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Transfer-of-Control-to-an-Exit-Point">
+<div class="nav-panel">
+<p>
+Next: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="n" rel="next">Data and Control Flow Dictionary</a>, Previous: <a href="Generalized-Reference.html" accesskey="p" rel="prev">Generalized Reference</a>, Up: <a href="Data-and-Control-Flow.html" accesskey="u" rel="up">Data and Control Flow</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Transfer-of-Control-to-an-Exit-Point-1"><span>5.2 Transfer of Control to an Exit Point<a class="copiable-link" href="#Transfer-of-Control-to-an-Exit-Point-1"> &para;</a></span></h3>
+
+
+<p>When a transfer of control is initiated by <b class="b">go</b>, 
+<b class="b">return-from</b>, or <b class="b">throw</b>
+the following events occur in order to accomplish the transfer of control.
+Note that for <b class="b">go</b>, 
+the <i class="i">exit point</i> is the <i class="i">form</i> within the <b class="b">tagbody</b>
+that is being executed at the time the <b class="b">go</b> is performed;
+for <b class="b">return-from</b>,
+the <i class="i">exit point</i> is the corresponding 
+<b class="b">block</b> <i class="i">form</i>;
+and for <b class="b">throw</b>,
+the <i class="i">exit point</i> is the corresponding 
+<b class="b">catch</b> <i class="i">form</i>. 
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>Intervening <i class="i">exit points</i> are &ldquo;abandoned&rdquo;
+ (<i class="i">i.e.</i>, their <i class="i">extent</i> ends 
+      and it is no longer valid to attempt to transfer control through them).
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p>The cleanup clauses of any intervening <b class="b">unwind-protect</b> clauses
+ are evaluated.
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>Intervening dynamic <i class="i">bindings</i> of <b class="b">special</b> variables,
+ <i class="i">catch tags</i>, <i class="i">condition handlers</i>, and <i class="i">restarts</i>
+ are undone.
+</p>
+</dd>
+<dt>4.</dt>
+<dd><p>The <i class="i">extent</i> of the <i class="i">exit point</i> being invoked ends,
+ and control is passed to the target.
+</p></dd>
+</dl>
+
+<p>The extent of an exit being &ldquo;abandoned&rdquo; because it is being passed over
+ends as soon as the transfer of control is initiated. That is,
+event 1 occurs at the beginning of the initiation of the transfer of
+control. 
+The consequences are undefined if an attempt is made to transfer control 
+to an <i class="i">exit point</i> whose <i class="i">dynamic extent</i> has ended.
+</p>
+<p>Events 2 and 3 are actually performed interleaved, in the order
+corresponding to the reverse order in which they were established.
+The effect of this is that the cleanup clauses of an <b class="b">unwind-protect</b>
+see the same dynamic <i class="i">bindings</i> 
+of variables and <i class="i">catch tags</i> as were
+visible when the <b class="b">unwind-protect</b> was entered.
+</p>
+<p>Event 4 occurs at the end of the transfer of control.
+</p>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a>, Previous: <a href="Generalized-Reference.html">Generalized Reference</a>, Up: <a href="Data-and-Control-Flow.html">Data and Control Flow</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Traversal-Rules-and-Side-Effects.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Traversal Rules and Side Effects (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Traversal Rules and Side Effects (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Traversal Rules and Side Effects (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation.html" rel="up" title="Evaluation and Compilation">
+<link href="Destructive-Operations.html" rel="next" title="Destructive Operations">
+<link href="Error-Checking-in-Function-Calls.html" rel="prev" title="Error Checking in Function Calls">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Traversal-Rules-and-Side-Effects">
+<div class="nav-panel">
+<p>
+Next: <a href="Destructive-Operations.html" accesskey="n" rel="next">Destructive Operations</a>, Previous: <a href="Error-Checking-in-Function-Calls.html" accesskey="p" rel="prev">Error Checking in Function Calls</a>, Up: <a href="Evaluation-and-Compilation.html" accesskey="u" rel="up">Evaluation and Compilation</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Traversal-Rules-and-Side-Effects-1"><span>3.6 Traversal Rules and Side Effects<a class="copiable-link" href="#Traversal-Rules-and-Side-Effects-1"> &para;</a></span></h3>
+
+
+<p>The consequences are undefined 
+when <i class="i">code</i> executed during an <i class="i">object-traversing</i> operation
+destructively modifies the <i class="i">object</i> in a way that might affect the
+ongoing traversal operation.
+In particular, the following rules apply.
+</p><dl class="table">
+<dt><b class="b">List traversal</b></dt>
+<dd><p>For <i class="i">list</i> traversal operations, the <i class="i">cdr</i> chain of the
+ <i class="i">list</i> is not allowed to be destructively modified.
+</p>
+</dd>
+<dt><b class="b">Array traversal</b></dt>
+<dd><p>For <i class="i">array</i> traversal operations, the <i class="i">array</i> is not allowed 
+  to be adjusted and its <i class="i">fill pointer</i>, if any, is not allowed to 
+  be changed.
+</p>
+</dd>
+<dt><b class="b">Hash-table traversal</b></dt>
+<dd><p>For <i class="i">hash table</i> traversal operations, new elements may not be added
+  or deleted except that the element corresponding to the current hash key 
+  may be changed or removed.
+</p>
+</dd>
+<dt><b class="b">Package traversal</b></dt>
+<dd><p>For <i class="i">package</i> traversal operations (<i class="i">e.g.</i>, <b class="b">do-symbols</b>),
+  new <i class="i">symbols</i> may not be <i class="i">interned</i> in or <i class="i">uninterned</i> 
+  from the <i class="i">package</i> being traversed 
+  or any <i class="i">package</i> that it uses except that the 
+  current <i class="i">symbol</i> may be <i class="i">uninterned</i> from the <i class="i">package</i> 
+  being traversed.
+</p>
+</dd>
+</dl>
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Treatment-of-Exceptional-Situations.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Treatment of Exceptional Situations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Treatment of Exceptional Situations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Treatment of Exceptional Situations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conforming-Implementations.html" rel="up" title="Conforming Implementations">
+<link href="Resolution-of-Apparent-Conflicts-in-Exceptional-Situations.html" rel="next" title="Resolution of Apparent Conflicts in Exceptional Situations">
+<link href="Documentation-of-Extensions.html" rel="prev" title="Documentation of Extensions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Treatment-of-Exceptional-Situations">
+<div class="nav-panel">
+<p>
+Next: <a href="Resolution-of-Apparent-Conflicts-in-Exceptional-Situations.html" accesskey="n" rel="next">Resolution of Apparent Conflicts in Exceptional Situations</a>, Previous: <a href="Documentation-of-Extensions.html" accesskey="p" rel="prev">Documentation of Extensions</a>, Up: <a href="Conforming-Implementations.html" accesskey="u" rel="up">Conforming Implementations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Treatment-of-Exceptional-Situations-1"><span>1.5.1.4 Treatment of Exceptional Situations<a class="copiable-link" href="#Treatment-of-Exceptional-Situations-1"> &para;</a></span></h4>
+
+<p>A <i class="i">conforming implementation</i> shall treat exceptional situations 
+in a manner consistent with this specification.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Treatment-of-Newline-during-Input-and-Output.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Treatment of Newline during Input and Output (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Treatment of Newline during Input and Output (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Treatment of Newline during Input and Output (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Concepts.html" rel="up" title="Character Concepts">
+<link href="Character-Encodings.html" rel="next" title="Character Encodings">
+<link href="Character-Names.html" rel="prev" title="Character Names">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Treatment-of-Newline-during-Input-and-Output">
+<div class="nav-panel">
+<p>
+Next: <a href="Character-Encodings.html" accesskey="n" rel="next">Character Encodings</a>, Previous: <a href="Character-Names.html" accesskey="p" rel="prev">Character Names</a>, Up: <a href="Character-Concepts.html" accesskey="u" rel="up">Character Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Treatment-of-Newline-during-Input-and-Output-1"><span>13.1.8 Treatment of Newline during Input and Output<a class="copiable-link" href="#Treatment-of-Newline-during-Input-and-Output-1"> &para;</a></span></h4>
+
+<p>When the character <code class="t">#\Newline</code> is written to an output file,
+the implementation must take the appropriate action
+to produce a line division.  This might involve writing out a
+record or translating <code class="t">#\Newline</code> to a CR/LF sequence.
+When reading, a corresponding reverse transformation must take place.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Treatment-of-Other-Macros-Based-on-SETF.html
@@ -0,0 +1,95 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Treatment of Other Macros Based on SETF (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Treatment of Other Macros Based on SETF (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Treatment of Other Macros Based on SETF (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Generalized-Reference.html" rel="up" title="Generalized Reference">
+<link href="Kinds-of-Places.html" rel="prev" title="Kinds of Places">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Treatment-of-Other-Macros-Based-on-SETF">
+<div class="nav-panel">
+<p>
+Previous: <a href="Kinds-of-Places.html" accesskey="p" rel="prev">Kinds of Places</a>, Up: <a href="Generalized-Reference.html" accesskey="u" rel="up">Generalized Reference</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Treatment-of-Other-Macros-Based-on-SETF-1"><span>5.1.3 Treatment of Other Macros Based on SETF<a class="copiable-link" href="#Treatment-of-Other-Macros-Based-on-SETF-1"> &para;</a></span></h4>
+
+<p>For each of the &ldquo;read-modify-write&rdquo; <i class="i">operators</i> in Figure 5&ndash;9, 
+and for any additional <i class="i">macros</i> 
+defined by the <i class="i">programmer</i> using <b class="b">define-modify-macro</b>,
+an exception is made to the normal rule of left-to-right evaluation of arguments.
+Evaluation of <i class="i">argument</i> <i class="i">forms</i> occurs in left-to-right order,
+with the exception that for the <i class="i">place</i> <i class="i">argument</i>, the actual
+<i class="i">read</i> of the &ldquo;old value&rdquo; from that <i class="i">place</i> happens 
+after all of the <i class="i">argument</i> <i class="i">form</i> <i class="i">evaluations</i>, 
+and just before a &ldquo;new value&rdquo; is computed and <i class="i">written</i> back into the <i class="i">place</i>.
+</p>
+<p>Specifically, each of these <i class="i">operators</i> can be viewed as involving a
+<i class="i">form</i> with the following general syntax:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (<i class="i">operator</i> {<i class="i">preceding-form</i>}* <i class="i">place</i> {<i class="i">following-form</i>}*)
+</pre></div>
+
+<p>The evaluation of each such <i class="i">form</i> proceeds like this:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p><i class="i">Evaluate</i> each of the <i class="i">preceding-forms</i>, in left-to-right order.
+</p></dd>
+<dt>2.</dt>
+<dd><p><i class="i">Evaluate</i> the <i class="i">subforms</i> of the <i class="i">place</i>,
+ in the order specified by the second value of the <i class="i">setf expansion</i>
+ for that <i class="i">place</i>.
+</p></dd>
+<dt>3.</dt>
+<dd><p><i class="i">Evaluate</i> each of the <i class="i">following-forms</i>, in left-to-right order.
+</p></dd>
+<dt>4.</dt>
+<dd><p><i class="i">Read</i> the old value from <i class="i">place</i>.
+</p></dd>
+<dt>5.</dt>
+<dd><p>Compute the new value.
+</p></dd>
+<dt>6.</dt>
+<dd><p>Store the new value into <i class="i">place</i>.
+</p></dd>
+</dl>
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  decf  pop   pushnew  <!-- /@w -->
+  incf  push  remf     <!-- /@w -->
+
+  Figure 5&ndash;9: Read-Modify-Write Macros<!-- /@w -->
+
+</pre></div></div>
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Truenames.html
@@ -0,0 +1,69 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Truenames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Truenames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Truenames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="File-System-Concepts.html" rel="up" title="File System Concepts">
+<link href="File-Operations-on-Open-and-Closed-Streams.html" rel="prev" title="File Operations on Open and Closed Streams">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Truenames">
+<div class="nav-panel">
+<p>
+Previous: <a href="File-Operations-on-Open-and-Closed-Streams.html" accesskey="p" rel="prev">File Operations on Open and Closed Streams</a>, Up: <a href="File-System-Concepts.html" accesskey="u" rel="up">File System Concepts</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Truenames-1"><span>20.1.3 Truenames<a class="copiable-link" href="#Truenames-1"> &para;</a></span></h4>
+
+<p>Many <i class="i">file systems</i> permit more than one <i class="i">filename</i> to designate 
+a particular <i class="i">file</i>.
+</p>
+<p>Even where multiple names are possible, most <i class="i">file systems</i> have a convention
+for generating a canonical <i class="i">filename</i> in such situations.  Such a canonical
+<i class="i">filename</i> (or the <i class="i">pathname</i> representing such a <i class="i">filename</i>) is
+called a <i class="i">truename</i>
+<a class="index-entry-id" id="index-truename"></a>
+.  
+</p>
+<p>The <i class="i">truename</i> of a <i class="i">file</i> may differ from other <i class="i">filenames</i>
+for the file because of
+     symbolic links,
+     version numbers,
+     logical device translations in the <i class="i">file system</i>,
+     <i class="i">logical pathname</i> translations within <span class="r">Common Lisp</span>,
+  or other artifacts of the <i class="i">file system</i>.
+</p>
+<p>The <i class="i">truename</i> for a <i class="i">file</i> is often, but not necessarily, unique for
+each <i class="i">file</i>.  For instance, a Unix <i class="i">file</i> with multiple hard links 
+could have several <i class="i">truenames</i>.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Examples-of-Truenames.html" accesskey="1">Examples of Truenames</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Type-Relationships.html
@@ -0,0 +1,107 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Type Relationships (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Type Relationships (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Type Relationships (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types.html" rel="up" title="Types">
+<link href="Type-Specifiers.html" rel="next" title="Type Specifiers">
+<link href="Data-Type-Definition.html" rel="prev" title="Data Type Definition">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Type-Relationships">
+<div class="nav-panel">
+<p>
+Next: <a href="Type-Specifiers.html" accesskey="n" rel="next">Type Specifiers</a>, Previous: <a href="Data-Type-Definition.html" accesskey="p" rel="prev">Data Type Definition</a>, Up: <a href="Types.html" accesskey="u" rel="up">Types</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Type-Relationships-1"><span>4.2.2 Type Relationships<a class="copiable-link" href="#Type-Relationships-1"> &para;</a></span></h4>
+
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The <i class="i">types</i> <b class="b">cons</b>, <b class="b">symbol</b>, <b class="b">array</b>, <b class="b">number</b>,
+<b class="b">character</b>, <b class="b">hash-table</b>, 
+</p>
+<p><b class="b">function</b>,
+</p>
+<p><b class="b">readtable</b>, <b class="b">package</b>, <b class="b">pathname</b>, <b class="b">stream</b>, 
+<b class="b">random-state</b>, <b class="b">condition</b>, <b class="b">restart</b>,
+and any single other <i class="i">type</i> created by <b class="b">defstruct</b>,
+</p>
+<p><b class="b">define-condition</b>,
+</p>
+<p>or <b class="b">defclass</b> are <i class="i">pairwise</i> <i class="i">disjoint</i>, 
+except for type relations explicitly established by specifying 
+<i class="i">superclasses</i> in <b class="b">defclass</b> 
+</p>
+<p>or <b class="b">define-condition</b>
+</p>
+<p>or the <code class="t">:include</code> option of <b class="b">destruct</b>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Any two <i class="i">types</i> created by <b class="b">defstruct</b> are 
+<i class="i">disjoint</i> unless
+one is a <i class="i">supertype</i> of the other by virtue of
+the <b class="b">defstruct</b> <code class="t">:include</code> option.
+</p>
+<p>[Editorial Note by KMP: The comments in the source say gray suggested some change
+from &ldquo;common superclass&rdquo; to &ldquo;common subclass&rdquo; in the following, but the
+result looks suspicious to me.]
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Any two <i class="i">distinct</i> <i class="i">classes</i> created by <b class="b">defclass</b> 
+or <b class="b">define-condition</b>
+are <i class="i">disjoint</i> unless they have a common <i class="i">subclass</i> or
+one <i class="i">class</i> is a <i class="i">subclass</i> of the other.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>An implementation may be extended to add other <i class="i">subtype</i>
+relationships between the specified <i class="i">types</i>, as long as they do
+not violate the type relationships and disjointness requirements
+specified here.  An implementation may define additional <i class="i">types</i>
+that are <i class="i">subtypes</i> or <i class="i">supertypes</i> of any
+specified <i class="i">types</i>, as long as each additional <i class="i">type</i> is
+a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">t</b> and a <i class="i">supertype</i> of <i class="i">type</i> <b class="b">nil</b> and the disjointness requirements
+are not violated.
+</p>
+<p>At the discretion of the implementation, either <b class="b">standard-object</b>
+or <b class="b">structure-object</b> might appear in any class precedence list
+for a <i class="i">system class</i> that does not already specify either 
+<b class="b">standard-object</b> or <b class="b">structure-object</b>.  If it does,
+it must precede the <i class="i">class</i> <b class="b">t</b> and follow all other <i class="i">standardized</i> <i class="i">classes</i>.
+</p>
+</dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Type-Specifiers.html">Type Specifiers</a>, Previous: <a href="Data-Type-Definition.html">Data Type Definition</a>, Up: <a href="Types.html">Types</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Type-Specifiers.html
@@ -0,0 +1,260 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Type Specifiers (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Type Specifiers (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Type Specifiers (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types.html" rel="up" title="Types">
+<link href="Type-Relationships.html" rel="prev" title="Type Relationships">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Type-Specifiers">
+<div class="nav-panel">
+<p>
+Previous: <a href="Type-Relationships.html" accesskey="p" rel="prev">Type Relationships</a>, Up: <a href="Types.html" accesskey="u" rel="up">Types</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Type-Specifiers-1"><span>4.2.3 Type Specifiers<a class="copiable-link" href="#Type-Specifiers-1"> &para;</a></span></h4>
+
+<p><i class="i">Type specifiers</i> can be <i class="i">symbols</i>, <i class="i">classes</i>, or <i class="i">lists</i>.
+<i class="i">Figure~4&ndash;2</i> lists <i class="i">symbols</i> that are
+  <i class="i">standardized</i> <i class="i">atomic type specifiers</i>, and
+<i class="i">Figure~4&ndash;3</i> lists
+ <i class="i">standardized</i> <i class="i">compound type specifier</i> <i class="i">names</i>.
+For syntax information, see the dictionary entry for the corresponding <i class="i">type specifier</i>.
+It is possible to define new <i class="i">type specifiers</i> using
+ <b class="b">defclass</b>,
+ <b class="b">define-condition</b>,
+ <b class="b">defstruct</b>, 
+or
+ <b class="b">deftype</b>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted"> arithmetic-error                 function           simple-condition          <!-- /@w -->
+ array                            generic-function   simple-error              <!-- /@w -->
+ atom                             hash-table         simple-string             <!-- /@w -->
+ base-char                        integer            simple-type-error         <!-- /@w -->
+ base-string                      keyword            simple-vector             <!-- /@w -->
+ bignum                           list               simple-warning            <!-- /@w -->
+ bit                              logical-pathname   single-float              <!-- /@w -->
+ bit-vector                       long-float         standard-char             <!-- /@w -->
+ broadcast-stream                 method             standard-class            <!-- /@w -->
+ built-in-class                   method-combination standard-generic-function <!-- /@w -->
+ cell-error                       nil                standard-method           <!-- /@w -->
+ character                        null               standard-object           <!-- /@w -->
+ class                            number             storage-condition         <!-- /@w -->
+ compiled-function                package            stream                    <!-- /@w -->
+ complex                          package-error      stream-error              <!-- /@w -->
+ concatenated-stream              parse-error        string                    <!-- /@w -->
+ condition                        pathname           string-stream             <!-- /@w -->
+ cons                             print-not-readable structure-class           <!-- /@w -->
+ control-error                    program-error      structure-object          <!-- /@w -->
+ division-by-zero                 random-state       style-warning             <!-- /@w -->
+ double-float                     ratio              symbol                    <!-- /@w -->
+ echo-stream                      rational           synonym-stream            <!-- /@w -->
+ end-of-file                      reader-error       t                         <!-- /@w -->
+ error                            readtable          two-way-stream            <!-- /@w -->
+ extended-char                    real               type-error                <!-- /@w -->
+ file-error                       restart            unbound-slot              <!-- /@w -->
+ file-stream                      sequence           unbound-variable          <!-- /@w -->
+ fixnum                           serious-condition  undefined-function        <!-- /@w -->
+ float                            short-float        unsigned-byte             <!-- /@w -->
+ floating-point-inexact           signed-byte        vector                    <!-- /@w -->
+ floating-point-invalid-operation simple-array       warning                   <!-- /@w -->
+ floating-point-overflow          simple-base-string                           <!-- /@w -->
+ floating-point-underflow         simple-bit-vector                            <!-- /@w -->
+
+                 Figure 4&ndash;2: Standardized Atomic Type Specifiers               <!-- /@w -->
+
+</pre></div></div>
+
+<p>\indent               
+If a <i class="i">type specifier</i> is a <i class="i">list</i>, the <i class="i">car</i> of the <i class="i">list</i> 
+is a <i class="i">symbol</i>, and the rest of the <i class="i">list</i> is subsidiary
+<i class="i">type</i> information.  Such a <i class="i">type specifier</i> is called 
+a <i class="i">compound type specifier</i>
+<a class="index-entry-id" id="index-compound-type-specifier"></a>
+.
+Except as explicitly stated otherwise,
+the subsidiary items can be unspecified.
+The unspecified subsidiary items are indicated
+by writing <code class="t">*</code>.  For example, to completely specify
+a <i class="i">vector</i>, the <i class="i">type</i> of the elements
+and the length of the <i class="i">vector</i> must be present.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (vector double-float 100)
+</pre></div>
+
+<p>The following leaves the length unspecified:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (vector double-float *)
+</pre></div>
+
+<p>The following leaves the element type unspecified:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (vector * 100)                                      
+</pre></div>
+
+<p>Suppose that two <i class="i">type specifiers</i> are the same except that the first
+has a <code class="t">*</code> where the second has a more explicit specification.
+Then the second denotes a <i class="i">subtype</i> 
+of the <i class="i">type</i> denoted by the first.
+</p>
+<p>If a <i class="i">list</i> has one or more unspecified items at the end, 
+those items can be dropped.
+If dropping all occurrences of <code class="t">*</code> results in a <i class="i">singleton</i> <i class="i">list</i>,
+then the parentheses can be dropped as well (the list can be replaced
+by the <i class="i">symbol</i> in its <i class="i">car</i>).  
+For example,                       
+<code class="t">(vector double-float *)</code>                    
+can be abbreviated to <code class="t">(vector double-float)</code>,               
+and <code class="t">(vector * *)</code> can be abbreviated to <code class="t">(vector)</code> 
+and then to 
+<code class="t">vector</code>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  and           long-float    simple-base-string  <!-- /@w -->
+  array         member        simple-bit-vector   <!-- /@w -->
+  base-string   mod           simple-string       <!-- /@w -->
+  bit-vector    not           simple-vector       <!-- /@w -->
+  complex       or            single-float        <!-- /@w -->
+  cons          rational      string              <!-- /@w -->
+  double-float  real          unsigned-byte       <!-- /@w -->
+  eql           satisfies     values              <!-- /@w -->
+  float         short-float   vector              <!-- /@w -->
+  function      signed-byte                       <!-- /@w -->
+  integer       simple-array                      <!-- /@w -->
+
+  Figure 4&ndash;3: Standardized Compound Type Specifier Names<!-- /@w -->
+
+</pre></div></div>
+
+<p>Figure 4&ndash;4 show the <i class="i">defined names</i> that can be used as 
+<i class="i">compound type specifier</i> <i class="i">names</i>
+but that cannot be used as <i class="i">atomic type specifiers</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  and     mod  satisfies  <!-- /@w -->
+  eql     not  values     <!-- /@w -->
+  member  or              <!-- /@w -->
+
+  Figure 4&ndash;4: Standardized Compound-Only Type Specifier Names<!-- /@w -->
+
+</pre></div></div>
+
+<p>New <i class="i">type specifiers</i> can come into existence in two ways.
+</p><dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>Defining a structure by using <b class="b">defstruct</b> without using
+ the <code class="t">:type</code> specifier or defining a <i class="i">class</i> by using 
+ <b class="b">defclass</b> 
+ or <b class="b">define-condition</b>
+ automatically causes the name of the structure 
+ or class to be a new <i class="i">type specifier</i> <i class="i">symbol</i>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">deftype</b> can be used to define <i class="i">derived type specifiers</i>
+<a class="index-entry-id" id="index-derived-type-specifier"></a>
+,
+ which act as &lsquo;abbreviations&rsquo; for other <i class="i">type specifiers</i>.
+</p></dd>
+</dl>
+
+<p>A <i class="i">class</i> <i class="i">object</i> can be used as a <i class="i">type specifier</i>. 
+When used this way, it denotes the set of all members of that <i class="i">class</i>.
+</p>
+<p>Figure 4&ndash;5 shows some <i class="i">defined names</i> relating to 
+<i class="i">types</i> and <i class="i">declarations</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  coerce            defstruct  subtypep  <!-- /@w -->
+  declaim           deftype    the       <!-- /@w -->
+  declare           ftype      type      <!-- /@w -->
+  defclass          locally    type-of   <!-- /@w -->
+  define-condition  proclaim   typep     <!-- /@w -->
+
+  Figure 4&ndash;5: Defined names relating to types and declarations.<!-- /@w -->
+
+</pre></div></div>
+
+<p>Figure 4&ndash;6 shows all <i class="i">defined names</i> that are <i class="i">type specifier</i> <i class="i">names</i>,
+whether for <i class="i">atomic type specifiers</i> or <i class="i">compound type specifiers</i>;
+this list is the union of the lists in <i class="i">Figure~4&ndash;2</i> 
+and <i class="i">Figure~4&ndash;3</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted"> and                              function           simple-array              <!-- /@w -->
+ arithmetic-error                 generic-function   simple-base-string        <!-- /@w -->
+ array                            hash-table         simple-bit-vector         <!-- /@w -->
+ atom                             integer            simple-condition          <!-- /@w -->
+ base-char                        keyword            simple-error              <!-- /@w -->
+ base-string                      list               simple-string             <!-- /@w -->
+ bignum                           logical-pathname   simple-type-error         <!-- /@w -->
+ bit                              long-float         simple-vector             <!-- /@w -->
+ bit-vector                       member             simple-warning            <!-- /@w -->
+ broadcast-stream                 method             single-float              <!-- /@w -->
+ built-in-class                   method-combination standard-char             <!-- /@w -->
+ cell-error                       mod                standard-class            <!-- /@w -->
+ character                        nil                standard-generic-function <!-- /@w -->
+ class                            not                standard-method           <!-- /@w -->
+ compiled-function                null               standard-object           <!-- /@w -->
+ complex                          number             storage-condition         <!-- /@w -->
+ concatenated-stream              or                 stream                    <!-- /@w -->
+ condition                        package            stream-error              <!-- /@w -->
+ cons                             package-error      string                    <!-- /@w -->
+ control-error                    parse-error        string-stream             <!-- /@w -->
+ division-by-zero                 pathname           structure-class           <!-- /@w -->
+ double-float                     print-not-readable structure-object          <!-- /@w -->
+ echo-stream                      program-error      style-warning             <!-- /@w -->
+ end-of-file                      random-state       symbol                    <!-- /@w -->
+ eql                              ratio              synonym-stream            <!-- /@w -->
+ error                            rational           t                         <!-- /@w -->
+ extended-char                    reader-error       two-way-stream            <!-- /@w -->
+ file-error                       readtable          type-error                <!-- /@w -->
+ file-stream                      real               unbound-slot              <!-- /@w -->
+ fixnum                           restart            unbound-variable          <!-- /@w -->
+ float                            satisfies          undefined-function        <!-- /@w -->
+ floating-point-inexact           sequence           unsigned-byte             <!-- /@w -->
+ floating-point-invalid-operation serious-condition  values                    <!-- /@w -->
+ floating-point-overflow          short-float        vector                    <!-- /@w -->
+ floating-point-underflow         signed-byte        warning                   <!-- /@w -->
+
+                  Figure 4&ndash;6: Standardized Type Specifier Names                <!-- /@w -->
+
+</pre></div></div>
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="Type-Relationships.html">Type Relationships</a>, Up: <a href="Types.html">Types</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Types-and-Classes-Dictionary.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Types and Classes Dictionary (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Types and Classes Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Types and Classes Dictionary (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes.html" rel="up" title="Types and Classes">
+<link href="Classes.html" rel="prev" title="Classes">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Types-and-Classes-Dictionary">
+<div class="nav-panel">
+<p>
+Previous: <a href="Classes.html" accesskey="p" rel="prev">Classes</a>, Up: <a href="Types-and-Classes.html" accesskey="u" rel="up">Types and Classes</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Types-and-Classes-Dictionary-1"><span>4.4 Types and Classes Dictionary<a class="copiable-link" href="#Types-and-Classes-Dictionary-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="nil-_0028Type_0029.html" accesskey="1">nil                                                                  [Type]</a></li>
+<li><a href="boolean.html" accesskey="2">boolean                                                              [Type]</a></li>
+<li><a href="function-_0028System-Class_0029.html" accesskey="3">function                                                     [System Class]</a></li>
+<li><a href="compiled_002dfunction.html" accesskey="4">compiled-function                                                    [Type]</a></li>
+<li><a href="generic_002dfunction.html" accesskey="5">generic-function                                             [System Class]</a></li>
+<li><a href="standard_002dgeneric_002dfunction.html" accesskey="6">standard-generic-function                                    [System Class]</a></li>
+<li><a href="class.html" accesskey="7">class                                                        [System Class]</a></li>
+<li><a href="built_002din_002dclass.html" accesskey="8">built-in-class                                               [System Class]</a></li>
+<li><a href="structure_002dclass.html" accesskey="9">structure-class                                              [System Class]</a></li>
+<li><a href="standard_002dclass.html">standard-class                                               [System Class]</a></li>
+<li><a href="method.html">method                                                       [System Class]</a></li>
+<li><a href="standard_002dmethod.html">standard-method                                              [System Class]</a></li>
+<li><a href="structure_002dobject.html">structure-object                                                    [Class]</a></li>
+<li><a href="standard_002dobject.html">standard-object                                                     [Class]</a></li>
+<li><a href="method_002dcombination.html">method-combination                                           [System Class]</a></li>
+<li><a href="t-_0028System-Class_0029.html">t                                                            [System Class]</a></li>
+<li><a href="satisfies.html">satisfies                                                  [Type Specifier]</a></li>
+<li><a href="member-_0028Type-Specifier_0029.html">member                                                     [Type Specifier]</a></li>
+<li><a href="not-_0028Type-Specifier_0029.html">not                                                        [Type Specifier]</a></li>
+<li><a href="and-_0028Type-Specifier_0029.html">and                                                        [Type Specifier]</a></li>
+<li><a href="or-_0028Type-Specifier_0029.html">or                                                         [Type Specifier]</a></li>
+<li><a href="values-_0028Type-Specifier_0029.html">values                                                     [Type Specifier]</a></li>
+<li><a href="eql-_0028Type-Specifier_0029.html">eql                                                        [Type Specifier]</a></li>
+<li><a href="coerce.html">coerce                                                           [Function]</a></li>
+<li><a href="deftype.html">deftype                                                             [Macro]</a></li>
+<li><a href="subtypep.html">subtypep                                                         [Function]</a></li>
+<li><a href="type_002dof.html">type-of                                                          [Function]</a></li>
+<li><a href="typep.html">typep                                                            [Function]</a></li>
+<li><a href="type_002derror.html">type-error                                                 [Condition Type]</a></li>
+<li><a href="type_002derror_002ddatum.html">type-error-datum, type-error-expected-type                       [Function]</a></li>
+<li><a href="simple_002dtype_002derror.html">simple-type-error                                          [Condition Type]</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Types-and-Classes.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Types and Classes (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Types and Classes (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Types and Classes (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="index.html" rel="up" title="Top">
+<link href="Data-and-Control-Flow.html" rel="next" title="Data and Control Flow">
+<link href="Evaluation-and-Compilation.html" rel="prev" title="Evaluation and Compilation">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="chapter-level-extent" id="Types-and-Classes">
+<div class="nav-panel">
+<p>
+Next: <a href="Data-and-Control-Flow.html" accesskey="n" rel="next">Data and Control Flow</a>, Previous: <a href="Evaluation-and-Compilation.html" accesskey="p" rel="prev">Evaluation and Compilation</a>, Up: <a href="index.html" accesskey="u" rel="up">Top</a> &nbsp; </p>
+</div>
+<hr>
+<h2 class="chapter" id="Types-and-Classes-1"><span>4 Types and Classes<a class="copiable-link" href="#Types-and-Classes-1"> &para;</a></span></h2>
+
+
+<ul class="mini-toc">
+<li><a href="Introduction-_0028Types-and-Classes_0029.html" accesskey="1">Introduction</a></li>
+<li><a href="Types.html" accesskey="2">Types</a></li>
+<li><a href="Classes.html" accesskey="3">Classes</a></li>
+<li><a href="Types-and-Classes-Dictionary.html" accesskey="4">Types and Classes Dictionary</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Types.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Types (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Types (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Types (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes.html" rel="up" title="Types and Classes">
+<link href="Classes.html" rel="next" title="Classes">
+<link href="Introduction-_0028Types-and-Classes_0029.html" rel="prev" title="Introduction (Types and Classes)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="section-level-extent" id="Types">
+<div class="nav-panel">
+<p>
+Next: <a href="Classes.html" accesskey="n" rel="next">Classes</a>, Previous: <a href="Introduction-_0028Types-and-Classes_0029.html" accesskey="p" rel="prev">Introduction</a>, Up: <a href="Types-and-Classes.html" accesskey="u" rel="up">Types and Classes</a> &nbsp; </p>
+</div>
+<hr>
+<h3 class="section" id="Types-1"><span>4.2 Types<a class="copiable-link" href="#Types-1"> &para;</a></span></h3>
+
+
+
+<ul class="mini-toc">
+<li><a href="Data-Type-Definition.html" accesskey="1">Data Type Definition</a></li>
+<li><a href="Type-Relationships.html" accesskey="2">Type Relationships</a></li>
+<li><a href="Type-Specifiers.html" accesskey="3">Type Specifiers</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Unconditional-Execution-Clauses.html
@@ -0,0 +1,65 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Unconditional Execution Clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Unconditional Execution Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Unconditional Execution Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-LOOP-Facility.html" rel="up" title="The LOOP Facility">
+<link href="Conditional-Execution-Clauses.html" rel="next" title="Conditional Execution Clauses">
+<link href="Termination-Test-Clauses.html" rel="prev" title="Termination Test Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Unconditional-Execution-Clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Conditional-Execution-Clauses.html" accesskey="n" rel="next">Conditional Execution Clauses</a>, Previous: <a href="Termination-Test-Clauses.html" accesskey="p" rel="prev">Termination Test Clauses</a>, Up: <a href="The-LOOP-Facility.html" accesskey="u" rel="up">The LOOP Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Unconditional-Execution-Clauses-1"><span>6.1.5 Unconditional Execution Clauses<a class="copiable-link" href="#Unconditional-Execution-Clauses-1"> &para;</a></span></h4>
+
+<p>The <code class="t">do</code> and <code class="t">doing</code> constructs 
+evaluate the 
+supplied <i class="i">forms</i> 
+wherever they occur in the expanded form of <b class="b">loop</b>.
+ The <i class="i">form</i> argument can be any <i class="i">compound form</i>.
+Each <i class="i">form</i> is evaluated in every iteration.
+Because every loop clause must begin with a <i class="i">loop keyword</i>, 
+the keyword <code class="t">do</code> is used when no control action other than execution is 
+required.
+</p>
+<p>The <code class="t">return</code> construct takes one <i class="i">form</i>. 
+ Any <i class="i">values</i> returned by the <i class="i">form</i> 
+ are immediately returned by the <b class="b">loop</b> form.
+  It is equivalent to the clause
+  <code class="t">do (return-from <i class="i">block-name</i> <i class="i">value</i>)</code>,
+  where <i class="i">block-name</i> is the name specified in a <code class="t">named</code>
+  clause, or <b class="b">nil</b> if there is no <code class="t">named</code> clause.
+</p>
+
+<ul class="mini-toc">
+<li><a href="Examples-of-unconditional-execution.html" accesskey="1">Examples of unconditional execution</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Unconditional-Transfer-of-Control-in-The-_0022Syntax_0022-Section.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Unconditional Transfer of Control in The &quot;Syntax&quot; Section (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Unconditional Transfer of Control in The &quot;Syntax&quot; Section (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Unconditional Transfer of Control in The &quot;Syntax&quot; Section (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Dictionary-Entries.html" rel="up" title="Interpreting Dictionary Entries">
+<link href="The-_0022Valid-Context_0022-Section-of-a-Dictionary-Entry.html" rel="next" title="The &quot;Valid Context&quot; Section of a Dictionary Entry">
+<link href="No-Arguments-or-Values-in-The-_0022Syntax_0022-Section.html" rel="prev" title="No Arguments or Values in The &quot;Syntax&quot; Section">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Unconditional-Transfer-of-Control-in-The-_0022Syntax_0022-Section">
+<div class="nav-panel">
+<p>
+Next: <a href="The-_0022Valid-Context_0022-Section-of-a-Dictionary-Entry.html" accesskey="n" rel="next">The &quot;Valid Context&quot; Section of a Dictionary Entry</a>, Previous: <a href="No-Arguments-or-Values-in-The-_0022Syntax_0022-Section.html" accesskey="p" rel="prev">No Arguments or Values in The &quot;Syntax&quot; Section</a>, Up: <a href="Interpreting-Dictionary-Entries.html" accesskey="u" rel="up">Interpreting Dictionary Entries</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Unconditional-Transfer-of-Control-in-The-_0022Syntax_0022-Section-1"><span>1.4.4.30 Unconditional Transfer of Control in The &quot;Syntax&quot; Section<a class="copiable-link" href="#Unconditional-Transfer-of-Control-in-The-_0022Syntax_0022-Section-1"> &para;</a></span></h4>
+
+<p>Some <i class="i">operators</i> perform an unconditional transfer of control, and
+so never have any return values.  Such <i class="i">operators</i> are notated using
+a notation such as the following:
+</p>
+<p><code class="code">F</code>  <i class="i">a b c</i> 
+       &rArr;  #&lt;NoValue&gt;
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Undefined-FORMAT-Modifier-Combinations.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Undefined FORMAT Modifier Combinations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Undefined FORMAT Modifier Combinations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Undefined FORMAT Modifier Combinations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Additional-Information-about-FORMAT-Operations.html" rel="up" title="Additional Information about FORMAT Operations">
+<link href="Additional-FORMAT-Parameters.html" rel="prev" title="Additional FORMAT Parameters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Undefined-FORMAT-Modifier-Combinations">
+<div class="nav-panel">
+<p>
+Previous: <a href="Additional-FORMAT-Parameters.html" accesskey="p" rel="prev">Additional FORMAT Parameters</a>, Up: <a href="Additional-Information-about-FORMAT-Operations.html" accesskey="u" rel="up">Additional Information about FORMAT Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Undefined-FORMAT-Modifier-Combinations-1"><span>22.3.10.4 Undefined FORMAT Modifier Combinations<a class="copiable-link" href="#Undefined-FORMAT-Modifier-Combinations-1"> &para;</a></span></h4>
+
+<p>The consequences are undefined if <i class="i">colon</i> or <i class="i">at-sign</i> modifiers
+are given to a directive in a combination not specifically described
+here as being meaningful.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Universal-Time.html
@@ -0,0 +1,69 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Universal Time (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Universal Time (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Universal Time (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Time.html" rel="up" title="Time">
+<link href="Internal-Time.html" rel="next" title="Internal Time">
+<link href="Decoded-Time.html" rel="prev" title="Decoded Time">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Universal-Time">
+<div class="nav-panel">
+<p>
+Next: <a href="Internal-Time.html" accesskey="n" rel="next">Internal Time</a>, Previous: <a href="Decoded-Time.html" accesskey="p" rel="prev">Decoded Time</a>, Up: <a href="Time.html" accesskey="u" rel="up">Time</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Universal-Time-1"><span>25.1.4.2 Universal Time<a class="copiable-link" href="#Universal-Time-1"> &para;</a></span></h4>
+
+<p><i class="i">Universal time</i>
+<a class="index-entry-id" id="index-universal-time"></a>
+ is an <i class="i">absolute</i> <i class="i">time</i> represented as a
+single non-negative <i class="i">integer</i>&mdash;the number of seconds since
+midnight, January 1, 1900 GMT (ignoring <i class="i">leap seconds</i>).
+Thus the time 1 is 00:00:01 (that is, 12:00:01 a.m.) on January 1, 1900 GMT.
+Similarly, the time 2398291201 corresponds to time 00:00:01 on January 1,
+1976 GMT.
+Recall that the year 1900 was not a leap year; for the purposes of
+<span class="r">Common Lisp</span>, a year is a leap year if and only if its number is divisible by 4,
+except that years divisible by 100 are not leap years, except that years
+divisible by 400 are leap years.  Therefore the year 2000 will
+be a leap year.
+Because <i class="i">universal time</i> must be a non-negative <i class="i">integer</i>,
+times before the base time of midnight, January 1, 1900 GMT cannot be processed by <span class="r">Common Lisp</span>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  decode-universal-time  get-universal-time  <!-- /@w -->
+  encode-universal-time                      <!-- /@w -->
+
+  Figure 25&ndash;6: Defined names involving time in Universal Time.<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Unrecognized-Keyword-Arguments.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Unrecognized Keyword Arguments (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Unrecognized Keyword Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Unrecognized Keyword Arguments (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Argument-Mismatch-Detection.html" rel="up" title="Argument Mismatch Detection">
+<link href="Invalid-Keyword-Arguments.html" rel="next" title="Invalid Keyword Arguments">
+<link href="Too-Many-Arguments.html" rel="prev" title="Too Many Arguments">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Unrecognized-Keyword-Arguments">
+<div class="nav-panel">
+<p>
+Next: <a href="Invalid-Keyword-Arguments.html" accesskey="n" rel="next">Invalid Keyword Arguments</a>, Previous: <a href="Too-Many-Arguments.html" accesskey="p" rel="prev">Too Many Arguments</a>, Up: <a href="Argument-Mismatch-Detection.html" accesskey="u" rel="up">Argument Mismatch Detection</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Unrecognized-Keyword-Arguments-1"><span>3.5.1.5 Unrecognized Keyword Arguments<a class="copiable-link" href="#Unrecognized-Keyword-Arguments-1"> &para;</a></span></h4>
+
+<p>It is not permitted to supply a keyword argument to a <i class="i">function</i>
+using a name that is not recognized by that <i class="i">function</i> 
+unless keyword argument checking is suppressed as described
+in <a class="ref" href="Suppressing-Keyword-Argument-Checking.html">Suppressing Keyword Argument Checking</a>.
+</p>
+<p>If this <i class="i">situation</i> occurs in a <i class="i">safe call</i>,
+</p>
+<p>an error of <i class="i">type</i> <b class="b">program-error</b> must be signaled;
+and in an <i class="i">unsafe call</i> the <i class="i">situation</i> has undefined consequences.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Unspecific-Components-of-a-Logical-Pathname.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Unspecific Components of a Logical Pathname (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Unspecific Components of a Logical Pathname (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Unspecific Components of a Logical Pathname (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Logical-Pathname-Components.html" rel="up" title="Logical Pathname Components">
+<link href="Null-Strings-as-Components-of-a-Logical-Pathname.html" rel="next" title="Null Strings as Components of a Logical Pathname">
+<link href="Logical-Pathname-Components.html" rel="prev" title="Logical Pathname Components">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Unspecific-Components-of-a-Logical-Pathname">
+<div class="nav-panel">
+<p>
+Next: <a href="Null-Strings-as-Components-of-a-Logical-Pathname.html" accesskey="n" rel="next">Null Strings as Components of a Logical Pathname</a>, Previous: <a href="Logical-Pathname-Components.html" accesskey="p" rel="prev">Logical Pathname Components</a>, Up: <a href="Logical-Pathname-Components.html" accesskey="u" rel="up">Logical Pathname Components</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Unspecific-Components-of-a-Logical-Pathname-1"><span>19.3.2.1 Unspecific Components of a Logical Pathname<a class="copiable-link" href="#Unspecific-Components-of-a-Logical-Pathname-1"> &para;</a></span></h4>
+
+<p>The device component of a <i class="i">logical pathname</i> is always <code class="t">:unspecific</code>;
+no other component of a <i class="i">logical pathname</i> can be <code class="t">:unspecific</code>.  
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Uppercase-Characters.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Uppercase Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Uppercase Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Uppercase Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Categories.html" rel="up" title="Character Categories">
+<link href="Lowercase-Characters.html" rel="next" title="Lowercase Characters">
+<link href="Characters-With-Case.html" rel="prev" title="Characters With Case">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Uppercase-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Lowercase-Characters.html" accesskey="n" rel="next">Lowercase Characters</a>, Previous: <a href="Characters-With-Case.html" accesskey="p" rel="prev">Characters With Case</a>, Up: <a href="Character-Categories.html" accesskey="u" rel="up">Character Categories</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Uppercase-Characters-1"><span>13.1.4.4 Uppercase Characters<a class="copiable-link" href="#Uppercase-Characters-1"> &para;</a></span></h4>
+
+<p>An uppercase <i class="i">character</i> is one that has a corresponding
+<i class="i">lowercase</i> <i class="i">character</i> that is <i class="i">different</i> 
+(and can be obtained using <b class="b">char-downcase</b>).
+</p>
+<p>Of the <i class="i">standard characters</i>, only these are <i class="i">uppercase</i> <i class="i">characters</i>:
+</p>
+<p><code class="t">A B C D E F G H I J K L M N O P Q R S T U V W X Y Z</code>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Use-of-Double-Semicolon.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Use of Double Semicolon (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Use of Double Semicolon (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Use of Double Semicolon (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Semicolon.html" rel="up" title="Semicolon">
+<link href="Use-of-Triple-Semicolon.html" rel="next" title="Use of Triple Semicolon">
+<link href="Use-of-Single-Semicolon.html" rel="prev" title="Use of Single Semicolon">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Use-of-Double-Semicolon">
+<div class="nav-panel">
+<p>
+Next: <a href="Use-of-Triple-Semicolon.html" accesskey="n" rel="next">Use of Triple Semicolon</a>, Previous: <a href="Use-of-Single-Semicolon.html" accesskey="p" rel="prev">Use of Single Semicolon</a>, Up: <a href="Semicolon.html" accesskey="u" rel="up">Semicolon</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Use-of-Double-Semicolon-1"><span>2.4.4.4 Use of Double Semicolon<a class="copiable-link" href="#Use-of-Double-Semicolon-1"> &para;</a></span></h4>
+
+<p>Comments that begin with a double <i class="i">semicolon</i> are all aligned to
+the same level of indentation as a <i class="i">form</i> would be at that same
+position in the <i class="i">code</i>.
+The text of such a comment usually describes
+    the state of the <i class="i">program</i> at the point where the comment occurs,
+    the <i class="i">code</i> which follows the comment,
+ or both.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Use-of-Implementation_002dDefined-Language-Features.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Use of Implementation-Defined Language Features (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Use of Implementation-Defined Language Features (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Use of Implementation-Defined Language Features (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conforming-Programs.html" rel="up" title="Conforming Programs">
+<link href="Use-of-Read_002dTime-Conditionals.html" rel="next" title="Use of Read-Time Conditionals">
+<link href="Conforming-Programs.html" rel="prev" title="Conforming Programs">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Use-of-Implementation_002dDefined-Language-Features">
+<div class="nav-panel">
+<p>
+Next: <a href="Use-of-Read_002dTime-Conditionals.html" accesskey="n" rel="next">Use of Read-Time Conditionals</a>, Previous: <a href="Conforming-Programs.html" accesskey="p" rel="prev">Conforming Programs</a>, Up: <a href="Conforming-Programs.html" accesskey="u" rel="up">Conforming Programs</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Use-of-Implementation_002dDefined-Language-Features-1"><span>1.5.2.1 Use of Implementation-Defined Language Features<a class="copiable-link" href="#Use-of-Implementation_002dDefined-Language-Features-1"> &para;</a></span></h4>
+
+<p>Note that <i class="i">conforming code</i> may rely on particular
+<i class="i">implementation-defined</i> values or features. Also note that the
+requirements for <i class="i">conforming code</i> and <i class="i">conforming implementations</i> do not
+require that the results produced by conforming code always be the
+same when processed by a <i class="i">conforming implementation</i>. The results may be the
+same, or they may differ.
+</p>
+<p><i class="i">Portable code</i> is written using only <i class="i">standard characters</i>.
+</p>
+<p>Conforming code may run in all conforming implementations, but might
+have allowable <i class="i">implementation-defined</i> behavior that makes it
+non-portable code.
+For example, the following are examples of <i class="i">forms</i> that are conforming, but
+that might return different <i class="i">values</i> in different implementations:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (evenp most-positive-fixnum) &rArr;  <i class="i">implementation-dependent</i>
+ (random) &rArr;  <i class="i">implementation-dependent</i>
+ (&gt; lambda-parameters-limit 93) &rArr;  <i class="i">implementation-dependent</i>
+ (char-name #\A) &rArr;  <i class="i">implementation-dependent</i>
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Use-of-Quadruple-Semicolon.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Use of Quadruple Semicolon (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Use of Quadruple Semicolon (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Use of Quadruple Semicolon (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Semicolon.html" rel="up" title="Semicolon">
+<link href="Examples-of-Style-for-Semicolon.html" rel="next" title="Examples of Style for Semicolon">
+<link href="Use-of-Triple-Semicolon.html" rel="prev" title="Use of Triple Semicolon">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Use-of-Quadruple-Semicolon">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Style-for-Semicolon.html" accesskey="n" rel="next">Examples of Style for Semicolon</a>, Previous: <a href="Use-of-Triple-Semicolon.html" accesskey="p" rel="prev">Use of Triple Semicolon</a>, Up: <a href="Semicolon.html" accesskey="u" rel="up">Semicolon</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Use-of-Quadruple-Semicolon-1"><span>2.4.4.6 Use of Quadruple Semicolon<a class="copiable-link" href="#Use-of-Quadruple-Semicolon-1"> &para;</a></span></h4>
+
+<p>Comments that begin with a quadruple <i class="i">semicolon</i> are all aligned to
+the left margin, and generally contain only a short piece of text that
+serve as a title for the code which follows, and might be used in the
+header or footer of a program that prepares code for presentation as 
+a hardcopy document.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Use-of-Read_002dTime-Conditionals.html
@@ -0,0 +1,68 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Use of Read-Time Conditionals (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Use of Read-Time Conditionals (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Use of Read-Time Conditionals (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conforming-Programs.html" rel="up" title="Conforming Programs">
+<link href="Use-of-Implementation_002dDefined-Language-Features.html" rel="prev" title="Use of Implementation-Defined Language Features">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Use-of-Read_002dTime-Conditionals">
+<div class="nav-panel">
+<p>
+Previous: <a href="Use-of-Implementation_002dDefined-Language-Features.html" accesskey="p" rel="prev">Use of Implementation-Defined Language Features</a>, Up: <a href="Conforming-Programs.html" accesskey="u" rel="up">Conforming Programs</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Use-of-Read_002dTime-Conditionals-1"><span>1.5.2.2 Use of Read-Time Conditionals<a class="copiable-link" href="#Use-of-Read_002dTime-Conditionals-1"> &para;</a></span></h4>
+
+<p>Use of <code class="t">#+</code> and <code class="t">#-</code> does not automatically disqualify a program
+from being conforming.  A program which uses <code class="t">#+</code> and <code class="t">#-</code> is 
+considered conforming if there is no set of <i class="i">features</i> in which the
+program would not be conforming.  Of course, <i class="i">conforming programs</i> are
+not necessarily working programs.  The following program is conforming:
+</p>
+<div class="example">
+<pre class="example-preformatted">(defun foo ()
+  #+ACME (acme:initialize-something)
+  (print 'hello-there))
+</pre></div>
+
+<p>However, this program might or might not work, depending on whether the
+presence of the feature <code class="t">ACME</code> really implies that a function named
+<code class="t">acme:initialize-something</code> is present in the environment.  In effect,
+using <code class="t">#+</code> or <code class="t">#-</code> in a <i class="i">conforming program</i> means that the variable
+<b class="b">*features*</b>
+<a class="index-entry-id" id="index-_002afeatures_002a"></a>
+</p>
+<p>becomes just one more piece of input data to that 
+program.  Like any other data coming into a program, the programmer
+is responsible for assuring that the program does not make unwarranted
+assumptions on the basis of input data.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Use-of-Single-Semicolon.html
@@ -0,0 +1,50 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Use of Single Semicolon (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Use of Single Semicolon (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Use of Single Semicolon (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Semicolon.html" rel="up" title="Semicolon">
+<link href="Use-of-Double-Semicolon.html" rel="next" title="Use of Double Semicolon">
+<link href="Notes-about-Style-for-Semicolon.html" rel="prev" title="Notes about Style for Semicolon">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Use-of-Single-Semicolon">
+<div class="nav-panel">
+<p>
+Next: <a href="Use-of-Double-Semicolon.html" accesskey="n" rel="next">Use of Double Semicolon</a>, Previous: <a href="Notes-about-Style-for-Semicolon.html" accesskey="p" rel="prev">Notes about Style for Semicolon</a>, Up: <a href="Semicolon.html" accesskey="u" rel="up">Semicolon</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Use-of-Single-Semicolon-1"><span>2.4.4.3 Use of Single Semicolon<a class="copiable-link" href="#Use-of-Single-Semicolon-1"> &para;</a></span></h4>
+
+<p>Comments that begin with a single <i class="i">semicolon</i> are all aligned to 
+the same column at the right (sometimes called the &ldquo;comment column&rdquo;).
+The text of such a comment generally applies only to the line on which it appears.
+Occasionally two or three contain a single sentence together;
+this is sometimes indicated by indenting all but the first with an additional
+space (after the <i class="i">semicolon</i>).
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Use-of-Triple-Semicolon.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Use of Triple Semicolon (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Use of Triple Semicolon (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Use of Triple Semicolon (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Semicolon.html" rel="up" title="Semicolon">
+<link href="Use-of-Quadruple-Semicolon.html" rel="next" title="Use of Quadruple Semicolon">
+<link href="Use-of-Double-Semicolon.html" rel="prev" title="Use of Double Semicolon">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Use-of-Triple-Semicolon">
+<div class="nav-panel">
+<p>
+Next: <a href="Use-of-Quadruple-Semicolon.html" accesskey="n" rel="next">Use of Quadruple Semicolon</a>, Previous: <a href="Use-of-Double-Semicolon.html" accesskey="p" rel="prev">Use of Double Semicolon</a>, Up: <a href="Semicolon.html" accesskey="u" rel="up">Semicolon</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Use-of-Triple-Semicolon-1"><span>2.4.4.5 Use of Triple Semicolon<a class="copiable-link" href="#Use-of-Triple-Semicolon-1"> &para;</a></span></h4>
+
+<p>Comments that begin with a triple <i class="i">semicolon</i> are all aligned to
+the left margin.  Usually they are used prior to a definition or set
+of definitions, rather than within a definition.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Use-of-the-Dot-Character.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Use of the Dot Character (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Use of the Dot Character (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Use of the Dot Character (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Notational-Conventions.html" rel="up" title="Notational Conventions">
+<link href="NIL.html" rel="next" title="NIL">
+<link href="Numbers-_0028Objects-with-Multiple-Notations_0029.html" rel="prev" title="Numbers (Objects with Multiple Notations)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Use-of-the-Dot-Character">
+<div class="nav-panel">
+<p>
+Next: <a href="NIL.html" accesskey="n" rel="next">NIL</a>, Previous: <a href="Numbers-_0028Objects-with-Multiple-Notations_0029.html" accesskey="p" rel="prev">Numbers</a>, Up: <a href="Notational-Conventions.html" accesskey="u" rel="up">Notational Conventions</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Use-of-the-Dot-Character-1"><span>1.4.1.10 Use of the Dot Character<a class="copiable-link" href="#Use-of-the-Dot-Character-1"> &para;</a></span></h4>
+
+<p>The dot appearing by itself in an <i class="i">expression</i> such as
+</p>
+<p><code class="t">(<i class="i">item1</i> <i class="i">item2</i> <code class="t">.</code> <i class="i">tail</i>)</code>
+</p>
+<p>means that <i class="i">tail</i> represents a <i class="i">list</i> of <i class="i">objects</i> 
+at the end of a list.  For example,
+</p>
+<p><code class="t">(A B C <code class="t">.</code> (D E F))</code>
+</p>
+<p>is notationally equivalent to:
+</p>
+<p><code class="t">(A B C D E F)</code>
+</p>
+<p>Although <i class="i">dot</i> is a valid constituent character in a symbol, no 
+<i class="i">standardized</i> <i class="i">symbols</i> contain the character <i class="i">dot</i>,
+so a period that follows a reference to a <i class="i">symbol</i> at the end of
+a sentence in this document should always be interpreted as a period
+and never as part of the <i class="i">symbol</i>&rsquo;s <i class="i">name</i>.
+For example, within this document, a sentence such as
+ &ldquo;This sample sentence refers to the symbol <b class="b">car</b>.&rdquo; 
+refers to a symbol whose name is <code class="t">&quot;CAR&quot;</code> (with three letters),
+and never to a four-letter symbol <code class="t">&quot;CAR.&quot;</code>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/VALUES-Forms-as-Places.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>VALUES Forms as Places (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="VALUES Forms as Places (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="VALUES Forms as Places (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Kinds-of-Places.html" rel="up" title="Kinds of Places">
+<link href="THE-Forms-as-Places.html" rel="next" title="THE Forms as Places">
+<link href="Function-Call-Forms-as-Places.html" rel="prev" title="Function Call Forms as Places">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="VALUES-Forms-as-Places">
+<div class="nav-panel">
+<p>
+Next: <a href="THE-Forms-as-Places.html" accesskey="n" rel="next">THE Forms as Places</a>, Previous: <a href="Function-Call-Forms-as-Places.html" accesskey="p" rel="prev">Function Call Forms as Places</a>, Up: <a href="Kinds-of-Places.html" accesskey="u" rel="up">Kinds of Places</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="VALUES-Forms-as-Places-1"><span>5.1.2.3 VALUES Forms as Places<a class="copiable-link" href="#VALUES-Forms-as-Places-1"> &para;</a></span></h4>
+
+<p>A <b class="b">values</b> <i class="i">form</i> can be used as a <i class="i">place</i>,
+provided that each of its <i class="i">subforms</i> is also a <i class="i">place</i> form.
+</p>
+<p>A form such as
+</p>
+<p><code class="t">(setf (values <i class="i">place-1</i> \dots <i class="i">place-n</i>) <i class="i">values-form</i>)</code>
+</p>
+<p>does the following:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>The <i class="i">subforms</i> of each nested <i class="i">place</i> are evaluated
+in left-to-right order.
+</p></dd>
+<dt>2.</dt>
+<dd><p>The <i class="i">values-form</i> is evaluated, and the first store
+variable from each <i class="i">place</i> is bound to its return values as if by 
+<b class="b">multiple-value-bind</b>.  
+</p></dd>
+<dt>3.</dt>
+<dd><p>If the <i class="i">setf expansion</i> for any <i class="i">place</i> 
+involves more than one store variable, then the additional
+store variables are bound to <b class="b">nil</b>.
+</p></dd>
+<dt>4.</dt>
+<dd><p>The storing forms for each <i class="i">place</i> are evaluated in
+left-to-right order.
+</p></dd>
+</dl>
+
+<p>The storing form in the <i class="i">setf expansion</i> of <b class="b">values</b>
+returns as <i class="i">multiple values</i>_2 the values of the store
+variables in step 2.  That is, the number of values returned is the
+same as the number of <i class="i">place</i> forms.  This may be more or fewer
+values than are produced by the <i class="i">values-form</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Valid-Patterns-for-Tokens.html
@@ -0,0 +1,143 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Valid Patterns for Tokens (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Valid Patterns for Tokens (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Valid Patterns for Tokens (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpretation-of-Tokens.html" rel="up" title="Interpretation of Tokens">
+<link href="Package-System-Consistency-Rules.html" rel="next" title="Package System Consistency Rules">
+<link href="Symbols-as-Tokens.html" rel="prev" title="Symbols as Tokens">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Valid-Patterns-for-Tokens">
+<div class="nav-panel">
+<p>
+Next: <a href="Package-System-Consistency-Rules.html" accesskey="n" rel="next">Package System Consistency Rules</a>, Previous: <a href="Symbols-as-Tokens.html" accesskey="p" rel="prev">Symbols as Tokens</a>, Up: <a href="Interpretation-of-Tokens.html" accesskey="u" rel="up">Interpretation of Tokens</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Valid-Patterns-for-Tokens-1"><span>2.3.5 Valid Patterns for Tokens<a class="copiable-link" href="#Valid-Patterns-for-Tokens-1"> &para;</a></span></h4>
+
+<p>The valid patterns for <i class="i">tokens</i> are summarized in Figure 2&ndash;17. 
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t"><i class="i">nnnnn</i></code>              a <i class="i">number</i>                                           <!-- /@w -->
+  <code class="t"><i class="i">xxxxx</i></code>              a <i class="i">symbol</i> in the <i class="i">current package</i>                    <!-- /@w -->
+  <code class="t">:<i class="i">xxxxx</i></code>             a <i class="i">symbol</i> in the the <code class="t">KEYWORD</code> <i class="i">package</i>                <!-- /@w -->
+  <code class="t"><i class="i">ppppp</i>:<i class="i">xxxxx</i></code>        an <i class="i">external symbol</i> in the <i class="i">ppppp</i> <i class="i">package</i>            <!-- /@w -->
+  <code class="t"><i class="i">ppppp</i>::<i class="i">xxxxx</i></code>       a (possibly internal) <i class="i">symbol</i> in the <i class="i">ppppp</i> <i class="i">package</i>  <!-- /@w -->
+  <code class="t">:<i class="i">nnnnn</i></code>             undefined                                          <!-- /@w -->
+  <code class="t"><i class="i">ppppp</i>:<i class="i">nnnnn</i></code>        undefined                                          <!-- /@w -->
+  <code class="t"><i class="i">ppppp</i>::<i class="i">nnnnn</i></code>       undefined                                          <!-- /@w -->
+  <code class="t">::<i class="i">aaaaa</i></code>            undefined                                          <!-- /@w -->
+  <code class="t"><i class="i">aaaaa</i>:</code>             undefined                                          <!-- /@w -->
+  <code class="t"><i class="i">aaaaa</i>:<i class="i">aaaaa</i>:<i class="i">aaaaa</i></code>  undefined                                          <!-- /@w -->
+
+                 Figure 2&ndash;17: Valid patterns for tokens                <!-- /@w -->
+
+</pre></div></div>
+
+<p>Note that <i class="i">nnnnn</i> has number syntax,
+          neither <i class="i">xxxxx</i> nor <i class="i">ppppp</i> has number syntax,
+      and <i class="i">aaaaa</i> has any syntax.
+</p>
+<p>A summary of rules concerning <i class="i">package markers</i> follows.
+In each case, examples are offered to illustrate the case;
+for presentational simplicity, the examples assume that
+the <i class="i">readtable case</i> of the <i class="i">current readtable</i> is <code class="t">:upcase</code>.
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>If there is a single <i class="i">package marker</i>, and it occurs at the beginning of the
+<i class="i">token</i>, then the <i class="i">token</i> is interpreted as a <i class="i">symbol</i> in the <code class="t">KEYWORD</code> <i class="i">package</i>.
+It also sets the <b class="b">symbol-value</b> of the newly-created <i class="i">symbol</i> to that
+same <i class="i">symbol</i> so that the <i class="i">symbol</i> will self-evaluate.
+</p>
+<p>For example, 
+<code class="t">:bar</code>, when read, interns <code class="t">BAR</code> as an <i class="i">external symbol</i> in the <code class="t">KEYWORD</code> <i class="i">package</i>.
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p>If there is a single <i class="i">package marker</i> not at the beginning or end of the
+<i class="i">token</i>, then it divides the <i class="i">token</i> into two parts.  The first part
+specifies a <i class="i">package</i>; 
+the second part is the name of an <i class="i">external symbol</i>
+available in that package.  
+</p>
+<p>For example, 
+<code class="t">foo:bar</code>, when read, looks up <code class="t">BAR</code> among the <i class="i">external symbols</i> of
+the <i class="i">package</i> named <code class="t">FOO</code>.
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>If there are two adjacent <i class="i">package markers</i> not at the beginning or end of the
+<i class="i">token</i>, then they divide the <i class="i">token</i> into two parts.  The first part
+specifies a <i class="i">package</i>;
+the second part is the name of a <i class="i">symbol</i> within
+that <i class="i">package</i> (possibly an <i class="i">internal symbol</i>).
+</p>
+<p>For example, 
+<code class="t">foo::bar</code>, when read, interns <code class="t">BAR</code> in the <i class="i">package</i> named <code class="t">FOO</code>.
+</p>
+</dd>
+<dt>4.</dt>
+<dd><p>If the <i class="i">token</i> contains no <i class="i">package markers</i>, 
+and does not have <i class="i">potential number</i> syntax,
+then the entire <i class="i">token</i> is the name of the <i class="i">symbol</i>.
+The <i class="i">symbol</i> is looked up in the <i class="i">current package</i>.
+</p>
+<p>For example, 
+<code class="t">bar</code>, when read, interns <code class="t">BAR</code> in the <i class="i">current package</i>.
+</p>
+</dd>
+<dt>5.</dt>
+<dd><p>The consequences are unspecified if any other pattern of <i class="i">package markers</i>
+in a <i class="i">token</i> is used.
+All other uses of <i class="i">package markers</i> within names of <i class="i">symbols</i> 
+are not defined by this standard 
+but are reserved for <i class="i">implementation-dependent</i> use.
+</p></dd>
+</dl>
+
+<p>For example,
+assuming the <i class="i">readtable case</i> of the <i class="i">current readtable</i> is <code class="t">:upcase</code>,
+<code class="t">editor:buffer</code> refers to the <i class="i">external symbol</i> 
+named <code class="t">BUFFER</code> present in the <i class="i">package</i> named <code class="t">editor</code>,
+regardless of whether there is a <i class="i">symbol</i> named <code class="t">BUFFER</code> in
+the <i class="i">current package</i>.  If there is no <i class="i">package</i> named
+<code class="t">editor</code>, or if no <i class="i">symbol</i> named <code class="t">BUFFER</code>
+is present in <code class="t">editor</code>, or if <code class="t">BUFFER</code> is not exported by
+<code class="t">editor</code>, the reader signals
+a correctable error.
+If <code class="t">editor::buffer</code> is seen, the effect is exactly the same as
+reading <code class="t">buffer</code> with the <code class="t">EDITOR</code> <i class="i">package</i> being the <i class="i">current package</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Package-System-Consistency-Rules.html">Package System Consistency Rules</a>, Previous: <a href="Symbols-as-Tokens.html">Symbols as Tokens</a>, Up: <a href="Interpretation-of-Tokens.html">Interpretation of Tokens</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Value-Accumulation-Clauses.html
@@ -0,0 +1,234 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Value Accumulation Clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Value Accumulation Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Value Accumulation Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-LOOP-Facility.html" rel="up" title="The LOOP Facility">
+<link href="Termination-Test-Clauses.html" rel="next" title="Termination Test Clauses">
+<link href="Variable-Initialization-and-Stepping-Clauses.html" rel="prev" title="Variable Initialization and Stepping Clauses">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Value-Accumulation-Clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Termination-Test-Clauses.html" accesskey="n" rel="next">Termination Test Clauses</a>, Previous: <a href="Variable-Initialization-and-Stepping-Clauses.html" accesskey="p" rel="prev">Variable Initialization and Stepping Clauses</a>, Up: <a href="The-LOOP-Facility.html" accesskey="u" rel="up">The LOOP Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Value-Accumulation-Clauses-1"><span>6.1.3 Value Accumulation Clauses<a class="copiable-link" href="#Value-Accumulation-Clauses-1"> &para;</a></span></h4>
+
+<p>The constructs <code class="t">collect</code>, <code class="t">collecting</code>,
+<code class="t">append</code>, <code class="t">appending</code>,
+<code class="t">nconc</code>, <code class="t">nconcing</code>,
+<code class="t">count</code>, <code class="t">counting</code>,
+<code class="t">maximize</code>, <code class="t">maximizing</code>,
+<code class="t">minimize</code>, <code class="t">minimizing</code>,
+<code class="t">sum</code>, and <code class="t">summing</code>,
+allow values to be accumulated in a <b class="b">loop</b>.
+</p>
+<p>The constructs <code class="t">collect</code>, 
+<code class="t">collecting</code>, <code class="t">append</code>, <code class="t">appending</code>, 
+<code class="t">nconc</code>, and <code class="t">nconcing</code>, 
+designate clauses that
+accumulate values in <i class="i">lists</i> and return them.
+The constructs <code class="t">count</code>, <code class="t">counting</code>, 
+<code class="t">maximize</code>, <code class="t">maximizing</code>, <code class="t">minimize</code>, <code class="t">minimizing</code>,
+<code class="t">sum</code>, and <code class="t">summing</code> designate clauses that accumulate and
+return numerical values.
+</p>
+<p>During each iteration,  the constructs
+<code class="t">collect</code> and <code class="t">collecting</code>
+collect the value of the supplied
+<i class="i">form</i> into a <i class="i">list</i>. 
+When iteration terminates, the <i class="i">list</i> is returned.
+The argument <i class="i">var</i> is 
+set to the <i class="i">list</i> 
+of collected values; if <i class="i">var</i> is supplied, the <b class="b">loop</b>
+does not return the final <i class="i">list</i> automatically.  If 
+<i class="i">var</i> is not
+supplied, it is equivalent to supplying an internal name for
+<i class="i">var</i> and returning its value in a <code class="t">finally</code> clause.
+The <i class="i">var</i> argument
+is bound as if by the construct <code class="t">with</code>.
+No mechanism is provided for declaring the <i class="i">type</i> of <i class="i">var</i>;
+it must be of <i class="i">type</i> <b class="b">list</b>.
+</p>
+<p>The constructs <code class="t">append</code>, <code class="t">appending</code>, 
+<code class="t">nconc</code>, and  <code class="t">nconcing</code>
+are similar to <code class="t">collect</code> except that the
+values of the supplied <i class="i">form</i> must be <i class="i">lists</i>.  
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">append</code> keyword causes its <i class="i">list</i> values to be concatenated 
+into a single <i class="i">list</i>, as if 
+they were arguments to the <i class="i">function</i> <b class="b">append</b>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">nconc</code> keyword causes its <i class="i">list</i> values to be concatenated
+into a single <i class="i">list</i>,
+as if they were arguments to the <i class="i">function</i> <b class="b">nconc</b>.  
+</p></dd>
+</dl>
+
+<p>The argument <i class="i">var</i> is 
+set to the <i class="i">list</i> of 
+concatenated values; if <i class="i">var</i> is supplied, 
+<b class="b">loop</b>
+does not return the final <i class="i">list</i> automatically.  
+The <i class="i">var</i> argument
+is bound as if by the construct <code class="t">with</code>.
+ A <i class="i">type</i> cannot be supplied for <i class="i">var</i>; 
+it must be of <i class="i">type</i> <b class="b">list</b>.
+ The construct <code class="t">nconc</code> 
+destructively modifies its argument <i class="i">lists</i>.
+</p>
+<p>The <code class="t">count</code> construct counts the number of times 
+that the supplied <i class="i">form</i> returns <i class="i">true</i>.
+The argument <i class="i">var</i> accumulates the number of occurrences; 
+if <i class="i">var</i> is supplied, 
+<b class="b">loop</b> does not return the final count automatically.
+The <i class="i">var</i> argument is bound as if by the construct <code class="t">with</code> 
+to a zero of the appropriate type.
+Subsequent values (including any necessary coercions) 
+are computed as if by the function <b class="b">1+</b>.
+If <code class="t">into</code> <i class="i">var</i> is used,
+a <i class="i">type</i> can be supplied  for <i class="i">var</i> with the <i class="i">type-spec</i> argument;
+the consequences are unspecified if a nonnumeric <i class="i">type</i> is supplied.           
+If there is no <code class="t">into</code> variable,
+the optional <i class="i">type-spec</i> argument
+applies to the internal variable that is keeping the count.  
+The default <i class="i">type</i> is <i class="i">implementation-dependent</i>; 
+but it must be
+a <i class="i">supertype</i> of <i class="i">type</i> <b class="b">fixnum</b>.
+</p>
+<p>The <code class="t">maximize</code> and 
+<code class="t">minimize</code> 
+constructs compare
+the value of the supplied <i class="i">form</i> obtained during the first 
+iteration with values obtained in successive iterations.
+The maximum (for <code class="t">maximize</code>) or minimum (for <code class="t">minimize</code>) 
+value encountered is determined 
+(as if by the <i class="i">function</i> <b class="b">max</b> for <code class="t">maximize</code> and
+ as if by the <i class="i">function</i> <b class="b">min</b> for <code class="t">minimize</code>)
+and returned.
+If the <code class="t">maximize</code> or <code class="t">minimize</code> clause
+is never executed, the accumulated value is unspecified.
+The argument <i class="i">var</i> accumulates the maximum or minimum value;
+if <i class="i">var</i> is supplied,
+<b class="b">loop</b> does not return the maximum or minimum automatically.
+The <i class="i">var</i> argument is bound as if by the construct <code class="t">with</code>.
+If <code class="t">into</code> <i class="i">var</i> is used,
+a <i class="i">type</i> can be supplied for <i class="i">var</i> with the <i class="i">type-spec</i> argument;
+the consequences are unspecified if a nonnumeric <i class="i">type</i> is supplied.           
+If there is no <code class="t">into</code> variable,
+the optional <i class="i">type-spec</i> argument applies to the internal variable 
+that is keeping the maximum or minimum value.  
+The default <i class="i">type</i> 
+is <i class="i">implementation-dependent</i>; but it
+must be a <i class="i">supertype</i> of <i class="i">type</i> <b class="b">real</b>.
+</p>
+<p>The <code class="t">sum</code> construct forms a cumulative sum 
+of the successive <i class="i">primary values</i> of the supplied <i class="i">form</i>
+at each iteration.
+The argument <i class="i">var</i> is used to accumulate the sum;
+if <i class="i">var</i> is supplied,
+<b class="b">loop</b> does not return the final sum automatically.
+The <i class="i">var</i> argument is bound as if by the construct <code class="t">with</code>
+to a zero of the appropriate type.
+Subsequent values (including any necessary coercions) are computed as if by the <i class="i">function</i> <b class="b">+</b>.
+If <code class="t">into</code> <i class="i">var</i> is used,
+a <i class="i">type</i> can be supplied for <i class="i">var</i> with the <i class="i">type-spec</i> argument;
+the consequences are unspecified if a nonnumeric <i class="i">type</i> is supplied.           
+If there is no <code class="t">into</code> variable,
+the optional <i class="i">type-spec</i> argument applies to the internal variable
+that is keeping the sum.
+The default <i class="i">type</i>
+is <i class="i">implementation-dependent</i>; but it
+must be a <i class="i">supertype</i> of <i class="i">type</i> <b class="b">number</b>.
+</p>
+<p>If <code class="t">into</code> is used,
+the construct does not provide a default return value;
+however, the variable is available
+for use in any <code class="t">finally</code> clause.  
+</p>
+<p>Certain kinds of accumulation clauses can be combined in a <b class="b">loop</b> 
+if their destination is the same 
+(the result of <b class="b">loop</b> or an <code class="t">into</code> <i class="i">var</i>) 
+because they are considered to accumulate conceptually compatible quantities.
+In particular, 
+any elements of following sets of accumulation clauses can be mixed
+with other elements of the same set for the same destination 
+in a <b class="b">loop</b> <i class="i">form</i>:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">collect</code>, <code class="t">append</code>, <code class="t">nconc</code>
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">sum</code>, <code class="t">count</code>
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><code class="t">maximize</code>, <code class="t">minimize</code>
+</p></dd>
+</dl>
+
+<div class="example">
+<pre class="example-preformatted">;; Collect every name and the kids in one list by using 
+;; COLLECT and APPEND.
+ (loop for name in '(fred sue alice joe june)
+       for kids in '((bob ken) () () (kris sunshine) ())
+       collect name
+       append kids)
+&rArr;  (FRED BOB KEN SUE ALICE JOE KRIS SUNSHINE JUNE)
+</pre></div>
+
+<p>Any two
+clauses that do not accumulate the same <i class="i">type</i> of 
+<i class="i">object</i> 
+can coexist in a <b class="b">loop</b> only 
+if each clause accumulates its values into 
+a different
+<i class="i">variable</i>.  
+</p>
+
+<ul class="mini-toc">
+<li><a href="Examples-of-COLLECT-clause.html" accesskey="1">Examples of COLLECT clause</a></li>
+<li><a href="Examples-of-APPEND-and-NCONC-clauses.html" accesskey="2">Examples of APPEND and NCONC clauses</a></li>
+<li><a href="Examples-of-COUNT-clause.html" accesskey="3">Examples of COUNT clause</a></li>
+<li><a href="Examples-of-MAXIMIZE-and-MINIMIZE-clauses.html" accesskey="4">Examples of MAXIMIZE and MINIMIZE clauses</a></li>
+<li><a href="Examples-of-SUM-clause.html" accesskey="5">Examples of SUM clause</a></li>
+</ul>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Termination-Test-Clauses.html">Termination Test Clauses</a>, Previous: <a href="Variable-Initialization-and-Stepping-Clauses.html">Variable Initialization and Stepping Clauses</a>, Up: <a href="The-LOOP-Facility.html">The LOOP Facility</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Variable-Initialization-and-Stepping-Clauses.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Variable Initialization and Stepping Clauses (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Variable Initialization and Stepping Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Variable Initialization and Stepping Clauses (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="The-LOOP-Facility.html" rel="up" title="The LOOP Facility">
+<link href="Value-Accumulation-Clauses.html" rel="next" title="Value Accumulation Clauses">
+<link href="Overview-of-the-Loop-Facility.html" rel="prev" title="Overview of the Loop Facility">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Variable-Initialization-and-Stepping-Clauses">
+<div class="nav-panel">
+<p>
+Next: <a href="Value-Accumulation-Clauses.html" accesskey="n" rel="next">Value Accumulation Clauses</a>, Previous: <a href="Overview-of-the-Loop-Facility.html" accesskey="p" rel="prev">Overview of the Loop Facility</a>, Up: <a href="The-LOOP-Facility.html" accesskey="u" rel="up">The LOOP Facility</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Variable-Initialization-and-Stepping-Clauses-1"><span>6.1.2 Variable Initialization and Stepping Clauses<a class="copiable-link" href="#Variable-Initialization-and-Stepping-Clauses-1"> &para;</a></span></h4>
+
+
+<ul class="mini-toc">
+<li><a href="Iteration-Control.html" accesskey="1">Iteration Control</a></li>
+<li><a href="The-for_002das_002darithmetic-subclause.html" accesskey="2">The for-as-arithmetic subclause</a></li>
+<li><a href="Examples-of-for_002das_002darithmetic-subclause.html" accesskey="3">Examples of for-as-arithmetic subclause</a></li>
+<li><a href="The-for_002das_002din_002dlist-subclause.html" accesskey="4">The for-as-in-list subclause</a></li>
+<li><a href="Examples-of-for_002das_002din_002dlist-subclause.html" accesskey="5">Examples of for-as-in-list subclause</a></li>
+<li><a href="The-for_002das_002don_002dlist-subclause.html" accesskey="6">The for-as-on-list subclause</a></li>
+<li><a href="Examples-of-for_002das_002don_002dlist-subclause.html" accesskey="7">Examples of for-as-on-list subclause</a></li>
+<li><a href="The-for_002das_002dequals_002dthen-subclause.html" accesskey="8">The for-as-equals-then subclause</a></li>
+<li><a href="Examples-of-for_002das_002dequals_002dthen-subclause.html" accesskey="9">Examples of for-as-equals-then subclause</a></li>
+<li><a href="The-for_002das_002dacross-subclause.html">The for-as-across subclause</a></li>
+<li><a href="Examples-of-for_002das_002dacross-subclause.html">Examples of for-as-across subclause</a></li>
+<li><a href="The-for_002das_002dhash-subclause.html">The for-as-hash subclause</a></li>
+<li><a href="The-for_002das_002dpackage-subclause.html">The for-as-package subclause</a></li>
+<li><a href="Examples-of-for_002das_002dpackage-subclause.html">Examples of for-as-package subclause</a></li>
+<li><a href="Local-Variable-Initializations.html">Local Variable Initializations</a></li>
+<li><a href="Examples-of-WITH-clause.html">Examples of WITH clause</a></li>
+</ul>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Variable-Names-as-Places.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Variable Names as Places (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Variable Names as Places (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Variable Names as Places (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Kinds-of-Places.html" rel="up" title="Kinds of Places">
+<link href="Function-Call-Forms-as-Places.html" rel="next" title="Function Call Forms as Places">
+<link href="Kinds-of-Places.html" rel="prev" title="Kinds of Places">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Variable-Names-as-Places">
+<div class="nav-panel">
+<p>
+Next: <a href="Function-Call-Forms-as-Places.html" accesskey="n" rel="next">Function Call Forms as Places</a>, Previous: <a href="Kinds-of-Places.html" accesskey="p" rel="prev">Kinds of Places</a>, Up: <a href="Kinds-of-Places.html" accesskey="u" rel="up">Kinds of Places</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Variable-Names-as-Places-1"><span>5.1.2.1 Variable Names as Places<a class="copiable-link" href="#Variable-Names-as-Places-1"> &para;</a></span></h4>
+
+<p>The name of a <i class="i">lexical variable</i> or <i class="i">dynamic variable</i> 
+can be used as a <i class="i">place</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Variables-that-affect-the-Lisp-Reader.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Variables that affect the Lisp Reader (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Variables that affect the Lisp Reader (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Variables that affect the Lisp Reader (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Syntax.html" rel="up" title="Character Syntax">
+<link href="Standard-Characters.html" rel="next" title="Standard Characters">
+<link href="Readtables.html" rel="prev" title="Readtables">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="Variables-that-affect-the-Lisp-Reader">
+<div class="nav-panel">
+<p>
+Next: <a href="Standard-Characters.html" accesskey="n" rel="next">Standard Characters</a>, Previous: <a href="Readtables.html" accesskey="p" rel="prev">Readtables</a>, Up: <a href="Character-Syntax.html" accesskey="u" rel="up">Character Syntax</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="Variables-that-affect-the-Lisp-Reader-1"><span>2.1.2 Variables that affect the Lisp Reader<a class="copiable-link" href="#Variables-that-affect-the-Lisp-Reader-1"> &para;</a></span></h4>
+
+<p>The <i class="i">Lisp reader</i> is influenced not only by the <i class="i">current readtable</i>,
+but also by various <i class="i">dynamic variables</i>.  Figure 2&ndash;2 lists
+the <i class="i">variables</i> that influence the behavior of the <i class="i">Lisp reader</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  *package*    *read-default-float-format*  *readtable*  <!-- /@w -->
+  *read-base*  *read-suppress*                           <!-- /@w -->
+
+  Figure 2&ndash;2: Variables that influence the Lisp reader. <!-- /@w -->
+
+</pre></div></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Vectors.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Vectors (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Vectors (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Vectors (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Array-Elements.html" rel="up" title="Array Elements">
+<link href="Fill-Pointers.html" rel="next" title="Fill Pointers">
+<link href="Array-Rank.html" rel="prev" title="Array Rank">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Vectors">
+<div class="nav-panel">
+<p>
+Next: <a href="Fill-Pointers.html" accesskey="n" rel="next">Fill Pointers</a>, Previous: <a href="Array-Rank.html" accesskey="p" rel="prev">Array Rank</a>, Up: <a href="Array-Elements.html" accesskey="u" rel="up">Array Elements</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Vectors-1"><span>15.1.1.5 Vectors<a class="copiable-link" href="#Vectors-1"> &para;</a></span></h4>
+
+<p>An <i class="i">array</i> of <i class="i">rank</i> one (<i class="i">i.e.</i>, a one-dimensional <i class="i">array</i>)
+is called a <i class="i">vector</i>
+<a class="index-entry-id" id="index-vector"></a>
+.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Viewing-Integers-as-Bits-and-Bytes.html
@@ -0,0 +1,43 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Viewing Integers as Bits and Bytes (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Viewing Integers as Bits and Bytes (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Viewing Integers as Bits and Bytes (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numeric-Operations.html" rel="up" title="Numeric Operations">
+<link href="Logical-Operations-on-Integers.html" rel="next" title="Logical Operations on Integers">
+<link href="Contagion-in-Numeric-Operations.html" rel="prev" title="Contagion in Numeric Operations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Viewing-Integers-as-Bits-and-Bytes">
+<div class="nav-panel">
+<p>
+Next: <a href="Logical-Operations-on-Integers.html" accesskey="n" rel="next">Logical Operations on Integers</a>, Previous: <a href="Contagion-in-Numeric-Operations.html" accesskey="p" rel="prev">Contagion in Numeric Operations</a>, Up: <a href="Numeric-Operations.html" accesskey="u" rel="up">Numeric Operations</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Viewing-Integers-as-Bits-and-Bytes-1"><span>12.1.1.4 Viewing Integers as Bits and Bytes<a class="copiable-link" href="#Viewing-Integers-as-Bits-and-Bytes-1"> &para;</a></span></h4>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Visible-Modification-of-Arrays-with-respect-to-EQUALP.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Visible Modification of Arrays with respect to EQUALP (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Visible Modification of Arrays with respect to EQUALP (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Visible Modification of Arrays with respect to EQUALP (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Modifying-Hash-Table-Keys.html" rel="up" title="Modifying Hash Table Keys">
+<link href="Visible-Modification-of-Hash-Tables-with-respect-to-EQUALP.html" rel="next" title="Visible Modification of Hash Tables with respect to EQUALP">
+<link href="Visible-Modification-of-Structures-with-respect-to-EQUALP.html" rel="prev" title="Visible Modification of Structures with respect to EQUALP">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Visible-Modification-of-Arrays-with-respect-to-EQUALP">
+<div class="nav-panel">
+<p>
+Next: <a href="Visible-Modification-of-Hash-Tables-with-respect-to-EQUALP.html" accesskey="n" rel="next">Visible Modification of Hash Tables with respect to EQUALP</a>, Previous: <a href="Visible-Modification-of-Structures-with-respect-to-EQUALP.html" accesskey="p" rel="prev">Visible Modification of Structures with respect to EQUALP</a>, Up: <a href="Modifying-Hash-Table-Keys.html" accesskey="u" rel="up">Modifying Hash Table Keys</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Visible-Modification-of-Arrays-with-respect-to-EQUALP-1"><span>18.1.2.7 Visible Modification of Arrays with respect to EQUALP<a class="copiable-link" href="#Visible-Modification-of-Arrays-with-respect-to-EQUALP-1"> &para;</a></span></h4>
+
+<p>In an <i class="i">array</i>, any visible change
+     to an <i class="i">active</i> <i class="i">element</i>,
+     to the <i class="i">fill pointer</i> (if the <i class="i">array</i> can and does have one),
+  or to the <i class="i">dimensions</i> (if the <i class="i">array</i> is <i class="i">actually adjustable</i>)
+is considered a visible modification with regard to <b class="b">equalp</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Visible-Modification-of-Bit-Vectors-and-Strings-with-respect-to-EQUAL.html
@@ -0,0 +1,49 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Visible Modification of Bit Vectors and Strings with respect to EQUAL (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Visible Modification of Bit Vectors and Strings with respect to EQUAL (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Visible Modification of Bit Vectors and Strings with respect to EQUAL (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Modifying-Hash-Table-Keys.html" rel="up" title="Modifying Hash Table Keys">
+<link href="Visible-Modification-of-Objects-with-respect-to-EQUALP.html" rel="next" title="Visible Modification of Objects with respect to EQUALP">
+<link href="Visible-Modification-of-Conses-with-respect-to-EQUAL.html" rel="prev" title="Visible Modification of Conses with respect to EQUAL">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Visible-Modification-of-Bit-Vectors-and-Strings-with-respect-to-EQUAL">
+<div class="nav-panel">
+<p>
+Next: <a href="Visible-Modification-of-Objects-with-respect-to-EQUALP.html" accesskey="n" rel="next">Visible Modification of Objects with respect to EQUALP</a>, Previous: <a href="Visible-Modification-of-Conses-with-respect-to-EQUAL.html" accesskey="p" rel="prev">Visible Modification of Conses with respect to EQUAL</a>, Up: <a href="Modifying-Hash-Table-Keys.html" accesskey="u" rel="up">Modifying Hash Table Keys</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Visible-Modification-of-Bit-Vectors-and-Strings-with-respect-to-EQUAL-1"><span>18.1.2.4 Visible Modification of Bit Vectors and Strings with respect to EQUAL<a class="copiable-link" href="#Visible-Modification-of-Bit-Vectors-and-Strings-with-respect-to-EQUAL-1"> &para;</a></span></h4>
+
+<p>For a <i class="i">vector</i> of <i class="i">type</i> <b class="b">bit-vector</b> or of <i class="i">type</i> <b class="b">string</b>, any visible change
+     to an <i class="i">active</i> <i class="i">element</i> of the <i class="i">vector</i>,
+  or to the <i class="i">length</i> of the <i class="i">vector</i> (if it is <i class="i">actually adjustable</i> 
+					           or has a <i class="i">fill pointer</i>)
+is considered a visible modification with regard to <b class="b">equal</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Visible-Modification-of-Conses-with-respect-to-EQUAL.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Visible Modification of Conses with respect to EQUAL (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Visible Modification of Conses with respect to EQUAL (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Visible Modification of Conses with respect to EQUAL (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Modifying-Hash-Table-Keys.html" rel="up" title="Modifying Hash Table Keys">
+<link href="Visible-Modification-of-Bit-Vectors-and-Strings-with-respect-to-EQUAL.html" rel="next" title="Visible Modification of Bit Vectors and Strings with respect to EQUAL">
+<link href="Visible-Modification-of-Objects-with-respect-to-EQUAL.html" rel="prev" title="Visible Modification of Objects with respect to EQUAL">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Visible-Modification-of-Conses-with-respect-to-EQUAL">
+<div class="nav-panel">
+<p>
+Next: <a href="Visible-Modification-of-Bit-Vectors-and-Strings-with-respect-to-EQUAL.html" accesskey="n" rel="next">Visible Modification of Bit Vectors and Strings with respect to EQUAL</a>, Previous: <a href="Visible-Modification-of-Objects-with-respect-to-EQUAL.html" accesskey="p" rel="prev">Visible Modification of Objects with respect to EQUAL</a>, Up: <a href="Modifying-Hash-Table-Keys.html" accesskey="u" rel="up">Modifying Hash Table Keys</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Visible-Modification-of-Conses-with-respect-to-EQUAL-1"><span>18.1.2.3 Visible Modification of Conses with respect to EQUAL<a class="copiable-link" href="#Visible-Modification-of-Conses-with-respect-to-EQUAL-1"> &para;</a></span></h4>
+
+<p>Any visible change to the <i class="i">car</i> or the <i class="i">cdr</i> of a <i class="i">cons</i>
+is considered a visible modification with regard to <b class="b">equal</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Visible-Modification-of-Hash-Tables-with-respect-to-EQUALP.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Visible Modification of Hash Tables with respect to EQUALP (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Visible Modification of Hash Tables with respect to EQUALP (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Visible Modification of Hash Tables with respect to EQUALP (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Modifying-Hash-Table-Keys.html" rel="up" title="Modifying Hash Table Keys">
+<link href="Visible-Modifications-by-Language-Extensions.html" rel="next" title="Visible Modifications by Language Extensions">
+<link href="Visible-Modification-of-Arrays-with-respect-to-EQUALP.html" rel="prev" title="Visible Modification of Arrays with respect to EQUALP">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Visible-Modification-of-Hash-Tables-with-respect-to-EQUALP">
+<div class="nav-panel">
+<p>
+Next: <a href="Visible-Modifications-by-Language-Extensions.html" accesskey="n" rel="next">Visible Modifications by Language Extensions</a>, Previous: <a href="Visible-Modification-of-Arrays-with-respect-to-EQUALP.html" accesskey="p" rel="prev">Visible Modification of Arrays with respect to EQUALP</a>, Up: <a href="Modifying-Hash-Table-Keys.html" accesskey="u" rel="up">Modifying Hash Table Keys</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Visible-Modification-of-Hash-Tables-with-respect-to-EQUALP-1"><span>18.1.2.8 Visible Modification of Hash Tables with respect to EQUALP<a class="copiable-link" href="#Visible-Modification-of-Hash-Tables-with-respect-to-EQUALP-1"> &para;</a></span></h4>
+
+<p>In a <i class="i">hash table</i>, any visible change
+     to the count of entries in the <i class="i">hash table</i>,
+     to the keys,
+  or to the values associated with the keys
+is considered a visible modification with regard to <b class="b">equalp</b>.
+</p>
+<p>Note that the visibility of modifications to the keys depends on the equivalence test
+of the <i class="i">hash table</i>, not on the specification of <b class="b">equalp</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Visible-Modification-of-Objects-with-respect-to-EQ-and-EQL.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Visible Modification of Objects with respect to EQ and EQL (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Visible Modification of Objects with respect to EQ and EQL (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Visible Modification of Objects with respect to EQ and EQL (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Modifying-Hash-Table-Keys.html" rel="up" title="Modifying Hash Table Keys">
+<link href="Visible-Modification-of-Objects-with-respect-to-EQUAL.html" rel="next" title="Visible Modification of Objects with respect to EQUAL">
+<link href="Modifying-Hash-Table-Keys.html" rel="prev" title="Modifying Hash Table Keys">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Visible-Modification-of-Objects-with-respect-to-EQ-and-EQL">
+<div class="nav-panel">
+<p>
+Next: <a href="Visible-Modification-of-Objects-with-respect-to-EQUAL.html" accesskey="n" rel="next">Visible Modification of Objects with respect to EQUAL</a>, Previous: <a href="Modifying-Hash-Table-Keys.html" accesskey="p" rel="prev">Modifying Hash Table Keys</a>, Up: <a href="Modifying-Hash-Table-Keys.html" accesskey="u" rel="up">Modifying Hash Table Keys</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Visible-Modification-of-Objects-with-respect-to-EQ-and-EQL-1"><span>18.1.2.1 Visible Modification of Objects with respect to EQ and EQL<a class="copiable-link" href="#Visible-Modification-of-Objects-with-respect-to-EQ-and-EQL-1"> &para;</a></span></h4>
+
+<p>No <i class="i">standardized</i> <i class="i">function</i> is provided that is capable of visibly
+modifying an <i class="i">object</i> with regard to <b class="b">eq</b> or <b class="b">eql</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Visible-Modification-of-Objects-with-respect-to-EQUAL.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Visible Modification of Objects with respect to EQUAL (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Visible Modification of Objects with respect to EQUAL (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Visible Modification of Objects with respect to EQUAL (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Modifying-Hash-Table-Keys.html" rel="up" title="Modifying Hash Table Keys">
+<link href="Visible-Modification-of-Conses-with-respect-to-EQUAL.html" rel="next" title="Visible Modification of Conses with respect to EQUAL">
+<link href="Visible-Modification-of-Objects-with-respect-to-EQ-and-EQL.html" rel="prev" title="Visible Modification of Objects with respect to EQ and EQL">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Visible-Modification-of-Objects-with-respect-to-EQUAL">
+<div class="nav-panel">
+<p>
+Next: <a href="Visible-Modification-of-Conses-with-respect-to-EQUAL.html" accesskey="n" rel="next">Visible Modification of Conses with respect to EQUAL</a>, Previous: <a href="Visible-Modification-of-Objects-with-respect-to-EQ-and-EQL.html" accesskey="p" rel="prev">Visible Modification of Objects with respect to EQ and EQL</a>, Up: <a href="Modifying-Hash-Table-Keys.html" accesskey="u" rel="up">Modifying Hash Table Keys</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Visible-Modification-of-Objects-with-respect-to-EQUAL-1"><span>18.1.2.2 Visible Modification of Objects with respect to EQUAL<a class="copiable-link" href="#Visible-Modification-of-Objects-with-respect-to-EQUAL-1"> &para;</a></span></h4>
+
+<p>As a consequence of the behavior for <b class="b">equal</b>,
+the rules for visible modification of <i class="i">objects</i> not explicitly mentioned in this
+section are inherited from those in <a class="ref" href="Visible-Modification-of-Objects-with-respect-to-EQ-and-EQL.html">Visible Modification of Objects with respect to EQ and EQL</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Visible-Modification-of-Objects-with-respect-to-EQUALP.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Visible Modification of Objects with respect to EQUALP (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Visible Modification of Objects with respect to EQUALP (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Visible Modification of Objects with respect to EQUALP (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Modifying-Hash-Table-Keys.html" rel="up" title="Modifying Hash Table Keys">
+<link href="Visible-Modification-of-Structures-with-respect-to-EQUALP.html" rel="next" title="Visible Modification of Structures with respect to EQUALP">
+<link href="Visible-Modification-of-Bit-Vectors-and-Strings-with-respect-to-EQUAL.html" rel="prev" title="Visible Modification of Bit Vectors and Strings with respect to EQUAL">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Visible-Modification-of-Objects-with-respect-to-EQUALP">
+<div class="nav-panel">
+<p>
+Next: <a href="Visible-Modification-of-Structures-with-respect-to-EQUALP.html" accesskey="n" rel="next">Visible Modification of Structures with respect to EQUALP</a>, Previous: <a href="Visible-Modification-of-Bit-Vectors-and-Strings-with-respect-to-EQUAL.html" accesskey="p" rel="prev">Visible Modification of Bit Vectors and Strings with respect to EQUAL</a>, Up: <a href="Modifying-Hash-Table-Keys.html" accesskey="u" rel="up">Modifying Hash Table Keys</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Visible-Modification-of-Objects-with-respect-to-EQUALP-1"><span>18.1.2.5 Visible Modification of Objects with respect to EQUALP<a class="copiable-link" href="#Visible-Modification-of-Objects-with-respect-to-EQUALP-1"> &para;</a></span></h4>
+
+<p>As a consequence of the behavior for <b class="b">equalp</b>,
+the rules for visible modification of <i class="i">objects</i> not explicitly mentioned in this
+section are inherited from those in <a class="ref" href="Visible-Modification-of-Objects-with-respect-to-EQUAL.html">Visible Modification of Objects with respect to EQUAL</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Visible-Modification-of-Structures-with-respect-to-EQUALP.html
@@ -0,0 +1,46 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Visible Modification of Structures with respect to EQUALP (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Visible Modification of Structures with respect to EQUALP (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Visible Modification of Structures with respect to EQUALP (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Modifying-Hash-Table-Keys.html" rel="up" title="Modifying Hash Table Keys">
+<link href="Visible-Modification-of-Arrays-with-respect-to-EQUALP.html" rel="next" title="Visible Modification of Arrays with respect to EQUALP">
+<link href="Visible-Modification-of-Objects-with-respect-to-EQUALP.html" rel="prev" title="Visible Modification of Objects with respect to EQUALP">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Visible-Modification-of-Structures-with-respect-to-EQUALP">
+<div class="nav-panel">
+<p>
+Next: <a href="Visible-Modification-of-Arrays-with-respect-to-EQUALP.html" accesskey="n" rel="next">Visible Modification of Arrays with respect to EQUALP</a>, Previous: <a href="Visible-Modification-of-Objects-with-respect-to-EQUALP.html" accesskey="p" rel="prev">Visible Modification of Objects with respect to EQUALP</a>, Up: <a href="Modifying-Hash-Table-Keys.html" accesskey="u" rel="up">Modifying Hash Table Keys</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Visible-Modification-of-Structures-with-respect-to-EQUALP-1"><span>18.1.2.6 Visible Modification of Structures with respect to EQUALP<a class="copiable-link" href="#Visible-Modification-of-Structures-with-respect-to-EQUALP-1"> &para;</a></span></h4>
+
+<p>Any visible change to a <i class="i">slot</i> of a <i class="i">structure</i>
+is considered a visible modification with regard to <b class="b">equalp</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Visible-Modifications-by-Language-Extensions.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Visible Modifications by Language Extensions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Visible Modifications by Language Extensions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Visible Modifications by Language Extensions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Modifying-Hash-Table-Keys.html" rel="up" title="Modifying Hash Table Keys">
+<link href="Visible-Modification-of-Hash-Tables-with-respect-to-EQUALP.html" rel="prev" title="Visible Modification of Hash Tables with respect to EQUALP">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Visible-Modifications-by-Language-Extensions">
+<div class="nav-panel">
+<p>
+Previous: <a href="Visible-Modification-of-Hash-Tables-with-respect-to-EQUALP.html" accesskey="p" rel="prev">Visible Modification of Hash Tables with respect to EQUALP</a>, Up: <a href="Modifying-Hash-Table-Keys.html" accesskey="u" rel="up">Modifying Hash Table Keys</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Visible-Modifications-by-Language-Extensions-1"><span>18.1.2.9 Visible Modifications by Language Extensions<a class="copiable-link" href="#Visible-Modifications-by-Language-Extensions-1"> &para;</a></span></h4>
+
+<p><i class="i">Implementations</i> that extend the language by providing additional mutator
+functions (or additional behavior for existing mutator functions) must
+document how the use of these extensions interacts with equivalence tests and
+<i class="i">hash table</i> searches.
+</p>
+<p><i class="i">Implementations</i> that extend the language by defining additional acceptable
+equivalence tests for <i class="i">hash tables</i> (allowing additional values for the <code class="t">:test</code>
+argument to <b class="b">make-hash-table</b>) must document the visible components of these
+tests.
+</p>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/When-Compiler-Macros-Are-Used.html
@@ -0,0 +1,85 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>When Compiler Macros Are Used (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="When Compiler Macros Are Used (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="When Compiler Macros Are Used (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Compilation-Semantics.html" rel="up" title="Compilation Semantics">
+<link href="Notes-about-the-Implementation-of-Compiler-Macros.html" rel="next" title="Notes about the Implementation of Compiler Macros">
+<link href="Naming-of-Compiler-Macros.html" rel="prev" title="Naming of Compiler Macros">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="When-Compiler-Macros-Are-Used">
+<div class="nav-panel">
+<p>
+Next: <a href="Notes-about-the-Implementation-of-Compiler-Macros.html" accesskey="n" rel="next">Notes about the Implementation of Compiler Macros</a>, Previous: <a href="Naming-of-Compiler-Macros.html" accesskey="p" rel="prev">Naming of Compiler Macros</a>, Up: <a href="Compilation-Semantics.html" accesskey="u" rel="up">Compilation Semantics</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="When-Compiler-Macros-Are-Used-1"><span>3.2.2.4 When Compiler Macros Are Used<a class="copiable-link" href="#When-Compiler-Macros-Are-Used-1"> &para;</a></span></h4>
+
+<p>The presence of a <i class="i">compiler macro</i> definition for a <i class="i">function</i> or <i class="i">macro</i>
+indicates that it is desirable for the <i class="i">compiler</i> to use the expansion
+of the <i class="i">compiler macro</i> instead of the original <i class="i">function form</i> or
+<i class="i">macro form</i>.  However, no language processor
+(compiler, evaluator, or other code walker) is ever required to actually
+invoke <i class="i">compiler macro functions</i>, or to 
+make use of the resulting expansion if it does invoke 
+a <i class="i">compiler macro function</i>.
+</p>
+<p>When the <i class="i">compiler</i> encounters a <i class="i">form</i> during processing that represents
+a call to a <i class="i">compiler macro</i> <i class="i">name</i> (that is not declared <b class="b">notinline</b>),
+the <i class="i">compiler</i> might expand the <i class="i">compiler macro</i>, 
+and might use the expansion in place of the original <i class="i">form</i>.
+</p>
+<p>When <b class="b">eval</b> encounters a <i class="i">form</i> during processing that represents 
+a call to a <i class="i">compiler macro</i> <i class="i">name</i> (that is not declared <b class="b">notinline</b>),
+<b class="b">eval</b> might expand the <i class="i">compiler macro</i>,
+and might use the expansion in place of the original <i class="i">form</i>.
+</p>
+<p>There are two situations in which a <i class="i">compiler macro</i> definition must not be
+applied by any language processor:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The global function name binding associated with the compiler
+ macro is shadowed by a lexical binding of the function name.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The function name has been declared or proclaimed <b class="b">notinline</b> and
+ the call form appears within the scope of the declaration.
+</p></dd>
+</dl>
+
+<p>It is unspecified whether <i class="i">compiler macros</i> are expanded or used in any other
+situations.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Notes-about-the-Implementation-of-Compiler-Macros.html">Notes about the Implementation of Compiler Macros</a>, Previous: <a href="Naming-of-Compiler-Macros.html">Naming of Compiler Macros</a>, Up: <a href="Compilation-Semantics.html">Compilation Semantics</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Whitespace-Characters.html
@@ -0,0 +1,48 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Whitespace Characters (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Whitespace Characters (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Whitespace Characters (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Character-Syntax-Types.html" rel="up" title="Character Syntax Types">
+<link href="Examples-of-Whitespace-Characters.html" rel="next" title="Examples of Whitespace Characters">
+<link href="Examples-of-Single-Escape-Characters.html" rel="prev" title="Examples of Single Escape Characters">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Whitespace-Characters">
+<div class="nav-panel">
+<p>
+Next: <a href="Examples-of-Whitespace-Characters.html" accesskey="n" rel="next">Examples of Whitespace Characters</a>, Previous: <a href="Examples-of-Single-Escape-Characters.html" accesskey="p" rel="prev">Examples of Single Escape Characters</a>, Up: <a href="Character-Syntax-Types.html" accesskey="u" rel="up">Character Syntax Types</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Whitespace-Characters-1"><span>2.1.4.9 Whitespace Characters<a class="copiable-link" href="#Whitespace-Characters-1"> &para;</a></span></h4>
+
+<p><i class="i">Whitespace</i>_2 <i class="i">characters</i> are used to separate <i class="i">tokens</i>.
+</p>
+<p><i class="i">Space</i> and <i class="i">newline</i> are <i class="i">whitespace</i>_2 <i class="i">characters</i>
+in <i class="i">standard syntax</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/Wildcard-Words-in-a-Logical-Pathname-Namestring.html
@@ -0,0 +1,47 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Wildcard Words in a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Wildcard Words in a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Wildcard Words in a Logical Pathname Namestring (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Syntax-of-Logical-Pathname-Namestrings.html" rel="up" title="Syntax of Logical Pathname Namestrings">
+<link href="Lowercase-Letters-in-a-Logical-Pathname-Namestring.html" rel="next" title="Lowercase Letters in a Logical Pathname Namestring">
+<link href="The-Version-part-of-a-Logical-Pathname-Namestring.html" rel="prev" title="The Version part of a Logical Pathname Namestring">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="Wildcard-Words-in-a-Logical-Pathname-Namestring">
+<div class="nav-panel">
+<p>
+Next: <a href="Lowercase-Letters-in-a-Logical-Pathname-Namestring.html" accesskey="n" rel="next">Lowercase Letters in a Logical Pathname Namestring</a>, Previous: <a href="The-Version-part-of-a-Logical-Pathname-Namestring.html" accesskey="p" rel="prev">The Version part of a Logical Pathname Namestring</a>, Up: <a href="Syntax-of-Logical-Pathname-Namestrings.html" accesskey="u" rel="up">Syntax of Logical Pathname Namestrings</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="Wildcard-Words-in-a-Logical-Pathname-Namestring-1"><span>19.3.1.7 Wildcard Words in a Logical Pathname Namestring<a class="copiable-link" href="#Wildcard-Words-in-a-Logical-Pathname-Namestring-1"> &para;</a></span></h4>
+
+<p>Each <i class="i">asterisk</i> in a <i class="i">wildcard-word</i> matches a sequence of 
+zero or more characters.  The <i class="i">wildcard-word</i> &ldquo;<code class="t">*</code>&rdquo; 
+parses into <code class="t">:wild</code>; other <i class="i">wildcard-words</i> parse into <i class="i">strings</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002a-_0028Variable_0029.html
@@ -0,0 +1,110 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>* (Variable) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="* (Variable) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="* (Variable) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="_002f-_0028Variable_0029.html" rel="next" title="/ (Variable)">
+<link href="_002b-_0028Variable_0029.html" rel="prev" title="+ (Variable)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002a-_0028Variable_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="_002f-_0028Variable_0029.html" accesskey="n" rel="next">/, //, ///                                                       [Variable]</a>, Previous: <a href="_002b-_0028Variable_0029.html" accesskey="p" rel="prev">+, ++, +++                                                       [Variable]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002a_002c-_002a_002a_002c-_002a_002a_002a-_005bVariable_005d"><span>25.2.22 *, **, ***                                                       [Variable]<a class="copiable-link" href="#g_t_002a_002c-_002a_002a_002c-_002a_002a_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-35"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-35"> &para;</a></span></h4>
+
+<p>an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-35"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-35"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-670"><span>Description::<a class="copiable-link" href="#Description_003a_003a-670"> &para;</a></span></h4>
+
+<p>The <i class="i">variables</i> <b class="b">*</b>, <b class="b">**</b>, and <b class="b">***</b> are 
+maintained by the <i class="i">Lisp read-eval-print loop</i> to save the 
+values of results that are printed each time through the loop.
+</p>
+<p>The <i class="i">value</i> of <b class="b">*</b>   is the most recent <i class="i">primary value</i> that was printed,
+the <i class="i">value</i> of <b class="b">**</b>  is the previous value of <b class="b">*</b>, and 
+the <i class="i">value</i> of <b class="b">***</b> is the previous value of <b class="b">**</b>.
+</p>
+<p>If several values are produced, <b class="b">*</b> contains the first value only;
+<b class="b">*</b> contains <b class="b">nil</b> if zero values are produced.
+</p>
+<p>The <i class="i">values</i> of <b class="b">*</b>, <b class="b">**</b>, and <b class="b">***</b> are updated immediately
+prior to printing the <i class="i">return value</i> of a top-level <i class="i">form</i> by the
+<i class="i">Lisp read-eval-print loop</i>.  If the <i class="i">evaluation</i> of such a <i class="i">form</i>
+is aborted prior to its normal return, the values of <b class="b">*</b>, <b class="b">**</b>, and <b class="b">***</b> 
+are not updated.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-470"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-470"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted">(values 'a1 'a2) &rArr;  A1, A2
+'b &rArr;  B
+(values 'c1 'c2 'c3) &rArr;  C1, C2, C3
+(list * ** ***) &rArr;  (C1 B A1)
+
+(defun cube-root (x) (expt x 1/3)) &rArr;  CUBE-ROOT
+(compile *) &rArr;  CUBE-ROOT
+(setq a (cube-root 27.0)) &rArr;  3.0
+(* * 9.0) &rArr;  27.0
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-134"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-134"> &para;</a></span></h4>
+
+<p><i class="i">Lisp read-eval-print loop</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-545"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-545"> &para;</a></span></h4>
+
+<p><a class="ref" href="_002d.html">-                                                              [Function]</a>
+ (<i class="i">variable</i>),
+<b class="b">+</b> (<i class="i">variable</i>),
+<a class="ref" href="_002f.html">/                                                                [Function]</a>
+ (<i class="i">variable</i>), 
+<a class="ref" href="Top-level-loop.html">Top level loop</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-335"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-335"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> *   &equiv; (car /)
+ **  &equiv; (car //)
+ *** &equiv; (car ///)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002f-_0028Variable_0029.html">/, //, ///                                                       [Variable]</a>, Previous: <a href="_002b-_0028Variable_0029.html">+, ++, +++                                                       [Variable]</a>, Up: <a href="Environment-Dictionary.html">Environment Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002a.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="_002b.html" rel="next" title="+">
+<link href="sinh.html" rel="prev" title="sinh">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002b.html" accesskey="n" rel="next">+                                                                [Function]</a>, Previous: <a href="sinh.html" accesskey="p" rel="prev">sinh, cosh, tanh, asinh, acosh, atanh                            [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002a-_005bFunction_005d"><span>12.2.24 *                                                                [Function]<a class="copiable-link" href="#g_t_002a-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">*</code>  <i class="i"><span class="r">&amp;rest</span> numbers</i> &rArr;  <i class="i">product</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-209"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-209"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">product</i>&mdash;a <i class="i">number</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-289"><span>Description::<a class="copiable-link" href="#Description_003a_003a-289"> &para;</a></span></h4>
+
+<p>Returns the product of <i class="i">numbers</i>,
+performing any necessary type conversions in the process.
+If no <i class="i">numbers</i> are supplied, <code class="t">1</code> is returned.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-193"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-193"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (*) &rArr;  1
+ (* 3 5) &rArr;  15
+ (* 1.0 #c(22 33) 55/98) &rArr;  #C(12.346938775510203 18.520408163265305)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-84"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-84"> &para;</a></span></h4>
+
+<p>Might signal <b class="b">type-error</b> if some <i class="i">argument</i> is not a <i class="i">number</i>.
+Might signal <b class="b">arithmetic-error</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-243"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-243"> &para;</a></span></h4>
+
+<p><a class="ref" href="Numeric-Operations.html">Numeric Operations</a>,
+<a class="ref" href="Rational-Computations.html">Rational Computations</a>,
+<a class="ref" href="Floating_002dpoint-Computations.html">Floating-point Computations</a>,
+<a class="ref" href="Complex-Computations.html">Complex Computations</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002abreak_002don_002dsignals_002a.html
@@ -0,0 +1,131 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*break-on-signals* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*break-on-signals* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*break-on-signals* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="handler_002dbind.html" rel="next" title="handler-bind">
+<link href="_002adebugger_002dhook_002a.html" rel="prev" title="*debugger-hook*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002abreak_002don_002dsignals_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="handler_002dbind.html" accesskey="n" rel="next">handler-bind                                                        [Macro]</a>, Previous: <a href="_002adebugger_002dhook_002a.html" accesskey="p" rel="prev">*debugger-hook*                                                  [Variable]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002abreak_002don_002dsignals_002a-_005bVariable_005d"><span>9.2.25 *break-on-signals*                                               [Variable]<a class="copiable-link" href="#g_t_002abreak_002don_002dsignals_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-2"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-2"> &para;</a></span></h4>
+
+<p>a <i class="i">type specifier</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-2"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-2"> &para;</a></span></h4>
+
+<p><b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-195"><span>Description::<a class="copiable-link" href="#Description_003a_003a-195"> &para;</a></span></h4>
+
+<p>When <code class="t">(typep <i class="i">condition</i> *break-on-signals*)</code> returns <i class="i">true</i>,
+calls to <b class="b">signal</b>, and to other <i class="i">operators</i> such as <b class="b">error</b>
+that implicitly call <b class="b">signal</b>, enter the debugger prior to
+<i class="i">signaling</i> the <i class="i">condition</i>.
+</p>
+<p>The <b class="b">continue</b> <i class="i">restart</i> can be used to continue with the normal
+<i class="i">signaling</i> process when a break occurs process due to
+<b class="b">*break-on-signals*</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-124"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-124"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> *break-on-signals* &rArr;  NIL
+ (ignore-errors (error 'simple-error :format-control &quot;Fooey!&quot;))
+&rArr;  NIL, #&lt;SIMPLE-ERROR 32207172&gt;
+
+ (let ((*break-on-signals* 'error))
+   (ignore-errors (error 'simple-error :format-control &quot;Fooey!&quot;)))
+<code class="t"> |&gt; </code> Break: Fooey!
+<code class="t"> |&gt; </code> BREAK entered because of *BREAK-ON-SIGNALS*.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Continue to signal.
+<code class="t"> |&gt; </code>  2: Top level.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:CONTINUE 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Continue to signal.
+&rArr;  NIL, #&lt;SIMPLE-ERROR 32212257&gt;
+
+ (let ((*break-on-signals* 'error))
+   (error 'simple-error :format-control &quot;Fooey!&quot;))
+<code class="t"> |&gt; </code> Break: Fooey!
+<code class="t"> |&gt; </code> BREAK entered because of *BREAK-ON-SIGNALS*.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Continue to signal.
+<code class="t"> |&gt; </code>  2: Top level.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:CONTINUE 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Continue to signal.
+<code class="t"> |&gt; </code> Error: Fooey!
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Top level.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:CONTINUE 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Top level.
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-170"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-170"> &para;</a></span></h4>
+
+<p><a class="ref" href="break.html">break                                                            [Function]</a>
+,
+<a class="ref" href="signal.html">signal                                                           [Function]</a>
+, 
+<a class="ref" href="warn.html">warn                                                             [Function]</a>
+, 
+<a class="ref" href="error.html">error                                                            [Function]</a>
+, 
+<a class="ref" href="typep.html">typep                                                            [Function]</a>
+, 
+<a class="ref" href="Condition-System-Concepts.html">Condition System Concepts</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-104"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-104"> &para;</a></span></h4>
+
+<p><b class="b">*break-on-signals*</b> is intended primarily for use in debugging code that
+does signaling.   When setting <b class="b">*break-on-signals*</b>, the user is
+encouraged to choose the most restrictive specification that suffices.
+Setting <b class="b">*break-on-signals*</b> effectively violates the modular handling of 
+<i class="i">condition</i> signaling.  In practice, the complete effect of setting
+<b class="b">*break-on-signals*</b> might be unpredictable in some cases since the user
+might not be aware of the variety or number of calls to <b class="b">signal</b> 
+that are used in code called only incidentally.
+</p>
+<p><b class="b">*break-on-signals*</b> enables an early entry to the debugger but such an
+entry does not preclude an additional entry to the debugger in the case of
+operations such as <b class="b">error</b> and <b class="b">cerror</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="handler_002dbind.html">handler-bind                                                        [Macro]</a>, Previous: <a href="_002adebugger_002dhook_002a.html">*debugger-hook*                                                  [Variable]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002acompile_002dfile_002dpathname_002a.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*compile-file-pathname* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*compile-file-pathname* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*compile-file-pathname* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="System-Construction-Dictionary.html" rel="up" title="System Construction Dictionary">
+<link href="_002aload_002dpathname_002a.html" rel="next" title="*load-pathname*">
+<link href="_002afeatures_002a.html" rel="prev" title="*features*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002acompile_002dfile_002dpathname_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aload_002dpathname_002a.html" accesskey="n" rel="next">*load-pathname*, *load-truename*                                 [Variable]</a>, Previous: <a href="_002afeatures_002a.html" accesskey="p" rel="prev">*features*                                                       [Variable]</a>, Up: <a href="System-Construction-Dictionary.html" accesskey="u" rel="up">System Construction Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002acompile_002dfile_002dpathname_002a_002c-_002acompile_002dfile_002dtruename_002a-_005bVariable_005d"><span>24.2.6 *compile-file-pathname*, *compile-file-truename*                 [Variable]<a class="copiable-link" href="#g_t_002acompile_002dfile_002dpathname_002a_002c-_002acompile_002dfile_002dtruename_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-28"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-28"> &para;</a></span></h4>
+
+<p>The <i class="i">value</i> of <b class="b">*compile-file-pathname*</b> must always be a <i class="i">pathname</i>          or <b class="b">nil</b>.
+The <i class="i">value</i> of <b class="b">*compile-file-truename*</b> must always be a <i class="i">physical pathname</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-28"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-28"> &para;</a></span></h4>
+
+<p><b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-643"><span>Description::<a class="copiable-link" href="#Description_003a_003a-643"> &para;</a></span></h4>
+
+<p>During a call to <b class="b">compile-file</b>,
+  <b class="b">*compile-file-pathname*</b> is <i class="i">bound</i> to 
+  the <i class="i">pathname</i> denoted by the first argument to <b class="b">compile-file</b>,
+  merged against the defaults;
+  that is, it is <i class="i">bound</i> to <code class="t">(pathname (merge-pathnames <i class="i">input-file</i>))</code>.
+During the same time interval,
+  <b class="b">*compile-file-truename*</b> is <i class="i">bound</i> to
+  the <i class="i">truename</i> of the <i class="i">file</i> being <i class="i">compiled</i>.
+</p>
+<p>At other times, the <i class="i">value</i> of these <i class="i">variables</i> is <b class="b">nil</b>.
+</p>
+<p>If a <i class="i">break loop</i> is entered while <b class="b">compile-file</b> is ongoing,
+it is <i class="i">implementation-dependent</i> whether these <i class="i">variables</i> retain 
+the <i class="i">values</i> they had just prior to entering the <i class="i">break loop</i> 
+or whether they are <i class="i">bound</i> to <b class="b">nil</b>.
+</p>
+<p>The consequences are unspecified if 
+an attempt is made to <i class="i">assign</i> or <i class="i">bind</i> either of these <i class="i">variables</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-115"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-115"> &para;</a></span></h4>
+
+<p>The <i class="i">file system</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-523"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-523"> &para;</a></span></h4>
+
+<p><a class="ref" href="compile_002dfile.html">compile-file                                                     [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002acompile_002dprint_002a.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*compile-print* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*compile-print* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*compile-print* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="System-Construction-Dictionary.html" rel="up" title="System Construction Dictionary">
+<link href="_002aload_002dprint_002a.html" rel="next" title="*load-print*">
+<link href="_002aload_002dpathname_002a.html" rel="prev" title="*load-pathname*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002acompile_002dprint_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aload_002dprint_002a.html" accesskey="n" rel="next">*load-print*, *load-verbose*                                     [Variable]</a>, Previous: <a href="_002aload_002dpathname_002a.html" accesskey="p" rel="prev">*load-pathname*, *load-truename*                                 [Variable]</a>, Up: <a href="System-Construction-Dictionary.html" accesskey="u" rel="up">System Construction Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002acompile_002dprint_002a_002c-_002acompile_002dverbose_002a-_005bVariable_005d"><span>24.2.8 *compile-print*, *compile-verbose*                               [Variable]<a class="copiable-link" href="#g_t_002acompile_002dprint_002a_002c-_002acompile_002dverbose_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-30"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-30"> &para;</a></span></h4>
+
+<p>a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-30"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-30"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-645"><span>Description::<a class="copiable-link" href="#Description_003a_003a-645"> &para;</a></span></h4>
+
+<p>The <i class="i">value</i> of <b class="b">*compile-print*</b>   is the default value of the <code class="t">:print</code> <i class="i">argument</i>
+to <b class="b">compile-file</b>.
+The <i class="i">value</i> of <b class="b">*compile-verbose*</b> is the default value of the <code class="t">:verbose</code> <i class="i">argument</i>
+to <b class="b">compile-file</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-525"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-525"> &para;</a></span></h4>
+
+<p><a class="ref" href="compile_002dfile.html">compile-file                                                     [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002adebug_002dio_002a.html
@@ -0,0 +1,190 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*debug-io* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*debug-io* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*debug-io* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="_002aterminal_002dio_002a.html" rel="next" title="*terminal-io*">
+<link href="with_002doutput_002dto_002dstring.html" rel="prev" title="with-output-to-string">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002adebug_002dio_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aterminal_002dio_002a.html" accesskey="n" rel="next">*terminal-io*                                                    [Variable]</a>, Previous: <a href="with_002doutput_002dto_002dstring.html" accesskey="p" rel="prev">with-output-to-string                                               [Macro]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002adebug_002dio_002a_002c-_002aerror_002doutput_002a_002c-_002aquery_002dio_002a_002c"><span>21.2.53 *debug-io*, *error-output*, *query-io*,<a class="copiable-link" href="#g_t_002adebug_002dio_002a_002c-_002aerror_002doutput_002a_002c-_002aquery_002dio_002a_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="g_t_002astandard_002dinput_002a_002c-_002astandard_002doutput_002a_002c"><span>*standard-input*, *standard-output*,<a class="copiable-link" href="#g_t_002astandard_002dinput_002a_002c-_002astandard_002doutput_002a_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="g_t_002atrace_002doutput_002a"><span>*trace-output*<a class="copiable-link" href="#g_t_002atrace_002doutput_002a"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Variable]</i>
+</p></div>
+<h4 class="subsubheading" id="Value-Type_003a_003a-7"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-7"> &para;</a></span></h4>
+
+<p>For <b class="b">*standard-input*</b>:
+ an <i class="i">input</i> <i class="i">stream</i>
+</p>
+<p>For <b class="b">*error-output*</b>, <b class="b">*standard-output*</b>, and <b class="b">*trace-output*</b>:
+ an <i class="i">output</i> <i class="i">stream</i>.
+</p>
+<p>For <b class="b">*debug-io*</b>, <b class="b">*query-io*</b>:
+ a <i class="i">bidirectional</i> <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-7"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-7"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>, but
+it must be an <i class="i">open</i> <i class="i">stream</i> 
+that is not a  <i class="i">generalized synonym stream</i>
+to an <i class="i">I/O customization variables</i>
+but that might be a <i class="i">generalized synonym stream</i> to 
+the value of some <i class="i">I/O customization variable</i>.
+The initial value might also be a <i class="i">generalized synonym stream</i> 
+to either the <i class="i">symbol</i> <b class="b">*terminal-io*</b> or to the <i class="i">stream</i> 
+that is its <i class="i">value</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-584"><span>Description::<a class="copiable-link" href="#Description_003a_003a-584"> &para;</a></span></h4>
+
+<p>These <i class="i">variables</i> are collectively called the
+<i class="i">standardized</i> <i class="i">I/O customization variables</i>.
+They can be <i class="i">bound</i> or <i class="i">assigned</i> in order to 
+change the default destinations for input and/or output 
+used by various <i class="i">standardized</i> <i class="i">operators</i> and facilities.
+</p>
+<p>The <i class="i">value</i> of <b class="b">*debug-io*</b>, called <i class="i">debug I/O</i>,
+is a <i class="i">stream</i> to be used for interactive debugging purposes.  
+</p>
+<p>The <i class="i">value</i> of <b class="b">*error-output*</b>, called <i class="i">error output</i>,
+is a <i class="i">stream</i> to which warnings and non-interactive error messages should be sent.
+</p>
+<p>The <i class="i">value</i> of <b class="b">*query-io*</b>, called <i class="i">query I/O</i>,
+is a <i class="i">bidirectional</i> <i class="i">stream</i> 
+to be used when asking questions of the user.  The question should be output 
+to this <i class="i">stream</i>, and the answer read from it.
+</p>
+<p>The <i class="i">value</i> of <b class="b">*standard-input*</b>, called <i class="i">standard input</i>,
+is a <i class="i">stream</i> that is used by many <i class="i">operators</i> 
+as a default source of input when no specific <i class="i">input</i> <i class="i">stream</i>
+is explicitly supplied.
+</p>
+<p>The <i class="i">value</i> of <b class="b">*standard-output*</b>, called <i class="i">standard output</i>,
+is a <i class="i">stream</i> that is used by many <i class="i">operators</i> 
+as a default destination for output when no specific <i class="i">output</i> <i class="i">stream</i>
+is explicitly supplied.
+</p>
+<p>The <i class="i">value</i> of <b class="b">*trace-output*</b>, called <i class="i">trace output</i>,
+is the <i class="i">stream</i> on which traced functions (see <b class="b">trace</b>)
+and the <b class="b">time</b> <i class="i">macro</i> print their output.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-425"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-425"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (with-output-to-string (*error-output*)
+   (warn &quot;this string is sent to *error-output*&quot;))
+ &rArr;  &quot;Warning: this string is sent to *error-output*
+&quot; ;The exact format of this string is <i class="i">implementation-dependent</i>.
+
+ (with-input-from-string (*standard-input* &quot;1001&quot;)
+    (+ 990 (read))) &rArr;  1991                       
+
+ (progn (setq out (with-output-to-string (*standard-output*)
+                     (print &quot;print and format t send things to&quot;)
+                     (format t &quot;*standard-output* now going to a string&quot;)))
+        :done)
+&rArr;  :DONE
+ out
+&rArr;  &quot;
+\&quot;print and format t send things to\&quot; *standard-output* now going to a string&quot;
+
+ (defun fact (n) (if (&lt; n 2) 1 (* n (fact (- n 1)))))
+&rArr;  FACT
+ (trace fact)
+&rArr;  (FACT)
+;; Of course, the format of traced output is implementation-dependent.
+ (with-output-to-string (*trace-output*)
+   (fact 3)) 
+&rArr;  &quot;
+1 Enter FACT 3
+| 2 Enter FACT 2
+|   3 Enter FACT 1
+|   3 Exit FACT 1
+| 2 Exit FACT 2
+1 Exit FACT 6&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-475"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-475"> &para;</a></span></h4>
+
+<p><b class="b">*terminal-io*</b>,
+<b class="b">synonym-stream</b>,
+<a class="ref" href="Time.html">Time</a>
+,
+<a class="ref" href="trace.html">trace, untrace                                                      [Macro]</a>
+,
+<a class="ref" href="Conditions.html">Conditions</a>,
+<a class="ref" href="Reader.html">Reader</a>,
+<a class="ref" href="Printer.html">Printer</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-297"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-297"> &para;</a></span></h4>
+
+<p>The intent of the constraints on the initial <i class="i">value</i> 
+of the <i class="i">I/O customization variables</i> is to ensure that it
+is always safe to <i class="i">bind</i> or <i class="i">assign</i> such a <i class="i">variable</i> to 
+the <i class="i">value</i> of another <i class="i">I/O customization variable</i>, without
+unduly restricting <i class="i">implementation</i> flexibility.
+</p>
+<p>It is common for an <i class="i">implementation</i> to make
+the initial <i class="i">values</i> of <b class="b">*debug-io*</b> and <b class="b">*query-io*</b> 
+be the <i class="i">same</i> <i class="i">stream</i>, 
+and to make
+the initial <i class="i">values</i> of <b class="b">*error-output*</b> and <b class="b">*standard-output*</b> 
+be the <i class="i">same</i> <i class="i">stream</i>.
+</p>
+<p>The functions <b class="b">y-or-n-p</b> and <b class="b">yes-or-no-p</b> use <i class="i">query I/O</i>
+for their input and output.
+</p>
+<p>In the normal <i class="i">Lisp read-eval-print loop</i>,
+input is read from <i class="i">standard input</i>.
+Many input functions, including <b class="b">read</b> and <b class="b">read-char</b>,
+take a <i class="i">stream</i> argument that defaults to <i class="i">standard input</i>.
+</p>
+<p>In the normal <i class="i">Lisp read-eval-print loop</i>, output is sent to <i class="i">standard output</i>.
+Many output functions, including <b class="b">print</b> and <b class="b">write-char</b>, 
+take a <i class="i">stream</i> argument that defaults to <i class="i">standard output</i>.
+</p>
+<p>A program that wants, for example, to divert output to a file should do so by 
+<i class="i">binding</i> <b class="b">*standard-output*</b>; that way error messages sent to
+<b class="b">*error-output*</b> can still get to the user by going through
+<b class="b">*terminal-io*</b> (if <b class="b">*error-output*</b> is bound to <b class="b">*terminal-io*</b>),
+which is usually what is desired.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002aterminal_002dio_002a.html">*terminal-io*                                                    [Variable]</a>, Previous: <a href="with_002doutput_002dto_002dstring.html">with-output-to-string                                               [Macro]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002adebugger_002dhook_002a.html
@@ -0,0 +1,120 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*debugger-hook* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*debugger-hook* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*debugger-hook* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="_002abreak_002don_002dsignals_002a.html" rel="next" title="*break-on-signals*">
+<link href="break.html" rel="prev" title="break">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002adebugger_002dhook_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002abreak_002don_002dsignals_002a.html" accesskey="n" rel="next">*break-on-signals*                                               [Variable]</a>, Previous: <a href="break.html" accesskey="p" rel="prev">break                                                            [Function]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002adebugger_002dhook_002a-_005bVariable_005d"><span>9.2.24 *debugger-hook*                                                  [Variable]<a class="copiable-link" href="#g_t_002adebugger_002dhook_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-1"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-1"> &para;</a></span></h4>
+
+<p>a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  (a <i class="i">condition</i> and the <i class="i">value</i> of <b class="b">*debugger-hook*</b> at the time 
+   the debugger was entered),
+or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-1"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-1"> &para;</a></span></h4>
+
+<p><b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-194"><span>Description::<a class="copiable-link" href="#Description_003a_003a-194"> &para;</a></span></h4>
+
+<p>When the <i class="i">value</i> of <b class="b">*debugger-hook*</b> is <i class="i">non-nil</i>, it is called prior to
+normal entry into the debugger, either due to a call to <b class="b">invoke-debugger</b> 
+or due to automatic entry into the debugger from a call to <b class="b">error</b> 
+or <b class="b">cerror</b> with a condition that is not handled.  
+The <i class="i">function</i> may either handle the <i class="i">condition</i>
+(transfer control) or return normally (allowing the standard debugger to run).
+To minimize recursive errors while debugging,
+<b class="b">*debugger-hook*</b> is bound to <b class="b">nil</b> by <b class="b">invoke-debugger</b> 
+prior to calling the <i class="i">function</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-123"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-123"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun one-of (choices &amp;optional (prompt &quot;Choice&quot;))
+   (let ((n (length choices)) (i))
+     (do ((c choices (cdr c)) (i 1 (+ i 1)))
+         ((null c))
+       (format t &quot;~&amp;[~D] ~A~
+     (do () ((typep i `(integer 1 ,n)))
+       (format t &quot;~&amp;~A: &quot; prompt)
+       (setq i (read))
+       (fresh-line))
+     (nth (- i 1) choices)))
+
+ (defun my-debugger (condition me-or-my-encapsulation)
+   (format t &quot;~&amp;Fooey: ~A&quot; condition)
+   (let ((restart (one-of (compute-restarts))))
+     (if (not restart) (error &quot;My debugger got an error.&quot;))
+     (let ((*debugger-hook* me-or-my-encapsulation))
+       (invoke-restart-interactively restart))))
+
+ (let ((*debugger-hook* #'my-debugger))
+   (+ 3 'a))
+<code class="t"> |&gt; </code> Fooey: The argument to +, A, is not a number.
+<code class="t"> |&gt; </code>  [1] Supply a replacement for A.
+<code class="t"> |&gt; </code>  [2] Return to Cloe Toplevel.
+<code class="t"> |&gt; </code> Choice: 1
+<code class="t"> |&gt; </code>  Form to evaluate and use: (+ 5 'b)
+<code class="t"> |&gt; </code>  Fooey: The argument to +, B, is not a number.
+<code class="t"> |&gt; </code>  [1] Supply a replacement for B.
+<code class="t"> |&gt; </code>  [2] Supply a replacement for A.
+<code class="t"> |&gt; </code>  [3] Return to Cloe Toplevel.
+<code class="t"> |&gt; </code> Choice: 1
+<code class="t"> |&gt; </code>  Form to evaluate and use: 1
+&rArr;  9
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-28"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-28"> &para;</a></span></h4>
+
+<p><b class="b">invoke-debugger</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-103"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-103"> &para;</a></span></h4>
+
+<p>When evaluating code typed in by the user interactively, it is sometimes
+useful to have the hook function bind <b class="b">*debugger-hook*</b> to the
+<i class="i">function</i> that was its second argument so that recursive errors
+can be handled using the same interactive facility.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002abreak_002don_002dsignals_002a.html">*break-on-signals*                                               [Variable]</a>, Previous: <a href="break.html">break                                                            [Function]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002adefault_002dpathname_002ddefaults_002a.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*default-pathname-defaults* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*default-pathname-defaults* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*default-pathname-defaults* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="namestring.html" rel="next" title="namestring">
+<link href="logical_002dpathname.html" rel="prev" title="logical-pathname">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002adefault_002dpathname_002ddefaults_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="namestring.html" accesskey="n" rel="next">namestring, file-namestring, directory-namestring,</a>, Previous: <a href="logical_002dpathname.html" accesskey="p" rel="prev">logical-pathname                                                 [Function]</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002adefault_002dpathname_002ddefaults_002a-_005bVariable_005d"><span>19.4.10 *default-pathname-defaults*                                      [Variable]<a class="copiable-link" href="#g_t_002adefault_002dpathname_002ddefaults_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-6"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-6"> &para;</a></span></h4>
+
+<p>a <i class="i">pathname</i> <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-6"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-6"> &para;</a></span></h4>
+
+<p>An <i class="i">implementation-dependent</i> <i class="i">pathname</i>, 
+typically in the working directory that was current when <span class="r">Common Lisp</span> was started up.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-514"><span>Description::<a class="copiable-link" href="#Description_003a_003a-514"> &para;</a></span></h4>
+
+<p>a <i class="i">pathname</i>, used as the default whenever a <i class="i">function</i>
+needs a default <i class="i">pathname</i> and one is not supplied.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-375"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-375"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> ;; This example illustrates a possible usage for a hypothetical Lisp running on a
+ ;; DEC TOPS-20 file system.  Since pathname conventions vary between Lisp 
+ ;; implementations and host file system types, it is not possible to provide a
+ ;; general-purpose, conforming example.
+ *default-pathname-defaults* &rArr;  #P&quot;PS:&lt;FRED&gt;&quot;
+ (merge-pathnames (make-pathname :name &quot;CALENDAR&quot;))
+&rArr;  #P&quot;PS:&lt;FRED&gt;CALENDAR&quot;
+ (let ((*default-pathname-defaults* (pathname &quot;&lt;MARY&gt;&quot;)))
+   (merge-pathnames (make-pathname :name &quot;CALENDAR&quot;)))
+&rArr;  #P&quot;&lt;MARY&gt;CALENDAR&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-74"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-74"> &para;</a></span></h4>
+
+<p>The <i class="i">implementation</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002afeatures_002a.html
@@ -0,0 +1,179 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*features* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*features* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*features* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="System-Construction-Dictionary.html" rel="up" title="System Construction Dictionary">
+<link href="_002acompile_002dfile_002dpathname_002a.html" rel="next" title="*compile-file-pathname*">
+<link href="with_002dcompilation_002dunit.html" rel="prev" title="with-compilation-unit">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002afeatures_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002acompile_002dfile_002dpathname_002a.html" accesskey="n" rel="next">*compile-file-pathname*, *compile-file-truename*                 [Variable]</a>, Previous: <a href="with_002dcompilation_002dunit.html" accesskey="p" rel="prev">with-compilation-unit                                               [Macro]</a>, Up: <a href="System-Construction-Dictionary.html" accesskey="u" rel="up">System Construction Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002afeatures_002a-_005bVariable_005d"><span>24.2.5 *features*                                                       [Variable]<a class="copiable-link" href="#g_t_002afeatures_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-27"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-27"> &para;</a></span></h4>
+
+<p>a <i class="i">proper list</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-27"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-27"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-642"><span>Description::<a class="copiable-link" href="#Description_003a_003a-642"> &para;</a></span></h4>
+
+<p>The <i class="i">value</i> of <b class="b">*features*</b> is called the <i class="i">features list</i>.  
+It is a <i class="i">list</i> of <i class="i">symbols</i>, called <i class="i">features</i>, 
+that correspond to some aspect of the <i class="i">implementation</i> or <i class="i">environment</i>.
+</p>
+<p>Most <i class="i">features</i> have <i class="i">implementation-dependent</i> meanings;
+The following meanings have been assigned to feature names:
+</p>
+<dl class="table">
+<dt><code class="t">:cltl1</code></dt>
+<dd><p>If present, indicates that the <code class="t">LISP</code> <i class="i">package</i> <i class="i">purports to conform</i>
+to the 1984 specification <i class="i">Common Lisp: The Language</i>.  
+It is possible, but not required, for a <i class="i">conforming implementation</i> 
+to have this feature because this specification specifies that 
+its <i class="i">symbols</i> are to be in the <code class="t">COMMON-LISP</code> <i class="i">package</i>, 
+not the <code class="t">LISP</code> package.
+</p>
+</dd>
+<dt><code class="t">:cltl2</code></dt>
+<dd><p>If present, indicates that the implementation <i class="i">purports to conform</i>
+to <i class="i">Common Lisp: The Language, Second Edition</i>.
+This feature must not be present in any <i class="i">conforming implementation</i>,
+since conformance to that document is not compatible with conformance
+to this specification.
+The name, however, is reserved by this specification in order to help
+programs distinguish implementations which conform to that document
+from implementations which conform to this specification.
+</p>
+</dd>
+<dt><code class="t">:ieee-floating-point</code></dt>
+<dd><p>If present, indicates that the implementation <i class="i">purports to conform</i>
+to the requirements of <i class="i">IEEE Standard for Binary Floating-Point Arithmetic</i>.
+</p>
+</dd>
+<dt><code class="t">:x3j13</code></dt>
+<dd><p>If present, indicates that the implementation conforms to some
+particular working draft of this specification, 
+or to some subset of features that approximates a belief about
+what this specification might turn out to contain.
+A <i class="i">conforming implementation</i> might or might not contain
+such a feature.
+(This feature is intended primarily as a stopgap in order to 
+provide implementors something to use prior to the availability
+of a draft standard, in order to discourage them from introducing
+the <code class="t">:draft-ansi-cl</code> and <code class="t">:ansi-cl</code> <i class="i">features</i> prematurely.)
+</p>
+</dd>
+<dt><code class="t">:draft-ansi-cl</code></dt>
+<dd><p>If present, indicates that the <i class="i">implementation</i> 
+<i class="i">purports to conform</i> to the first full draft of this specification,
+which went to public review in 1992.
+A <i class="i">conforming implementation</i>
+which has the <code class="t">:draft-ansi-cl-2</code> or <code class="t">:ansi-cl</code> <i class="i">feature</i>
+is not permitted to retain the <code class="t">:draft-ansi-cl</code> <i class="i">feature</i>
+since incompatible changes were made subsequent to the first draft.
+</p>
+</dd>
+<dt><code class="t">:draft-ansi-cl-2</code></dt>
+<dd><p>If present, indicates that a second full draft of this specification
+has gone to public review, and that the <i class="i">implementation</i> 
+<i class="i">purports to conform</i> to that specification.
+(If additional public review drafts are produced, this keyword
+ will continue to refer to the second draft, and additional keywords
+ will be added to identify conformance with such later drafts.
+ As such, the meaning of this keyword can be relied upon not to
+ change over time.)
+A <i class="i">conforming implementation</i> which has the <code class="t">:ansi-cl</code>
+<i class="i">feature</i> is only permitted to retain the <code class="t">:draft-ansi-cl</code> 
+<i class="i">feature</i> if the finally approved standard is not incompatible
+with the draft standard.
+</p>
+</dd>
+<dt><code class="t">:ansi-cl</code></dt>
+<dd><p>If present, indicates that this specification has been adopted by ANSI
+as an official standard, and that the <i class="i">implementation</i> 
+<i class="i">purports to conform</i>.
+</p>
+</dd>
+<dt><code class="t">:common-lisp</code></dt>
+<dd><p>This feature must appear in <b class="b">*features*</b> for any implementation that
+has one or more of the features <code class="t">:x3j13</code>, <code class="t">:draft-ansi-cl</code>,
+or <code class="t">:ansi-cl</code>.  It is intended that it should also appear in
+implementations which have the features <code class="t">:cltl1</code> or <code class="t">:cltl2</code>,
+but this specification cannot force such behavior.  The intent is 
+that this feature should identify the language family named &ldquo;Common Lisp,&rdquo;
+rather than some specific dialect within that family.
+</p>
+</dd>
+</dl>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-522"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-522"> &para;</a></span></h4>
+
+<p><a class="ref" href="Use-of-Read_002dTime-Conditionals.html">Use of Read-Time Conditionals</a>,
+<a class="ref" href="Standard-Macro-Characters.html">Standard Macro Characters</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-322"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-322"> &para;</a></span></h4>
+
+<p>The <i class="i">value</i> of <b class="b">*features*</b> is used by the <code class="t">#+</code> and <code class="t">#-</code> reader syntax.
+</p>
+<p><i class="i">Symbols</i> in the <i class="i">features list</i> may be in any <i class="i">package</i>,
+but in practice they are generally in the <code class="t">KEYWORD</code> <i class="i">package</i>.
+This is because <code class="t">KEYWORD</code> is the <i class="i">package</i> used by default
+when <i class="i">reading</i>_2 <i class="i">feature expressions</i> 
+in the <code class="t">#+</code> and <code class="t">#-</code> <i class="i">reader macros</i>.
+<i class="i">Code</i> that needs to name a <i class="i">feature</i>_2 in a
+<i class="i">package</i> P (other than <code class="t">KEYWORD</code>) can do so
+by making explicit use of a <i class="i">package prefix</i> for P,
+but note that such <i class="i">code</i> must also assure that the <i class="i">package</i> P 
+exists in order for the <i class="i">feature expression</i> to be <i class="i">read</i>_2&mdash;even
+in cases where the <i class="i">feature expression</i> is expected to fail.
+</p>
+<p>It is generally considered wise for an <i class="i">implementation</i> to include 
+one or more <i class="i">features</i> identifying the specific <i class="i">implementation</i>,
+so that conditional expressions can be written which distinguish 
+idiosyncrasies of one <i class="i">implementation</i> from those of another.  
+Since features are normally <i class="i">symbols</i> in the <code class="t">KEYWORD</code> <i class="i">package</i>
+where name collisions might easily result, and since no uniquely defined mechanism
+is designated for deciding who has the right to use which <i class="i">symbol</i> for
+what reason, a conservative strategy is to prefer names derived from 
+one&rsquo;s own company or product name, since those names are often trademarked
+and are hence less likely to be used unwittingly by another <i class="i">implementation</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002acompile_002dfile_002dpathname_002a.html">*compile-file-pathname*, *compile-file-truename*                 [Variable]</a>, Previous: <a href="with_002dcompilation_002dunit.html">with-compilation-unit                                               [Macro]</a>, Up: <a href="System-Construction-Dictionary.html">System Construction Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002agensym_002dcounter_002a.html
@@ -0,0 +1,72 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*gensym-counter* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*gensym-counter* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*gensym-counter* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="gentemp.html" rel="next" title="gentemp">
+<link href="gensym.html" rel="prev" title="gensym">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002agensym_002dcounter_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="gentemp.html" accesskey="n" rel="next">gentemp                                                          [Function]</a>, Previous: <a href="gensym.html" accesskey="p" rel="prev">gensym                                                           [Function]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002agensym_002dcounter_002a-_005bVariable_005d"><span>10.2.8 *gensym-counter*                                                 [Variable]<a class="copiable-link" href="#g_t_002agensym_002dcounter_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-3"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-3"> &para;</a></span></h4>
+
+<p>a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-3"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-3"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-224"><span>Description::<a class="copiable-link" href="#Description_003a_003a-224"> &para;</a></span></h4>
+
+<p>A number which will be used in constructing the <i class="i">name</i> of 
+the next <i class="i">symbol</i> generated by the <i class="i">function</i> <b class="b">gensym</b>.
+</p>
+<p><b class="b">*gensym-counter*</b> can be either <i class="i">assigned</i> or <i class="i">bound</i>
+at any time, but its value must always be a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-37"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-37"> &para;</a></span></h4>
+
+<p><b class="b">gensym</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-198"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-198"> &para;</a></span></h4>
+
+<p><a class="ref" href="gensym.html">gensym                                                           [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-119"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-119"> &para;</a></span></h4>
+
+<p>The ability to pass a numeric argument to <b class="b">gensym</b> has been deprecated;
+explicitly <i class="i">binding</i> <b class="b">*gensym-counter*</b> is now stylistically preferred.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aload_002dpathname_002a.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*load-pathname* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*load-pathname* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*load-pathname* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="System-Construction-Dictionary.html" rel="up" title="System Construction Dictionary">
+<link href="_002acompile_002dprint_002a.html" rel="next" title="*compile-print*">
+<link href="_002acompile_002dfile_002dpathname_002a.html" rel="prev" title="*compile-file-pathname*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aload_002dpathname_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002acompile_002dprint_002a.html" accesskey="n" rel="next">*compile-print*, *compile-verbose*                               [Variable]</a>, Previous: <a href="_002acompile_002dfile_002dpathname_002a.html" accesskey="p" rel="prev">*compile-file-pathname*, *compile-file-truename*                 [Variable]</a>, Up: <a href="System-Construction-Dictionary.html" accesskey="u" rel="up">System Construction Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aload_002dpathname_002a_002c-_002aload_002dtruename_002a-_005bVariable_005d"><span>24.2.7 *load-pathname*, *load-truename*                                 [Variable]<a class="copiable-link" href="#g_t_002aload_002dpathname_002a_002c-_002aload_002dtruename_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-29"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-29"> &para;</a></span></h4>
+
+<p>The <i class="i">value</i> of <b class="b">*load-pathname*</b> must always be a <i class="i">pathname</i>          or <b class="b">nil</b>.
+The <i class="i">value</i> of <b class="b">*load-truename*</b> must always be a <i class="i">physical pathname</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-29"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-29"> &para;</a></span></h4>
+
+<p><b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-644"><span>Description::<a class="copiable-link" href="#Description_003a_003a-644"> &para;</a></span></h4>
+
+<p>During a call to <b class="b">load</b>,
+  <b class="b">*load-pathname*</b> is <i class="i">bound</i> to 
+  the <i class="i">pathname</i> denoted by the the first argument to <b class="b">load</b>,
+  merged against the defaults; 
+  that is, it is <i class="i">bound</i> to <code class="t">(pathname (merge-pathnames <i class="i">filespec</i>))</code>.
+During the same time interval,
+  <b class="b">*load-truename*</b> is <i class="i">bound</i> to
+  the <i class="i">truename</i> of the <i class="i">file</i> being loaded.
+</p>
+<p>At other times, the <i class="i">value</i> of these <i class="i">variables</i> is <b class="b">nil</b>.
+</p>
+<p>If a <i class="i">break loop</i> is entered while <b class="b">load</b> is ongoing,
+it is <i class="i">implementation-dependent</i> whether these <i class="i">variables</i> retain 
+the <i class="i">values</i> they had just prior to entering the <i class="i">break loop</i> 
+or whether they are <i class="i">bound</i> to <b class="b">nil</b>.
+</p>
+<p>The consequences are unspecified if 
+an attempt is made to <i class="i">assign</i> or <i class="i">bind</i> either of these <i class="i">variables</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-116"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-116"> &para;</a></span></h4>
+
+<p>The <i class="i">file system</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-524"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-524"> &para;</a></span></h4>
+
+<p><a class="ref" href="load.html">load                                                             [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aload_002dprint_002a.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*load-print* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*load-print* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*load-print* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="System-Construction-Dictionary.html" rel="up" title="System Construction Dictionary">
+<link href="_002amodules_002a.html" rel="next" title="*modules*">
+<link href="_002acompile_002dprint_002a.html" rel="prev" title="*compile-print*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aload_002dprint_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002amodules_002a.html" accesskey="n" rel="next">*modules*                                                        [Variable]</a>, Previous: <a href="_002acompile_002dprint_002a.html" accesskey="p" rel="prev">*compile-print*, *compile-verbose*                               [Variable]</a>, Up: <a href="System-Construction-Dictionary.html" accesskey="u" rel="up">System Construction Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aload_002dprint_002a_002c-_002aload_002dverbose_002a-_005bVariable_005d"><span>24.2.9 *load-print*, *load-verbose*                                     [Variable]<a class="copiable-link" href="#g_t_002aload_002dprint_002a_002c-_002aload_002dverbose_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-31"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-31"> &para;</a></span></h4>
+
+<p>a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-31"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-31"> &para;</a></span></h4>
+
+<p>The initial <i class="i">value</i> of <b class="b">*load-print*</b>   is <i class="i">false</i>.
+The initial <i class="i">value</i> of <b class="b">*load-verbose*</b> is <i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-646"><span>Description::<a class="copiable-link" href="#Description_003a_003a-646"> &para;</a></span></h4>
+
+<p>The <i class="i">value</i> of <b class="b">*load-print*</b>   is the default value of the <code class="t">:print</code> <i class="i">argument</i>   to <b class="b">load</b>.
+The <i class="i">value</i> of <b class="b">*load-verbose*</b> is the default value of the <code class="t">:verbose</code> <i class="i">argument</i> to <b class="b">load</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-526"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-526"> &para;</a></span></h4>
+
+<p><a class="ref" href="load.html">load                                                             [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002amacroexpand_002dhook_002a.html
@@ -0,0 +1,114 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*macroexpand-hook* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*macroexpand-hook* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*macroexpand-hook* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="proclaim.html" rel="next" title="proclaim">
+<link href="symbol_002dmacrolet.html" rel="prev" title="symbol-macrolet">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002amacroexpand_002dhook_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="proclaim.html" accesskey="n" rel="next">proclaim                                                         [Function]</a>, Previous: <a href="symbol_002dmacrolet.html" accesskey="p" rel="prev">symbol-macrolet                                          [Special Operator]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002amacroexpand_002dhook_002a-_005bVariable_005d"><span>3.8.15 *macroexpand-hook*                                               [Variable]<a class="copiable-link" href="#g_t_002amacroexpand_002dhook_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a"> &para;</a></span></h4>
+
+<p>a <i class="i">designator</i> for a <i class="i">function</i> of three <i class="i">arguments</i>:
+  a <i class="i">macro function</i>,
+  a <i class="i">macro form</i>,
+  and an <i class="i">environment</i> <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a"> &para;</a></span></h4>
+
+<p>a <i class="i">designator</i> for a function that is equivalent to the <i class="i">function</i> <b class="b">funcall</b>,
+but that might have additional <i class="i">implementation-dependent</i> side-effects.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-14"><span>Description::<a class="copiable-link" href="#Description_003a_003a-14"> &para;</a></span></h4>
+
+<p>Used as the expansion interface hook by <b class="b">macroexpand-1</b> to 
+control the <i class="i">macro expansion</i> process.
+When a <i class="i">macro form</i> is to be expanded,
+this <i class="i">function</i> is called with three arguments:
+  the <i class="i">macro function</i>,
+  the <i class="i">macro form</i>,
+  and the <i class="i">environment</i> in which the <i class="i">macro form</i> is to be expanded.
+</p>
+<p>The <i class="i">environment</i> <i class="i">object</i> has <i class="i">dynamic extent</i>;
+the consequences are undefined if the <i class="i">environment</i> <i class="i">object</i> is 
+referred to outside the <i class="i">dynamic extent</i> of the macro expansion function.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-12"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-12"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun hook (expander form env)
+    (format t &quot;Now expanding: ~S~
+    (funcall expander form env)) &rArr;  HOOK 
+ (defmacro machook (x y) `(/ (+ ,x ,y) 2)) &rArr;  MACHOOK 
+ (macroexpand '(machook 1 2)) &rArr;  (/ (+ 1 2) 2), <i class="i">true</i> 
+ (let ((*macroexpand-hook* #'hook)) (macroexpand '(machook 1 2)))
+<code class="t"> |&gt; </code> Now expanding (MACHOOK 1 2) 
+&rArr;  (/ (+ 1 2) 2), <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-14"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-14"> &para;</a></span></h4>
+
+<p><a class="ref" href="macroexpand.html">macroexpand, macroexpand-1                                       [Function]</a>
+, <b class="b">macroexpand-1</b>, 
+<a class="ref" href="funcall.html">funcall                                                          [Function]</a>
+, <a class="ref" href="Evaluation.html">Evaluation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-10"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-10"> &para;</a></span></h4>
+
+<p>The net effect of the chosen initial value is to just invoke the
+<i class="i">macro function</i>, giving it the <i class="i">macro form</i> and
+<i class="i">environment</i> as its two arguments.
+</p>
+<p>Users or user programs can <i class="i">assign</i> this <i class="i">variable</i> to
+customize or trace the <i class="i">macro expansion</i> mechanism.  Note, however,
+that this <i class="i">variable</i> is a global resource, potentially shared by
+multiple <i class="i">programs</i>; as such, if any two <i class="i">programs</i> depend for
+their correctness on the setting of this <i class="i">variable</i>, those
+<i class="i">programs</i> may not be able to run in the same <i class="i">Lisp image</i>.
+For this reason, it is frequently best to confine its uses to debugging
+situations.
+</p>
+<p>Users who put their own function into <b class="b">*macroexpand-hook*</b>
+should consider saving the previous value of the hook, and calling that
+value from their own.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="proclaim.html">proclaim                                                         [Function]</a>, Previous: <a href="symbol_002dmacrolet.html">symbol-macrolet                                          [Special Operator]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002amodules_002a.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*modules* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*modules* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*modules* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="System-Construction-Dictionary.html" rel="up" title="System Construction Dictionary">
+<link href="provide.html" rel="next" title="provide">
+<link href="_002aload_002dprint_002a.html" rel="prev" title="*load-print*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002amodules_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="provide.html" accesskey="n" rel="next">provide, require                                                 [Function]</a>, Previous: <a href="_002aload_002dprint_002a.html" accesskey="p" rel="prev">*load-print*, *load-verbose*                                     [Variable]</a>, Up: <a href="System-Construction-Dictionary.html" accesskey="u" rel="up">System Construction Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002amodules_002a-_005bVariable_005d"><span>24.2.10 *modules*                                                        [Variable]<a class="copiable-link" href="#g_t_002amodules_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-32"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-32"> &para;</a></span></h4>
+
+<p>a <i class="i">list</i> of <i class="i">strings</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-32"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-32"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-647"><span>Description::<a class="copiable-link" href="#Description_003a_003a-647"> &para;</a></span></h4>
+
+<p>The <i class="i">value</i> of <b class="b">*modules*</b> is a list of names of the modules
+that have been loaded into the current <i class="i">Lisp image</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-117"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-117"> &para;</a></span></h4>
+
+<p><b class="b">provide</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-527"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-527"> &para;</a></span></h4>
+
+<p><a class="ref" href="provide.html">provide, require                                                 [Function]</a>
+,
+<b class="b">require</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-323"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-323"> &para;</a></span></h4>
+
+<p>The variable <b class="b">*modules*</b> is deprecated.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002apackage_002a.html
@@ -0,0 +1,95 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*package* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*package* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*package* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="package_002derror.html" rel="next" title="package-error">
+<link href="packagep.html" rel="prev" title="packagep">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002apackage_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="package_002derror.html" accesskey="n" rel="next">package-error                                              [Condition Type]</a>, Previous: <a href="packagep.html" accesskey="p" rel="prev">packagep                                                         [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002apackage_002a-_005bVariable_005d"><span>11.2.28 *package*                                                        [Variable]<a class="copiable-link" href="#g_t_002apackage_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-4"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-4"> &para;</a></span></h4>
+
+<p>a <i class="i">package</i> <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-4"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-4"> &para;</a></span></h4>
+
+<p>the <code class="t">COMMON-LISP-USER</code> <i class="i">package</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-264"><span>Description::<a class="copiable-link" href="#Description_003a_003a-264"> &para;</a></span></h4>
+
+<p>Whatever <i class="i">package</i> <i class="i">object</i> is currently 
+the <i class="i">value</i> of <b class="b">*package*</b> is referred to as the <i class="i">current package</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-182"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-182"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (in-package &quot;COMMON-LISP-USER&quot;) &rArr;  #&lt;PACKAGE &quot;COMMON-LISP-USER&quot;&gt;
+ *package* &rArr;  #&lt;PACKAGE &quot;COMMON-LISP-USER&quot;&gt;
+ (make-package &quot;SAMPLE-PACKAGE&quot; :use '(&quot;COMMON-LISP&quot;))
+&rArr;  #&lt;PACKAGE &quot;SAMPLE-PACKAGE&quot;&gt;
+ (list 
+   (symbol-package
+     (let ((*package* (find-package 'sample-package)))
+       (setq *some-symbol* (read-from-string &quot;just-testing&quot;))))
+   *package*)
+&rArr;  (#&lt;PACKAGE &quot;SAMPLE-PACKAGE&quot;&gt; #&lt;PACKAGE &quot;COMMON-LISP-USER&quot;&gt;)
+ (list (symbol-package (read-from-string &quot;just-testing&quot;))
+       *package*)
+&rArr;  (#&lt;PACKAGE &quot;COMMON-LISP-USER&quot;&gt; #&lt;PACKAGE &quot;COMMON-LISP-USER&quot;&gt;)
+ (eq 'foo (intern &quot;FOO&quot;)) &rArr;  <i class="i">true</i>
+ (eq 'foo (let ((*package* (find-package 'sample-package)))
+            (intern &quot;FOO&quot;)))
+&rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-54"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-54"> &para;</a></span></h4>
+
+<p><b class="b">load</b>,
+<b class="b">compile-file</b>,
+<b class="b">in-package</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-233"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-233"> &para;</a></span></h4>
+
+<p><a class="ref" href="compile_002dfile.html">compile-file                                                     [Function]</a>
+,
+<a class="ref" href="in_002dpackage.html">in-package                                                          [Macro]</a>
+,
+<a class="ref" href="load.html">load                                                             [Function]</a>
+,
+<a class="ref" href="package.html">package                                                      [System Class]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aprint_002darray_002a.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*print-array* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*print-array* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*print-array* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="_002aprint_002dbase_002a.html" rel="next" title="*print-base*">
+<link href="write_002dto_002dstring.html" rel="prev" title="write-to-string">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aprint_002darray_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002dbase_002a.html" accesskey="n" rel="next">*print-base*, *print-radix*                                      [Variable]</a>, Previous: <a href="write_002dto_002dstring.html" accesskey="p" rel="prev">write-to-string, prin1-to-string, princ-to-string                [Function]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aprint_002darray_002a-_005bVariable_005d"><span>22.4.16 *print-array*                                                    [Variable]<a class="copiable-link" href="#g_t_002aprint_002darray_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-9"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-9"> &para;</a></span></h4>
+
+<p>a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-9"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-9"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-604"><span>Description::<a class="copiable-link" href="#Description_003a_003a-604"> &para;</a></span></h4>
+
+<p>Controls the format in which <i class="i">arrays</i> are printed.  
+If it is <i class="i">false</i>, the contents of <i class="i">arrays</i> other than <i class="i">strings</i>
+are never printed.  Instead, <i class="i">arrays</i> are printed in a concise form using
+<code class="t">#&lt;</code> that gives enough information for the user to be able to identify the
+<i class="i">array</i>, but does not include the entire <i class="i">array</i> contents.
+If it is <i class="i">true</i>, non-<i class="i">string</i> <i class="i">arrays</i> are printed using
+<code class="t">#(...)</code>, <code class="t">#*</code>, or <code class="t">#nA</code> syntax.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-104"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-104"> &para;</a></span></h4>
+
+<p>The <i class="i">implementation</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-490"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-490"> &para;</a></span></h4>
+
+<p><a class="ref" href="Sharpsign-Left_002dParenthesis.html">Sharpsign Left-Parenthesis</a>,
+<a class="ref" href="Sharpsign-Less_002dThan_002dSign.html">Sharpsign Less-Than-Sign</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aprint_002dbase_002a.html
@@ -0,0 +1,123 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*print-base* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*print-base* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*print-base* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="_002aprint_002dcase_002a.html" rel="next" title="*print-case*">
+<link href="_002aprint_002darray_002a.html" rel="prev" title="*print-array*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aprint_002dbase_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002dcase_002a.html" accesskey="n" rel="next">*print-case*                                                     [Variable]</a>, Previous: <a href="_002aprint_002darray_002a.html" accesskey="p" rel="prev">*print-array*                                                    [Variable]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aprint_002dbase_002a_002c-_002aprint_002dradix_002a-_005bVariable_005d"><span>22.4.17 *print-base*, *print-radix*                                      [Variable]<a class="copiable-link" href="#g_t_002aprint_002dbase_002a_002c-_002aprint_002dradix_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-10"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-10"> &para;</a></span></h4>
+
+<p><b class="b">*print-base*</b>&mdash;a <i class="i">radix</i>.
+<b class="b">*print-radix*</b>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-10"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-10"> &para;</a></span></h4>
+
+<p>The initial <i class="i">value</i> of <b class="b">*print-base*</b> is <code class="t">10</code>.
+The initial <i class="i">value</i> of <b class="b">*print-radix*</b> is <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-605"><span>Description::<a class="copiable-link" href="#Description_003a_003a-605"> &para;</a></span></h4>
+
+<p><b class="b">*print-base*</b> and <b class="b">*print-radix*</b> control the printing
+of <i class="i">rationals</i>.
+The <i class="i">value</i> of <b class="b">*print-base*</b> is called the <i class="i">current output base</i>
+<a class="index-entry-id" id="index-current-output-base"></a>
+.
+</p>
+<p>The <i class="i">value</i> of <b class="b">*print-base*</b> is the <i class="i">radix</i> in which the printer 
+will print <i class="i">rationals</i>.   For radices above <code class="t">10</code>, letters of
+the alphabet are used to represent digits above <code class="t">9</code>.
+</p>
+<p>If the <i class="i">value</i> of <b class="b">*print-radix*</b> is <i class="i">true</i>,
+the printer will print a radix specifier to indicate the <i class="i">radix</i>
+in which it is printing a <i class="i">rational</i> number.  The radix specifier
+is always printed using lowercase letters.  If <b class="b">*print-base*</b>
+is <code class="t">2</code>, <code class="t">8</code>, or <code class="t">16</code>, then the radix specifier used is <code class="t">#b</code>,
+<code class="t">#o</code>, or <code class="t">#x</code>, respectively.  For <i class="i">integers</i>, base ten is
+indicated by a trailing decimal point instead of a leading radix
+specifier; for <i class="i">ratios</i>, <code class="t">#10r</code> is used.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-433"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-433"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((*print-base* 24.) (*print-radix* t)) 
+   (print 23.))
+<code class="t"> |&gt; </code> #24rN
+&rArr;  23
+ (setq *print-base* 10) &rArr;  10
+ (setq *print-radix* nil) &rArr;  NIL                                          
+ (dotimes (i 35)
+    (let ((*print-base* (+ i 2)))           ;print the decimal number 40 
+      (write 40)                            ;in each base from 2 to 36
+      (if (zerop (mod i 10)) (terpri) (format t &quot; &quot;))))
+<code class="t"> |&gt; </code> 101000
+<code class="t"> |&gt; </code> 1111 220 130 104 55 50 44 40 37 34
+<code class="t"> |&gt; </code> 31 2C 2A 28 26 24 22 20 1J 1I
+<code class="t"> |&gt; </code> 1H 1G 1F 1E 1D 1C 1B 1A 19 18
+<code class="t"> |&gt; </code> 17 16 15 14 
+&rArr;  NIL
+ (dolist (pb '(2 3 8 10 16))               
+    (let ((*print-radix* t)                 ;print the integer 10 and 
+          (*print-base* pb))                ;the ratio 1/10 in bases 2, 
+     (format t &quot;~&amp;~S  ~S~
+<code class="t"> |&gt; </code> #b1010  #b1/1010
+<code class="t"> |&gt; </code> #3r101  #3r1/101
+<code class="t"> |&gt; </code> #o12  #o1/12
+<code class="t"> |&gt; </code> 10.  #10r1/10
+<code class="t"> |&gt; </code> #xA  #x1/A
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-105"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-105"> &para;</a></span></h4>
+
+<p>Might be <i class="i">bound</i> by <b class="b">format</b>, and <b class="b">write</b>, <b class="b">write-to-string</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-491"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-491"> &para;</a></span></h4>
+
+<p><a class="ref" href="format.html">format                                                           [Function]</a>
+,
+<a class="ref" href="write.html">write, prin1, print, pprint, princ                               [Function]</a>
+,
+<a class="ref" href="write_002dto_002dstring.html">write-to-string, prin1-to-string, princ-to-string                [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002dcase_002a.html">*print-case*                                                     [Variable]</a>, Previous: <a href="_002aprint_002darray_002a.html">*print-array*                                                    [Variable]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aprint_002dcase_002a.html
@@ -0,0 +1,113 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*print-case* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*print-case* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*print-case* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="_002aprint_002dcircle_002a.html" rel="next" title="*print-circle*">
+<link href="_002aprint_002dbase_002a.html" rel="prev" title="*print-base*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aprint_002dcase_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002dcircle_002a.html" accesskey="n" rel="next">*print-circle*                                                   [Variable]</a>, Previous: <a href="_002aprint_002dbase_002a.html" accesskey="p" rel="prev">*print-base*, *print-radix*                                      [Variable]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aprint_002dcase_002a-_005bVariable_005d"><span>22.4.18 *print-case*                                                     [Variable]<a class="copiable-link" href="#g_t_002aprint_002dcase_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-11"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-11"> &para;</a></span></h4>
+
+<p>One of the <i class="i">symbols</i> <code class="t">:upcase</code>, <code class="t">:downcase</code>, or <code class="t">:capitalize</code>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-11"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-11"> &para;</a></span></h4>
+
+<p>The <i class="i">symbol</i> <code class="t">:upcase</code>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-606"><span>Description::<a class="copiable-link" href="#Description_003a_003a-606"> &para;</a></span></h4>
+
+<p>The <i class="i">value</i> of <b class="b">*print-case*</b> controls the case (upper, lower, or mixed) in 
+which to print any uppercase characters in the names of <i class="i">symbols</i>
+when vertical-bar syntax is not used.
+</p>
+<p><b class="b">*print-case*</b> has an effect at all times when the <i class="i">value</i> of <b class="b">*print-escape*</b>
+is <i class="i">false</i>. <b class="b">*print-case*</b> also has an effect when
+the <i class="i">value</i> of <b class="b">*print-escape*</b> is <i class="i">true</i> unless inside an escape context
+(<i class="i">i.e.</i>, unless between <i class="i">vertical-bars</i> or after a <i class="i">slash</i>).
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-434"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-434"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun test-print-case ()
+   (dolist (*print-case* '(:upcase :downcase :capitalize))
+     (format t &quot;~&amp;~S ~S~
+&rArr;  TEST-PC
+;; Although the choice of which characters to escape is specified by
+;; *PRINT-CASE*, the choice of how to escape those characters 
+;; (i.e., whether single escapes or multiple escapes are used)
+;; is implementation-dependent.  The examples here show two of the
+;; many valid ways in which escaping might appear.
+ (test-print-case) ;Implementation A
+<code class="t"> |&gt; </code> THIS-AND-THAT |And-something-elSE|
+<code class="t"> |&gt; </code> this-and-that a\n\d-\s\o\m\e\t\h\i\n\g-\e\lse
+<code class="t"> |&gt; </code> This-And-That A\n\d-\s\o\m\e\t\h\i\n\g-\e\lse
+&rArr;  NIL
+ (test-print-case) ;Implementation B
+<code class="t"> |&gt; </code> THIS-AND-THAT |And-something-elSE|
+<code class="t"> |&gt; </code> this-and-that a|nd-something-el|se
+<code class="t"> |&gt; </code> This-And-That A|nd-something-el|se
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-492"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-492"> &para;</a></span></h4>
+
+<p><a class="ref" href="write.html">write, prin1, print, pprint, princ                               [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-305"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-305"> &para;</a></span></h4>
+
+<p><b class="b">read</b> normally converts lowercase characters appearing 
+in <i class="i">symbols</i> to corresponding uppercase characters,
+so that internally print names normally contain only uppercase characters.
+</p>
+<p>If <b class="b">*print-escape*</b> is <i class="i">true</i>,
+lowercase characters in the <i class="i">name</i> of a <i class="i">symbol</i>
+are always printed in lowercase, and
+are preceded by a single escape character 
+or enclosed by multiple escape characters;
+uppercase characters in the <i class="i">name</i> of a <i class="i">symbol</i>
+are printed in upper case, in lower case, or in mixed case
+so as to capitalize words, according to the value of
+<b class="b">*print-case*</b>.  The convention for what constitutes
+a &ldquo;word&rdquo; is the same as for <b class="b">string-capitalize</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002dcircle_002a.html">*print-circle*                                                   [Variable]</a>, Previous: <a href="_002aprint_002dbase_002a.html">*print-base*, *print-radix*                                      [Variable]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aprint_002dcircle_002a.html
@@ -0,0 +1,113 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*print-circle* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*print-circle* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*print-circle* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="_002aprint_002descape_002a.html" rel="next" title="*print-escape*">
+<link href="_002aprint_002dcase_002a.html" rel="prev" title="*print-case*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aprint_002dcircle_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002descape_002a.html" accesskey="n" rel="next">*print-escape*                                                   [Variable]</a>, Previous: <a href="_002aprint_002dcase_002a.html" accesskey="p" rel="prev">*print-case*                                                     [Variable]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aprint_002dcircle_002a-_005bVariable_005d"><span>22.4.19 *print-circle*                                                   [Variable]<a class="copiable-link" href="#g_t_002aprint_002dcircle_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-12"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-12"> &para;</a></span></h4>
+
+<p>a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-12"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-12"> &para;</a></span></h4>
+
+<p><i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-607"><span>Description::<a class="copiable-link" href="#Description_003a_003a-607"> &para;</a></span></h4>
+
+<p>Controls the attempt to detect circularity and sharing in an <i class="i">object</i> 
+being printed.
+</p>
+<p>If <i class="i">false</i>,
+the printing process merely proceeds by recursive descent without attempting 
+to detect circularity and sharing.
+</p>
+<p>If <i class="i">true</i>,
+the printer will endeavor to detect cycles and sharing
+in the structure to be printed, 
+and to use <code class="t">#<i class="i">n</i>=</code> and <code class="t">#<i class="i">n</i>#</code>
+syntax to indicate the circularities or shared components.
+</p>
+<p>If <i class="i">true</i>, a user-defined 
+</p>
+<p><b class="b">print-object</b> <i class="i">method</i>
+</p>
+<p>can print
+<i class="i">objects</i> to the supplied <i class="i">stream</i> using <b class="b">write</b>, <b class="b">prin1</b>, 
+<b class="b">princ</b>, or <b class="b">format</b> and expect circularities and sharing
+to be detected and printed using the <code class="t">#<i class="i">n</i>#</code> syntax.
+</p>
+<p>If a user-defined 
+</p>
+<p><b class="b">print-object</b> <i class="i">method</i>
+</p>
+<p>prints to a <i class="i">stream</i> other than the one
+that was supplied, then circularity detection starts over for that <i class="i">stream</i>. 
+</p>
+<p>Note that implementations should not use <code class="t">#<i class="i">n</i>#</code> notation 
+when the <i class="i">Lisp reader</i> would automatically assure sharing without it
+(<i class="i">e.g.</i>, as happens with <i class="i">interned</i> <i class="i">symbols</i>).
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-435"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-435"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((a (list 1 2 3)))
+   (setf (cdddr a) a)
+   (let ((*print-circle* t))
+     (write a)
+     :done))
+<code class="t"> |&gt; </code> #1=(1 2 3 . #1#)
+&rArr;  :DONE
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-493"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-493"> &para;</a></span></h4>
+
+<p><a class="ref" href="write.html">write, prin1, print, pprint, princ                               [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-306"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-306"> &para;</a></span></h4>
+
+<p>An attempt to print a circular structure with <b class="b">*print-circle*</b> 
+set to <b class="b">nil</b> may lead to looping behavior and failure to terminate.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002descape_002a.html">*print-escape*                                                   [Variable]</a>, Previous: <a href="_002aprint_002dcase_002a.html">*print-case*                                                     [Variable]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aprint_002descape_002a.html
@@ -0,0 +1,91 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*print-escape* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*print-escape* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*print-escape* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="_002aprint_002dgensym_002a.html" rel="next" title="*print-gensym*">
+<link href="_002aprint_002dcircle_002a.html" rel="prev" title="*print-circle*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aprint_002descape_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002dgensym_002a.html" accesskey="n" rel="next">*print-gensym*                                                   [Variable]</a>, Previous: <a href="_002aprint_002dcircle_002a.html" accesskey="p" rel="prev">*print-circle*                                                   [Variable]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aprint_002descape_002a-_005bVariable_005d"><span>22.4.20 *print-escape*                                                   [Variable]<a class="copiable-link" href="#g_t_002aprint_002descape_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-13"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-13"> &para;</a></span></h4>
+
+<p>a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-13"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-13"> &para;</a></span></h4>
+
+<p><i class="i">true</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-608"><span>Description::<a class="copiable-link" href="#Description_003a_003a-608"> &para;</a></span></h4>
+
+<p>If <i class="i">false</i>,
+escape characters and <i class="i">package prefixes</i> are not output
+when an expression is printed.
+</p>
+<p>If <i class="i">true</i>, an attempt is made to print an <i class="i">expression</i>
+in such a way that it can be read again to produce an <b class="b">equal</b> <i class="i">expression</i>.
+(This is only a guideline; not a requirement.  See <b class="b">*print-readably*</b>.)
+</p>
+<p>For more specific details of how the <i class="i">value</i> of <b class="b">*print-escape*</b>
+affects the printing of certain <i class="i">types</i>,
+see <a class="ref" href="Default-Print_002dObject-Methods.html">Default Print-Object Methods</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-436"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-436"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (let ((*print-escape* t)) (write #\a))
+<code class="t"> |&gt; </code> #\a
+&rArr;  #\a
+ (let ((*print-escape* nil)) (write #\a))
+<code class="t"> |&gt; </code> a
+&rArr;  #\a
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-106"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-106"> &para;</a></span></h4>
+
+<p><b class="b">princ</b>, <b class="b">prin1</b>, <b class="b">format</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-494"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-494"> &para;</a></span></h4>
+
+<p><a class="ref" href="write.html">write, prin1, print, pprint, princ                               [Function]</a>
+, 
+<a class="ref" href="readtable_002dcase.html">readtable-case                                                   [Accessor]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-307"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-307"> &para;</a></span></h4>
+
+<p><b class="b">princ</b> effectively binds <b class="b">*print-escape*</b> to <i class="i">false</i>.
+<b class="b">prin1</b> effectively binds <b class="b">*print-escape*</b> to <i class="i">true</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aprint_002dgensym_002a.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*print-gensym* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*print-gensym* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*print-gensym* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="_002aprint_002dlevel_002a.html" rel="next" title="*print-level*">
+<link href="_002aprint_002descape_002a.html" rel="prev" title="*print-escape*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aprint_002dgensym_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002dlevel_002a.html" accesskey="n" rel="next">*print-level*, *print-length*                                    [Variable]</a>, Previous: <a href="_002aprint_002descape_002a.html" accesskey="p" rel="prev">*print-escape*                                                   [Variable]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aprint_002dgensym_002a-_005bVariable_005d"><span>22.4.21 *print-gensym*                                                   [Variable]<a class="copiable-link" href="#g_t_002aprint_002dgensym_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-14"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-14"> &para;</a></span></h4>
+
+<p>a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-14"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-14"> &para;</a></span></h4>
+
+<p><i class="i">true</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-609"><span>Description::<a class="copiable-link" href="#Description_003a_003a-609"> &para;</a></span></h4>
+
+<p>Controls whether the prefix &ldquo;<code class="t">#:</code>&rdquo; is printed before 
+<i class="i">apparently uninterned</i> <i class="i">symbols</i>.  
+The prefix is printed before such <i class="i">symbols</i> 
+if and only if the <i class="i">value</i> of <b class="b">*print-gensym*</b> is <i class="i">true</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-437"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-437"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((*print-gensym* nil))
+   (print (gensym)))
+<code class="t"> |&gt; </code> G6040 
+&rArr;  #:G6040
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-495"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-495"> &para;</a></span></h4>
+
+<p><a class="ref" href="write.html">write, prin1, print, pprint, princ                               [Function]</a>
+, <b class="b">*print-escape*</b>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aprint_002dlevel_002a.html
@@ -0,0 +1,136 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*print-level* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*print-level* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*print-level* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="_002aprint_002dlines_002a.html" rel="next" title="*print-lines*">
+<link href="_002aprint_002dgensym_002a.html" rel="prev" title="*print-gensym*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aprint_002dlevel_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002dlines_002a.html" accesskey="n" rel="next">*print-lines*                                                    [Variable]</a>, Previous: <a href="_002aprint_002dgensym_002a.html" accesskey="p" rel="prev">*print-gensym*                                                   [Variable]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aprint_002dlevel_002a_002c-_002aprint_002dlength_002a-_005bVariable_005d"><span>22.4.22 *print-level*, *print-length*                                    [Variable]<a class="copiable-link" href="#g_t_002aprint_002dlevel_002a_002c-_002aprint_002dlength_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-15"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-15"> &para;</a></span></h4>
+
+<p>a non-negative <i class="i">integer</i>, or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-15"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-15"> &para;</a></span></h4>
+
+<p><b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-610"><span>Description::<a class="copiable-link" href="#Description_003a_003a-610"> &para;</a></span></h4>
+
+<p><b class="b">*print-level*</b> controls how many levels deep a nested <i class="i">object</i> will print.
+If it is <i class="i">false</i>, then no control is exercised.
+Otherwise, it is an <i class="i">integer</i> indicating the maximum level to be printed.
+An <i class="i">object</i> to be printed is at level <code class="t">0</code>;
+its components (as of a <i class="i">list</i> or <i class="i">vector</i>) are at level <code class="t">1</code>;
+and so on.
+If an <i class="i">object</i> to be recursively printed has components 
+and is at a level equal to or greater than the <i class="i">value</i> of <b class="b">*print-level*</b>, 
+then the <i class="i">object</i> is printed as &ldquo;<code class="t">#</code>&rdquo;.
+</p>
+<p><b class="b">*print-length*</b> controls how many elements at a given level are printed.
+If it is <i class="i">false</i>, there is no limit to the number of components printed.
+Otherwise, it is an <i class="i">integer</i> indicating the maximum number of <i class="i">elements</i> 
+of an <i class="i">object</i> to be printed.  If exceeded, the printer will print 
+&ldquo;<code class="t">...</code>&rdquo; in place of the other <i class="i">elements</i>.  In the case of a <i class="i">dotted list</i>,
+if the <i class="i">list</i> contains exactly as many <i class="i">elements</i> as the <i class="i">value</i> of <b class="b">*print-length*</b>,
+the terminating <i class="i">atom</i> is printed rather than printing &ldquo;<code class="t">...</code>&rdquo;
+</p>
+<p><b class="b">*print-level*</b> and <b class="b">*print-length*</b> affect the printing 
+of an any <i class="i">object</i> printed with a list-like syntax.  They do not affect
+the printing of <i class="i">symbols</i>, <i class="i">strings</i>, and <i class="i">bit vectors</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-438"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-438"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq a '(1 (2 (3 (4 (5 (6))))))) &rArr;  (1 (2 (3 (4 (5 (6))))))
+ (dotimes (i 8) 
+   (let ((*print-level* i)) 
+     (format t &quot;~&amp;~D -- ~S~
+<code class="t"> |&gt; </code> 0 -- #
+<code class="t"> |&gt; </code> 1 -- (1 #)
+<code class="t"> |&gt; </code> 2 -- (1 (2 #))
+<code class="t"> |&gt; </code> 3 -- (1 (2 (3 #)))
+<code class="t"> |&gt; </code> 4 -- (1 (2 (3 (4 #))))
+<code class="t"> |&gt; </code> 5 -- (1 (2 (3 (4 (5 #)))))
+<code class="t"> |&gt; </code> 6 -- (1 (2 (3 (4 (5 (6))))))
+<code class="t"> |&gt; </code> 7 -- (1 (2 (3 (4 (5 (6))))))
+&rArr;  NIL
+
+ (setq a '(1 2 3 4 5 6)) &rArr;  (1 2 3 4 5 6)
+ (dotimes (i 7) 
+   (let ((*print-length* i)) 
+     (format t &quot;~&amp;~D -- ~S~
+<code class="t"> |&gt; </code> 0 -- (...)
+<code class="t"> |&gt; </code> 1 -- (1 ...)
+<code class="t"> |&gt; </code> 2 -- (1 2 ...)
+<code class="t"> |&gt; </code> 3 -- (1 2 3 ...)
+<code class="t"> |&gt; </code> 4 -- (1 2 3 4 ...)
+<code class="t"> |&gt; </code> 5 -- (1 2 3 4 5 6)
+<code class="t"> |&gt; </code> 6 -- (1 2 3 4 5 6)
+&rArr;  NIL
+
+(dolist (level-length '((0 1) (1 1) (1 2) (1 3) (1 4) 
+                        (2 1) (2 2) (2 3) (3 2) (3 3) (3 4)))
+ (let ((*print-level*  (first  level-length))
+       (*print-length* (second level-length)))
+   (format t &quot;~&amp;~D ~D -- ~S~
+           *print-level* *print-length* 
+           '(if (member x y) (+ (car x) 3) '(foo . #(a b c d &quot;Baz&quot;))))))
+<code class="t"> |&gt; </code> 0 1 -- #
+<code class="t"> |&gt; </code> 1 1 -- (IF ...)
+<code class="t"> |&gt; </code> 1 2 -- (IF # ...)
+<code class="t"> |&gt; </code> 1 3 -- (IF # # ...)
+<code class="t"> |&gt; </code> 1 4 -- (IF # # #)
+<code class="t"> |&gt; </code> 2 1 -- (IF ...)
+<code class="t"> |&gt; </code> 2 2 -- (IF (MEMBER X ...) ...)
+<code class="t"> |&gt; </code> 2 3 -- (IF (MEMBER X Y) (+ # 3) ...)
+<code class="t"> |&gt; </code> 3 2 -- (IF (MEMBER X ...) ...)
+<code class="t"> |&gt; </code> 3 3 -- (IF (MEMBER X Y) (+ (CAR X) 3) ...)
+<code class="t"> |&gt; </code> 3 4 -- (IF (MEMBER X Y) (+ (CAR X) 3) '(FOO . #(A B C D ...)))
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-496"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-496"> &para;</a></span></h4>
+
+<p><a class="ref" href="write.html">write, prin1, print, pprint, princ                               [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002dlines_002a.html">*print-lines*                                                    [Variable]</a>, Previous: <a href="_002aprint_002dgensym_002a.html">*print-gensym*                                                   [Variable]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aprint_002dlines_002a.html
@@ -0,0 +1,83 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*print-lines* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*print-lines* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*print-lines* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="_002aprint_002dmiser_002dwidth_002a.html" rel="next" title="*print-miser-width*">
+<link href="_002aprint_002dlevel_002a.html" rel="prev" title="*print-level*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aprint_002dlines_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002dmiser_002dwidth_002a.html" accesskey="n" rel="next">*print-miser-width*                                              [Variable]</a>, Previous: <a href="_002aprint_002dlevel_002a.html" accesskey="p" rel="prev">*print-level*, *print-length*                                    [Variable]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aprint_002dlines_002a-_005bVariable_005d"><span>22.4.23 *print-lines*                                                    [Variable]<a class="copiable-link" href="#g_t_002aprint_002dlines_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-16"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-16"> &para;</a></span></h4>
+
+<p>a non-negative <i class="i">integer</i>, or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-16"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-16"> &para;</a></span></h4>
+
+<p><b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-611"><span>Description::<a class="copiable-link" href="#Description_003a_003a-611"> &para;</a></span></h4>
+
+<p>When the <i class="i">value</i> of <b class="b">*print-lines*</b> is other than <b class="b">nil</b>,
+it is a limit on the number of output lines produced when something is pretty
+printed.  If an attempt is made to go beyond that many lines,
+&ldquo;<code class="t">..</code>&rdquo; is printed at the end of the last line followed by all of the
+suffixes (closing delimiters) that are pending to be printed.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-439"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-439"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((*print-right-margin* 25) (*print-lines* 3))
+   (pprint '(progn (setq a 1 b 2 c 3 d 4))))
+<code class="t"> |&gt; </code> (PROGN (SETQ A 1
+<code class="t"> |&gt; </code>              B 2
+<code class="t"> |&gt; </code>              C 3 ..))
+&rArr;  &lt;<i class="i">no <i class="i">values</i></i>&gt;
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-308"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-308"> &para;</a></span></h4>
+
+<p>The &ldquo;<code class="t">..</code>&rdquo; notation is intentionally different than
+the &ldquo;<code class="t">...</code>&rdquo; notation used for level abbreviation, so that the two
+different situations can be visually distinguished.
+</p>
+<p>This notation is used to increase the likelihood that the <i class="i">Lisp reader</i>
+will signal an error if an attempt is later made to read the abbreviated output.
+Note however that if the truncation occurs in a <i class="i">string</i>, 
+as in <code class="t">&quot;This string has been trunc..&quot;</code>, the problem situation cannot be
+detected later and no such error will be signaled.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aprint_002dmiser_002dwidth_002a.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*print-miser-width* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*print-miser-width* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*print-miser-width* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="_002aprint_002dpprint_002ddispatch_002a.html" rel="next" title="*print-pprint-dispatch*">
+<link href="_002aprint_002dlines_002a.html" rel="prev" title="*print-lines*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aprint_002dmiser_002dwidth_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002dpprint_002ddispatch_002a.html" accesskey="n" rel="next">*print-pprint-dispatch*                                          [Variable]</a>, Previous: <a href="_002aprint_002dlines_002a.html" accesskey="p" rel="prev">*print-lines*                                                    [Variable]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aprint_002dmiser_002dwidth_002a-_005bVariable_005d"><span>22.4.24 *print-miser-width*                                              [Variable]<a class="copiable-link" href="#g_t_002aprint_002dmiser_002dwidth_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-17"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-17"> &para;</a></span></h4>
+
+<p>a non-negative <i class="i">integer</i>, or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-17"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-17"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-612"><span>Description::<a class="copiable-link" href="#Description_003a_003a-612"> &para;</a></span></h4>
+
+<p>If it is not <b class="b">nil</b>, the <i class="i">pretty printer</i> switches to a compact
+style of output (called miser style) whenever the width available for
+printing a substructure is less than or equal to this many <i class="i">ems</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aprint_002dpprint_002ddispatch_002a.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*print-pprint-dispatch* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*print-pprint-dispatch* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*print-pprint-dispatch* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="_002aprint_002dpretty_002a.html" rel="next" title="*print-pretty*">
+<link href="_002aprint_002dmiser_002dwidth_002a.html" rel="prev" title="*print-miser-width*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aprint_002dpprint_002ddispatch_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002dpretty_002a.html" accesskey="n" rel="next">*print-pretty*                                                   [Variable]</a>, Previous: <a href="_002aprint_002dmiser_002dwidth_002a.html" accesskey="p" rel="prev">*print-miser-width*                                              [Variable]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aprint_002dpprint_002ddispatch_002a-_005bVariable_005d"><span>22.4.25 *print-pprint-dispatch*                                          [Variable]<a class="copiable-link" href="#g_t_002aprint_002dpprint_002ddispatch_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-18"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-18"> &para;</a></span></h4>
+
+<p>a <i class="i">pprint dispatch table</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-18"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-18"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>, but the initial entries all use a 
+special class of priorities that have the property that they are less
+than every priority that can be specified using <b class="b">set-pprint-dispatch</b>,
+so that the initial contents of any entry can be overridden.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-613"><span>Description::<a class="copiable-link" href="#Description_003a_003a-613"> &para;</a></span></h4>
+
+<p>The <i class="i">pprint dispatch table</i> which currently controls the <i class="i">pretty printer</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-497"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-497"> &para;</a></span></h4>
+
+<p><b class="b">*print-pretty*</b>,
+<a class="ref" href="Pretty-Print-Dispatch-Tables.html">Pretty Print Dispatch Tables</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-309"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-309"> &para;</a></span></h4>
+
+<p>The intent is that the initial <i class="i">value</i> of this <i class="i">variable</i> should
+cause &lsquo;traditional&rsquo; <i class="i">pretty printing</i> of <i class="i">code</i>.
+In general, however, you can put a value in <b class="b">*print-pprint-dispatch*</b>
+that makes pretty-printed output look exactly like non-pretty-printed output.
+</p>
+<p>Setting <b class="b">*print-pretty*</b> to <i class="i">true</i> 
+just causes the functions contained in the <i class="i">current pprint dispatch table</i> 
+to have priority over normal <b class="b">print-object</b> methods;
+it has no magic way of enforcing that those functions actually produce pretty
+output.  For details, see <a class="ref" href="Pretty-Print-Dispatch-Tables.html">Pretty Print Dispatch Tables</a>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aprint_002dpretty_002a.html
@@ -0,0 +1,116 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*print-pretty* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*print-pretty* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*print-pretty* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="_002aprint_002dreadably_002a.html" rel="next" title="*print-readably*">
+<link href="_002aprint_002dpprint_002ddispatch_002a.html" rel="prev" title="*print-pprint-dispatch*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aprint_002dpretty_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002dreadably_002a.html" accesskey="n" rel="next">*print-readably*                                                 [Variable]</a>, Previous: <a href="_002aprint_002dpprint_002ddispatch_002a.html" accesskey="p" rel="prev">*print-pprint-dispatch*                                          [Variable]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aprint_002dpretty_002a-_005bVariable_005d"><span>22.4.26 *print-pretty*                                                   [Variable]<a class="copiable-link" href="#g_t_002aprint_002dpretty_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-19"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-19"> &para;</a></span></h4>
+
+<p>a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-19"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-19"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-614"><span>Description::<a class="copiable-link" href="#Description_003a_003a-614"> &para;</a></span></h4>
+
+<p>Controls whether the <i class="i">Lisp printer</i> calls the <i class="i">pretty printer</i>.
+</p>
+<p>If it is <i class="i">false</i>,
+the <i class="i">pretty printer</i> is not used and 
+</p>
+<p>a minimum
+</p>
+<p>of <i class="i">whitespace</i>_1
+is output when printing an expression.
+</p>
+<p>If it is <i class="i">true</i>,
+the <i class="i">pretty printer</i> is used, and the <i class="i">Lisp printer</i> will endeavor
+to insert extra <i class="i">whitespace</i>_1 where appropriate to make <i class="i">expressions</i> 
+more readable.
+</p>
+<p><b class="b">*print-pretty*</b> has an effect even when the <i class="i">value</i> of <b class="b">*print-escape*</b>
+is <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-440"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-440"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq *print-pretty* 'nil) &rArr;  NIL
+ (progn (write '(let ((a 1) (b 2) (c 3)) (+ a b c))) nil)
+<code class="t"> |&gt; </code> (LET ((A 1) (B 2) (C 3)) (+ A B C))
+&rArr;  NIL
+ (let ((*print-pretty* t))
+   (progn (write '(let ((a 1) (b 2) (c 3)) (+ a b c))) nil))
+<code class="t"> |&gt; </code> (LET ((A 1)
+<code class="t"> |&gt; </code>       (B 2)
+<code class="t"> |&gt; </code>       (C 3))
+<code class="t"> |&gt; </code>   (+ A B C))
+&rArr;  NIL
+;; Note that the first two expressions printed by this next form
+;; differ from the second two only in whether escape characters are printed.
+;; In all four cases, extra whitespace is inserted by the pretty printer.
+ (flet ((test (x)
+          (let ((*print-pretty* t))
+            (print x)
+            (format t &quot;~
+            (terpri) (princ x) (princ &quot; &quot;)
+            (format t &quot;~
+  (test '#'(lambda () (list &quot;a&quot; #<b class="b">'c</b> #'d))))
+<code class="t"> |&gt; </code> #'(LAMBDA ()
+<code class="t"> |&gt; </code>     (LIST &quot;a&quot; #<b class="b">'C</b> #'D))
+<code class="t"> |&gt; </code> #'(LAMBDA ()
+<code class="t"> |&gt; </code>     (LIST &quot;a&quot; #<b class="b">'C</b> #'D))
+<code class="t"> |&gt; </code> #'(LAMBDA ()
+<code class="t"> |&gt; </code>     (LIST a b 'C #'D)) 
+<code class="t"> |&gt; </code> #'(LAMBDA ()
+<code class="t"> |&gt; </code>     (LIST a b 'C #'D))
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-498"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-498"> &para;</a></span></h4>
+
+<p><a class="ref" href="write.html">write, prin1, print, pprint, princ                               [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002dreadably_002a.html">*print-readably*                                                 [Variable]</a>, Previous: <a href="_002aprint_002dpprint_002ddispatch_002a.html">*print-pprint-dispatch*                                          [Variable]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aprint_002dreadably_002a.html
@@ -0,0 +1,159 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*print-readably* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*print-readably* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*print-readably* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="_002aprint_002dright_002dmargin_002a.html" rel="next" title="*print-right-margin*">
+<link href="_002aprint_002dpretty_002a.html" rel="prev" title="*print-pretty*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aprint_002dreadably_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002dright_002dmargin_002a.html" accesskey="n" rel="next">*print-right-margin*                                             [Variable]</a>, Previous: <a href="_002aprint_002dpretty_002a.html" accesskey="p" rel="prev">*print-pretty*                                                   [Variable]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aprint_002dreadably_002a-_005bVariable_005d"><span>22.4.27 *print-readably*                                                 [Variable]<a class="copiable-link" href="#g_t_002aprint_002dreadably_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-20"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-20"> &para;</a></span></h4>
+
+<p>a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-20"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-20"> &para;</a></span></h4>
+
+<p><i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-615"><span>Description::<a class="copiable-link" href="#Description_003a_003a-615"> &para;</a></span></h4>
+
+<p>If <b class="b">*print-readably*</b> is <i class="i">true</i>,
+some special rules for printing <i class="i">objects</i> go into effect.
+Specifically, printing any <i class="i">object</i> O_1 produces a printed 
+representation that, when seen by the <i class="i">Lisp reader</i> 
+while the <i class="i">standard readtable</i> is in effect,
+will produce 
+an <i class="i">object</i> O_2 that is <i class="i">similar</i> to O_1.
+The printed representation produced might or might not be the same as
+the printed representation produced when <b class="b">*print-readably*</b> is <i class="i">false</i>.
+If printing an <i class="i">object</i> <i class="i">readably</i> is not possible,
+an error of <i class="i">type</i> <b class="b">print-not-readable</b> is signaled rather than 
+using a syntax (<i class="i">e.g.</i>, the &ldquo;<code class="t">#&lt;</code>&rdquo; syntax) that would not be readable by
+the same <i class="i">implementation</i>.
+If the <i class="i">value</i> of some other <i class="i">printer control variable</i> is such
+that these requirements would be violated, the <i class="i">value</i> of that other
+<i class="i">variable</i> is ignored.
+</p>
+<p>Specifically, if <b class="b">*print-readably*</b> is <i class="i">true</i>,
+printing proceeds as if
+      <b class="b">*print-escape*</b>,
+      <b class="b">*print-array*</b>,
+  and <b class="b">*print-gensym*</b> were also <i class="i">true</i>,
+and as if 
+      <b class="b">*print-length*</b>,
+      <b class="b">*print-level*</b>,
+  and <b class="b">*print-lines*</b> were <i class="i">false</i>.
+</p>
+<p>If <b class="b">*print-readably*</b> is <i class="i">false</i>,
+the normal rules for printing and the normal interpretations
+of other <i class="i">printer control variables</i> are in effect.
+</p>
+<p>Individual <i class="i">methods</i> for <b class="b">print-object</b>, including user-defined
+<i class="i">methods</i>, are responsible for implementing these requirements.
+</p>
+<p>If <b class="b">*read-eval*</b> is <i class="i">false</i> and <b class="b">*print-readably*</b> is <i class="i">true</i>,
+any such method that would output a reference to the &ldquo;<code class="t">#.</code>&rdquo; <i class="i">reader macro</i>
+will either output something else or will signal an error (as described above).
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-441"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-441"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((x (list &quot;a&quot; '\a (gensym) '((a (b (c))) d e f g)))
+       (*print-escape* nil)
+       (*print-gensym* nil)
+       (*print-level* 3)
+       (*print-length* 3))
+   (write x)
+   (let ((*print-readably* t))
+     (terpri)
+     (write x)
+     :done))
+<code class="t"> |&gt; </code> (a a G4581 ((A #) D E ...))
+<code class="t"> |&gt; </code> (&quot;a&quot; |a| #:G4581 ((A (B (C))) D E F G))
+&rArr;  :DONE
+
+;; This is setup code is shared between the examples
+;; of three hypothetical implementations which follow.
+ (setq table (make-hash-table)) &rArr;  #&lt;HASH-TABLE EQL 0/120 32005763&gt; 
+ (setf (gethash table 1) 'one) &rArr;  ONE
+ (setf (gethash table 2) 'two) &rArr;  TWO
+
+;; Implementation A
+ (let ((*print-readably* t)) (print table))
+ Error: Can't print #&lt;HASH-TABLE EQL 0/120 32005763&gt; readably.
+
+;; Implementation B
+;; No standardized #S notation for hash tables is defined, 
+;; but there might be an implementation-defined notation.
+ (let ((*print-readably* t)) (print table))
+<code class="t"> |&gt; </code> #S(HASH-TABLE :TEST EQL :SIZE 120 :CONTENTS (1 ONE 2 TWO))
+&rArr;  #&lt;HASH-TABLE EQL 0/120 32005763&gt;
+
+;; Implementation C
+;; Note that #. notation can only be used if *READ-EVAL* is true.
+;; If *READ-EVAL* were false, this same implementation might have to
+;; signal an error unless it had yet another printing strategy to fall
+;; back on.
+ (let ((*print-readably* t)) (print table))
+<code class="t"> |&gt; </code> #.(LET ((HASH-TABLE (MAKE-HASH-TABLE)))
+<code class="t"> |&gt; </code>     (SETF (GETHASH 1 HASH-TABLE) ONE)
+<code class="t"> |&gt; </code>     (SETF (GETHASH 2 HASH-TABLE) TWO)
+<code class="t"> |&gt; </code>     HASH-TABLE)
+&rArr;  #&lt;HASH-TABLE EQL 0/120 32005763&gt;
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-499"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-499"> &para;</a></span></h4>
+
+<p><a class="ref" href="write.html">write, prin1, print, pprint, princ                               [Function]</a>
+, 
+<a class="ref" href="print_002dunreadable_002dobject.html">print-unreadable-object                                             [Macro]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-310"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-310"> &para;</a></span></h4>
+
+<p>The rules for &ldquo;<i class="i">similarity</i>&rdquo; imply that 
+<code class="t">#A</code> or <code class="t">#(</code> 
+syntax cannot be used for <i class="i">arrays</i> of <i class="i">element type</i>
+other than <b class="b">t</b>.  
+An implementation will have to use another syntax 
+or signal an error of <i class="i">type</i> <b class="b">print-not-readable</b>.  
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002dright_002dmargin_002a.html">*print-right-margin*                                             [Variable]</a>, Previous: <a href="_002aprint_002dpretty_002a.html">*print-pretty*                                                   [Variable]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aprint_002dright_002dmargin_002a.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*print-right-margin* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*print-right-margin* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*print-right-margin* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="print_002dnot_002dreadable.html" rel="next" title="print-not-readable">
+<link href="_002aprint_002dreadably_002a.html" rel="prev" title="*print-readably*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aprint_002dright_002dmargin_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="print_002dnot_002dreadable.html" accesskey="n" rel="next">print-not-readable                                         [Condition Type]</a>, Previous: <a href="_002aprint_002dreadably_002a.html" accesskey="p" rel="prev">*print-readably*                                                 [Variable]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aprint_002dright_002dmargin_002a-_005bVariable_005d"><span>22.4.28 *print-right-margin*                                             [Variable]<a class="copiable-link" href="#g_t_002aprint_002dright_002dmargin_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-21"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-21"> &para;</a></span></h4>
+
+<p>a non-negative <i class="i">integer</i>, or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-21"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-21"> &para;</a></span></h4>
+
+<p><b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-616"><span>Description::<a class="copiable-link" href="#Description_003a_003a-616"> &para;</a></span></h4>
+
+<p>If it is <i class="i">non-nil</i>, it specifies the right margin (as <i class="i">integer</i>
+number of <i class="i">ems</i>) to use when the <i class="i">pretty printer</i> is making
+layout decisions.
+</p>
+<p>If it is <b class="b">nil</b>, the right margin is taken to be the maximum line length 
+such that output can be displayed without wraparound or truncation.
+If this cannot be determined, an <i class="i">implementation-dependent</i> value is used.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-311"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-311"> &para;</a></span></h4>
+
+<p>This measure is in units of <i class="i">ems</i> in order to be compatible with
+<i class="i">implementation-defined</i> variable-width fonts while still not 
+requiring the language to provide support for fonts.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002arandom_002dstate_002a.html
@@ -0,0 +1,96 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*random-state* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*random-state* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*random-state* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="numberp.html" rel="next" title="numberp">
+<link href="random_002dstate_002dp.html" rel="prev" title="random-state-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002arandom_002dstate_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="numberp.html" accesskey="n" rel="next">numberp                                                          [Function]</a>, Previous: <a href="random_002dstate_002dp.html" accesskey="p" rel="prev">random-state-p                                                   [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002arandom_002dstate_002a-_005bVariable_005d"><span>12.2.43 *random-state*                                                   [Variable]<a class="copiable-link" href="#g_t_002arandom_002dstate_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-5"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-5"> &para;</a></span></h4>
+
+<p>a <i class="i">random state</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-5"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-5"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-308"><span>Description::<a class="copiable-link" href="#Description_003a_003a-308"> &para;</a></span></h4>
+
+<p>The <i class="i">current random state</i>, which is used, for example,
+by the <i class="i">function</i> <b class="b">random</b> when a <i class="i">random state</i> is not explicitly supplied.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-211"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-211"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (random-state-p *random-state*) &rArr;  <i class="i">true</i>
+ (setq snap-shot (make-random-state))
+ ;; The series from any given point is random,
+ ;; but if you backtrack to that point, you get the same series.
+ (list (loop for i from 1 to 10 collect (random))
+       (let ((*random-state* snap-shot))
+         (loop for i from 1 to 10 collect (random)))
+       (loop for i from 1 to 10 collect (random))
+       (let ((*random-state* snap-shot))
+         (loop for i from 1 to 10 collect (random))))
+&rArr;  ((19 16 44 19 96 15 76 96 13 61)
+    (19 16 44 19 96 15 76 96 13 61)
+    (16 67 0 43 70 79 58 5 63 50)
+    (16 67 0 43 70 79 58 5 63 50))
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-56"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-56"> &para;</a></span></h4>
+
+<p>The <i class="i">implementation</i>.
+</p>
+<p><b class="b">random</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-261"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-261"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002drandom_002dstate.html">make-random-state                                                [Function]</a>
+,
+<a class="ref" href="random.html">random                                                           [Function]</a>
+,
+<b class="b">random-state</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-158"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-158"> &para;</a></span></h4>
+
+<p><i class="i">Binding</i> <b class="b">*random-state*</b> to a different 
+<i class="i">random state</i> <i class="i">object</i> correctly saves and 
+restores the old <i class="i">random state</i> <i class="i">object</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aread_002dbase_002a.html
@@ -0,0 +1,90 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*read-base* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*read-base* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*read-base* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="_002aread_002ddefault_002dfloat_002dformat_002a.html" rel="next" title="*read-default-float-format*">
+<link href="with_002dstandard_002dio_002dsyntax.html" rel="prev" title="with-standard-io-syntax">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aread_002dbase_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aread_002ddefault_002dfloat_002dformat_002a.html" accesskey="n" rel="next">*read-default-float-format*                                      [Variable]</a>, Previous: <a href="with_002dstandard_002dio_002dsyntax.html" accesskey="p" rel="prev">with-standard-io-syntax                                             [Macro]</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aread_002dbase_002a-_005bVariable_005d"><span>23.2.13 *read-base*                                                      [Variable]<a class="copiable-link" href="#g_t_002aread_002dbase_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-22"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-22"> &para;</a></span></h4>
+
+<p>a <i class="i">radix</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-22"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-22"> &para;</a></span></h4>
+
+<p><code class="t">10</code>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-632"><span>Description::<a class="copiable-link" href="#Description_003a_003a-632"> &para;</a></span></h4>
+
+<p>Controls the interpretation of tokens by <b class="b">read</b> as being
+<i class="i">integers</i> or <i class="i">ratios</i>.  
+</p>
+<p>The <i class="i">value</i> of <b class="b">*read-base*</b>, called the <i class="i">current input base</i>
+<a class="index-entry-id" id="index-current-input-base"></a>
+,
+is the radix in which <i class="i">integers</i> and
+<i class="i">ratios</i> are to be read by the <i class="i">Lisp reader</i>.
+The parsing of other numeric <i class="i">types</i> (<i class="i">e.g.</i>, <i class="i">floats</i>) is 
+not affected by this option.
+</p>
+<p>The effect of <b class="b">*read-base*</b> on the reading of any particular
+<i class="i">rational</i> number can be locally overridden by explicit use of the
+<code class="t">#O</code>, <code class="t">#X</code>, <code class="t">#B</code>, or <code class="t">#<i class="i">n</i>R</code> syntax
+or by a trailing decimal point.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-453"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-453"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (dotimes (i 6)
+   (let ((*read-base* (+ 10. i)))
+     (let ((object (read-from-string &quot;(\\DAD DAD |BEE| BEE 123. 123)&quot;)))
+       (print (list *read-base* object)))))
+<code class="t"> |&gt; </code> (10 (DAD DAD BEE BEE 123 123))
+<code class="t"> |&gt; </code> (11 (DAD DAD BEE BEE 123 146))
+<code class="t"> |&gt; </code> (12 (DAD DAD BEE BEE 123 171))
+<code class="t"> |&gt; </code> (13 (DAD DAD BEE BEE 123 198))
+<code class="t"> |&gt; </code> (14 (DAD 2701 BEE BEE 123 227))
+<code class="t"> |&gt; </code> (15 (DAD 3088 BEE 2699 123 258))
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-319"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-319"> &para;</a></span></h4>
+
+<p>Altering the input radix can be useful when reading data files in special formats.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aread_002ddefault_002dfloat_002dformat_002a.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*read-default-float-format* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*read-default-float-format* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*read-default-float-format* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="_002aread_002deval_002a.html" rel="next" title="*read-eval*">
+<link href="_002aread_002dbase_002a.html" rel="prev" title="*read-base*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aread_002ddefault_002dfloat_002dformat_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aread_002deval_002a.html" accesskey="n" rel="next">*read-eval*                                                      [Variable]</a>, Previous: <a href="_002aread_002dbase_002a.html" accesskey="p" rel="prev">*read-base*                                                      [Variable]</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aread_002ddefault_002dfloat_002dformat_002a-_005bVariable_005d"><span>23.2.14 *read-default-float-format*                                      [Variable]<a class="copiable-link" href="#g_t_002aread_002ddefault_002dfloat_002dformat_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-23"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-23"> &para;</a></span></h4>
+
+<p>one of the <i class="i">atomic type specifiers</i> 
+    <b class="b">short-float</b>,
+    <b class="b">single-float</b>,
+    <b class="b">double-float</b>,
+ or <b class="b">long-float</b>, 
+ or else some other <i class="i">type specifier</i> defined 
+    by the <i class="i">implementation</i> to be acceptable.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-23"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-23"> &para;</a></span></h4>
+
+<p>The <i class="i">symbol</i> <b class="b">single-float</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-633"><span>Description::<a class="copiable-link" href="#Description_003a_003a-633"> &para;</a></span></h4>
+
+<p>Controls the floating-point format that is to be used when reading a
+floating-point number that has no <i class="i">exponent marker</i> or that has
+<code class="t">e</code> or <code class="t">E</code> for an <i class="i">exponent marker</i>.  Other <i class="i">exponent markers</i>
+explicitly prescribe the floating-point format to be used.
+</p>
+<p>The printer uses <b class="b">*read-default-float-format*</b> to guide the
+choice of <i class="i">exponent markers</i> when printing floating-point numbers.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-454"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-454"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((*read-default-float-format* 'double-float))
+   (read-from-string &quot;(1.0 1.0e0 1.0s0 1.0f0 1.0d0 1.0L0)&quot;))
+&rArr;  (1.0   1.0   1.0   1.0 1.0   1.0)   ;Implementation has float format F.
+&rArr;  (1.0   1.0   1.0s0 1.0 1.0   1.0)   ;Implementation has float formats S and F.
+&rArr;  (1.0d0 1.0d0 1.0   1.0 1.0d0 1.0d0) ;Implementation has float formats F and D.
+&rArr;  (1.0d0 1.0d0 1.0s0 1.0 1.0d0 1.0d0) ;Implementation has float formats S, F, D.
+&rArr;  (1.0d0 1.0d0 1.0   1.0 1.0d0 1.0L0) ;Implementation has float formats F, D, L.
+&rArr;  (1.0d0 1.0d0 1.0s0 1.0 1.0d0 1.0L0) ;Implementation has formats S, F, D, L.
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aread_002deval_002a.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*read-eval* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*read-eval* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*read-eval* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="_002aread_002dsuppress_002a.html" rel="next" title="*read-suppress*">
+<link href="_002aread_002ddefault_002dfloat_002dformat_002a.html" rel="prev" title="*read-default-float-format*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aread_002deval_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aread_002dsuppress_002a.html" accesskey="n" rel="next">*read-suppress*                                                  [Variable]</a>, Previous: <a href="_002aread_002ddefault_002dfloat_002dformat_002a.html" accesskey="p" rel="prev">*read-default-float-format*                                      [Variable]</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aread_002deval_002a-_005bVariable_005d"><span>23.2.15 *read-eval*                                                      [Variable]<a class="copiable-link" href="#g_t_002aread_002deval_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-24"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-24"> &para;</a></span></h4>
+
+<p>a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-24"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-24"> &para;</a></span></h4>
+
+<p><i class="i">true</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-634"><span>Description::<a class="copiable-link" href="#Description_003a_003a-634"> &para;</a></span></h4>
+
+<p>If it is <i class="i">true</i>, the <code class="t">#.</code> <i class="i">reader macro</i> has its normal effect.
+Otherwise, that <i class="i">reader macro</i> signals an error of <i class="i">type</i> <b class="b">reader-error</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-514"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-514"> &para;</a></span></h4>
+
+<p><b class="b">*print-readably*</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-320"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-320"> &para;</a></span></h4>
+
+<p>If <b class="b">*read-eval*</b> is <i class="i">false</i> and <b class="b">*print-readably*</b> is <i class="i">true</i>, 
+any <i class="i">method</i> for <b class="b">print-object</b> that would output a reference
+to the <code class="t">#.</code> <i class="i">reader macro</i> either outputs something different
+or signals an error of <i class="i">type</i> <b class="b">print-not-readable</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aread_002dsuppress_002a.html
@@ -0,0 +1,157 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*read-suppress* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*read-suppress* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*read-suppress* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="_002areadtable_002a.html" rel="next" title="*readtable*">
+<link href="_002aread_002deval_002a.html" rel="prev" title="*read-eval*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aread_002dsuppress_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="_002areadtable_002a.html" accesskey="n" rel="next">*readtable*                                                      [Variable]</a>, Previous: <a href="_002aread_002deval_002a.html" accesskey="p" rel="prev">*read-eval*                                                      [Variable]</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aread_002dsuppress_002a-_005bVariable_005d"><span>23.2.16 *read-suppress*                                                  [Variable]<a class="copiable-link" href="#g_t_002aread_002dsuppress_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-25"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-25"> &para;</a></span></h4>
+
+<p>a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-25"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-25"> &para;</a></span></h4>
+
+<p><i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-635"><span>Description::<a class="copiable-link" href="#Description_003a_003a-635"> &para;</a></span></h4>
+
+<p>This variable is intended primarily to support the operation of the
+read-time conditional notations <code class="t">#+</code> and <code class="t">#-</code>. It is important for the
+<i class="i">reader macros</i> which implement these notations
+to be able to skip over the printed representation of an
+<i class="i">expression</i> despite the possibility that the syntax of the skipped
+<i class="i">expression</i> may not be entirely valid for the current implementation,
+since <code class="t">#+</code> and <code class="t">#-</code> exist in order to allow the same program to be
+shared among several <span class="r">Lisp</span> implementations (including dialects other than <span class="r">Common Lisp</span>)
+despite small incompatibilities of syntax.
+</p>
+<p>If it is <i class="i">false</i>, the <i class="i">Lisp reader</i> operates normally.
+</p>
+<p>If the <i class="i">value</i> of <b class="b">*read-suppress*</b> is <i class="i">true</i>,
+      <b class="b">read</b>,
+      <b class="b">read-preserving-whitespace</b>,
+      <b class="b">read-delimited-list</b>,
+  and <b class="b">read-from-string</b>
+all return a <i class="i">primary value</i> of <b class="b">nil</b> when they complete successfully;
+however, they continue to parse the representation of an <i class="i">object</i>
+in the normal way, in order to skip over the <i class="i">object</i>,
+and continue to indicate <i class="i">end of file</i> in the normal way.
+Except as noted below,
+any <i class="i">standardized</i> <i class="i">reader macro</i>_2
+that is defined to <i class="i">read</i>_2 
+a following <i class="i">object</i> or <i class="i">token</i> 
+will do so,
+but not signal an error if the <i class="i">object</i>
+read is not of an appropriate type or syntax.
+The <i class="i">standard syntax</i> and its associated <i class="i">reader macros</i>
+will not construct any new <i class="i">objects</i> 
+ (<i class="i">e.g.</i>, when reading the representation of a <i class="i">symbol</i>,
+      no <i class="i">symbol</i> will be constructed or interned).
+</p>
+<dl class="table">
+<dt>Extended tokens</dt>
+<dd><p>All extended tokens are completely uninterpreted.
+Errors such as those that might otherwise be signaled due to
+     detection of invalid <i class="i">potential numbers</i>,
+     invalid patterns of <i class="i">package markers</i>,
+ and invalid uses of the <i class="i">dot</i> character are suppressed.
+</p>
+</dd>
+<dt>Dispatching macro characters (including <i class="i">sharpsign</i>)</dt>
+<dd><p><i class="i">Dispatching macro characters</i> continue to parse an infix numerical
+argument, and invoke the dispatch function.  The <i class="i">standardized</i>
+<i class="i">sharpsign</i> <i class="i">reader macros</i> do not enforce any constraints
+on either the presence of or the value of the numerical argument.
+</p>
+</dd>
+<dt>#=</dt>
+<dd><p>The <code class="t">#=</code> notation is totally ignored.  It does not read
+a following <i class="i">object</i>. It produces no <i class="i">object</i>,
+but is treated as <i class="i">whitespace</i>_2.
+</p>
+</dd>
+<dt>##</dt>
+<dd><p>The <code class="t">##</code> notation always produces <b class="b">nil</b>.
+</p></dd>
+</dl>
+
+<p>No matter what the <i class="i">value</i> of <b class="b">*read-suppress*</b>,
+parentheses still continue to delimit and construct <i class="i">lists</i>;
+the <code class="t">#(</code> notation continues to delimit <i class="i">vectors</i>;
+and comments, <i class="i">strings</i>, 
+and the <i class="i">single-quote</i> and <i class="i">backquote</i> notations continue to be
+interpreted properly.  Such situations as
+<code class="t">')</code>,	<code class="t">#&lt;</code>, 
+<code class="t">#)</code>, and <code class="t">#&lt;<i class="i">Space</i>&gt;</code> continue to signal errors.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-455"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-455"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((*read-suppress* t))
+   (mapcar #'read-from-string
+           '(&quot;#(foo bar baz)&quot; &quot;#P(:type :lisp)&quot; &quot;#c1.2&quot;
+             &quot;#.(PRINT 'FOO)&quot; &quot;#3AHELLO&quot; &quot;#S(INTEGER)&quot;
+             &quot;#*ABC&quot; &quot;#\GARBAGE&quot; &quot;#RALPHA&quot; &quot;#3R444&quot;)))
+&rArr;  (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-515"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-515"> &para;</a></span></h4>
+
+<p><a class="ref" href="read.html">read, read-preserving-whitespace                                 [Function]</a>
+,
+<a class="ref" href="Syntax.html">Syntax</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-321"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-321"> &para;</a></span></h4>
+
+<p><i class="i">Programmers</i> and <i class="i">implementations</i> that define additional
+<i class="i">macro characters</i> are strongly encouraged to make them respect
+<b class="b">*read-suppress*</b> just as <i class="i">standardized</i> <i class="i">macro characters</i> do.
+That is, when the <i class="i">value</i> of <b class="b">*read-suppress*</b> is <i class="i">true</i>,
+they should ignore type errors when reading a following <i class="i">object</i>
+and the <i class="i">functions</i> that implement <i class="i">dispatching macro characters</i>
+should tolerate <b class="b">nil</b> as their infix <i class="i">parameter</i> value even if a numeric
+value would ordinarily be required.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002areadtable_002a.html">*readtable*                                                      [Variable]</a>, Previous: <a href="_002aread_002deval_002a.html">*read-eval*                                                      [Variable]</a>, Up: <a href="Reader-Dictionary.html">Reader Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002areadtable_002a.html
@@ -0,0 +1,87 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*readtable* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*readtable* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*readtable* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="reader_002derror.html" rel="next" title="reader-error">
+<link href="_002aread_002dsuppress_002a.html" rel="prev" title="*read-suppress*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002areadtable_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="reader_002derror.html" accesskey="n" rel="next">reader-error                                               [Condition Type]</a>, Previous: <a href="_002aread_002dsuppress_002a.html" accesskey="p" rel="prev">*read-suppress*                                                  [Variable]</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002areadtable_002a-_005bVariable_005d"><span>23.2.17 *readtable*                                                      [Variable]<a class="copiable-link" href="#g_t_002areadtable_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-26"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-26"> &para;</a></span></h4>
+
+<p>a <i class="i">readtable</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-26"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-26"> &para;</a></span></h4>
+
+<p>A <i class="i">readtable</i> that conforms to the description of <span class="r">Common Lisp</span> syntax in <a class="ref" href="Syntax.html">Syntax</a>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-636"><span>Description::<a class="copiable-link" href="#Description_003a_003a-636"> &para;</a></span></h4>
+
+<p>The <i class="i">value</i> of <b class="b">*readtable*</b> is called the <i class="i">current readtable</i>.
+It controls the parsing behavior of the <i class="i">Lisp reader</i>,
+and can also influence the <i class="i">Lisp printer</i> (<i class="i">e.g.</i>, see the <i class="i">function</i> <b class="b">readtable-case</b>).
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-456"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-456"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (readtablep *readtable*) &rArr;  <i class="i">true</i>
+ (setq zvar 123) &rArr;  123
+ (set-syntax-from-char #\z #\' (setq table2 (copy-readtable))) &rArr;  T
+ zvar &rArr;  123
+ (setq *readtable* table2) &rArr;  #&lt;READTABLE&gt;
+ zvar &rArr;  VAR
+ (setq *readtable* (copy-readtable nil)) &rArr;  #&lt;READTABLE&gt;
+ zvar &rArr;  123
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-112"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-112"> &para;</a></span></h4>
+
+<p><b class="b">compile-file</b>,
+<b class="b">load</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-516"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-516"> &para;</a></span></h4>
+
+<p><a class="ref" href="compile_002dfile.html">compile-file                                                     [Function]</a>
+,
+<a class="ref" href="load.html">load                                                             [Function]</a>
+,
+<a class="ref" href="readtable.html">readtable                                                    [System Class]</a>
+,
+<a class="ref" href="The-Current-Readtable.html">The Current Readtable</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002aterminal_002dio_002a.html
@@ -0,0 +1,96 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>*terminal-io* (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="*terminal-io* (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="*terminal-io* (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="stream_002derror.html" rel="next" title="stream-error">
+<link href="_002adebug_002dio_002a.html" rel="prev" title="*debug-io*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002aterminal_002dio_002a">
+<div class="nav-panel">
+<p>
+Next: <a href="stream_002derror.html" accesskey="n" rel="next">stream-error                                               [Condition Type]</a>, Previous: <a href="_002adebug_002dio_002a.html" accesskey="p" rel="prev">*debug-io*, *error-output*, *query-io*,</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002aterminal_002dio_002a-_005bVariable_005d"><span>21.2.54 *terminal-io*                                                    [Variable]<a class="copiable-link" href="#g_t_002aterminal_002dio_002a-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-8"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-8"> &para;</a></span></h4>
+
+<p>a <i class="i">bidirectional</i> <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-8"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-8"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>, but
+it must be an <i class="i">open</i> <i class="i">stream</i> 
+that is not a  <i class="i">generalized synonym stream</i>
+to an <i class="i">I/O customization variables</i>
+but that might be a <i class="i">generalized synonym stream</i> to 
+the <i class="i">value</i> of some <i class="i">I/O customization variable</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-585"><span>Description::<a class="copiable-link" href="#Description_003a_003a-585"> &para;</a></span></h4>
+
+<p>The <i class="i">value</i> of <b class="b">*terminal-io*</b>, called  <i class="i">terminal I/O</i>, is ordinarily 
+a <i class="i">bidirectional</i> <i class="i">stream</i> that connects to the user&rsquo;s console.
+Typically, writing to this <i class="i">stream</i> 
+would cause the output to appear
+on a display screen, for example, and reading from the <i class="i">stream</i> would
+accept input from a keyboard.  It is intended
+that standard input functions such as <b class="b">read</b> and <b class="b">read-char</b>,
+when used with this <i class="i">stream</i>, cause echoing of the input
+into the output side of the <i class="i">stream</i>. The means by which this is
+accomplished are <i class="i">implementation-dependent</i>.
+</p>
+<p>The effect of changing the <i class="i">value</i> of <b class="b">*terminal-io*</b>,
+either by <i class="i">binding</i> or <i class="i">assignment</i>,
+is <i class="i">implementation-defined</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-426"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-426"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (progn (prin1 'foo) (prin1 'bar *terminal-io*))
+<code class="t"> |&gt; </code> FOOBAR
+&rArr;  BAR
+ (with-output-to-string (*standard-output*)
+   (prin1 'foo) 
+   (prin1 'bar *terminal-io*))
+<code class="t"> |&gt; </code> BAR
+&rArr;  &quot;FOO&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-476"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-476"> &para;</a></span></h4>
+
+<p><b class="b">*debug-io*</b>,
+<b class="b">*error-output*</b>,
+<b class="b">*query-io*</b>,
+<b class="b">*standard-input*</b>,
+<b class="b">*standard-output*</b>,
+<b class="b">*trace-output*</b>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002b-_0028Variable_0029.html
@@ -0,0 +1,88 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>+ (Variable) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="+ (Variable) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="+ (Variable) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="_002a-_0028Variable_0029.html" rel="next" title="* (Variable)">
+<link href="_002d-_0028Variable_0029.html" rel="prev" title="- (Variable)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002b-_0028Variable_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="_002a-_0028Variable_0029.html" accesskey="n" rel="next">*, **, ***                                                       [Variable]</a>, Previous: <a href="_002d-_0028Variable_0029.html" accesskey="p" rel="prev">-                                                              [Variable]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002b_002c-_002b_002b_002c-_002b_002b_002b-_005bVariable_005d"><span>25.2.21 +, ++, +++                                                       [Variable]<a class="copiable-link" href="#g_t_002b_002c-_002b_002b_002c-_002b_002b_002b-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-34"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-34"> &para;</a></span></h4>
+
+<p>an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-34"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-34"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-669"><span>Description::<a class="copiable-link" href="#Description_003a_003a-669"> &para;</a></span></h4>
+
+<p>The <i class="i">variables</i> <b class="b">+</b>, <b class="b">++</b>, and <b class="b">+++</b> are maintained by the
+<i class="i">Lisp read-eval-print loop</i> to save <i class="i">forms</i> that were
+recently <i class="i">evaluated</i>.
+</p>
+<p>The <i class="i">value</i> of <b class="b">+</b>   is the last <i class="i">form</i> that was <i class="i">evaluated</i>,
+the <i class="i">value</i> of <b class="b">++</b>  is the previous value of <b class="b">+</b>, and
+the <i class="i">value</i> of <b class="b">+++</b> is the previous value of <b class="b">++</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-469"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-469"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted">(+ 0 1) &rArr;  1
+(- 4 2) &rArr;  2
+(/ 9 3) &rArr;  3
+(list + ++ +++) &rArr;  ((/ 9 3) (- 4 2) (+ 0 1))
+(setq a 1 b 2 c 3 d (list a b c)) &rArr;  (1 2 3)
+(setq a 4 b 5 c 6 d (list a b c)) &rArr;  (4 5 6)
+(list a b c) &rArr;  (4 5 6)
+(eval +++) &rArr;  (1 2 3)
+#.`(,@++ d) &rArr;  (1 2 3 (1 2 3))
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-133"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-133"> &para;</a></span></h4>
+
+<p><i class="i">Lisp read-eval-print loop</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-544"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-544"> &para;</a></span></h4>
+
+<p><a class="ref" href="_002d.html">-                                                              [Function]</a>
+ (<i class="i">variable</i>),
+<b class="b">*</b> (<i class="i">variable</i>),
+<a class="ref" href="_002f.html">/                                                                [Function]</a>
+ (<i class="i">variable</i>), 
+<a class="ref" href="Top-level-loop.html">Top level loop</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002b.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>+ (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="+ (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="+ (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="_002d.html" rel="next" title="-">
+<link href="_002a.html" rel="prev" title="*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002b">
+<div class="nav-panel">
+<p>
+Next: <a href="_002d.html" accesskey="n" rel="next">-                                                              [Function]</a>, Previous: <a href="_002a.html" accesskey="p" rel="prev">*                                                                [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002b-_005bFunction_005d"><span>12.2.25 +                                                                [Function]<a class="copiable-link" href="#g_t_002b-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">+</code>  <i class="i"><span class="r">&amp;rest</span> numbers</i> &rArr;  <i class="i">sum</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-210"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-210"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">sum</i>&mdash;a <i class="i">number</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-290"><span>Description::<a class="copiable-link" href="#Description_003a_003a-290"> &para;</a></span></h4>
+
+<p>Returns the sum of <i class="i">numbers</i>,
+performing any necessary type conversions in the process.
+If no <i class="i">numbers</i> are supplied, <code class="t">0</code> is returned.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-194"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-194"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (+) &rArr;  0
+ (+ 1) &rArr;  1
+ (+ 31/100 69/100) &rArr;  1
+ (+ 1/5 0.8) &rArr;  1.0
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-85"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-85"> &para;</a></span></h4>
+
+<p>Might signal <b class="b">type-error</b> if some <i class="i">argument</i> is not a <i class="i">number</i>.
+Might signal <b class="b">arithmetic-error</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-244"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-244"> &para;</a></span></h4>
+
+<p><a class="ref" href="Numeric-Operations.html">Numeric Operations</a>,
+<a class="ref" href="Rational-Computations.html">Rational Computations</a>,
+<a class="ref" href="Floating_002dpoint-Computations.html">Floating-point Computations</a>,
+<a class="ref" href="Complex-Computations.html">Complex Computations</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002d-_0028Variable_0029.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>- (Variable) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="- (Variable) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="- (Variable) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="_002b-_0028Variable_0029.html" rel="next" title="+ (Variable)">
+<link href="dribble.html" rel="prev" title="dribble">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002d-_0028Variable_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="_002b-_0028Variable_0029.html" accesskey="n" rel="next">+, ++, +++                                                       [Variable]</a>, Previous: <a href="dribble.html" accesskey="p" rel="prev">dribble                                                          [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002d-_005bVariable_005d"><span>25.2.20 -                                                              [Variable]<a class="copiable-link" href="#g_t_002d-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-33"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-33"> &para;</a></span></h4>
+
+<p>a <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-33"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-33"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-668"><span>Description::<a class="copiable-link" href="#Description_003a_003a-668"> &para;</a></span></h4>
+
+<p>The <i class="i">value</i> of <b class="b">-</b> is the <i class="i">form</i> that is currently being evaluated by
+the <i class="i">Lisp read-eval-print loop</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-468"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-468"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">(format t &quot;~&amp;Evaluating ~S~
+<code class="t"> |&gt; </code> Evaluating (FORMAT T &quot;~&amp;Evaluating ~S~
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-132"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-132"> &para;</a></span></h4>
+
+<p><i class="i">Lisp read-eval-print loop</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-543"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-543"> &para;</a></span></h4>
+
+<p><b class="b">+</b> (<i class="i">variable</i>),
+<b class="b">*</b> (<i class="i">variable</i>),
+<a class="ref" href="_002f.html">/                                                                [Function]</a>
+ (<i class="i">variable</i>), 
+<a class="ref" href="Top-level-loop.html">Top level loop</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002d.html
@@ -0,0 +1,91 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>- (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="- (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="- (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="_002f.html" rel="next" title="/">
+<link href="_002b.html" rel="prev" title="+">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002d">
+<div class="nav-panel">
+<p>
+Next: <a href="_002f.html" accesskey="n" rel="next">/                                                                [Function]</a>, Previous: <a href="_002b.html" accesskey="p" rel="prev">+                                                                [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002d-_005bFunction_005d"><span>12.2.26 -                                                              [Function]<a class="copiable-link" href="#g_t_002d-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">-</code>  <i class="i">number</i> &rArr;  <i class="i">negation</i>
+</p>
+<p><code class="code">-</code>  <i class="i">minuend <span class="r">&amp;rest</span> subtrahends^+</i> &rArr;  <i class="i">difference</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-211"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-211"> &para;</a></span></h4>
+
+<p><i class="i">number</i>, <i class="i">minuend</i>, <i class="i">subtrahend</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">negation</i>, <i class="i">difference</i>&mdash;a <i class="i">number</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-291"><span>Description::<a class="copiable-link" href="#Description_003a_003a-291"> &para;</a></span></h4>
+
+<p>The <i class="i">function</i> <b class="b">-</b> performs arithmetic subtraction and negation.
+</p>
+<p>If only one <i class="i">number</i> is supplied,
+the negation of that <i class="i">number</i> is returned.
+</p>
+<p>If more than one <i class="i">argument</i> is given, 
+it subtracts all of the <i class="i">subtrahends</i> from the <i class="i">minuend</i>
+and returns the result.
+</p>
+<p>The <i class="i">function</i> <b class="b">-</b> performs necessary type conversions. 
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-195"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-195"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (- 55.55) &rArr;  -55.55
+ (- #c(3 -5)) &rArr;  #C(-3 5)
+ (- 0) &rArr;  0
+ (eql (- 0.0) -0.0) &rArr;  <i class="i">true</i>
+ (- #c(100 45) #c(0 45)) &rArr;  100
+ (- 10 1 2 3 4) &rArr;  0
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-86"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-86"> &para;</a></span></h4>
+
+<p>Might signal <b class="b">type-error</b> if some <i class="i">argument</i> is not a <i class="i">number</i>.
+Might signal <b class="b">arithmetic-error</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-245"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-245"> &para;</a></span></h4>
+
+<p><a class="ref" href="Numeric-Operations.html">Numeric Operations</a>,
+<a class="ref" href="Rational-Computations.html">Rational Computations</a>,
+<a class="ref" href="Floating_002dpoint-Computations.html">Floating-point Computations</a>,
+<a class="ref" href="Complex-Computations.html">Complex Computations</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002d_003eUNSPECIFIC-as-a-Component-Value.html
@@ -0,0 +1,68 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>-&gt;UNSPECIFIC as a Component Value (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="-&gt;UNSPECIFIC as a Component Value (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="-&gt;UNSPECIFIC as a Component Value (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="Relation-between-component-values-NIL-and-_002d_003eUNSPECIFIC.html" rel="next" title="Relation between component values NIL and -&gt;UNSPECIFIC">
+<link href="_002d_003eWILD-as-a-Component-Value.html" rel="prev" title="-&gt;WILD as a Component Value">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="g_t_002d_003eUNSPECIFIC-as-a-Component-Value">
+<div class="nav-panel">
+<p>
+Next: <a href="Relation-between-component-values-NIL-and-_002d_003eUNSPECIFIC.html" accesskey="n" rel="next">Relation between component values NIL and :UNSPECIFIC</a>, Previous: <a href="_002d_003eWILD-as-a-Component-Value.html" accesskey="p" rel="prev">:WILD as a Component Value</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="g_t_003aUNSPECIFIC-as-a-Component-Value"><span>19.2.2.9 :UNSPECIFIC as a Component Value<a class="copiable-link" href="#g_t_003aUNSPECIFIC-as-a-Component-Value"> &para;</a></span></h4>
+
+<p>If <code class="t">:unspecific</code>
+ is the value of a <i class="i">pathname</i> component,
+the component is considered to be &ldquo;absent&rdquo; 
+or to &ldquo;have no meaning&rdquo;
+in the <i class="i">filename</i> being represented by the <i class="i">pathname</i>.
+</p>
+<p>Whether a value of <code class="t">:unspecific</code> is permitted for any component
+on any given <i class="i">file system</i> accessible to the <i class="i">implementation</i>
+is <i class="i">implementation-defined</i>.
+A <i class="i">conforming program</i> must never unconditionally use a
+<code class="t">:unspecific</code> as the value of a <i class="i">pathname</i> component because
+such a value is not guaranteed to be permissible in all implementations.
+However, a <i class="i">conforming program</i> can, if it is careful, 
+successfully manipulate user-supplied data 
+which contains or refers to non-portable <i class="i">pathname</i> components.
+And certainly a <i class="i">conforming program</i> should be prepared for the
+possibility that any components of a <i class="i">pathname</i> could be <code class="t">:unspecific</code>.
+</p>
+<p>When <i class="i">reading</i>_1 the value of any <i class="i">pathname</i> component,
+<i class="i">conforming programs</i> should be prepared for the value to be <code class="t">:unspecific</code>.
+</p>
+<p>When <i class="i">writing</i>_1 the value of any <i class="i">pathname</i> component,
+the consequences are undefined if <code class="t">:unspecific</code> is given 
+for a <i class="i">pathname</i> in a <i class="i">file system</i> for which it does not make sense.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002d_003eWILD-as-a-Component-Value.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>-&gt;WILD as a Component Value (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="-&gt;WILD as a Component Value (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="-&gt;WILD as a Component Value (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Interpreting-Pathname-Component-Values.html" rel="up" title="Interpreting Pathname Component Values">
+<link href="_002d_003eUNSPECIFIC-as-a-Component-Value.html" rel="next" title="-&gt;UNSPECIFIC as a Component Value">
+<link href="NIL-as-a-Component-Value.html" rel="prev" title="NIL as a Component Value">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsubsection-level-extent" id="g_t_002d_003eWILD-as-a-Component-Value">
+<div class="nav-panel">
+<p>
+Next: <a href="_002d_003eUNSPECIFIC-as-a-Component-Value.html" accesskey="n" rel="next">:UNSPECIFIC as a Component Value</a>, Previous: <a href="NIL-as-a-Component-Value.html" accesskey="p" rel="prev">NIL as a Component Value</a>, Up: <a href="Interpreting-Pathname-Component-Values.html" accesskey="u" rel="up">Interpreting Pathname Component Values</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsubsection" id="g_t_003aWILD-as-a-Component-Value"><span>19.2.2.8 :WILD as a Component Value<a class="copiable-link" href="#g_t_003aWILD-as-a-Component-Value"> &para;</a></span></h4>
+
+<p>If <code class="t">:wild</code>
+ is the value of a <i class="i">pathname</i> component,
+that component is considered to be a wildcard, which matches anything.
+</p>
+<p>A <i class="i">conforming program</i> must be prepared to encounter a value of <code class="t">:wild</code>
+as the value of any <i class="i">pathname</i> component,
+or as an <i class="i">element</i> of a <i class="i">list</i> that is the value of the directory component.
+</p>
+<p>When constructing a <i class="i">pathname</i>,
+a <i class="i">conforming program</i> may use <code class="t">:wild</code> as the value of any or all of
+the directory, name, type, 
+or version component, but must not use <code class="t">:wild</code> as the value of the host,
+or device component.
+</p>
+<p>If <code class="t">:wild</code> is used as the value of the directory component in the construction
+of a <i class="i">pathname</i>, the effect is equivalent to specifying the list
+<code class="t">(:absolute :wild-inferiors)</code>,
+or the same as <code class="t">(:absolute :wild)</code> in a <i class="i">file system</i> that does not support
+<code class="t">:wild-inferiors</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002f-_0028Variable_0029.html
@@ -0,0 +1,86 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>/ (Variable) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="/ (Variable) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="/ (Variable) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="lisp_002dimplementation_002dtype.html" rel="next" title="lisp-implementation-type">
+<link href="_002a-_0028Variable_0029.html" rel="prev" title="* (Variable)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002f-_0028Variable_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="lisp_002dimplementation_002dtype.html" accesskey="n" rel="next">lisp-implementation-type,</a>, Previous: <a href="_002a-_0028Variable_0029.html" accesskey="p" rel="prev">*, **, ***                                                       [Variable]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002f_002c-_002f_002f_002c-_002f_002f_002f-_005bVariable_005d"><span>25.2.23 /, //, ///                                                       [Variable]<a class="copiable-link" href="#g_t_002f_002c-_002f_002f_002c-_002f_002f_002f-_005bVariable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value-Type_003a_003a-36"><span>Value Type::<a class="copiable-link" href="#Value-Type_003a_003a-36"> &para;</a></span></h4>
+
+<p>a <i class="i">proper list</i>.
+</p>
+<h4 class="subsubheading" id="Initial-Value_003a_003a-36"><span>Initial Value::<a class="copiable-link" href="#Initial-Value_003a_003a-36"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-671"><span>Description::<a class="copiable-link" href="#Description_003a_003a-671"> &para;</a></span></h4>
+
+<p>The <i class="i">variables</i> <b class="b">/</b>, <b class="b">//</b>, and <b class="b">///</b> are maintained by
+the <i class="i">Lisp read-eval-print loop</i> to save the values of results that
+were printed at the end of the loop.
+</p>
+<p>The <i class="i">value</i> of <b class="b">/</b>   is a <i class="i">list</i> of the most recent <i class="i">values</i> that were printed,
+the <i class="i">value</i> of <b class="b">//</b>  is the previous value of <b class="b">/</b>, and
+the <i class="i">value</i> of <b class="b">///</b> is the previous value of <b class="b">//</b>.
+</p>
+<p>The <i class="i">values</i> of <b class="b">/</b>, <b class="b">//</b>, and <b class="b">///</b> are updated immediately
+prior to printing the <i class="i">return value</i> of a top-level <i class="i">form</i> by the
+<i class="i">Lisp read-eval-print loop</i>.  If the <i class="i">evaluation</i> of such a <i class="i">form</i>
+is aborted prior to its normal return, the values of <b class="b">/</b>, <b class="b">//</b>, and <b class="b">///</b> 
+are not updated.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-471"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-471"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (floor 22 7) &rArr;  3, 1
+ (+ (* (car /) 7) (cadr /)) &rArr;  22
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-135"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-135"> &para;</a></span></h4>
+
+<p><i class="i">Lisp read-eval-print loop</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-546"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-546"> &para;</a></span></h4>
+
+<p><a class="ref" href="_002d.html">-                                                              [Function]</a>
+ (<i class="i">variable</i>),
+<b class="b">+</b> (<i class="i">variable</i>),
+<b class="b">*</b> (<i class="i">variable</i>),
+<a class="ref" href="Top-level-loop.html">Top level loop</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_002f.html
@@ -0,0 +1,108 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>/ (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="/ (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="/ (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="1_002b.html" rel="next" title="1+">
+<link href="_002d.html" rel="prev" title="-">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_002f">
+<div class="nav-panel">
+<p>
+Next: <a href="1_002b.html" accesskey="n" rel="next">1+, 1-                                                         [Function]</a>, Previous: <a href="_002d.html" accesskey="p" rel="prev">-                                                              [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_002f-_005bFunction_005d"><span>12.2.27 /                                                                [Function]<a class="copiable-link" href="#g_t_002f-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">/</code>  <i class="i">number</i> &rArr;  <i class="i">reciprocal</i>
+</p>
+<p><code class="code">/</code>  <i class="i">numerator <span class="r">&amp;rest</span> denominators^+</i> &rArr;  <i class="i">quotient</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-212"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-212"> &para;</a></span></h4>
+
+<p><i class="i">number</i>, <i class="i">denominator</i>&mdash;a non-zero <i class="i">number</i>.
+</p>
+<p><i class="i">numerator</i>, <i class="i">quotient</i>, <i class="i">reciprocal</i>&mdash;a <i class="i">number</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-292"><span>Description::<a class="copiable-link" href="#Description_003a_003a-292"> &para;</a></span></h4>
+
+<p>The <i class="i">function</i> <b class="b">/</b> performs division or reciprocation.
+</p>
+<p>If no <i class="i">denominators</i> are supplied,
+the <i class="i">function</i> <b class="b">/</b> returns the reciprocal of <i class="i">number</i>.
+</p>
+<p>If at least one <i class="i">denominator</i> is supplied,
+the <i class="i">function</i> <b class="b">/</b> divides the <i class="i">numerator</i> by all of the <i class="i">denominators</i> 
+and returns the resulting <i class="i">quotient</i>.
+</p>
+<p>If each <i class="i">argument</i> is either an <i class="i">integer</i> or a <i class="i">ratio</i>,
+and the result is not an <i class="i">integer</i>, then it is a <i class="i">ratio</i>.
+</p>
+<p>The <i class="i">function</i> <b class="b">/</b> performs necessary type conversions.
+</p>
+<p>If any <i class="i">argument</i> is a <i class="i">float</i> then 
+the rules of floating-point contagion apply;
+see <a class="ref" href="Floating_002dpoint-Computations.html">Floating-point Computations</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-196"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-196"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (/ 12 4) &rArr;  3
+ (/ 13 4) &rArr;  13/4
+ (/ -8) &rArr;  -1/8
+ (/ 3 4 5) &rArr;  3/20
+ (/ 0.5) &rArr;  2.0
+ (/ 20 5) &rArr;  4
+ (/ 5 20) &rArr;  1/4
+ (/ 60 -2 3 5.0) &rArr;  -2.0
+ (/ 2 #c(2 2)) &rArr;  #C(1/2 -1/2)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-87"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-87"> &para;</a></span></h4>
+
+<p>The consequences are unspecified if any <i class="i">argument</i> other than the first is zero.
+If there is only one <i class="i">argument</i>, the consequences are unspecified if it is zero.
+</p>
+<p>Might signal <b class="b">type-error</b> if some <i class="i">argument</i> is not a <i class="i">number</i>.
+Might signal <b class="b">division-by-zero</b> if division by zero is attempted.
+Might signal <b class="b">arithmetic-error</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-246"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-246"> &para;</a></span></h4>
+
+<p><a class="ref" href="floor.html">floor, ffloor, ceiling, fceiling,</a>
+, <b class="b">ceiling</b>, <b class="b">truncate</b>, <b class="b">round</b>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="1_002b.html">1+, 1-                                                         [Function]</a>, Previous: <a href="_002d.html">-                                                              [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/_003d.html
@@ -0,0 +1,159 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>= (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="= (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="= (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="max.html" rel="next" title="max">
+<link href="bignum.html" rel="prev" title="bignum">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="g_t_003d">
+<div class="nav-panel">
+<p>
+Next: <a href="max.html" accesskey="n" rel="next">max, min                                                         [Function]</a>, Previous: <a href="bignum.html" accesskey="p" rel="prev">bignum                                                               [Type]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="g_t_003d_002c-_002f_003d_002c-_003c_002c-_003e_002c-_003c_003d_002c-_003e_003d-_005bFunction_005d"><span>12.2.15 =, /=, &lt;, &gt;, &lt;=, &gt;=                                              [Function]<a class="copiable-link" href="#g_t_003d_002c-_002f_003d_002c-_003c_002c-_003e_002c-_003c_003d_002c-_003e_003d-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">=</code>  <i class="i"><span class="r">&amp;rest</span> numbers^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">/=</code>  <i class="i"><span class="r">&amp;rest</span> numbers^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">&lt;</code>  <i class="i"><span class="r">&amp;rest</span> numbers^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">&gt;</code>  <i class="i"><span class="r">&amp;rest</span> numbers^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">&lt;=</code>  <i class="i"><span class="r">&amp;rest</span> numbers^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">&gt;=</code>  <i class="i"><span class="r">&amp;rest</span> numbers^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-201"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-201"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;for <b class="b">&lt;</b>, <b class="b">&gt;</b>, <b class="b">&lt;=</b>, <b class="b">&gt;=</b>: a <i class="i">real</i>;
+		 for <b class="b">=</b>, <b class="b">/=</b>: a <i class="i">number</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-280"><span>Description::<a class="copiable-link" href="#Description_003a_003a-280"> &para;</a></span></h4>
+
+<p><b class="b">=</b>, <b class="b">/=</b>, <b class="b">&lt;</b>, <b class="b">&gt;</b>, <b class="b">&lt;=</b>, and <b class="b">&gt;=</b> 
+perform arithmetic comparisons on their arguments as follows:
+</p>
+<dl class="table">
+<dt><b class="b">=</b></dt>
+<dd><p>The value of <b class="b">=</b> is <i class="i">true</i> if all <i class="i">numbers</i> are the same in value;
+otherwise it is <i class="i">false</i>.
+Two <i class="i">complexes</i> are considered equal by <b class="b">=</b>
+if their real and imaginary parts are equal according to <b class="b">=</b>.
+</p>
+</dd>
+<dt><b class="b">/=</b></dt>
+<dd><p>The value of <b class="b">/=</b> is <i class="i">true</i> if no two <i class="i">numbers</i> are the same in value;
+otherwise it is <i class="i">false</i>.
+</p>
+</dd>
+<dt><b class="b">&lt;</b></dt>
+<dd><p>The value of <b class="b">&lt;</b> is <i class="i">true</i> if the <i class="i">numbers</i> are in monotonically increasing order;
+otherwise it is <i class="i">false</i>.
+</p>
+</dd>
+<dt><b class="b">&gt;</b></dt>
+<dd><p>The value of <b class="b">&gt;</b> is <i class="i">true</i> if the <i class="i">numbers</i> are in monotonically decreasing order;
+otherwise it is <i class="i">false</i>.
+</p>
+</dd>
+<dt><b class="b">&lt;=</b></dt>
+<dd><p>The value of <b class="b">&lt;=</b> is <i class="i">true</i> if the <i class="i">numbers</i> are in monotonically 
+ nondecreasing order;
+otherwise it is <i class="i">false</i>.
+</p>
+</dd>
+<dt><b class="b">&gt;=</b></dt>
+<dd><p>The value of <b class="b">&gt;=</b> is <i class="i">true</i> if the <i class="i">numbers</i> are in monotonically
+ nonincreasing order;
+otherwise it is <i class="i">false</i>.
+</p></dd>
+</dl>
+
+<p><b class="b">=</b>, <b class="b">/=</b>, <b class="b">&lt;</b>, <b class="b">&gt;</b>, <b class="b">&lt;=</b>, and <b class="b">&gt;=</b> 
+perform necessary type conversions. 
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-184"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-184"> &para;</a></span></h4>
+
+<p>The uses of these functions are illustrated in Figure 12&ndash;12.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <code class="t">(= 3 3)</code> is <i class="i">true</i>.              <code class="t">(/= 3 3)</code> is <i class="i">false</i>.             <!-- /@w -->
+  <code class="t">(= 3 5)</code> is <i class="i">false</i>.             <code class="t">(/= 3 5)</code> is <i class="i">true</i>.              <!-- /@w -->
+  <code class="t">(= 3 3 3 3)</code> is <i class="i">true</i>.          <code class="t">(/= 3 3 3 3)</code> is <i class="i">false</i>.         <!-- /@w -->
+  <code class="t">(= 3 3 5 3)</code> is <i class="i">false</i>.         <code class="t">(/= 3 3 5 3)</code> is <i class="i">false</i>.         <!-- /@w -->
+  <code class="t">(= 3 6 5 2)</code> is <i class="i">false</i>.         <code class="t">(/= 3 6 5 2)</code> is <i class="i">true</i>.          <!-- /@w -->
+  <code class="t">(= 3 2 3)</code> is <i class="i">false</i>.           <code class="t">(/= 3 2 3)</code> is <i class="i">false</i>.           <!-- /@w -->
+  <code class="t">(&lt; 3 5)</code> is <i class="i">true</i>.              <code class="t">(&lt;= 3 5)</code> is <i class="i">true</i>.              <!-- /@w -->
+  <code class="t">(&lt; 3 -5)</code> is <i class="i">false</i>.            <code class="t">(&lt;= 3 -5)</code> is <i class="i">false</i>.            <!-- /@w -->
+  <code class="t">(&lt; 3 3)</code> is <i class="i">false</i>.             <code class="t">(&lt;= 3 3)</code> is <i class="i">true</i>.              <!-- /@w -->
+  <code class="t">(&lt; 0 3 4 6 7)</code> is <i class="i">true</i>.        <code class="t">(&lt;= 0 3 4 6 7)</code> is <i class="i">true</i>.        <!-- /@w -->
+  <code class="t">(&lt; 0 3 4 4 6)</code> is <i class="i">false</i>.       <code class="t">(&lt;= 0 3 4 4 6)</code> is <i class="i">true</i>.        <!-- /@w -->
+  <code class="t">(&gt; 4 3)</code> is <i class="i">true</i>.              <code class="t">(&gt;= 4 3)</code> is <i class="i">true</i>.              <!-- /@w -->
+  <code class="t">(&gt; 4 3 2 1 0)</code> is <i class="i">true</i>.        <code class="t">(&gt;= 4 3 2 1 0)</code> is <i class="i">true</i>.        <!-- /@w -->
+  <code class="t">(&gt; 4 3 3 2 0)</code> is <i class="i">false</i>.       <code class="t">(&gt;= 4 3 3 2 0)</code> is <i class="i">true</i>.        <!-- /@w -->
+  <code class="t">(&gt; 4 3 1 2 0)</code> is <i class="i">false</i>.       <code class="t">(&gt;= 4 3 1 2 0)</code> is <i class="i">false</i>.       <!-- /@w -->
+  <code class="t">(= 3)</code> is <i class="i">true</i>.                <code class="t">(/= 3)</code> is <i class="i">true</i>.                <!-- /@w -->
+  <code class="t">(&lt; 3)</code> is <i class="i">true</i>.                <code class="t">(&lt;= 3)</code> is <i class="i">true</i>.                <!-- /@w -->
+  <code class="t">(= 3.0 #c(3.0 0.0))</code> is <i class="i">true</i>.  <code class="t">(/= 3.0 #c(3.0 1.0))</code> is <i class="i">true</i>.  <!-- /@w -->
+  <code class="t">(= 3 3.0)</code> is <i class="i">true</i>.            <code class="t">(= 3.0s0 3.0d0)</code> is <i class="i">true</i>.       <!-- /@w -->
+  <code class="t">(= 0.0 -0.0)</code> is <i class="i">true</i>.         <code class="t">(= 5/2 2.5)</code> is <i class="i">true</i>.           <!-- /@w -->
+  <code class="t">(&gt; 0.0 -0.0)</code> is <i class="i">false</i>.        <code class="t">(= 0 -0.0)</code> is <i class="i">true</i>.            <!-- /@w -->
+  <code class="t">(&lt;= 0 x 9)</code> is <i class="i">true</i> if <code class="t">x</code> is between <code class="t">0</code> and <code class="t">9</code>, inclusive<!-- /@w -->
+  <code class="t">(&lt; 0.0 x 1.0)</code> is <i class="i">true</i> if <code class="t">x</code> is between <code class="t">0.0</code> and <code class="t">1.0</code>, exclusive<!-- /@w -->
+  <code class="t">(&lt; -1 j (length v))</code> is <i class="i">true</i> if <code class="t">j</code> is a <i class="i">valid array index</i> for a <i class="i">vector</i> <code class="t">v</code><!-- /@w -->
+
+         Figure 12&ndash;12: Uses of /=, =, &lt;, &gt;, &lt;=, and &gt;=        <!-- /@w -->
+
+</pre></div></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-77"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-77"> &para;</a></span></h4>
+
+<p>Might signal <b class="b">type-error</b> if some <i class="i">argument</i> is not a <i class="i">real</i>.
+Might signal <b class="b">arithmetic-error</b> if otherwise unable to fulfill its contract.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-141"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-141"> &para;</a></span></h4>
+
+<p><b class="b">=</b> differs from <b class="b">eql</b> in that
+<code class="t">(= 0.0 -0.0)</code> is always true,
+because <b class="b">=</b> compares the mathematical values of its operands,
+whereas <b class="b">eql</b> compares the representational values, so to speak.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="max.html">max, min                                                         [Function]</a>, Previous: <a href="bignum.html">bignum                                                               [Type]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/abort-_0028Function_0029.html
@@ -0,0 +1,273 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>abort (Function) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="abort (Function) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="abort (Function) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="use_002dvalue.html" rel="prev" title="use-value">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="abort-_0028Function_0029">
+<div class="nav-panel">
+<p>
+Previous: <a href="use_002dvalue.html" accesskey="p" rel="prev">use-value                                                         [Restart]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="abort_002c-continue_002c-muffle_002dwarning_002c-store_002dvalue_002c-use_002dvalue-_005bFunction_005d"><span>9.2.46 abort, continue, muffle-warning, store-value, use-value          [Function]<a class="copiable-link" href="#abort_002c-continue_002c-muffle_002dwarning_002c-store_002dvalue_002c-use_002dvalue-_005bFunction_005d"> &para;</a></span></h4>
+
+<a class="index-entry-id" id="index-abort"></a>
+
+<a class="index-entry-id" id="index-continue"></a>
+
+<a class="index-entry-id" id="index-muffle_002dwarning"></a>
+
+<a class="index-entry-id" id="index-store_002dvalue"></a>
+
+<a class="index-entry-id" id="index-use_002dvalue"></a>
+
+<p><code class="code">abort</code>  <i class="i"><span class="r">&amp;optional</span> condition</i> 
+       &rArr;  #&lt;NoValue&gt;
+</p>
+<p><code class="code">continue</code>  <i class="i"><span class="r">&amp;optional</span> condition</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<p><code class="code">muffle-warning</code>  <i class="i"><span class="r">&amp;optional</span> condition</i> 
+       &rArr;  #&lt;NoValue&gt;
+</p>
+<p><code class="code">store-value</code>  <i class="i">value <span class="r">&amp;optional</span> condition</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<p><code class="code">use-value</code>  <i class="i">value <span class="r">&amp;optional</span> condition</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-157"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-157"> &para;</a></span></h4>
+
+<p><i class="i">value</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">condition</i>&mdash;a <i class="i">condition</i> <i class="i">object</i>, or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-216"><span>Description::<a class="copiable-link" href="#Description_003a_003a-216"> &para;</a></span></h4>
+
+<p>Transfers control to the most recently established <i class="i">applicable restart</i>
+having the same name as the function.  That is,
+  the <i class="i">function</i> <b class="b">abort</b>    searches for an <i class="i">applicable</i> <b class="b">abort</b>    <i class="i">restart</i>, 
+  the <i class="i">function</i> <b class="b">continue</b> searches for an <i class="i">applicable</i> <b class="b">continue</b> <i class="i">restart</i>,
+and so on.
+</p>
+<p>If no such <i class="i">restart</i> exists, 
+the functions
+     <b class="b">continue</b>,
+     <b class="b">store-value</b>, 
+ and <b class="b">use-value</b>
+return <b class="b">nil</b>, and 
+the functions
+     <b class="b">abort</b>
+ and <b class="b">muffle-warning</b>
+signal an error of <i class="i">type</i> <b class="b">control-error</b>.
+</p>
+<p>When <i class="i">condition</i> is <i class="i">non-nil</i>,
+only those <i class="i">restarts</i> are considered that are 
+  either explicitly associated with that <i class="i">condition</i>,
+      or not associated with any <i class="i">condition</i>;
+that is, the excluded <i class="i">restarts</i> are 
+those that are associated with a non-empty set of <i class="i">conditions</i>
+of which the given <i class="i">condition</i> is not an <i class="i">element</i>.
+If <i class="i">condition</i> is <b class="b">nil</b>, all <i class="i">restarts</i> are considered.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-140"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-140"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;;; Example of the ABORT retart
+
+ (defmacro abort-on-error (&amp;body forms)
+   `(handler-bind ((error #'abort))
+      ,@forms)) &rArr;  ABORT-ON-ERROR
+ (abort-on-error (+ 3 5)) &rArr;  8
+ (abort-on-error (error &quot;You lose.&quot;))
+<code class="t"> |&gt; </code> Returned to Lisp Top Level.
+
+;;; Example of the CONTINUE restart
+
+ (defun real-sqrt (n)
+   (when (minusp n)
+     (setq n (- n))
+     (cerror &quot;Return sqrt(~D) instead.&quot; &quot;Tried to take sqrt(-~D).&quot; n))
+   (sqrt n))
+
+ (real-sqrt 4) &rArr;  2
+ (real-sqrt -9)
+<code class="t"> |&gt; </code> Error: Tried to take sqrt(-9).
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Return sqrt(9) instead.
+<code class="t"> |&gt; </code>  2: Return to Lisp Toplevel.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">(continue)</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Return sqrt(9) instead.
+&rArr;  3
+
+ (handler-bind ((error #'(lambda (c) (continue))))
+   (real-sqrt -9)) &rArr;  3
+
+;;; Example of the MUFFLE-WARNING restart
+
+ (defun count-down (x)
+   (do ((counter x (1- counter)))
+       ((= counter 0) 'done)
+     (when (= counter 1)
+       (warn &quot;Almost done&quot;))
+     (format t &quot;~&amp;~D~
+&rArr;  COUNT-DOWN
+ (count-down 3)
+<code class="t"> |&gt; </code> 3
+<code class="t"> |&gt; </code> 2
+<code class="t"> |&gt; </code> Warning: Almost done
+<code class="t"> |&gt; </code> 1
+&rArr;  DONE
+ (defun ignore-warnings-while-counting (x)
+   (handler-bind ((warning #'ignore-warning))
+     (count-down x)))
+&rArr;  IGNORE-WARNINGS-WHILE-COUNTING
+ (defun ignore-warning (condition)
+   (declare (ignore condition))
+   (muffle-warning))
+&rArr;  IGNORE-WARNING
+ (ignore-warnings-while-counting 3)
+<code class="t"> |&gt; </code> 3
+<code class="t"> |&gt; </code> 2
+<code class="t"> |&gt; </code> 1
+&rArr;  DONE
+
+;;; Example of the STORE-VALUE and USE-VALUE restarts
+
+ (defun careful-symbol-value (symbol)
+   (check-type symbol symbol)
+   (restart-case (if (boundp symbol)
+                     (return-from careful-symbol-value 
+                                  (symbol-value symbol))
+                     (error 'unbound-variable
+                            :name symbol))
+     (use-value (value)
+       :report &quot;Specify a value to use this time.&quot;
+       value)
+     (store-value (value)
+       :report &quot;Specify a value to store and use in the future.&quot;
+       (setf (symbol-value symbol) value))))
+ (setq a 1234) &rArr;  1234
+ (careful-symbol-value 'a) &rArr;  1234
+ (makunbound 'a) &rArr;  A
+ (careful-symbol-value 'a)
+<code class="t"> |&gt; </code> Error: A is not bound.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number.
+<code class="t"> |&gt; </code>  1: Specify a value to use this time.
+<code class="t"> |&gt; </code>  2: Specify a value to store and use in the future.
+<code class="t"> |&gt; </code>  3: Return to Lisp Toplevel.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">(use-value 12)</code><b class="b">&lt;&lt;|</b>
+&rArr;  12
+ (careful-symbol-value 'a)
+<code class="t"> |&gt; </code> Error: A is not bound.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number.
+<code class="t"> |&gt; </code>   1: Specify a value to use this time.
+<code class="t"> |&gt; </code>   2: Specify a value to store and use in the future.
+<code class="t"> |&gt; </code>   3: Return to Lisp Toplevel.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">(store-value 24)</code><b class="b">&lt;&lt;|</b>
+&rArr;  24
+ (careful-symbol-value 'a)
+&rArr;  24
+
+;;; Example of the USE-VALUE restart
+
+ (defun add-symbols-with-default (default &amp;rest symbols)
+   (handler-bind ((sys:unbound-symbol
+                    #'(lambda (c)
+                        (declare (ignore c)) 
+                        (use-value default))))
+     (apply #'+ (mapcar #'careful-symbol-value symbols))))
+&rArr;  ADD-SYMBOLS-WITH-DEFAULT
+ (setq x 1 y 2) &rArr;  2
+ (add-symbols-with-default 3 'x 'y 'z) &rArr;  6
+
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-18"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-18"> &para;</a></span></h4>
+
+<p>A transfer of control may occur if an appropriate <i class="i">restart</i> is available,
+or (in the case of the <i class="i">function</i> <b class="b">abort</b> or the <i class="i">function</i> <b class="b">muffle-warning</b>)
+execution may be stopped.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-35"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-35"> &para;</a></span></h4>
+
+<p>Each of these functions can be affected by 
+the presence of a <i class="i">restart</i> having the same name.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-49"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-49"> &para;</a></span></h4>
+
+<p>If an appropriate <b class="b">abort</b> <i class="i">restart</i>
+ is not available for the <i class="i">function</i> <b class="b">abort</b>,
+or an appropriate <b class="b">muffle-warning</b> <i class="i">restart</i> 
+ is not available for the <i class="i">function</i> <b class="b">muffle-warning</b>,
+an error of <i class="i">type</i> <b class="b">control-error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-190"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-190"> &para;</a></span></h4>
+
+<p><a class="ref" href="invoke_002drestart.html">invoke-restart                                                   [Function]</a>
+,
+<a class="ref" href="Restarts.html">Restarts</a>,
+<a class="ref" href="Interfaces-to-Restarts.html">Interfaces to Restarts</a>,
+<a class="ref" href="assert.html">assert                                                              [Macro]</a>
+,
+<b class="b">ccase</b>,
+<a class="ref" href="cerror.html">cerror                                                           [Function]</a>
+,
+<a class="ref" href="check_002dtype.html">check-type                                                          [Macro]</a>
+,
+<b class="b">ctypecase</b>,
+<a class="ref" href="use_002dvalue.html">use-value                                                         [Restart]</a>
+,
+<a class="ref" href="warn.html">warn                                                             [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-114"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-114"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (abort condition) &equiv; (invoke-restart 'abort)
+ (muffle-warning)  &equiv; (invoke-restart 'muffle-warning)
+ (continue)        &equiv; (let ((r (find-restart 'continue))) (if r (invoke-restart r)))
+ (use-value <i class="i">x</i>) &equiv; (let ((r (find-restart 'use-value))) (if r (invoke-restart r <i class="i">x</i>)))
+ (store-value x) &equiv; (let ((r (find-restart 'store-value))) (if r (invoke-restart r <i class="i">x</i>)))
+</pre></div>
+
+<p>No functions defined in this specification are required to provide
+a <b class="b">use-value</b> <i class="i">restart</i>.
+</p>
+
+
+
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="use_002dvalue.html">use-value                                                         [Restart]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/abort-_0028Restart_0029.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>abort (Restart) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="abort (Restart) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="abort (Restart) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="continue.html" rel="next" title="continue">
+<link href="with_002dsimple_002drestart.html" rel="prev" title="with-simple-restart">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="abort-_0028Restart_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="continue.html" accesskey="n" rel="next">continue                                                          [Restart]</a>, Previous: <a href="with_002dsimple_002drestart.html" accesskey="p" rel="prev">with-simple-restart                                                 [Macro]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="abort-_005bRestart_005d"><span>9.2.41 abort                                                             [Restart]<a class="copiable-link" href="#abort-_005bRestart_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Data-Arguments-Required_003a_003a"><span>Data Arguments Required::<a class="copiable-link" href="#Data-Arguments-Required_003a_003a"> &para;</a></span></h4>
+
+<p>None.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-211"><span>Description::<a class="copiable-link" href="#Description_003a_003a-211"> &para;</a></span></h4>
+
+<p>The intent of the <b class="b">abort</b> restart is to allow return to the
+innermost &ldquo;command level.&rdquo;  Implementors are encouraged to make 
+sure that there is always a restart named <b class="b">abort</b> 
+around any user code so that user code can call <b class="b">abort</b> 
+at any time and expect something reasonable to happen;
+exactly what the reasonable thing is may vary somewhat.  Typically,
+in an interactive listener, the invocation of <b class="b">abort</b>
+returns to the <i class="i">Lisp reader</i> phase of the <i class="i">Lisp read-eval-print loop</i>,
+though in some batch or multi-processing
+situations there may be situations in which having it kill the running 
+process is more appropriate.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-185"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-185"> &para;</a></span></h4>
+
+<p><a class="ref" href="Restarts.html">Restarts</a>,
+<a class="ref" href="Interfaces-to-Restarts.html">Interfaces to Restarts</a>,
+<a class="ref" href="invoke_002drestart.html">invoke-restart                                                   [Function]</a>
+,
+<a class="ref" href="abort-_0028Function_0029.html">abort, continue, muffle-warning, store-value, use-value          [Function]</a>
+ (<i class="i">function</i>)
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/abs.html
@@ -0,0 +1,111 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>abs (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="abs (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="abs (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="evenp.html" rel="next" title="evenp">
+<link href="1_002b.html" rel="prev" title="1+">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="abs">
+<div class="nav-panel">
+<p>
+Next: <a href="evenp.html" accesskey="n" rel="next">evenp, oddp                                                      [Function]</a>, Previous: <a href="1_002b.html" accesskey="p" rel="prev">1+, 1-                                                         [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="abs-_005bFunction_005d"><span>12.2.29 abs                                                              [Function]<a class="copiable-link" href="#abs-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">abs</code>  <i class="i">number</i> &rArr;  <i class="i">absolute-value</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-214"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-214"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">absolute-value</i>&mdash;a non-negative <i class="i">real</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-294"><span>Description::<a class="copiable-link" href="#Description_003a_003a-294"> &para;</a></span></h4>
+
+<p><b class="b">abs</b> returns the absolute value of <i class="i">number</i>.
+</p>
+<p>If <i class="i">number</i> is 
+</p>
+<p>a <i class="i">real</i>,
+</p>
+<p>the result is  of the same <i class="i">type</i> as <i class="i">number</i>.
+</p>
+<p>If <i class="i">number</i> is a <i class="i">complex</i>, 
+the result is a positive 
+</p>
+<p><i class="i">real</i>
+</p>
+<p>with
+the same magnitude as <i class="i">number</i>.  
+The result can be a <i class="i">float</i> 
+</p>
+<p>[Reviewer Note by Barmar: Single-float.]
+even if <i class="i">number</i>&rsquo;s components are <i class="i">rationals</i> 
+and an exact rational result
+would have been possible.
+Thus the result of <code class="t">(abs #c(3 4))</code> can be either <code class="t">5</code> or <code class="t">5.0</code>,
+depending on the implementation.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-198"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-198"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (abs 0) &rArr;  0
+ (abs 12/13) &rArr;  12/13
+ (abs -1.09) &rArr;  1.09
+ (abs #c(5.0 -5.0)) &rArr;  7.071068
+ (abs #c(5 5)) &rArr;  7.071068
+ (abs #c(3/5 4/5)) &rArr;  1 or approximately 1.0
+ (eql (abs -0.0) -0.0) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-248"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-248"> &para;</a></span></h4>
+
+<p><a class="ref" href="Rule-of-Float-Substitutability.html">Rule of Float Substitutability</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-148"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-148"> &para;</a></span></h4>
+
+<p>If <i class="i">number</i> is a <i class="i">complex</i>, 
+the result is equivalent to the following: 
+</p>
+<p><code class="t">(sqrt (+ (expt (realpart <i class="i">number</i>) 2)  (expt (imagpart <i class="i">number</i>) 2)))</code>
+</p>
+<p>An implementation should not use this formula directly
+for all <i class="i">complexes</i>
+but should handle very large or very small components specially
+to avoid intermediate overflow or underflow.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="evenp.html">evenp, oddp                                                      [Function]</a>, Previous: <a href="1_002b.html">1+, 1-                                                         [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/acons.html
@@ -0,0 +1,88 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>acons (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="acons (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="acons (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="assoc.html" rel="next" title="assoc">
+<link href="mapc.html" rel="prev" title="mapc">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="acons">
+<div class="nav-panel">
+<p>
+Next: <a href="assoc.html" accesskey="n" rel="next">assoc, assoc-if, assoc-if-not                                    [Function]</a>, Previous: <a href="mapc.html" accesskey="p" rel="prev">mapc, mapcar, mapcan, mapl, maplist, mapcon                      [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="acons-_005bFunction_005d"><span>14.2.35 acons                                                            [Function]<a class="copiable-link" href="#acons-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">acons</code>  <i class="i">key datum alist</i> &rArr;  <i class="i">new-alist</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-304"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-304"> &para;</a></span></h4>
+
+<p><i class="i">key</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">datum</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">alist</i>&mdash;an <i class="i">association list</i>.
+</p>
+<p><i class="i">new-alist</i>&mdash;an <i class="i">association list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-405"><span>Description::<a class="copiable-link" href="#Description_003a_003a-405"> &para;</a></span></h4>
+
+<p>Creates a <i class="i">fresh</i> <i class="i">cons</i>,
+the <i class="i">cdr</i> of which is <i class="i">alist</i> and
+the <i class="i">car</i> of which is another <i class="i">fresh</i> <i class="i">cons</i>,
+ the <i class="i">car</i> of which is <i class="i">key</i> and
+ the <i class="i">cdr</i> of which is <i class="i">datum</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-288"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-288"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq alist '()) &rArr;  NIL
+ (acons 1 &quot;one&quot; alist) &rArr;  ((1 . &quot;one&quot;))
+ alist &rArr;  NIL
+ (setq alist (acons 1 &quot;one&quot; (acons 2 &quot;two&quot; alist))) &rArr;  ((1 . &quot;one&quot;) (2 . &quot;two&quot;))
+ (assoc 1 alist) &rArr;  (1 . &quot;one&quot;)
+ (setq alist (acons 1 &quot;uno&quot; alist)) &rArr;  ((1 . &quot;uno&quot;) (1 . &quot;one&quot;) (2 . &quot;two&quot;))
+ (assoc 1 alist) &rArr;  (1 . &quot;uno&quot;)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-329"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-329"> &para;</a></span></h4>
+
+<p><a class="ref" href="assoc.html">assoc, assoc-if, assoc-if-not                                    [Function]</a>
+, 
+<a class="ref" href="pairlis.html">pairlis                                                          [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-219"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-219"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">(acons <i class="i">key</i> <i class="i">datum</i> <i class="i">alist</i>) &equiv; (cons (cons <i class="i">key</i> <i class="i">datum</i>) <i class="i">alist</i>)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/add_002dmethod.html
@@ -0,0 +1,89 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>add-method (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="add-method (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="add-method (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="initialize_002dinstance.html" rel="next" title="initialize-instance">
+<link href="find_002dmethod.html" rel="prev" title="find-method">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="add_002dmethod">
+<div class="nav-panel">
+<p>
+Next: <a href="initialize_002dinstance.html" accesskey="n" rel="next">initialize-instance                             [Standard Generic Function]</a>, Previous: <a href="find_002dmethod.html" accesskey="p" rel="prev">find-method                                     [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="add_002dmethod-_005bStandard-Generic-Function_005d"><span>7.7.35 add-method                                      [Standard Generic Function]<a class="copiable-link" href="#add_002dmethod-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-32"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-32"> &para;</a></span></h4>
+
+<p><code class="code">add-method</code>  <i class="i">generic-function method</i> &rArr;  <i class="i">generic-function</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-18"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-18"> &para;</a></span></h4>
+
+<p><code class="code">add-method</code>  <i class="i"><span class="r">(</span><i class="i">generic-function</i> <b class="b">standard-generic-function</b><span class="r">)</span>
+			   <span class="r">(</span><i class="i">method</i> <b class="b">method</b><span class="r">)</span></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-123"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-123"> &para;</a></span></h4>
+
+<p><i class="i">generic-function</i>&mdash;a <i class="i">generic function</i> <i class="i">object</i>.
+</p>
+<p><i class="i">method</i>&mdash;a <i class="i">method</i> <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-162"><span>Description::<a class="copiable-link" href="#Description_003a_003a-162"> &para;</a></span></h4>
+
+<p>The generic function <b class="b">add-method</b> adds a <i class="i">method</i>
+to a <i class="i">generic function</i>.
+</p>
+<p>If <i class="i">method</i> agrees with an existing <i class="i">method</i> of <i class="i">generic-function</i>
+on <i class="i">parameter specializers</i> and <i class="i">qualifiers</i>, 
+the existing <i class="i">method</i> is replaced.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-44"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-44"> &para;</a></span></h4>
+
+<p>The <i class="i">lambda list</i> of the method function of <i class="i">method</i> must be
+congruent with the <i class="i">lambda list</i> of <i class="i">generic-function</i>, 
+or an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<p>If <i class="i">method</i> is a <i class="i">method</i> <i class="i">object</i> of
+another <i class="i">generic function</i>, an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-144"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-144"> &para;</a></span></h4>
+
+<p><a class="ref" href="defmethod.html">defmethod                                                           [Macro]</a>
+,
+<a class="ref" href="defgeneric.html">defgeneric                                                          [Macro]</a>
+,
+<a class="ref" href="find_002dmethod.html">find-method                                     [Standard Generic Function]</a>
+,
+<a class="ref" href="remove_002dmethod.html">remove-method                                   [Standard Generic Function]</a>
+,
+<a class="ref" href="Agreement-on-Parameter-Specializers-and-Qualifiers.html">Agreement on Parameter Specializers and Qualifiers</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/adjoin.html
@@ -0,0 +1,118 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>adjoin (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="adjoin (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="adjoin (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="pushnew.html" rel="next" title="pushnew">
+<link href="intersection.html" rel="prev" title="intersection">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="adjoin">
+<div class="nav-panel">
+<p>
+Next: <a href="pushnew.html" accesskey="n" rel="next">pushnew                                                             [Macro]</a>, Previous: <a href="intersection.html" accesskey="p" rel="prev">intersection, nintersection                                      [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="adjoin-_005bFunction_005d"><span>14.2.44 adjoin                                                           [Function]<a class="copiable-link" href="#adjoin-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">adjoin</code>  <i class="i">item list <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">new-list</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-313"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-313"> &para;</a></span></h4>
+
+<p><i class="i">item</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">list</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">new-list</i>&mdash;a <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-414"><span>Description::<a class="copiable-link" href="#Description_003a_003a-414"> &para;</a></span></h4>
+
+<p>Tests whether <i class="i">item</i> is the same as an existing element of <i class="i">list</i>.
+If the <i class="i">item</i> is not an existing element,
+<b class="b">adjoin</b> adds it to <i class="i">list</i> (as if by <b class="b">cons</b>)
+and returns the resulting <i class="i">list</i>; 
+otherwise, nothing is added and the original <i class="i">list</i> is returned.
+</p>
+<p>The <i class="i">test</i>, <i class="i">test-not</i>, and <i class="i">key</i> 
+affect how it is determined whether <i class="i">item</i> is the same as an <i class="i">element</i> of <i class="i">list</i>.
+For details, see <a class="ref" href="Satisfying-a-Two_002dArgument-Test.html">Satisfying a Two-Argument Test</a>.\ifvmode\else\endgraf
+\ifdim \prevdepth&gt;-1000pt 
+\NIS\parskip \normalparskip\relax\fi
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-297"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-297"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq slist '()) &rArr;  NIL 
+ (adjoin 'a slist) &rArr;  (A) 
+ slist &rArr;  NIL 
+ (setq slist (adjoin '(test-item 1) slist)) &rArr;  ((TEST-ITEM 1)) 
+ (adjoin '(test-item 1) slist) &rArr;  ((TEST-ITEM 1) (TEST-ITEM 1)) 
+ (adjoin '(test-item 1) slist :test 'equal) &rArr;  ((TEST-ITEM 1)) 
+ (adjoin '(new-test-item 1) slist :key #'cadr) &rArr;  ((TEST-ITEM 1)) 
+ (adjoin '(new-test-item 1) slist) &rArr;  ((NEW-TEST-ITEM 1) (TEST-ITEM 1)) 
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-133"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-133"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">list</i> is not a <i class="i">proper list</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-338"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-338"> &para;</a></span></h4>
+
+<p><a class="ref" href="pushnew.html">pushnew                                                             [Macro]</a>
+,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-224"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-224"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> parameter is deprecated.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (adjoin item list :key fn)
+   &equiv; (if (member (fn item) list :key fn) list (cons item list))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="pushnew.html">pushnew                                                             [Macro]</a>, Previous: <a href="intersection.html">intersection, nintersection                                      [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/adjust_002darray.html
@@ -0,0 +1,306 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>adjust-array (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="adjust-array (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="adjust-array (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="adjustable_002darray_002dp.html" rel="next" title="adjustable-array-p">
+<link href="make_002darray.html" rel="prev" title="make-array">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="adjust_002darray">
+<div class="nav-panel">
+<p>
+Next: <a href="adjustable_002darray_002dp.html" accesskey="n" rel="next">adjustable-array-p                                               [Function]</a>, Previous: <a href="make_002darray.html" accesskey="p" rel="prev">make-array                                                       [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="adjust_002darray-_005bFunction_005d"><span>15.2.8 adjust-array                                                     [Function]<a class="copiable-link" href="#adjust_002darray-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">adjust-array</code>  <i class="i">array new-dimensions <span class="r">&amp;key</span> element-type
+                                                           initial-element
+                                                           initial-contents
+                                                           fill-pointer
+                                                           displaced-to
+                                                           displaced-index-offset</i><br>
+   &rArr;  <i class="i">adjusted-array</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-320"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-320"> &para;</a></span></h4>
+
+<p><i class="i">array</i>&mdash;an <i class="i">array</i>.
+</p>
+<p><i class="i">new-dimensions</i>&mdash;a <i class="i">valid array dimension</i> 
+   		      or a <i class="i">list</i> of <i class="i">valid array dimensions</i>.
+</p>
+<p><i class="i">element-type</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<p><i class="i">initial-element</i>&mdash;an <i class="i">object</i>.
+  <i class="i">Initial-element</i> must not be supplied if either 
+  <i class="i">initial-contents</i> or <i class="i">displaced-to</i> is supplied.
+</p>
+<p><i class="i">initial-contents</i>&mdash;an <i class="i">object</i>.
+ If <i class="i">array</i> has rank greater than zero, then <i class="i">initial-contents</i>
+ is composed of nested <i class="i">sequences</i>, the depth of which must equal
+ the rank of <i class="i">array</i>.  Otherwise, <i class="i">array</i> is zero-dimensional and
+ <i class="i">initial-contents</i> supplies the single element.
+ <i class="i">initial-contents</i> must not be supplied if either 
+ <i class="i">initial-element</i> or <i class="i">displaced-to</i> is given.
+</p>
+<p><i class="i">fill-pointer</i>&mdash;a <i class="i">valid fill pointer</i> for the
+ <i class="i">array</i> to be created, or <b class="b">t</b>, or <b class="b">nil</b>.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">displaced-to</i>&mdash;an <i class="i">array</i> or <b class="b">nil</b>.
+ <i class="i">initial-elements</i> and <i class="i">initial-contents</i> must not be supplied
+ if <i class="i">displaced-to</i> is supplied.
+</p>
+<p><i class="i">displaced-index-offset</i>&mdash;an <i class="i">object</i> of <i class="i">type</i> <code class="t">(fixnum 0 <i class="i">n</i>)</code> 
+ where <i class="i">n</i> is <code class="t">(array-total-size <i class="i">displaced-to</i>)</code>.
+ <i class="i">displaced-index-offset</i> may be supplied only if <i class="i">displaced-to</i> is supplied.
+</p>
+<p><i class="i">adjusted-array</i>&mdash;an <i class="i">array</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-427"><span>Description::<a class="copiable-link" href="#Description_003a_003a-427"> &para;</a></span></h4>
+
+<p><b class="b">adjust-array</b> changes the dimensions or elements of <i class="i">array</i>.
+The result is an <i class="i">array</i> of the same <i class="i">type</i> and rank as <i class="i">array</i>,
+that is either the modified <i class="i">array</i>,
+or a newly created <i class="i">array</i> to which
+<i class="i">array</i> can be displaced, and that has 
+the given <i class="i">new-dimensions</i>.
+</p>
+<p><i class="i">New-dimensions</i> specify the size of each <i class="i">dimension</i> of <i class="i">array</i>. 
+</p>
+<p><i class="i">Element-type</i> specifies the <i class="i">type</i> of the <i class="i">elements</i>
+of the resulting <i class="i">array</i>.  If <i class="i">element-type</i> is supplied,
+the consequences are unspecified if
+the <i class="i">upgraded array element type</i> of <i class="i">element-type</i>
+is not the same as the <i class="i">actual array element type</i> of <i class="i">array</i>.
+</p>
+<p>If <i class="i">initial-contents</i> is supplied, it is treated as for
+<b class="b">make-array</b>.  In this case none of the original contents of
+<i class="i">array</i> appears in the resulting <i class="i">array</i>.
+</p>
+<p>If <i class="i">fill-pointer</i> is an <i class="i">integer</i>,
+it becomes the <i class="i">fill pointer</i> for the resulting <i class="i">array</i>.
+If <i class="i">fill-pointer</i> is the symbol <b class="b">t</b>,
+it indicates that the size of the resulting <i class="i">array</i> 
+should be used as the <i class="i">fill pointer</i>.
+If <i class="i">fill-pointer</i> is <b class="b">nil</b>,
+it indicates that the <i class="i">fill pointer</i> should be left as it is.
+</p>
+<p>If <i class="i">displaced-to</i>
+<i class="i">non-nil</i>, a <i class="i">displaced array</i>
+is created. The resulting <i class="i">array</i> shares its contents with the <i class="i">array</i> given by
+<i class="i">displaced-to</i>.
+The resulting <i class="i">array</i> cannot contain more elements than the <i class="i">array</i>
+it is displaced to.  
+If <i class="i">displaced-to</i> is not supplied or <b class="b">nil</b>,
+the resulting <i class="i">array</i> is not a <i class="i">displaced array</i>.
+If array A is created displaced to array B and subsequently
+array B is given to <b class="b">adjust-array</b>, array A will still be
+displaced to array B.
+Although <i class="i">array</i> might be a <i class="i">displaced array</i>, 
+the resulting <i class="i">array</i> is not a <i class="i">displaced array</i> unless
+<i class="i">displaced-to</i> is supplied and not <b class="b">nil</b>.
+</p>
+<p>The interaction between <b class="b">adjust-array</b> and 
+displaced <i class="i">arrays</i> 
+is as follows given three <i class="i">arrays</i>, <code class="t">A</code>, <code class="t">B</code>, and~<code class="t">C</code>:
+</p>
+<dl class="table">
+<dt><code class="t">A</code> is not displaced before or after the call</dt>
+<dd><div class="example">
+<pre class="example-preformatted"> (adjust-array A ...)
+</pre></div>
+
+<p>The dimensions of <code class="t">A</code> are altered, and the
+contents rearranged as appropriate.  
+Additional elements of <code class="t">A</code> are taken from
+<i class="i">initial-element</i>.  
+The use of <i class="i">initial-contents</i> causes all old contents to be
+discarded.
+</p>
+</dd>
+<dt><code class="t">A</code> is not displaced before, but is displaced to</dt>
+<dd><p><code class="t">C</code> after the call  
+</p><div class="example">
+<pre class="example-preformatted"> (adjust-array A ... :displaced-to C)
+</pre></div>
+
+<p>None of the original contents of <code class="t">A</code> appears in 
+<code class="t">A</code> afterwards; <code class="t">A</code> now contains
+the contents of <code class="t">C</code>, without any rearrangement of <code class="t">C</code>.
+</p>
+</dd>
+<dt><code class="t">A</code> is displaced to <code class="t">B</code></dt>
+<dd><p>before the call, and is displaced to <code class="t">C</code> after 
+the call  
+</p><div class="example">
+<pre class="example-preformatted"> (adjust-array A ... :displaced-to B)
+ (adjust-array A ... :displaced-to C)
+</pre></div>
+
+<p><code class="t">B</code> and <code class="t">C</code> might be the same. The contents of <code class="t">B</code> do not appear in 
+<code class="t">A</code> afterward unless such contents also happen to be in <code class="t">C</code>  If
+<i class="i">displaced-index-offset</i> 
+is not supplied in the <b class="b">adjust-array</b> call, it defaults
+to zero; the old offset into <code class="t">B</code> is not retained.
+</p>
+</dd>
+<dt><code class="t">A</code> is displaced to <code class="t">B</code> before the call, but not displaced</dt>
+<dd><p>afterward.  
+</p><div class="example">
+<pre class="example-preformatted"> (adjust-array A ... :displaced-to B)
+ (adjust-array A ... :displaced-to nil)
+</pre></div>
+
+<p><code class="t">A</code> gets a
+new &ldquo;data region,&rdquo; and contents of <code class="t">B</code> are copied into it as appropriate to
+maintain the existing old contents; additional elements of <code class="t">A</code> 
+are taken from
+<i class="i">initial-element</i> if supplied.  However, 
+the use of <i class="i">initial-contents</i> causes all old contents
+to be discarded.
+</p></dd>
+</dl>
+
+<p>If <i class="i">displaced-index-offset</i> is supplied,
+it specifies the offset
+of the resulting <i class="i">array</i> from the beginning of 
+the <i class="i">array</i> that it is displaced to.           
+If <i class="i">displaced-index-offset</i> is not supplied, the offset is~0.  
+The size of the resulting <i class="i">array</i> plus the 
+offset value cannot exceed the size of
+the <i class="i">array</i> that it is displaced to.
+</p>
+<p>If only <i class="i">new-dimensions</i>
+and an <i class="i">initial-element</i> argument are supplied,
+those elements of <i class="i">array</i> that
+are still in bounds appear in the resulting <i class="i">array</i>. The elements of
+the resulting <i class="i">array</i> that are not in the bounds of 
+<i class="i">array</i> are initialized
+to <i class="i">initial-element</i>; if <i class="i">initial-element</i> is not provided,
+</p>
+<p>the consequences of later reading any such new <i class="i">element</i> of <i class="i">new-array</i>
+before it has been initialized
+are undefined.
+</p>
+<p>If <i class="i">initial-contents</i> or <i class="i">displaced-to</i> is supplied,
+then none of the original contents of <i class="i">array</i> appears in the new <i class="i">array</i>.
+</p>
+<p>The consequences are unspecified if <i class="i">array</i> is adjusted 
+to a size smaller than its <i class="i">fill pointer</i> without supplying
+the <i class="i">fill-pointer</i> argument so that its <i class="i">fill-pointer</i>
+is properly adjusted in the process.
+</p>
+<p>If <code class="t">A</code> is displaced to <code class="t">B</code>, the consequences are unspecified 
+if <code class="t">B</code> is adjusted in such a way that it no longer has enough elements
+to satisfy <code class="t">A</code>.  
+</p>
+<p>If <b class="b">adjust-array</b> is applied to an <i class="i">array</i> that is <i class="i">actually adjustable</i>,
+the <i class="i">array</i> returned is <i class="i">identical</i> to <i class="i">array</i>.
+If the <i class="i">array</i> returned by <b class="b">adjust-array</b> 
+is <i class="i">distinct</i> from <i class="i">array</i>, then the argument <i class="i">array</i> is unchanged.
+</p>
+<p>Note that if an <i class="i">array</i> A is displaced to another <i class="i">array</i> B,
+and B is displaced to another <i class="i">array</i> C, and B is altered by
+<b class="b">adjust-array</b>, A must now refer to the adjust contents of B.
+This means that an implementation cannot collapse the chain to make A
+refer to C directly and forget that the chain of reference passes through
+B.  However, caching techniques are permitted as long as they preserve the 
+semantics specified here.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-304"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-304"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (adjustable-array-p
+  (setq ada (adjust-array
+              (make-array '(2 3)
+                          :adjustable t
+                          :initial-contents '((a b c) (1 2 3)))
+              '(4 6)))) &rArr;  T 
+ (array-dimensions ada) &rArr;  (4 6) 
+ (aref ada 1 1) &rArr;  2 
+ (setq beta (make-array '(2 3) :adjustable t))
+&rArr;  #2A((NIL NIL NIL) (NIL NIL NIL)) 
+ (adjust-array beta '(4 6) :displaced-to ada)
+&rArr;  #2A((A B C NIL NIL NIL)
+       (1 2 3 NIL NIL NIL)
+       (NIL NIL NIL NIL NIL NIL) 
+       (NIL NIL NIL NIL NIL NIL))
+ (array-dimensions beta) &rArr;  (4 6)
+ (aref beta 1 1) &rArr;  2 
+</pre></div>
+
+<p>Suppose that the 4-by-4 array in <code class="t">m</code> looks like this:
+</p>
+<div class="example">
+<pre class="example-preformatted">#2A(( alpha     beta      gamma     delta )
+    ( epsilon   zeta      eta       theta )
+    ( iota      kappa     lambda    mu    )
+    ( nu        xi        omicron   pi    ))
+</pre></div>
+
+<p>Then the result of
+</p>
+<div class="example">
+<pre class="example-preformatted"> (adjust-array m '(3 5) :initial-element 'baz)
+</pre></div>
+
+<p>is a 3-by-5 array with contents       
+</p>
+<div class="example">
+<pre class="example-preformatted">#2A(( alpha     beta      gamma     delta     baz )
+    ( epsilon   zeta      eta       theta     baz )
+    ( iota      kappa     lambda    mu        baz ))
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-138"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-138"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">error</b> is signaled if <i class="i">fill-pointer</i> is supplied
+and <i class="i">non-nil</i> but <i class="i">array</i> has no <i class="i">fill pointer</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-348"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-348"> &para;</a></span></h4>
+
+<p><a class="ref" href="adjustable_002darray_002dp.html">adjustable-array-p                                               [Function]</a>
+,    
+<a class="ref" href="make_002darray.html">make-array                                                       [Function]</a>
+,
+<a class="ref" href="array_002ddimension_002dlimit.html">array-dimension-limit                                   [Constant Variable]</a>
+, 
+<a class="ref" href="array_002dtotal_002dsize_002dlimit.html">array-total-size-limit                                  [Constant Variable]</a>
+,
+<b class="b">array</b>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="adjustable_002darray_002dp.html">adjustable-array-p                                               [Function]</a>, Previous: <a href="make_002darray.html">make-array                                                       [Function]</a>, Up: <a href="Arrays-Dictionary.html">Arrays Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/adjustable_002darray_002dp.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>adjustable-array-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="adjustable-array-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="adjustable-array-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="aref.html" rel="next" title="aref">
+<link href="adjust_002darray.html" rel="prev" title="adjust-array">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="adjustable_002darray_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="aref.html" accesskey="n" rel="next">aref                                                             [Accessor]</a>, Previous: <a href="adjust_002darray.html" accesskey="p" rel="prev">adjust-array                                                     [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="adjustable_002darray_002dp-_005bFunction_005d"><span>15.2.9 adjustable-array-p                                               [Function]<a class="copiable-link" href="#adjustable_002darray_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">adjustable-array-p</code>  <i class="i">array</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-321"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-321"> &para;</a></span></h4>
+
+<p><i class="i">array</i>&mdash;an <i class="i">array</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-428"><span>Description::<a class="copiable-link" href="#Description_003a_003a-428"> &para;</a></span></h4>
+
+<p>Returns true if and only if <b class="b">adjust-array</b> could return a <i class="i">value</i>
+which is <i class="i">identical</i> to <i class="i">array</i> when given that <i class="i">array</i> as its
+first <i class="i">argument</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-305"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-305"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (adjustable-array-p 
+   (make-array 5
+               :element-type 'character 
+               :adjustable t 
+               :fill-pointer 3)) &rArr;  <i class="i">true</i>
+ (adjustable-array-p (make-array 4)) &rArr;  <i class="i">implementation-dependent</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-139"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-139"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b> if its argument is not an <i class="i">array</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-349"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-349"> &para;</a></span></h4>
+
+<p><a class="ref" href="adjust_002darray.html">adjust-array                                                     [Function]</a>
+, 
+<a class="ref" href="make_002darray.html">make-array                                                       [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/allocate_002dinstance.html
@@ -0,0 +1,94 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>allocate-instance (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="allocate-instance (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="allocate-instance (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="reinitialize_002dinstance.html" rel="next" title="reinitialize-instance">
+<link href="ensure_002dgeneric_002dfunction.html" rel="prev" title="ensure-generic-function">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="allocate_002dinstance">
+<div class="nav-panel">
+<p>
+Next: <a href="reinitialize_002dinstance.html" accesskey="n" rel="next">reinitialize-instance                           [Standard Generic Function]</a>, Previous: <a href="ensure_002dgeneric_002dfunction.html" accesskey="p" rel="prev">ensure-generic-function                                          [Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="allocate_002dinstance-_005bStandard-Generic-Function_005d"><span>7.7.3 allocate-instance                               [Standard Generic Function]<a class="copiable-link" href="#allocate_002dinstance-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-12"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-12"> &para;</a></span></h4>
+
+<p><code class="code">allocate-instance</code>  <i class="i">class <span class="r">&amp;rest</span> initargs <span class="r">&amp;key</span> <span class="r">&amp;allow-other-keys</span></i> &rArr;  <i class="i">new-instance</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-1"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-1"> &para;</a></span></h4>
+
+<p><code class="code">allocate-instance</code>  <i class="i"><span class="r">(</span><i class="i">class</i> <b class="b">standard-class</b><span class="r">)</span> <span class="r">&amp;rest</span> initargs</i>
+</p>
+<p><code class="code">allocate-instance</code>  <i class="i"><span class="r">(</span><i class="i">class</i> <b class="b">structure-class</b><span class="r">)</span> <span class="r">&amp;rest</span> initargs</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-91"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-91"> &para;</a></span></h4>
+
+<p><i class="i">class</i>&mdash;a <i class="i">class</i>.
+</p>
+<p><i class="i">initargs</i>&mdash;a <i class="i">list</i> of <i class="i">keyword/value pairs</i> 
+		   (initialization argument <i class="i">names</i> and <i class="i">values</i>).
+</p>
+<p><i class="i">new-instance</i>&mdash;an <i class="i">object</i> whose <i class="i">class</i> is <i class="i">class</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-130"><span>Description::<a class="copiable-link" href="#Description_003a_003a-130"> &para;</a></span></h4>
+
+<p>The generic function <b class="b">allocate-instance</b> creates and returns
+a new instance of the <i class="i">class</i>, without initializing it.
+When the <i class="i">class</i> is a <i class="i">standard class</i>, this means that
+the <i class="i">slots</i> are <i class="i">unbound</i>; when the <i class="i">class</i> is a
+<i class="i">structure class</i>, this means the <i class="i">slots</i>&rsquo; <i class="i">values</i>
+are unspecified.
+</p>
+<p>The caller of <b class="b">allocate-instance</b> is expected to have
+already checked the initialization arguments.
+</p>
+<p>The <i class="i">generic function</i> <b class="b">allocate-instance</b> is called by
+<b class="b">make-instance</b>, as described in
+<a class="ref" href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-112"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-112"> &para;</a></span></h4>
+
+<p><a class="ref" href="defclass.html">defclass                                                            [Macro]</a>
+, 
+<a class="ref" href="make_002dinstance.html">make-instance                                   [Standard Generic Function]</a>
+, 
+<a class="ref" href="class_002dof.html">class-of                                                         [Function]</a>
+,
+<a class="ref" href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-74"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-74"> &para;</a></span></h4>
+
+<p>The consequences of adding <i class="i">methods</i> to <b class="b">allocate-instance</b> is unspecified.
+This capability might be added by the <i class="i">Metaobject Protocol</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/alpha_002dchar_002dp.html
@@ -0,0 +1,85 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>alpha-char-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="alpha-char-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="alpha-char-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="alphanumericp.html" rel="next" title="alphanumericp">
+<link href="characterp.html" rel="prev" title="characterp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="alpha_002dchar_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="alphanumericp.html" accesskey="n" rel="next">alphanumericp                                                    [Function]</a>, Previous: <a href="characterp.html" accesskey="p" rel="prev">characterp                                                       [Function]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="alpha_002dchar_002dp-_005bFunction_005d"><span>13.2.8 alpha-char-p                                                     [Function]<a class="copiable-link" href="#alpha_002dchar_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">alpha-char-p</code>  <i class="i">character</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-261"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-261"> &para;</a></span></h4>
+
+<p><i class="i">character</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-357"><span>Description::<a class="copiable-link" href="#Description_003a_003a-357"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">character</i> is an <i class="i">alphabetic</i>_1 <i class="i">character</i>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-245"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-245"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (alpha-char-p #\a) &rArr;  <i class="i">true</i>
+ (alpha-char-p #\5) &rArr;  <i class="i">false</i>
+ (alpha-char-p #\Newline) &rArr;  <i class="i">false</i>
+ ;; This next example presupposes an implementation
+ ;; in which #\\alpha is a defined character.
+ (alpha-char-p #\\alpha) &rArr;  <i class="i">implementation-dependent</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-59"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-59"> &para;</a></span></h4>
+
+<p>None.
+(In particular, the results of this predicate are independent 
+of any special syntax which might have been enabled in the <i class="i">current readtable</i>.)
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-109"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-109"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">character</i> is not a <i class="i">character</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-287"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-287"> &para;</a></span></h4>
+
+<p><a class="ref" href="alphanumericp.html">alphanumericp                                                    [Function]</a>
+,
+<a class="ref" href="Documentation-of-Implementation_002dDefined-Scripts.html">Documentation of Implementation-Defined Scripts</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/alphanumericp.html
@@ -0,0 +1,100 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>alphanumericp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="alphanumericp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="alphanumericp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="digit_002dchar.html" rel="next" title="digit-char">
+<link href="alpha_002dchar_002dp.html" rel="prev" title="alpha-char-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="alphanumericp">
+<div class="nav-panel">
+<p>
+Next: <a href="digit_002dchar.html" accesskey="n" rel="next">digit-char                                                       [Function]</a>, Previous: <a href="alpha_002dchar_002dp.html" accesskey="p" rel="prev">alpha-char-p                                                     [Function]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="alphanumericp-_005bFunction_005d"><span>13.2.9 alphanumericp                                                    [Function]<a class="copiable-link" href="#alphanumericp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">alphanumericp</code>  <i class="i">character</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-262"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-262"> &para;</a></span></h4>
+
+<p><i class="i">character</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-358"><span>Description::<a class="copiable-link" href="#Description_003a_003a-358"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">character</i> is an <i class="i">alphabetic</i>_1 <i class="i">character</i> 
+		   or a  <i class="i">numeric</i>    <i class="i">character</i>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-246"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-246"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (alphanumericp #\Z) &rArr;  <i class="i">true</i>
+ (alphanumericp #\9) &rArr;  <i class="i">true</i>
+ (alphanumericp #\Newline) &rArr;  <i class="i">false</i>
+ (alphanumericp #\#) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-60"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-60"> &para;</a></span></h4>
+
+<p>None.
+(In particular, the results of this predicate are independent 
+of any special syntax which might have been enabled in the <i class="i">current readtable</i>.)
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-110"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-110"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">character</i> is not a <i class="i">character</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-288"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-288"> &para;</a></span></h4>
+
+<p><a class="ref" href="alpha_002dchar_002dp.html">alpha-char-p                                                     [Function]</a>
+, 
+<a class="ref" href="graphic_002dchar_002dp.html">graphic-char-p                                                   [Function]</a>
+, 
+<a class="ref" href="digit_002dchar_002dp.html">digit-char-p                                                     [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-190"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-190"> &para;</a></span></h4>
+
+<p>Alphanumeric characters are graphic
+as defined by <b class="b">graphic-char-p</b>.
+The alphanumeric characters are a subset of the graphic characters.
+The standard characters <code class="t">A</code> through <code class="t">Z</code>,
+		        <code class="t">a</code> through <code class="t">z</code>,
+		    and <code class="t">0</code> through <code class="t">9</code> are alphanumeric characters.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (alphanumericp x)
+   &equiv; (or (alpha-char-p x) (not (null (digit-char-p x))))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/and-_0028Type-Specifier_0029.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>and (Type Specifier) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="and (Type Specifier) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="and (Type Specifier) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="or-_0028Type-Specifier_0029.html" rel="next" title="or (Type Specifier)">
+<link href="not-_0028Type-Specifier_0029.html" rel="prev" title="not (Type Specifier)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="and-_0028Type-Specifier_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="or-_0028Type-Specifier_0029.html" accesskey="n" rel="next">or                                                         [Type Specifier]</a>, Previous: <a href="not-_0028Type-Specifier_0029.html" accesskey="p" rel="prev">not                                                        [Type Specifier]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="and-_005bType-Specifier_005d"><span>4.4.20 and                                                        [Type Specifier]<a class="copiable-link" href="#and-_005bType-Specifier_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-4"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-4"> &para;</a></span></h4>
+
+<p>Combining.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-4"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-4"> &para;</a></span></h4>
+
+<p>(<code class="code">and</code>{<i class="i">{<i class="i">typespec</i>}*</i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-4"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-4"> &para;</a></span></h4>
+
+<p><i class="i">typespec</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-4"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-4"> &para;</a></span></h4>
+
+<p>This denotes the set of all <i class="i">objects</i> of the <i class="i">type</i> 
+determined by the intersection of the <i class="i">typespecs</i>.
+</p>
+<p><b class="b">*</b> is not permitted as an argument.
+</p>
+<p>The <i class="i">type specifiers</i> <code class="t">(and)</code> and <b class="b">t</b> are equivalent.
+The symbol <b class="b">and</b> is not valid as a <i class="i">type specifier</i>,
+and, specifically, it is not an abbreviation for <code class="t">(and)</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/and.html
@@ -0,0 +1,115 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>and (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="and (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="and (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="cond.html" rel="next" title="cond">
+<link href="every.html" rel="prev" title="every">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="and">
+<div class="nav-panel">
+<p>
+Next: <a href="cond.html" accesskey="n" rel="next">cond                                                                [Macro]</a>, Previous: <a href="every.html" accesskey="p" rel="prev">every, some, notevery, notany                                    [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="and-_005bMacro_005d"><span>5.3.41 and                                                                 [Macro]<a class="copiable-link" href="#and-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">and</code>  <i class="i">{<i class="i">form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-60"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-60"> &para;</a></span></h4>
+
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> resulting from the evaluation of 
+	          the last <i class="i">form</i>, or the symbols <b class="b">nil</b> or <b class="b">t</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-94"><span>Description::<a class="copiable-link" href="#Description_003a_003a-94"> &para;</a></span></h4>
+
+<p>The macro <b class="b">and</b> evaluates each <i class="i">form</i> one at a time from left to right. 
+As soon as any <i class="i">form</i> evaluates to <b class="b">nil</b>, <b class="b">and</b> returns
+<b class="b">nil</b> without evaluating the remaining <i class="i">forms</i>.  If all <i class="i">forms</i>
+but the last evaluate to <i class="i">true</i> values, <b class="b">and</b> returns the results
+produced by evaluating the last <i class="i">form</i>.
+</p>
+<p>If no <i class="i">forms</i> are supplied, <code class="t">(and)</code> returns <b class="b">t</b>.
+</p>
+<p><b class="b">and</b> passes back multiple values from the last <i class="i">subform</i>
+but not from subforms other than the last.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-68"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-68"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (if (and (&gt;= n 0)
+          (&lt; n (length a-simple-vector))
+          (eq (elt a-simple-vector n) 'foo))
+     (princ &quot;Foo!&quot;))
+</pre></div>
+
+<p>The above expression prints <code class="t">Foo!</code> if element <code class="t">n</code> of <code class="t">a-simple-vector</code>
+is the symbol <code class="t">foo</code>, provided also that <code class="t">n</code> is indeed a valid index
+for <code class="t">a-simple-vector</code>.  Because <b class="b">and</b> guarantees 
+left-to-right testing
+of its parts, <b class="b">elt</b> is not called if <code class="t">n</code> is out of range.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq temp1 1 temp2 1 temp3 1) &rArr;  1 
+ (and (incf temp1) (incf temp2) (incf temp3)) &rArr;  2 
+ (and (eql 2 temp1) (eql 2 temp2) (eql 2 temp3)) &rArr;  <i class="i">true</i>
+ (decf temp3) &rArr;  1 
+ (and (decf temp1) (decf temp2) (eq temp3 'nil) (decf temp3)) &rArr;  NIL 
+ (and (eql temp1 temp2) (eql temp2 temp3)) &rArr;  <i class="i">true</i>
+ (and) &rArr;  T 
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-78"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-78"> &para;</a></span></h4>
+
+<p><a class="ref" href="cond.html">cond                                                                [Macro]</a>
+,
+<a class="ref" href="every.html">every, some, notevery, notany                                    [Function]</a>
+,
+<a class="ref" href="if.html">if                                                       [Special Operator]</a>
+,
+<a class="ref" href="or.html">or                                                                  [Macro]</a>
+,
+<a class="ref" href="when.html">when, unless                                                        [Macro]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-50"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-50"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (and <i class="i">form</i>) &equiv; (let () <i class="i">form</i>)
+ (and <i class="i">form1</i> <i class="i">form2</i> ...) &equiv; (when <i class="i">form1</i> (and <i class="i">form2</i> ...))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="cond.html">cond                                                                [Macro]</a>, Previous: <a href="every.html">every, some, notevery, notany                                    [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/append.html
@@ -0,0 +1,85 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>append (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="append (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="append (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="revappend.html" rel="next" title="revappend">
+<link href="nconc.html" rel="prev" title="nconc">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="append">
+<div class="nav-panel">
+<p>
+Next: <a href="revappend.html" accesskey="n" rel="next">revappend, nreconc                                               [Function]</a>, Previous: <a href="nconc.html" accesskey="p" rel="prev">nconc                                                            [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="append-_005bFunction_005d"><span>14.2.26 append                                                           [Function]<a class="copiable-link" href="#append-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">append</code>  <i class="i"><span class="r">&amp;rest</span> lists</i> &rArr;  <i class="i">result</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-295"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-295"> &para;</a></span></h4>
+
+<p><i class="i">list</i>&mdash;each must be a <i class="i">proper list</i> except the last,
+	       which may be any <i class="i">object</i>.
+</p>
+<p><i class="i">result</i>&mdash;an <i class="i">object</i>.  This will be a <i class="i">list</i>
+		 unless the last <i class="i">list</i> was not a <i class="i">list</i>
+        	    and all preceding <i class="i">lists</i> were <i class="i">null</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-396"><span>Description::<a class="copiable-link" href="#Description_003a_003a-396"> &para;</a></span></h4>
+
+<p><b class="b">append</b> returns a new <i class="i">list</i> that is the concatenation of
+the copies.  <i class="i">lists</i> are left unchanged; the <i class="i">list structure</i> 
+of each of <i class="i">lists</i> except the last is copied.
+The last argument is not copied; it becomes the <i class="i">cdr</i> of the 
+final <i class="i">dotted pair</i> of the concatenation of the preceding <i class="i">lists</i>,
+or is returned directly if there are no preceding
+<i class="i">non-empty</i> 
+<i class="i">lists</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-279"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-279"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (append '(a b c) '(d e f) '() '(g)) &rArr;  (A B C D E F G)
+ (append '(a b c) 'd) &rArr;  (A B C . D)
+ (setq lst '(a b c)) &rArr;  (A B C)
+ (append lst '(d)) &rArr;  (A B C D)
+ lst &rArr;  (A B C)
+ (append) &rArr;  NIL
+ (append 'a) &rArr;  A
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-321"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-321"> &para;</a></span></h4>
+
+<p><a class="ref" href="nconc.html">nconc                                                            [Function]</a>
+, 
+<a class="ref" href="concatenate.html">concatenate                                                      [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/apply.html
@@ -0,0 +1,114 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>apply (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="apply (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="apply (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="defun.html" rel="next" title="defun">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="prev" title="Data and Control Flow Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="apply">
+<div class="nav-panel">
+<p>
+Next: <a href="defun.html" accesskey="n" rel="next">defun                                                               [Macro]</a>, Previous: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="p" rel="prev">Data and Control Flow Dictionary</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="apply-_005bFunction_005d"><span>5.3.1 apply                                                            [Function]<a class="copiable-link" href="#apply-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">apply</code>  <i class="i">function <span class="r">&amp;rest</span> args^+</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-25"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-25"> &para;</a></span></h4>
+
+<p><i class="i">function</i>&mdash;a <i class="i">function designator</i>.
+</p>
+<p><i class="i">args</i>&mdash;a <i class="i">spreadable argument list designator</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by <i class="i">function</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-54"><span>Description::<a class="copiable-link" href="#Description_003a_003a-54"> &para;</a></span></h4>
+
+<p><i class="i">Applies</i> the <i class="i">function</i> to the <i class="i">args</i>.
+</p>
+<p>When the <i class="i">function</i> receives its arguments via <b class="b">&amp;rest</b>, it is 
+permissible (but not required) for the <i class="i">implementation</i> to <i class="i">bind</i> 
+the <i class="i">rest parameter</i>
+to an <i class="i">object</i> that shares structure with the last argument to <b class="b">apply</b>.
+Because a <i class="i">function</i> can neither detect whether it was called via <b class="b">apply</b>
+nor whether (if so) the last argument to <b class="b">apply</b> was a <i class="i">constant</i>,
+<i class="i">conforming programs</i> must neither rely on the <i class="i">list</i> structure 
+of a <i class="i">rest list</i> to be freshly consed, nor modify that <i class="i">list</i> structure. 
+</p>
+<p><b class="b">setf</b> can be used with <b class="b">apply</b> in certain circumstances;
+see <a class="ref" href="APPLY-Forms-as-Places.html">APPLY Forms as Places</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-32"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-32"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq f '+) &rArr;  +
+ (apply f '(1 2)) &rArr;  3
+ (setq f #'-) &rArr;  #&lt;FUNCTION -&gt;
+ (apply f '(1 2)) &rArr;  -1
+ (apply #'max 3 5 '(2 7 3)) &rArr;  7
+ (apply 'cons '((+ 2 3) 4)) &rArr;  ((+ 2 3) . 4)
+ (apply #'+ '()) &rArr;  0
+
+ (defparameter *some-list* '(a b c))
+ (defun strange-test (&amp;rest x) (eq x *some-list*))
+ (apply #'strange-test *some-list*) &rArr;  <i class="i">implementation-dependent</i>
+
+ (defun bad-boy (&amp;rest x) (rplacd x 'y))
+ (bad-boy 'a 'b 'c) has undefined consequences.
+ (apply #'bad-boy *some-list*) has undefined consequences.
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (defun foo (size &amp;rest keys &amp;key double &amp;allow-other-keys)
+   (let ((v (apply #'make-array size :allow-other-keys t keys)))
+     (if double (concatenate (type-of v) v v) v)))
+ (foo 4 :initial-contents '(a b c d) :double t)
+    &rArr;  #(A B C D A B C D)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-41"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-41"> &para;</a></span></h4>
+
+<p><a class="ref" href="funcall.html">funcall                                                          [Function]</a>
+,
+<a class="ref" href="fdefinition.html">fdefinition                                                      [Accessor]</a>
+,
+<b class="b">function</b>,
+<a class="ref" href="Evaluation.html">Evaluation</a>,
+<a class="ref" href="APPLY-Forms-as-Places.html">APPLY Forms as Places</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="defun.html">defun                                                               [Macro]</a>, Previous: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/apropos.html
@@ -0,0 +1,95 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>apropos (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="apropos (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="apropos (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="describe.html" rel="next" title="describe">
+<link href="sleep.html" rel="prev" title="sleep">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="apropos">
+<div class="nav-panel">
+<p>
+Next: <a href="describe.html" accesskey="n" rel="next">describe                                                         [Function]</a>, Previous: <a href="sleep.html" accesskey="p" rel="prev">sleep                                                            [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="apropos_002c-apropos_002dlist-_005bFunction_005d"><span>25.2.5 apropos, apropos-list                                            [Function]<a class="copiable-link" href="#apropos_002c-apropos_002dlist-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">apropos</code>  <i class="i">string <span class="r">&amp;optional</span> package</i> &rArr;  <i class="i">&lt;<i class="i">no <i class="i">values</i></i>&gt;</i>
+</p>
+<p><code class="code">apropos-list</code>  <i class="i">string <span class="r">&amp;optional</span> package</i> &rArr;  <i class="i">symbols</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-491"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-491"> &para;</a></span></h4>
+
+<p><i class="i">string</i>&mdash;a <i class="i">string designator</i>.
+</p>
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i> or <b class="b">nil</b>.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">symbols</i>&mdash;a <i class="i">list</i> of <i class="i">symbols</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-653"><span>Description::<a class="copiable-link" href="#Description_003a_003a-653"> &para;</a></span></h4>
+
+<p>These functions search for <i class="i">interned</i> <i class="i">symbols</i> 
+whose <i class="i">names</i> contain the substring <i class="i">string</i>.
+</p>
+<p>For <b class="b">apropos</b>, as each such <i class="i">symbol</i> is found,
+its name is printed on <i class="i">standard output</i>.
+In addition,
+if such a <i class="i">symbol</i> is defined as a <i class="i">function</i> or <i class="i">dynamic variable</i>,
+information about those definitions might also be printed.
+</p>
+<p>For <b class="b">apropos-list</b>,
+no output occurs as the search proceeds;
+instead a list of the matching <i class="i">symbols</i> is returned when the search is complete.
+</p>
+<p>If <i class="i">package</i> is <i class="i">non-nil</i>,
+only the <i class="i">symbols</i> <i class="i">accessible</i> in that <i class="i">package</i> are searched;
+otherwise all <i class="i">symbols</i> <i class="i">accessible</i> in any <i class="i">package</i> are searched.
+</p>
+<p>Because a <i class="i">symbol</i> might be available 
+by way of more than one inheritance path,
+<b class="b">apropos</b> might print information about the <i class="i">same</i> <i class="i">symbol</i> more than once,
+or <b class="b">apropos-list</b> might return a <i class="i">list</i> containing duplicate <i class="i">symbols</i>.
+</p>
+<p>Whether or not the search is case-sensitive is <i class="i">implementation-defined</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-122"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-122"> &para;</a></span></h4>
+
+<p>The set of <i class="i">symbols</i> which are currently <i class="i">interned</i>
+in any <i class="i">packages</i> being searched.
+</p>
+<p><b class="b">apropos</b> is also affected by <b class="b">*standard-output*</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="describe.html">describe                                                         [Function]</a>, Previous: <a href="sleep.html">sleep                                                            [Function]</a>, Up: <a href="Environment-Dictionary.html">Environment Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/aref.html
@@ -0,0 +1,111 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>aref (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="aref (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="aref (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="array_002ddimension.html" rel="next" title="array-dimension">
+<link href="adjustable_002darray_002dp.html" rel="prev" title="adjustable-array-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="aref">
+<div class="nav-panel">
+<p>
+Next: <a href="array_002ddimension.html" accesskey="n" rel="next">array-dimension                                                  [Function]</a>, Previous: <a href="adjustable_002darray_002dp.html" accesskey="p" rel="prev">adjustable-array-p                                               [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="aref-_005bAccessor_005d"><span>15.2.10 aref                                                             [Accessor]<a class="copiable-link" href="#aref-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">aref</code>  <i class="i">array <span class="r">&amp;rest</span> subscripts</i> &rArr;  <i class="i">element</i>
+</p>
+<p>(setf (<code class="code">         aref</code> <i class="i">array <span class="r">&amp;rest</span> subscripts</i>) new-element)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-322"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-322"> &para;</a></span></h4>
+
+<p><i class="i">array</i>&mdash;an <i class="i">array</i>.
+</p>
+<p><i class="i">subscripts</i>&mdash;a <i class="i">list</i> of <i class="i">valid array indices</i> for the <i class="i">array</i>.
+</p>
+<p><i class="i">element</i>, <i class="i">new-element</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-429"><span>Description::<a class="copiable-link" href="#Description_003a_003a-429"> &para;</a></span></h4>
+
+<p><i class="i">Accesses</i> the <i class="i">array</i> <i class="i">element</i> specified by the <i class="i">subscripts</i>.
+If no <i class="i">subscripts</i> are supplied and <i class="i">array</i> is zero rank,
+<b class="b">aref</b> <i class="i">accesses</i> the sole element of <i class="i">array</i>.
+</p>
+<p><b class="b">aref</b> ignores <i class="i">fill pointers</i>.
+It is permissible to use <b class="b">aref</b> 
+to <i class="i">access</i> any <i class="i">array</i> <i class="i">element</i>,
+whether <i class="i">active</i> or not.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-306"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-306"> &para;</a></span></h4>
+
+<p>If the variable <code class="t">foo</code> names a 3-by-5 array,
+then the first index could be 0, 1, or 2, and then second index
+could be 0, 1, 2, 3, or 4.  The array elements can be referred to by using
+the <i class="i">function</i> <b class="b">aref</b>; for example, <code class="t">(aref foo 2 1)</code>
+refers to element (2, 1) of the array.  
+</p>
+<div class="example">
+<pre class="example-preformatted"> (aref (setq alpha (make-array 4)) 3) &rArr;  <i class="i">implementation-dependent</i>
+ (setf (aref alpha 3) 'sirens) &rArr;  SIRENS
+ (aref alpha 3) &rArr;  SIRENS
+ (aref (setq beta (make-array '(2 4) 
+                    :element-type '(unsigned-byte 2)
+                    :initial-contents '((0 1 2 3) (3 2 1 0))))
+        1 2) &rArr;  1
+ (setq gamma '(0 2))
+ (apply #'aref beta gamma) &rArr;  2
+ (setf (apply #'aref beta gamma) 3) &rArr;  3
+ (apply #'aref beta gamma) &rArr;  3
+ (aref beta 0 2) &rArr;  3
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-350"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-350"> &para;</a></span></h4>
+
+<p><a class="ref" href="bit-_0028Array_0029.html">bit, sbit                                                        [Accessor]</a>
+,
+<a class="ref" href="char.html">char, schar                                                      [Accessor]</a>
+,
+<a class="ref" href="elt.html">elt                                                              [Accessor]</a>
+,
+<a class="ref" href="row_002dmajor_002daref.html">row-major-aref                                                   [Accessor]</a>
+,
+<a class="ref" href="svref.html">svref                                                            [Accessor]</a>
+,
+</p>
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="array_002ddimension.html">array-dimension                                                  [Function]</a>, Previous: <a href="adjustable_002darray_002dp.html">adjustable-array-p                                               [Function]</a>, Up: <a href="Arrays-Dictionary.html">Arrays Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/arithmetic_002derror.html
@@ -0,0 +1,65 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>arithmetic-error (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="arithmetic-error (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="arithmetic-error (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="arithmetic_002derror_002doperands.html" rel="next" title="arithmetic-error-operands">
+<link href="short_002dfloat_002depsilon.html" rel="prev" title="short-float-epsilon">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="arithmetic_002derror">
+<div class="nav-panel">
+<p>
+Next: <a href="arithmetic_002derror_002doperands.html" accesskey="n" rel="next">arithmetic-error-operands, arithmetic-error-operation            [Function]</a>, Previous: <a href="short_002dfloat_002depsilon.html" accesskey="p" rel="prev">short-float-epsilon, short-float-negative-epsilon,</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="arithmetic_002derror-_005bCondition-Type_005d"><span>12.2.78 arithmetic-error                                           [Condition Type]<a class="copiable-link" href="#arithmetic_002derror-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-43"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-43"> &para;</a></span></h4>
+<p><b class="b">arithmetic-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-343"><span>Description::<a class="copiable-link" href="#Description_003a_003a-343"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">arithmetic-error</b> consists of error conditions
+that occur during arithmetic operations.
+The operation and operands are initialized with
+the initialization arguments named <code class="t">:operation</code> and <code class="t">:operands</code> to <b class="b">make-condition</b>,
+and are <i class="i">accessed</i> by
+the functions <b class="b">arithmetic-error-operation</b> and 
+<b class="b">arithmetic-error-operands</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-280"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-280"> &para;</a></span></h4>
+
+<p><b class="b">arithmetic-error-operation</b>, 
+<a class="ref" href="arithmetic_002derror_002doperands.html">arithmetic-error-operands, arithmetic-error-operation            [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/arithmetic_002derror_002doperands.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>arithmetic-error-operands (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="arithmetic-error-operands (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="arithmetic-error-operands (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="division_002dby_002dzero.html" rel="next" title="division-by-zero">
+<link href="arithmetic_002derror.html" rel="prev" title="arithmetic-error">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="arithmetic_002derror_002doperands">
+<div class="nav-panel">
+<p>
+Next: <a href="division_002dby_002dzero.html" accesskey="n" rel="next">division-by-zero                                           [Condition Type]</a>, Previous: <a href="arithmetic_002derror.html" accesskey="p" rel="prev">arithmetic-error                                           [Condition Type]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="arithmetic_002derror_002doperands_002c-arithmetic_002derror_002doperation-_005bFunction_005d"><span>12.2.79 arithmetic-error-operands, arithmetic-error-operation            [Function]<a class="copiable-link" href="#arithmetic_002derror_002doperands_002c-arithmetic_002derror_002doperation-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">arithmetic-error-operands</code>  <i class="i">condition</i> &rArr;  <i class="i">operands</i>
+</p>
+<p><code class="code">arithmetic-error-operation</code>  <i class="i">condition</i> &rArr;  <i class="i">operation</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-257"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-257"> &para;</a></span></h4>
+
+<p><i class="i">condition</i>&mdash;a <i class="i">condition</i> of <i class="i">type</i> <b class="b">arithmetic-error</b>.
+</p>
+<p><i class="i">operands</i>&mdash;a <i class="i">list</i>.
+</p>
+<p><i class="i">operation</i>&mdash;a <i class="i">function designator</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-344"><span>Description::<a class="copiable-link" href="#Description_003a_003a-344"> &para;</a></span></h4>
+
+<p><b class="b">arithmetic-error-operands</b> returns a <i class="i">list</i> of the operands 
+which were used in the offending call to the operation that signaled 
+the <i class="i">condition</i>.
+</p>
+<p><b class="b">arithmetic-error-operation</b> returns a <i class="i">list</i> of 
+the offending operation in the offending call that signaled the <i class="i">condition</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-281"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-281"> &para;</a></span></h4>
+
+<p><b class="b">arithmetic-error</b>,
+<a class="ref" href="Conditions.html">Conditions</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-185"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-185"> &para;</a></span></h4>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/array.html
@@ -0,0 +1,150 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>array (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="array (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="array (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="simple_002darray.html" rel="next" title="simple-array">
+<link href="Arrays-Dictionary.html" rel="prev" title="Arrays Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="array">
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002darray.html" accesskey="n" rel="next">simple-array                                                         [Type]</a>, Previous: <a href="Arrays-Dictionary.html" accesskey="p" rel="prev">Arrays Dictionary</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="array-_005bSystem-Class_005d"><span>15.2.1 array                                                        [System Class]<a class="copiable-link" href="#array-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-53"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-53"> &para;</a></span></h4>
+<p><b class="b">array</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-420"><span>Description::<a class="copiable-link" href="#Description_003a_003a-420"> &para;</a></span></h4>
+
+<p>An <i class="i">array</i> contains <i class="i">objects</i> arranged according to a
+Cartesian coordinate system.
+An <i class="i">array</i> provides mappings from a set of
+</p>
+<p><i class="i">fixnums</i>
+</p>
+<p>\left{i_0,i_1,\dots,i_{r-1}\right} to corresponding <i class="i">elements</i>
+of the <i class="i">array</i>, 
+where 0 \le i_j &lt; d_j,
+r is the rank of the array, and d_j is the size of <i class="i">dimension</i> j of
+the array.
+</p>
+<p>When an <i class="i">array</i> is created, the program requesting its creation may
+declare that all <i class="i">elements</i> are of a particular <i class="i">type</i>, 
+called the <i class="i">expressed array element type</i>.
+The implementation is permitted to <i class="i">upgrade</i> this type in order to 
+produce the <i class="i">actual array element type</i>,
+which is the <i class="i">element type</i> for the <i class="i">array</i> is actually <i class="i">specialized</i>.
+See the <i class="i">function</i> <b class="b">upgraded-array-element-type</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-18"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-18"> &para;</a></span></h4>
+
+<p>Specializing.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-18"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-18"> &para;</a></span></h4>
+
+<p>(<code class="code">array</code>{<i class="i"><code class="t">[</code>{element-type | <b class="b">*</b>} <span class="r">[</span>dimension-spec<span class="r">]</span><code class="t">]</code></i>})
+</p>
+<p><i class="i">dimension-spec</i>&nbsp;::=rank&nbsp;|&nbsp;<b class="b">*</b>&nbsp;|&nbsp;<span class="r">(</span>{dimension&nbsp;|&nbsp;<b class="b">*</b>}*<span class="r">)</span><!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-18"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-18"> &para;</a></span></h4>
+
+<p><i class="i">dimension</i>&mdash;a <i class="i">valid array dimension</i>.
+</p>
+<p><i class="i">element-type</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<p><i class="i">rank</i>&mdash;a non-negative <i class="i">fixnum</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-18"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-18"> &para;</a></span></h4>
+
+<p>This denotes the set of <i class="i">arrays</i> whose
+  <i class="i">element type</i>,  <i class="i">rank</i>,  and <i class="i">dimensions</i>
+match any given
+  <i class="i">element-type</i>, <i class="i">rank</i>, and <i class="i">dimensions</i>.
+Specifically:
+</p>
+<p>If <i class="i">element-type</i> is the <i class="i">symbol</i> <b class="b">*</b>,
+<i class="i">arrays</i> are not excluded on the basis of their <i class="i">element type</i>.
+Otherwise, only those <i class="i">arrays</i> are included whose <i class="i">actual array element type</i>
+</p>
+<p>is the result of <i class="i">upgrading</i> <i class="i">element-type</i>;
+see <a class="ref" href="Array-Upgrading.html">Array Upgrading</a>.
+</p>
+<p>If the <i class="i">dimension-spec</i> is a <i class="i">rank</i>,
+the set includes only those <i class="i">arrays</i> having that <i class="i">rank</i>.
+If the <i class="i">dimension-spec</i> is a <i class="i">list</i> of <i class="i">dimensions</i>,
+the set includes only those <i class="i">arrays</i> having a <i class="i">rank</i>
+given by the <i class="i">length</i> of the <i class="i">dimensions</i>,
+and having the indicated <i class="i">dimensions</i>; 
+in this case, <b class="b">*</b> matches any value for the corresponding <i class="i">dimension</i>.
+If the <i class="i">dimension-spec</i> is the <i class="i">symbol</i> <b class="b">*</b>,
+the set is not restricted on the basis of <i class="i">rank</i> or <i class="i">dimension</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-344"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-344"> &para;</a></span></h4>
+
+<p><b class="b">*print-array*</b>,
+<a class="ref" href="aref.html">aref                                                             [Accessor]</a>
+,
+<a class="ref" href="make_002darray.html">make-array                                                       [Function]</a>
+,
+<b class="b">vector</b>,
+<a class="ref" href="Sharpsign-A.html">Sharpsign A</a>,
+<a class="ref" href="Printing-Other-Arrays.html">Printing Other Arrays</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-230"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-230"> &para;</a></span></h4>
+
+<p>Note that the type <code class="t">(array t)</code>     
+is a proper <i class="i">subtype</i> of the type <code class="t">(array *)</code>.
+The reason is that the type <code class="t">(array t)</code> is the set of <i class="i">arrays</i> 
+that can
+hold any <i class="i">object</i> (the <i class="i">elements</i> are of <i class="i">type</i> <b class="b">t</b>,  which includes
+all <i class="i">objects</i>).
+On the other hand, the type <code class="t">(array *)</code>
+is the set of all <i class="i">arrays</i> whatsoever, including for example
+<i class="i">arrays</i> that can hold only <i class="i">characters</i>. 
+The type <code class="t">(array character)</code> 
+is not a <i class="i">subtype</i> of the type <code class="t">(array t)</code>; 
+the two sets                                              
+are <i class="i">disjoint</i> because the type <code class="t">(array character)</code> is not the
+set of all <i class="i">arrays</i> that can hold 
+<i class="i">characters</i>, but rather the set of
+<i class="i">arrays</i> 
+that are specialized to hold precisely <i class="i">characters</i> and no
+other <i class="i">objects</i>. 
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002darray.html">simple-array                                                         [Type]</a>, Previous: <a href="Arrays-Dictionary.html">Arrays Dictionary</a>, Up: <a href="Arrays-Dictionary.html">Arrays Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/array_002ddimension.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>array-dimension (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="array-dimension (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="array-dimension (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="array_002ddimensions.html" rel="next" title="array-dimensions">
+<link href="aref.html" rel="prev" title="aref">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="array_002ddimension">
+<div class="nav-panel">
+<p>
+Next: <a href="array_002ddimensions.html" accesskey="n" rel="next">array-dimensions                                                 [Function]</a>, Previous: <a href="aref.html" accesskey="p" rel="prev">aref                                                             [Accessor]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="array_002ddimension-_005bFunction_005d"><span>15.2.11 array-dimension                                                  [Function]<a class="copiable-link" href="#array_002ddimension-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">array-dimension</code>  <i class="i">array axis-number</i> &rArr;  <i class="i">dimension</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-323"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-323"> &para;</a></span></h4>
+
+<p><i class="i">array</i>&mdash;an <i class="i">array</i>.
+</p>
+<p><i class="i">axis-number</i>&mdash;an <i class="i">integer</i> greater than or equal to zero
+		      and less than the <i class="i">rank</i> of the <i class="i">array</i>.
+</p>
+<p><i class="i">dimension</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-430"><span>Description::<a class="copiable-link" href="#Description_003a_003a-430"> &para;</a></span></h4>
+
+<p><b class="b">array-dimension</b> returns the <i class="i">axis-number</i> 
+<i class="i">dimension</i>_1 of <i class="i">array</i>.
+(Any <i class="i">fill pointer</i> is ignored.)
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-307"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-307"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (array-dimension (make-array 4) 0) &rArr;  4
+ (array-dimension (make-array '(2 3)) 1) &rArr;  3
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-63"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-63"> &para;</a></span></h4>
+<p>None.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-351"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-351"> &para;</a></span></h4>
+
+<p><a class="ref" href="array_002ddimensions.html">array-dimensions                                                 [Function]</a>
+, 
+<a class="ref" href="length.html">length                                                           [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-234"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-234"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (array-dimension array n) &equiv; (nth n (array-dimensions array))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/array_002ddimension_002dlimit.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>array-dimension-limit (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="array-dimension-limit (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="array-dimension-limit (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="array_002drank_002dlimit.html" rel="next" title="array-rank-limit">
+<link href="upgraded_002darray_002delement_002dtype.html" rel="prev" title="upgraded-array-element-type">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="array_002ddimension_002dlimit">
+<div class="nav-panel">
+<p>
+Next: <a href="array_002drank_002dlimit.html" accesskey="n" rel="next">array-rank-limit                                        [Constant Variable]</a>, Previous: <a href="upgraded_002darray_002delement_002dtype.html" accesskey="p" rel="prev">upgraded-array-element-type                                      [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="array_002ddimension_002dlimit-_005bConstant-Variable_005d"><span>15.2.24 array-dimension-limit                                   [Constant Variable]<a class="copiable-link" href="#array_002ddimension_002dlimit-_005bConstant-Variable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Constant-Value_003a_003a-11"><span>Constant Value::<a class="copiable-link" href="#Constant-Value_003a_003a-11"> &para;</a></span></h4>
+
+<p>A positive
+</p>
+<p><i class="i">fixnum</i>,
+</p>
+<p>the exact magnitude of which is <i class="i">implementation-dependent</i>,
+but which is not less than <code class="t">1024</code>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-443"><span>Description::<a class="copiable-link" href="#Description_003a_003a-443"> &para;</a></span></h4>
+
+<p>The upper exclusive bound on each individual <i class="i">dimension</i> of an <i class="i">array</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-363"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-363"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002darray.html">make-array                                                       [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/array_002ddimensions.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>array-dimensions (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="array-dimensions (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="array-dimensions (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="array_002delement_002dtype.html" rel="next" title="array-element-type">
+<link href="array_002ddimension.html" rel="prev" title="array-dimension">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="array_002ddimensions">
+<div class="nav-panel">
+<p>
+Next: <a href="array_002delement_002dtype.html" accesskey="n" rel="next">array-element-type                                               [Function]</a>, Previous: <a href="array_002ddimension.html" accesskey="p" rel="prev">array-dimension                                                  [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="array_002ddimensions-_005bFunction_005d"><span>15.2.12 array-dimensions                                                 [Function]<a class="copiable-link" href="#array_002ddimensions-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">array-dimensions</code>  <i class="i">array</i> &rArr;  <i class="i">dimensions</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-324"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-324"> &para;</a></span></h4>
+
+<p><i class="i">array</i>&mdash;an <i class="i">array</i>.
+</p>
+<p><i class="i">dimensions</i>&mdash;a <i class="i">list</i> of <i class="i">integers</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-431"><span>Description::<a class="copiable-link" href="#Description_003a_003a-431"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">list</i> of the <i class="i">dimensions</i> of <i class="i">array</i>.
+(If <i class="i">array</i> is a <i class="i">vector</i> with a <i class="i">fill pointer</i>, 
+ that <i class="i">fill pointer</i> is ignored.)
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-308"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-308"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (array-dimensions (make-array 4)) &rArr;  (4)
+ (array-dimensions (make-array '(2 3))) &rArr;  (2 3)
+ (array-dimensions (make-array 4 :fill-pointer 2)) &rArr;  (4)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-140"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-140"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b> if its argument is not an <i class="i">array</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-352"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-352"> &para;</a></span></h4>
+
+<p><a class="ref" href="array_002ddimension.html">array-dimension                                                  [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/array_002ddisplacement.html
@@ -0,0 +1,96 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>array-displacement (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="array-displacement (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="array-displacement (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="array_002din_002dbounds_002dp.html" rel="next" title="array-in-bounds-p">
+<link href="array_002dhas_002dfill_002dpointer_002dp.html" rel="prev" title="array-has-fill-pointer-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="array_002ddisplacement">
+<div class="nav-panel">
+<p>
+Next: <a href="array_002din_002dbounds_002dp.html" accesskey="n" rel="next">array-in-bounds-p                                                [Function]</a>, Previous: <a href="array_002dhas_002dfill_002dpointer_002dp.html" accesskey="p" rel="prev">array-has-fill-pointer-p                                         [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="array_002ddisplacement-_005bFunction_005d"><span>15.2.15 array-displacement                                               [Function]<a class="copiable-link" href="#array_002ddisplacement-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">array-displacement</code>  <i class="i">array</i> &rArr;  <i class="i">displaced-to, displaced-index-offset</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-327"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-327"> &para;</a></span></h4>
+
+<p><i class="i">array</i>&mdash;an <i class="i">array</i>.
+</p>
+<p><i class="i">displaced-to</i>&mdash;an <i class="i">array</i> or <b class="b">nil</b>.
+</p>
+<p><i class="i">displaced-index-offset</i>&mdash;a non-negative <i class="i">fixnum</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-434"><span>Description::<a class="copiable-link" href="#Description_003a_003a-434"> &para;</a></span></h4>
+
+<p>If the <i class="i">array</i> is a <i class="i">displaced array</i>,
+returns the <i class="i">values</i> of the <code class="t">:displaced-to</code> and <code class="t">:displaced-index-offset</code>
+options
+for the <i class="i">array</i> (see the <i class="i">functions</i> <b class="b">make-array</b> and <b class="b">adjust-array</b>).
+If the <i class="i">array</i> is not a <i class="i">displaced array</i>,
+<b class="b">nil</b> and <code class="t">0</code> are returned.
+</p>
+<p>If <b class="b">array-displacement</b> is called on an <i class="i">array</i>
+for which a <i class="i">non-nil</i> <i class="i">object</i> was provided as the
+<code class="t">:displaced-to</code> <i class="i">argument</i> to <b class="b">make-array</b> 
+or <b class="b">adjust-array</b>, it must return that <i class="i">object</i>
+as its first value. It is <i class="i">implementation-dependent</i>
+whether <b class="b">array-displacement</b> returns a <i class="i">non-nil</i>
+<i class="i">primary value</i> for any other <i class="i">array</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-311"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-311"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq a1 (make-array 5)) &rArr;  #&lt;ARRAY 5 simple 46115576&gt;
+ (setq a2 (make-array 4 :displaced-to a1
+                        :displaced-index-offset 1))
+&rArr;  #&lt;ARRAY 4 indirect 46117134&gt;
+ (array-displacement a2)
+&rArr;  #&lt;ARRAY 5 simple 46115576&gt;, 1
+ (setq a3 (make-array 2 :displaced-to a2
+                        :displaced-index-offset 2))
+&rArr;  #&lt;ARRAY 2 indirect 46122527&gt;
+ (array-displacement a3)
+&rArr;  #&lt;ARRAY 4 indirect 46117134&gt;, 2
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-143"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-143"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">array</i> is not an <i class="i">array</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-355"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-355"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002darray.html">make-array                                                       [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/array_002delement_002dtype.html
@@ -0,0 +1,94 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>array-element-type (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="array-element-type (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="array-element-type (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="array_002dhas_002dfill_002dpointer_002dp.html" rel="next" title="array-has-fill-pointer-p">
+<link href="array_002ddimensions.html" rel="prev" title="array-dimensions">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="array_002delement_002dtype">
+<div class="nav-panel">
+<p>
+Next: <a href="array_002dhas_002dfill_002dpointer_002dp.html" accesskey="n" rel="next">array-has-fill-pointer-p                                         [Function]</a>, Previous: <a href="array_002ddimensions.html" accesskey="p" rel="prev">array-dimensions                                                 [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="array_002delement_002dtype-_005bFunction_005d"><span>15.2.13 array-element-type                                               [Function]<a class="copiable-link" href="#array_002delement_002dtype-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">array-element-type</code>  <i class="i">array</i> &rArr;  <i class="i">typespec</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-325"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-325"> &para;</a></span></h4>
+
+<p><i class="i">array</i>&mdash;an <i class="i">array</i>.
+</p>
+<p><i class="i">typespec</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-432"><span>Description::<a class="copiable-link" href="#Description_003a_003a-432"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">type specifier</i> which represents the <i class="i">actual array element type</i>
+of the array, which is the set of <i class="i">objects</i> that such an <i class="i">array</i> can hold.
+(Because of <i class="i">array</i> <i class="i">upgrading</i>, this <i class="i">type specifier</i> can in
+some cases denote a <i class="i">supertype</i> of the <i class="i">expressed array element type</i>
+of the <i class="i">array</i>.)
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-309"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-309"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (array-element-type (make-array 4)) &rArr;  T
+ (array-element-type (make-array 12 :element-type '(unsigned-byte 8))) 
+&rArr;  <i class="i">implementation-dependent</i>
+ (array-element-type (make-array 12 :element-type '(unsigned-byte 5)))
+&rArr;  <i class="i">implementation-dependent</i>
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (array-element-type (make-array 5 :element-type '(mod 5)))
+</pre></div>
+
+<p>could be <code class="t">(mod 5)</code>, <code class="t">(mod 8)</code>, <code class="t">fixnum</code>, <code class="t">t</code>, or any other
+type of which <code class="t">(mod 5)</code> is a <i class="i">subtype</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-64"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-64"> &para;</a></span></h4>
+
+<p>The <i class="i">implementation</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-141"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-141"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b> if its argument is not an <i class="i">array</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-353"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-353"> &para;</a></span></h4>
+
+<p><b class="b">array</b>,
+<a class="ref" href="make_002darray.html">make-array                                                       [Function]</a>
+,
+<a class="ref" href="subtypep.html">subtypep                                                         [Function]</a>
+,
+<a class="ref" href="upgraded_002darray_002delement_002dtype.html">upgraded-array-element-type                                      [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/array_002dhas_002dfill_002dpointer_002dp.html
@@ -0,0 +1,84 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>array-has-fill-pointer-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="array-has-fill-pointer-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="array-has-fill-pointer-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="array_002ddisplacement.html" rel="next" title="array-displacement">
+<link href="array_002delement_002dtype.html" rel="prev" title="array-element-type">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="array_002dhas_002dfill_002dpointer_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="array_002ddisplacement.html" accesskey="n" rel="next">array-displacement                                               [Function]</a>, Previous: <a href="array_002delement_002dtype.html" accesskey="p" rel="prev">array-element-type                                               [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="array_002dhas_002dfill_002dpointer_002dp-_005bFunction_005d"><span>15.2.14 array-has-fill-pointer-p                                         [Function]<a class="copiable-link" href="#array_002dhas_002dfill_002dpointer_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">array-has-fill-pointer-p</code>  <i class="i">array</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-326"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-326"> &para;</a></span></h4>
+
+<p><i class="i">array</i>&mdash;an <i class="i">array</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-433"><span>Description::<a class="copiable-link" href="#Description_003a_003a-433"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">array</i> has a <i class="i">fill pointer</i>;
+otherwise returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-310"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-310"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (array-has-fill-pointer-p (make-array 4)) &rArr;  <i class="i">implementation-dependent</i>
+ (array-has-fill-pointer-p (make-array '(2 3))) &rArr;  <i class="i">false</i>
+ (array-has-fill-pointer-p
+   (make-array 8 
+               :fill-pointer 2 
+               :initial-element 'filler)) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-142"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-142"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b> if its argument is not an <i class="i">array</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-354"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-354"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002darray.html">make-array                                                       [Function]</a>
+, 
+<a class="ref" href="fill_002dpointer.html">fill-pointer                                                     [Accessor]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-235"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-235"> &para;</a></span></h4>
+
+<p>Since <i class="i">arrays</i> of <i class="i">rank</i> other than one cannot have a <i class="i">fill pointer</i>,
+<b class="b">array-has-fill-pointer-p</b> always returns <b class="b">nil</b> when its argument
+is such an array.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/array_002din_002dbounds_002dp.html
@@ -0,0 +1,84 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>array-in-bounds-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="array-in-bounds-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="array-in-bounds-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="array_002drank.html" rel="next" title="array-rank">
+<link href="array_002ddisplacement.html" rel="prev" title="array-displacement">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="array_002din_002dbounds_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="array_002drank.html" accesskey="n" rel="next">array-rank                                                       [Function]</a>, Previous: <a href="array_002ddisplacement.html" accesskey="p" rel="prev">array-displacement                                               [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="array_002din_002dbounds_002dp-_005bFunction_005d"><span>15.2.16 array-in-bounds-p                                                [Function]<a class="copiable-link" href="#array_002din_002dbounds_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">array-in-bounds-p</code>  <i class="i">array <span class="r">&amp;rest</span> subscripts</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-328"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-328"> &para;</a></span></h4>
+
+<p><i class="i">array</i>&mdash;an <i class="i">array</i>.
+</p>
+<p><i class="i">subscripts</i>&mdash;a list of <i class="i">integers</i> 
+		     of length equal to the <i class="i">rank</i> of the <i class="i">array</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-435"><span>Description::<a class="copiable-link" href="#Description_003a_003a-435"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if the <i class="i">subscripts</i> are all in bounds for <i class="i">array</i>;
+otherwise returns <i class="i">false</i>.
+(If <i class="i">array</i> is a <i class="i">vector</i> with a <i class="i">fill pointer</i>, 
+ that <i class="i">fill pointer</i> is ignored.)
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-312"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-312"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (setq a (make-array '(7 11) :element-type 'string-char))
+ (array-in-bounds-p a 0  0) &rArr;  <i class="i">true</i>
+ (array-in-bounds-p a 6 10) &rArr;  <i class="i">true</i>
+ (array-in-bounds-p a 0 -1) &rArr;  <i class="i">false</i>
+ (array-in-bounds-p a 0 11) &rArr;  <i class="i">false</i>
+ (array-in-bounds-p a 7  0) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-356"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-356"> &para;</a></span></h4>
+
+<p><a class="ref" href="array_002ddimensions.html">array-dimensions                                                 [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-236"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-236"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (array-in-bounds-p array subscripts)   
+ &equiv; (and (not (some #'minusp (list subscripts)))
+         (every #'&lt; (list subscripts) (array-dimensions array)))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/array_002drank.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>array-rank (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="array-rank (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="array-rank (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="array_002drow_002dmajor_002dindex.html" rel="next" title="array-row-major-index">
+<link href="array_002din_002dbounds_002dp.html" rel="prev" title="array-in-bounds-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="array_002drank">
+<div class="nav-panel">
+<p>
+Next: <a href="array_002drow_002dmajor_002dindex.html" accesskey="n" rel="next">array-row-major-index                                            [Function]</a>, Previous: <a href="array_002din_002dbounds_002dp.html" accesskey="p" rel="prev">array-in-bounds-p                                                [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="array_002drank-_005bFunction_005d"><span>15.2.17 array-rank                                                       [Function]<a class="copiable-link" href="#array_002drank-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">array-rank</code>  <i class="i">array</i> &rArr;  <i class="i">rank</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-329"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-329"> &para;</a></span></h4>
+
+<p><i class="i">array</i>&mdash;an <i class="i">array</i>.
+</p>
+<p><i class="i">rank</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-436"><span>Description::<a class="copiable-link" href="#Description_003a_003a-436"> &para;</a></span></h4>
+
+<p>Returns the number of <i class="i">dimensions</i> of <i class="i">array</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-313"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-313"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (array-rank (make-array '())) &rArr;  0
+ (array-rank (make-array 4)) &rArr;  1
+ (array-rank (make-array '(4))) &rArr;  1
+ (array-rank (make-array '(2 3))) &rArr;  2
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-144"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-144"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b> if its argument is not an <i class="i">array</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-357"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-357"> &para;</a></span></h4>
+
+<p><a class="ref" href="array_002drank_002dlimit.html">array-rank-limit                                        [Constant Variable]</a>
+, 
+<a class="ref" href="make_002darray.html">make-array                                                       [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/array_002drank_002dlimit.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>array-rank-limit (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="array-rank-limit (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="array-rank-limit (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="array_002dtotal_002dsize_002dlimit.html" rel="next" title="array-total-size-limit">
+<link href="array_002ddimension_002dlimit.html" rel="prev" title="array-dimension-limit">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="array_002drank_002dlimit">
+<div class="nav-panel">
+<p>
+Next: <a href="array_002dtotal_002dsize_002dlimit.html" accesskey="n" rel="next">array-total-size-limit                                  [Constant Variable]</a>, Previous: <a href="array_002ddimension_002dlimit.html" accesskey="p" rel="prev">array-dimension-limit                                   [Constant Variable]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="array_002drank_002dlimit-_005bConstant-Variable_005d"><span>15.2.25 array-rank-limit                                        [Constant Variable]<a class="copiable-link" href="#array_002drank_002dlimit-_005bConstant-Variable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Constant-Value_003a_003a-12"><span>Constant Value::<a class="copiable-link" href="#Constant-Value_003a_003a-12"> &para;</a></span></h4>
+
+<p>A positive
+</p>
+<p><i class="i">fixnum</i>,
+</p>
+<p>the exact magnitude of which is <i class="i">implementation-dependent</i>,
+but which is not less than <code class="t">8</code>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-444"><span>Description::<a class="copiable-link" href="#Description_003a_003a-444"> &para;</a></span></h4>
+
+<p>The upper exclusive bound on the <i class="i">rank</i> of an <i class="i">array</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-364"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-364"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002darray.html">make-array                                                       [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/array_002drow_002dmajor_002dindex.html
@@ -0,0 +1,93 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>array-row-major-index (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="array-row-major-index (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="array-row-major-index (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="array_002dtotal_002dsize.html" rel="next" title="array-total-size">
+<link href="array_002drank.html" rel="prev" title="array-rank">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="array_002drow_002dmajor_002dindex">
+<div class="nav-panel">
+<p>
+Next: <a href="array_002dtotal_002dsize.html" accesskey="n" rel="next">array-total-size                                                 [Function]</a>, Previous: <a href="array_002drank.html" accesskey="p" rel="prev">array-rank                                                       [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="array_002drow_002dmajor_002dindex-_005bFunction_005d"><span>15.2.18 array-row-major-index                                            [Function]<a class="copiable-link" href="#array_002drow_002dmajor_002dindex-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">array-row-major-index</code>  <i class="i">array <span class="r">&amp;rest</span> subscripts</i> &rArr;  <i class="i">index</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-330"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-330"> &para;</a></span></h4>
+
+<p><i class="i">array</i>&mdash;an <i class="i">array</i>.
+</p>
+<p><i class="i">subscripts</i>&mdash;a <i class="i">list</i> of <i class="i">valid array indices</i> for the <i class="i">array</i>.
+</p>
+<p><i class="i">index</i>&mdash;a <i class="i">valid array row-major index</i> for the <i class="i">array</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-437"><span>Description::<a class="copiable-link" href="#Description_003a_003a-437"> &para;</a></span></h4>
+
+<p>Computes the position according to the row-major ordering of <i class="i">array</i>
+for the element that is specified by <i class="i">subscripts</i>, and returns the
+offset of the element in the computed position from the beginning of <i class="i">array</i>.
+</p>
+<p>For a one-dimensional <i class="i">array</i>, 
+the result of <b class="b">array-row-major-index</b>
+equals <i class="i">subscript</i>.
+</p>
+<p><b class="b">array-row-major-index</b> ignores <i class="i">fill pointers</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-314"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-314"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq a (make-array '(4 7) :element-type '(unsigned-byte 8)))
+ (array-row-major-index a 1 2) &rArr;  9
+ (array-row-major-index 
+    (make-array '(2 3 4) 
+                :element-type '(unsigned-byte 8)
+                :displaced-to a
+                :displaced-index-offset 4)
+    0 2 1) &rArr;  9
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-237"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-237"> &para;</a></span></h4>
+
+<p>A possible definition of <b class="b">array-row-major-index</b>, 
+with no error-checking, is
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun array-row-major-index (a &amp;rest subscripts)
+   (apply #'+ (maplist #'(lambda (x y)
+                            (* (car x) (apply #'* (cdr y))))
+                       subscripts
+                       (array-dimensions a))))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/array_002dtotal_002dsize.html
@@ -0,0 +1,91 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>array-total-size (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="array-total-size (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="array-total-size (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="arrayp.html" rel="next" title="arrayp">
+<link href="array_002drow_002dmajor_002dindex.html" rel="prev" title="array-row-major-index">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="array_002dtotal_002dsize">
+<div class="nav-panel">
+<p>
+Next: <a href="arrayp.html" accesskey="n" rel="next">arrayp                                                           [Function]</a>, Previous: <a href="array_002drow_002dmajor_002dindex.html" accesskey="p" rel="prev">array-row-major-index                                            [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="array_002dtotal_002dsize-_005bFunction_005d"><span>15.2.19 array-total-size                                                 [Function]<a class="copiable-link" href="#array_002dtotal_002dsize-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">array-total-size</code>  <i class="i">array</i> &rArr;  <i class="i">size</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-331"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-331"> &para;</a></span></h4>
+
+<p><i class="i">array</i>&mdash;an <i class="i">array</i>.
+</p>
+<p><i class="i">size</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-438"><span>Description::<a class="copiable-link" href="#Description_003a_003a-438"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">array total size</i> of the <i class="i">array</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-315"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-315"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (array-total-size (make-array 4)) &rArr;  4
+ (array-total-size (make-array 4 :fill-pointer 2)) &rArr;  4
+ (array-total-size (make-array 0)) &rArr;  0
+ (array-total-size (make-array '(4 2))) &rArr;  8
+ (array-total-size (make-array '(4 0))) &rArr;  0
+ (array-total-size (make-array '())) &rArr;  1
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-145"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-145"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b> if its argument is not an <i class="i">array</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-358"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-358"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002darray.html">make-array                                                       [Function]</a>
+, 
+<a class="ref" href="array_002ddimensions.html">array-dimensions                                                 [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-238"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-238"> &para;</a></span></h4>
+
+<p>If the <i class="i">array</i> is a <i class="i">vector</i> with a <i class="i">fill pointer</i>,
+the <i class="i">fill pointer</i> is ignored when calculating the <i class="i">array total size</i>.
+</p>
+<p>Since the product of no arguments is one, the <i class="i">array total size</i> of a
+zero-dimensional <i class="i">array</i> is one.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (array-total-size x)
+    &equiv; (apply #'* (array-dimensions x))
+    &equiv; (reduce #'* (array-dimensions x))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/array_002dtotal_002dsize_002dlimit.html
@@ -0,0 +1,68 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>array-total-size-limit (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="array-total-size-limit (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="array-total-size-limit (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="simple_002dvector_002dp.html" rel="next" title="simple-vector-p">
+<link href="array_002drank_002dlimit.html" rel="prev" title="array-rank-limit">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="array_002dtotal_002dsize_002dlimit">
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002dvector_002dp.html" accesskey="n" rel="next">simple-vector-p                                                  [Function]</a>, Previous: <a href="array_002drank_002dlimit.html" accesskey="p" rel="prev">array-rank-limit                                        [Constant Variable]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="array_002dtotal_002dsize_002dlimit-_005bConstant-Variable_005d"><span>15.2.26 array-total-size-limit                                  [Constant Variable]<a class="copiable-link" href="#array_002dtotal_002dsize_002dlimit-_005bConstant-Variable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Constant-Value_003a_003a-13"><span>Constant Value::<a class="copiable-link" href="#Constant-Value_003a_003a-13"> &para;</a></span></h4>
+
+<p>A positive
+</p>
+<p><i class="i">fixnum</i>,
+</p>
+<p>the exact magnitude of which is <i class="i">implementation-dependent</i>,
+but which is not less than <code class="t">1024</code>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-445"><span>Description::<a class="copiable-link" href="#Description_003a_003a-445"> &para;</a></span></h4>
+
+<p>The upper exclusive bound on the <i class="i">array total size</i> of an <i class="i">array</i>.
+</p>
+<p>The actual limit on the <i class="i">array total size</i> 
+imposed by the <i class="i">implementation</i>
+might vary according the <i class="i">element type</i> of the <i class="i">array</i>;
+in this case, the value of <b class="b">array-total-size-limit</b> 
+will be the smallest of these possible limits.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-365"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-365"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002darray.html">make-array                                                       [Function]</a>
+, 
+<a class="ref" href="array_002delement_002dtype.html">array-element-type                                               [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/arrayp.html
@@ -0,0 +1,78 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>arrayp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="arrayp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="arrayp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="fill_002dpointer.html" rel="next" title="fill-pointer">
+<link href="array_002dtotal_002dsize.html" rel="prev" title="array-total-size">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="arrayp">
+<div class="nav-panel">
+<p>
+Next: <a href="fill_002dpointer.html" accesskey="n" rel="next">fill-pointer                                                     [Accessor]</a>, Previous: <a href="array_002dtotal_002dsize.html" accesskey="p" rel="prev">array-total-size                                                 [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="arrayp-_005bFunction_005d"><span>15.2.20 arrayp                                                           [Function]<a class="copiable-link" href="#arrayp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">arrayp</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-332"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-332"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-439"><span>Description::<a class="copiable-link" href="#Description_003a_003a-439"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">array</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-316"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-316"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (arrayp (make-array '(2 3 4) :adjustable t)) &rArr;  <i class="i">true</i>
+ (arrayp (make-array 6)) &rArr;  <i class="i">true</i>
+ (arrayp #*1011) &rArr;  <i class="i">true</i>
+ (arrayp &quot;hi&quot;) &rArr;  <i class="i">true</i>
+ (arrayp 'hi) &rArr;  <i class="i">false</i>
+ (arrayp 12) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-359"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-359"> &para;</a></span></h4>
+
+<p><a class="ref" href="typep.html">typep                                                            [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-239"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-239"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (arrayp <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'array)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/ash.html
@@ -0,0 +1,103 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>ash (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="ash (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="ash (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="integer_002dlength.html" rel="next" title="integer-length">
+<link href="rationalp.html" rel="prev" title="rationalp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="ash">
+<div class="nav-panel">
+<p>
+Next: <a href="integer_002dlength.html" accesskey="n" rel="next">integer-length                                                   [Function]</a>, Previous: <a href="rationalp.html" accesskey="p" rel="prev">rationalp                                                        [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="ash-_005bFunction_005d"><span>12.2.56 ash                                                              [Function]<a class="copiable-link" href="#ash-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">ash</code>  <i class="i">integer count</i> &rArr;  <i class="i">shifted-integer</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-239"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-239"> &para;</a></span></h4>
+
+<p><i class="i">integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">count</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">shifted-integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-321"><span>Description::<a class="copiable-link" href="#Description_003a_003a-321"> &para;</a></span></h4>
+
+<p><b class="b">ash</b> performs the arithmetic shift operation on the binary
+representation of <i class="i">integer</i>, which is treated as if it were binary.
+</p>
+<p><b class="b">ash</b> shifts <i class="i">integer</i> arithmetically left by <i class="i">count</i> bit
+positions if <i class="i">count</i> is positive,
+or right <i class="i">count</i> bit positions if <i class="i">count</i> is negative.
+The shifted value of the same sign 
+as <i class="i">integer</i> is returned.
+</p>
+<p>Mathematically speaking, <b class="b">ash</b> performs the computation
+<code class="t">floor</code>(<i class="i">integer</i>\cdot 2^<i class="i">count</i>).
+Logically, <b class="b">ash</b> 
+moves all of the bits in <i class="i">integer</i> to the left,
+adding zero-bits at the right, or moves them to the right,
+discarding bits.  
+</p>
+<p><b class="b">ash</b> is defined to behave as if <i class="i">integer</i> were 
+represented in two&rsquo;s complement form, regardless of
+how <i class="i">integers</i> are represented internally.
+</p><h4 class="subsubheading" id="Examples_003a_003a-223"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-223"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (ash 16 1) &rArr;  32
+ (ash 16 0) &rArr;  16
+ (ash 16 -1) &rArr;  8
+ (ash -100000000000000000000000000000000 -100) &rArr;  -79
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-98"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-98"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">integer</i> is not an <i class="i">integer</i>.
+Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">count</i> is not an <i class="i">integer</i>.
+Might signal <b class="b">arithmetic-error</b>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-168"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-168"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (logbitp <i class="i">j</i> (ash <i class="i">n</i> <i class="i">k</i>))
+ &equiv; (and (&gt;= <i class="i">j</i> <i class="i">k</i>) (logbitp (- <i class="i">j</i> <i class="i">k</i>) <i class="i">n</i>))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="integer_002dlength.html">integer-length                                                   [Function]</a>, Previous: <a href="rationalp.html">rationalp                                                        [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/asin.html
@@ -0,0 +1,243 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>asin (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="asin (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="asin (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="pi.html" rel="next" title="pi">
+<link href="sin.html" rel="prev" title="sin">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.center {text-align:center}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="asin">
+<div class="nav-panel">
+<p>
+Next: <a href="pi.html" accesskey="n" rel="next">pi                                                      [Constant Variable]</a>, Previous: <a href="sin.html" accesskey="p" rel="prev">sin, cos, tan                                                    [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="asin_002c-acos_002c-atan-_005bFunction_005d"><span>12.2.21 asin, acos, atan                                                 [Function]<a class="copiable-link" href="#asin_002c-acos_002c-atan-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">asin</code>  <i class="i">number</i> &rArr;  <i class="i">radians</i>
+</p>
+<p><code class="code">acos</code>  <i class="i">number</i> &rArr;  <i class="i">radians</i>
+</p>
+<p><code class="code">atan</code>  <i class="i">number1 <span class="r">&amp;optional</span> number2</i> &rArr;  <i class="i">radians</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-207"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-207"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">number1</i>&mdash;a <i class="i">number</i> if <i class="i">number2</i> is not supplied,
+	       or a <i class="i">real</i>   if <i class="i">number2</i> is     supplied.
+</p>
+<p><i class="i">number2</i>&mdash;a <i class="i">real</i>.
+</p>
+<p><i class="i">radians</i>&mdash;a <i class="i">number</i> (of radians).
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-286"><span>Description::<a class="copiable-link" href="#Description_003a_003a-286"> &para;</a></span></h4>
+
+<p><b class="b">asin</b>, <b class="b">acos</b>, and <b class="b">atan</b>
+compute the arc sine, arc cosine, and arc tangent respectively.
+</p>
+<p>The arc sine, arc cosine, and arc tangent (with only <i class="i">number1</i> supplied)
+functions can be defined mathematically for
+<i class="i">number</i> or <i class="i">number1</i> specified as <i class="i">x</i> as in Figure 12&ndash;13.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Function     Definition                            <!-- /@w -->
+  Arc sine      -i <code class="t">log</code>  (ix+ \sqrt<span class="r">1-x^2</span> )          <!-- /@w -->
+  Arc cosine    (\pi/2) - <code class="t">arcsin</code>  x                  <!-- /@w -->
+  Arc tangent   -i <code class="t">log</code>  ((1+ix) \sqrt<span class="r">1/(1+x^2)</span> )   <!-- /@w -->
+
+  Figure 12&ndash;13: Mathematical definition of arc sine, arc cosine, and arc tangent<!-- /@w -->
+
+</pre></div></div>
+
+<p>These formulae are mathematically correct, assuming
+completely accurate computation. They are not necessarily
+the simplest ones for real-valued computations. 
+</p>
+<p>If both <i class="i">number1</i> and <i class="i">number2</i> are supplied
+for <b class="b">atan</b>, the result is the arc tangent 
+of <i class="i">number1</i>/<i class="i">number2</i>.
+The value of <b class="b">atan</b> is always between
+-\pi (exclusive) and~\pi (inclusive)
+</p>
+<p>when minus zero is not supported.
+The range of the two-argument arc tangent when minus zero is supported
+includes -\pi.
+</p>
+<p>For a 
+</p>
+<p><i class="i">real</i>
+</p>
+<p><i class="i">number1</i>, 
+the result is 
+</p>
+<p>a <i class="i">real</i>
+</p>
+<p>and lies between
+-\pi/2 and~\pi/2 (both exclusive).
+<i class="i">number1</i> can be a <i class="i">complex</i> if <i class="i">number2</i>
+is not supplied. If both are supplied, <i class="i">number2</i> can be zero provided
+<i class="i">number1</i> is not zero.  
+</p>
+<p>[Reviewer Note by Barmar: Should add &ldquo;However, if the implementation distinguishes 
+		  positive and negative zero, both may be signed zeros, 
+		  and limits are used to define the result.&rdquo;]
+</p>
+<p>The following definition for arc sine determines the range and
+branch cuts:
+</p>
+<div class="center"><code class="t">arcsin</code>  z = -i <code class="t">log</code>  (iz+\sqrt<span class="r">1-z^2</span>\Bigr)
+</div>
+<p>The branch cut for the arc sine function is in two pieces:
+one along the negative real axis to the left of~-1
+(inclusive), continuous with quadrant II, and one along the positive real
+axis to the right of~1 (inclusive), continuous with quadrant IV.  The
+range is that strip of the complex plane containing numbers whose real
+part is between -\pi/2 and~\pi/2.  A number with real
+part equal to -\pi/2 is in the range if and only if its imaginary
+part is non-negative; a number with real part equal to \pi/2 is in
+the range if and only if its imaginary part is non-positive.
+</p>
+<p>The following definition for arc cosine determines the range and
+branch cuts:
+</p>
+<div class="center"><code class="t">arccos</code>  z = \pi\over2 - <code class="t">arcsin</code>  z
+</div>
+<p>or, which are equivalent,
+</p>
+<div class="center"><code class="t">arccos</code>  z = -i <code class="t">log</code>  (z+i \sqrt<span class="r">1-z^2</span>\Bigr)
+</div>
+<div class="center"><code class="t">arccos</code>  z = <code class="t">2 <code class="t">log</code>  (\sqrt<span class="r">(1+z)/2</span> + i \sqrt<span class="r">(1-z)/2</span>)</code>\over<span class="r">i</span>
+</div>
+<p>The branch cut for the arc cosine function is in two pieces:
+one along the negative real axis to the left of~-1
+(inclusive), continuous with quadrant II, and one along the positive real
+axis to the right of~1 (inclusive), continuous with quadrant IV.  
+This is the same branch cut as for arc sine.
+The range is that strip of the complex plane containing numbers whose real
+part is between 0 and~\pi.  A number with real
+part equal to 0 is in the range if and only if its imaginary
+part is non-negative; a number with real part equal to \pi is in
+the range if and only if its imaginary part is non-positive.
+</p>
+<p>The following definition for (one-argument) arc tangent determines the
+range and branch cuts:
+</p>
+<div class="center"><code class="t">arctan</code>  z = <i class="i"><i class="i"><code class="t">log</code>  (1+iz) - <code class="t">log</code>  (1-iz)</i>\over<i class="i">2i</i></i>
+</div>
+<p>Beware of simplifying this formula; &ldquo;obvious&rdquo; simplifications are likely
+to alter the branch cuts or the values on the branch cuts incorrectly.
+The branch cut for the arc tangent function is in two pieces:
+one along the positive imaginary axis above i
+(exclusive), continuous with quadrant II, and one along the negative imaginary
+axis below -i (exclusive), continuous with quadrant IV.  
+The points i and~-i are excluded from the domain.
+The range is that strip of the complex plane containing numbers whose real
+part is between -\pi/2 and~\pi/2.  A number with real
+part equal to -\pi/2 is in the range if and only if its imaginary
+part is strictly positive; a number with real part equal to \pi/2 is in
+the range if and only if its imaginary part is strictly negative.  Thus the range of
+arc tangent is identical to that of arc sine with the points
+-\pi/2 and~\pi/2 excluded.
+</p>
+<p>For <b class="b">atan</b>,
+the signs of <i class="i">number1</i> (indicated as <i class="i">x</i>)
+and <i class="i">number2</i> (indicated as <i class="i">y</i>) are used to derive quadrant
+information. Figure 12&ndash;14 details various special cases.
+</p>
+<p>The asterisk (*) indicates that the entry in the figure applies to
+implementations that support minus zero.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">   to 1pc<span class="r"></span><i class="i">y</i> Condition  <i class="i">x</i> Condition  Cartesian locus  Range of result          <!-- /@w -->
+   to 1pc<span class="r"></span> y = 0        x &gt; 0       Positive x-axis   0                       <!-- /@w -->
+   to 1pc* y = +0      x &gt; 0       Positive x-axis  +0                       <!-- /@w -->
+   to 1pc* y = -0      x &gt; 0       Positive x-axis  -0                       <!-- /@w -->
+   to 1pc<span class="r"></span> y &gt; 0        x &gt; 0       Quadrant I       0 &lt; result &lt; \pi/2      <!-- /@w -->
+   to 1pc<span class="r"></span> y &gt; 0        x = 0       Positive y-axis  \pi/2                    <!-- /@w -->
+   to 1pc<span class="r"></span> y &gt; 0        x &lt; 0       Quadrant II      \pi/2 &lt; result &lt; \pi    <!-- /@w -->
+   to 1pc<span class="r"></span> y = 0        x &lt; 0       Negative x-axis   \pi                     <!-- /@w -->
+   to 1pc* y = +0      x &lt; 0       Negative x-axis  +\pi                     <!-- /@w -->
+   to 1pc* y = -0      x &lt; 0       Negative x-axis  -\pi                     <!-- /@w -->
+   to 1pc<span class="r"></span> y &lt; 0        x &lt; 0       Quadrant III     -\pi &lt; result &lt; -\pi/2  <!-- /@w -->
+   to 1pc<span class="r"></span> y &lt; 0        x = 0       Negative y-axis  -\pi/2                   <!-- /@w -->
+   to 1pc<span class="r"></span> y &lt; 0        x &gt; 0       Quadrant IV      -\pi/2 &lt; result &lt; 0     <!-- /@w -->
+   to 1pc<span class="r"></span> y = 0        x = 0       Origin           undefined consequences   <!-- /@w -->
+   to 1pc* y = +0      x = +0      Origin           +0                       <!-- /@w -->
+   to 1pc* y = -0      x = +0      Origin           -0                       <!-- /@w -->
+   to 1pc* y = +0      x = -0      Origin           +\pi                     <!-- /@w -->
+   to 1pc* y = -0      x = -0      Origin           -\pi                     <!-- /@w -->
+
+               Figure 12&ndash;14: Quadrant information for arc tangent             <!-- /@w -->
+
+</pre></div></div>
+
+<h4 class="subsubheading" id="Examples_003a_003a-190"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-190"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (asin 0) &rArr;  0.0 
+ (acos #c(0 1))  &rArr;  #C(1.5707963267948966 -0.8813735870195432)
+ (/ (atan 1 (sqrt 3)) 6)  &rArr;  0.087266 
+ (atan #c(0 2)) &rArr;  #C(-1.5707964 0.54930615)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-82"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-82"> &para;</a></span></h4>
+
+<p><b class="b">acos</b> and <b class="b">asin</b> should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			   if <i class="i">number</i> is not a <i class="i">number</i>.
+<b class="b">atan</b> should signal <b class="b">type-error</b> if
+  one argument is supplied and that argument is not a <i class="i">number</i>,
+  or if two arguments are supplied and both of those arguments are not <i class="i">reals</i>.
+</p>
+<p><b class="b">acos</b>, <b class="b">asin</b>, and <b class="b">atan</b> might signal <b class="b">arithmetic-error</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-241"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-241"> &para;</a></span></h4>
+
+<p><a class="ref" href="log.html">log                                                              [Function]</a>
+,
+<a class="ref" href="sqrt.html">sqrt, isqrt                                                      [Function]</a>
+,
+<a class="ref" href="Rule-of-Float-Substitutability.html">Rule of Float Substitutability</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-144"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-144"> &para;</a></span></h4>
+
+<p>The result of either <b class="b">asin</b> or <b class="b">acos</b> can be a <i class="i">complex</i>
+even if <i class="i">number</i> is not a <i class="i">complex</i>; this occurs when the 
+absolute value of <i class="i">number</i> is greater than one.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="pi.html">pi                                                      [Constant Variable]</a>, Previous: <a href="sin.html">sin, cos, tan                                                    [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/assert.html
@@ -0,0 +1,167 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>assert (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="assert (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="assert (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="error.html" rel="next" title="error">
+<link href="storage_002dcondition.html" rel="prev" title="storage-condition">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="assert">
+<div class="nav-panel">
+<p>
+Next: <a href="error.html" accesskey="n" rel="next">error                                                            [Function]</a>, Previous: <a href="storage_002dcondition.html" accesskey="p" rel="prev">storage-condition                                          [Condition Type]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="assert-_005bMacro_005d"><span>9.2.10 assert                                                              [Macro]<a class="copiable-link" href="#assert-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">assert</code>  <i class="i">test-form <span class="r">[</span><span class="r">(</span>{<i class="i">place</i>}*<span class="r">)</span>
+                                          <span class="r">[</span>datum-form
+                                                {<i class="i">argument-form</i>}*<span class="r">]</span><span class="r">]</span></i><br>
+   &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-132"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-132"> &para;</a></span></h4>
+
+<p><i class="i">test-form</i>&mdash;a <i class="i">form</i>; always evaluated.
+</p>
+<p><i class="i">place</i>&mdash;a <i class="i">place</i>; evaluated if an error is signaled.
+</p>
+<p><i class="i">datum-form</i>&mdash;a <i class="i">form</i> that evaluates to a <i class="i">datum</i>.
+  Evaluated each time an error is to be signaled, 
+  or not at all if no error is to be signaled.
+</p>
+<p><i class="i">argument-form</i>&mdash;a <i class="i">form</i> that evaluates to an <i class="i">argument</i>.
+  Evaluated each time an error is to be signaled, 
+  or not at all if no error is to be signaled.
+</p>
+<p><i class="i">datum</i>, <i class="i">arguments</i>&mdash;<i class="i">designators</i> for a <i class="i">condition</i> 
+ of default type <b class="b">error</b>.  (These <i class="i">designators</i> are the
+ result of evaluating <i class="i">datum-form</i> and each of the <i class="i">argument-forms</i>.)
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-180"><span>Description::<a class="copiable-link" href="#Description_003a_003a-180"> &para;</a></span></h4>
+
+<p><b class="b">assert</b> assures that <i class="i">test-form</i> evaluates to <i class="i">true</i>.
+If <i class="i">test-form</i> evaluates to <i class="i">false</i>, <b class="b">assert</b> signals a
+<i class="i">correctable</i> <i class="i">error</i> (denoted by <i class="i">datum</i> and <i class="i">arguments</i>).
+Continuing from this error using the <b class="b">continue</b> <i class="i">restart</i> makes it possible
+for the user to alter the values of the <i class="i">places</i> before
+<b class="b">assert</b> evaluates <i class="i">test-form</i> again.
+If the value of <i class="i">test-form</i> is <i class="i">non-nil</i>,
+<b class="b">assert</b> returns <b class="b">nil</b>.
+</p>
+<p>The <i class="i">places</i> are <i class="i">generalized references</i> to data
+upon which <i class="i">test-form</i> depends, 
+whose values can be changed by the user in attempting to correct the error.
+<i class="i">Subforms</i> of each <i class="i">place</i> are only evaluated if an error is signaled, 
+and might be re-evaluated if the error is re-signaled (after continuing without
+actually fixing the problem).
+</p>
+<p>The order of evaluation of the <i class="i">places</i> is not specified;
+see <a class="ref" href="Evaluation-of-Subforms-to-Places.html">Evaluation of Subforms to Places</a>.
+<a class="index-entry-id" id="index-order-of-evaluation-8"></a>
+</p>
+<a class="index-entry-id" id="index-evaluation-order-8"></a>
+
+<p>If a <i class="i">place</i> <i class="i">form</i> is supplied that produces more values than there
+are store variables, the extra values are ignored. If the supplied 
+<i class="i">form</i> produces fewer values than there are store variables, 
+the missing values are set to <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-114"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-114"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (setq x (make-array '(3 5) :initial-element 3))
+&rArr;  #2A((3 3 3 3 3) (3 3 3 3 3) (3 3 3 3 3))
+ (setq y (make-array '(3 5) :initial-element 7))
+&rArr;  #2A((7 7 7 7 7) (7 7 7 7 7) (7 7 7 7 7))
+ (defun matrix-multiply (a b)
+   (let ((*print-array* nil))
+     (assert (and (= (array-rank a) (array-rank b) 2)
+                  (= (array-dimension a 1) (array-dimension b 0)))
+             (a b)
+             &quot;Cannot multiply ~S by ~S.&quot; a b)
+            (really-matrix-multiply a b))) &rArr;  MATRIX-MULTIPLY
+ (matrix-multiply x y)
+<code class="t"> |&gt; </code> Correctable error in MATRIX-MULTIPLY: 
+<code class="t"> |&gt; </code> Cannot multiply #&lt;ARRAY ...&gt; by #&lt;ARRAY ...&gt;.
+<code class="t"> |&gt; </code> Restart options:
+<code class="t"> |&gt; </code>  1: You will be prompted for one or more new values.
+<code class="t"> |&gt; </code>  2: Top level.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:continue 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Value for A: <b class="b">|&gt;&gt;</b><code class="t">x</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Value for B: <b class="b">|&gt;&gt;</b><code class="t">(make-array '(5 3) :initial-element 6)</code><b class="b">&lt;&lt;|</b>
+&rArr;  #2A((54 54 54 54 54)
+       (54 54 54 54 54)
+       (54 54 54 54 54)
+       (54 54 54 54 54)
+       (54 54 54 54 54))
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (defun double-safely (x) (assert (numberp x) (x)) (+ x x))
+ (double-safely 4) 
+&rArr;  8
+
+ (double-safely t)
+<code class="t"> |&gt; </code> Correctable error in DOUBLE-SAFELY: The value of (NUMBERP X) must be non-NIL.
+<code class="t"> |&gt; </code> Restart options:
+<code class="t"> |&gt; </code>  1: You will be prompted for one or more new values.
+<code class="t"> |&gt; </code>  2: Top level.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:continue 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Value for X: <b class="b">|&gt;&gt;</b><code class="t">7</code><b class="b">&lt;&lt;|</b>
+&rArr;  14
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-18"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-18"> &para;</a></span></h4>
+
+<p><b class="b">*break-on-signals*</b>
+</p>
+<p>The set of active <i class="i">condition handlers</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-158"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-158"> &para;</a></span></h4>
+
+<p><a class="ref" href="check_002dtype.html">check-type                                                          [Macro]</a>
+, 
+<a class="ref" href="error.html">error                                                            [Function]</a>
+, <a class="ref" href="Generalized-Reference.html">Generalized Reference</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-97"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-97"> &para;</a></span></h4>
+
+<p>The debugger need not include the <i class="i">test-form</i> in the error message,
+and the <i class="i">places</i> should not be included in the message, but they
+should be made available for the user&rsquo;s perusal.  If the user gives the
+&ldquo;continue&rdquo; command, the values of any of the references can be altered.
+The details of this depend on the implementation&rsquo;s style of user interface.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="error.html">error                                                            [Function]</a>, Previous: <a href="storage_002dcondition.html">storage-condition                                          [Condition Type]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/assoc.html
@@ -0,0 +1,162 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>assoc (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="assoc (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="assoc (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="copy_002dalist.html" rel="next" title="copy-alist">
+<link href="acons.html" rel="prev" title="acons">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="assoc">
+<div class="nav-panel">
+<p>
+Next: <a href="copy_002dalist.html" accesskey="n" rel="next">copy-alist                                                       [Function]</a>, Previous: <a href="acons.html" accesskey="p" rel="prev">acons                                                            [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="assoc_002c-assoc_002dif_002c-assoc_002dif_002dnot-_005bFunction_005d"><span>14.2.36 assoc, assoc-if, assoc-if-not                                    [Function]<a class="copiable-link" href="#assoc_002c-assoc_002dif_002c-assoc_002dif_002dnot-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">assoc</code>  <i class="i">item      alist <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">entry</i>
+</p>
+<p><code class="code">assoc-if</code>  <i class="i">predicate alist <span class="r">&amp;key</span> key</i> &rArr;  <i class="i">entry</i>
+</p>
+<p><code class="code">assoc-if-not</code>  <i class="i">predicate alist <span class="r">&amp;key</span> key</i> &rArr;  <i class="i">entry</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-305"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-305"> &para;</a></span></h4>
+
+<p><i class="i">item</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">alist</i>&mdash;an <i class="i">association list</i>.
+</p>
+<p><i class="i">predicate</i>&mdash;a <i class="i">designator</i> for 
+		    a <i class="i">function</i> of one <i class="i">argument</i>
+		    that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">entry</i>&mdash;a <i class="i">cons</i> that is an <i class="i">element</i> of <i class="i">alist</i>,
+	        or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-406"><span>Description::<a class="copiable-link" href="#Description_003a_003a-406"> &para;</a></span></h4>
+
+<p><b class="b">assoc</b>, <b class="b">assoc-if</b>, and <b class="b">assoc-if-not</b>
+return the first <i class="i">cons</i> in <i class="i">alist</i> whose <i class="i">car</i> <i class="i">satisfies the test</i>,
+or <b class="b">nil</b> if no such <i class="i">cons</i> is found.
+</p>
+<p>For <b class="b">assoc</b>, <b class="b">assoc-if</b>, and <b class="b">assoc-if-not</b>, if <b class="b">nil</b> appears
+in <i class="i">alist</i> in place of a pair, it is ignored.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-289"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-289"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq values '((x . 100) (y . 200) (z . 50))) &rArr;  ((X . 100) (Y . 200) (Z . 50))
+ (assoc 'y values) &rArr;  (Y . 200)
+ (rplacd (assoc 'y values) 201) &rArr;  (Y . 201)
+ (assoc 'y values) &rArr;  (Y . 201)
+ (setq alist '((1 . &quot;one&quot;)(2 . &quot;two&quot;)(3 . &quot;three&quot;))) 
+&rArr;  ((1 . &quot;one&quot;) (2 . &quot;two&quot;) (3 . &quot;three&quot;))
+ (assoc 2 alist) &rArr;  (2 . &quot;two&quot;)
+ (assoc-if #'evenp alist) &rArr;  (2 . &quot;two&quot;)
+ (assoc-if-not #'(lambda(x) (&lt; x 3)) alist) &rArr;  (3 . &quot;three&quot;)
+ (setq alist '((&quot;one&quot; . 1)(&quot;two&quot; . 2))) &rArr;  ((&quot;one&quot; . 1) (&quot;two&quot; . 2))
+ (assoc &quot;one&quot; alist) &rArr;  NIL
+ (assoc &quot;one&quot; alist :test #'equalp) &rArr;  (&quot;one&quot; . 1)
+ (assoc &quot;two&quot; alist :key #'(lambda(x) (char x 2))) &rArr;  NIL 
+ (assoc #\o alist :key #'(lambda(x) (char x 2))) &rArr;  (&quot;two&quot; . 2)
+ (assoc 'r '((a . b) (c . d) (r . x) (s . y) (r . z))) &rArr;   (R . X)
+ (assoc 'goo '((foo . bar) (zoo . goo))) &rArr;  NIL
+ (assoc '2 '((1 a b c) (2 b c d) (-7 x y z))) &rArr;  (2 B C D)
+ (setq alist '((&quot;one&quot; . 1) (&quot;2&quot; . 2) (&quot;three&quot; . 3)))
+&rArr;  ((&quot;one&quot; . 1) (&quot;2&quot; . 2) (&quot;three&quot; . 3))
+ (assoc-if-not #'alpha-char-p alist
+               :key #'(lambda (x) (char x 0))) &rArr;  (&quot;2&quot; . 2)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-130"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-130"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">alist</i> is not an <i class="i">association list</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-330"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-330"> &para;</a></span></h4>
+
+<p><a class="ref" href="rassoc.html">rassoc, rassoc-if, rassoc-if-not                                 [Function]</a>
+,
+<a class="ref" href="find.html">find, find-if, find-if-not                                       [Function]</a>
+,
+<a class="ref" href="member-_0028Function_0029.html">member, member-if, member-if-not                                 [Function]</a>
+,
+<a class="ref" href="position.html">position, position-if, position-if-not                           [Function]</a>
+,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-220"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-220"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> parameter is deprecated.
+</p>
+<p>The <i class="i">function</i> <b class="b">assoc-if-not</b> is deprecated.
+</p>
+<p>It is possible to <b class="b">rplacd</b> the result of <b class="b">assoc</b>, provided
+that it is not <b class="b">nil</b>,
+in order to &ldquo;update&rdquo; <i class="i">alist</i>. 
+</p>
+<p>The two expressions
+</p>
+<div class="example">
+<pre class="example-preformatted"> (assoc item list :test fn)
+</pre></div>
+
+<p>and
+</p>
+<div class="example">
+<pre class="example-preformatted"> (find item list :test fn :key #'car)
+</pre></div>
+
+<p>are equivalent in meaning with one exception:
+if <b class="b">nil</b> appears in <i class="i">alist</i> in place of a pair,
+and <i class="i">item</i> is <b class="b">nil</b>,
+<b class="b">find</b> will compute the <i class="i">car</i> of the <b class="b">nil</b> in <i class="i">alist</i>,
+find that it is equal to <i class="i">item</i>, and return <b class="b">nil</b>,
+whereas <b class="b">assoc</b> will ignore the <b class="b">nil</b> in <i class="i">alist</i> and continue
+to search for an actual <i class="i">cons</i> whose <i class="i">car</i> is <b class="b">nil</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="copy_002dalist.html">copy-alist                                                       [Function]</a>, Previous: <a href="acons.html">acons                                                            [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/atom-_0028Type_0029.html
@@ -0,0 +1,52 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>atom (Type) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="atom (Type) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="atom (Type) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="cons.html" rel="next" title="cons">
+<link href="cons-_0028System-Class_0029.html" rel="prev" title="cons (System Class)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="atom-_0028Type_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="cons.html" accesskey="n" rel="next">cons                                                             [Function]</a>, Previous: <a href="cons-_0028System-Class_0029.html" accesskey="p" rel="prev">cons                                                         [System Class]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="atom-_005bType_005d"><span>14.2.4 atom                                                                 [Type]<a class="copiable-link" href="#atom-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-13"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-13"> &para;</a></span></h4>
+
+<p><b class="b">atom</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-374"><span>Description::<a class="copiable-link" href="#Description_003a_003a-374"> &para;</a></span></h4>
+
+<p>It is equivalent to <code class="t">(not cons)</code>.  
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/atom.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>atom (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="atom (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="atom (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="rplaca.html" rel="next" title="rplaca">
+<link href="consp.html" rel="prev" title="consp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="atom">
+<div class="nav-panel">
+<p>
+Next: <a href="rplaca.html" accesskey="n" rel="next">rplaca, rplacd                                                   [Function]</a>, Previous: <a href="consp.html" accesskey="p" rel="prev">consp                                                            [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="atom-_005bFunction_005d"><span>14.2.7 atom                                                             [Function]<a class="copiable-link" href="#atom-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">atom</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-276"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-276"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-377"><span>Description::<a class="copiable-link" href="#Description_003a_003a-377"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">atom</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-260"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-260"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (atom 'sss) &rArr;  <i class="i">true</i>
+ (atom (cons 1 2)) &rArr;  <i class="i">false</i>
+ (atom nil) &rArr;  <i class="i">true</i>
+ (atom '()) &rArr;  <i class="i">true</i>
+ (atom 3) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-199"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-199"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (atom <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'atom) &equiv; (not (consp <i class="i">object</i>))
+ &equiv; (not (typep <i class="i">object</i> 'cons)) &equiv; (typep <i class="i">object</i> '(not cons))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/base_002dchar.html
@@ -0,0 +1,104 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>base-char (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="base-char (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="base-char (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="standard_002dchar.html" rel="next" title="standard-char">
+<link href="character-_0028System-Class_0029.html" rel="prev" title="character (System Class)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="base_002dchar">
+<div class="nav-panel">
+<p>
+Next: <a href="standard_002dchar.html" accesskey="n" rel="next">standard-char                                                        [Type]</a>, Previous: <a href="character-_0028System-Class_0029.html" accesskey="p" rel="prev">character                                                    [System Class]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="base_002dchar-_005bType_005d"><span>13.2.2 base-char                                                            [Type]<a class="copiable-link" href="#base_002dchar-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-10"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-10"> &para;</a></span></h4>
+
+<p><b class="b">base-char</b>,
+<b class="b">character</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-351"><span>Description::<a class="copiable-link" href="#Description_003a_003a-351"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">base-char</b> is defined as the <i class="i">upgraded array element type</i> 
+of <b class="b">standard-char</b>.
+An <i class="i">implementation</i> can support additional <i class="i">subtypes</i> of <i class="i">type</i> <b class="b">character</b>
+(besides the ones listed in this standard) 
+that might or might not be <i class="i">supertypes</i> of <i class="i">type</i> <b class="b">base-char</b>.
+In addition, an <i class="i">implementation</i> can define <b class="b">base-char</b>
+to be the <i class="i">same</i> <i class="i">type</i> as <b class="b">character</b>.
+</p>
+<p><i class="i">Base characters</i> are distinguished in the following respects:
+</p><dl class="table">
+<dt>1.</dt>
+<dd><p>The <i class="i">type</i> <b class="b">standard-char</b> is a <i class="i">subrepertoire</i> of the <i class="i">type</i> <b class="b">base-char</b>.
+</p></dd>
+<dt>2.</dt>
+<dd><p>The selection of <i class="i">base characters</i> that are not <i class="i">standard characters</i>
+	      is implementation defined.
+</p></dd>
+<dt>3.</dt>
+<dd><p>Only <i class="i">objects</i> of the <i class="i">type</i> <b class="b">base-char</b> can be 
+	     <i class="i">elements</i> of a <i class="i">base string</i>.
+</p></dd>
+<dt>4.</dt>
+<dd><p>No upper bound is specified for the number of characters in the 
+<b class="b">base-char</b> <i class="i">repertoire</i>; the size of that <i class="i">repertoire</i>
+is 
+<i class="i">implementation-defined</i>.
+The lower bound is~96, the number of <i class="i">standard characters</i>.
+</p></dd>
+</dl>
+
+<p>Whether a character is a <i class="i">base character</i> depends on the way 
+that an <i class="i">implementation</i> represents <i class="i">strings</i>, 
+and not any other properties of the <i class="i">implementation</i> or the host operating system.  
+For example, one implementation might encode all <i class="i">strings</i> 
+as characters having 16-bit encodings, and another might have
+two kinds of <i class="i">strings</i>: those with characters having 8-bit 
+encodings and those with characters having 16-bit encodings.  In the
+first <i class="i">implementation</i>, the <i class="i">type</i> <b class="b">base-char</b> is equivalent to
+the <i class="i">type</i> <b class="b">character</b>: there is only one kind of <i class="i">string</i>.
+In the second <i class="i">implementation</i>, the <i class="i">base characters</i> might be 
+those <i class="i">characters</i> that could be stored in a <i class="i">string</i> of <i class="i">characters</i>
+having 8-bit encodings.  In such an implementation,
+the <i class="i">type</i> <b class="b">base-char</b> is a <i class="i">proper subtype</i> of the <i class="i">type</i> <b class="b">character</b>.
+</p>
+<p>The <i class="i">type</i> <b class="b">standard-char</b> is a 
+</p>
+<p><i class="i">subtype</i> of <i class="i">type</i> <b class="b">base-char</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="standard_002dchar.html">standard-char                                                        [Type]</a>, Previous: <a href="character-_0028System-Class_0029.html">character                                                    [System Class]</a>, Up: <a href="Characters-Dictionary.html">Characters Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/base_002dstring.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>base-string (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="base-string (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="base-string (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Strings-Dictionary.html" rel="up" title="Strings Dictionary">
+<link href="simple_002dstring.html" rel="next" title="simple-string">
+<link href="string-_0028System-Class_0029.html" rel="prev" title="string (System Class)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="base_002dstring">
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002dstring.html" accesskey="n" rel="next">simple-string                                                        [Type]</a>, Previous: <a href="string-_0028System-Class_0029.html" accesskey="p" rel="prev">string                                                       [System Class]</a>, Up: <a href="Strings-Dictionary.html" accesskey="u" rel="up">Strings Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="base_002dstring-_005bType_005d"><span>16.2.2 base-string                                                          [Type]<a class="copiable-link" href="#base_002dstring-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-17"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-17"> &para;</a></span></h4>
+
+<p><b class="b">base-string</b>,
+<b class="b">string</b>,
+<b class="b">vector</b>,
+<b class="b">array</b>,
+<b class="b">sequence</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-457"><span>Description::<a class="copiable-link" href="#Description_003a_003a-457"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">base-string</b> is equivalent to 
+</p>
+<p><code class="t">(vector base-char)</code>.
+</p>
+<p>The <i class="i">base string</i> representation is the most efficient <i class="i">string</i> representation
+that can hold an arbitrary sequence of <i class="i">standard characters</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-25"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-25"> &para;</a></span></h4>
+
+<p>Abbreviating.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-25"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-25"> &para;</a></span></h4>
+
+<p>(<code class="code">base-string</code>{<i class="i"><code class="t">[</code>size<code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-25"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-25"> &para;</a></span></h4>
+
+<p><i class="i">size</i>&mdash;a non-negative <i class="i">fixnum</i>,
+	    or the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-25"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-25"> &para;</a></span></h4>
+
+<p>This is equivalent to the type <code class="t">(vector base-char <i class="i">size</i>)</code>;
+that is, the set of <i class="i">base strings</i> of size <i class="i">size</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/bignum.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>bignum (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="bignum (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="bignum (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="_003d.html" rel="next" title="=">
+<link href="fixnum.html" rel="prev" title="fixnum">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="bignum">
+<div class="nav-panel">
+<p>
+Next: <a href="_003d.html" accesskey="n" rel="next">=, /=, &lt;, &gt;, &lt;=, &gt;=                                              [Function]</a>, Previous: <a href="fixnum.html" accesskey="p" rel="prev">fixnum                                                               [Type]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="bignum-_005bType_005d"><span>12.2.14 bignum                                                               [Type]<a class="copiable-link" href="#bignum-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-9"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-9"> &para;</a></span></h4>
+
+<p><b class="b">bignum</b>,
+<b class="b">integer</b>,
+<b class="b">rational</b>,
+</p>
+<p><b class="b">real</b>,
+</p>
+<p><b class="b">number</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-279"><span>Description::<a class="copiable-link" href="#Description_003a_003a-279"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">bignum</b> is defined to be exactly <code class="t">(and integer (not fixnum))</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/bit-_0028Array_0029.html
@@ -0,0 +1,98 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>bit (Array) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="bit (Array) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="bit (Array) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="bit_002dand.html" rel="next" title="bit-and">
+<link href="vectorp.html" rel="prev" title="vectorp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="bit-_0028Array_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="bit_002dand.html" accesskey="n" rel="next">bit-and, bit-andc1, bit-andc2, bit-eqv,</a>, Previous: <a href="vectorp.html" accesskey="p" rel="prev">vectorp                                                          [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="bit_002c-sbit-_005bAccessor_005d"><span>15.2.33 bit, sbit                                                        [Accessor]<a class="copiable-link" href="#bit_002c-sbit-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">bit</code>  <i class="i">bit-array <span class="r">&amp;rest</span> subscripts</i> &rArr;  <i class="i">bit</i>
+</p>
+<p><code class="code">sbit</code>  <i class="i">bit-array <span class="r">&amp;rest</span> subscripts</i> &rArr;  <i class="i">bit</i>
+</p>
+<p>(setf (<code class="code">bit</code> <i class="i">bit-array <span class="r">&amp;rest</span> subscripts</i>) new-bit)<br>(setf (<code class="code">sbit</code> <i class="i">bit-array <span class="r">&amp;rest</span> subscripts</i>) new-bit)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-342"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-342"> &para;</a></span></h4>
+
+<p><i class="i">bit-array</i>&mdash;for <b class="b">bit</b>,  a <i class="i">bit array</i>;
+		    for <b class="b">sbit</b>, a <i class="i">simple bit array</i>.
+</p>
+<p><i class="i">subscripts</i>&mdash;a <i class="i">list</i> of <i class="i">valid array indices</i> 
+		     for the <i class="i">bit-array</i>.
+</p>
+<p><i class="i">bit</i>&mdash;a <i class="i">bit</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-452"><span>Description::<a class="copiable-link" href="#Description_003a_003a-452"> &para;</a></span></h4>
+
+<p><b class="b">bit</b> and <b class="b">sbit</b> <i class="i">access</i> the <i class="i">bit-array</i> 
+<i class="i">element</i> specified by <i class="i">subscripts</i>.
+</p>
+<p>These <i class="i">functions</i> ignore the <i class="i">fill pointer</i> when <i class="i">accessing</i> <i class="i">elements</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-324"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-324"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (bit (setq ba (make-array 8 
+                            :element-type 'bit 
+                            :initial-element 1))
+       3) &rArr;  1
+ (setf (bit ba 3) 0) &rArr;  0
+ (bit ba 3) &rArr;  0
+ (sbit ba 5) &rArr;  1
+ (setf (sbit ba 5) 1) &rArr;  1
+ (sbit ba 5) &rArr;  1
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-371"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-371"> &para;</a></span></h4>
+
+<p><a class="ref" href="aref.html">aref                                                             [Accessor]</a>
+,
+</p>
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-247"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-247"> &para;</a></span></h4>
+
+<p><b class="b">bit</b> and <b class="b">sbit</b> are like <b class="b">aref</b>
+except that they require <i class="i">arrays</i> to be
+a <i class="i">bit array</i> and a <i class="i">simple bit array</i>, respectively.
+</p>
+<p><b class="b">bit</b> and <b class="b">sbit</b>, unlike <b class="b">char</b> and <b class="b">schar</b>,
+allow the first argument to be an <i class="i">array</i> of any <i class="i">rank</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/bit-_0028System-Class_0029.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>bit (System Class) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="bit (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="bit (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="fixnum.html" rel="next" title="fixnum">
+<link href="mod-_0028System-Class_0029.html" rel="prev" title="mod (System Class)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="bit-_0028System-Class_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="fixnum.html" accesskey="n" rel="next">fixnum                                                               [Type]</a>, Previous: <a href="mod-_0028System-Class_0029.html" accesskey="p" rel="prev">mod                                                        [Type Specifier]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="bit-_005bType_005d"><span>12.2.12 bit                                                                  [Type]<a class="copiable-link" href="#bit-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-7"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-7"> &para;</a></span></h4>
+
+<p><b class="b">bit</b>,
+<b class="b">unsigned-byte</b>,
+<b class="b">signed-byte</b>,
+<b class="b">integer</b>,
+<b class="b">rational</b>,
+</p>
+<p><b class="b">real</b>,
+</p>
+<p><b class="b">number</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-277"><span>Description::<a class="copiable-link" href="#Description_003a_003a-277"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">bit</b> is equivalent to the <i class="i">type</i> <code class="t">(integer 0 1)</code>
+and <code class="t">(unsigned-byte 1)</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/bit_002dand.html
@@ -0,0 +1,153 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>bit-and (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="bit-and (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="bit-and (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="bit_002dvector_002dp.html" rel="next" title="bit-vector-p">
+<link href="bit-_0028Array_0029.html" rel="prev" title="bit (Array)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="bit_002dand">
+<div class="nav-panel">
+<p>
+Next: <a href="bit_002dvector_002dp.html" accesskey="n" rel="next">bit-vector-p                                                     [Function]</a>, Previous: <a href="bit-_0028Array_0029.html" accesskey="p" rel="prev">bit, sbit                                                        [Accessor]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="bit_002dand_002c-bit_002dandc1_002c-bit_002dandc2_002c-bit_002deqv_002c"><span>15.2.34 bit-and, bit-andc1, bit-andc2, bit-eqv,<a class="copiable-link" href="#bit_002dand_002c-bit_002dandc1_002c-bit_002dandc2_002c-bit_002deqv_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="bit_002dior_002c-bit_002dnand_002c-bit_002dnor_002c-bit_002dnot_002c-bit_002dorc1_002c-bit_002dorc2_002c-bit_002dxor"><span>bit-ior, bit-nand, bit-nor, bit-not, bit-orc1, bit-orc2, bit-xor<a class="copiable-link" href="#bit_002dior_002c-bit_002dnand_002c-bit_002dnor_002c-bit_002dnot_002c-bit_002dorc1_002c-bit_002dorc2_002c-bit_002dxor"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Function]</i>
+</p></div>
+<p><code class="code">bit-and</code>  <i class="i">bit-array1 bit-array2 <span class="r">&amp;optional</span> opt-arg</i> &rArr;  <i class="i">resulting-bit-array</i>
+</p>
+<p><code class="code">bit-andc1</code>  <i class="i">bit-array1 bit-array2 <span class="r">&amp;optional</span> opt-arg</i> &rArr;  <i class="i">resulting-bit-array</i>
+</p>
+<p><code class="code">bit-andc2</code>  <i class="i">bit-array1 bit-array2 <span class="r">&amp;optional</span> opt-arg</i> &rArr;  <i class="i">resulting-bit-array</i>
+</p>
+<p><code class="code">bit-eqv</code>  <i class="i">bit-array1 bit-array2 <span class="r">&amp;optional</span> opt-arg</i> &rArr;  <i class="i">resulting-bit-array</i>
+</p>
+<p><code class="code">bit-ior</code>  <i class="i">bit-array1 bit-array2 <span class="r">&amp;optional</span> opt-arg</i> &rArr;  <i class="i">resulting-bit-array</i>
+</p>
+<p><code class="code">bit-nand</code>  <i class="i">bit-array1 bit-array2 <span class="r">&amp;optional</span> opt-arg</i> &rArr;  <i class="i">resulting-bit-array</i>
+</p>
+<p><code class="code">bit-nor</code>  <i class="i">bit-array1 bit-array2 <span class="r">&amp;optional</span> opt-arg</i> &rArr;  <i class="i">resulting-bit-array</i>
+</p>
+<p><code class="code">bit-orc1</code>  <i class="i">bit-array1 bit-array2 <span class="r">&amp;optional</span> opt-arg</i> &rArr;  <i class="i">resulting-bit-array</i>
+</p>
+<p><code class="code">bit-orc2</code>  <i class="i">bit-array1 bit-array2 <span class="r">&amp;optional</span> opt-arg</i> &rArr;  <i class="i">resulting-bit-array</i>
+</p>
+<p><code class="code">bit-xor</code>  <i class="i">bit-array1 bit-array2 <span class="r">&amp;optional</span> opt-arg</i> &rArr;  <i class="i">resulting-bit-array</i>
+</p>
+<p><code class="code">bit-not</code>  <i class="i">bit-array <span class="r">&amp;optional</span> opt-arg</i> &rArr;  <i class="i">resulting-bit-array</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-343"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-343"> &para;</a></span></h4>
+
+<p><i class="i">bit-array</i>, <i class="i">bit-array1</i>, <i class="i">bit-array2</i>&mdash;a <i class="i">bit array</i>.
+</p>
+<p><i class="i">Opt-arg</i>&mdash;a <i class="i">bit array</i>, or <b class="b">t</b>, or <b class="b">nil</b>.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">Bit-array</i>, <i class="i">bit-array1</i>, <i class="i">bit-array2</i>, and <i class="i">opt-arg</i>
+(if an <i class="i">array</i>) must all be of the same <i class="i">rank</i> and <i class="i">dimensions</i>.  
+</p>
+<p><i class="i">resulting-bit-array</i>&mdash;a <i class="i">bit array</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-453"><span>Description::<a class="copiable-link" href="#Description_003a_003a-453"> &para;</a></span></h4>
+
+<p>These functions perform 
+bit-wise logical operations on <i class="i">bit-array1</i> and <i class="i">bit-array2</i>
+and return an <i class="i">array</i> 
+of matching <i class="i">rank</i> and <i class="i">dimensions</i>,
+such that any given bit of the result
+is produced by operating on corresponding bits from each of the arguments.
+</p>
+<p>In the case of <b class="b">bit-not</b>, an <i class="i">array</i>
+of <i class="i">rank</i> and <i class="i">dimensions</i> matching <i class="i">bit-array</i>
+is returned that contains a copy of <i class="i">bit-array</i> 
+with all the bits inverted.
+</p>
+<p>If <i class="i">opt-arg</i> is of type <code class="t">(array bit)</code> the contents of the 
+result are destructively placed into <i class="i">opt-arg</i>.
+If <i class="i">opt-arg</i> is the symbol <b class="b">t</b>,
+<i class="i">bit-array</i> or <i class="i">bit-array1</i> is replaced with the result; 
+if <i class="i">opt-arg</i> is <b class="b">nil</b> or omitted, a new <i class="i">array</i> is created
+to contain the result.  
+</p>
+<p>Figure 15&ndash;4 indicates the logical operation
+performed by each of the <i class="i">functions</i>.
+</p>
+<p>2
+</p><div class="format">
+<div class="group"><pre class="format-preformatted"><b class="b">Function</b>                                                   <b class="b">Operation</b>                                   <!-- /@w -->
+_______________________________________________________________________________________________________<!-- /@w -->
+                                                           <!-- /@w -->
+<b class="b">bit-and</b>                                                    and                                         <!-- /@w -->
+<b class="b">bit-eqv</b>                                                    equivalence (exclusive nor)                 <!-- /@w -->
+<b class="b">bit-not</b>                                                    complement                                  <!-- /@w -->
+<b class="b">bit-ior</b>                                                    inclusive or                                <!-- /@w -->
+<b class="b">bit-xor</b>                                                    exclusive or                                <!-- /@w -->
+<b class="b">bit-nand</b>                                                   complement of <i class="i">bit-array1</i> and <i class="i">bit-array2</i>     <!-- /@w -->
+<b class="b">bit-nor</b>                                                    complement of <i class="i">bit-array1</i> or <i class="i">bit-array2</i>      <!-- /@w -->
+<b class="b">bit-andc1</b>                                                  and complement of <i class="i">bit-array1</i> with <i class="i">bit-array2</i><!-- /@w -->
+<b class="b">bit-andc2</b>                                                  and <i class="i">bit-array1</i> with complement of <i class="i">bit-array2</i><!-- /@w -->
+<b class="b">bit-orc1</b>                                                   or complement of <i class="i">bit-array1</i> with <i class="i">bit-array2</i> <!-- /@w -->
+<b class="b">bit-orc2</b>                                                   or <i class="i">bit-array1</i> with complement of <i class="i">bit-array2</i> <!-- /@w -->
+  Figure 15&ndash;3: Bit-wise Logical Operations on Bit Arrays<!-- /@w -->
+<!-- /@w -->
+</pre></div></div>
+
+<h4 class="subsubheading" id="Examples_003a_003a-325"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-325"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (bit-and (setq ba #*11101010) #*01101011) &rArr;  #*01101010
+ (bit-and #*1100 #*1010) &rArr;  #*1000      
+ (bit-andc1 #*1100 #*1010) &rArr;  #*0010
+ (setq rba (bit-andc2 ba #*00110011 t)) &rArr;  #*11001000
+ (eq rba ba) &rArr;  <i class="i">true</i>
+ (bit-not (setq ba #*11101010)) &rArr;  #*00010101
+ (setq rba (bit-not ba 
+                     (setq tba (make-array 8 
+                                           :element-type 'bit))))
+&rArr;  #*00010101
+ (equal rba tba) &rArr;  <i class="i">true</i>
+ (bit-xor #*1100 #*1010) &rArr;  #*0110
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-372"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-372"> &para;</a></span></h4>
+
+<p><b class="b">lognot</b>, 
+<a class="ref" href="logand.html">logand,  logandc1, logandc2, logeqv,  logior,</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="bit_002dvector_002dp.html">bit-vector-p                                                     [Function]</a>, Previous: <a href="bit-_0028Array_0029.html">bit, sbit                                                        [Accessor]</a>, Up: <a href="Arrays-Dictionary.html">Arrays Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/bit_002dvector.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>bit-vector (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="bit-vector (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="bit-vector (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="simple_002dbit_002dvector.html" rel="next" title="simple-bit-vector">
+<link href="simple_002dvector.html" rel="prev" title="simple-vector">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="bit_002dvector">
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002dbit_002dvector.html" accesskey="n" rel="next">simple-bit-vector                                                    [Type]</a>, Previous: <a href="simple_002dvector.html" accesskey="p" rel="prev">simple-vector                                                        [Type]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="bit_002dvector-_005bSystem-Class_005d"><span>15.2.5 bit-vector                                                   [System Class]<a class="copiable-link" href="#bit_002dvector-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-55"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-55"> &para;</a></span></h4>
+<p><b class="b">bit-vector</b>,
+<b class="b">vector</b>,
+<b class="b">array</b>,
+<b class="b">sequence</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-424"><span>Description::<a class="copiable-link" href="#Description_003a_003a-424"> &para;</a></span></h4>
+
+<p>A <i class="i">bit vector</i> is a <i class="i">vector</i> the <i class="i">element type</i> of which is <i class="i">bit</i>.
+</p>
+<p>The <i class="i">type</i> <b class="b">bit-vector</b> is a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">vector</b>, 
+for <b class="b">bit-vector</b> means <code class="t">(vector bit)</code>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-22"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-22"> &para;</a></span></h4>
+
+<p>Abbreviating.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-22"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-22"> &para;</a></span></h4>
+
+<p>(<code class="code">bit-vector</code>{<i class="i"><code class="t">[</code>size<code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-22"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-22"> &para;</a></span></h4>
+
+<p><i class="i">size</i>&mdash;a non-negative <i class="i">fixnum</i>,
+	    or the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-22"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-22"> &para;</a></span></h4>
+
+<p>This denotes the same <i class="i">type</i> as the <i class="i">type</i> <code class="t">(array bit (<i class="i">size</i>))</code>;
+that is, the set of <i class="i">bit vectors</i> of size <i class="i">size</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-346"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-346"> &para;</a></span></h4>
+
+<p><a class="ref" href="Sharpsign-Asterisk.html">Sharpsign Asterisk</a>,
+<a class="ref" href="Printing-Bit-Vectors.html">Printing Bit Vectors</a>,
+<a class="ref" href="Required-Kinds-of-Specialized-Arrays.html">Required Kinds of Specialized Arrays</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/bit_002dvector_002dp.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>bit-vector-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="bit-vector-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="bit-vector-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="simple_002dbit_002dvector_002dp.html" rel="next" title="simple-bit-vector-p">
+<link href="bit_002dand.html" rel="prev" title="bit-and">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="bit_002dvector_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002dbit_002dvector_002dp.html" accesskey="n" rel="next">simple-bit-vector-p                                              [Function]</a>, Previous: <a href="bit_002dand.html" accesskey="p" rel="prev">bit-and, bit-andc1, bit-andc2, bit-eqv,</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="bit_002dvector_002dp-_005bFunction_005d"><span>15.2.35 bit-vector-p                                                     [Function]<a class="copiable-link" href="#bit_002dvector_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">bit-vector-p</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-344"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-344"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-454"><span>Description::<a class="copiable-link" href="#Description_003a_003a-454"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">bit-vector</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-326"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-326"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (bit-vector-p (make-array 6 
+                           :element-type 'bit 
+                           :fill-pointer t)) &rArr;  <i class="i">true</i>
+ (bit-vector-p #*) &rArr;  <i class="i">true</i>
+ (bit-vector-p (make-array 6)) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-373"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-373"> &para;</a></span></h4>
+
+<p><a class="ref" href="typep.html">typep                                                            [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-248"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-248"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (bit-vector-p <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'bit-vector)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/block.html
@@ -0,0 +1,107 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>block (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="block (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="block (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="catch.html" rel="next" title="catch">
+<link href="psetq.html" rel="prev" title="psetq">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="block">
+<div class="nav-panel">
+<p>
+Next: <a href="catch.html" accesskey="n" rel="next">catch                                                    [Special Operator]</a>, Previous: <a href="psetq.html" accesskey="p" rel="prev">psetq                                                               [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="block-_005bSpecial-Operator_005d"><span>5.3.22 block                                                    [Special Operator]<a class="copiable-link" href="#block-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">block</code>  <i class="i"><i class="i">name</i> <i class="i">form</i><span class="r">*</span></i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-43"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-43"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> of the <i class="i">forms</i> if a <i class="i">normal return</i> occurs,
+   or else, if an <i class="i">explicit return</i> occurs, the <i class="i">values</i> that were transferred.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-75"><span>Description::<a class="copiable-link" href="#Description_003a_003a-75"> &para;</a></span></h4>
+
+<p><b class="b">block</b> <i class="i">establishes</i> a <i class="i">block</i> named <i class="i">name</i>
+and then evaluates <i class="i">forms</i> as an <i class="i">implicit progn</i>.
+</p>
+<p>The <i class="i">special operators</i> <b class="b">block</b> and <b class="b">return-from</b> work together to
+provide a structured, lexical, non-local exit facility.  At any point lexically
+contained within <i class="i">forms</i>, <b class="b">return-from</b> can be used with the
+given <i class="i">name</i> to return control and values from the <b class="b">block</b> 
+<i class="i">form</i>, except when an intervening <i class="i">block</i> with the same name
+has been <i class="i">established</i>, in which case the outer <i class="i">block</i> is 
+shadowed by the inner one.
+</p>
+<p>The <i class="i">block</i> named <i class="i">name</i> has
+<i class="i">lexical scope</i> and <i class="i">dynamic extent</i>.  
+</p>
+<p>Once established, a <i class="i">block</i> may only be exited once, 
+whether by <i class="i">normal return</i> or <i class="i">explicit return</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-49"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-49"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (block empty) &rArr;  NIL
+ (block whocares (values 1 2) (values 3 4)) &rArr;  3, 4
+ (let ((x 1)) 
+   (block stop (setq x 2) (return-from stop) (setq x 3))
+   x) &rArr;  2
+ (block early (return-from early (values 1 2)) (values 3 4)) &rArr;  1, 2
+ (block outer (block inner (return-from outer 1)) 2) &rArr;  1
+ (block twin (block twin (return-from twin 1)) 2) &rArr;  2
+ ;; Contrast behavior of this example with corresponding example of CATCH.
+ (block b
+   (flet ((b1 () (return-from b 1)))
+     (block b (b1) (print 'unreachable))
+     2)) &rArr;  1
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-60"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-60"> &para;</a></span></h4>
+
+<p><a class="ref" href="return.html">return                                                              [Macro]</a>
+, 
+<a class="ref" href="return_002dfrom.html">return-from                                              [Special Operator]</a>
+, <a class="ref" href="Evaluation.html">Evaluation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-36"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-36"> &para;</a></span></h4>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="catch.html">catch                                                    [Special Operator]</a>, Previous: <a href="psetq.html">psetq                                                               [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/boole.html
@@ -0,0 +1,184 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>boole (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="boole (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="boole (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="boole_002d1.html" rel="next" title="boole-1">
+<link href="parse_002dinteger.html" rel="prev" title="parse-integer">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="boole">
+<div class="nav-panel">
+<p>
+Next: <a href="boole_002d1.html" accesskey="n" rel="next">boole-1,    boole-2,   boole-and,  boole-andc1, boole-andc2,</a>, Previous: <a href="parse_002dinteger.html" accesskey="p" rel="prev">parse-integer                                                    [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="boole-_005bFunction_005d"><span>12.2.60 boole                                                            [Function]<a class="copiable-link" href="#boole-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">boole</code>  <i class="i">op integer-1 integer-2</i> &rArr;  <i class="i">result-integer</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-243"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-243"> &para;</a></span></h4>
+
+<p><i class="i">Op</i>&mdash;a <i class="i">bit-wise logical operation specifier</i>.
+</p>
+<p><i class="i">integer-1</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">integer-2</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">result-integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-325"><span>Description::<a class="copiable-link" href="#Description_003a_003a-325"> &para;</a></span></h4>
+
+<p><b class="b">boole</b> performs bit-wise logical operations on
+<i class="i">integer-1</i> and <i class="i">integer-2</i>, which are treated as if
+they were binary and in two&rsquo;s complement representation.
+</p>
+<p>The operation to be performed and the return value are determined by 
+<i class="i">op</i>.  
+</p>
+<p><b class="b">boole</b> returns the values 
+specified for any <i class="i">op</i> in Figure 12&ndash;16.
+</p>
+
+
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Op           Result                                      <!-- /@w -->
+  <b class="b">boole-1</b>      <i class="i">integer-1</i>                                   <!-- /@w -->
+  <b class="b">boole-2</b>      <i class="i">integer-2</i>                                   <!-- /@w -->
+  <b class="b">boole-andc1</b>  and complement of <i class="i">integer-1</i> with <i class="i">integer-2</i>  <!-- /@w -->
+  <b class="b">boole-andc2</b>  and <i class="i">integer-1</i> with complement of <i class="i">integer-2</i>  <!-- /@w -->
+  <b class="b">boole-and</b>    and                                         <!-- /@w -->
+  <b class="b">boole-c1</b>     complement of <i class="i">integer-1</i>                     <!-- /@w -->
+  <b class="b">boole-c2</b>     complement of <i class="i">integer-2</i>                     <!-- /@w -->
+  <b class="b">boole-clr</b>    always 0 (all zero bits)                    <!-- /@w -->
+  <b class="b">boole-eqv</b>    equivalence (exclusive nor)                 <!-- /@w -->
+  <b class="b">boole-ior</b>    inclusive or                                <!-- /@w -->
+  <b class="b">boole-nand</b>   not-and                                     <!-- /@w -->
+  <b class="b">boole-nor</b>    not-or                                      <!-- /@w -->
+  <b class="b">boole-orc1</b>   or complement of <i class="i">integer-1</i> with <i class="i">integer-2</i>   <!-- /@w -->
+  <b class="b">boole-orc2</b>   or <i class="i">integer-1</i> with complement of <i class="i">integer-2</i>   <!-- /@w -->
+  <b class="b">boole-set</b>    always -1 (all one bits)                    <!-- /@w -->
+  <b class="b">boole-xor</b>    exclusive or                                <!-- /@w -->
+
+         Figure 12&ndash;16: Bit-Wise Logical Operations        <!-- /@w -->
+
+</pre></div></div>
+
+
+
+<h4 class="subsubheading" id="Examples_003a_003a-227"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-227"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (boole boole-ior 1 16) &rArr;  17
+ (boole boole-and -2 5) &rArr;  4
+ (boole boole-eqv 17 15) &rArr;  -31
+
+;;; These examples illustrate the result of applying BOOLE and each
+;;; of the possible values of OP to each possible combination of bits.
+ (progn
+   (format t &quot;~&amp;Results of (BOOLE &lt;op&gt; #b0011 #b0101) ...~
+           ~
+   (dolist (symbol '(boole-1     boole-2    boole-and  boole-andc1
+                     boole-andc2 boole-c1   boole-c2   boole-clr
+                     boole-eqv   boole-ior  boole-nand boole-nor
+                     boole-orc1  boole-orc2 boole-set  boole-xor))
+     (let ((result (boole (symbol-value symbol) #b0011 #b0101)))
+       (format t &quot;~&amp; ~A~13T~3,' D~23T~:*~5,' B~31T ...~4,'0B~
+               symbol result (logand result #b1111)))))
+<code class="t"> |&gt; </code> Results of (BOOLE &lt;op&gt; #b0011 #b0101) ...
+<code class="t"> |&gt; </code> ---Op-------Decimal-----Binary----Bits---
+<code class="t"> |&gt; </code>  BOOLE-1       3          11    ...0011
+<code class="t"> |&gt; </code>  BOOLE-2       5         101    ...0101
+<code class="t"> |&gt; </code>  BOOLE-AND     1           1    ...0001
+<code class="t"> |&gt; </code>  BOOLE-ANDC1   4         100    ...0100
+<code class="t"> |&gt; </code>  BOOLE-ANDC2   2          10    ...0010
+<code class="t"> |&gt; </code>  BOOLE-C1     -4        -100    ...1100
+<code class="t"> |&gt; </code>  BOOLE-C2     -6        -110    ...1010
+<code class="t"> |&gt; </code>  BOOLE-CLR     0           0    ...0000
+<code class="t"> |&gt; </code>  BOOLE-EQV    -7        -111    ...1001
+<code class="t"> |&gt; </code>  BOOLE-IOR     7         111    ...0111
+<code class="t"> |&gt; </code>  BOOLE-NAND   -2         -10    ...1110
+<code class="t"> |&gt; </code>  BOOLE-NOR    -8       -1000    ...1000
+<code class="t"> |&gt; </code>  BOOLE-ORC1   -3         -11    ...1101
+<code class="t"> |&gt; </code>  BOOLE-ORC2   -5        -101    ...1011
+<code class="t"> |&gt; </code>  BOOLE-SET    -1          -1    ...1111
+<code class="t"> |&gt; </code>  BOOLE-XOR     6         110    ...0110
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-101"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-101"> &para;</a></span></h4>
+
+<p>Should signal <b class="b">type-error</b> if its first argument is not a 
+<i class="i">bit-wise logical operation specifier</i> or if any subsequent argument is not
+an <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-270"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-270"> &para;</a></span></h4>
+
+<p><a class="ref" href="logand.html">logand,  logandc1, logandc2, logeqv,  logior,</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-171"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-171"> &para;</a></span></h4>
+
+<p>In general,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (boole boole-and x y) &equiv; (logand x y)
+</pre></div>
+
+<p><i class="i">Programmers</i> who would prefer to use numeric indices rather than 
+<i class="i">bit-wise logical operation specifiers</i> can get an equivalent effect
+by a technique such as the following:
+</p>
+<div class="example">
+<pre class="example-preformatted">;; The order of the values in this `table' are such that
+;; (logand (boole (elt boole-n-vector n) #b0101 #b0011) #b1111) =&gt; n
+ (defconstant boole-n-vector
+    (vector boole-clr   boole-and  boole-andc1 boole-2
+            boole-andc2 boole-1    boole-xor   boole-ior
+            boole-nor   boole-eqv  boole-c1    boole-orc1
+            boole-c2    boole-orc2 boole-nand  boole-set))
+&rArr;  BOOLE-N-VECTOR
+ (proclaim '(inline boole-n))
+&rArr;  <i class="i">implementation-dependent</i>
+ (defun boole-n (n integer &amp;rest more-integers)
+   (apply #'boole (elt boole-n-vector n) integer more-integers))
+&rArr;  BOOLE-N
+ (boole-n #b0111 5 3) &rArr;  7
+ (boole-n #b0001 5 3) &rArr;  1
+ (boole-n #b1101 5 3) &rArr;  -3
+ (loop for n from #b0000 to #b1111 collect (boole-n n 5 3))
+&rArr;  (0 1 2 3 4 5 6 7 -8 -7 -6 -5 -4 -3 -2 -1)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="boole_002d1.html">boole-1,    boole-2,   boole-and,  boole-andc1, boole-andc2,</a>, Previous: <a href="parse_002dinteger.html">parse-integer                                                    [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/boole_002d1.html
@@ -0,0 +1,72 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>boole-1 (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="boole-1 (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="boole-1 (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="logand.html" rel="next" title="logand">
+<link href="boole.html" rel="prev" title="boole">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="boole_002d1">
+<div class="nav-panel">
+<p>
+Next: <a href="logand.html" accesskey="n" rel="next">logand,  logandc1, logandc2, logeqv,  logior,</a>, Previous: <a href="boole.html" accesskey="p" rel="prev">boole                                                            [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="boole_002d1_002c-boole_002d2_002c-boole_002dand_002c-boole_002dandc1_002c-boole_002dandc2_002c"><span>12.2.61 boole-1,    boole-2,   boole-and,  boole-andc1, boole-andc2,<a class="copiable-link" href="#boole_002d1_002c-boole_002d2_002c-boole_002dand_002c-boole_002dandc1_002c-boole_002dandc2_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="boole_002dc1_002c-boole_002dc2_002c-boole_002dclr_002c-boole_002deqv_002c-boole_002dior_002c"><span>boole-c1,   boole-c2,  boole-clr,  boole-eqv,   boole-ior,<a class="copiable-link" href="#boole_002dc1_002c-boole_002dc2_002c-boole_002dclr_002c-boole_002deqv_002c-boole_002dior_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="boole_002dnand_002c-boole_002dnor_002c-boole_002dorc1_002c-boole_002dorc2_002c-boole_002dset_002c"><span>boole-nand, boole-nor, boole-orc1, boole-orc2,  boole-set,<a class="copiable-link" href="#boole_002dnand_002c-boole_002dnor_002c-boole_002dorc1_002c-boole_002dorc2_002c-boole_002dset_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="boole_002dxor"><span>boole-xor<a class="copiable-link" href="#boole_002dxor"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Constant Variable]</i>
+</p></div>
+<h4 class="subsubheading" id="Constant-Value_003a_003a-6"><span>Constant Value::<a class="copiable-link" href="#Constant-Value_003a_003a-6"> &para;</a></span></h4>
+
+<p>The identity and nature of the <i class="i">values</i> of each of these <i class="i">variables</i> 
+is <i class="i">implementation-dependent</i>,
+except that it must be <i class="i">distinct</i> from each of the <i class="i">values</i> of the others,
+and it must be a valid first <i class="i">argument</i> to the <i class="i">function</i> <b class="b">boole</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-326"><span>Description::<a class="copiable-link" href="#Description_003a_003a-326"> &para;</a></span></h4>
+
+<p>Each of these <i class="i">constants</i> has a <i class="i">value</i> which is one of the 
+sixteen possible <i class="i">bit-wise logical operation specifiers</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-228"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-228"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (boole boole-ior 1 16) &rArr;  17
+ (boole boole-and -2 5) &rArr;  4
+ (boole boole-eqv 17 15) &rArr;  -31
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-271"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-271"> &para;</a></span></h4>
+
+<p><a class="ref" href="boole.html">boole                                                            [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/boolean.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>boolean (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="boolean (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="boolean (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="function-_0028System-Class_0029.html" rel="next" title="function (System Class)">
+<link href="nil-_0028Type_0029.html" rel="prev" title="nil (Type)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="boolean">
+<div class="nav-panel">
+<p>
+Next: <a href="function-_0028System-Class_0029.html" accesskey="n" rel="next">function                                                     [System Class]</a>, Previous: <a href="nil-_0028Type_0029.html" accesskey="p" rel="prev">nil                                                                  [Type]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="boolean-_005bType_005d"><span>4.4.2 boolean                                                              [Type]<a class="copiable-link" href="#boolean-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-1"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-1"> &para;</a></span></h4>
+
+<p><b class="b">boolean</b>,
+<b class="b">symbol</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-31"><span>Description::<a class="copiable-link" href="#Description_003a_003a-31"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">boolean</b> contains the <i class="i">symbols</i> <b class="b">t</b> and <b class="b">nil</b>,
+which represent true and false, respectively.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-29"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-29"> &para;</a></span></h4>
+
+<p><b class="b">t</b> (<i class="i">constant variable</i>),
+<b class="b">nil</b> (<i class="i">constant variable</i>),
+<a class="ref" href="if.html">if                                                       [Special Operator]</a>
+,
+<a class="ref" href="not.html">not                                                              [Function]</a>
+,
+<a class="ref" href="complement.html">complement                                                       [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-19"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-19"> &para;</a></span></h4>
+
+<p>Conditional operations, such as <b class="b">if</b>,
+permit the use of <i class="i">generalized booleans</i>,
+not just <i class="i">booleans</i>;
+any <i class="i">non-nil</i> value,
+not just <b class="b">t</b>,
+counts as true for a <i class="i">generalized boolean</i>.
+However, as a matter of convention, 
+the <i class="i">symbol</i> <b class="b">t</b> is considered the canonical value to use
+even for a <i class="i">generalized boolean</i> when no better choice presents itself.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/boundp.html
@@ -0,0 +1,89 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>boundp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="boundp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="boundp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="makunbound.html" rel="next" title="makunbound">
+<link href="remprop.html" rel="prev" title="remprop">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="boundp">
+<div class="nav-panel">
+<p>
+Next: <a href="makunbound.html" accesskey="n" rel="next">makunbound                                                       [Function]</a>, Previous: <a href="remprop.html" accesskey="p" rel="prev">remprop                                                          [Function]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="boundp-_005bFunction_005d"><span>10.2.17 boundp                                                           [Function]<a class="copiable-link" href="#boundp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">boundp</code>  <i class="i">symbol</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-171"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-171"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-233"><span>Description::<a class="copiable-link" href="#Description_003a_003a-233"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">symbol</i> is <i class="i">bound</i>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-154"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-154"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq x 1) &rArr;  1
+ (boundp 'x) &rArr;  <i class="i">true</i>
+ (makunbound 'x) &rArr;  X
+ (boundp 'x) &rArr;  <i class="i">false</i>
+ (let ((x 2)) (boundp 'x)) &rArr;  <i class="i">false</i>
+ (let ((x 2)) (declare (special x)) (boundp 'x)) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-61"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-61"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">symbol</i> is not a <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-206"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-206"> &para;</a></span></h4>
+
+<p><a class="ref" href="set.html">set                                                              [Function]</a>
+,
+<a class="ref" href="setq.html">setq                                                         [Special Form]</a>
+,
+<a class="ref" href="symbol_002dvalue.html">symbol-value                                                     [Accessor]</a>
+,
+<a class="ref" href="makunbound.html">makunbound                                                       [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-126"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-126"> &para;</a></span></h4>
+
+<p>The <i class="i">function</i> <b class="b">bound</b> determines only whether a <i class="i">symbol</i> has a
+value in the <i class="i">global environment</i>; any <i class="i">lexical bindings</i>
+are ignored.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/break.html
@@ -0,0 +1,130 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>break (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="break (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="break (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="_002adebugger_002dhook_002a.html" rel="next" title="*debugger-hook*">
+<link href="invoke_002ddebugger.html" rel="prev" title="invoke-debugger">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="break">
+<div class="nav-panel">
+<p>
+Next: <a href="_002adebugger_002dhook_002a.html" accesskey="n" rel="next">*debugger-hook*                                                  [Variable]</a>, Previous: <a href="invoke_002ddebugger.html" accesskey="p" rel="prev">invoke-debugger                                                  [Function]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="break-_005bFunction_005d"><span>9.2.23 break                                                            [Function]<a class="copiable-link" href="#break-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">break</code>  <i class="i"><span class="r">&amp;optional</span> format-control <span class="r">&amp;rest</span> format-arguments</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-142"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-142"> &para;</a></span></h4>
+
+<p><i class="i">format-control</i>&mdash;a <i class="i">format control</i>.
+</p>
+<p>The default is <i class="i">implementation-dependent</i>.
+</p>
+<p><i class="i">format-arguments</i>&mdash;<i class="i">format arguments</i> for the <i class="i">format-control</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-193"><span>Description::<a class="copiable-link" href="#Description_003a_003a-193"> &para;</a></span></h4>
+
+<p><b class="b">break</b> <i class="i">formats</i> <i class="i">format-control</i> and <i class="i">format-arguments</i>
+and then goes directly into the debugger without allowing any possibility of
+interception by programmed error-handling facilities.
+</p>
+<p>If the <b class="b">continue</b> <i class="i">restart</i> is used while in the debugger,
+<b class="b">break</b> immediately returns <b class="b">nil</b> without taking any unusual recovery action.
+</p>
+<p><b class="b">break</b> binds <b class="b">*debugger-hook*</b> to <b class="b">nil</b> 
+before attempting to enter the debugger.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-122"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-122"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (break &quot;You got here with arguments: ~:S.&quot; '(FOO 37 A))
+<code class="t"> |&gt; </code> BREAK: You got here with these arguments: FOO, 37, A.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Return from BREAK.
+<code class="t"> |&gt; </code>  2: Top level.
+<code class="t"> |&gt; </code> Debug&gt; :CONTINUE 1
+<code class="t"> |&gt; </code> Return from BREAK.
+&rArr;  NIL
+
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-15"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-15"> &para;</a></span></h4>
+
+<p>The debugger is entered.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-27"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-27"> &para;</a></span></h4>
+
+<p><b class="b">*debug-io*</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-169"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-169"> &para;</a></span></h4>
+
+<p><a class="ref" href="error.html">error                                                            [Function]</a>
+, 
+<a class="ref" href="invoke_002ddebugger.html">invoke-debugger                                                  [Function]</a>
+.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-102"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-102"> &para;</a></span></h4>
+
+<p><b class="b">break</b> is used as a way of inserting temporary debugging
+&ldquo;breakpoints&rdquo; in a program, not as a way of signaling errors.  
+For this reason, <b class="b">break</b> does not take the <i class="i">continue-format-control</i>
+<i class="i">argument</i> that <b class="b">cerror</b> takes.
+This and the lack of any possibility of interception by
+<i class="i">condition</i> <i class="i">handling</i> are the only program-visible 
+differences between <b class="b">break</b> and <b class="b">cerror</b>.
+</p>
+<p>The user interface aspects of <b class="b">break</b> and <b class="b">cerror</b> are
+permitted to vary more widely, in order to accomodate the interface
+needs of the <i class="i">implementation</i>. For example, it is permissible for a
+<i class="i">Lisp read-eval-print loop</i> to be entered by <b class="b">break</b> rather
+than the conventional debugger.
+</p>
+<p><b class="b">break</b> could be defined by:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun break (&amp;optional (format-control &quot;Break&quot;) &amp;rest format-arguments)
+   (with-simple-restart (continue &quot;Return from BREAK.&quot;)
+     (let ((*debugger-hook* nil))
+       (invoke-debugger
+           (make-condition 'simple-condition
+                           :format-control format-control
+                           :format-arguments format-arguments))))
+   nil)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002adebugger_002dhook_002a.html">*debugger-hook*                                                  [Variable]</a>, Previous: <a href="invoke_002ddebugger.html">invoke-debugger                                                  [Function]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/broadcast_002dstream.html
@@ -0,0 +1,145 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>broadcast-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="broadcast-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="broadcast-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="concatenated_002dstream.html" rel="next" title="concatenated-stream">
+<link href="stream.html" rel="prev" title="stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="broadcast_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="concatenated_002dstream.html" accesskey="n" rel="next">concatenated-stream                                          [System Class]</a>, Previous: <a href="stream.html" accesskey="p" rel="prev">stream                                                       [System Class]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="broadcast_002dstream-_005bSystem-Class_005d"><span>21.2.2 broadcast-stream                                             [System Class]<a class="copiable-link" href="#broadcast_002dstream-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-63"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-63"> &para;</a></span></h4>
+
+<p><b class="b">broadcast-stream</b>,
+<b class="b">stream</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-533"><span>Description::<a class="copiable-link" href="#Description_003a_003a-533"> &para;</a></span></h4>
+
+<p>A <i class="i">broadcast stream</i> is an <i class="i">output</i> <i class="i">stream</i> which 
+has associated with it a set of zero or more <i class="i">output</i> <i class="i">streams</i> 
+such that any output sent to the <i class="i">broadcast stream</i> gets passed on
+as output to each of the associated <i class="i">output</i> <i class="i">streams</i>.
+(If a <i class="i">broadcast stream</i> has no <i class="i">component streams</i>,
+then all output to the <i class="i">broadcast stream</i> is discarded.)
+</p>
+<p>The set of operations that may be performed on a <i class="i">broadcast stream</i> 
+is the intersection of those for its associated <i class="i">output</i> <i class="i">streams</i>.
+</p>
+<p>Some output operations (<i class="i">e.g.</i>, <b class="b">fresh-line</b>) return <i class="i">values</i> based on the
+state of the <i class="i">stream</i> at the time of the operation.
+</p>
+<p>Since these <i class="i">values</i> might differ for each of the <i class="i">component streams</i>,
+it is necessary to describe their return value specifically:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">stream-element-type</b> returns
+    the value from the last component stream, 
+    or <b class="b">t</b> if there are no component streams.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">fresh-line</b> returns
+     the value from the last component stream, 
+     or <b class="b">nil</b> if there are no component streams.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The functions
+          <b class="b">file-length</b>,
+          <b class="b">file-position</b>,
+          <b class="b">file-string-length</b>,
+      and <b class="b">stream-external-format</b>
+   return the value from the last component stream;
+   if there are no component streams,
+       <b class="b">file-length</b> and <b class="b">file-position</b> return <code class="t">0</code>,
+       <b class="b">file-string-length</b> returns <code class="t">1</code>,
+   and <b class="b">stream-external-format</b> returns <code class="t">:default</code>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The functions <b class="b">streamp</b> and <b class="b">output-stream-p</b> 
+  always return <i class="i">true</i> for <i class="i">broadcast streams</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The functions <b class="b">open-stream-p</b> tests whether the <i class="i">broadcast stream</i>
+  is <i class="i">open</i>_2, not whether its component streams are <i class="i">open</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The functions <b class="b">input-stream-p</b> and <i class="i">interactive-stream-p</i> 
+  return an <i class="i">implementation-defined</i>, <i class="i">generalized boolean</i> value.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>For the input operations
+        <b class="b">clear-input</b>
+        <b class="b">listen</b>,
+        <b class="b">peek-char</b>,
+        <b class="b">read-byte</b>,
+        <b class="b">read-char-no-hang</b>,
+        <b class="b">read-char</b>,
+        <b class="b">read-line</b>,
+    and <b class="b">unread-char</b>,
+  the consequences are undefined if the indicated operation is performed.
+  However, an <i class="i">implementation</i> is permitted 
+  to define such a behavior as an <i class="i">implementation-dependent</i> extension.
+</p></dd>
+</dl>
+
+<p>For any output operations not having their return values explicitly specified above
+or elsewhere in this document, it is defined that
+the <i class="i">values</i> returned by such an operation are 
+the <i class="i">values</i> resulting from performing the operation 
+on the last of its <i class="i">component streams</i>;
+the <i class="i">values</i> resulting from performing the operation
+on all preceding <i class="i">streams</i> are discarded.                    
+If there are no <i class="i">component streams</i>, 
+the value is <i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-436"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-436"> &para;</a></span></h4>
+
+<p><a class="ref" href="broadcast_002dstream_002dstreams.html">broadcast-stream-streams                                         [Function]</a>
+,
+<a class="ref" href="make_002dbroadcast_002dstream.html">make-broadcast-stream                                            [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="concatenated_002dstream.html">concatenated-stream                                          [System Class]</a>, Previous: <a href="stream.html">stream                                                       [System Class]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/broadcast_002dstream_002dstreams.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>broadcast-stream-streams (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="broadcast-stream-streams (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="broadcast-stream-streams (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="make_002dbroadcast_002dstream.html" rel="next" title="make-broadcast-stream">
+<link href="synonym_002dstream_002dsymbol.html" rel="prev" title="synonym-stream-symbol">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="broadcast_002dstream_002dstreams">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dbroadcast_002dstream.html" accesskey="n" rel="next">make-broadcast-stream                                            [Function]</a>, Previous: <a href="synonym_002dstream_002dsymbol.html" accesskey="p" rel="prev">synonym-stream-symbol                                            [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="broadcast_002dstream_002dstreams-_005bFunction_005d"><span>21.2.40 broadcast-stream-streams                                         [Function]<a class="copiable-link" href="#broadcast_002dstream_002dstreams-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">broadcast-stream-streams</code>  <i class="i">broadcast-stream</i> &rArr;  <i class="i">streams</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-441"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-441"> &para;</a></span></h4>
+
+<p><i class="i">broadcast-stream</i>&mdash;a <i class="i">broadcast stream</i>.
+</p>
+<p><i class="i">streams</i>&mdash;a <i class="i">list</i> of <i class="i">streams</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-571"><span>Description::<a class="copiable-link" href="#Description_003a_003a-571"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">list</i> of output <i class="i">streams</i> that constitute
+all the <i class="i">streams</i> to which the <i class="i">broadcast-stream</i> is broadcasting.  
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/built_002din_002dclass.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>built-in-class (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="built-in-class (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="built-in-class (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="structure_002dclass.html" rel="next" title="structure-class">
+<link href="class.html" rel="prev" title="class">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="built_002din_002dclass">
+<div class="nav-panel">
+<p>
+Next: <a href="structure_002dclass.html" accesskey="n" rel="next">structure-class                                              [System Class]</a>, Previous: <a href="class.html" accesskey="p" rel="prev">class                                                        [System Class]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="built_002din_002dclass-_005bSystem-Class_005d"><span>4.4.8 built-in-class                                               [System Class]<a class="copiable-link" href="#built_002din_002dclass-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-4"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-4"> &para;</a></span></h4>
+<p><b class="b">built-in-class</b>,
+<b class="b">class</b>,
+</p>
+<p><b class="b">standard-object</b>,
+</p>
+<p><b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-37"><span>Description::<a class="copiable-link" href="#Description_003a_003a-37"> &para;</a></span></h4>
+
+<p>A <i class="i">built-in class</i> is a <i class="i">class</i> whose <i class="i">instances</i> have 
+restricted capabilities or special representations.
+Attempting to use
+<b class="b">defclass</b> to define <i class="i">subclasses</i> of a <i class="i">built-in class</i>
+signals an error of <i class="i">type</i> <b class="b">error</b>.
+Calling <b class="b">make-instance</b> to create an <i class="i">instance</i> 
+of a <i class="i">built-in class</i> signals an error of <i class="i">type</i> <b class="b">error</b>.
+Calling <b class="b">slot-value</b> on an <i class="i">instance</i> of a <i class="i">built-in class</i>
+signals an error of <i class="i">type</i> <b class="b">error</b>.  Redefining a <i class="i">built-in class</i>
+or using <b class="b">change-class</b> to change the <i class="i">class</i> of an <i class="i">instance</i>
+to or from a <i class="i">built-in class</i> signals an error of <i class="i">type</i> <b class="b">error</b>.
+However, <i class="i">built-in classes</i> can be used as <i class="i">parameter specializers</i>
+in <i class="i">methods</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/butlast.html
@@ -0,0 +1,122 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>butlast (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="butlast (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="butlast (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="last.html" rel="next" title="last">
+<link href="revappend.html" rel="prev" title="revappend">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="butlast">
+<div class="nav-panel">
+<p>
+Next: <a href="last.html" accesskey="n" rel="next">last                                                             [Function]</a>, Previous: <a href="revappend.html" accesskey="p" rel="prev">revappend, nreconc                                               [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="butlast_002c-nbutlast-_005bFunction_005d"><span>14.2.28 butlast, nbutlast                                                [Function]<a class="copiable-link" href="#butlast_002c-nbutlast-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">butlast</code>  <i class="i">list <span class="r">&amp;optional</span> n</i> &rArr;  <i class="i">result-list</i>
+</p>
+<p><code class="code">nbutlast</code>  <i class="i">list <span class="r">&amp;optional</span> n</i> &rArr;  <i class="i">result-list</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-297"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-297"> &para;</a></span></h4>
+
+<p><i class="i">list</i>&mdash;a <i class="i">list</i>, 
+</p>
+<p>which might be a <i class="i">dotted list</i> but must not be a <i class="i">circular list</i>.
+</p>
+<p><i class="i">n</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<p><i class="i">result-list</i>&mdash;a <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-398"><span>Description::<a class="copiable-link" href="#Description_003a_003a-398"> &para;</a></span></h4>
+
+<p><b class="b">butlast</b> returns a copy of <i class="i">list</i> from which the last
+<i class="i">n</i>
+</p>
+<p>conses
+</p>
+<p>have been omitted.
+If <i class="i">n</i> is not supplied, its value is 1.  
+If there are fewer than <i class="i">n</i> 
+</p>
+<p>conses
+</p>
+<p>in <i class="i">list</i>,
+<b class="b">nil</b> is returned and, in the case of <b class="b">nbutlast</b>,
+<i class="i">list</i> is not modified.  
+</p>
+<p><b class="b">nbutlast</b> is like <b class="b">butlast</b>, but <b class="b">nbutlast</b> 
+may modify <i class="i">list</i>.
+It changes the <i class="i">cdr</i> of
+the <i class="i">cons</i> <i class="i">n</i>+1 from the end of the <i class="i">list</i> to <b class="b">nil</b>.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-281"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-281"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (setq lst '(1 2 3 4 5 6 7 8 9)) &rArr;  (1 2 3 4 5 6 7 8 9)
+ (butlast lst) &rArr;  (1 2 3 4 5 6 7 8)
+ (butlast lst 5) &rArr;  (1 2 3 4)
+ (butlast lst (+ 5 5)) &rArr;  NIL
+ lst &rArr;  (1 2 3 4 5 6 7 8 9)
+ (nbutlast lst 3) &rArr;  (1 2 3 4 5 6)
+ lst &rArr;  (1 2 3 4 5 6)
+ (nbutlast lst 99) &rArr;  NIL
+ lst &rArr;  (1 2 3 4 5 6)
+ (butlast '(a b c d)) &rArr;  (A B C)
+ (butlast '((a b) (c d))) &rArr;  ((A B))
+ (butlast '(a)) &rArr;  NIL
+ (butlast nil) &rArr;  NIL
+ (setq foo (list 'a 'b 'c 'd)) &rArr;  (A B C D)
+ (nbutlast foo) &rArr;  (A B C)
+ foo &rArr;  (A B C)
+ (nbutlast (list 'a)) &rArr;  NIL
+ (nbutlast '()) &rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-124"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-124"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">list</i> is not a <i class="i">proper list</i> or a <i class="i">dotted list</i>.
+</p>
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">n</i> is not a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-214"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-214"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (butlast <i class="i">list</i> <i class="i">n</i>) &equiv; (ldiff <i class="i">list</i> (last <i class="i">list</i> <i class="i">n</i>))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="last.html">last                                                             [Function]</a>, Previous: <a href="revappend.html">revappend, nreconc                                               [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/byte.html
@@ -0,0 +1,97 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>byte (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="byte (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="byte (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="deposit_002dfield.html" rel="next" title="deposit-field">
+<link href="logtest.html" rel="prev" title="logtest">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="byte">
+<div class="nav-panel">
+<p>
+Next: <a href="deposit_002dfield.html" accesskey="n" rel="next">deposit-field                                                    [Function]</a>, Previous: <a href="logtest.html" accesskey="p" rel="prev">logtest                                                          [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="byte_002c-byte_002dsize_002c-byte_002dposition-_005bFunction_005d"><span>12.2.66 byte, byte-size, byte-position                                   [Function]<a class="copiable-link" href="#byte_002c-byte_002dsize_002c-byte_002dposition-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">byte</code>  <i class="i">size position</i> &rArr;  <i class="i">bytespec</i>
+</p>
+<p><code class="code">byte-size</code>  <i class="i">bytespec</i> &rArr;  <i class="i">size</i>
+</p>
+<p><code class="code">byte-position</code>  <i class="i">bytespec</i> &rArr;  <i class="i">position</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-248"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-248"> &para;</a></span></h4>
+
+<p><i class="i">size</i>, <i class="i">position</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<p><i class="i">bytespec</i>&mdash;a <i class="i">byte specifier</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-331"><span>Description::<a class="copiable-link" href="#Description_003a_003a-331"> &para;</a></span></h4>
+
+<p><b class="b">byte</b> returns a <i class="i">byte specifier</i> that indicates
+a <i class="i">byte</i> of width <i class="i">size</i> and whose bits have weights            
+2^<i class="i"><i class="i">position</i> + <i class="i">size</i> - 1\/</i> through 2^<i class="i">position</i>,
+and whose representation is
+<i class="i">implementation-dependent</i>.                 
+</p>
+<p><b class="b">byte-size</b> returns the number of bits specified by <i class="i">bytespec</i>.
+</p>
+<p><b class="b">byte-position</b> returns the position specified by <i class="i">bytespec</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-233"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-233"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq b (byte 100 200)) &rArr;  #&lt;BYTE-SPECIFIER size 100 position 200&gt;
+ (byte-size b) &rArr;  100
+ (byte-position b) &rArr;  200
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-273"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-273"> &para;</a></span></h4>
+
+<p><a class="ref" href="ldb.html">ldb                                                              [Accessor]</a>
+, 
+<a class="ref" href="dpb.html">dpb                                                              [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-176"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-176"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (byte-size (byte <i class="i">j</i> <i class="i">k</i>)) &equiv; <i class="i">j</i>
+ (byte-position (byte <i class="i">j</i> <i class="i">k</i>)) &equiv; <i class="i">k</i>
+</pre></div>
+
+<p>A <i class="i">byte</i> of <i class="i">size</i> of <code class="t">0</code> is permissible; 
+it refers to a <i class="i">byte</i> of width zero.  For example,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (ldb (byte 0 3) #o7777) &rArr;  0
+ (dpb #o7777 (byte 0 3) 0) &rArr;  0
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/call_002darguments_002dlimit.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>call-arguments-limit (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="call-arguments-limit (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="call-arguments-limit (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="lambda_002dlist_002dkeywords.html" rel="next" title="lambda-list-keywords">
+<link href="compiled_002dfunction_002dp.html" rel="prev" title="compiled-function-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="call_002darguments_002dlimit">
+<div class="nav-panel">
+<p>
+Next: <a href="lambda_002dlist_002dkeywords.html" accesskey="n" rel="next">lambda-list-keywords                                    [Constant Variable]</a>, Previous: <a href="compiled_002dfunction_002dp.html" accesskey="p" rel="prev">compiled-function-p                                              [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="call_002darguments_002dlimit-_005bConstant-Variable_005d"><span>5.3.12 call-arguments-limit                                    [Constant Variable]<a class="copiable-link" href="#call_002darguments_002dlimit-_005bConstant-Variable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Constant-Value_003a_003a"><span>Constant Value::<a class="copiable-link" href="#Constant-Value_003a_003a"> &para;</a></span></h4>
+
+<p>An integer not smaller than <code class="t">50</code> and at least as great as 
+the <i class="i">value</i> of <b class="b">lambda-parameters-limit</b>, 
+the exact magnitude of which is <i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-65"><span>Description::<a class="copiable-link" href="#Description_003a_003a-65"> &para;</a></span></h4>
+
+<p>The upper exclusive bound on the number of <i class="i">arguments</i> that 
+may be passed to a <i class="i">function</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-50"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-50"> &para;</a></span></h4>
+
+<p><a class="ref" href="lambda_002dparameters_002dlimit.html">lambda-parameters-limit                                 [Constant Variable]</a>
+, 
+<a class="ref" href="multiple_002dvalues_002dlimit.html">multiple-values-limit                                   [Constant Variable]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/call_002dmethod.html
@@ -0,0 +1,134 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>call-method (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="call-method (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="call-method (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="call_002dnext_002dmethod.html" rel="next" title="call-next-method">
+<link href="next_002dmethod_002dp.html" rel="prev" title="next-method-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="call_002dmethod">
+<div class="nav-panel">
+<p>
+Next: <a href="call_002dnext_002dmethod.html" accesskey="n" rel="next">call-next-method                                           [Local Function]</a>, Previous: <a href="next_002dmethod_002dp.html" accesskey="p" rel="prev">next-method-p                                              [Local Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="call_002dmethod_002c-make_002dmethod-_005bLocal-Macro_005d"><span>7.7.30 call-method, make-method                                      [Local Macro]<a class="copiable-link" href="#call_002dmethod_002c-make_002dmethod-_005bLocal-Macro_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-28"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-28"> &para;</a></span></h4>
+
+<p><code class="code">call-method</code>  <i class="i">method <span class="r">&amp;optional</span> next-method-list</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><code class="code">make-method</code>  <i class="i">form</i> &rArr;  <i class="i">method-object</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-118"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-118"> &para;</a></span></h4>
+
+<p><i class="i">method</i>&mdash;a <i class="i">method</i> <i class="i">object</i>,
+	      or a <i class="i">list</i> (see below); not evaluated.
+</p>
+<p><i class="i">method-object</i>&mdash;a <i class="i">method</i> <i class="i">object</i>.
+</p>
+<p><i class="i">next-method-list</i>&mdash;a <i class="i">list</i> of <i class="i">method</i> <i class="i">objects</i>; not evaluated.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">method</i> invocation.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-157"><span>Description::<a class="copiable-link" href="#Description_003a_003a-157"> &para;</a></span></h4>
+
+<p>The macro <b class="b">call-method</b> is used in method combination.  It hides
+the <i class="i">implementation-dependent</i> details of how 
+<i class="i">methods</i> are called. The
+macro <b class="b">call-method</b> has <i class="i">lexical scope</i> and 
+can only be used within
+an <i class="i">effective method</i> <i class="i">form</i>.
+</p>
+<p>[Editorial Note by KMP: This next paragraph still needs some work.]
+</p>
+<p>Whether or not <b class="b">call-method</b> is <i class="i">fbound</i> in the
+<i class="i">global environment</i> is <i class="i">implementation-dependent</i>;
+however, the restrictions on redefinition and <i class="i">shadowing</i> of
+<b class="b">call-method</b> are the same as for <i class="i">symbols</i> in the <code class="t">COMMON-LISP</code> <i class="i">package</i>
+which are <i class="i">fbound</i> in the <i class="i">global environment</i>.
+The consequences of attempting to use <b class="b">call-method</b> outside
+of an <i class="i">effective method</i> <i class="i">form</i> are undefined.
+</p>
+<p>The macro <b class="b">call-method</b> invokes the specified <i class="i">method</i>,
+supplying it with arguments and with definitions for
+<b class="b">call-next-method</b> and for <b class="b">next-method-p</b>.
+If the invocation of <b class="b">call-method</b> is lexically inside
+of a <b class="b">make-method</b>, the arguments are those that
+were supplied to that method.  Otherwise the arguments are
+those that were supplied to the generic function.
+The definitions
+of <b class="b">call-next-method</b> and <b class="b">next-method-p</b> rely on
+the specified <i class="i">next-method-list</i>.
+</p>
+<p>If <i class="i">method</i> is a <i class="i">list</i>, the first element of the <i class="i">list</i>
+must be the symbol <b class="b">make-method</b> and the second element must be
+a <i class="i">form</i>.  Such a <i class="i">list</i> specifies a <i class="i">method</i> <i class="i">object</i>
+whose <i class="i">method</i> function has a body that is the given <i class="i">form</i>.
+</p>
+<p><i class="i">Next-method-list</i> can contain <i class="i">method</i> <i class="i">objects</i> or <i class="i">lists</i>,
+the first element of which must be the symbol <b class="b">make-method</b> and the
+second element of which must be a <i class="i">form</i>.
+</p>
+<p>Those are the only two places where <b class="b">make-method</b> can be used.
+The <i class="i">form</i> used with <b class="b">make-method</b> is evaluated in
+the <i class="i">null lexical environment</i> augmented with a local macro definition
+for <b class="b">call-method</b> and with bindings named by
+symbols not <i class="i">accessible</i> from the <code class="t">COMMON-LISP-USER</code> <i class="i">package</i>.
+</p>
+<p>The <b class="b">call-next-method</b> function available to <i class="i">method</i> 
+will call the first <i class="i">method</i> in <i class="i">next-method-list</i>.
+The <b class="b">call-next-method</b> function
+available in that <i class="i">method</i>, in turn, will call the second
+<i class="i">method</i> in <i class="i">next-method-list</i>, and so on, until
+the list of next <i class="i">methods</i> is exhausted.
+</p>
+<p>If <i class="i">next-method-list</i> is not supplied, the
+<b class="b">call-next-method</b> function available to
+<i class="i">method</i> signals an error of <i class="i">type</i> <b class="b">control-error</b>
+and the <b class="b">next-method-p</b> function
+available to <i class="i">method</i> returns <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-109"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-109"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-139"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-139"> &para;</a></span></h4>
+
+<p><a class="ref" href="call_002dnext_002dmethod.html">call-next-method                                           [Local Function]</a>
+,
+<a class="ref" href="define_002dmethod_002dcombination.html">define-method-combination                                           [Macro]</a>
+,
+<a class="ref" href="next_002dmethod_002dp.html">next-method-p                                              [Local Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="call_002dnext_002dmethod.html">call-next-method                                           [Local Function]</a>, Previous: <a href="next_002dmethod_002dp.html">next-method-p                                              [Local Function]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/call_002dnext_002dmethod.html
@@ -0,0 +1,139 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>call-next-method (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="call-next-method (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="call-next-method (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="compute_002dapplicable_002dmethods.html" rel="next" title="compute-applicable-methods">
+<link href="call_002dmethod.html" rel="prev" title="call-method">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="call_002dnext_002dmethod">
+<div class="nav-panel">
+<p>
+Next: <a href="compute_002dapplicable_002dmethods.html" accesskey="n" rel="next">compute-applicable-methods                      [Standard Generic Function]</a>, Previous: <a href="call_002dmethod.html" accesskey="p" rel="prev">call-method, make-method                                      [Local Macro]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="call_002dnext_002dmethod-_005bLocal-Function_005d"><span>7.7.31 call-next-method                                           [Local Function]<a class="copiable-link" href="#call_002dnext_002dmethod-_005bLocal-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-29"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-29"> &para;</a></span></h4>
+
+<p><code class="code">call-next-method</code>  <i class="i"><span class="r">&amp;rest</span> args</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-119"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-119"> &para;</a></span></h4>
+
+<p><i class="i">arg</i>&mdash;an <i class="i">object</i>.  
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">method</i> it calls.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-158"><span>Description::<a class="copiable-link" href="#Description_003a_003a-158"> &para;</a></span></h4>
+
+<p>The <i class="i">function</i> <b class="b">call-next-method</b> can be used 
+</p>
+<p>within the body <i class="i">forms</i> (but not the <i class="i">lambda list</i>)
+</p>
+<p>of a <i class="i">method</i> defined by a <i class="i">method-defining form</i> to call the 
+<i class="i">next method</i>.
+</p>
+<p>If there is no next <i class="i">method</i>, the generic function 
+<b class="b">no-next-method</b> is called.
+</p>
+<p>The type of method combination used determines which <i class="i">methods</i>
+can invoke <b class="b">call-next-method</b>.  The standard 
+<i class="i">method combination</i> type allows <b class="b">call-next-method</b> 
+to be used within primary <i class="i">methods</i> and <i class="i">around methods</i>.
+For generic functions using a type of method combination defined by
+the short form of <b class="b">define-method-combination</b>,
+<b class="b">call-next-method</b> can be used in <i class="i">around methods</i> only.
+</p>
+<p>When <b class="b">call-next-method</b> is called with no arguments, it passes the
+current <i class="i">method</i>&rsquo;s original arguments to the next <i class="i">method</i>.  Neither
+argument defaulting, nor using <b class="b">setq</b>, nor rebinding variables
+with the same <i class="i">names</i> as parameters of the <i class="i">method</i> affects the values
+<b class="b">call-next-method</b> passes to the <i class="i">method</i> it calls.
+</p>
+<p>When <b class="b">call-next-method</b> is called with arguments, the 
+<i class="i">next method</i> is called with those arguments.
+</p>
+<p>If <b class="b">call-next-method</b> is called with arguments but omits
+optional arguments, the <i class="i">next method</i> called defaults those arguments.
+</p>
+<p>The <i class="i">function</i> <b class="b">call-next-method</b> returns any <i class="i">values</i> that are
+returned by the <i class="i">next method</i>.
+</p>
+<p>The <i class="i">function</i> <b class="b">call-next-method</b> has <i class="i">lexical scope</i> and 
+<i class="i">indefinite extent</i> and can only be used within the body of a
+<i class="i">method</i> defined by a <i class="i">method-defining form</i>.
+</p>
+<p>Whether or not <b class="b">call-next-method</b> is <i class="i">fbound</i> in the
+<i class="i">global environment</i> is <i class="i">implementation-dependent</i>;
+however, the restrictions on redefinition and <i class="i">shadowing</i> of
+<b class="b">call-next-method</b> are the same as for <i class="i">symbols</i> in the <code class="t">COMMON-LISP</code> <i class="i">package</i>
+which are <i class="i">fbound</i> in the <i class="i">global environment</i>.
+The consequences of attempting to use <b class="b">call-next-method</b> outside
+of a <i class="i">method-defining form</i> are undefined.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-15"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-15"> &para;</a></span></h4>
+
+<p><b class="b">defmethod</b>, <b class="b">call-method</b>, <b class="b">define-method-combination</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-41"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-41"> &para;</a></span></h4>
+
+<p>When providing arguments to <b class="b">call-next-method</b>, 
+the following rule must be satisfied or an error of <i class="i">type</i> <b class="b">error</b> 
+should be
+signaled: 
+the ordered set of <i class="i">applicable methods</i> for a changed set of arguments
+for <b class="b">call-next-method</b> must be the same as the ordered set of
+<i class="i">applicable methods</i> for the original arguments to the
+<i class="i">generic function</i>.
+Optimizations of the error checking are possible, but they must not change
+the semantics of <b class="b">call-next-method</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-140"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-140"> &para;</a></span></h4>
+
+<p><a class="ref" href="define_002dmethod_002dcombination.html">define-method-combination                                           [Macro]</a>
+,
+<a class="ref" href="defmethod.html">defmethod                                                           [Macro]</a>
+,
+<a class="ref" href="next_002dmethod_002dp.html">next-method-p                                              [Local Function]</a>
+,
+<a class="ref" href="no_002dnext_002dmethod.html">no-next-method                                  [Standard Generic Function]</a>
+,
+<a class="ref" href="call_002dmethod.html">call-method, make-method                                      [Local Macro]</a>
+,
+<a class="ref" href="Method-Selection-and-Combination.html">Method Selection and Combination</a>,
+<a class="ref" href="Standard-Method-Combination.html">Standard Method Combination</a>,
+<a class="ref" href="Built_002din-Method-Combination-Types.html">Built-in Method Combination Types</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="compute_002dapplicable_002dmethods.html">compute-applicable-methods                      [Standard Generic Function]</a>, Previous: <a href="call_002dmethod.html">call-method, make-method                                      [Local Macro]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/car.html
@@ -0,0 +1,281 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>car (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="car (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="car (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="copy_002dtree.html" rel="next" title="copy-tree">
+<link href="rplaca.html" rel="prev" title="rplaca">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="car">
+<div class="nav-panel">
+<p>
+Next: <a href="copy_002dtree.html" accesskey="n" rel="next">copy-tree                                                        [Function]</a>, Previous: <a href="rplaca.html" accesskey="p" rel="prev">rplaca, rplacd                                                   [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="car_002c-cdr_002c"><span>14.2.9 car,    cdr,<a class="copiable-link" href="#car_002c-cdr_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="caar_002c-cadr_002c-cdar_002c-cddr_002c"><span>caar,   cadr,   cdar,   cddr,<a class="copiable-link" href="#caar_002c-cadr_002c-cdar_002c-cddr_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="caaar_002c-caadr_002c-cadar_002c-caddr_002c-cdaar_002c-cdadr_002c-cddar_002c-cdddr_002c"><span>caaar,  caadr,  cadar,  caddr,  cdaar,  cdadr,  cddar,  cdddr,<a class="copiable-link" href="#caaar_002c-caadr_002c-cadar_002c-caddr_002c-cdaar_002c-cdadr_002c-cddar_002c-cdddr_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="caaaar_002c-caaadr_002c-caadar_002c-caaddr_002c-cadaar_002c-cadadr_002c-caddar_002c-cadddr_002c"><span>caaaar, caaadr, caadar, caaddr, cadaar, cadadr, caddar, cadddr,<a class="copiable-link" href="#caaaar_002c-caaadr_002c-caadar_002c-caaddr_002c-cadaar_002c-cadadr_002c-caddar_002c-cadddr_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="cdaaar_002c-cdaadr_002c-cdadar_002c-cdaddr_002c-cddaar_002c-cddadr_002c-cdddar_002c-cddddr"><span>cdaaar, cdaadr, cdadar, cdaddr, cddaar, cddadr, cdddar, cddddr<a class="copiable-link" href="#cdaaar_002c-cdaadr_002c-cdadar_002c-cdaddr_002c-cddaar_002c-cddadr_002c-cdddar_002c-cddddr"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Accessor]</i>
+</p></div>
+<p><code class="code">car</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">car</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cdr</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cdr</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">\vksip 5pt</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">\vksip 5pt</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">caar</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">caar</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cadr</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cadr</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cdar</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cdar</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cddr</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cddr</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">\vksip 5pt</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">\vksip 5pt</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">caaar</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">caaar</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">caadr</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">caadr</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cadar</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cadar</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">caddr</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">caddr</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cdaar</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cdaar</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cdadr</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cdadr</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cddar</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cddar</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cdddr</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cdddr</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">\vksip 5pt</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">\vksip 5pt</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">caaaar</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">caaaar</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">caaadr</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">caaadr</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">caadar</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">caadar</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">caaddr</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">caaddr</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cadaar</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cadaar</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cadadr</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cadadr</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">caddar</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">caddar</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cadddr</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cadddr</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cdaaar</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cdaaar</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cdaadr</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cdaadr</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cdadar</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cdadar</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cdaddr</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cdaddr</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cddaar</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cddaar</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cddadr</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cddadr</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cdddar</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cdddar</code> <i class="i">x</i>) new-object)<br>
+</p>
+<p><code class="code">cddddr</code>  <i class="i">x</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">cddddr</code> <i class="i">x</i>) new-object)<br>
+</p>
+<h4 class="subsubheading" id="Pronunciation_003a_003a-8"><span>Pronunciation::<a class="copiable-link" href="#Pronunciation_003a_003a-8"> &para;</a></span></h4>
+
+<p><b class="b">cadr</b>: pronounced &rsquo;ka ,de r 
+</p>
+<p><b class="b">caddr</b>: pronounced &rsquo;kad e ,de r 
+  	     or pronounced &rsquo;ka ,dude r 
+</p>
+<p><b class="b">cdr</b>: pronounced &rsquo;ku ,de r 
+</p>
+<p><b class="b">cddr</b>: pronounced &rsquo;kud e ,de r 
+  	    or pronounced &rsquo;ke ,dude r 
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-278"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-278"> &para;</a></span></h4>
+
+<p><i class="i">x</i>&mdash;a <i class="i">list</i>.
+</p>
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">new-object</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-379"><span>Description::<a class="copiable-link" href="#Description_003a_003a-379"> &para;</a></span></h4>
+
+<p>If <i class="i">x</i> is a <i class="i">cons</i>, <b class="b">car</b> returns the <i class="i">car</i> 
+of that <i class="i">cons</i>.  If <i class="i">x</i> is <b class="b">nil</b>, <b class="b">car</b> returns <b class="b">nil</b>.
+</p>
+<p>If <i class="i">x</i> is a <i class="i">cons</i>, <b class="b">cdr</b> returns the <i class="i">cdr</i> 
+of that <i class="i">cons</i>.  If <i class="i">x</i> is <b class="b">nil</b>, <b class="b">cdr</b> returns <b class="b">nil</b>.
+</p>
+<p><i class="i">Functions</i> are provided which perform compositions of up to four
+<b class="b">car</b> and <b class="b">cdr</b> operations.  Their <i class="i">names</i> consist of 
+a <code class="t">C</code>, followed by two, three, or four occurrences of <code class="t">A</code> or <code class="t">D</code>, 
+and finally an <code class="t">R</code>.  The series of <code class="t">A</code>&rsquo;s and <code class="t">D</code>&rsquo;s in each
+<i class="i">function</i>&rsquo;s <i class="i">name</i> is chosen to identify the series of 
+<b class="b">car</b> and <b class="b">cdr</b> operations that is performed by the function.
+The order in which the <code class="t">A</code>&rsquo;s and <code class="t">D</code>&rsquo;s appear is the inverse of the
+order in which the corresponding operations are performed.  Figure 14&ndash;6 
+defines the relationships precisely.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  This <i class="i">place</i> ...  Is equivalent to this <i class="i">place</i> ...  <!-- /@w -->
+  <code class="t">(caar <i class="i">x</i>)</code>        <code class="t">(car (car <i class="i">x</i>))</code>                    <!-- /@w -->
+  <code class="t">(cadr <i class="i">x</i>)</code>        <code class="t">(car (cdr <i class="i">x</i>))</code>                    <!-- /@w -->
+  <code class="t">(cdar <i class="i">x</i>)</code>        <code class="t">(cdr (car <i class="i">x</i>))</code>                    <!-- /@w -->
+  <code class="t">(cddr <i class="i">x</i>)</code>        <code class="t">(cdr (cdr <i class="i">x</i>))</code>                    <!-- /@w -->
+  <code class="t">(caaar <i class="i">x</i>)</code>       <code class="t">(car (car (car <i class="i">x</i>)))</code>              <!-- /@w -->
+  <code class="t">(caadr <i class="i">x</i>)</code>       <code class="t">(car (car (cdr <i class="i">x</i>)))</code>              <!-- /@w -->
+  <code class="t">(cadar <i class="i">x</i>)</code>       <code class="t">(car (cdr (car <i class="i">x</i>)))</code>              <!-- /@w -->
+  <code class="t">(caddr <i class="i">x</i>)</code>       <code class="t">(car (cdr (cdr <i class="i">x</i>)))</code>              <!-- /@w -->
+  <code class="t">(cdaar <i class="i">x</i>)</code>       <code class="t">(cdr (car (car <i class="i">x</i>)))</code>              <!-- /@w -->
+  <code class="t">(cdadr <i class="i">x</i>)</code>       <code class="t">(cdr (car (cdr <i class="i">x</i>)))</code>              <!-- /@w -->
+  <code class="t">(cddar <i class="i">x</i>)</code>       <code class="t">(cdr (cdr (car <i class="i">x</i>)))</code>              <!-- /@w -->
+  <code class="t">(cdddr <i class="i">x</i>)</code>       <code class="t">(cdr (cdr (cdr <i class="i">x</i>)))</code>              <!-- /@w -->
+  <code class="t">(caaaar <i class="i">x</i>)</code>      <code class="t">(car (car (car (car <i class="i">x</i>))))</code>        <!-- /@w -->
+  <code class="t">(caaadr <i class="i">x</i>)</code>      <code class="t">(car (car (car (cdr <i class="i">x</i>))))</code>        <!-- /@w -->
+  <code class="t">(caadar <i class="i">x</i>)</code>      <code class="t">(car (car (cdr (car <i class="i">x</i>))))</code>        <!-- /@w -->
+  <code class="t">(caaddr <i class="i">x</i>)</code>      <code class="t">(car (car (cdr (cdr <i class="i">x</i>))))</code>        <!-- /@w -->
+  <code class="t">(cadaar <i class="i">x</i>)</code>      <code class="t">(car (cdr (car (car <i class="i">x</i>))))</code>        <!-- /@w -->
+  <code class="t">(cadadr <i class="i">x</i>)</code>      <code class="t">(car (cdr (car (cdr <i class="i">x</i>))))</code>        <!-- /@w -->
+  <code class="t">(caddar <i class="i">x</i>)</code>      <code class="t">(car (cdr (cdr (car <i class="i">x</i>))))</code>        <!-- /@w -->
+  <code class="t">(cadddr <i class="i">x</i>)</code>      <code class="t">(car (cdr (cdr (cdr <i class="i">x</i>))))</code>        <!-- /@w -->
+  <code class="t">(cdaaar <i class="i">x</i>)</code>      <code class="t">(cdr (car (car (car <i class="i">x</i>))))</code>        <!-- /@w -->
+  <code class="t">(cdaadr <i class="i">x</i>)</code>      <code class="t">(cdr (car (car (cdr <i class="i">x</i>))))</code>        <!-- /@w -->
+  <code class="t">(cdadar <i class="i">x</i>)</code>      <code class="t">(cdr (car (cdr (car <i class="i">x</i>))))</code>        <!-- /@w -->
+  <code class="t">(cdaddr <i class="i">x</i>)</code>      <code class="t">(cdr (car (cdr (cdr <i class="i">x</i>))))</code>        <!-- /@w -->
+  <code class="t">(cddaar <i class="i">x</i>)</code>      <code class="t">(cdr (cdr (car (car <i class="i">x</i>))))</code>        <!-- /@w -->
+  <code class="t">(cddadr <i class="i">x</i>)</code>      <code class="t">(cdr (cdr (car (cdr <i class="i">x</i>))))</code>        <!-- /@w -->
+  <code class="t">(cdddar <i class="i">x</i>)</code>      <code class="t">(cdr (cdr (cdr (car <i class="i">x</i>))))</code>        <!-- /@w -->
+  <code class="t">(cddddr <i class="i">x</i>)</code>      <code class="t">(cdr (cdr (cdr (cdr <i class="i">x</i>))))</code>        <!-- /@w -->
+
+         Figure 14&ndash;6: CAR and CDR variants        <!-- /@w -->
+
+</pre></div></div>
+
+<p><b class="b">setf</b> can also be used with any of these functions to change an
+existing component of <i class="i">x</i>, but <b class="b">setf</b> will not make new
+components.  So, for example, the <i class="i">car</i> of a <i class="i">cons</i> 
+can be assigned with <b class="b">setf</b> of <b class="b">car</b>,
+but the <i class="i">car</i> of <b class="b">nil</b> cannot be assigned with <b class="b">setf</b> of <b class="b">car</b>.
+Similarly, the <i class="i">car</i> of the <i class="i">car</i> of a <i class="i">cons</i> whose <i class="i">car</i>
+is a <i class="i">cons</i> can be assigned with <b class="b">setf</b> of <b class="b">caar</b>,
+but neither <b class="b">nil</b> nor a <i class="i">cons</i> whose car is <b class="b">nil</b> can be assigned
+with <b class="b">setf</b> of <b class="b">caar</b>.
+</p>
+<p>The argument <i class="i">x</i> is permitted to be a <i class="i">dotted list</i> 
+or a <i class="i">circular list</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-262"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-262"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (car nil) &rArr;  NIL  
+ (cdr '(1 . 2)) &rArr;  2
+ (cdr '(1 2)) &rArr;  (2)
+ (cadr '(1 2)) &rArr;  2 
+ (car '(a b c)) &rArr;  A
+ (cdr '(a b c)) &rArr;  (B C)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-118"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-118"> &para;</a></span></h4>
+
+<p>The functions <b class="b">car</b> and <b class="b">cdr</b> 
+should signal <b class="b">type-error</b> if they receive an argument which is not a
+<i class="i">list</i>.  The other functions (<b class="b">caar</b>, <b class="b">cadr</b>,
+... <b class="b">cddddr</b>) should behave for the purpose of
+error checking as if defined by appropriate calls to <b class="b">car</b> and
+<b class="b">cdr</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-305"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-305"> &para;</a></span></h4>
+
+<p><a class="ref" href="rplaca.html">rplaca, rplacd                                                   [Function]</a>
+, 
+<a class="ref" href="first.html">first, second, third, fourth, fifth,</a>
+, 
+<a class="ref" href="rest.html">rest                                                             [Accessor]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-200"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-200"> &para;</a></span></h4>
+
+<p>The <i class="i">car</i> of a <i class="i">cons</i> can also be altered by using <b class="b">rplaca</b>,
+and the <i class="i">cdr</i> of a <i class="i">cons</i> can be altered by using <b class="b">rplacd</b>.
+</p>
+<div class="example">
+<pre class="example-preformatted">(car <i class="i">x</i>)    &equiv; (first <i class="i">x</i>)
+(cadr <i class="i">x</i>)   &equiv; (second <i class="i">x</i>) &equiv; (car (cdr <i class="i">x</i>))
+(caddr <i class="i">x</i>)  &equiv; (third <i class="i">x</i>)  &equiv; (car (cdr (cdr <i class="i">x</i>)))
+(cadddr <i class="i">x</i>) &equiv; (fourth <i class="i">x</i>) &equiv; (car (cdr (cdr (cdr <i class="i">x</i>))))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="copy_002dtree.html">copy-tree                                                        [Function]</a>, Previous: <a href="rplaca.html">rplaca, rplacd                                                   [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/case.html
@@ -0,0 +1,222 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>case (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="case (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="case (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="typecase.html" rel="next" title="typecase">
+<link href="when.html" rel="prev" title="when">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="case">
+<div class="nav-panel">
+<p>
+Next: <a href="typecase.html" accesskey="n" rel="next">typecase, ctypecase, etypecase                                      [Macro]</a>, Previous: <a href="when.html" accesskey="p" rel="prev">when, unless                                                        [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="case_002c-ccase_002c-ecase-_005bMacro_005d"><span>5.3.46 case, ccase, ecase                                                  [Macro]<a class="copiable-link" href="#case_002c-ccase_002c-ecase-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">case</code>  <i class="i">keyform  {!<i class="i">normal-clause</i>}* <span class="r">[</span>!<i class="i">otherwise-clause</i><span class="r">]</span></i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><code class="code">ccase</code>  <i class="i">keyplace {!<i class="i">normal-clause</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><code class="code">ecase</code>  <i class="i">keyform  {!<i class="i">normal-clause</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><i class="i">normal-clause</i>&nbsp;::=<span class="r">(</span>keys&nbsp;{<i class="i">form</i>}*<span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">otherwise-clause</i>&nbsp;::=<span class="r">(</span>{otherwise&nbsp;|&nbsp;t}&nbsp;{<i class="i">form</i>}*<span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">clause</i>&nbsp;::=normal-clause&nbsp;|&nbsp;otherwise-clause<!-- /@w -->
+</p>
+<a class="index-entry-id" id="index-otherwise"></a>
+
+<a class="index-entry-id" id="index-t-1"></a>
+
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-65"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-65"> &para;</a></span></h4>
+
+<p><i class="i">keyform</i>&mdash;a <i class="i">form</i>; evaluated to produce a <i class="i">test-key</i>.
+</p>
+<p><i class="i">keyplace</i>&mdash;a <i class="i">form</i>; evaluated initially to produce a <i class="i">test-key</i>.
+   Possibly also used later as a <i class="i">place</i> if no <i class="i">keys</i> match.
+</p>
+<p><i class="i">test-key</i>&mdash;an object produced by evaluating <i class="i">keyform</i> or <i class="i">keyplace</i>.
+</p>
+<p><i class="i">keys</i>&mdash;a <i class="i">designator</i> for a <i class="i">list</i> of <i class="i">objects</i>.
+ In the case of <b class="b">case</b>, the <i class="i">symbols</i> <b class="b">t</b> and <b class="b">otherwise</b> may
+ not be used as the <i class="i">keys</i> <i class="i">designator</i>.  To refer to these <i class="i">symbols</i>
+ by themselves as <i class="i">keys</i>, the designators <code class="t">(t)</code> and <code class="t">(otherwise)</code>, respectively,
+ must be used instead.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">forms</i> 
+		  in the matching <i class="i">clause</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-99"><span>Description::<a class="copiable-link" href="#Description_003a_003a-99"> &para;</a></span></h4>
+
+<p>These <i class="i">macros</i> allow the conditional execution of a body of <i class="i">forms</i>
+in a <i class="i">clause</i> that is selected by matching the <i class="i">test-key</i> on the
+basis of its identity.
+</p>
+<p>The <i class="i">keyform</i> or <i class="i">keyplace</i> is <i class="i">evaluated</i> to produce the
+<i class="i">test-key</i>.
+</p>
+<p>Each of the <i class="i">normal-clauses</i> is then considered in turn.
+If the <i class="i">test-key</i> is the <i class="i">same</i> as any <i class="i">key</i> for 
+that <i class="i">clause</i>, the <i class="i">forms</i> in that <i class="i">clause</i> are
+<i class="i">evaluated</i> as an <i class="i">implicit progn</i>, and the <i class="i">values</i>
+it returns are returned as the value of the <b class="b">case</b>,
+<b class="b">ccase</b>, or <b class="b">ecase</b> <i class="i">form</i>.
+</p>
+<p>These <i class="i">macros</i> differ only in their <i class="i">behavior</i> when 
+no <i class="i">normal-clause</i> matches; specifically:
+</p>
+<dl class="table">
+<dt><b class="b">case</b></dt>
+<dd><p>If no <i class="i">normal-clause</i> matches, and there is an <i class="i">otherwise-clause</i>,
+then that <i class="i">otherwise-clause</i> automatically matches; the <i class="i">forms</i> in
+that <i class="i">clause</i> are <i class="i">evaluated</i> as an <i class="i">implicit progn</i>, 
+and the <i class="i">values</i> it returns are returned as the value of the <b class="b">case</b>.
+</p>
+<p>If there is no <i class="i">otherwise-clause</i>, <b class="b">case</b> returns <b class="b">nil</b>.
+</p>
+</dd>
+<dt><b class="b">ccase</b></dt>
+<dd><p>If no <i class="i">normal-clause</i> matches,
+a <i class="i">correctable</i> <i class="i">error</i> of <i class="i">type</i> <b class="b">type-error</b> is signaled.
+The offending datum is the <i class="i">test-key</i> and
+the expected type is <i class="i">type equivalent</i> to <code class="t">(member <i class="i">key1</i> <i class="i">key2</i> ...)</code>.
+The <b class="b">store-value</b> <i class="i">restart</i> can be used to correct the error.
+</p>
+<p>If the <b class="b">store-value</b> <i class="i">restart</i> is invoked, its <i class="i">argument</i> becomes the 
+new <i class="i">test-key</i>, and is stored in <i class="i">keyplace</i> as if by
+<code class="t">(setf <i class="i">keyplace</i> <i class="i">test-key</i>)</code>.
+Then <b class="b">ccase</b> starts over, considering each <i class="i">clause</i> anew.
+</p>
+<p>[Reviewer Note by Barmar: Will it prompt for multiple values if keyplace is a VALUES general ref?]
+</p>
+<p>The subforms of <i class="i">keyplace</i> might be evaluated again if
+none of the cases holds.
+</p>
+</dd>
+<dt><b class="b">ecase</b></dt>
+<dd><p>If no <i class="i">normal-clause</i> matches,
+a <i class="i">non-correctable</i> <i class="i">error</i> of <i class="i">type</i> <b class="b">type-error</b> is signaled.
+The offending datum is the <i class="i">test-key</i> and
+the expected type is <i class="i">type equivalent</i> to <code class="t">(member <i class="i">key1</i> <i class="i">key2</i> ...)</code>.
+</p>
+<p>Note that in contrast with <b class="b">ccase</b>,
+the caller of <b class="b">ecase</b> may rely on the fact that <b class="b">ecase</b> 
+does not return if a <i class="i">normal-clause</i> does not match.
+</p>
+</dd>
+</dl>
+
+<h4 class="subsubheading" id="Examples_003a_003a-73"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-73"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (dolist (k '(1 2 3 :four #\v () t 'other))
+    (format t &quot;~S &quot;
+       (case k ((1 2) 'clause1)
+               (3 'clause2)
+               (nil 'no-keys-so-never-seen)
+               ((nil) 'nilslot)
+               ((:four #\v) 'clause4)
+               ((t) 'tslot)
+               (otherwise 'others)))) 
+<code class="t"> |&gt; </code> CLAUSE1 CLAUSE1 CLAUSE2 CLAUSE4 CLAUSE4 NILSLOT TSLOT OTHERS 
+&rArr;  NIL
+ (defun add-em (x) (apply #'+ (mapcar #'decode x)))
+&rArr;  ADD-EM
+ (defun decode (x)
+   (ccase x
+     ((i uno) 1)
+     ((ii dos) 2)
+     ((iii tres) 3)
+     ((iv cuatro) 4)))
+&rArr;  DECODE
+ (add-em '(uno iii)) &rArr;  4
+ (add-em '(uno iiii))
+<code class="t"> |&gt; </code> Error: The value of X, IIII, is not I, UNO, II, DOS, III,
+<code class="t"> |&gt; </code>        TRES, IV, or CUATRO.
+<code class="t"> |&gt; </code>  1: Supply a value to use instead.
+<code class="t"> |&gt; </code>  2: Return to Lisp Toplevel.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:CONTINUE 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Value to evaluate and use for X: <b class="b">|&gt;&gt;</b><code class="t">'IV</code><b class="b">&lt;&lt;|</b>
+&rArr;  5
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-3"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-3"> &para;</a></span></h4>
+
+<p>The debugger might be entered.
+If the <b class="b">store-value</b> <i class="i">restart</i> is invoked,
+the <i class="i">value</i> of <i class="i">keyplace</i> might be changed.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-5"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-5"> &para;</a></span></h4>
+
+<p><b class="b">ccase</b> and <b class="b">ecase</b>, since they might signal an error,
+are potentially affected by existing <i class="i">handlers</i> and <b class="b">*debug-io*</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-18"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-18"> &para;</a></span></h4>
+
+<p><b class="b">ccase</b> and <b class="b">ecase</b> signal an error of <i class="i">type</i> <b class="b">type-error</b>
+if no <i class="i">normal-clause</i> matches.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-83"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-83"> &para;</a></span></h4>
+
+<p><a class="ref" href="cond.html">cond                                                                [Macro]</a>
+,
+<a class="ref" href="typecase.html">typecase, ctypecase, etypecase                                      [Macro]</a>
+,
+<a class="ref" href="setf.html">setf, psetf                                                         [Macro]</a>
+,
+<a class="ref" href="Generalized-Reference.html">Generalized Reference</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-53"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-53"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">(case <i class="i">test-key</i>
+  {(({<i class="i">key</i>}*) {<i class="i">form</i>}*)}*)
+&equiv;
+(let ((#1=#:g0001 <i class="i">test-key</i>))
+  (cond {((member #1# '({<i class="i">key</i>}*)) {<i class="i">form</i>}*)}*))
+</pre></div>
+
+<p>The specific error message used by <b class="b">ecase</b> and <b class="b">ccase</b> can vary
+between implementations.  In situations where control of the specific wording 
+of the error message is important, it is better to use <b class="b">case</b> with an
+<i class="i">otherwise-clause</i> that explicitly signals an error with an appropriate 
+message.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="typecase.html">typecase, ctypecase, etypecase                                      [Macro]</a>, Previous: <a href="when.html">when, unless                                                        [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/catch.html
@@ -0,0 +1,155 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>catch (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="catch (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="catch (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="go.html" rel="next" title="go">
+<link href="block.html" rel="prev" title="block">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="catch">
+<div class="nav-panel">
+<p>
+Next: <a href="go.html" accesskey="n" rel="next">go                                                       [Special Operator]</a>, Previous: <a href="block.html" accesskey="p" rel="prev">block                                                    [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="catch-_005bSpecial-Operator_005d"><span>5.3.23 catch                                                    [Special Operator]<a class="copiable-link" href="#catch-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">catch</code>  <i class="i"><i class="i">tag</i> {<i class="i">form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-44"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-44"> &para;</a></span></h4>
+
+<p><i class="i">tag</i>&mdash;a <i class="i">catch tag</i>; evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;if the <i class="i">forms</i> exit normally,
+	           the <i class="i">values</i> returned by the <i class="i">forms</i>;
+		  if a throw occurs to the <i class="i">tag</i>,
+		   the <i class="i">values</i> that are thrown.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-76"><span>Description::<a class="copiable-link" href="#Description_003a_003a-76"> &para;</a></span></h4>
+
+<p><b class="b">catch</b> is used as the destination of a non-local 
+control transfer by <b class="b">throw</b>.
+<i class="i">Tags</i> are used to find the <b class="b">catch</b>
+to which a <b class="b">throw</b> is transferring control.
+<code class="t">(catch 'foo <i class="i">form</i>)</code> catches a 
+<code class="t">(throw 'foo <i class="i">form</i>)</code> but not a
+<code class="t">(throw 'bar <i class="i">form</i>)</code>.
+</p>
+<p>The order of execution of <b class="b">catch</b> follows:
+<a class="index-entry-id" id="index-order-of-evaluation-3"></a>
+</p>
+<a class="index-entry-id" id="index-evaluation-order-3"></a>
+
+<dl class="table">
+<dt>1.</dt>
+<dd><p><i class="i">Tag</i> is evaluated.
+It serves as the name of the
+<b class="b">catch</b>.  
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p><i class="i">Forms</i> are then evaluated as an implicit <b class="b">progn</b>,
+and the results of the last <i class="i">form</i> are returned unless a 
+<b class="b">throw</b> occurs.
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>If a <b class="b">throw</b> occurs 
+during the execution of one of the <i class="i">forms</i>, control
+is transferred  to the <b class="b">catch</b> <i class="i">form</i> whose <i class="i">tag</i> 
+is <b class="b">eq</b> to
+the tag argument of the <b class="b">throw</b>
+and which is the most recently established <b class="b">catch</b> with that 
+<i class="i">tag</i>.
+No further evaluation of <i class="i">forms</i> occurs.
+</p>
+</dd>
+<dt>4.</dt>
+<dd><p>The <i class="i">tag</i> <i class="i">established</i> 
+by <b class="b">catch</b> is <i class="i">disestablished</i>
+just before the results are returned.
+</p>
+</dd>
+</dl>
+
+<p>If during the execution of one of the <i class="i">forms</i>, a <b class="b">throw</b>
+is executed whose tag is <b class="b">eq</b> to the <b class="b">catch</b> tag, 
+then the values specified by the <b class="b">throw</b> are
+returned as the result of the dynamically most recently established
+<b class="b">catch</b> form with that tag.
+</p>
+<p>The mechanism for <b class="b">catch</b> and <b class="b">throw</b> works even
+if <b class="b">throw</b> is not within the lexical scope of <b class="b">catch</b>.
+<b class="b">throw</b> must occur within the <i class="i">dynamic extent</i> 
+of the <i class="i">evaluation</i> of the body of a <b class="b">catch</b> with a corresponding <i class="i">tag</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-50"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-50"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (catch 'dummy-tag 1 2 (throw 'dummy-tag 3) 4) &rArr;  3
+ (catch 'dummy-tag 1 2 3 4) &rArr;  4
+ (defun throw-back (tag) (throw tag t)) &rArr;  THROW-BACK
+ (catch 'dummy-tag (throw-back 'dummy-tag) 2) &rArr;  T
+
+ ;; Contrast behavior of this example with corresponding example of BLOCK.
+ (catch 'c
+   (flet ((c1 () (throw 'c 1)))
+     (catch 'c (c1) (print 'unreachable))
+     2)) &rArr;  2
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-15"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-15"> &para;</a></span></h4>
+<p>An error of <i class="i">type</i> <b class="b">control-error</b> is signaled
+if <b class="b">throw</b> is done
+when there is no suitable <b class="b">catch</b> <i class="i">tag</i>. 
+</p><h4 class="subsubheading" id="See-Also_003a_003a-61"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-61"> &para;</a></span></h4>
+
+<p><a class="ref" href="throw.html">throw                                                    [Special Operator]</a>
+, <a class="ref" href="Evaluation.html">Evaluation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-37"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-37"> &para;</a></span></h4>
+
+<p>It is customary for <i class="i">symbols</i> to be used
+as <i class="i">tags</i>, but any <i class="i">object</i> is permitted.  
+However, numbers should not be
+used because the comparison is done using <b class="b">eq</b>.
+</p>
+<p><b class="b">catch</b> differs from <b class="b">block</b> in that 
+<b class="b">catch</b>
+tags have dynamic <i class="i">scope</i> while 
+<b class="b">block</b> names have <i class="i">lexical scope</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="go.html">go                                                       [Special Operator]</a>, Previous: <a href="block.html">block                                                    [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/cell_002derror.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>cell-error (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="cell-error (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="cell-error (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="cell_002derror_002dname.html" rel="next" title="cell-error-name">
+<link href="error-_0028Condition-Type_0029.html" rel="prev" title="error (Condition Type)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="cell_002derror">
+<div class="nav-panel">
+<p>
+Next: <a href="cell_002derror_002dname.html" accesskey="n" rel="next">cell-error-name                                                  [Function]</a>, Previous: <a href="error-_0028Condition-Type_0029.html" accesskey="p" rel="prev">error                                                      [Condition Type]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="cell_002derror-_005bCondition-Type_005d"><span>9.2.6 cell-error                                                 [Condition Type]<a class="copiable-link" href="#cell_002derror-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-24"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-24"> &para;</a></span></h4>
+<p><b class="b">cell-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-176"><span>Description::<a class="copiable-link" href="#Description_003a_003a-176"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">cell-error</b> consists of error conditions that occur during 
+a location <i class="i">access</i>.   The name of the offending cell is initialized by 
+the <code class="t">:name</code> initialization argument to <b class="b">make-condition</b>,
+and is <i class="i">accessed</i> by the <i class="i">function</i> <b class="b">cell-error-name</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-155"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-155"> &para;</a></span></h4>
+
+<p><a class="ref" href="cell_002derror_002dname.html">cell-error-name                                                  [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/cell_002derror_002dname.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>cell-error-name (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="cell-error-name (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="cell-error-name (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="parse_002derror.html" rel="next" title="parse-error">
+<link href="cell_002derror.html" rel="prev" title="cell-error">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="cell_002derror_002dname">
+<div class="nav-panel">
+<p>
+Next: <a href="parse_002derror.html" accesskey="n" rel="next">parse-error                                                [Condition Type]</a>, Previous: <a href="cell_002derror.html" accesskey="p" rel="prev">cell-error                                                 [Condition Type]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="cell_002derror_002dname-_005bFunction_005d"><span>9.2.7 cell-error-name                                                  [Function]<a class="copiable-link" href="#cell_002derror_002dname-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">cell-error-name</code>  <i class="i">condition</i> &rArr;  <i class="i">name</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-131"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-131"> &para;</a></span></h4>
+
+<p><i class="i">condition</i>&mdash;a <i class="i">condition</i> of <i class="i">type</i> <b class="b">cell-error</b>.
+</p>
+<p><i class="i">name</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-177"><span>Description::<a class="copiable-link" href="#Description_003a_003a-177"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">name</i> of the offending cell involved in the <i class="i">situation</i>
+represented by <i class="i">condition</i>.
+</p>
+<p>The nature of the result depends on the specific <i class="i">type</i> of <i class="i">condition</i>.
+For example,
+    if the <i class="i">condition</i> is of <i class="i">type</i> <b class="b">unbound-variable</b>, the result is
+     the <i class="i">name</i> of the <i class="i">unbound variable</i> which was being <i class="i">accessed</i>,
+    if the <i class="i">condition</i> is of <i class="i">type</i> <b class="b">undefined-function</b>, this is
+     the <i class="i">name</i> of the <i class="i">undefined function</i> which was being <i class="i">accessed</i>,
+and if the <i class="i">condition</i> is of <i class="i">type</i> <b class="b">unbound-slot</b>, this is
+     the <i class="i">name</i> of the <i class="i">slot</i> which was being <i class="i">accessed</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-156"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-156"> &para;</a></span></h4>
+
+<p><b class="b">cell-error</b>,
+<b class="b">unbound-slot</b>,
+<b class="b">unbound-variable</b>,
+<b class="b">undefined-function</b>,
+<a class="ref" href="Condition-System-Concepts.html">Condition System Concepts</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/cerror.html
@@ -0,0 +1,212 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>cerror (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="cerror (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="cerror (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="check_002dtype.html" rel="next" title="check-type">
+<link href="error.html" rel="prev" title="error">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="cerror">
+<div class="nav-panel">
+<p>
+Next: <a href="check_002dtype.html" accesskey="n" rel="next">check-type                                                          [Macro]</a>, Previous: <a href="error.html" accesskey="p" rel="prev">error                                                            [Function]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="cerror-_005bFunction_005d"><span>9.2.12 cerror                                                           [Function]<a class="copiable-link" href="#cerror-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">cerror</code>  <i class="i">continue-format-control datum <span class="r">&amp;rest</span> arguments</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-134"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-134"> &para;</a></span></h4>
+
+<p><i class="i">Continue-format-control</i>&mdash;a <i class="i">format control</i>.
+</p>
+<p>[Reviewer Note by Barmar: What is continue-format-control used for??]
+</p>
+<p><i class="i">datum</i>, <i class="i">arguments</i>&mdash;<i class="i">designators</i> for a <i class="i">condition</i> 
+ of default type <b class="b">simple-error</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-182"><span>Description::<a class="copiable-link" href="#Description_003a_003a-182"> &para;</a></span></h4>
+
+<p><b class="b">cerror</b> effectively invokes <b class="b">error</b> on the
+<i class="i">condition</i> named by <i class="i">datum</i>.  As with any function that
+implicitly calls <b class="b">error</b>, if the <i class="i">condition</i> is not handled,
+<code class="t">(invoke-debugger <i class="i">condition</i>)</code> is executed.  While signaling is going on,
+and while in the debugger if it is reached, it is possible to continue
+code execution (<i class="i">i.e.</i>, to return from <b class="b">cerror</b>) using the <b class="b">continue</b> <i class="i">restart</i>.
+</p>
+<p>If <i class="i">datum</i> is a <i class="i">condition</i>, <i class="i">arguments</i> can be supplied,
+but are used only in conjunction with the <i class="i">continue-format-control</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-116"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-116"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun real-sqrt (n)
+   (when (minusp n)
+     (setq n (- n))
+     (cerror &quot;Return sqrt(~D) instead.&quot; &quot;Tried to take sqrt(-~D).&quot; n))
+   (sqrt n))
+
+ (real-sqrt 4)
+&rArr;  2.0
+
+ (real-sqrt -9)
+<code class="t"> |&gt; </code> Correctable error in REAL-SQRT: Tried to take sqrt(-9).
+<code class="t"> |&gt; </code> Restart options:
+<code class="t"> |&gt; </code>  1: Return sqrt(9) instead.
+<code class="t"> |&gt; </code>  2: Top level.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:continue 1</code><b class="b">&lt;&lt;|</b>
+&rArr;  3.0
+
+ (define-condition not-a-number (error)
+   ((argument :reader not-a-number-argument :initarg :argument))
+   (:report (lambda (condition stream)
+              (format stream &quot;~S is not a number.&quot; 
+                      (not-a-number-argument condition)))))
+
+ (defun assure-number (n)
+   (loop (when (numberp n) (return n))
+         (cerror &quot;Enter a number.&quot;
+                 'not-a-number :argument n)
+         (format t &quot;~&amp;Type a number: &quot;)
+         (setq n (read))
+         (fresh-line)))
+
+ (assure-number 'a)
+<code class="t"> |&gt; </code> Correctable error in ASSURE-NUMBER: A is not a number.
+<code class="t"> |&gt; </code> Restart options:
+<code class="t"> |&gt; </code>  1: Enter a number.
+<code class="t"> |&gt; </code>  2: Top level.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:continue 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Type a number: <b class="b">|&gt;&gt;</b><code class="t">1/2</code><b class="b">&lt;&lt;|</b>
+&rArr;  1/2
+
+ (defun assure-large-number (n)
+   (loop (when (and (numberp n) (&gt; n 73)) (return n))
+         (cerror &quot;Enter a number~:[~; a bit larger than ~D~].&quot;
+                 &quot;~*~A is not a large number.&quot; 
+                 (numberp n) n)
+         (format t &quot;~&amp;Type a large number: &quot;)
+         (setq n (read))
+         (fresh-line)))
+
+ (assure-large-number 10000)
+&rArr;  10000
+
+ (assure-large-number 'a)
+<code class="t"> |&gt; </code> Correctable error in ASSURE-LARGE-NUMBER: A is not a large number.
+<code class="t"> |&gt; </code> Restart options:
+<code class="t"> |&gt; </code>  1: Enter a number.
+<code class="t"> |&gt; </code>  2: Top level.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:continue 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Type a large number: <b class="b">|&gt;&gt;</b><code class="t">88</code><b class="b">&lt;&lt;|</b>
+&rArr;  88
+
+ (assure-large-number 37)
+<code class="t"> |&gt; </code> Correctable error in ASSURE-LARGE-NUMBER: 37 is not a large number.
+<code class="t"> |&gt; </code> Restart options:
+<code class="t"> |&gt; </code>  1: Enter a number a bit larger than 37.
+<code class="t"> |&gt; </code>  2: Top level.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:continue 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Type a large number: <b class="b">|&gt;&gt;</b><code class="t">259</code><b class="b">&lt;&lt;|</b>
+&rArr;  259
+
+ (define-condition not-a-large-number (error)
+   ((argument :reader not-a-large-number-argument :initarg :argument))
+   (:report (lambda (condition stream)
+              (format stream &quot;~S is not a large number.&quot; 
+                      (not-a-large-number-argument condition)))))
+
+ (defun assure-large-number (n)
+   (loop (when (and (numberp n) (&gt; n 73)) (return n))
+         (cerror &quot;Enter a number~3*~:[~; a bit larger than ~*~D~].&quot;
+                 'not-a-large-number
+                 :argument n 
+                 :ignore (numberp n)
+                 :ignore n
+                 :allow-other-keys t)
+         (format t &quot;~&amp;Type a large number: &quot;)
+         (setq n (read))
+         (fresh-line)))
+
+ (assure-large-number 'a)
+<code class="t"> |&gt; </code> Correctable error in ASSURE-LARGE-NUMBER: A is not a large number.
+<code class="t"> |&gt; </code> Restart options:
+<code class="t"> |&gt; </code>  1: Enter a number.
+<code class="t"> |&gt; </code>  2: Top level.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:continue 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Type a large number: <b class="b">|&gt;&gt;</b><code class="t">88</code><b class="b">&lt;&lt;|</b>
+&rArr;  88
+
+ (assure-large-number 37)
+<code class="t"> |&gt; </code> Correctable error in ASSURE-LARGE-NUMBER: A is not a large number.
+<code class="t"> |&gt; </code> Restart options:
+<code class="t"> |&gt; </code>  1: Enter a number a bit larger than 37.
+<code class="t"> |&gt; </code>  2: Top level.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:continue 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Type a large number: <b class="b">|&gt;&gt;</b><code class="t">259</code><b class="b">&lt;&lt;|</b>
+&rArr;  259
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-20"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-20"> &para;</a></span></h4>
+
+<p><b class="b">*break-on-signals*</b>.
+</p>
+<p>Existing handler bindings.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-160"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-160"> &para;</a></span></h4>
+
+<p><a class="ref" href="error.html">error                                                            [Function]</a>
+, 
+<a class="ref" href="format.html">format                                                           [Function]</a>
+, 
+<a class="ref" href="handler_002dbind.html">handler-bind                                                        [Macro]</a>
+,
+<b class="b">*break-on-signals*</b>, <b class="b">simple-type-error</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-99"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-99"> &para;</a></span></h4>
+
+<p>If <i class="i">datum</i> is a <i class="i">condition</i> <i class="i">type</i> rather than a 
+<i class="i">string</i>, the <b class="b">format</b> directive <code class="t">~*</code> may be especially
+useful in the <i class="i">continue-format-control</i> in order to ignore the
+<i class="i">keywords</i> in the <i class="i">initialization argument list</i>.  For example:
+</p>
+<div class="example">
+<pre class="example-preformatted">(cerror &quot;enter a new value to replace ~*~s&quot; 
+        'not-a-number
+        :argument a)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="check_002dtype.html">check-type                                                          [Macro]</a>, Previous: <a href="error.html">error                                                            [Function]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/change_002dclass.html
@@ -0,0 +1,163 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>change-class (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="change-class (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="change-class (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="slot_002dboundp.html" rel="next" title="slot-boundp">
+<link href="update_002dinstance_002dfor_002dredefined_002dclass.html" rel="prev" title="update-instance-for-redefined-class">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="change_002dclass">
+<div class="nav-panel">
+<p>
+Next: <a href="slot_002dboundp.html" accesskey="n" rel="next">slot-boundp                                                      [Function]</a>, Previous: <a href="update_002dinstance_002dfor_002dredefined_002dclass.html" accesskey="p" rel="prev">update-instance-for-redefined-class             [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="change_002dclass-_005bStandard-Generic-Function_005d"><span>7.7.8 change-class                                    [Standard Generic Function]<a class="copiable-link" href="#change_002dclass-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-17"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-17"> &para;</a></span></h4>
+
+<p><code class="code">change-class</code>  <i class="i">instance new-class <span class="r">&amp;key</span> <span class="r">&amp;allow-other-keys</span></i> &rArr;  <i class="i">instance</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-6"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-6"> &para;</a></span></h4>
+
+<p><code class="code">change-class</code>  <i class="i"><span class="r">(</span><i class="i">instance</i> <b class="b">standard-object</b><span class="r">)</span>
+			 <span class="r">(</span><i class="i">new-class</i> <b class="b">standard-class</b><span class="r">)</span>
+			 <span class="r">&amp;rest</span> initargs</i>
+</p>
+<p><code class="code">change-class</code>  <i class="i"><span class="r">(</span><i class="i">instance</i> <b class="b">t</b><span class="r">)</span>
+		         <span class="r">(</span><i class="i">new-class</i> <b class="b">symbol</b><span class="r">)</span>
+			 <span class="r">&amp;rest</span> initargs</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-96"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-96"> &para;</a></span></h4>
+
+<p><i class="i">instance</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">new-class</i>&mdash;a <i class="i">class designator</i>.
+</p>
+<p><i class="i">initargs</i>&mdash;an <i class="i">initialization argument list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-135"><span>Description::<a class="copiable-link" href="#Description_003a_003a-135"> &para;</a></span></h4>
+
+<p>The <i class="i">generic function</i> <b class="b">change-class</b> changes the 
+<i class="i">class</i> of an <i class="i">instance</i> to <i class="i">new-class</i>.  
+It destructively modifies and returns the <i class="i">instance</i>.
+</p>
+<p>If in the old <i class="i">class</i> there is any <i class="i">slot</i> of the 
+same name as a local <i class="i">slot</i> in the <i class="i">new-class</i>, 
+the value of that <i class="i">slot</i> is retained.  This means that if 
+the <i class="i">slot</i> has a value, the value returned by <b class="b">slot-value</b>
+after <b class="b">change-class</b> is invoked is <b class="b">eql</b> to the
+value returned by <b class="b">slot-value</b> before <b class="b">change-class</b> is
+invoked.  Similarly, if the <i class="i">slot</i> was unbound, it remains
+unbound.  The other <i class="i">slots</i> are initialized as described in 
+<a class="ref" href="Changing-the-Class-of-an-Instance.html">Changing the Class of an Instance</a>.
+</p>
+<p>After completing all other actions, <b class="b">change-class</b> invokes
+<b class="b">update-instance-for-different-class</b>.  The
+generic function <b class="b">update-instance-for-different-class</b> can be used
+to assign values to slots in the transformed instance.
+</p>
+<p>See <a class="ref" href="Initializing-Newly-Added-Local-Slots-_0028Changing-the-Class-of-an-Instance_0029.html">Initializing Newly Added Local Slots</a>.
+</p>
+<p>If the second of the above <i class="i">methods</i> is selected, 
+that <i class="i">method</i> invokes <b class="b">change-class</b> 
+on <i class="i">instance</i>, <code class="t">(find-class <i class="i">new-class</i>)</code>,
+and the <i class="i">initargs</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-101"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-101"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">
+
+ (defclass position () ())
+
+ (defclass x-y-position (position)
+     ((x :initform 0 :initarg :x)
+      (y :initform 0 :initarg :y)))
+
+ (defclass rho-theta-position (position)
+     ((rho :initform 0)
+      (theta :initform 0)))
+
+ (defmethod update-instance-for-different-class :before ((old x-y-position) 
+                                                         (new rho-theta-position)
+                                                         &amp;key)
+   ;; Copy the position information from old to new to make new
+   ;; be a rho-theta-position at the same position as old.
+   (let ((x (slot-value old 'x))
+         (y (slot-value old 'y)))
+     (setf (slot-value new 'rho) (sqrt (+ (* x x) (* y y)))
+           (slot-value new 'theta) (atan y x))))
+
+;;; At this point an instance of the class x-y-position can be
+;;; changed to be an instance of the class rho-theta-position using
+;;; change-class:
+
+ (setq p1 (make-instance 'x-y-position :x 2 :y 0))
+
+ (change-class p1 'rho-theta-position)
+
+;;; The result is that the instance bound to p1 is now an instance of
+;;; the class rho-theta-position.   The update-instance-for-different-class
+;;; method performed the initialization of the rho and theta slots based
+;;; on the value of the x and y slots, which were maintained by
+;;; the old instance.
+
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-117"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-117"> &para;</a></span></h4>
+
+<p><a class="ref" href="update_002dinstance_002dfor_002ddifferent_002dclass.html">update-instance-for-different-class             [Standard Generic Function]</a>
+,
+<a class="ref" href="Changing-the-Class-of-an-Instance.html">Changing the Class of an Instance</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-79"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-79"> &para;</a></span></h4>
+
+<p>The generic function <b class="b">change-class</b> has several semantic
+difficulties.  First, it performs a destructive operation that can be
+invoked within a <i class="i">method</i> on an <i class="i">instance</i> that was used to select that
+<i class="i">method</i>. 
+When multiple <i class="i">methods</i> are involved because <i class="i">methods</i> are being
+combined, the <i class="i">methods</i> currently executing or about to be executed may
+no longer be applicable.  Second, some implementations might use
+compiler optimizations of slot <i class="i">access</i>, and when the <i class="i">class</i> of an
+<i class="i">instance</i> is changed the assumptions the compiler made might be
+violated.  This implies that a programmer must not use
+<b class="b">change-class</b> inside a <i class="i">method</i> if any 
+<i class="i">methods</i> for that <i class="i">generic function</i>
+<i class="i">access</i> any <i class="i">slots</i>, or the results are undefined.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="slot_002dboundp.html">slot-boundp                                                      [Function]</a>, Previous: <a href="update_002dinstance_002dfor_002dredefined_002dclass.html">update-instance-for-redefined-class             [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/char.html
@@ -0,0 +1,101 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>char (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="char (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="char (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Strings-Dictionary.html" rel="up" title="Strings Dictionary">
+<link href="string.html" rel="next" title="string">
+<link href="simple_002dstring_002dp.html" rel="prev" title="simple-string-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="char">
+<div class="nav-panel">
+<p>
+Next: <a href="string.html" accesskey="n" rel="next">string                                                           [Function]</a>, Previous: <a href="simple_002dstring_002dp.html" accesskey="p" rel="prev">simple-string-p                                                  [Function]</a>, Up: <a href="Strings-Dictionary.html" accesskey="u" rel="up">Strings Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="char_002c-schar-_005bAccessor_005d"><span>16.2.6 char, schar                                                      [Accessor]<a class="copiable-link" href="#char_002c-schar-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">char</code>  <i class="i">string index</i> &rArr;  <i class="i">character</i>
+</p>
+<p><code class="code">schar</code>  <i class="i">string index</i> &rArr;  <i class="i">character</i>
+</p>
+<p>(setf (<code class="code">char</code> <i class="i">string index</i>) new-character)<br>(setf (<code class="code">schar</code> <i class="i">string index</i>) new-character)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-347"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-347"> &para;</a></span></h4>
+
+<p><i class="i">string</i>&mdash;for <b class="b">char</b>,  a <i class="i">string</i>;
+		 for <b class="b">schar</b>, a <i class="i">simple string</i>.
+</p>
+<p><i class="i">index</i>&mdash;a <i class="i">valid array index</i> for the <i class="i">string</i>.
+</p>
+<p><i class="i">character</i>, <i class="i">new-character</i>&mdash;a <i class="i">character</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-461"><span>Description::<a class="copiable-link" href="#Description_003a_003a-461"> &para;</a></span></h4>
+
+<p><b class="b">char</b> and <b class="b">schar</b> <i class="i">access</i> the <i class="i">element</i> of <i class="i">string</i>
+specified by <i class="i">index</i>.
+</p>
+<p><b class="b">char</b> ignores <i class="i">fill pointers</i> when <i class="i">accessing</i> <i class="i">elements</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-329"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-329"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq my-simple-string (make-string 6 :initial-element #\A)) &rArr;  &quot;AAAAAA&quot;
+ (schar my-simple-string 4) &rArr;  #\A
+ (setf (schar my-simple-string 4) #\B) &rArr;  #\B
+ my-simple-string &rArr;  &quot;AAAABA&quot;
+ (setq my-filled-string
+       (make-array 6 :element-type 'character
+                     :fill-pointer 5
+                     :initial-contents my-simple-string))
+&rArr;  &quot;AAAAB&quot;
+ (char my-filled-string 4) &rArr;  #\B
+ (char my-filled-string 5) &rArr;  #\A
+ (setf (char my-filled-string 3) #\C) &rArr;  #\C
+ (setf (char my-filled-string 5) #\D) &rArr;  #\D
+ (setf (fill-pointer my-filled-string) 6) &rArr;  6
+ my-filled-string &rArr;  &quot;AAACBD&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-376"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-376"> &para;</a></span></h4>
+
+<p><a class="ref" href="aref.html">aref                                                             [Accessor]</a>
+,
+<a class="ref" href="elt.html">elt                                                              [Accessor]</a>
+,
+</p>
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-251"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-251"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (char s j) &equiv; (aref (the string s) j)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/char_002dcode.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>char-code (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="char-code (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="char-code (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="char_002dint.html" rel="next" title="char-int">
+<link href="upper_002dcase_002dp.html" rel="prev" title="upper-case-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="char_002dcode">
+<div class="nav-panel">
+<p>
+Next: <a href="char_002dint.html" accesskey="n" rel="next">char-int                                                         [Function]</a>, Previous: <a href="upper_002dcase_002dp.html" accesskey="p" rel="prev">upper-case-p, lower-case-p, both-case-p                          [Function]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="char_002dcode-_005bFunction_005d"><span>13.2.16 char-code                                                        [Function]<a class="copiable-link" href="#char_002dcode-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">char-code</code>  <i class="i">character</i> &rArr;  <i class="i">code</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-269"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-269"> &para;</a></span></h4>
+
+<p><i class="i">character</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">code</i>&mdash;a <i class="i">character code</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-365"><span>Description::<a class="copiable-link" href="#Description_003a_003a-365"> &para;</a></span></h4>
+
+<p><b class="b">char-code</b> returns the <i class="i">code</i> <i class="i">attribute</i> of <i class="i">character</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-253"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-253"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; An implementation using ASCII character encoding 
+;; might return these values:
+(char-code #\$) &rArr;  36
+(char-code #\a) &rArr;  97
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-115"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-115"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">character</i> is not a <i class="i">character</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-294"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-294"> &para;</a></span></h4>
+
+<p><a class="ref" href="char_002dcode_002dlimit.html">char-code-limit                                         [Constant Variable]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/char_002dcode_002dlimit.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>char-code-limit (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="char-code-limit (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="char-code-limit (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="char_002dname.html" rel="next" title="char-name">
+<link href="code_002dchar.html" rel="prev" title="code-char">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="char_002dcode_002dlimit">
+<div class="nav-panel">
+<p>
+Next: <a href="char_002dname.html" accesskey="n" rel="next">char-name                                                        [Function]</a>, Previous: <a href="code_002dchar.html" accesskey="p" rel="prev">code-char                                                        [Function]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="char_002dcode_002dlimit-_005bConstant-Variable_005d"><span>13.2.19 char-code-limit                                         [Constant Variable]<a class="copiable-link" href="#char_002dcode_002dlimit-_005bConstant-Variable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Constant-Value_003a_003a-10"><span>Constant Value::<a class="copiable-link" href="#Constant-Value_003a_003a-10"> &para;</a></span></h4>
+
+<p>A non-negative <i class="i">integer</i>, the exact magnitude of which
+is <i class="i">implementation-dependent</i>, but which is not less
+than <code class="t">96</code> (the number of <i class="i">standard characters</i>).
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-368"><span>Description::<a class="copiable-link" href="#Description_003a_003a-368"> &para;</a></span></h4>
+
+<p>The upper exclusive bound on the <i class="i">value</i> returned by 
+the <i class="i">function</i> <b class="b">char-code</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-297"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-297"> &para;</a></span></h4>
+
+<p><a class="ref" href="char_002dcode.html">char-code                                                        [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-195"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-195"> &para;</a></span></h4>
+
+<p>The <i class="i">value</i> of <b class="b">char-code-limit</b> might be larger than the actual
+number of <i class="i">characters</i> supported by the <i class="i">implementation</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/char_002dint.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>char-int (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="char-int (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="char-int (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="code_002dchar.html" rel="next" title="code-char">
+<link href="char_002dcode.html" rel="prev" title="char-code">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="char_002dint">
+<div class="nav-panel">
+<p>
+Next: <a href="code_002dchar.html" accesskey="n" rel="next">code-char                                                        [Function]</a>, Previous: <a href="char_002dcode.html" accesskey="p" rel="prev">char-code                                                        [Function]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="char_002dint-_005bFunction_005d"><span>13.2.17 char-int                                                         [Function]<a class="copiable-link" href="#char_002dint-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">char-int</code>  <i class="i">character</i> &rArr;  <i class="i">integer</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-270"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-270"> &para;</a></span></h4>
+
+<p><i class="i">character</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">integer</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-366"><span>Description::<a class="copiable-link" href="#Description_003a_003a-366"> &para;</a></span></h4>
+
+<p>Returns a non-negative <i class="i">integer</i> encoding the <i class="i">character</i> object.
+The manner in which the <i class="i">integer</i> is computed is <i class="i">implementation-dependent</i>.
+In contrast to <b class="b">sxhash</b>, the result is not guaranteed to be independent 
+of the particular <i class="i">Lisp image</i>.
+</p>
+<p>If <i class="i">character</i> has no <i class="i">implementation-defined</i> <i class="i">attributes</i>,
+the results of <b class="b">char-int</b> and <b class="b">char-code</b> are the same. 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (char= <i class="i">c1</i> <i class="i">c2</i>) &equiv; (= (char-int <i class="i">c1</i>) (char-int <i class="i">c2</i>))
+</pre></div>
+
+<p>for characters <i class="i">c1</i> and <i class="i">c2</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-254"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-254"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (char-int #\A) &rArr;  65       ; implementation A
+ (char-int #\A) &rArr;  577      ; implementation B
+ (char-int #\A) &rArr;  262145   ; implementation C
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-295"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-295"> &para;</a></span></h4>
+
+<p><a class="ref" href="char_002dcode.html">char-code                                                        [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/char_002dname.html
@@ -0,0 +1,118 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>char-name (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="char-name (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="char-name (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="name_002dchar.html" rel="next" title="name-char">
+<link href="char_002dcode_002dlimit.html" rel="prev" title="char-code-limit">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="char_002dname">
+<div class="nav-panel">
+<p>
+Next: <a href="name_002dchar.html" accesskey="n" rel="next">name-char                                                        [Function]</a>, Previous: <a href="char_002dcode_002dlimit.html" accesskey="p" rel="prev">char-code-limit                                         [Constant Variable]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="char_002dname-_005bFunction_005d"><span>13.2.20 char-name                                                        [Function]<a class="copiable-link" href="#char_002dname-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">char-name</code>  <i class="i">character</i> &rArr;  <i class="i">name</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-272"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-272"> &para;</a></span></h4>
+
+<p><i class="i">character</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">name</i>&mdash;a <i class="i">string</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-369"><span>Description::<a class="copiable-link" href="#Description_003a_003a-369"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">string</i> that is the <i class="i">name</i> of the <i class="i">character</i>,
+or <b class="b">nil</b> if the <i class="i">character</i> has no <i class="i">name</i>.
+</p>
+<p>All <i class="i">non-graphic</i> characters are required to have <i class="i">names</i>
+unless they have some <i class="i">implementation-defined</i> <i class="i">attribute</i>
+which is not <i class="i">null</i>.  Whether or not other <i class="i">characters</i>
+have <i class="i">names</i> is <i class="i">implementation-dependent</i>.
+</p>
+<p>The <i class="i">standard characters</i>
+&lt;<i class="i">Newline</i>&gt; and &lt;<i class="i">Space</i>&gt; have the respective names <code class="t">&quot;Newline&quot;</code> and <code class="t">&quot;Space&quot;</code>.
+The <i class="i">semi-standard</i> <i class="i">characters</i>
+&lt;<i class="i">Tab</i>&gt;, &lt;<i class="i">Page</i>&gt;, &lt;<i class="i">Rubout</i>&gt;, &lt;<i class="i">Linefeed</i>&gt;, &lt;<i class="i">Return</i>&gt;, and &lt;<i class="i">Backspace</i>&gt; 
+(if they are supported by the <i class="i">implementation</i>)
+have the respective names
+<code class="t">&quot;Tab&quot;</code>,  <code class="t">&quot;Page&quot;</code>,  <code class="t">&quot;Rubout&quot;</code>,  <code class="t">&quot;Linefeed&quot;</code>,  <code class="t">&quot;Return&quot;</code>, and <code class="t">&quot;Backspace&quot;</code>
+(in the indicated case, even though name lookup by &ldquo;<code class="t">#\</code>&rdquo; 
+and by the <i class="i">function</i> <b class="b">name-char</b> is not case sensitive).
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-256"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-256"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (char-name #\ ) &rArr;  &quot;Space&quot;
+ (char-name #\Space) &rArr;  &quot;Space&quot;
+ (char-name #\Page) &rArr;  &quot;Page&quot;
+
+ (char-name #\a)
+&rArr;  NIL
+<i class="i">OR</i>&rArr; &quot;LOWERCASE-a&quot;
+<i class="i">OR</i>&rArr; &quot;Small-A&quot;
+<i class="i">OR</i>&rArr; &quot;LA01&quot;
+
+ (char-name #\A)
+&rArr;  NIL
+<i class="i">OR</i>&rArr; &quot;UPPERCASE-A&quot;
+<i class="i">OR</i>&rArr; &quot;Capital-A&quot;
+<i class="i">OR</i>&rArr; &quot;LA02&quot;
+
+ ;; Even though its CHAR-NAME can vary, #\A prints as #\A
+ (prin1-to-string (read-from-string (format nil &quot;#\\~A&quot; (or (char-name #\A) &quot;A&quot;))))
+&rArr;  &quot;#\\A&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-116"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-116"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">character</i> is not a <i class="i">character</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-298"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-298"> &para;</a></span></h4>
+
+<p><a class="ref" href="name_002dchar.html">name-char                                                        [Function]</a>
+,
+<a class="ref" href="Printing-Characters.html">Printing Characters</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-196"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-196"> &para;</a></span></h4>
+
+<p><i class="i">Non-graphic</i> 
+<i class="i">characters</i> having <i class="i">names</i> are written by the <i class="i">Lisp printer</i>
+as &ldquo;<code class="t">#\</code>&rdquo; followed by the their <i class="i">name</i>; see <a class="ref" href="Printing-Characters.html">Printing Characters</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="name_002dchar.html">name-char                                                        [Function]</a>, Previous: <a href="char_002dcode_002dlimit.html">char-code-limit                                         [Constant Variable]</a>, Up: <a href="Characters-Dictionary.html">Characters Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/char_002dupcase.html
@@ -0,0 +1,119 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>char-upcase (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="char-upcase (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="char-upcase (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="upper_002dcase_002dp.html" rel="next" title="upper-case-p">
+<link href="standard_002dchar_002dp.html" rel="prev" title="standard-char-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="char_002dupcase">
+<div class="nav-panel">
+<p>
+Next: <a href="upper_002dcase_002dp.html" accesskey="n" rel="next">upper-case-p, lower-case-p, both-case-p                          [Function]</a>, Previous: <a href="standard_002dchar_002dp.html" accesskey="p" rel="prev">standard-char-p                                                  [Function]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="char_002dupcase_002c-char_002ddowncase-_005bFunction_005d"><span>13.2.14 char-upcase, char-downcase                                       [Function]<a class="copiable-link" href="#char_002dupcase_002c-char_002ddowncase-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">char-upcase</code>  <i class="i">character</i> &rArr;  <i class="i">corresponding-character</i>
+</p>
+<p><code class="code">char-downcase</code>  <i class="i">character</i> &rArr;  <i class="i">corresponding-character</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-267"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-267"> &para;</a></span></h4>
+
+<p><i class="i">character</i>, <i class="i">corresponding-character</i>&mdash;a <i class="i">character</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-363"><span>Description::<a class="copiable-link" href="#Description_003a_003a-363"> &para;</a></span></h4>
+
+<p>If <i class="i">character</i> is a <i class="i">lowercase</i> <i class="i">character</i>,
+<b class="b">char-upcase</b> returns the corresponding <i class="i">uppercase</i> <i class="i">character</i>.
+Otherwise, <b class="b">char-upcase</b> just returns the given <i class="i">character</i>.
+</p>
+<p>If <i class="i">character</i> is an <i class="i">uppercase</i> <i class="i">character</i>,
+<b class="b">char-downcase</b> returns the corresponding <i class="i">lowercase</i> <i class="i">character</i>.
+Otherwise, <b class="b">char-downcase</b> just returns the given <i class="i">character</i>.
+</p>
+<p>The result only ever differs from <i class="i">character</i> 
+in its <i class="i">code</i> <i class="i">attribute</i>;
+all <i class="i">implementation-defined</i> <i class="i">attributes</i> are preserved.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-251"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-251"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (char-upcase #\a) &rArr;  #\A
+ (char-upcase #\A) &rArr;  #\A
+ (char-downcase #\a) &rArr;  #\a
+ (char-downcase #\A) &rArr;  #\a
+ (char-upcase #\9) &rArr;  #\9
+ (char-downcase #\9) &rArr;  #\9
+ (char-upcase #\@) &rArr;  #\@
+ (char-downcase #\@) &rArr;  #\@
+ ;; Note that this next example might run for a very long time in 
+ ;; some implementations if CHAR-CODE-LIMIT happens to be very large
+ ;; for that implementation.
+ (dotimes (code char-code-limit)
+   (let ((char (code-char code)))
+     (when char
+       (unless (cond ((upper-case-p char) (char= (char-upcase (char-downcase char)) char))
+                     ((lower-case-p char) (char= (char-downcase (char-upcase char)) char))
+                     (t (and (char= (char-upcase (char-downcase char)) char)
+                             (char= (char-downcase (char-upcase char)) char))))
+         (return char)))))
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-113"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-113"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">character</i> is not a <i class="i">character</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-292"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-292"> &para;</a></span></h4>
+
+<p><a class="ref" href="upper_002dcase_002dp.html">upper-case-p, lower-case-p, both-case-p                          [Function]</a>
+,
+<a class="ref" href="alpha_002dchar_002dp.html">alpha-char-p                                                     [Function]</a>
+,
+<a class="ref" href="Characters-With-Case.html">Characters With Case</a>,
+<a class="ref" href="Documentation-of-Implementation_002dDefined-Scripts.html">Documentation of Implementation-Defined Scripts</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-193"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-193"> &para;</a></span></h4>
+
+<p>If the <i class="i">corresponding-char</i> is <i class="i">different</i> than <i class="i">character</i>,
+then both the <i class="i">character</i> and the <i class="i">corresponding-char</i> have <i class="i">case</i>.
+</p>
+<p>Since <b class="b">char-equal</b> ignores the <i class="i">case</i> of the <i class="i">characters</i> it compares,
+the <i class="i">corresponding-character</i> is always the <i class="i">same</i> as <i class="i">character</i>
+under <b class="b">char-equal</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="upper_002dcase_002dp.html">upper-case-p, lower-case-p, both-case-p                          [Function]</a>, Previous: <a href="standard_002dchar_002dp.html">standard-char-p                                                  [Function]</a>, Up: <a href="Characters-Dictionary.html">Characters Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/char_003d.html
@@ -0,0 +1,243 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>char= (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="char= (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="char= (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="character.html" rel="next" title="character">
+<link href="extended_002dchar.html" rel="prev" title="extended-char">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="char_003d">
+<div class="nav-panel">
+<p>
+Next: <a href="character.html" accesskey="n" rel="next">character                                                        [Function]</a>, Previous: <a href="extended_002dchar.html" accesskey="p" rel="prev">extended-char                                                        [Type]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="char_003d_002c-char_002f_003d_002c-char_003c_002c-char_003e_002c-char_003c_003d_002c-char_003e_003d_002c"><span>13.2.5 char=, char/=, char&lt;, char&gt;, char&lt;=, char&gt;=,<a class="copiable-link" href="#char_003d_002c-char_002f_003d_002c-char_003c_002c-char_003e_002c-char_003c_003d_002c-char_003e_003d_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="char_002dequal_002c-char_002dnot_002dequal_002c-char_002dlessp_002c-char_002dgreaterp_002c-char_002dnot_002dgreaterp_002c"><span>char-equal, char-not-equal, char-lessp, char-greaterp, char-not-greaterp,<a class="copiable-link" href="#char_002dequal_002c-char_002dnot_002dequal_002c-char_002dlessp_002c-char_002dgreaterp_002c-char_002dnot_002dgreaterp_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="char_002dnot_002dlessp"><span>char-not-lessp<a class="copiable-link" href="#char_002dnot_002dlessp"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Function]</i>
+</p></div>
+<p><code class="code"><span class="r">char=</span></code>  <i class="i"><span class="r">&amp;rest</span> characters^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code"><span class="r">char/=</span></code>  <i class="i"><span class="r">&amp;rest</span> characters^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code"><span class="r">char&lt;</span></code>  <i class="i"><span class="r">&amp;rest</span> characters^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code"><span class="r">char&gt;</span></code>  <i class="i"><span class="r">&amp;rest</span> characters^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code"><span class="r">char&lt;=</span></code>  <i class="i"><span class="r">&amp;rest</span> characters^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code"><span class="r">char&gt;=</span></code>  <i class="i"><span class="r">&amp;rest</span> characters^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">char-equal</code>  <i class="i"><span class="r">&amp;rest</span> characters^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">char-not-equal</code>  <i class="i"><span class="r">&amp;rest</span> characters^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">char-lessp</code>  <i class="i"><span class="r">&amp;rest</span> characters^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">char-greaterp</code>  <i class="i"><span class="r">&amp;rest</span> characters^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">char-not-greaterp</code>  <i class="i"><span class="r">&amp;rest</span> characters^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">char-not-lessp</code>  <i class="i"><span class="r">&amp;rest</span> characters^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-258"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-258"> &para;</a></span></h4>
+
+<p><i class="i">character</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-354"><span>Description::<a class="copiable-link" href="#Description_003a_003a-354"> &para;</a></span></h4>
+
+<p>These predicates compare <i class="i">characters</i>.
+</p>
+<p><b class="b">char=</b> returns <i class="i">true</i> if all <i class="i">characters</i> are the <i class="i">same</i>;
+otherwise, it returns <i class="i">false</i>.
+</p>
+<p>If two <i class="i">characters</i> differ 
+in any <i class="i">implementation-defined</i> <i class="i">attributes</i>,
+then they are not <b class="b">char=</b>.
+</p>
+<p><b class="b">char/=</b> returns <i class="i">true</i> if all <i class="i">characters</i> are different;
+otherwise, it returns <i class="i">false</i>.
+</p>
+<p><b class="b">char&lt;</b> returns <i class="i">true</i> if the <i class="i">characters</i> are monotonically increasing; 
+otherwise, it returns <i class="i">false</i>.
+</p>
+<p>If two <i class="i">characters</i> 
+have <i class="i">identical</i> <i class="i">implementation-defined</i> <i class="i">attributes</i>, 
+then their ordering by <b class="b">char&lt;</b> is 
+consistent with the numerical ordering by the predicate <code class="t">&lt;</code> on their <i class="i">codes</i>.
+</p>
+<p><b class="b">char&gt;</b> returns <i class="i">true</i> if the <i class="i">characters</i> are monotonically decreasing; 
+otherwise, it returns <i class="i">false</i>.
+</p>
+<p>If two <i class="i">characters</i> have 
+<i class="i">identical</i> <i class="i">implementation-defined</i> <i class="i">attributes</i>,
+then their ordering by <b class="b">char&gt;</b> is 
+consistent with the numerical ordering by the predicate <code class="t">&gt;</code> on their <i class="i">codes</i>. 
+</p>
+<p><b class="b">char&lt;=</b> returns <i class="i">true</i> 
+if the <i class="i">characters</i> are monotonically nondecreasing; 
+otherwise, it returns <i class="i">false</i>.
+</p>
+<p>If two <i class="i">characters</i> have
+<i class="i">identical</i> <i class="i">implementation-defined</i> <i class="i">attributes</i>,
+then their ordering by <b class="b">char&lt;=</b> is
+consistent with the numerical ordering by the predicate <code class="t">&lt;=</code> on their <i class="i">codes</i>. 
+</p>
+<p><b class="b">char&gt;=</b> returns <i class="i">true</i> 
+if the <i class="i">characters</i> are monotonically nonincreasing; 
+otherwise, it returns <i class="i">false</i>.
+</p>
+<p>If two <i class="i">characters</i> have
+<i class="i">identical</i> <i class="i">implementation-defined</i> <i class="i">attributes</i>,
+then their ordering by <b class="b">char&gt;=</b> is 
+consistent with the numerical ordering by the predicate <code class="t">&gt;=</code> on their <i class="i">codes</i>. 
+</p>
+<p><b class="b">char-equal</b>,
+    <b class="b">char-not-equal</b>,
+    <b class="b">char-lessp</b>,
+    <b class="b">char-greaterp</b>,
+    <b class="b">char-not-greaterp</b>,
+and <b class="b">char-not-lessp</b>
+are similar to 
+    <b class="b">char=</b>,
+    <b class="b">char/=</b>,
+    <b class="b">char&lt;</b>,
+    <b class="b">char&gt;</b>,
+    <b class="b">char&lt;=</b>,
+    <b class="b">char&gt;=</b>,
+respectively,
+except that they ignore differences in <i class="i">case</i> and
+</p>
+<p>might have an <i class="i">implementation-defined</i> behavior 
+for <i class="i">non-simple</i> <i class="i">characters</i>.
+For example, an <i class="i">implementation</i> might define that 
+<b class="b">char-equal</b>, <i class="i">etc.</i> ignore certain 
+<i class="i">implementation-defined</i> <i class="i">attributes</i>.
+The effect, if any, 
+of each <i class="i">implementation-defined</i> <i class="i">attribute</i>
+upon these functions must be specified as part of the definition of that <i class="i">attribute</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-242"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-242"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (char= #\d #\d) &rArr;  <i class="i">true</i>
+ (char= #\A #\a) &rArr;  <i class="i">false</i>
+ (char= #\d #\x) &rArr;  <i class="i">false</i>
+ (char= #\d #\D) &rArr;  <i class="i">false</i>
+ (char/= #\d #\d) &rArr;  <i class="i">false</i>
+ (char/= #\d #\x) &rArr;  <i class="i">true</i>
+ (char/= #\d #\D) &rArr;  <i class="i">true</i>
+ (char= #\d #\d #\d #\d) &rArr;  <i class="i">true</i>
+ (char/= #\d #\d #\d #\d) &rArr;  <i class="i">false</i>
+ (char= #\d #\d #\x #\d) &rArr;  <i class="i">false</i>
+ (char/= #\d #\d #\x #\d) &rArr;  <i class="i">false</i>
+ (char= #\d #\y #\x #\c) &rArr;  <i class="i">false</i>
+ (char/= #\d #\y #\x #\c) &rArr;  <i class="i">true</i>
+ (char= #\d #\c #\d) &rArr;  <i class="i">false</i>
+ (char/= #\d #\c #\d) &rArr;  <i class="i">false</i>
+ (char&lt; #\d #\x) &rArr;  <i class="i">true</i>
+ (char&lt;= #\d #\x) &rArr;  <i class="i">true</i>
+ (char&lt; #\d #\d) &rArr;  <i class="i">false</i>
+ (char&lt;= #\d #\d) &rArr;  <i class="i">true</i>
+ (char&lt; #\a #\e #\y #\z) &rArr;  <i class="i">true</i>
+ (char&lt;= #\a #\e #\y #\z) &rArr;  <i class="i">true</i>
+ (char&lt; #\a #\e #\e #\y) &rArr;  <i class="i">false</i>
+ (char&lt;= #\a #\e #\e #\y) &rArr;  <i class="i">true</i>
+ (char&gt; #\e #\d) &rArr;  <i class="i">true</i>
+ (char&gt;= #\e #\d) &rArr;  <i class="i">true</i>
+ (char&gt; #\d #\c #\b #\a) &rArr;  <i class="i">true</i>
+ (char&gt;= #\d #\c #\b #\a) &rArr;  <i class="i">true</i>
+ (char&gt; #\d #\d #\c #\a) &rArr;  <i class="i">false</i>
+ (char&gt;= #\d #\d #\c #\a) &rArr;  <i class="i">true</i>
+ (char&gt; #\e #\d #\b #\c #\a) &rArr;  <i class="i">false</i>
+ (char&gt;= #\e #\d #\b #\c #\a) &rArr;  <i class="i">false</i>
+ (char&gt; #\z #\A) &rArr;  <i class="i">implementation-dependent</i>
+ (char&gt; #\Z #\a) &rArr;  <i class="i">implementation-dependent</i>
+ (char-equal #\A #\a) &rArr;  <i class="i">true</i>
+ (stable-sort (list #\b #\A #\B #\a #\c #\C) #'char-lessp)
+&rArr;  (#\A #\a #\b #\B #\c #\C)
+ (stable-sort (list #\b #\A #\B #\a #\c #\C) #'char&lt;)
+&rArr;  (#\A #\B #\C #\a #\b #\c) ;Implementation A
+&rArr;  (#\a #\b #\c #\A #\B #\C) ;Implementation B
+&rArr;  (#\a #\A #\b #\B #\c #\C) ;Implementation C
+&rArr;  (#\A #\a #\B #\b #\C #\c) ;Implementation D
+&rArr;  (#\A #\B #\a #\b #\C #\c) ;Implementation E
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-107"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-107"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">program-error</b> 
+		       if at least one <i class="i">character</i> is not supplied.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-284"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-284"> &para;</a></span></h4>
+
+<p><a class="ref" href="Character-Syntax.html">Character Syntax</a>,
+<a class="ref" href="Documentation-of-Implementation_002dDefined-Scripts.html">Documentation of Implementation-Defined Scripts</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-187"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-187"> &para;</a></span></h4>
+
+<p>If characters differ in their <i class="i">code</i> <i class="i">attribute</i> 
+or any <i class="i">implementation-defined</i> <i class="i">attribute</i>,
+they are considered to be different by <b class="b">char=</b>.
+</p>
+<p>There is no requirement that <code class="t">(eq c1 c2)</code> be true merely because
+<code class="t">(char= c1 c2)</code> is <i class="i">true</i>.  While <b class="b">eq</b> can distinguish two 
+<i class="i">characters</i>
+that <b class="b">char=</b> does not, it is distinguishing them not
+as <i class="i">characters</i>, but in some sense on the basis of a lower level
+implementation characteristic.
+If <code class="t">(eq c1 c2)</code> is <i class="i">true</i>,
+then <code class="t">(char= c1 c2)</code> is also true.
+<b class="b">eql</b> and <b class="b">equal</b>
+compare <i class="i">characters</i> in the same
+way that <b class="b">char=</b> does.
+</p>
+<p>The manner in which <i class="i">case</i> is used by 
+     <b class="b">char-equal</b>,
+     <b class="b">char-not-equal</b>,
+     <b class="b">char-lessp</b>,
+     <b class="b">char-greaterp</b>,
+     <b class="b">char-not-greaterp</b>,
+ and <b class="b">char-not-lessp</b>
+implies an ordering for <i class="i">standard characters</i> such that
+<code class="t">A=a</code>, <code class="t">B=b</code>, and so on, up to <code class="t">Z=z</code>, and furthermore either
+<code class="t">9&lt;A</code> or <code class="t">Z&lt;0</code>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="character.html">character                                                        [Function]</a>, Previous: <a href="extended_002dchar.html">extended-char                                                        [Type]</a>, Up: <a href="Characters-Dictionary.html">Characters Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/character-_0028System-Class_0029.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>character (System Class) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="character (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="character (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="base_002dchar.html" rel="next" title="base-char">
+<link href="Characters-Dictionary.html" rel="prev" title="Characters Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="character-_0028System-Class_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="base_002dchar.html" accesskey="n" rel="next">base-char                                                            [Type]</a>, Previous: <a href="Characters-Dictionary.html" accesskey="p" rel="prev">Characters Dictionary</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="character-_005bSystem-Class_005d"><span>13.2.1 character                                                    [System Class]<a class="copiable-link" href="#character-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-49"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-49"> &para;</a></span></h4>
+<p><b class="b">character</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-350"><span>Description::<a class="copiable-link" href="#Description_003a_003a-350"> &para;</a></span></h4>
+
+<p>A <i class="i">character</i> is an <i class="i">object</i> that 
+represents a unitary token in an aggregate quantity of text;
+see <a class="ref" href="Character-Concepts.html">Character Concepts</a>.
+</p>
+<p>The <i class="i">types</i> <b class="b">base-char</b> and <b class="b">extended-char</b>
+form an <i class="i">exhaustive partition</i> of the <i class="i">type</i> <b class="b">character</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-282"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-282"> &para;</a></span></h4>
+
+<p><a class="ref" href="Character-Concepts.html">Character Concepts</a>,
+<a class="ref" href="Sharpsign-Backslash.html">Sharpsign Backslash</a>,
+<a class="ref" href="Printing-Characters.html">Printing Characters</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/character.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>character (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="character (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="character (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="characterp.html" rel="next" title="characterp">
+<link href="char_003d.html" rel="prev" title="char=">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="character">
+<div class="nav-panel">
+<p>
+Next: <a href="characterp.html" accesskey="n" rel="next">characterp                                                       [Function]</a>, Previous: <a href="char_003d.html" accesskey="p" rel="prev">char=, char/=, char&lt;, char&gt;, char&lt;=, char&gt;=,</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="character-_005bFunction_005d"><span>13.2.6 character                                                        [Function]<a class="copiable-link" href="#character-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">character</code>  <i class="i">character</i> &rArr;  <i class="i">denoted-character</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-259"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-259"> &para;</a></span></h4>
+
+<p><i class="i">character</i>&mdash;a <i class="i">character designator</i>.
+</p>
+<p><i class="i">denoted-character</i>&mdash;a <i class="i">character</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-355"><span>Description::<a class="copiable-link" href="#Description_003a_003a-355"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">character</i> denoted by the <i class="i">character</i> <i class="i">designator</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-243"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-243"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (character #\a) &rArr;  #\a
+ (character &quot;a&quot;) &rArr;  #\a
+ (character 'a) &rArr;  #\A
+ (character '\a) &rArr;  #\a
+ (character 65.) is an error.
+ (character 'apple) is an error.
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-108"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-108"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">object</i> is not a <i class="i">character designator</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-285"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-285"> &para;</a></span></h4>
+
+<p><a class="ref" href="coerce.html">coerce                                                           [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-188"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-188"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (character <i class="i">object</i>) &equiv; (coerce <i class="i">object</i> 'character)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/characterp.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>characterp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="characterp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="characterp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="alpha_002dchar_002dp.html" rel="next" title="alpha-char-p">
+<link href="character.html" rel="prev" title="character">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="characterp">
+<div class="nav-panel">
+<p>
+Next: <a href="alpha_002dchar_002dp.html" accesskey="n" rel="next">alpha-char-p                                                     [Function]</a>, Previous: <a href="character.html" accesskey="p" rel="prev">character                                                        [Function]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="characterp-_005bFunction_005d"><span>13.2.7 characterp                                                       [Function]<a class="copiable-link" href="#characterp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">characterp</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-260"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-260"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-356"><span>Description::<a class="copiable-link" href="#Description_003a_003a-356"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">character</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-244"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-244"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (characterp #\a) &rArr;  <i class="i">true</i>
+ (characterp 'a) &rArr;  <i class="i">false</i>
+ (characterp &quot;a&quot;) &rArr;  <i class="i">false</i>
+ (characterp 65.) &rArr;  <i class="i">false</i>
+ (characterp #\Newline) &rArr;  <i class="i">true</i>
+ ;; This next example presupposes an implementation 
+ ;; in which #\Rubout is an implementation-defined character.
+ (characterp #\Rubout) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-286"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-286"> &para;</a></span></h4>
+
+<p><a class="ref" href="character.html">character                                                        [Function]</a>
+ (<i class="i">type</i> and <i class="i">function</i>), 
+<a class="ref" href="typep.html">typep                                                            [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-189"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-189"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (characterp <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'character)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/check_002dtype.html
@@ -0,0 +1,181 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>check-type (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="check-type (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="check-type (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="simple_002derror.html" rel="next" title="simple-error">
+<link href="cerror.html" rel="prev" title="cerror">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="check_002dtype">
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002derror.html" accesskey="n" rel="next">simple-error                                               [Condition Type]</a>, Previous: <a href="cerror.html" accesskey="p" rel="prev">cerror                                                           [Function]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="check_002dtype-_005bMacro_005d"><span>9.2.13 check-type                                                          [Macro]<a class="copiable-link" href="#check_002dtype-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">check-type</code>  <i class="i">place typespec <span class="r"><span class="r">[</span><i class="i">string</i><span class="r">]</span></span></i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-135"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-135"> &para;</a></span></h4>
+
+<p><i class="i">place</i>&mdash;a <i class="i">place</i>.
+</p>
+<p><i class="i">typespec</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<p><i class="i">string</i>&mdash;a <i class="i">string</i>; evaluated. 
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-183"><span>Description::<a class="copiable-link" href="#Description_003a_003a-183"> &para;</a></span></h4>
+
+<p><b class="b">check-type</b> signals a <i class="i">correctable</i> <i class="i">error</i> 
+of <i class="i">type</i> <b class="b">type-error</b> if the contents of <i class="i">place</i> are not 
+of the type <i class="i">typespec</i>.
+</p>
+<p><b class="b">check-type</b> can return only if the <b class="b">store-value</b> <i class="i">restart</i> is invoked,
+either explicitly from a handler 
+    or implicitly as one of the options offered by the debugger.
+If the <b class="b">store-value</b> <i class="i">restart</i> is invoked,
+<b class="b">check-type</b> stores the new value 
+that is the argument to the <i class="i">restart</i> invocation 
+(or that is prompted for interactively by the debugger)
+in <i class="i">place</i> and starts over, 
+checking the type of the new value
+and signaling another error if it is still not of the desired <i class="i">type</i>.
+</p>
+<p>The first time <i class="i">place</i> is <i class="i">evaluated</i>, 
+it is <i class="i">evaluated</i> by normal evaluation rules.
+It is later <i class="i">evaluated</i> as a <i class="i">place</i> 
+if the type check fails and the <b class="b">store-value</b> <i class="i">restart</i> is used;
+see <a class="ref" href="Evaluation-of-Subforms-to-Places.html">Evaluation of Subforms to Places</a>.
+</p>
+<p><i class="i">string</i> should be an English description of the type, 
+starting with an indefinite article (&ldquo;a&rdquo; or &ldquo;an&rdquo;).
+If <i class="i">string</i> is not supplied,
+it is computed automatically from <i class="i">typespec</i>.
+The automatically generated message mentions
+      <i class="i">place</i>,
+      its contents,
+  and the desired type.
+An implementation may choose to generate 
+a somewhat differently worded error message 
+if it recognizes that <i class="i">place</i> is of a particular form, 
+such as one of the arguments to the function that called <b class="b">check-type</b>.
+<i class="i">string</i> is allowed because some applications of <b class="b">check-type</b> 
+may require a more specific description of what is wanted
+than can be generated automatically from <i class="i">typespec</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-117"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-117"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq aardvarks '(sam harry fred))
+&rArr;  (SAM HARRY FRED)
+ (check-type aardvarks (array * (3)))
+<code class="t"> |&gt; </code> Error: The value of AARDVARKS, (SAM HARRY FRED),
+<code class="t"> |&gt; </code>        is not a 3-long array.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Specify a value to use instead.
+<code class="t"> |&gt; </code>  2: Return to Lisp Toplevel.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:CONTINUE 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Use Value: <b class="b">|&gt;&gt;</b><code class="t">#(SAM FRED HARRY)</code><b class="b">&lt;&lt;|</b>
+&rArr;  NIL
+ aardvarks
+&rArr;  #&lt;ARRAY-T-3 13571&gt;
+ (map 'list #'identity aardvarks)
+&rArr;  (SAM FRED HARRY)
+ (setq aardvark-count 'foo)
+&rArr;  FOO
+ (check-type aardvark-count (integer 0 *) &quot;A positive integer&quot;)
+<code class="t"> |&gt; </code> Error: The value of AARDVARK-COUNT, FOO, is not a positive integer.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Specify a value to use instead.
+<code class="t"> |&gt; </code>  2: Top level.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:CONTINUE 2</code><b class="b">&lt;&lt;|</b>
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (defmacro define-adder (name amount)
+   (check-type name (and symbol (not null)) &quot;a name for an adder function&quot;)
+   (check-type amount integer)
+   `(defun ,name (x) (+ x ,amount)))
+
+ (macroexpand '(define-adder add3 3))
+&rArr;  (defun add3 (x) (+ x 3))
+
+ (macroexpand '(define-adder 7 7))
+<code class="t"> |&gt; </code> Error: The value of NAME, 7, is not a name for an adder function.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Specify a value to use instead.
+<code class="t"> |&gt; </code>  2: Top level.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:Continue 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Specify a value to use instead.
+<code class="t"> |&gt; </code> Type a form to be evaluated and used instead: <b class="b">|&gt;&gt;</b><code class="t">'ADD7</code><b class="b">&lt;&lt;|</b>
+&rArr;  (defun add7 (x) (+ x 7))
+
+ (macroexpand '(define-adder add5 something))
+<code class="t"> |&gt; </code> Error: The value of AMOUNT, SOMETHING, is not an integer.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Specify a value to use instead.
+<code class="t"> |&gt; </code>  2: Top level.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:Continue 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Type a form to be evaluated and used instead: <b class="b">|&gt;&gt;</b><code class="t">5</code><b class="b">&lt;&lt;|</b>
+&rArr;  (defun add5 (x) (+ x 5))
+
+</pre></div>
+
+<p>Control is transferred to a handler.
+</p>
+<h4 class="subsubheading" id="Side-Effects_003a_003a-9"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-9"> &para;</a></span></h4>
+
+<p>The debugger might be entered.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-21"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-21"> &para;</a></span></h4>
+
+<p><b class="b">*break-on-signals*</b>
+</p>
+<p>The implementation.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-161"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-161"> &para;</a></span></h4>
+
+<p><a class="ref" href="Condition-System-Concepts.html">Condition System Concepts</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-100"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-100"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (check-type <i class="i">place</i> <i class="i">typespec</i>)
+ &equiv; (assert (typep <i class="i">place</i> '<i class="i">typespec</i>) (<i class="i">place</i>)
+            'type-error :datum <i class="i">place</i> :expected-type '<i class="i">typespec</i>)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002derror.html">simple-error                                               [Condition Type]</a>, Previous: <a href="cerror.html">cerror                                                           [Function]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/cis.html
@@ -0,0 +1,68 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>cis (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="cis (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="cis (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="complex.html" rel="next" title="complex">
+<link href="numberp.html" rel="prev" title="numberp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="cis">
+<div class="nav-panel">
+<p>
+Next: <a href="complex.html" accesskey="n" rel="next">complex                                                          [Function]</a>, Previous: <a href="numberp.html" accesskey="p" rel="prev">numberp                                                          [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="cis-_005bFunction_005d"><span>12.2.45 cis                                                              [Function]<a class="copiable-link" href="#cis-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">cis</code>  <i class="i">radians</i> &rArr;  <i class="i">number</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-228"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-228"> &para;</a></span></h4>
+
+<p><i class="i">radians</i>&mdash;a <i class="i">real</i>.
+</p>
+<p><i class="i">number</i>&mdash;a <i class="i">complex</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-310"><span>Description::<a class="copiable-link" href="#Description_003a_003a-310"> &para;</a></span></h4>
+
+<p><b class="b">cis</b> returns the value of~<i class="i">e</i>^<i class="i">i\cdot <i class="i">radians</i></i>,
+which is a <i class="i">complex</i> in which the
+real part is equal to the cosine of <i class="i">radians</i>, and the 
+imaginary part is equal to the sine of <i class="i">radians</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-213"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-213"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (cis 0) &rArr;  #C(1.0 0.0)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-262"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-262"> &para;</a></span></h4>
+
+<p><a class="ref" href="Rule-of-Float-Substitutability.html">Rule of Float Substitutability</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/class.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>class (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="class (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="class (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="built_002din_002dclass.html" rel="next" title="built-in-class">
+<link href="standard_002dgeneric_002dfunction.html" rel="prev" title="standard-generic-function">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="class">
+<div class="nav-panel">
+<p>
+Next: <a href="built_002din_002dclass.html" accesskey="n" rel="next">built-in-class                                               [System Class]</a>, Previous: <a href="standard_002dgeneric_002dfunction.html" accesskey="p" rel="prev">standard-generic-function                                    [System Class]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="class-_005bSystem-Class_005d"><span>4.4.7 class                                                        [System Class]<a class="copiable-link" href="#class-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-3"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-3"> &para;</a></span></h4>
+<p><b class="b">class</b>,
+</p>
+<p><b class="b">standard-object</b>,
+</p>
+<p><b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-36"><span>Description::<a class="copiable-link" href="#Description_003a_003a-36"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">class</b> represents <i class="i">objects</i> that determine the structure 
+and behavior of their <i class="i">instances</i>. Associated with an <i class="i">object</i>
+of <i class="i">type</i> <b class="b">class</b> is information describing its place in the 
+directed acyclic graph of <i class="i">classes</i>, its <i class="i">slots</i>, and its options.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/class_002dname.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>class-name (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="class-name (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="class-name (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="setf-class_002dname.html" rel="next" title="setf class-name">
+<link href="initialize_002dinstance.html" rel="prev" title="initialize-instance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="class_002dname">
+<div class="nav-panel">
+<p>
+Next: <a href="setf-class_002dname.html" accesskey="n" rel="next">setf class-name                               [Standard Generic Function]</a>, Previous: <a href="initialize_002dinstance.html" accesskey="p" rel="prev">initialize-instance                             [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="class_002dname-_005bStandard-Generic-Function_005d"><span>7.7.37 class-name                                      [Standard Generic Function]<a class="copiable-link" href="#class_002dname-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-34"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-34"> &para;</a></span></h4>
+
+<p><code class="code">class-name</code>  <i class="i">class</i> &rArr;  <i class="i">name</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-20"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-20"> &para;</a></span></h4>
+
+<p><code class="code">class-name</code>  <i class="i"><span class="r">(</span><i class="i">class</i> <b class="b">class</b><span class="r">)</span></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-125"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-125"> &para;</a></span></h4>
+
+<p><i class="i">class</i>&mdash;a <i class="i">class</i> <i class="i">object</i>.
+</p>
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-164"><span>Description::<a class="copiable-link" href="#Description_003a_003a-164"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">name</i> of the given <i class="i">class</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-146"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-146"> &para;</a></span></h4>
+
+<p><a class="ref" href="find_002dclass.html">find-class                                                       [Accessor]</a>
+,
+<a class="ref" href="Classes.html">Classes</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-91"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-91"> &para;</a></span></h4>
+
+<p>If S is a <i class="i">symbol</i> such that S =<code class="t">(class-name C)</code>
+and C =<code class="t">(find-class S)</code>, then S is the proper name of C.
+For further discussion, see <a class="ref" href="Classes.html">Classes</a>.
+</p>
+<p>The name of an anonymous <i class="i">class</i> is <b class="b">nil</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/class_002dof.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>class-of (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="class-of (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="class-of (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="unbound_002dslot.html" rel="next" title="unbound-slot">
+<link href="setf-class_002dname.html" rel="prev" title="setf class-name">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="class_002dof">
+<div class="nav-panel">
+<p>
+Next: <a href="unbound_002dslot.html" accesskey="n" rel="next">unbound-slot                                               [Condition Type]</a>, Previous: <a href="setf-class_002dname.html" accesskey="p" rel="prev">setf class-name                               [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="class_002dof-_005bFunction_005d"><span>7.7.39 class-of                                                         [Function]<a class="copiable-link" href="#class_002dof-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">class-of</code>  <i class="i">object</i> &rArr;  <i class="i">class</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-127"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-127"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">class</i>&mdash;a <i class="i">class</i> <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-166"><span>Description::<a class="copiable-link" href="#Description_003a_003a-166"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">class</i> of which the <i class="i">object</i> is 
+a <i class="i">direct instance</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-112"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-112"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (class-of 'fred) &rArr;  #&lt;BUILT-IN-CLASS SYMBOL 610327300&gt;
+ (class-of 2/3) &rArr;  #&lt;BUILT-IN-CLASS RATIO 610326642&gt;
+
+ (defclass book () ()) &rArr;  #&lt;STANDARD-CLASS BOOK 33424745&gt;
+ (class-of (make-instance 'book)) &rArr;  #&lt;STANDARD-CLASS BOOK 33424745&gt;
+
+ (defclass novel (book) ()) &rArr;  #&lt;STANDARD-CLASS NOVEL 33424764&gt;
+ (class-of (make-instance 'novel)) &rArr;  #&lt;STANDARD-CLASS NOVEL 33424764&gt;
+
+ (defstruct kons kar kdr) &rArr;  KONS
+ (class-of (make-kons :kar 3 :kdr 4)) &rArr;  #&lt;STRUCTURE-CLASS KONS 250020317&gt;
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-148"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-148"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dinstance.html">make-instance                                   [Standard Generic Function]</a>
+,
+<a class="ref" href="type_002dof.html">type-of                                                          [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/clear_002dinput.html
@@ -0,0 +1,117 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>clear-input (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="clear-input (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="clear-input (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="finish_002doutput.html" rel="next" title="finish-output">
+<link href="listen.html" rel="prev" title="listen">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="clear_002dinput">
+<div class="nav-panel">
+<p>
+Next: <a href="finish_002doutput.html" accesskey="n" rel="next">finish-output, force-output, clear-output                        [Function]</a>, Previous: <a href="listen.html" accesskey="p" rel="prev">listen                                                           [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="clear_002dinput-_005bFunction_005d"><span>21.2.35 clear-input                                                      [Function]<a class="copiable-link" href="#clear_002dinput-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">clear-input</code>  <i class="i"><span class="r">&amp;optional</span> input-stream</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-436"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-436"> &para;</a></span></h4>
+
+<p><i class="i">input-stream</i>&mdash;an <i class="i">input</i> <i class="i">stream designator</i>.
+  The default is <i class="i">standard input</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-566"><span>Description::<a class="copiable-link" href="#Description_003a_003a-566"> &para;</a></span></h4>
+
+<p>Clears any available input from <i class="i">input-stream</i>.
+</p>
+<p>If <b class="b">clear-input</b> does not make sense for <i class="i">input-stream</i>, 
+then <b class="b">clear-input</b> does nothing. 
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-412"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-412"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted">;; The exact I/O behavior of this example might vary from implementation
+;; to implementation depending on the kind of interactive buffering that
+;; occurs.  (The call to SLEEP here is intended to help even out the 
+;; differences in implementations which do not do line-at-a-time buffering.)
+
+(defun read-sleepily (&amp;optional (clear-p nil) (zzz 0))
+  (list (progn (print '&gt;) (read))
+        ;; Note that input typed within the first ZZZ seconds 
+        ;; will be discarded.
+        (progn (print '&gt;) 
+               (if zzz (sleep zzz))
+               (print '&gt;&gt;)
+               (if clear-p (clear-input))
+               (read))))
+
+(read-sleepily)
+<code class="t"> |&gt; </code> &gt; <b class="b">|&gt;&gt;</b><code class="t">10</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> &gt;
+<code class="t"> |&gt; </code> &gt;&gt; <b class="b">|&gt;&gt;</b><code class="t">20</code><b class="b">&lt;&lt;|</b>
+&rArr;  (10 20)
+
+(read-sleepily t)
+<code class="t"> |&gt; </code> &gt; <b class="b">|&gt;&gt;</b><code class="t">10</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> &gt;
+<code class="t"> |&gt; </code> &gt;&gt; <b class="b">|&gt;&gt;</b><code class="t">20</code><b class="b">&lt;&lt;|</b>
+&rArr;  (10 20)
+
+(read-sleepily t 10)
+<code class="t"> |&gt; </code> &gt; <b class="b">|&gt;&gt;</b><code class="t">10</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> &gt; <b class="b">|&gt;&gt;</b><code class="t">20</code><b class="b">&lt;&lt;|</b>  ; Some implementations won't echo typeahead here.
+<code class="t"> |&gt; </code> &gt;&gt; <b class="b">|&gt;&gt;</b><code class="t">30</code><b class="b">&lt;&lt;|</b>
+&rArr;  (10 30)
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-70"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-70"> &para;</a></span></h4>
+
+<p>The <i class="i">input-stream</i> is modified.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-94"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-94"> &para;</a></span></h4>
+
+<p><b class="b">*standard-input*</b>
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-209"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-209"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">input-stream</i> is not a <i class="i">stream designator</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-462"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-462"> &para;</a></span></h4>
+
+<p><b class="b">clear-output</b>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="finish_002doutput.html">finish-output, force-output, clear-output                        [Function]</a>, Previous: <a href="listen.html">listen                                                           [Function]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/close.html
@@ -0,0 +1,119 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>close (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="close (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="close (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="with_002dopen_002dstream.html" rel="next" title="with-open-stream">
+<link href="with_002dopen_002dfile.html" rel="prev" title="with-open-file">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="close">
+<div class="nav-panel">
+<p>
+Next: <a href="with_002dopen_002dstream.html" accesskey="n" rel="next">with-open-stream                                                    [Macro]</a>, Previous: <a href="with_002dopen_002dfile.html" accesskey="p" rel="prev">with-open-file                                                      [macro]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="close-_005bFunction_005d"><span>21.2.32 close                                                            [Function]<a class="copiable-link" href="#close-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">close</code>  <i class="i">stream <span class="r">&amp;key</span> abort</i> &rArr;  <i class="i">result</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-433"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-433"> &para;</a></span></h4>
+
+<p><i class="i">stream</i>&mdash;a <i class="i">stream</i> (either <i class="i">open</i> or <i class="i">closed</i>).
+</p>
+<p><i class="i">abort</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">false</i>.
+</p>
+<p><i class="i">result</i>&mdash;<b class="b">t</b> if the <i class="i">stream</i> was <i class="i">open</i> at the time it was
+		     received as an <i class="i">argument</i>,
+		 or <i class="i">implementation-dependent</i> otherwise.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-563"><span>Description::<a class="copiable-link" href="#Description_003a_003a-563"> &para;</a></span></h4>
+
+<p><b class="b">close</b> closes <i class="i">stream</i>. 
+Closing a <i class="i">stream</i> means
+that it may no longer be used in input or output operations.
+The act of <i class="i">closing</i> a <i class="i">file stream</i>
+ends the association between the <i class="i">stream</i> and its associated <i class="i">file</i>; 
+the transaction with the <i class="i">file system</i> is terminated,
+and input/output may no longer be performed on the <i class="i">stream</i>. 
+</p>
+<p>If <i class="i">abort</i> is <i class="i">true</i>, an attempt is made to clean up any side
+effects of having created <i class="i">stream</i>.
+If <i class="i">stream</i> performs output to a file
+that was created when the <i class="i">stream</i> was created, the
+file is deleted and any previously existing file is not superseded.
+</p>
+<p>It is permissible to close an already closed <i class="i">stream</i>,
+but in that case the <i class="i">result</i> is <i class="i">implementation-dependent</i>.
+</p>
+<p>After <i class="i">stream</i> is closed, it is still possible to perform 
+the following query operations upon it:
+</p>
+<p><b class="b">streamp</b>, <b class="b">pathname</b>, <b class="b">truename</b>, 
+<b class="b">merge-pathnames</b>, <b class="b">pathname-host</b>, <b class="b">pathname-device</b>,
+<b class="b">pathname-directory</b>,<b class="b">pathname-name</b>, 
+<b class="b">pathname-type</b>, <b class="b">pathname-version</b>, <b class="b">namestring</b>, 
+<b class="b">file-namestring</b>, <b class="b">directory-namestring</b>, 
+<b class="b">host-namestring</b>, <b class="b">enough-namestring</b>, <b class="b">open</b>,
+<b class="b">probe-file</b>, and <b class="b">directory</b>. 
+</p>
+<p>The effect of <b class="b">close</b> on a <i class="i">constructed stream</i> is 
+ to close the argument <i class="i">stream</i> only. 
+There is no effect on the <i class="i">constituents</i> of <i class="i">composite streams</i>.
+</p>
+<p>For a <i class="i">stream</i> created with <b class="b">make-string-output-stream</b>,
+the result of <b class="b">get-output-stream-string</b> is unspecified after <b class="b">close</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-409"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-409"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq s (make-broadcast-stream)) &rArr;  #&lt;BROADCAST-STREAM&gt;
+ (close s) &rArr;  T
+ (output-stream-p s) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-68"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-68"> &para;</a></span></h4>
+
+<p>The <i class="i">stream</i> is <i class="i">closed</i> (if necessary).
+If <i class="i">abort</i> is <i class="i">true</i> and the <i class="i">stream</i> is
+an <i class="i">output</i> <i class="i">file stream</i>, its associated <i class="i">file</i>
+might be deleted.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-459"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-459"> &para;</a></span></h4>
+
+<p><a class="ref" href="open.html">open                                                             [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="with_002dopen_002dstream.html">with-open-stream                                                    [Macro]</a>, Previous: <a href="with_002dopen_002dfile.html">with-open-file                                                      [macro]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/clrhash.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>clrhash (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="clrhash (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="clrhash (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Tables-Dictionary.html" rel="up" title="Hash Tables Dictionary">
+<link href="sxhash.html" rel="next" title="sxhash">
+<link href="with_002dhash_002dtable_002diterator.html" rel="prev" title="with-hash-table-iterator">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="clrhash">
+<div class="nav-panel">
+<p>
+Next: <a href="sxhash.html" accesskey="n" rel="next">sxhash                                                           [Function]</a>, Previous: <a href="with_002dhash_002dtable_002diterator.html" accesskey="p" rel="prev">with-hash-table-iterator                                            [Macro]</a>, Up: <a href="Hash-Tables-Dictionary.html" accesskey="u" rel="up">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="clrhash-_005bFunction_005d"><span>18.2.13 clrhash                                                          [Function]<a class="copiable-link" href="#clrhash-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">clrhash</code>  <i class="i">hash-table</i> &rArr;  <i class="i">hash-table</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-387"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-387"> &para;</a></span></h4>
+
+<p><i class="i">hash-table</i>&mdash;a <i class="i">hash table</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-503"><span>Description::<a class="copiable-link" href="#Description_003a_003a-503"> &para;</a></span></h4>
+
+<p>Removes all entries from <i class="i">hash-table</i>,
+and then returns that empty <i class="i">hash table</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-367"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-367"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq table (make-hash-table)) &rArr;  #&lt;HASH-TABLE EQL 0/120 32004073&gt;
+ (dotimes (i 100) (setf (gethash i table) (format nil &quot;~R&quot; i))) &rArr;  NIL
+ (hash-table-count table) &rArr;  100
+ (gethash 57 table) &rArr;  &quot;fifty-seven&quot;, <i class="i">true</i>
+ (clrhash table) &rArr;  #&lt;HASH-TABLE EQL 0/120 32004073&gt;
+ (hash-table-count table) &rArr;  0
+ (gethash 57 table) &rArr;  NIL, <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-59"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-59"> &para;</a></span></h4>
+
+<p>The <i class="i">hash-table</i> is modified.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/code_002dchar.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>code-char (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="code-char (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="code-char (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="char_002dcode_002dlimit.html" rel="next" title="char-code-limit">
+<link href="char_002dint.html" rel="prev" title="char-int">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="code_002dchar">
+<div class="nav-panel">
+<p>
+Next: <a href="char_002dcode_002dlimit.html" accesskey="n" rel="next">char-code-limit                                         [Constant Variable]</a>, Previous: <a href="char_002dint.html" accesskey="p" rel="prev">char-int                                                         [Function]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="code_002dchar-_005bFunction_005d"><span>13.2.18 code-char                                                        [Function]<a class="copiable-link" href="#code_002dchar-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">code-char</code>  <i class="i">code</i> &rArr;  <i class="i">char-p</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-271"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-271"> &para;</a></span></h4>
+
+<p><i class="i">code</i>&mdash;a <i class="i">character code</i>.
+</p>
+<p><i class="i">char-p</i>&mdash;a <i class="i">character</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-367"><span>Description::<a class="copiable-link" href="#Description_003a_003a-367"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">character</i> with the <i class="i">code</i> <i class="i">attribute</i> given by <i class="i">code</i>.
+If no such <i class="i">character</i> exists and one cannot be created, <b class="b">nil</b> is returned.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-255"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-255"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">(code-char 65.) &rArr;  #\A  ;in an implementation using ASCII codes
+(code-char (char-code #\Space)) &rArr;  #\Space  ;in any implementation
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-62"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-62"> &para;</a></span></h4>
+
+<p>The <i class="i">implementation</i>&rsquo;s character encoding.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-296"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-296"> &para;</a></span></h4>
+
+<p><a class="ref" href="char_002dcode.html">char-code                                                        [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-194"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-194"> &para;</a></span></h4>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/coerce.html
@@ -0,0 +1,213 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>coerce (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="coerce (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="coerce (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="deftype.html" rel="next" title="deftype">
+<link href="eql-_0028Type-Specifier_0029.html" rel="prev" title="eql (Type Specifier)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="coerce">
+<div class="nav-panel">
+<p>
+Next: <a href="deftype.html" accesskey="n" rel="next">deftype                                                             [Macro]</a>, Previous: <a href="eql-_0028Type-Specifier_0029.html" accesskey="p" rel="prev">eql                                                        [Type Specifier]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="coerce-_005bFunction_005d"><span>4.4.24 coerce                                                           [Function]<a class="copiable-link" href="#coerce-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">coerce</code>  <i class="i">object result-type</i> &rArr;  <i class="i">result</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-19"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-19"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">result-type</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<p><i class="i">result</i>&mdash;an <i class="i">object</i>, of <i class="i">type</i> <i class="i">result-type</i>
+  except in situations described in <a class="ref" href="Rule-of-Canonical-Representation-for-Complex-Rationals.html">Rule of Canonical Representation for Complex Rationals</a>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-46"><span>Description::<a class="copiable-link" href="#Description_003a_003a-46"> &para;</a></span></h4>
+
+<p><i class="i">Coerces</i> the <i class="i">object</i> to <i class="i">type</i> <i class="i">result-type</i>.
+</p>
+<p>If <i class="i">object</i> is already of <i class="i">type</i> <i class="i">result-type</i>,
+the <i class="i">object</i> itself is returned, regardless of whether it
+would have been possible in general to coerce an <i class="i">object</i> of 
+some other <i class="i">type</i> to <i class="i">result-type</i>.
+</p>
+<p>Otherwise, the <i class="i">object</i> is <i class="i">coerced</i> to <i class="i">type</i> <i class="i">result-type</i>
+according to the following rules:
+</p>
+<dl class="table">
+<dt><b class="b">sequence</b></dt>
+<dd>
+<p>If the <i class="i">result-type</i> is a <i class="i">recognizable subtype</i> of <b class="b">list</b>,
+and the <i class="i">object</i> is a <i class="i">sequence</i>,
+then the <i class="i">result</i> is a <i class="i">list</i> 
+that has the <i class="i">same</i> <i class="i">elements</i> as <i class="i">object</i>.
+</p>
+<p>If the <i class="i">result-type</i> is a <i class="i">recognizable subtype</i> of <b class="b">vector</b>,
+and the <i class="i">object</i> is a <i class="i">sequence</i>,
+then the <i class="i">result</i> is a <i class="i">vector</i> 
+that has the <i class="i">same</i> <i class="i">elements</i> as <i class="i">object</i>.
+If <i class="i">result-type</i> is a specialized <i class="i">type</i>, 
+the <i class="i">result</i> has an <i class="i">actual array element type</i> that is the result of
+<i class="i">upgrading</i> the element type part of that <i class="i">specialized</i> <i class="i">type</i>.
+If no element type is specified, the element type defaults to <b class="b">t</b>.
+If the <i class="i">implementation</i> cannot determine the element type, an error is signaled.
+</p>
+</dd>
+<dt><b class="b">character</b></dt>
+<dd><p>If the <i class="i">result-type</i> is <b class="b">character</b>
+and the <i class="i">object</i> is a <i class="i">character designator</i>,
+the <i class="i">result</i> is the <i class="i">character</i> it denotes.
+</p>
+</dd>
+<dt><b class="b">complex</b></dt>
+<dd><p>If the <i class="i">result-type</i> is <b class="b">complex</b> 
+and the <i class="i">object</i> is a <i class="i">number</i>,
+then the <i class="i">result</i> is obtained by constructing a <i class="i">complex</i>
+whose real part is the <i class="i">object</i> and
+whose imaginary part is the result of <i class="i">coercing</i> an <i class="i">integer</i> zero
+to the <i class="i">type</i> of the <i class="i">object</i> (using <b class="b">coerce</b>).
+(If the real part is a <i class="i">rational</i>, however, 
+then the result must be represented as a <i class="i">rational</i> rather
+than a <i class="i">complex</i>; see <a class="ref" href="Rule-of-Canonical-Representation-for-Complex-Rationals.html">Rule of Canonical Representation for Complex Rationals</a>.
+So, for example, <code class="t">(coerce 3 'complex)</code> is permissible,
+but will return <code class="t">3</code>, which is not a <i class="i">complex</i>.)
+</p>
+</dd>
+<dt><b class="b">float</b></dt>
+<dd><p>If the <i class="i">result-type</i> is any of <b class="b">float</b>,
+ <b class="b">short-float</b>, 
+ <b class="b">single-float</b>, 
+ <b class="b">double-float</b>, 
+ <b class="b">long-float</b>,
+and the <i class="i">object</i> is a 
+</p>
+<p><i class="i">real</i>,
+</p>
+<p>then the <i class="i">result</i> is a <i class="i">float</i> of <i class="i">type</i> <i class="i">result-type</i>
+which is equal in sign and magnitude to the <i class="i">object</i> to whatever degree of
+representational precision is permitted by that <i class="i">float</i> representation.
+(If the <i class="i">result-type</i> is <b class="b">float</b>
+and <i class="i">object</i> is not already a <i class="i">float</i>, 
+then the <i class="i">result</i> is a <i class="i">single float</i>.)
+</p>
+</dd>
+<dt><b class="b">function</b></dt>
+<dd><p>If the <i class="i">result-type</i> is <b class="b">function</b>,
+and <i class="i">object</i> is any 
+</p>
+<p><i class="i">function name</i>
+</p>
+<p>that is <i class="i">fbound</i> 
+but that is globally defined neither as a <i class="i">macro name</i> nor as a <i class="i">special operator</i>,
+then the <i class="i">result</i> is the <i class="i">functional value</i> of <i class="i">object</i>.
+</p>
+<p>If the <i class="i">result-type</i> is <b class="b">function</b>,
+and <i class="i">object</i> is a <i class="i">lambda expression</i>,
+then the <i class="i">result</i> is a <i class="i">closure</i> of <i class="i">object</i>
+in the <i class="i">null lexical environment</i>.
+</p>
+</dd>
+<dt><b class="b">t</b></dt>
+<dd><p>Any <i class="i">object</i> can be <i class="i">coerced</i> to an <i class="i">object</i> of <i class="i">type</i> <b class="b">t</b>.
+In this case, the <i class="i">object</i> is simply returned.
+</p>
+</dd>
+</dl>
+
+<h4 class="subsubheading" id="Examples_003a_003a-26"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-26"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (coerce '(a b c) 'vector) &rArr;  #(A B C)
+ (coerce 'a 'character) &rArr;  #\A
+ (coerce 4.56 'complex) &rArr;  #C(4.56 0.0)
+ (coerce 4.5s0 'complex) &rArr;  #C(4.5s0 0.0s0)
+ (coerce 7/2 'complex) &rArr;  7/2
+ (coerce 0 'short-float) &rArr;  0.0s0
+ (coerce 3.5L0 'float) &rArr;  3.5L0
+ (coerce 7/2 'float) &rArr;  3.5
+ (coerce (cons 1 2) t) &rArr;  (1 . 2)
+</pre></div>
+
+<p>All the following <i class="i">forms</i> should signal an error:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (coerce '(a b c) '(vector * 4))
+ (coerce #(a b c) '(vector * 4))
+ (coerce '(a b c) '(vector * 2))
+ (coerce #(a b c) '(vector * 2))
+ (coerce &quot;foo&quot; '(string 2))
+ (coerce #(#\a #\b #\c) '(string 2))
+ (coerce '(0 1) '(simple-bit-vector 3))
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-8"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-8"> &para;</a></span></h4>
+
+<p>If a coercion is not possible, an error of <i class="i">type</i> <b class="b">type-error</b> is signaled.
+</p>
+<p><code class="t">(coerce x 'nil)</code> always signals an error of <i class="i">type</i> <b class="b">type-error</b>.
+</p>
+<p>An error
+of <i class="i">type</i> <b class="b">error</b> is signaled
+if the <i class="i">result-type</i> is <b class="b">function</b> but
+<i class="i">object</i> is a <i class="i">symbol</i> that is not <i class="i">fbound</i> or
+if the <i class="i">symbol</i> names a <i class="i">macro</i> or a <i class="i">special operator</i>.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">type-error</b> should be signaled if <i class="i">result-type</i>
+specifies the number of elements and <i class="i">object</i> is of a different length.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-33"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-33"> &para;</a></span></h4>
+
+<p><a class="ref" href="rational-_0028Function_0029.html">rational, rationalize                                            [Function]</a>
+, 
+<a class="ref" href="floor.html">floor, ffloor, ceiling, fceiling,</a>
+, 
+<a class="ref" href="char_002dcode.html">char-code                                                        [Function]</a>
+, 
+<a class="ref" href="char_002dint.html">char-int                                                         [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-20"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-20"> &para;</a></span></h4>
+
+<p>Coercions from <i class="i">floats</i> to <i class="i">rationals</i> 
+and from <i class="i">ratios</i> to <i class="i">integers</i> 
+are not provided because of rounding problems.  
+</p>
+<div class="example">
+<pre class="example-preformatted"> (coerce x 't) &equiv; (identity x) &equiv; x
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="deftype.html">deftype                                                             [Macro]</a>, Previous: <a href="eql-_0028Type-Specifier_0029.html">eql                                                        [Type Specifier]</a>, Up: <a href="Types-and-Classes-Dictionary.html">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/compile.html
@@ -0,0 +1,147 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>compile (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="compile (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="compile (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="eval.html" rel="next" title="eval">
+<link href="lambda.html" rel="prev" title="lambda">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="compile">
+<div class="nav-panel">
+<p>
+Next: <a href="eval.html" accesskey="n" rel="next">eval                                                             [Function]</a>, Previous: <a href="lambda.html" accesskey="p" rel="prev">lambda                                                              [Macro]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="compile-_005bFunction_005d"><span>3.8.3 compile                                                          [Function]<a class="copiable-link" href="#compile-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">compile</code>  <i class="i">name <span class="r">&amp;optional</span> definition</i> &rArr;  <i class="i">function, warnings-p, failure-p</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-1"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-1"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">function name</i>, or <b class="b">nil</b>.
+</p>
+<p><i class="i">definition</i>&mdash;a <i class="i">lambda expression</i> or a <i class="i">function</i>.
+  The default is the function definition of <i class="i">name</i> if it names a <i class="i">function</i>,
+	   or the <i class="i">macro function</i> of <i class="i">name</i> if it names a <i class="i">macro</i>.
+  The consequences are undefined if no <i class="i">definition</i> is supplied
+  when the <i class="i">name</i> is <b class="b">nil</b>.
+</p>
+<p><i class="i">function</i>&mdash;the <i class="i">function-name</i>,
+</p>
+<p>or a <i class="i">compiled function</i>.
+</p>
+<p><i class="i">warnings-p</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">failure-p</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-2"><span>Description::<a class="copiable-link" href="#Description_003a_003a-2"> &para;</a></span></h4>
+
+<p>Compiles an <i class="i">interpreted function</i>.
+</p>
+<p><b class="b">compile</b> produces a <i class="i">compiled function</i> from <i class="i">definition</i>.
+If the <i class="i">definition</i> is a <i class="i">lambda expression</i>,
+it is coerced to a <i class="i">function</i>.  
+</p>
+<p>If the <i class="i">definition</i> is already a <i class="i">compiled function</i>,
+<b class="b">compile</b> either produces that function itself (<i class="i">i.e.</i>, is an identity operation)
+or an equivalent function.
+</p>
+<p>[Editorial Note by KMP: There are a number of ambiguities here that still need resolution.]
+If the <i class="i">name</i> is <b class="b">nil</b>,
+the resulting <i class="i">compiled function</i> is returned directly as the <i class="i">primary value</i>.
+If a <i class="i">non-nil</i> <i class="i">name</i> is given, 
+then the resulting <i class="i">compiled function</i> replaces 
+the existing <i class="i">function</i> definition of <i class="i">name</i>
+and the <i class="i">name</i> is returned as the <i class="i">primary value</i>;
+if <i class="i">name</i> is a <i class="i">symbol</i> that names a <i class="i">macro</i>,
+its <i class="i">macro function</i> is updated
+and the <i class="i">name</i> is returned as the <i class="i">primary value</i>.
+</p>
+<p><i class="i">Literal objects</i> appearing in code processed by 
+the <b class="b">compile</b> function are neither copied nor <i class="i">coalesced</i>.
+The code resulting from the execution of <b class="b">compile</b> 
+references <i class="i">objects</i> that are <b class="b">eql</b> to the corresponding
+<i class="i">objects</i> in the source code.  
+</p>
+<p><b class="b">compile</b> is permitted, but not required, to <i class="i">establish</i>
+a <i class="i">handler</i> for <i class="i">conditions</i> of <i class="i">type</i> <b class="b">error</b>.
+For example, the <i class="i">handler</i> might issue a warning and 
+restart compilation from some <i class="i">implementation-dependent</i> point 
+in order to let the compilation proceed without manual intervention.
+</p>
+<p>The <i class="i">secondary value</i>, <i class="i">warnings-p</i>, is <i class="i">false</i>
+if no <i class="i">conditions</i> of <i class="i">type</i> <b class="b">error</b> or <b class="b">warning</b>
+were detected by the compiler, and <i class="i">true</i> otherwise.
+</p>
+<p>The <i class="i">tertiary value</i>, <i class="i">failure-p</i>, is <i class="i">false</i>
+if no <i class="i">conditions</i> of <i class="i">type</i> <b class="b">error</b> or <b class="b">warning</b>
+(other than <b class="b">style-warning</b>)
+were detected by the compiler, and <i class="i">true</i> otherwise.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-1"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-1"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun foo () &quot;bar&quot;) &rArr;  FOO
+ (compiled-function-p #'foo) &rArr;  <i class="i">implementation-dependent</i>
+ (compile 'foo) &rArr;  FOO 
+ (compiled-function-p #'foo) &rArr;  <i class="i">true</i>
+ (setf (symbol-function 'foo)
+       (compile nil '(lambda () &quot;replaced&quot;))) &rArr;  #&lt;Compiled-Function&gt;
+ (foo) &rArr;  &quot;replaced&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a"> &para;</a></span></h4>
+
+<p><b class="b">*error-output*</b>,
+</p>
+<p><b class="b">*macroexpand-hook*</b>.
+</p>
+<p>The presence of macro definitions and proclamations.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a"> &para;</a></span></h4>
+
+<p>The consequences are undefined if the <i class="i">lexical environment</i> surrounding the
+<i class="i">function</i> to be compiled contains any <i class="i">bindings</i> other than those for
+<i class="i">macros</i>, <i class="i">symbol macros</i>, or <i class="i">declarations</i>.
+</p>
+<p>For information about errors detected during the compilation process, 
+see <a class="ref" href="Exceptional-Situations-in-the-Compiler.html">Exceptional Situations in the Compiler</a>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-2"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-2"> &para;</a></span></h4>
+
+<p><a class="ref" href="compile_002dfile.html">compile-file                                                     [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="eval.html">eval                                                             [Function]</a>, Previous: <a href="lambda.html">lambda                                                              [Macro]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/compile_002dfile.html
@@ -0,0 +1,190 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>compile-file (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="compile-file (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="compile-file (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="System-Construction-Dictionary.html" rel="up" title="System Construction Dictionary">
+<link href="compile_002dfile_002dpathname.html" rel="next" title="compile-file-pathname">
+<link href="System-Construction-Dictionary.html" rel="prev" title="System Construction Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="compile_002dfile">
+<div class="nav-panel">
+<p>
+Next: <a href="compile_002dfile_002dpathname.html" accesskey="n" rel="next">compile-file-pathname                                            [Function]</a>, Previous: <a href="System-Construction-Dictionary.html" accesskey="p" rel="prev">System Construction Dictionary</a>, Up: <a href="System-Construction-Dictionary.html" accesskey="u" rel="up">System Construction Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="compile_002dfile-_005bFunction_005d"><span>24.2.1 compile-file                                                     [Function]<a class="copiable-link" href="#compile_002dfile-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">compile-file</code>  <i class="i">input-file <span class="r">&amp;key</span> output-file verbose
+					         print external-format</i><br>
+   &rArr;  <i class="i">output-truename, warnings-p, failure-p</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-482"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-482"> &para;</a></span></h4>
+
+<p><i class="i">input-file</i>&mdash;a <i class="i">pathname designator</i>.
+  (Default fillers for unspecified components are taken from
+   <b class="b">*default-pathname-defaults*</b>.)
+</p>
+<p><i class="i">output-file</i>&mdash;a <i class="i">pathname designator</i>.
+  The default is <i class="i">implementation-defined</i>.
+</p>
+<p><i class="i">verbose</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is the <i class="i">value</i> of <b class="b">*compile-verbose*</b>.
+</p>
+<p><i class="i">print</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is the <i class="i">value</i> of <b class="b">*compile-print*</b>.
+</p>
+<p><i class="i">external-format</i>&mdash;an <i class="i">external file format designator</i>.
+  The default is <code class="t">:default</code>.
+</p>
+<p><i class="i">output-truename</i>&mdash;a <i class="i">pathname</i> (the <b class="b">truename</b> of the output <i class="i">file</i>),
+   or <b class="b">nil</b>.
+</p>
+<p><i class="i">warnings-p</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">failure-p</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-638"><span>Description::<a class="copiable-link" href="#Description_003a_003a-638"> &para;</a></span></h4>
+
+<p><b class="b">compile-file</b> transforms the contents of the file specified 
+by <i class="i">input-file</i> into <i class="i">implementation-dependent</i> binary data 
+which are placed in the file specified by <i class="i">output-file</i>.
+</p>
+<p>The <i class="i">file</i> to which <i class="i">input-file</i> refers should be a <i class="i">source file</i>.
+<i class="i">output-file</i> can be used to specify an output <i class="i">pathname</i>;
+</p>
+<p>the actual <i class="i">pathname</i> of the <i class="i">compiled file</i> 
+to which <i class="i">compiled code</i> will be output 
+is computed as if by calling <b class="b">compile-file-pathname</b>.
+</p>
+<p>If <i class="i">input-file</i> or <i class="i">output-file</i> is a <i class="i">logical pathname</i>,
+it is translated into a <i class="i">physical pathname</i> as if by calling
+<b class="b">translate-logical-pathname</b>.
+</p>
+<p>If <i class="i">verbose</i> is <i class="i">true</i>,
+<b class="b">compile-file</b> prints a message in the form of a comment
+(<i class="i">i.e.</i>, with a leading <i class="i">semicolon</i>)
+to <i class="i">standard output</i> indicating what <i class="i">file</i> is being <i class="i">compiled</i>
+and other useful information.
+If <i class="i">verbose</i> is <i class="i">false</i>,
+<b class="b">compile-file</b> does not print 
+this information.
+</p>
+<p>If <i class="i">print</i> is <i class="i">true</i>,
+information about <i class="i">top level forms</i> in the file being
+compiled is printed to <i class="i">standard output</i>.
+Exactly what is printed is <i class="i">implementation-dependent</i>, 
+but nevertheless some information is printed.
+If <i class="i">print</i> is <b class="b">nil</b>, no information is printed.
+</p>
+<p>The <i class="i">external-format</i> specifies the <i class="i">external file format</i> 
+to be used when opening the <i class="i">file</i>; see the <i class="i">function</i> <b class="b">open</b>.
+<b class="b">compile-file</b> and <b class="b">load</b> must cooperate in such a way that
+the resulting <i class="i">compiled file</i> can be <i class="i">loaded</i>
+without specifying an <i class="i">external file format</i> anew; see the <i class="i">function</i> <b class="b">load</b>.
+</p>
+<p><b class="b">compile-file</b> binds <b class="b">*readtable*</b> and <b class="b">*package*</b>
+to the values they held before processing the file.
+</p>
+<p><b class="b">*compile-file-truename*</b> is bound by <b class="b">compile-file</b> 
+to hold the <i class="i">truename</i> of the <i class="i">pathname</i> of the file being compiled.
+</p>
+<p><b class="b">*compile-file-pathname*</b> is bound by <b class="b">compile-file</b>
+to hold a <i class="i">pathname</i> denoted by the first argument to <b class="b">compile-file</b>,
+merged against the defaults;
+that is, <code class="t">(pathname (merge-pathnames <i class="i">input-file</i>))</code>.
+</p>
+<p>The compiled <i class="i">functions</i> contained in the <i class="i">compiled file</i> become available
+for use when the <i class="i">compiled file</i> is <i class="i">loaded</i> into Lisp.
+</p>
+<p>Any function definition that is processed by the
+compiler, including <code class="t">#'(lambda ...)</code> forms and local function
+definitions made by <b class="b">flet</b>, <b class="b">labels</b> and <b class="b">defun</b> forms, 
+result in an <i class="i">object</i> of <i class="i">type</i> <b class="b">compiled-function</b>.  
+</p>
+<p>The <i class="i">primary value</i> returned by <b class="b">compile-file</b>, <i class="i">output-truename</i>,
+is the <b class="b">truename</b> of the output file, or <b class="b">nil</b> if the file could not be created.  
+</p>
+<p>The <i class="i">secondary value</i>, <i class="i">warnings-p</i>, is <i class="i">false</i>
+if no <i class="i">conditions</i> of <i class="i">type</i> <b class="b">error</b> or <b class="b">warning</b>
+were detected by the compiler, and <i class="i">true</i> otherwise.
+</p>
+<p>The <i class="i">tertiary value</i>, <i class="i">failure-p</i>, is <i class="i">false</i>
+if no <i class="i">conditions</i> of <i class="i">type</i> <b class="b">error</b> or <b class="b">warning</b>
+(other than <b class="b">style-warning</b>)
+were detected by the compiler, and <i class="i">true</i> otherwise.
+</p>
+<p>For general information about how <i class="i">files</i> are processed by the <i class="i">file compiler</i>,
+see <a class="ref" href="File-Compilation.html">File Compilation</a>.
+</p>
+<p><i class="i">Programs</i> to be compiled by the <i class="i">file compiler</i> must only contain
+<i class="i">externalizable objects</i>; for details on such <i class="i">objects</i>,
+see <a class="ref" href="Literal-Objects-in-Compiled-Files.html">Literal Objects in Compiled Files</a>.
+For information on how to extend the set of <i class="i">externalizable objects</i>,
+see the <i class="i">function</i> <b class="b">make-load-form</b> and <a class="ref" href="Additional-Constraints-on-Externalizable-Objects.html">Additional Constraints on Externalizable Objects</a>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-113"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-113"> &para;</a></span></h4>
+
+<p><b class="b">*error-output*</b>,
+</p>
+<p><b class="b">*standard-output*</b>, <b class="b">*compile-verbose*</b>, <b class="b">*compile-print*</b>
+</p>
+<p>The computer&rsquo;s file system.
+</p><h4 class="subsubheading" id="Exceptional-Situations_003a_003a-233"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-233"> &para;</a></span></h4>
+
+<p>For information about errors detected during the compilation process, 
+see <a class="ref" href="Exceptional-Situations-in-the-Compiler.html">Exceptional Situations in the Compiler</a>.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> might be signaled if
+<code class="t">(wild-pathname-p <i class="i">input-file</i>)\/</code> returns true.
+</p>
+<p>If either the attempt to open the <i class="i">source file</i> for input
+       or the attempt to open the <i class="i">compiled file</i> for output
+fails,
+an error of <i class="i">type</i> <b class="b">file-error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-518"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-518"> &para;</a></span></h4>
+
+<p><a class="ref" href="compile.html">compile                                                          [Function]</a>
+,
+<b class="b">declare</b>,
+<a class="ref" href="eval_002dwhen.html">eval-when                                                [Special Operator]</a>
+,
+<b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="compile_002dfile_002dpathname.html">compile-file-pathname                                            [Function]</a>, Previous: <a href="System-Construction-Dictionary.html">System Construction Dictionary</a>, Up: <a href="System-Construction-Dictionary.html">System Construction Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/compile_002dfile_002dpathname.html
@@ -0,0 +1,114 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>compile-file-pathname (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="compile-file-pathname (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="compile-file-pathname (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="System-Construction-Dictionary.html" rel="up" title="System Construction Dictionary">
+<link href="load.html" rel="next" title="load">
+<link href="compile_002dfile.html" rel="prev" title="compile-file">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="compile_002dfile_002dpathname">
+<div class="nav-panel">
+<p>
+Next: <a href="load.html" accesskey="n" rel="next">load                                                             [Function]</a>, Previous: <a href="compile_002dfile.html" accesskey="p" rel="prev">compile-file                                                     [Function]</a>, Up: <a href="System-Construction-Dictionary.html" accesskey="u" rel="up">System Construction Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="compile_002dfile_002dpathname-_005bFunction_005d"><span>24.2.2 compile-file-pathname                                            [Function]<a class="copiable-link" href="#compile_002dfile_002dpathname-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">compile-file-pathname</code>  <i class="i">input-file <span class="r">&amp;key</span> output-file <span class="r">&amp;allow-other-keys</span></i> &rArr;  <i class="i">pathname</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-483"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-483"> &para;</a></span></h4>
+
+<p><i class="i">input-file</i>&mdash;a <i class="i">pathname designator</i>.
+  (Default fillers for unspecified components are taken from
+   <b class="b">*default-pathname-defaults*</b>.)
+</p>
+<p><i class="i">output-file</i>&mdash;a <i class="i">pathname designator</i>.
+ The default is <i class="i">implementation-defined</i>.
+</p>
+<p><i class="i">pathname</i>&mdash;a <i class="i">pathname</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-639"><span>Description::<a class="copiable-link" href="#Description_003a_003a-639"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">pathname</i> that <b class="b">compile-file</b> would write into,
+if given the same arguments.
+</p>
+<p>The defaults for the <i class="i">output-file</i> 
+are taken from the <i class="i">pathname</i> 
+that results from merging the <i class="i">input-file</i> 
+with the <i class="i">value</i> of <b class="b">*default-pathname-defaults*</b>,
+except that the type component 
+should default to the appropriate
+<i class="i">implementation-defined</i> default type for <i class="i">compiled files</i>.
+</p>
+<p>If <i class="i">input-file</i> is a <i class="i">logical pathname</i> and <i class="i">output-file</i> 
+is unsupplied, the result is a <i class="i">logical pathname</i>.
+</p>
+<p>If <i class="i">input-file</i> is a <i class="i">logical pathname</i>, 
+it is translated into a physical pathname as if by calling 
+<b class="b">translate-logical-pathname</b>.
+</p>
+<p>If <i class="i">input-file</i> is a <i class="i">stream</i>, 
+the <i class="i">stream</i> can be either open or closed.
+<b class="b">compile-file-pathname</b> returns the same <i class="i">pathname</i> after a
+file is closed as it did when the file was open.
+</p>
+<p>It is an error if <i class="i">input-file</i> is a <i class="i">stream</i> that is 
+created with <b class="b">make-two-way-stream</b>, <b class="b">make-echo-stream</b>,             
+<b class="b">make-broadcast-stream</b>, <b class="b">make-concatenated-stream</b>,
+<b class="b">make-string-input-stream</b>, <b class="b">make-string-output-stream</b>.
+</p>
+<p>If an implementation supports additional keyword arguments to <b class="b">compile-file</b>, 
+<b class="b">compile-file-pathname</b> must accept the same arguments.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-457"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-457"> &para;</a></span></h4>
+
+<p>See <b class="b">logical-pathname-translations</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-234"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-234"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> might be signaled if either <i class="i">input-file</i> or
+<i class="i">output-file</i> is <i class="i">wild</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-519"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-519"> &para;</a></span></h4>
+
+<p><a class="ref" href="compile_002dfile.html">compile-file                                                     [Function]</a>
+,
+<b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="load.html">load                                                             [Function]</a>, Previous: <a href="compile_002dfile.html">compile-file                                                     [Function]</a>, Up: <a href="System-Construction-Dictionary.html">System Construction Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/compiled_002dfunction.html
@@ -0,0 +1,65 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>compiled-function (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="compiled-function (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="compiled-function (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="generic_002dfunction.html" rel="next" title="generic-function">
+<link href="function-_0028System-Class_0029.html" rel="prev" title="function (System Class)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="compiled_002dfunction">
+<div class="nav-panel">
+<p>
+Next: <a href="generic_002dfunction.html" accesskey="n" rel="next">generic-function                                             [System Class]</a>, Previous: <a href="function-_0028System-Class_0029.html" accesskey="p" rel="prev">function                                                     [System Class]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="compiled_002dfunction-_005bType_005d"><span>4.4.4 compiled-function                                                    [Type]<a class="copiable-link" href="#compiled_002dfunction-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-2"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-2"> &para;</a></span></h4>
+
+<p><b class="b">compiled-function</b>,
+<b class="b">function</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-33"><span>Description::<a class="copiable-link" href="#Description_003a_003a-33"> &para;</a></span></h4>
+
+<p>Any <i class="i">function</i> may be considered by an <i class="i">implementation</i> to be a 
+a <i class="i">compiled function</i> if it contains no references to <i class="i">macros</i> that
+must be expanded at run time, and it contains no unresolved references 
+to <i class="i">load time values</i>.  See <a class="ref" href="Compilation-Semantics.html">Compilation Semantics</a>.
+</p>
+<p><i class="i">Functions</i> whose definitions appear lexically within a
+<i class="i">file</i> that has been <i class="i">compiled</i> with <b class="b">compile-file</b> and then
+<i class="i">loaded</i> with <b class="b">load</b> are of <i class="i">type</i> <b class="b">compiled-function</b>.
+</p>
+<p><i class="i">Functions</i> produced by the <b class="b">compile</b> function
+are of <i class="i">type</i> <b class="b">compiled-function</b>.
+</p>
+<p>Other <i class="i">functions</i> might also be of <i class="i">type</i> <b class="b">compiled-function</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/compiled_002dfunction_002dp.html
@@ -0,0 +1,90 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>compiled-function-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="compiled-function-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="compiled-function-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="call_002darguments_002dlimit.html" rel="next" title="call-arguments-limit">
+<link href="functionp.html" rel="prev" title="functionp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="compiled_002dfunction_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="call_002darguments_002dlimit.html" accesskey="n" rel="next">call-arguments-limit                                    [Constant Variable]</a>, Previous: <a href="functionp.html" accesskey="p" rel="prev">functionp                                                        [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="compiled_002dfunction_002dp-_005bFunction_005d"><span>5.3.11 compiled-function-p                                              [Function]<a class="copiable-link" href="#compiled_002dfunction_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">compiled-function-p</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-35"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-35"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-64"><span>Description::<a class="copiable-link" href="#Description_003a_003a-64"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">compiled-function</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-41"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-41"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun f (x) x) &rArr;  F
+ (compiled-function-p #'f)
+&rArr;  <i class="i">false</i>
+<i class="i">OR</i>&rArr; <i class="i">true</i>
+ (compiled-function-p 'f) &rArr;  <i class="i">false</i>
+ (compile 'f) &rArr;  F
+ (compiled-function-p #'f) &rArr;  <i class="i">true</i>
+ (compiled-function-p 'f) &rArr;  <i class="i">false</i>
+ (compiled-function-p (compile nil '(lambda (x) x)))
+&rArr;  <i class="i">true</i>
+ (compiled-function-p #'(lambda (x) x))
+&rArr;  <i class="i">false</i>
+<i class="i">OR</i>&rArr; <i class="i">true</i>
+ (compiled-function-p '(lambda (x) x)) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-49"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-49"> &para;</a></span></h4>
+
+<p><a class="ref" href="compile.html">compile                                                          [Function]</a>
+,
+<a class="ref" href="compile_002dfile.html">compile-file                                                     [Function]</a>
+,
+<a class="ref" href="compiled_002dfunction.html">compiled-function                                                    [Type]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-32"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-32"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (compiled-function-p <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'compiled-function)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/compiler_002dmacro_002dfunction.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>compiler-macro-function (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="compiler-macro-function (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="compiler-macro-function (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="define_002dcompiler_002dmacro.html" rel="next" title="define-compiler-macro">
+<link href="quote.html" rel="prev" title="quote">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="compiler_002dmacro_002dfunction">
+<div class="nav-panel">
+<p>
+Next: <a href="define_002dcompiler_002dmacro.html" accesskey="n" rel="next">define-compiler-macro                                               [Macro]</a>, Previous: <a href="quote.html" accesskey="p" rel="prev">quote                                                    [Special Operator]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="compiler_002dmacro_002dfunction-_005bAccessor_005d"><span>3.8.8 compiler-macro-function                                          [Accessor]<a class="copiable-link" href="#compiler_002dmacro_002dfunction-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">compiler-macro-function</code>  <i class="i">name <span class="r">&amp;optional</span> environment</i> &rArr;  <i class="i">function</i>
+</p>
+<p>(setf (<code class="code">         compiler-macro-function</code> <i class="i">name <span class="r">&amp;optional</span> environment</i>) new-function)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-6"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-6"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">function name</i>.
+</p>
+<p><i class="i">environment</i>&mdash;an <i class="i">environment</i> <i class="i">object</i>.
+</p>
+<p><i class="i">function</i>, <i class="i">new-function</i>&mdash;a <i class="i">compiler macro function</i>, or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-7"><span>Description::<a class="copiable-link" href="#Description_003a_003a-7"> &para;</a></span></h4>
+
+<p><i class="i">Accesses</i> the <i class="i">compiler macro function</i> named <i class="i">name</i>, if any,
+in the <i class="i">environment</i>.
+</p>
+<p>A value of <b class="b">nil</b> denotes the absence of a <i class="i">compiler macro function</i> named <i class="i">name</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-1"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-1"> &para;</a></span></h4>
+
+<p>The consequences are undefined if <i class="i">environment</i> is <i class="i">non-nil</i>
+in a use of <b class="b">setf</b> of <b class="b">compiler-macro-function</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-7"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-7"> &para;</a></span></h4>
+
+<p><a class="ref" href="define_002dcompiler_002dmacro.html">define-compiler-macro                                               [Macro]</a>
+, <a class="ref" href="Compiler-Macros.html">Compiler Macros</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/complement.html
@@ -0,0 +1,112 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>complement (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="complement (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="complement (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="constantly.html" rel="next" title="constantly">
+<link href="identity.html" rel="prev" title="identity">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="complement">
+<div class="nav-panel">
+<p>
+Next: <a href="constantly.html" accesskey="n" rel="next">constantly                                                       [Function]</a>, Previous: <a href="identity.html" accesskey="p" rel="prev">identity                                                         [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="complement-_005bFunction_005d"><span>5.3.38 complement                                                       [Function]<a class="copiable-link" href="#complement-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">complement</code>  <i class="i">function</i> &rArr;  <i class="i">complement-function</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-57"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-57"> &para;</a></span></h4>
+
+<p><i class="i">function</i>&mdash;a <i class="i">function</i>.
+</p>
+<p><i class="i">complement-function</i>&mdash;a <i class="i">function</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-91"><span>Description::<a class="copiable-link" href="#Description_003a_003a-91"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">function</i> that
+  takes the same <i class="i">arguments</i> as <i class="i">function</i>,
+  and has the same side-effect behavior as <i class="i">function</i>,
+  but returns only a single value:
+   a <i class="i">generalized boolean</i> with the opposite truth value of that
+   which would be returned as the <i class="i">primary value</i> of <i class="i">function</i>.
+  That is, when the <i class="i">function</i> would have returned
+   <i class="i">true</i> as its <i class="i">primary value</i>
+   the <i class="i">complement-function</i> returns <i class="i">false</i>,
+   and when the <i class="i">function</i> would have returned
+   <i class="i">false</i> as its <i class="i">primary value</i>
+   the <i class="i">complement-function</i> returns <i class="i">true</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-65"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-65"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (funcall (complement #'zerop) 1) &rArr;  <i class="i">true</i>
+ (funcall (complement #'characterp) #\A) &rArr;  <i class="i">false</i>
+ (funcall (complement #'member) 'a '(a b c)) &rArr;  <i class="i">false</i>
+ (funcall (complement #'member) 'd '(a b c)) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-75"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-75"> &para;</a></span></h4>
+
+<p><a class="ref" href="not.html">not                                                              [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-47"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-47"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (complement <i class="i">x</i>) &equiv; #'(lambda (&amp;rest arguments) (not (apply <i class="i">x</i> arguments)))
+</pre></div>
+
+<p>In <span class="r">Common Lisp</span>, functions with names like &ldquo;<code class="t"><i class="i">xxx</i>-if-not</code>&rdquo;
+are related to functions with names like &ldquo;<code class="t"><i class="i">xxx</i>-if</code>&rdquo; 
+in that
+</p>
+<div class="example">
+<pre class="example-preformatted">(<i class="i">xxx</i>-if-not <i class="i">f</i> . <i class="i">arguments</i>) &equiv; (<i class="i">xxx</i>-if (complement <i class="i">f</i>) . <i class="i">arguments</i>)
+</pre></div>
+
+<p>For example,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (find-if-not #'zerop '(0 0 3)) &equiv;
+ (find-if (complement #'zerop) '(0 0 3)) &rArr;  3
+</pre></div>
+
+<p>Note that since the &ldquo;<code class="t"><i class="i">xxx</i>-if-not</code>&rdquo; <i class="i">functions</i>
+and the <code class="t">:test-not</code> arguments have been deprecated,
+uses of &ldquo;<code class="t"><i class="i">xxx</i>-if</code>&rdquo; <i class="i">functions</i> or 
+<code class="t">:test</code> arguments with <b class="b">complement</b> are preferred.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="constantly.html">constantly                                                       [Function]</a>, Previous: <a href="identity.html">identity                                                         [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/complex-_0028System-Class_0029.html
@@ -0,0 +1,116 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>complex (System Class) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="complex (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="complex (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="real.html" rel="next" title="real">
+<link href="number.html" rel="prev" title="number">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="complex-_0028System-Class_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="real.html" accesskey="n" rel="next">real                                                         [System Class]</a>, Previous: <a href="number.html" accesskey="p" rel="prev">number                                                       [System Class]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="complex-_005bSystem-Class_005d"><span>12.2.2 complex                                                      [System Class]<a class="copiable-link" href="#complex-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-36"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-36"> &para;</a></span></h4>
+<p><b class="b">complex</b>,
+<b class="b">number</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-268"><span>Description::<a class="copiable-link" href="#Description_003a_003a-268"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">complex</b> includes all mathematical complex numbers
+other than those included in the <i class="i">type</i> <b class="b">rational</b>.
+<i class="i">Complexes</i> are 
+expressed
+in Cartesian form with a
+real part and an imaginary part, each of which is a <i class="i">real</i>.
+The real part and imaginary part are either both
+<i class="i">rational</i> or both of the same <i class="i">float</i> <i class="i">type</i>.
+The imaginary part can be a <i class="i">float</i> zero, but can never
+be a <i class="i">rational</i> zero, for such a number is always represented
+by <span class="r">Common Lisp</span> as a <i class="i">rational</i> rather than a <i class="i">complex</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-8"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-8"> &para;</a></span></h4>
+
+<p>Specializing.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-8"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-8"> &para;</a></span></h4>
+
+<p>(<code class="code">complex</code>{<i class="i"><code class="t">[</code>typespec | <b class="b">*</b><code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-8"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-8"> &para;</a></span></h4>
+
+<p><i class="i">typespec</i>&mdash;a <i class="i">type specifier</i> that denotes a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">real</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-8"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-8"> &para;</a></span></h4>
+
+<p>[Editorial Note by KMP: If you ask me, this definition is a complete mess.  Looking at
+issue ARRAY-TYPE-ELEMENT-TYPE-SEMANTICS:UNIFY-UPGRADING does not help me figure 
+it out, either.  Anyone got any suggestions?]
+</p>
+<p>Every element of this <i class="i">type</i> is a <i class="i">complex</i> whose
+real part and imaginary part are each of type
+</p>
+<p><code class="t">(upgraded-complex-part-type <i class="i">typespec</i>)</code>.
+</p>
+<p>This <i class="i">type</i> encompasses those <i class="i">complexes</i>
+that can result by giving numbers of <i class="i">type</i> <i class="i">typespec</i>
+to <b class="b">complex</b>.
+</p>
+<p><code class="t">(complex <i class="i">type-specifier</i>)</code>
+refers to all <i class="i">complexes</i> that can result from giving
+<i class="i">numbers</i> of <i class="i">type</i> <i class="i">type-specifier</i> to the <i class="i">function</i> <b class="b">complex</b>, 
+plus all other <i class="i">complexes</i> of the same specialized representation.      
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-236"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-236"> &para;</a></span></h4>
+
+<p><a class="ref" href="Rule-of-Canonical-Representation-for-Complex-Rationals.html">Rule of Canonical Representation for Complex Rationals</a>,
+<a class="ref" href="Constructing-Numbers-from-Tokens.html">Constructing Numbers from Tokens</a>,
+<a class="ref" href="Printing-Complexes.html">Printing Complexes</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-137"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-137"> &para;</a></span></h4>
+
+<p>The input syntax for a <i class="i">complex</i> with real part r and 
+imaginary part i is <code class="t">#C(r i)</code>.  
+For further details, see <a class="ref" href="Standard-Macro-Characters.html">Standard Macro Characters</a>.
+</p>
+<p>For every <i class="i">float</i>, n, there is a <i class="i">complex</i>
+which represents the same mathematical number 
+and which can be obtained by <code class="t">(COERCE n 'COMPLEX)</code>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="real.html">real                                                         [System Class]</a>, Previous: <a href="number.html">number                                                       [System Class]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/complex.html
@@ -0,0 +1,112 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>complex (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="complex (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="complex (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="complexp.html" rel="next" title="complexp">
+<link href="cis.html" rel="prev" title="cis">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="complex">
+<div class="nav-panel">
+<p>
+Next: <a href="complexp.html" accesskey="n" rel="next">complexp                                                         [Function]</a>, Previous: <a href="cis.html" accesskey="p" rel="prev">cis                                                              [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="complex-_005bFunction_005d"><span>12.2.46 complex                                                          [Function]<a class="copiable-link" href="#complex-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">complex</code>  <i class="i">realpart <span class="r">&amp;optional</span> imagpart</i> &rArr;  <i class="i">complex</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-229"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-229"> &para;</a></span></h4>
+
+<p><i class="i">realpart</i>&mdash;a <i class="i">real</i>.
+</p>
+<p><i class="i">imagpart</i>&mdash;a <i class="i">real</i>.
+</p>
+<p><i class="i">complex</i>&mdash;a <i class="i">rational</i> or a <i class="i">complex</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-311"><span>Description::<a class="copiable-link" href="#Description_003a_003a-311"> &para;</a></span></h4>
+
+<p><b class="b">complex</b> returns a <i class="i">number</i> 
+    whose real      part is <i class="i">realpart</i> 
+and whose imaginary part is <i class="i">imagpart</i>.
+</p>
+<p>If <i class="i">realpart</i> is a <i class="i">rational</i>
+and <i class="i">imagpart</i> is the <i class="i">rational</i> number zero, 
+the result of <b class="b">complex</b> is <i class="i">realpart</i>, a <i class="i">rational</i>.
+Otherwise, the result is a <i class="i">complex</i>.
+</p>
+<p>If either <i class="i">realpart</i> or <i class="i">imagpart</i> is a <i class="i">float</i>,
+the non-<i class="i">float</i> is converted to a <i class="i">float</i> 
+before the <i class="i">complex</i> is created.
+If <i class="i">imagpart</i> is not supplied, the imaginary part is a 
+zero of the same <i class="i">type</i> as <i class="i">realpart</i>; <i class="i">i.e.</i>, <code class="t">(coerce 0 (type-of <i class="i">realpart</i>))</code> is
+effectively used.  
+</p>
+<p>Type upgrading implies a movement upwards in the type 
+hierarchy lattice.  
+In the case of <i class="i">complexes</i>, the <i class="i">type-specifier</i> 
+</p>
+<p>[Reviewer Note by Barmar: What type specifier?]
+must be a subtype of 
+<code class="t">(upgraded-complex-part-type <i class="i">type-specifier</i>)</code>.
+If <i class="i">type-specifier1</i> is a subtype of <i class="i">type-specifier2</i>, then
+<code class="t">(upgraded-complex-element-type '<i class="i">type-specifier1</i>)</code>
+must also be a subtype of
+<code class="t">(upgraded-complex-element-type '<i class="i">type-specifier2</i>)</code>.  
+Two disjoint types can be upgraded into 
+the same thing.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-214"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-214"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (complex 0) &rArr;  0
+ (complex 0.0) &rArr;  #C(0.0 0.0)
+ (complex 1 1/2) &rArr;  #C(1 1/2)
+ (complex 1 .99) &rArr;  #C(1.0 0.99)
+ (complex 3/2 0.0) &rArr;  #C(1.5 0.0)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-263"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-263"> &para;</a></span></h4>
+
+<p><a class="ref" href="realpart.html">realpart, imagpart                                               [Function]</a>
+, <b class="b">imagpart</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-160"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-160"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> #c(a b) &equiv; #.(complex a b)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="complexp.html">complexp                                                         [Function]</a>, Previous: <a href="cis.html">cis                                                              [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/complexp.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>complexp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="complexp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="complexp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="conjugate.html" rel="next" title="conjugate">
+<link href="complex.html" rel="prev" title="complex">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="complexp">
+<div class="nav-panel">
+<p>
+Next: <a href="conjugate.html" accesskey="n" rel="next">conjugate                                                        [Function]</a>, Previous: <a href="complex.html" accesskey="p" rel="prev">complex                                                          [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="complexp-_005bFunction_005d"><span>12.2.47 complexp                                                         [Function]<a class="copiable-link" href="#complexp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">complexp</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-230"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-230"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-312"><span>Description::<a class="copiable-link" href="#Description_003a_003a-312"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">complex</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-215"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-215"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (complexp 1.2d2) &rArr;  <i class="i">false</i>
+ (complexp #c(5/3 7.2)) &rArr;  <i class="i">true</i>
+
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-264"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-264"> &para;</a></span></h4>
+
+<p><a class="ref" href="complex.html">complex                                                          [Function]</a>
+ (<i class="i">function</i> and <i class="i">type</i>), 
+<a class="ref" href="typep.html">typep                                                            [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-161"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-161"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (complexp <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'complex)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/compute_002dapplicable_002dmethods.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>compute-applicable-methods (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="compute-applicable-methods (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="compute-applicable-methods (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="define_002dmethod_002dcombination.html" rel="next" title="define-method-combination">
+<link href="call_002dnext_002dmethod.html" rel="prev" title="call-next-method">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="compute_002dapplicable_002dmethods">
+<div class="nav-panel">
+<p>
+Next: <a href="define_002dmethod_002dcombination.html" accesskey="n" rel="next">define-method-combination                                           [Macro]</a>, Previous: <a href="call_002dnext_002dmethod.html" accesskey="p" rel="prev">call-next-method                                           [Local Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="compute_002dapplicable_002dmethods-_005bStandard-Generic-Function_005d"><span>7.7.32 compute-applicable-methods                      [Standard Generic Function]<a class="copiable-link" href="#compute_002dapplicable_002dmethods-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-30"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-30"> &para;</a></span></h4>
+
+<p><code class="code">compute-applicable-methods</code>  <i class="i">generic-function function-arguments</i> &rArr;  <i class="i">methods</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-16"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-16"> &para;</a></span></h4>
+
+<p><code class="code">compute-applicable-methods</code>  <i class="i"><span class="r">(</span><i class="i">generic-function</i> <b class="b">standard-generic-function</b><span class="r">)</span></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-120"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-120"> &para;</a></span></h4>
+
+<p><i class="i">generic-function</i>&mdash;a <i class="i">generic function</i>.
+</p>
+<p><i class="i">function-arguments</i>&mdash;a <i class="i">list</i> of arguments for the <i class="i">generic-function</i>.
+</p>
+<p><i class="i">methods</i>&mdash;a <i class="i">list</i> of <i class="i">method</i> <i class="i">objects</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-159"><span>Description::<a class="copiable-link" href="#Description_003a_003a-159"> &para;</a></span></h4>
+
+<p>Given a <i class="i">generic-function</i> and a set of 
+<i class="i">function-arguments</i>, the function
+<b class="b">compute-applicable-methods</b> returns the set of <i class="i">methods</i>
+that are applicable for those arguments
+sorted according to precedence order.
+See <a class="ref" href="Method-Selection-and-Combination.html">Method Selection and Combination</a>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-16"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-16"> &para;</a></span></h4>
+
+<p><b class="b">defmethod</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-141"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-141"> &para;</a></span></h4>
+
+<p><a class="ref" href="Method-Selection-and-Combination.html">Method Selection and Combination</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/compute_002drestarts.html
@@ -0,0 +1,135 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>compute-restarts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="compute-restarts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="compute-restarts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="find_002drestart.html" rel="next" title="find-restart">
+<link href="restart.html" rel="prev" title="restart">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="compute_002drestarts">
+<div class="nav-panel">
+<p>
+Next: <a href="find_002drestart.html" accesskey="n" rel="next">find-restart                                                     [Function]</a>, Previous: <a href="restart.html" accesskey="p" rel="prev">restart                                                      [System Class]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="compute_002drestarts-_005bFunction_005d"><span>9.2.32 compute-restarts                                                 [Function]<a class="copiable-link" href="#compute_002drestarts-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">compute-restarts</code>  <i class="i"><span class="r">&amp;optional</span> condition</i> &rArr;  <i class="i">restarts</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-148"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-148"> &para;</a></span></h4>
+
+<p><i class="i">condition</i>&mdash;a <i class="i">condition</i> <i class="i">object</i>, or <b class="b">nil</b>.
+</p>
+<p><i class="i">restarts</i>&mdash;a <i class="i">list</i> of <i class="i">restarts</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-202"><span>Description::<a class="copiable-link" href="#Description_003a_003a-202"> &para;</a></span></h4>
+
+<p><b class="b">compute-restarts</b> uses the dynamic state of the program to compute 
+a <i class="i">list</i> of the <i class="i">restarts</i> which are currently active.
+</p>
+<p>The resulting <i class="i">list</i> is ordered so that the innermost
+(more-recently established) restarts are nearer the head of the <i class="i">list</i>.
+</p>
+<p>When <i class="i">condition</i> is <i class="i">non-nil</i>, only those <i class="i">restarts</i>
+are considered that are either explicitly associated with that <i class="i">condition</i>,
+or not associated with any <i class="i">condition</i>; that is, the excluded <i class="i">restarts</i> 
+are those that are associated with a non-empty set of <i class="i">conditions</i> of 
+which the given <i class="i">condition</i> is not an <i class="i">element</i>.
+If <i class="i">condition</i> is <b class="b">nil</b>, all <i class="i">restarts</i> are considered.
+</p>
+<p><b class="b">compute-restarts</b> returns all 
+<i class="i">applicable restarts</i>, 
+including anonymous ones, even if some of them have the same name as 
+others and would therefore not be found by <b class="b">find-restart</b> 
+when given a <i class="i">symbol</i> argument.
+</p>
+<p>Implementations are permitted, but not required, to return <i class="i">distinct</i>
+<i class="i">lists</i> from repeated calls to <b class="b">compute-restarts</b> while in
+the same dynamic environment.  
+The consequences are undefined if the <i class="i">list</i> returned by
+<b class="b">compute-restarts</b> is every modified.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-130"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-130"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> ;; One possible way in which an interactive debugger might present
+ ;; restarts to the user.
+ (defun invoke-a-restart ()
+   (let ((restarts (compute-restarts)))
+     (do ((i 0 (+ i 1)) (r restarts (cdr r))) ((null r))
+       (format t &quot;~&amp;~D: ~A~
+     (let ((n nil) (k (length restarts)))
+       (loop (when (and (typep n 'integer) (&gt;= n 0) (&lt; n k))
+               (return t))
+             (format t &quot;~&amp;Option: &quot;)
+             (setq n (read))
+             (fresh-line))
+       (invoke-restart-interactively (nth n restarts)))))
+
+ (restart-case (invoke-a-restart)
+   (one () 1)
+   (two () 2)
+   (nil () :report &quot;Who knows?&quot; 'anonymous)
+   (one () 'I)
+   (two () 'II))
+<code class="t"> |&gt; </code> 0: ONE
+<code class="t"> |&gt; </code> 1: TWO
+<code class="t"> |&gt; </code> 2: Who knows?
+<code class="t"> |&gt; </code> 3: ONE
+<code class="t"> |&gt; </code> 4: TWO
+<code class="t"> |&gt; </code> 5: Return to Lisp Toplevel.
+<code class="t"> |&gt; </code> Option: <b class="b">|&gt;&gt;</b><code class="t">4</code><b class="b">&lt;&lt;|</b>
+&rArr;  II
+
+ ;; Note that in addition to user-defined restart points, COMPUTE-RESTARTS
+ ;; also returns information about any system-supplied restarts, such as
+ ;; the &quot;Return to Lisp Toplevel&quot; restart offered above.
+
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-30"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-30"> &para;</a></span></h4>
+
+<p>Existing restarts.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-176"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-176"> &para;</a></span></h4>
+
+<p><a class="ref" href="find_002drestart.html">find-restart                                                     [Function]</a>
+,
+<a class="ref" href="invoke_002drestart.html">invoke-restart                                                   [Function]</a>
+,
+<a class="ref" href="restart_002dbind.html">restart-bind                                                        [Macro]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="find_002drestart.html">find-restart                                                     [Function]</a>, Previous: <a href="restart.html">restart                                                      [System Class]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/concatenate.html
@@ -0,0 +1,118 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>concatenate (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="concatenate (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="concatenate (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="merge.html" rel="next" title="merge">
+<link href="substitute.html" rel="prev" title="substitute">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="concatenate">
+<div class="nav-panel">
+<p>
+Next: <a href="merge.html" accesskey="n" rel="next">merge                                                            [Function]</a>, Previous: <a href="substitute.html" accesskey="p" rel="prev">substitute, substitute-if, substitute-if-not,</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="concatenate-_005bFunction_005d"><span>17.3.20 concatenate                                                      [Function]<a class="copiable-link" href="#concatenate-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">concatenate</code>  <i class="i">result-type <span class="r">&amp;rest</span> sequences</i> &rArr;  <i class="i">result-sequence</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-372"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-372"> &para;</a></span></h4>
+
+<p><i class="i">result-type</i>&mdash;a <b class="b">sequence</b> <i class="i">type specifier</i>.
+</p>
+<p><i class="i">sequences</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<p><i class="i">result-sequence</i>&mdash;a <i class="i">proper sequence</i> of <i class="i">type</i> <i class="i">result-type</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-487"><span>Description::<a class="copiable-link" href="#Description_003a_003a-487"> &para;</a></span></h4>
+
+<p><b class="b">concatenate</b> returns a <i class="i">sequence</i> that contains 
+all the individual elements of all the <i class="i">sequences</i> in the order 
+that they are supplied.
+The <i class="i">sequence</i> is of type <i class="i">result-type</i>, 
+which must be a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">sequence</b>.
+</p>
+<p>All of the <i class="i">sequences</i> are copied from; the result
+does not share any structure with any of the <i class="i">sequences</i>.
+Therefore, if only one <i class="i">sequence</i> is provided
+and it is of type <i class="i">result-type</i>,
+<b class="b">concatenate</b> is required to copy <i class="i">sequence</i> rather than simply
+returning it.  
+</p>
+<p>It is an error if any element of the <i class="i">sequences</i> cannot be an
+element of the <i class="i">sequence</i> result.
+</p>
+<p>[Reviewer Note by Barmar: Should signal?]
+</p>
+<p>If the <i class="i">result-type</i> is a <i class="i">subtype</i> of <b class="b">list</b>,
+the result will be a <i class="i">list</i>.
+</p>
+<p>If the <i class="i">result-type</i> is a <i class="i">subtype</i> of <b class="b">vector</b>,
+then if the implementation can determine the element type specified
+for the <i class="i">result-type</i>, the element type of the resulting array 
+is the result of <i class="i">upgrading</i> that element type; or, if the
+implementation can determine that the element type is unspecified (or <code class="t">*</code>),
+the element type of the resulting array is <b class="b">t</b>;
+otherwise, an error is signaled.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-354"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-354"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">(concatenate 'string &quot;all&quot; &quot; &quot; &quot;together&quot; &quot; &quot; &quot;now&quot;) &rArr;  &quot;all together now&quot;
+(concatenate 'list &quot;ABC&quot; '(d e f) #(1 2 3) #*1011)
+&rArr;  (#\A #\B #\C D E F 1 2 3 1 0 1 1)
+(concatenate 'list) &rArr;  NIL
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted">  (concatenate '(vector * 2) &quot;a&quot; &quot;bc&quot;) should signal an error
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-165"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-165"> &para;</a></span></h4>
+
+<p>An error is signaled if the <i class="i">result-type</i> is neither
+     a <i class="i">recognizable subtype</i> of <b class="b">list</b>,
+ nor a <i class="i">recognizable subtype</i> of <b class="b">vector</b>.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">type-error</b> should be signaled if <i class="i">result-type</i> 
+specifies the number of elements and the sum of <i class="i">sequences</i>
+is different from that number.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-397"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-397"> &para;</a></span></h4>
+
+<p><a class="ref" href="append.html">append                                                           [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="merge.html">merge                                                            [Function]</a>, Previous: <a href="substitute.html">substitute, substitute-if, substitute-if-not,</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/concatenated_002dstream.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>concatenated-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="concatenated-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="concatenated-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="echo_002dstream.html" rel="next" title="echo-stream">
+<link href="broadcast_002dstream.html" rel="prev" title="broadcast-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="concatenated_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="echo_002dstream.html" accesskey="n" rel="next">echo-stream                                                  [System Class]</a>, Previous: <a href="broadcast_002dstream.html" accesskey="p" rel="prev">broadcast-stream                                             [System Class]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="concatenated_002dstream-_005bSystem-Class_005d"><span>21.2.3 concatenated-stream                                          [System Class]<a class="copiable-link" href="#concatenated_002dstream-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-64"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-64"> &para;</a></span></h4>
+
+<p><b class="b">concatenated-stream</b>,
+<b class="b">stream</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-534"><span>Description::<a class="copiable-link" href="#Description_003a_003a-534"> &para;</a></span></h4>
+
+<p>A <i class="i">concatenated stream</i> is an <i class="i">input</i> <i class="i">stream</i> which 
+is a <i class="i">composite stream</i> of zero or more other <i class="i">input</i> <i class="i">streams</i>, 
+such that the sequence of data which can be read from the
+<i class="i">concatenated stream</i> is the same as the concatenation of the 
+sequences of data which could be read from each of the 
+constituent <i class="i">streams</i>.
+</p>
+<p>Input from a <i class="i">concatenated stream</i> is taken from the first
+of the associated <i class="i">input streams</i> until it reaches <i class="i">end of file</i>_1; 
+then that <i class="i">stream</i> is discarded, and subsequent input is taken
+from the next <i class="i">input stream</i>, and so on.
+An <i class="i">end of file</i> on the associated <i class="i">input streams</i> is always managed
+invisibly by the <i class="i">concatenated stream</i>&mdash;the only time a client of
+a <i class="i">concatenated stream</i> sees an <i class="i">end of file</i> is when an attempt is
+made to obtain data from the <i class="i">concatenated stream</i> but it has no
+remaining <i class="i">input streams</i> from which to obtain such data.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-437"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-437"> &para;</a></span></h4>
+
+<p><a class="ref" href="concatenated_002dstream_002dstreams.html">concatenated-stream-streams                                      [Function]</a>
+,
+<a class="ref" href="make_002dconcatenated_002dstream.html">make-concatenated-stream                                         [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/concatenated_002dstream_002dstreams.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>concatenated-stream-streams (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="concatenated-stream-streams (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="concatenated-stream-streams (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="make_002dconcatenated_002dstream.html" rel="next" title="make-concatenated-stream">
+<link href="make_002decho_002dstream.html" rel="prev" title="make-echo-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="concatenated_002dstream_002dstreams">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dconcatenated_002dstream.html" accesskey="n" rel="next">make-concatenated-stream                                         [Function]</a>, Previous: <a href="make_002decho_002dstream.html" accesskey="p" rel="prev">make-echo-stream                                                 [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="concatenated_002dstream_002dstreams-_005bFunction_005d"><span>21.2.46 concatenated-stream-streams                                      [Function]<a class="copiable-link" href="#concatenated_002dstream_002dstreams-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">concatenated-stream-streams</code>  <i class="i">concatenated-stream</i> &rArr;  <i class="i">streams</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-447"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-447"> &para;</a></span></h4>
+
+<p><i class="i">concatenated-stream</i> &ndash; a <i class="i">concatenated stream</i>.
+</p>
+<p><i class="i">streams</i>&mdash;a <i class="i">list</i> of <i class="i">input</i> <i class="i">streams</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-577"><span>Description::<a class="copiable-link" href="#Description_003a_003a-577"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">list</i> of <i class="i">input</i> <i class="i">streams</i> that constitute the
+ordered set of <i class="i">streams</i> the <i class="i">concatenated-stream</i> still 
+has to read from, starting with the current one it is reading from.
+The list may be <i class="i">empty</i> if no more <i class="i">streams</i> remain to be read.
+</p>
+<p>The consequences are undefined if the <i class="i">list structure</i> of the <i class="i">streams</i>
+is ever modified.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/cond.html
@@ -0,0 +1,111 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>cond (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="cond (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="cond (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="if.html" rel="next" title="if">
+<link href="and.html" rel="prev" title="and">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="cond">
+<div class="nav-panel">
+<p>
+Next: <a href="if.html" accesskey="n" rel="next">if                                                       [Special Operator]</a>, Previous: <a href="and.html" accesskey="p" rel="prev">and                                                                 [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="cond-_005bMacro_005d"><span>5.3.42 cond                                                                [Macro]<a class="copiable-link" href="#cond-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">cond</code>  <i class="i">{!<i class="i">clause</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><i class="i">clause</i>&nbsp;::=<span class="r">(</span>test-form&nbsp;{<i class="i">form</i>}*<span class="r">)</span><!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-61"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-61"> &para;</a></span></h4>
+
+<p><i class="i">test-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> of the <i class="i">forms</i> 
+    in the first <i class="i">clause</i> whose <i class="i">test-form</i> <i class="i">yields</i> <i class="i">true</i>,
+ or the <i class="i">primary value</i> of the <i class="i">test-form</i>
+    if there are no <i class="i">forms</i> in that <i class="i">clause</i>,
+ or else <b class="b">nil</b> if no <i class="i">test-form</i> <i class="i">yields</i> <i class="i">true</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-95"><span>Description::<a class="copiable-link" href="#Description_003a_003a-95"> &para;</a></span></h4>
+
+<p><b class="b">cond</b> allows the execution of <i class="i">forms</i> to be dependent
+on <i class="i">test-form</i>.
+</p>
+<p><i class="i">Test-forms</i> are evaluated one at a time in the order in which
+they are given in the argument list until a <i class="i">test-form</i> is found that
+evaluates to <i class="i">true</i>.
+</p>
+<p>If there are no <i class="i">forms</i> in that clause, the <i class="i">primary value</i> 
+of the <i class="i">test-form</i> is returned by the <b class="b">cond</b> <i class="i">form</i>.
+Otherwise, the <i class="i">forms</i> associated with this <i class="i">test-form</i> are
+evaluated in order, left to right, as an <i class="i">implicit progn</i>, and the
+<i class="i">values</i> returned by the last <i class="i">form</i> 
+are returned by the <b class="b">cond</b> <i class="i">form</i>.
+</p>
+<p>Once one <i class="i">test-form</i> has <i class="i">yielded</i> <i class="i">true</i>,
+no additional <i class="i">test-forms</i> are <i class="i">evaluated</i>.
+If no <i class="i">test-form</i> <i class="i">yields</i> <i class="i">true</i>, <b class="b">nil</b> is returned.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-69"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-69"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun select-options ()
+   (cond ((= a 1) (setq a 2))
+         ((= a 2) (setq a 3))
+         ((and (= a 3) (floor a 2)))
+         (t (floor a 3)))) &rArr;  SELECT-OPTIONS
+ (setq a 1) &rArr;  1
+ (select-options) &rArr;  2
+ a &rArr;  2
+ (select-options) &rArr;  3
+ a &rArr;  3
+ (select-options) &rArr;  1
+ (setq a 5) &rArr;  5
+ (select-options) &rArr;  1, 2
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-79"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-79"> &para;</a></span></h4>
+
+<p><a class="ref" href="if.html">if                                                       [Special Operator]</a>
+, 
+<a class="ref" href="case.html">case, ccase, ecase                                                  [Macro]</a>
+.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="if.html">if                                                       [Special Operator]</a>, Previous: <a href="and.html">and                                                                 [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/condition.html
@@ -0,0 +1,102 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>condition (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="condition (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="condition (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="warning.html" rel="next" title="warning">
+<link href="Conditions-Dictionary.html" rel="prev" title="Conditions Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="condition">
+<div class="nav-panel">
+<p>
+Next: <a href="warning.html" accesskey="n" rel="next">warning                                                    [Condition Type]</a>, Previous: <a href="Conditions-Dictionary.html" accesskey="p" rel="prev">Conditions Dictionary</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="condition-_005bCondition-Type_005d"><span>9.2.1 condition                                                  [Condition Type]<a class="copiable-link" href="#condition-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<p>[Reviewer Note by Barrett: I think CONDITION-RESTARTS is not fully integrated.]
+</p>
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-19"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-19"> &para;</a></span></h4>
+<p><b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-171"><span>Description::<a class="copiable-link" href="#Description_003a_003a-171"> &para;</a></span></h4>
+
+<p>All types of <i class="i">conditions</i>, whether error or
+non-error, must inherit from this <i class="i">type</i>.
+</p>
+<p>No additional <i class="i">subtype</i> relationships among the specified <i class="i">subtypes</i> of <i class="i">type</i> <b class="b">condition</b>
+are allowed, except when explicitly mentioned in the text; however
+implementations are permitted to introduce additional <i class="i">types</i>
+and one of these <i class="i">types</i> can be a <i class="i">subtype</i> of any
+number of the <i class="i">subtypes</i> of <i class="i">type</i> <b class="b">condition</b>.
+</p>
+<p>Whether a user-defined <i class="i">condition</i> <i class="i">type</i> has <i class="i">slots</i> 
+that are accessible by <i class="i">with-slots</i> is <i class="i">implementation-dependent</i>.
+Furthermore, even in an <i class="i">implementation</i> 
+in which user-defined <i class="i">condition</i> <i class="i">types</i> would have <i class="i">slots</i>, 
+it is <i class="i">implementation-dependent</i> whether any <i class="i">condition</i>
+<i class="i">types</i> defined in this document have such <i class="i">slots</i> or, 
+if they do, what their <i class="i">names</i> might be;
+only the reader functions documented by this specification may be relied
+upon by portable code.
+</p>
+<p><i class="i">Conforming code</i> must observe the following restrictions related to
+<i class="i">conditions</i>:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">define-condition</b>, not <b class="b">defclass</b>, must be used
+ to define new <i class="i">condition</i> <i class="i">types</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">make-condition</b>, not <b class="b">make-instance</b>, must be used to
+ create <i class="i">condition</i> <i class="i">objects</i> explicitly.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:report</code> option of <b class="b">define-condition</b>, not <b class="b">defmethod</b>
+ for <b class="b">print-object</b>, must be used to define a condition reporter.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">slot-value</b>, <b class="b">slot-boundp</b>, <b class="b">slot-makunbound</b>,
+ and <b class="b">with-slots</b> must not be used on <i class="i">condition</i> <i class="i">objects</i>.
+ Instead, the appropriate accessor functions (defined by <b class="b">define-condition</b>)
+ should be used.
+</p></dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="warning.html">warning                                                    [Condition Type]</a>, Previous: <a href="Conditions-Dictionary.html">Conditions Dictionary</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/conjugate.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>conjugate (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="conjugate (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="conjugate (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="phase.html" rel="next" title="phase">
+<link href="complexp.html" rel="prev" title="complexp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="conjugate">
+<div class="nav-panel">
+<p>
+Next: <a href="phase.html" accesskey="n" rel="next">phase                                                            [Function]</a>, Previous: <a href="complexp.html" accesskey="p" rel="prev">complexp                                                         [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="conjugate-_005bFunction_005d"><span>12.2.48 conjugate                                                        [Function]<a class="copiable-link" href="#conjugate-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">conjugate</code>  <i class="i">number</i> &rArr;  <i class="i">conjugate</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-231"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-231"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">conjugate</i>&mdash;a <i class="i">number</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-313"><span>Description::<a class="copiable-link" href="#Description_003a_003a-313"> &para;</a></span></h4>
+
+<p>Returns the complex conjugate of <i class="i">number</i>.
+The conjugate of a 
+</p>
+<p><i class="i">real</i>
+</p>
+<p>number is itself.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-216"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-216"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (conjugate #c(0 -1)) &rArr;  #C(0 1)
+ (conjugate #c(1 1)) &rArr;  #C(1 -1)
+ (conjugate 1.5) &rArr;  1.5
+ (conjugate #C(3/5 4/5)) &rArr;  #C(3/5 -4/5)
+ (conjugate #C(0.0D0 -1.0D0)) &rArr;  #C(0.0D0 1.0D0)
+ (conjugate 3.7) &rArr;  3.7
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-162"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-162"> &para;</a></span></h4>
+
+<p>For a <i class="i">complex</i> number <code class="t">z</code>,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (conjugate z) &equiv; (complex (realpart z) (- (imagpart z)))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/cons-_0028System-Class_0029.html
@@ -0,0 +1,87 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>cons (System Class) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="cons (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="cons (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="atom-_0028Type_0029.html" rel="next" title="atom (Type)">
+<link href="null-_0028System-Class_0029.html" rel="prev" title="null (System Class)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="cons-_0028System-Class_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="atom-_0028Type_0029.html" accesskey="n" rel="next">atom                                                                 [Type]</a>, Previous: <a href="null-_0028System-Class_0029.html" accesskey="p" rel="prev">null                                                         [System Class]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="cons-_005bSystem-Class_005d"><span>14.2.3 cons                                                         [System Class]<a class="copiable-link" href="#cons-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-52"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-52"> &para;</a></span></h4>
+<p><b class="b">cons</b>,
+<b class="b">list</b>,
+<b class="b">sequence</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-373"><span>Description::<a class="copiable-link" href="#Description_003a_003a-373"> &para;</a></span></h4>
+
+<p>A <i class="i">cons</i> is a compound <i class="i">object</i> having two components,
+called the <i class="i">car</i> and <i class="i">cdr</i>. These form a <i class="i">dotted pair</i>.
+Each component can be any <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-17"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-17"> &para;</a></span></h4>
+
+<p>Specializing.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-17"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-17"> &para;</a></span></h4>
+
+<p>(<code class="code">cons</code>{<i class="i"><code class="t">[</code>car-typespec <span class="r">[</span>cdr-typespec<span class="r">]</span><code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-17"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-17"> &para;</a></span></h4>
+
+<p><i class="i">car-typespec</i>&mdash;a <i class="i">type specifier</i>,
+		    or the <i class="i">symbol</i> <b class="b">*</b>.
+  The default is the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<p><i class="i">cdr-typespec</i>&mdash;a <i class="i">type specifier</i>,
+		    or the <i class="i">symbol</i> <b class="b">*</b>.
+  The default is the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-17"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-17"> &para;</a></span></h4>
+
+<p>This denotes the set of <i class="i">conses</i> 
+whose <i class="i">car</i> is constrained to be of <i class="i">type</i> <i class="i">car-typespec</i> and
+whose <i class="i">cdr</i> is constrained to be of <i class="i">type</i> <i class="i">cdr-typespec</i>.
+(If either <i class="i">car-typespec</i> or <i class="i">cdr-typespec</i> is <b class="b">*</b>,
+ it is as if the <i class="i">type</i> <b class="b">t</b> had been denoted.)
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-302"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-302"> &para;</a></span></h4>
+
+<p><a class="ref" href="Left_002dParenthesis.html">Left-Parenthesis</a>,
+<a class="ref" href="Printing-Lists-and-Conses.html">Printing Lists and Conses</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/cons.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>cons (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="cons (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="cons (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="consp.html" rel="next" title="consp">
+<link href="atom-_0028Type_0029.html" rel="prev" title="atom (Type)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="cons">
+<div class="nav-panel">
+<p>
+Next: <a href="consp.html" accesskey="n" rel="next">consp                                                            [Function]</a>, Previous: <a href="atom-_0028Type_0029.html" accesskey="p" rel="prev">atom                                                                 [Type]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="cons-_005bFunction_005d"><span>14.2.5 cons                                                             [Function]<a class="copiable-link" href="#cons-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">cons</code>  <i class="i">object-1 object-2</i> &rArr;  <i class="i">cons</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-274"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-274"> &para;</a></span></h4>
+
+<p><i class="i">object-1</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">object-2</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">cons</i>&mdash;a <i class="i">cons</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-375"><span>Description::<a class="copiable-link" href="#Description_003a_003a-375"> &para;</a></span></h4>
+
+<p>Creates a <i class="i">fresh</i> <i class="i">cons</i>, the <i class="i">car</i> of which is <i class="i">object-1</i>
+and the <i class="i">cdr</i> of which is <i class="i">object-2</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-258"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-258"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (cons 1 2) &rArr;  (1 . 2)
+ (cons 1 nil) &rArr;  (1)
+ (cons nil 2) &rArr;  (NIL . 2)
+ (cons nil nil) &rArr;  (NIL)
+ (cons 1 (cons 2 (cons 3 (cons 4 nil)))) &rArr;  (1 2 3 4)
+ (cons 'a 'b) &rArr;  (A . B)
+ (cons 'a (cons 'b (cons 'c '<code class="t">()</code>))) &rArr;  (A B C)
+ (cons 'a '(b c d)) &rArr;  (A B C D)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-303"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-303"> &para;</a></span></h4>
+
+<p><a class="ref" href="list-_0028Function_0029.html">list, list*                                                      [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-197"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-197"> &para;</a></span></h4>
+<p>If <i class="i">object-2</i> is a <i class="i">list</i>, <b class="b">cons</b> can be thought of as
+producing a new <i class="i">list</i> which is like it but has <i class="i">object-1</i> prepended.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/consp.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>consp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="consp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="consp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="atom.html" rel="next" title="atom">
+<link href="cons.html" rel="prev" title="cons">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="consp">
+<div class="nav-panel">
+<p>
+Next: <a href="atom.html" accesskey="n" rel="next">atom                                                             [Function]</a>, Previous: <a href="cons.html" accesskey="p" rel="prev">cons                                                             [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="consp-_005bFunction_005d"><span>14.2.6 consp                                                            [Function]<a class="copiable-link" href="#consp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">consp</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-275"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-275"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-376"><span>Description::<a class="copiable-link" href="#Description_003a_003a-376"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">cons</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-259"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-259"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (consp nil) &rArr;  <i class="i">false</i>
+ (consp (cons 1 2)) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<p>The <i class="i">empty list</i> is not a <i class="i">cons</i>, so
+</p>
+<div class="example">
+<pre class="example-preformatted"> (consp '()) &equiv; (consp 'nil) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-304"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-304"> &para;</a></span></h4>
+
+<p><a class="ref" href="listp.html">listp                                                            [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-198"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-198"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (consp <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'cons) &equiv; (not (typep <i class="i">object</i> 'atom)) &equiv; (typep <i class="i">object</i> '(not atom))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/constantly.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>constantly (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="constantly (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="constantly (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="every.html" rel="next" title="every">
+<link href="complement.html" rel="prev" title="complement">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="constantly">
+<div class="nav-panel">
+<p>
+Next: <a href="every.html" accesskey="n" rel="next">every, some, notevery, notany                                    [Function]</a>, Previous: <a href="complement.html" accesskey="p" rel="prev">complement                                                       [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="constantly-_005bFunction_005d"><span>5.3.39 constantly                                                       [Function]<a class="copiable-link" href="#constantly-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">constantly</code>  <i class="i">value</i> &rArr;  <i class="i">function</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-58"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-58"> &para;</a></span></h4>
+
+<p><i class="i">value</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">function</i>&mdash;a <i class="i">function</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-92"><span>Description::<a class="copiable-link" href="#Description_003a_003a-92"> &para;</a></span></h4>
+
+<p><b class="b">constantly</b> returns a <i class="i">function</i> that accepts any number of
+arguments, that has no side-effects, and that always returns <i class="i">value</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-66"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-66"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (mapcar (constantly 3) '(a b c d)) &rArr;  (3 3 3 3)
+ (defmacro with-vars (vars &amp;body forms)
+   `((lambda ,vars ,@forms) ,@(mapcar (constantly nil) vars)))
+&rArr;  WITH-VARS
+ (macroexpand '(with-vars (a b) (setq a 3 b (* a a)) (list a b)))
+&rArr;  ((LAMBDA (A B) (SETQ A 3 B (* A A)) (LIST A B)) NIL NIL), <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-76"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-76"> &para;</a></span></h4>
+
+<p><a class="ref" href="not.html">not                                                              [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-48"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-48"> &para;</a></span></h4>
+
+<p><b class="b">constantly</b> could be defined by:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun constantly (object)
+   #'(lambda (&amp;rest arguments) object))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/constantp.html
@@ -0,0 +1,148 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>constantp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="constantp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="constantp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="special_002doperator_002dp.html" rel="prev" title="special-operator-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="constantp">
+<div class="nav-panel">
+<p>
+Previous: <a href="special_002doperator_002dp.html" accesskey="p" rel="prev">special-operator-p                                               [Function]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="constantp-_005bFunction_005d"><span>3.8.30 constantp                                                        [Function]<a class="copiable-link" href="#constantp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">constantp</code>  <i class="i">form <span class="r">&amp;optional</span> environment</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-18"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-18"> &para;</a></span></h4>
+
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">environment</i>&mdash;an <i class="i">environment</i> <i class="i">object</i>.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-29"><span>Description::<a class="copiable-link" href="#Description_003a_003a-29"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">form</i> can be determined
+by the <i class="i">implementation</i> to be a <i class="i">constant form</i> 
+in the indicated <i class="i">environment</i>; 
+otherwise, it returns <i class="i">false</i> indicating either 
+    that the <i class="i">form</i> is not a <i class="i">constant form</i>
+ or that it cannot be determined whether or not <i class="i">form</i> is a <i class="i">constant form</i>.
+</p>
+<p>The following kinds of <i class="i">forms</i> are considered <i class="i">constant forms</i>:
+</p><dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p><i class="i">Self-evaluating objects</i> 
+  (such as <i class="i">numbers</i>, 
+           <i class="i">characters</i>,
+       and the various kinds of <i class="i">arrays</i>)
+  are always considered <i class="i">constant forms</i> 
+  and must be recognized as such by <b class="b">constantp</b>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><i class="i">Constant variables</i>, such as <i class="i">keywords</i>,
+  symbols defined by <span class="r">Common Lisp</span> as constant (such as <b class="b">nil</b>, <b class="b">t</b>, and <b class="b">pi</b>),
+  and symbols declared as constant by the user in the indicated <i class="i">environment</i>
+   using <b class="b">defconstant</b>
+  are always considered <i class="i">constant forms</i>
+  and must be recognized as such by <b class="b">constantp</b>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">quote</b> <i class="i">forms</i> are always considered <i class="i">constant forms</i>
+  and must be recognized as such by <b class="b">constantp</b>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>An <i class="i">implementation</i> is permitted, but not required, to detect
+  additional <i class="i">constant forms</i>.  If it does, it is also permitted,
+  but not required, to make use of information in the <i class="i">environment</i>.
+  Examples of <i class="i">constant forms</i> for which <b class="b">constantp</b> might
+  or might not return <i class="i">true</i> are:
+    <code class="t">(sqrt pi)</code>,
+    <code class="t">(+ 3 2)</code>,
+    <code class="t">(length '(a b c))</code>,
+  and
+    <code class="t">(let ((x 7)) (zerop x))</code>.
+</p></dd>
+</dl>
+
+<p>If an <i class="i">implementation</i> chooses to make use of the <i class="i">environment</i>
+information, such actions as expanding <i class="i">macros</i> or performing function
+inlining are permitted to be used, but not required; 
+however, expanding <i class="i">compiler macros</i> is not permitted.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-25"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-25"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (constantp 1) &rArr;  <i class="i">true</i>
+ (constantp 'temp) &rArr;  <i class="i">false</i>
+ (constantp ''temp)) &rArr;  <i class="i">true</i>
+ (defconstant this-is-a-constant 'never-changing) &rArr;  THIS-IS-A-CONSTANT 
+ (constantp 'this-is-a-constant) &rArr;  <i class="i">true</i>
+ (constantp &quot;temp&quot;) &rArr;  <i class="i">true</i>
+ (setq a 6) &rArr;  6 
+ (constantp a) &rArr;  <i class="i">true</i>
+ (constantp '(sin pi)) &rArr;  <i class="i">implementation-dependent</i>
+ (constantp '(car '(x))) &rArr;  <i class="i">implementation-dependent</i>
+ (constantp '(eql x x)) &rArr;  <i class="i">implementation-dependent</i>
+ (constantp '(typep x 'nil)) &rArr;  <i class="i">implementation-dependent</i>
+ (constantp '(typep x 't)) &rArr;  <i class="i">implementation-dependent</i>
+ (constantp '(values this-is-a-constant)) &rArr;  <i class="i">implementation-dependent</i>
+ (constantp '(values 'x 'y)) &rArr;  <i class="i">implementation-dependent</i>
+ (constantp '(let ((a '(a b c))) (+ (length a) 6))) &rArr;  <i class="i">implementation-dependent</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-3"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-3"> &para;</a></span></h4>
+
+<p>The state of the global environment (<i class="i">e.g.</i>, which <i class="i">symbols</i> have been
+declared to be the <i class="i">names</i> of <i class="i">constant variables</i>).
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-28"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-28"> &para;</a></span></h4>
+
+<p><a class="ref" href="defconstant.html">defconstant                                                         [Macro]</a>
+</p>
+
+
+
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="special_002doperator_002dp.html">special-operator-p                                               [Function]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/continue.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>continue (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="continue (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="continue (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="muffle_002dwarning.html" rel="next" title="muffle-warning">
+<link href="abort-_0028Restart_0029.html" rel="prev" title="abort (Restart)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="continue">
+<div class="nav-panel">
+<p>
+Next: <a href="muffle_002dwarning.html" accesskey="n" rel="next">muffle-warning                                                    [Restart]</a>, Previous: <a href="abort-_0028Restart_0029.html" accesskey="p" rel="prev">abort                                                             [Restart]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="continue-_005bRestart_005d"><span>9.2.42 continue                                                          [Restart]<a class="copiable-link" href="#continue-_005bRestart_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Data-Arguments-Required_003a_003a-1"><span>Data Arguments Required::<a class="copiable-link" href="#Data-Arguments-Required_003a_003a-1"> &para;</a></span></h4>
+
+<p>None.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-212"><span>Description::<a class="copiable-link" href="#Description_003a_003a-212"> &para;</a></span></h4>
+
+<p>The <b class="b">continue</b> <i class="i">restart</i> is generally part of protocols where there is
+  a single &ldquo;obvious&rdquo; way to continue, such as in 
+<b class="b">break</b> and <b class="b">cerror</b>.  Some
+  user-defined protocols may also wish to incorporate it for similar reasons.
+  In general, however, it is more reliable to design a special purpose restart
+  with a name that more directly suits the particular application.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-137"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-137"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((x 3))
+   (handler-bind ((error #'(lambda (c)
+                             (let ((r (find-restart 'continue c)))
+                               (when r (invoke-restart r))))))
+     (cond ((not (floatp x))
+            (cerror &quot;Try floating it.&quot; &quot;~D is not a float.&quot; x)
+            (float x))
+           (t x)))) &rArr;  3.0
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-186"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-186"> &para;</a></span></h4>
+
+<p><a class="ref" href="Restarts.html">Restarts</a>,
+<a class="ref" href="Interfaces-to-Restarts.html">Interfaces to Restarts</a>,
+<a class="ref" href="invoke_002drestart.html">invoke-restart                                                   [Function]</a>
+,
+<a class="ref" href="#continue">continue                                                          [Restart]</a>
+ (<i class="i">function</i>),
+<a class="ref" href="assert.html">assert                                                              [Macro]</a>
+,
+<a class="ref" href="cerror.html">cerror                                                           [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/control_002derror.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>control-error (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="control-error (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="control-error (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="program_002derror.html" rel="next" title="program-error">
+<link href="rotatef.html" rel="prev" title="rotatef">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="control_002derror">
+<div class="nav-panel">
+<p>
+Next: <a href="program_002derror.html" accesskey="n" rel="next">program-error                                              [Condition Type]</a>, Previous: <a href="rotatef.html" accesskey="p" rel="prev">rotatef                                                             [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="control_002derror-_005bCondition-Type_005d"><span>5.3.67 control-error                                              [Condition Type]<a class="copiable-link" href="#control_002derror-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-15"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-15"> &para;</a></span></h4>
+<p><b class="b">control-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-120"><span>Description::<a class="copiable-link" href="#Description_003a_003a-120"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">control-error</b> consists of error conditions that result from
+invalid dynamic transfers of control in a program.  The errors that
+result from giving <b class="b">throw</b> a tag that is not active or from
+giving <b class="b">go</b> or <b class="b">return-from</b> a tag that is no longer
+dynamically available are of <i class="i">type</i> <b class="b">control-error</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/copy_002dalist.html
@@ -0,0 +1,84 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>copy-alist (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="copy-alist (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="copy-alist (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="pairlis.html" rel="next" title="pairlis">
+<link href="assoc.html" rel="prev" title="assoc">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="copy_002dalist">
+<div class="nav-panel">
+<p>
+Next: <a href="pairlis.html" accesskey="n" rel="next">pairlis                                                          [Function]</a>, Previous: <a href="assoc.html" accesskey="p" rel="prev">assoc, assoc-if, assoc-if-not                                    [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="copy_002dalist-_005bFunction_005d"><span>14.2.37 copy-alist                                                       [Function]<a class="copiable-link" href="#copy_002dalist-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">copy-alist</code>  <i class="i">alist</i> &rArr;  <i class="i">new-alist</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-306"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-306"> &para;</a></span></h4>
+
+<p><i class="i">alist</i>&mdash;an <i class="i">association list</i>.
+</p>
+<p><i class="i">new-alist</i>&mdash;an <i class="i">association list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-407"><span>Description::<a class="copiable-link" href="#Description_003a_003a-407"> &para;</a></span></h4>
+
+<p><b class="b">copy-alist</b> returns a <i class="i">copy</i> of <i class="i">alist</i>.
+</p>
+<p>The <i class="i">list structure</i> of <i class="i">alist</i> is copied,
+and the <i class="i">elements</i> of <i class="i">alist</i> which are <i class="i">conses</i> are
+also copied (as <i class="i">conses</i> only). 
+Any other <i class="i">objects</i> which are referred to, 
+whether directly or indirectly,
+by the <i class="i">alist</i> continue to be shared.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-290"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-290"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">(defparameter *alist* (acons 1 &quot;one&quot; (acons 2 &quot;two&quot; '())))
+*alist* &rArr;  ((1 . &quot;one&quot;) (2 . &quot;two&quot;))
+(defparameter *list-copy* (copy-list *alist*))
+*list-copy* &rArr;  ((1 . &quot;one&quot;) (2 . &quot;two&quot;))
+(defparameter *alist-copy* (copy-alist *alist*))
+*alist-copy* &rArr;  ((1 . &quot;one&quot;) (2 . &quot;two&quot;))
+(setf (cdr (assoc 2 *alist-copy*)) &quot;deux&quot;) &rArr;  &quot;deux&quot;
+*alist-copy* &rArr;  ((1 . &quot;one&quot;) (2 . &quot;deux&quot;))
+*alist* &rArr;  ((1 . &quot;one&quot;) (2 . &quot;two&quot;))
+(setf (cdr (assoc 1 *list-copy*)) &quot;uno&quot;) &rArr;  &quot;uno&quot;
+*list-copy* &rArr;  ((1 . &quot;uno&quot;) (2 . &quot;two&quot;))
+*alist* &rArr;  ((1 . &quot;uno&quot;) (2 . &quot;two&quot;))
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-331"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-331"> &para;</a></span></h4>
+
+<p><a class="ref" href="copy_002dlist.html">copy-list                                                        [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/copy_002dlist.html
@@ -0,0 +1,96 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>copy-list (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="copy-list (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="copy-list (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="list-_0028Function_0029.html" rel="next" title="list (Function)">
+<link href="tree_002dequal.html" rel="prev" title="tree-equal">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="copy_002dlist">
+<div class="nav-panel">
+<p>
+Next: <a href="list-_0028Function_0029.html" accesskey="n" rel="next">list, list*                                                      [Function]</a>, Previous: <a href="tree_002dequal.html" accesskey="p" rel="prev">tree-equal                                                       [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="copy_002dlist-_005bFunction_005d"><span>14.2.14 copy-list                                                        [Function]<a class="copiable-link" href="#copy_002dlist-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">copy-list</code>  <i class="i">list</i> &rArr;  <i class="i">copy</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-283"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-283"> &para;</a></span></h4>
+
+<p><i class="i">list</i>&mdash;a <i class="i">proper list</i> or a <i class="i">dotted list</i>.
+</p>
+<p><i class="i">copy</i>&mdash;a <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-384"><span>Description::<a class="copiable-link" href="#Description_003a_003a-384"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">copy</i> of <i class="i">list</i>.
+If <i class="i">list</i> is a <i class="i">dotted list</i>,
+the resulting <i class="i">list</i> will also be a <i class="i">dotted list</i>.
+</p>
+<p>Only the <i class="i">list structure</i> of <i class="i">list</i> is copied; 
+the <i class="i">elements</i> of the resulting list are 
+the <i class="i">same</i> as the corresponding <i class="i">elements</i> of the given <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-267"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-267"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq lst (list 1 (list 2 3))) &rArr;  (1 (2 3))
+ (setq slst lst) &rArr;  (1 (2 3))
+ (setq clst (copy-list lst)) &rArr;  (1 (2 3))
+ (eq slst lst) &rArr;  <i class="i">true</i>
+ (eq clst lst) &rArr;  <i class="i">false</i>
+ (equal clst lst) &rArr;  <i class="i">true</i>
+ (rplaca lst &quot;one&quot;) &rArr;  (&quot;one&quot; (2 3))
+ slst &rArr;  (&quot;one&quot; (2 3))
+ clst &rArr;  (1 (2 3))
+ (setf (caadr lst) &quot;two&quot;) &rArr;  &quot;two&quot;
+ lst &rArr;  (&quot;one&quot; (&quot;two&quot; 3))
+ slst &rArr;  (&quot;one&quot; (&quot;two&quot; 3))
+ clst &rArr;  (1 (&quot;two&quot; 3))
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-120"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-120"> &para;</a></span></h4>
+
+<p>The consequences are undefined if <i class="i">list</i> is a <i class="i">circular list</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-310"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-310"> &para;</a></span></h4>
+
+<p><a class="ref" href="copy_002dalist.html">copy-alist                                                       [Function]</a>
+,
+<a class="ref" href="copy_002dseq.html">copy-seq                                                         [Function]</a>
+,
+<a class="ref" href="copy_002dtree.html">copy-tree                                                        [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-204"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-204"> &para;</a></span></h4>
+
+<p>The copy created is <b class="b">equal</b> to <i class="i">list</i>, but not <b class="b">eq</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/copy_002dpprint_002ddispatch.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>copy-pprint-dispatch (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="copy-pprint-dispatch (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="copy-pprint-dispatch (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="formatter.html" rel="next" title="formatter">
+<link href="Printer-Dictionary.html" rel="prev" title="Printer Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="copy_002dpprint_002ddispatch">
+<div class="nav-panel">
+<p>
+Next: <a href="formatter.html" accesskey="n" rel="next">formatter                                                           [Macro]</a>, Previous: <a href="Printer-Dictionary.html" accesskey="p" rel="prev">Printer Dictionary</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="copy_002dpprint_002ddispatch-_005bFunction_005d"><span>22.4.1 copy-pprint-dispatch                                             [Function]<a class="copiable-link" href="#copy_002dpprint_002ddispatch-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">copy-pprint-dispatch</code>  <i class="i"><span class="r">&amp;optional</span> table</i> &rArr;  <i class="i">new-table</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-455"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-455"> &para;</a></span></h4>
+
+<p><i class="i">table</i>&mdash;a <i class="i">pprint dispatch table</i>, or <b class="b">nil</b>.
+</p>
+<p><i class="i">new-table</i>&mdash;a <i class="i">fresh</i> <i class="i">pprint dispatch table</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-589"><span>Description::<a class="copiable-link" href="#Description_003a_003a-589"> &para;</a></span></h4>
+
+<p>Creates and returns a copy of the specified <i class="i">table</i>, 
+or of the <i class="i">value</i> of <b class="b">*print-pprint-dispatch*</b> if no <i class="i">table</i> is specified,
+or of the initial <i class="i">value</i> of <b class="b">*print-pprint-dispatch*</b> if <b class="b">nil</b> is specified.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-217"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-217"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b> if <i class="i">table</i> 
+is not a <i class="i">pprint dispatch table</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/copy_002dreadtable.html
@@ -0,0 +1,116 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>copy-readtable (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="copy-readtable (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="copy-readtable (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="make_002ddispatch_002dmacro_002dcharacter.html" rel="next" title="make-dispatch-macro-character">
+<link href="readtable.html" rel="prev" title="readtable">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="copy_002dreadtable">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002ddispatch_002dmacro_002dcharacter.html" accesskey="n" rel="next">make-dispatch-macro-character                                    [Function]</a>, Previous: <a href="readtable.html" accesskey="p" rel="prev">readtable                                                    [System Class]</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="copy_002dreadtable-_005bFunction_005d"><span>23.2.2 copy-readtable                                                   [Function]<a class="copiable-link" href="#copy_002dreadtable-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">copy-readtable</code>  <i class="i"><span class="r">&amp;optional</span> from-readtable to-readtable</i> &rArr;  <i class="i">readtable</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-471"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-471"> &para;</a></span></h4>
+
+<p><i class="i">from-readtable</i>&mdash;a <i class="i">readtable designator</i>.
+ The default is the <i class="i">current readtable</i>.
+</p>
+<p><i class="i">to-readtable</i>&mdash;a <i class="i">readtable</i> or <b class="b">nil</b>.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">readtable</i>&mdash;the <i class="i">to-readtable</i> if it is <i class="i">non-nil</i>,
+  or else a <i class="i">fresh</i> <i class="i">readtable</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-621"><span>Description::<a class="copiable-link" href="#Description_003a_003a-621"> &para;</a></span></h4>
+
+<p><b class="b">copy-readtable</b> copies <i class="i">from-readtable</i>.
+</p>
+<p>If <i class="i">to-readtable</i> is <b class="b">nil</b>, a new <i class="i">readtable</i> is created and returned.  
+Otherwise the <i class="i">readtable</i> specified by <i class="i">to-readtable</i> is modified and returned.
+</p>
+<p><b class="b">copy-readtable</b> copies the setting of <b class="b">readtable-case</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-442"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-442"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq zvar 123) &rArr;  123
+ (set-syntax-from-char #\z #\' (setq table2 (copy-readtable))) &rArr;  T
+ zvar &rArr;  123
+ (copy-readtable table2 *readtable*) &rArr;  #&lt;READTABLE 614000277&gt;
+ zvar &rArr;  VAR
+ (setq *readtable* (copy-readtable)) &rArr;  #&lt;READTABLE 46210223&gt;
+ zvar &rArr;  VAR
+ (setq *readtable* (copy-readtable nil)) &rArr;  #&lt;READTABLE 46302670&gt;
+ zvar &rArr;  123
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-504"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-504"> &para;</a></span></h4>
+
+<p><b class="b">readtable</b>,
+<a class="ref" href="readtable.html">readtable                                                    [System Class]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-312"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-312"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">(setq *readtable* (copy-readtable nil))
+</pre></div>
+
+<p>restores the input syntax to standard <span class="r">Common Lisp</span> syntax, even if
+the <i class="i">initial readtable</i> has been clobbered 
+(assuming it is not so badly clobbered that you cannot type in the above expression).
+</p>
+<p>On the other hand,
+</p>
+<div class="example">
+<pre class="example-preformatted">(setq *readtable* (copy-readtable))
+</pre></div>
+
+<p>replaces the current <i class="i">readtable</i> with a copy of itself.
+This is useful if you want to save a copy of a readtable for later use,
+protected from alteration in the meantime.  It is also useful if you want to
+locally bind the readtable to a copy of itself, as in:
+</p>
+<div class="example">
+<pre class="example-preformatted">(let ((*readtable* (copy-readtable))) ...)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="make_002ddispatch_002dmacro_002dcharacter.html">make-dispatch-macro-character                                    [Function]</a>, Previous: <a href="readtable.html">readtable                                                    [System Class]</a>, Up: <a href="Reader-Dictionary.html">Reader Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/copy_002dseq.html
@@ -0,0 +1,90 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>copy-seq (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="copy-seq (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="copy-seq (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="elt.html" rel="next" title="elt">
+<link href="sequence.html" rel="prev" title="sequence">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="copy_002dseq">
+<div class="nav-panel">
+<p>
+Next: <a href="elt.html" accesskey="n" rel="next">elt                                                              [Accessor]</a>, Previous: <a href="sequence.html" accesskey="p" rel="prev">sequence                                                     [System Class]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="copy_002dseq-_005bFunction_005d"><span>17.3.2 copy-seq                                                         [Function]<a class="copiable-link" href="#copy_002dseq-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">copy-seq</code>  <i class="i">sequence</i> &rArr;  <i class="i">copied-sequence</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-354"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-354"> &para;</a></span></h4>
+
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">copied-sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-469"><span>Description::<a class="copiable-link" href="#Description_003a_003a-469"> &para;</a></span></h4>
+
+<p>Creates a copy of <i class="i">sequence</i>.  The <i class="i">elements</i> of the new
+<i class="i">sequence</i> are the <i class="i">same</i> as the corresponding <i class="i">elements</i> of
+the given <i class="i">sequence</i>.
+</p>
+<p>If <i class="i">sequence</i> is a <i class="i">vector</i>, 
+the result is a <i class="i">fresh</i> <i class="i">simple array</i>
+of <i class="i">rank</i> one 
+that has the same <i class="i">actual array element type</i> as <i class="i">sequence</i>.
+If <i class="i">sequence</i> is a <i class="i">list</i>, 
+the result is a <i class="i">fresh</i> <i class="i">list</i>. 
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-336"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-336"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (setq str &quot;a string&quot;) &rArr;  &quot;a string&quot;
+ (equalp str (copy-seq str)) &rArr;  <i class="i">true</i>
+ (eql str (copy-seq str)) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-150"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-150"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-381"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-381"> &para;</a></span></h4>
+
+<p><a class="ref" href="copy_002dlist.html">copy-list                                                        [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-256"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-256"> &para;</a></span></h4>
+
+<p>From a functional standpoint,
+</p><div class="example">
+<pre class="example-preformatted"> (copy-seq x) &equiv; (subseq x 0)
+</pre></div>
+
+<p>However, the programmer intent is typically very different in these two cases.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/copy_002dstructure.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>copy-structure (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="copy-structure (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="copy-structure (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Structures-Dictionary.html" rel="up" title="Structures Dictionary">
+<link href="defstruct.html" rel="prev" title="defstruct">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="copy_002dstructure">
+<div class="nav-panel">
+<p>
+Previous: <a href="defstruct.html" accesskey="p" rel="prev">defstruct                                                           [Macro]</a>, Up: <a href="Structures-Dictionary.html" accesskey="u" rel="up">Structures Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="copy_002dstructure-_005bFunction_005d"><span>8.1.2 copy-structure                                                   [Function]<a class="copiable-link" href="#copy_002dstructure-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">copy-structure</code>  <i class="i">structure</i> &rArr;  <i class="i">copy</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-130"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-130"> &para;</a></span></h4>
+
+<p><i class="i">structure</i>&mdash;a <i class="i">structure</i>.
+</p>
+<p><i class="i">copy</i>&mdash;a copy of the <i class="i">structure</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-170"><span>Description::<a class="copiable-link" href="#Description_003a_003a-170"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">copy</i>_6 of the <i class="i">structure</i>.
+</p>
+<p>Only the <i class="i">structure</i> itself is copied; not the values of the slots.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-152"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-152"> &para;</a></span></h4>
+
+<p>the <code class="t">:copier</code> option to 
+<a class="ref" href="defstruct.html">defstruct                                                           [Macro]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-93"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-93"> &para;</a></span></h4>
+
+<p>The <i class="i">copy</i> is the <i class="i">same</i> as the given <i class="i">structure</i>
+under <b class="b">equalp</b>, but not under <b class="b">equal</b>.
+</p>
+
+
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/copy_002dsymbol.html
@@ -0,0 +1,123 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>copy-symbol (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="copy-symbol (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="copy-symbol (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="gensym.html" rel="next" title="gensym">
+<link href="make_002dsymbol.html" rel="prev" title="make-symbol">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="copy_002dsymbol">
+<div class="nav-panel">
+<p>
+Next: <a href="gensym.html" accesskey="n" rel="next">gensym                                                           [Function]</a>, Previous: <a href="make_002dsymbol.html" accesskey="p" rel="prev">make-symbol                                                      [Function]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="copy_002dsymbol-_005bFunction_005d"><span>10.2.6 copy-symbol                                                      [Function]<a class="copiable-link" href="#copy_002dsymbol-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">copy-symbol</code>  <i class="i">symbol <span class="r">&amp;optional</span> copy-properties</i> &rArr;  <i class="i">new-symbol</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-161"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-161"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">copy-properties</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is <i class="i">false</i>.
+</p>
+<p><i class="i">new-symbol</i>&mdash;a <i class="i">fresh</i>, <i class="i">uninterned</i> <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-222"><span>Description::<a class="copiable-link" href="#Description_003a_003a-222"> &para;</a></span></h4>
+
+<p><b class="b">copy-symbol</b> returns a <i class="i">fresh</i>, <i class="i">uninterned</i> <i class="i">symbol</i>,
+the <i class="i">name</i> of which is <b class="b">string=</b> to and possibly the <i class="i">same</i> as
+the <i class="i">name</i> of the given <i class="i">symbol</i>.
+</p>
+<p>If <i class="i">copy-properties</i> is <i class="i">false</i>,
+the <i class="i">new-symbol</i> is neither <i class="i">bound</i> nor <i class="i">fbound</i> 
+and has a <i class="i">null</i> <i class="i">property list</i>.
+If <i class="i">copy-properties</i> is <i class="i">true</i>, then
+the initial <i class="i">value</i> of <i class="i">new-symbol</i> is
+ the <i class="i">value</i> of <i class="i">symbol</i>,
+the initial <i class="i">function</i> definition of <i class="i">new-symbol</i> is
+ the <i class="i">functional value</i> of <i class="i">symbol</i>,
+and the <i class="i">property list</i> of <i class="i">new-symbol</i> is
+</p>
+<p>a <i class="i">copy</i>_2 of the <i class="i">property list</i> of <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-144"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-144"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq fred 'fred-smith) &rArr;  FRED-SMITH
+ (setf (symbol-value fred) 3) &rArr;  3
+ (setq fred-clone-1a (copy-symbol fred nil)) &rArr;  #:FRED-SMITH
+ (setq fred-clone-1b (copy-symbol fred nil)) &rArr;  #:FRED-SMITH
+ (setq fred-clone-2a (copy-symbol fred t))   &rArr;  #:FRED-SMITH
+ (setq fred-clone-2b (copy-symbol fred t))   &rArr;  #:FRED-SMITH
+ (eq fred fred-clone-1a) &rArr;  <i class="i">false</i>
+ (eq fred-clone-1a fred-clone-1b) &rArr;  <i class="i">false</i>
+ (eq fred-clone-2a fred-clone-2b) &rArr;  <i class="i">false</i>
+ (eq fred-clone-1a fred-clone-2a) &rArr;  <i class="i">false</i>
+ (symbol-value fred) &rArr;  3
+ (boundp fred-clone-1a) &rArr;  <i class="i">false</i>
+ (symbol-value fred-clone-2a) &rArr;  3
+ (setf (symbol-value fred-clone-2a) 4) &rArr;  4
+ (symbol-value fred) &rArr;  3
+ (symbol-value fred-clone-2a) &rArr;  4
+ (symbol-value fred-clone-2b) &rArr;  3
+ (boundp fred-clone-1a) &rArr;  <i class="i">false</i>
+ (setf (symbol-function fred) #'(lambda (x) x)) &rArr;  #&lt;FUNCTION anonymous&gt;
+ (fboundp fred) &rArr;  <i class="i">true</i>
+ (fboundp fred-clone-1a) &rArr;  <i class="i">false</i>
+ (fboundp fred-clone-2a) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-51"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-51"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">symbol</i> is not a <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-196"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-196"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dsymbol.html">make-symbol                                                      [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-117"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-117"> &para;</a></span></h4>
+
+<p>Implementors are encouraged not to copy the <i class="i">string</i> 
+which is the <i class="i">symbol</i>&rsquo;s <i class="i">name</i> unnecessarily.  
+Unless there is a good reason to do so, the normal implementation
+strategy is for the <i class="i">new-symbol</i>&rsquo;s <i class="i">name</i> to
+be <i class="i">identical</i> to the given <i class="i">symbol</i>&rsquo;s <i class="i">name</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="gensym.html">gensym                                                           [Function]</a>, Previous: <a href="make_002dsymbol.html">make-symbol                                                      [Function]</a>, Up: <a href="Symbols-Dictionary.html">Symbols Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/copy_002dtree.html
@@ -0,0 +1,92 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>copy-tree (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="copy-tree (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="copy-tree (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="sublis.html" rel="next" title="sublis">
+<link href="car.html" rel="prev" title="car">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="copy_002dtree">
+<div class="nav-panel">
+<p>
+Next: <a href="sublis.html" accesskey="n" rel="next">sublis, nsublis                                                  [Function]</a>, Previous: <a href="car.html" accesskey="p" rel="prev">car,    cdr,</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="copy_002dtree-_005bFunction_005d"><span>14.2.10 copy-tree                                                        [Function]<a class="copiable-link" href="#copy_002dtree-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">copy-tree</code>  <i class="i">tree</i> &rArr;  <i class="i">new-tree</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-279"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-279"> &para;</a></span></h4>
+
+<p><i class="i">tree</i>&mdash;a <i class="i">tree</i>.
+</p>
+<p><i class="i">new-tree</i>&mdash;a <i class="i">tree</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-380"><span>Description::<a class="copiable-link" href="#Description_003a_003a-380"> &para;</a></span></h4>
+
+<p>Creates a <i class="i">copy</i> of a <i class="i">tree</i> of <i class="i">conses</i>.
+</p>
+<p>If <i class="i">tree</i> is not a <i class="i">cons</i>, it is returned; 
+otherwise, the result is a new <i class="i">cons</i> of the results of calling <b class="b">copy-tree</b> 
+on the <i class="i">car</i> and <i class="i">cdr</i> of <i class="i">tree</i>.
+In other words, all <i class="i">conses</i> in the <i class="i">tree</i> represented by <i class="i">tree</i>
+are copied recursively, stopping only when non-<i class="i">conses</i> are encountered.
+</p>
+<p><b class="b">copy-tree</b> does not preserve circularities and the sharing of substructure.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-263"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-263"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq object (list (cons 1 &quot;one&quot;)
+                    (cons 2 (list 'a 'b 'c))))
+&rArr;  ((1 . &quot;one&quot;) (2 A B C))
+ (setq object-too object) &rArr;  ((1 . &quot;one&quot;) (2 A B C))
+ (setq copy-as-list (copy-list object))
+ (setq copy-as-alist (copy-alist object))
+ (setq copy-as-tree (copy-tree object))
+ (eq object object-too) &rArr;  <i class="i">true</i>
+ (eq copy-as-tree object) &rArr;  <i class="i">false</i>
+ (eql copy-as-tree object) &rArr;  <i class="i">false</i>
+ (equal copy-as-tree object) &rArr;  <i class="i">true</i>
+ (setf (first (cdr (second object))) &quot;a&quot;
+       (car (second object)) &quot;two&quot;
+       (car object) '(one . 1)) &rArr;  (ONE . 1)
+ object &rArr;  ((ONE . 1) (&quot;two&quot; &quot;a&quot; B C))
+ object-too &rArr;  ((ONE . 1) (&quot;two&quot; &quot;a&quot; B C))
+ copy-as-list &rArr;  ((1 . &quot;one&quot;) (&quot;two&quot; &quot;a&quot; B C))
+ copy-as-alist &rArr;  ((1 . &quot;one&quot;) (2 &quot;a&quot; B C))
+ copy-as-tree &rArr;  ((1 . &quot;one&quot;) (2 A B C)) 
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-306"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-306"> &para;</a></span></h4>
+
+<p><a class="ref" href="tree_002dequal.html">tree-equal                                                       [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/count.html
@@ -0,0 +1,124 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>count (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="count (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="count (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="length.html" rel="next" title="length">
+<link href="reduce.html" rel="prev" title="reduce">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="count">
+<div class="nav-panel">
+<p>
+Next: <a href="length.html" accesskey="n" rel="next">length                                                           [Function]</a>, Previous: <a href="reduce.html" accesskey="p" rel="prev">reduce                                                           [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="count_002c-count_002dif_002c-count_002dif_002dnot-_005bFunction_005d"><span>17.3.10 count, count-if, count-if-not                                    [Function]<a class="copiable-link" href="#count_002c-count_002dif_002c-count_002dif_002dnot-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">count</code>  <i class="i">item sequence <span class="r">&amp;key</span> from-end start end key test test-not</i> &rArr;  <i class="i">n</i>
+</p>
+<p><code class="code">count-if</code>  <i class="i">predicate sequence <span class="r">&amp;key</span> from-end start end key</i> &rArr;  <i class="i">n</i>
+</p>
+<p><code class="code">count-if-not</code>  <i class="i">predicate sequence <span class="r">&amp;key</span> from-end start end key</i> &rArr;  <i class="i">n</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-362"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-362"> &para;</a></span></h4>
+
+<p><i class="i">item</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">predicate</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one <i class="i">argument</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">from-end</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is <i class="i">false</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">sequence</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">n</i>&mdash;a non-negative <i class="i">integer</i> 
+	    less than or equal to the <i class="i">length</i> of <i class="i">sequence</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-477"><span>Description::<a class="copiable-link" href="#Description_003a_003a-477"> &para;</a></span></h4>
+
+<p><b class="b">count</b>, <b class="b">count-if</b>, and <b class="b">count-if-not</b> 
+count and return the number of <i class="i">elements</i> in 
+the <i class="i">sequence</i> <i class="i">bounded</i> by <i class="i">start</i> and <i class="i">end</i>
+that <i class="i">satisfy the test</i>.
+</p>
+<p>The <i class="i">from-end</i> has no direct effect on the result.
+However, if <i class="i">from-end</i> is <i class="i">true</i>,
+the <i class="i">elements</i> of <i class="i">sequence</i> will be supplied as <i class="i">arguments</i> to
+      the <i class="i">test</i>,
+      <i class="i">test-not</i>,
+  and <i class="i">key</i> in reverse order,
+which may change the side-effects, if any, of those functions.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-344"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-344"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (count #\a &quot;how many A's are there in here?&quot;) &rArr;  2
+ (count-if-not #'oddp '((1) (2) (3) (4)) :key #'car) &rArr;  2
+ (count-if #'upper-case-p &quot;The Crying of Lot 49&quot; :start 4) &rArr;  2 
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-158"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-158"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-388"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-388"> &para;</a></span></h4>
+
+<p><a class="ref" href="Rules-about-Test-Functions.html">Rules about Test Functions</a>,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-261"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-261"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> <i class="i">argument</i> is deprecated.
+</p>
+<p>The <i class="i">function</i> <b class="b">count-if-not</b> is deprecated.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="length.html">length                                                           [Function]</a>, Previous: <a href="reduce.html">reduce                                                           [Function]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/declaim.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>declaim (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="declaim (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="declaim (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="declare.html" rel="next" title="declare">
+<link href="proclaim.html" rel="prev" title="proclaim">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="declaim">
+<div class="nav-panel">
+<p>
+Next: <a href="declare.html" accesskey="n" rel="next">declare                                                            [Symbol]</a>, Previous: <a href="proclaim.html" accesskey="p" rel="prev">proclaim                                                         [Function]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="declaim-_005bMacro_005d"><span>3.8.17 declaim                                                             [Macro]<a class="copiable-link" href="#declaim-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">declaim</code>  <i class="i">{<i class="i">declaration-specifier</i>}*</i> &rArr;  <i class="i"><i class="i">implementation-dependent</i></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-14"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-14"> &para;</a></span></h4>
+
+<p><i class="i">declaration-specifier</i>&mdash;a <i class="i">declaration specifier</i>; not evaluated.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-16"><span>Description::<a class="copiable-link" href="#Description_003a_003a-16"> &para;</a></span></h4>
+
+<p>Establishes the <i class="i">declarations</i> specified by the <i class="i">declaration-specifiers</i>.
+</p>
+<p>If a use of this macro appears as a <i class="i">top level form</i> in a <i class="i">file</i> 
+being processed by the <i class="i">file compiler</i>, the proclamations are also made
+at compile-time.  As with other defining macros, it is unspecified whether or
+not the compile-time side-effects of a <b class="b">declaim</b> persist after the
+<i class="i">file</i> has been <i class="i">compiled</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-14"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-14"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-16"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-16"> &para;</a></span></h4>
+
+<p><b class="b">declare</b>,
+<a class="ref" href="proclaim.html">proclaim                                                         [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/declaration.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>declaration (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="declaration (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="declaration (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="optimize.html" rel="next" title="optimize">
+<link href="ftype.html" rel="prev" title="ftype">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="declaration">
+<div class="nav-panel">
+<p>
+Next: <a href="optimize.html" accesskey="n" rel="next">optimize                                                      [Declaration]</a>, Previous: <a href="ftype.html" accesskey="p" rel="prev">ftype                                                         [Declaration]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="declaration-_005bDeclaration_005d"><span>3.8.24 declaration                                                   [Declaration]<a class="copiable-link" href="#declaration-_005bDeclaration_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-7"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-7"> &para;</a></span></h4>
+
+<p><code class="t">(declaration {<i class="i">name</i>}*)</code>
+</p>
+<h4 class="subsubheading" id="Arguments_003a_003a-7"><span>Arguments::<a class="copiable-link" href="#Arguments_003a_003a-7"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="Valid-Context_003a_003a-5"><span>Valid Context::<a class="copiable-link" href="#Valid-Context_003a_003a-5"> &para;</a></span></h4>
+
+<p><i class="i">proclamation</i> only
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-23"><span>Description::<a class="copiable-link" href="#Description_003a_003a-23"> &para;</a></span></h4>
+
+<p>Advises the compiler that each <i class="i">name</i> is a valid but potentially
+non-standard declaration name.  The purpose of this is to tell one
+compiler not to issue warnings for declarations meant for another 
+compiler or other program processor.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-19"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-19"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (declaim (declaration author target-language target-machine))
+ (declaim (target-language ada))
+ (declaim (target-machine IBM-650))
+ (defun strangep (x)
+   (declare (author &quot;Harry Tweeker&quot;))
+   (member x '(strange weird odd peculiar)))
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-23"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-23"> &para;</a></span></h4>
+
+<p><a class="ref" href="declaim.html">declaim                                                             [Macro]</a>
+,
+<a class="ref" href="proclaim.html">proclaim                                                         [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/declare.html
@@ -0,0 +1,169 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>declare (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="declare (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="declare (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="ignore.html" rel="next" title="ignore">
+<link href="declaim.html" rel="prev" title="declaim">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="declare">
+<div class="nav-panel">
+<p>
+Next: <a href="ignore.html" accesskey="n" rel="next">ignore, ignorable                                             [Declaration]</a>, Previous: <a href="declaim.html" accesskey="p" rel="prev">declaim                                                             [Macro]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="declare-_005bSymbol_005d"><span>3.8.18 declare                                                            [Symbol]<a class="copiable-link" href="#declare-_005bSymbol_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-1"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-1"> &para;</a></span></h4>
+
+<p><code class="code">declare</code>  <i class="i">{<i class="i">declaration-specifier</i>}*</i> 
+</p><h4 class="subsubheading" id="Arguments_003a_003a-1"><span>Arguments::<a class="copiable-link" href="#Arguments_003a_003a-1"> &para;</a></span></h4>
+
+<p><i class="i">declaration-specifier</i>&mdash;a <i class="i">declaration specifier</i>; not evaluated.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-17"><span>Description::<a class="copiable-link" href="#Description_003a_003a-17"> &para;</a></span></h4>
+
+<p>A <b class="b">declare</b> <i class="i">expression</i>, sometimes called a <i class="i">declaration</i>,
+can occur only at the beginning of the bodies of certain <i class="i">forms</i>;
+that is, it may be preceded only by other <b class="b">declare</b> <i class="i">expressions</i>,
+or by a <i class="i">documentation string</i> if the context permits.
+</p>
+<p>A <b class="b">declare</b> <i class="i">expression</i> can occur in a <i class="i">lambda expression</i>
+or in any of the <i class="i">forms</i> listed in Figure 3&ndash;23.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  defgeneric                 do-external-symbols   prog                      <!-- /@w -->
+  define-compiler-macro      do-symbols            prog*                     <!-- /@w -->
+  define-method-combination  dolist                restart-case              <!-- /@w -->
+  define-setf-expander       dotimes               symbol-macrolet           <!-- /@w -->
+  defmacro                   flet                  with-accessors            <!-- /@w -->
+  defmethod                  handler-case          with-hash-table-iterator  <!-- /@w -->
+  defsetf                    labels                with-input-from-string    <!-- /@w -->
+  deftype                    let                   with-open-file            <!-- /@w -->
+  defun                      let*                  with-open-stream          <!-- /@w -->
+  destructuring-bind         locally               with-output-to-string     <!-- /@w -->
+  do                         macrolet              with-package-iterator     <!-- /@w -->
+  do*                        multiple-value-bind   with-slots                <!-- /@w -->
+  do-all-symbols             pprint-logical-block                            <!-- /@w -->
+
+       Figure 3&ndash;23: Standardized Forms In Which Declarations Can Occur      <!-- /@w -->
+
+</pre></div></div>
+
+<p>A <b class="b">declare</b> <i class="i">expression</i> can only occur 
+where specified by the syntax of these <i class="i">forms</i>.
+The consequences of attempting to evaluate a <b class="b">declare</b> <i class="i">expression</i> 
+are undefined.  In situations where such <i class="i">expressions</i> can appear, 
+explicit checks are made for their presence and they are never actually evaluated;
+it is for this reason that they
+are called  &ldquo;<b class="b">declare</b> <i class="i">expressions</i>&rdquo;
+rather than &ldquo;<b class="b">declare</b> <i class="i">forms</i>.&rdquo;
+</p>
+<p><i class="i">Macro forms</i> cannot expand into declarations;
+<b class="b">declare</b> <i class="i">expressions</i> must appear as actual <i class="i">subexpressions</i> of
+the <i class="i">form</i> to which they refer.
+</p>
+<p>Figure 3&ndash;24 shows a list of <i class="i">declaration identifiers</i> 
+that can be used with <b class="b">declare</b>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  dynamic-extent  ignore     optimize  <!-- /@w -->
+  ftype           inline     special   <!-- /@w -->
+  ignorable       notinline  type      <!-- /@w -->
+
+  Figure 3&ndash;24: Local Declaration Specifiers<!-- /@w -->
+
+</pre></div></div>
+
+<p>An implementation is free to support other (<i class="i">implementation-defined</i>)
+<i class="i">declaration identifiers</i> as well.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-15"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-15"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun nonsense (k x z)
+   (foo z x)                     ;First call to foo
+   (let ((j (foo k x))           ;Second call to foo
+         (x (* k k)))
+     (declare (inline foo) (special x z))
+     (foo x j z)))               ;Third call to foo
+</pre></div>
+
+<p>In this example,
+the <b class="b">inline</b> declaration applies
+only to the third call to <code class="t">foo</code>, but not to the first or second ones.
+The <b class="b">special</b> declaration of <code class="t">x</code> causes <b class="b">let</b> 
+to make a dynamic <i class="i">binding</i> for <code class="t">x</code>, and causes the reference to 
+<code class="t">x</code>
+in the body of <b class="b">let</b> to be a dynamic reference.
+The reference to <code class="t">x</code> in the second call to <code class="t">foo</code> is a local reference
+to the second parameter of <code class="t">nonsense</code>.
+The reference to <code class="t">x</code> in the first call to <code class="t">foo</code> is a local
+reference, not a <b class="b">special</b> one.  The <b class="b">special</b> declaration of <code class="t">z</code>
+causes the reference to <code class="t">z</code> in the 
+third
+call
+to <code class="t">foo</code> to be a dynamic reference; it does not
+refer to the parameter to <code class="t">nonsense</code> named <code class="t">z</code>, because that
+parameter <i class="i">binding</i> has not been declared to be <b class="b">special</b>.
+(The <b class="b">special</b> declaration of <code class="t">z</code> does not appear in the body
+of <b class="b">defun</b>,  but in an inner <i class="i">form</i>, and therefore does not
+affect the <i class="i">binding</i> of the <i class="i">parameter</i>.)
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-5"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-5"> &para;</a></span></h4>
+
+<p>The consequences  of trying to use a <b class="b">declare</b> <i class="i">expression</i> as 
+a <i class="i">form</i> to be <i class="i">evaluated</i> are undefined.
+</p>
+<p>[Editorial Note by KMP: Probably we need to say something here about ill-formed 
+declare expressions.]
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-17"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-17"> &para;</a></span></h4>
+
+<p><a class="ref" href="proclaim.html">proclaim                                                         [Function]</a>
+,
+<a class="ref" href="Type-Specifiers.html">Type Specifiers</a>,
+<b class="b">declaration</b>,
+<b class="b">dynamic-extent</b>,
+<b class="b">ftype</b>,
+<b class="b">ignorable</b>,
+<b class="b">ignore</b>,
+<b class="b">inline</b>,
+<b class="b">notinline</b>,
+<b class="b">optimize</b>,
+<b class="b">type</b>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="ignore.html">ignore, ignorable                                             [Declaration]</a>, Previous: <a href="declaim.html">declaim                                                             [Macro]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/decode_002dfloat.html
@@ -0,0 +1,235 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>decode-float (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="decode-float (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="decode-float (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="float.html" rel="next" title="float">
+<link href="most_002dpositive_002dfixnum.html" rel="prev" title="most-positive-fixnum">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="decode_002dfloat">
+<div class="nav-panel">
+<p>
+Next: <a href="float.html" accesskey="n" rel="next">float                                                            [Function]</a>, Previous: <a href="most_002dpositive_002dfixnum.html" accesskey="p" rel="prev">most-positive-fixnum, most-negative-fixnum              [Constant Variable]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="decode_002dfloat_002c-scale_002dfloat_002c-float_002dradix_002c-float_002dsign_002c"><span>12.2.73 decode-float, scale-float, float-radix, float-sign,<a class="copiable-link" href="#decode_002dfloat_002c-scale_002dfloat_002c-float_002dradix_002c-float_002dsign_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="float_002ddigits_002c-float_002dprecision_002c-integer_002ddecode_002dfloat"><span>float-digits, float-precision, integer-decode-float<a class="copiable-link" href="#float_002ddigits_002c-float_002dprecision_002c-integer_002ddecode_002dfloat"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Function]</i>
+</p></div>
+<p><code class="code">decode-float</code>  <i class="i">float</i> &rArr;  <i class="i">significand, exponent, sign</i>
+</p>
+<p><code class="code">scale-float</code>  <i class="i">float integer</i> &rArr;  <i class="i">scaled-float</i>
+</p>
+<p><code class="code">float-radix</code>  <i class="i">float</i> &rArr;  <i class="i">float-radix</i>
+</p>
+<p><code class="code">float-sign</code>  <i class="i">float-1 <span class="r">&amp;optional</span> float-2</i> &rArr;  <i class="i">signed-float</i>
+</p>
+<p><code class="code">float-digits</code>  <i class="i">float</i> &rArr;  <i class="i">digits1</i>
+</p>
+<p><code class="code">float-precision</code>  <i class="i">float</i> &rArr;  <i class="i">digits2</i>
+</p>
+<p><code class="code">integer-decode-float</code>  <i class="i">float</i> &rArr;  <i class="i">significand, exponent, integer-sign</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-254"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-254"> &para;</a></span></h4>
+
+<p><i class="i">digits1</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<p><i class="i">digits2</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<p><i class="i">exponent</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">float</i>&mdash;a <i class="i">float</i>.
+</p>
+<p><i class="i">float-1</i>&mdash;a <i class="i">float</i>.
+</p>
+<p><i class="i">float-2</i>&mdash;a <i class="i">float</i>.
+</p>
+<p><i class="i">float-radix</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">integer</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<p><i class="i">integer-sign</i>&mdash;the <i class="i">integer</i> <code class="t">-1</code>,
+		    or the <i class="i">integer</i> <code class="t">1</code>.
+</p>
+<p><i class="i">scaled-float</i>&mdash;a <i class="i">float</i>.
+</p>
+<p><i class="i">sign</i>&mdash;A <i class="i">float</i> of the same <i class="i">type</i> as <i class="i">float</i>
+	       but numerically equal to <code class="t">1.0</code> or <code class="t">-1.0</code>.
+</p>
+<p><i class="i">signed-float</i>&mdash;a <i class="i">float</i>.
+</p>
+<p><i class="i">significand</i>&mdash;a <i class="i">float</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-338"><span>Description::<a class="copiable-link" href="#Description_003a_003a-338"> &para;</a></span></h4>
+
+<p><b class="b">decode-float</b> computes three values that characterize
+<i class="i">float</i>.
+The first value is of the same <i class="i">type</i>
+as <i class="i">float</i> and 
+represents the significand.
+The second value represents the exponent
+to which the radix (notated in this description by <i class="i">b</i>) must
+be raised to obtain the value that, when multiplied with the first
+result, produces the absolute value of <i class="i">float</i>.
+If <i class="i">float</i> is zero, any <i class="i">integer</i> value may be returned, 
+provided that the identity shown for <b class="b">scale-float</b> holds.
+The third value
+is of the same <i class="i">type</i> as <i class="i">float</i>
+and is 1.0 if <i class="i">float</i> is greater
+than or equal to zero or -1.0 otherwise.
+</p>
+<p><b class="b">decode-float</b> 
+divides <i class="i">float</i> by an integral power of <i class="i">b</i>
+so as to bring its value between 1/<i class="i">b</i> (inclusive) and~1 (exclusive),
+and returns the quotient as the first value.
+If <i class="i">float</i> is zero, however, the result
+equals the absolute value of <i class="i">float</i> (that is, if there is a negative
+zero, its significand is considered to be a positive zero).
+</p>
+<p><b class="b">scale-float</b> returns
+<code class="t">(* <i class="i">float</i> (expt (float <i class="i">b</i> <i class="i">float</i>) 
+<i class="i">integer</i>))\/</code>, where <i class="i">b</i> is the radix of the floating-point
+representation. <i class="i">float</i> is not necessarily between 1/<i class="i">b</i> and~1.
+</p>
+<p><b class="b">float-radix</b> returns 
+the radix of <i class="i">float</i>.
+</p>
+<p><b class="b">float-sign</b> returns a number <code class="t">z</code> such
+that <code class="t">z</code> and <i class="i">float-1</i> have the same sign and also such that
+<code class="t">z</code> and <i class="i">float-2</i> have the same absolute value.
+If <i class="i">float-2</i> is not supplied, its value is <code class="t">(float 1 <i class="i">float-1</i>)</code>.
+If an implementation
+has distinct representations for negative zero and positive zero,
+then <code class="t">(float-sign -0.0)</code> &rArr;  <code class="t">-1.0</code>.
+</p>
+<p><b class="b">float-digits</b> returns
+the number of radix <i class="i">b</i> digits
+used in the representation of <i class="i">float</i> (including any implicit
+digits, such as a &ldquo;hidden bit&rdquo;).
+</p>
+<p><b class="b">float-precision</b>
+returns
+the number of significant radix <i class="i">b</i> digits present in <i class="i">float</i>;
+if <i class="i">float</i> is a <i class="i">float</i>
+zero, then the result is an <i class="i">integer</i> zero.
+</p>
+<p>For <i class="i">normalized</i> <i class="i">floats</i>,
+the results of <b class="b">float-digits</b> and <b class="b">float-precision</b> are the same,
+but the precision is less than the number of representation digits 
+for a <i class="i">denormalized</i> or zero number.
+</p>
+<p><b class="b">integer-decode-float</b> computes three values that characterize
+<i class="i">float</i> - 
+the significand scaled so as to be an <i class="i">integer</i>,
+and the same last two
+values that are returned by <b class="b">decode-float</b>.
+If <i class="i">float</i> is zero, <b class="b">integer-decode-float</b> returns 
+zero as the first value.
+The second value bears the same relationship to the first value
+as for <b class="b">decode-float</b>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (multiple-value-bind (signif expon sign)
+                      (integer-decode-float f)
+   (scale-float (float signif f) expon)) &equiv; (abs f)
+</pre></div>
+
+<h4 class="subsubheading" id="Examples_003a_003a-239"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-239"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> ;; Note that since the purpose of this functionality is to expose
+ ;; details of the implementation, all of these examples are necessarily
+ ;; very implementation-dependent.  Results may vary widely.
+ ;; Values shown here are chosen consistently from one particular implementation.
+ (decode-float .5) &rArr;  0.5, 0, 1.0
+ (decode-float 1.0) &rArr;  0.5, 1, 1.0
+ (scale-float 1.0 1) &rArr;  2.0
+ (scale-float 10.01 -2) &rArr;  2.5025
+ (scale-float 23.0 0) &rArr;  23.0
+ (float-radix 1.0) &rArr;  2
+ (float-sign 5.0) &rArr;  1.0
+ (float-sign -5.0) &rArr;  -1.0
+ (float-sign 0.0) &rArr;  1.0
+ (float-sign 1.0 0.0) &rArr;  0.0
+ (float-sign 1.0 -10.0) &rArr;  10.0
+ (float-sign -1.0 10.0) &rArr;  -10.0
+ (float-digits 1.0) &rArr;  24
+ (float-precision 1.0) &rArr;  24
+ (float-precision least-positive-single-float) &rArr;  1
+ (integer-decode-float 1.0) &rArr;  8388608, -23, 1
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-58"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-58"> &para;</a></span></h4>
+
+<p>The implementation&rsquo;s representation for <i class="i">floats</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-106"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-106"> &para;</a></span></h4>
+
+<p>The functions <b class="b">decode-float</b>, <b class="b">float-radix</b>, <b class="b">float-digits</b>,
+<b class="b">float-precision</b>, and <b class="b">integer-decode-float</b> should signal an error
+if their only argument is not a <i class="i">float</i>.
+</p>
+<p>The <i class="i">function</i> <b class="b">scale-float</b> should signal an error if its first argument
+is not a <i class="i">float</i> or if its second argument is not an <i class="i">integer</i>.
+</p>
+<p>The <i class="i">function</i> <b class="b">float-sign</b> should signal an error if its first argument
+is not a <i class="i">float</i> or if its second argument is supplied but is 
+not a <i class="i">float</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-182"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-182"> &para;</a></span></h4>
+
+<p>The product of the first result of <b class="b">decode-float</b> or <b class="b">integer-decode-float</b>,
+of the radix raised to the power of the second result, and of the third result
+is exactly equal to the value of <i class="i">float</i>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (multiple-value-bind (signif expon sign)
+                      (decode-float f)
+   (scale-float signif expon))
+&equiv; (abs f)
+</pre></div>
+
+<p>and
+</p>
+<div class="example">
+<pre class="example-preformatted"> (multiple-value-bind (signif expon sign)
+                      (decode-float f)
+   (* (scale-float signif expon) sign))
+&equiv; f
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="float.html">float                                                            [Function]</a>, Previous: <a href="most_002dpositive_002dfixnum.html">most-positive-fixnum, most-negative-fixnum              [Constant Variable]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/decode_002duniversal_002dtime.html
@@ -0,0 +1,103 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>decode-universal-time (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="decode-universal-time (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="decode-universal-time (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="encode_002duniversal_002dtime.html" rel="next" title="encode-universal-time">
+<link href="Environment-Dictionary.html" rel="prev" title="Environment Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="decode_002duniversal_002dtime">
+<div class="nav-panel">
+<p>
+Next: <a href="encode_002duniversal_002dtime.html" accesskey="n" rel="next">encode-universal-time                                            [function]</a>, Previous: <a href="Environment-Dictionary.html" accesskey="p" rel="prev">Environment Dictionary</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="decode_002duniversal_002dtime-_005bFunction_005d"><span>25.2.1 decode-universal-time                                            [Function]<a class="copiable-link" href="#decode_002duniversal_002dtime-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">decode-universal-time</code>  <i class="i">universal-time <span class="r">&amp;optional</span> time-zone</i><br>
+   &rArr;  <i class="i">second, minute, hour, date, month, year, day, daylight-p, zone</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-487"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-487"> &para;</a></span></h4>
+
+<p><i class="i">universal-time</i>&mdash;a <i class="i">universal time</i>.
+</p>
+<p><i class="i">time-zone</i>&mdash;a <i class="i">time zone</i>.
+</p>
+<p><i class="i">second</i>, <i class="i">minute</i>, <i class="i">hour</i>, <i class="i">date</i>, <i class="i">month</i>,
+<i class="i">year</i>, <i class="i">day</i>, <i class="i">daylight-p</i>, <i class="i">zone</i>&mdash;a <i class="i">decoded time</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-649"><span>Description::<a class="copiable-link" href="#Description_003a_003a-649"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">decoded time</i> represented by the given <i class="i">universal time</i>.
+</p>
+<p>If <i class="i">time-zone</i> is not supplied,
+it defaults to the current time zone adjusted for daylight saving time.  
+</p>
+<p>If <i class="i">time-zone</i> is supplied, daylight saving time information is ignored.
+The daylight saving time flag is <b class="b">nil</b> if <i class="i">time-zone</i> is supplied.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-461"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-461"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (decode-universal-time 0 0) &rArr;  0, 0, 0, 1, 1, 1900, 0, <i class="i">false</i>, 0
+
+;; The next two examples assume Eastern Daylight Time.
+ (decode-universal-time 2414296800 5) &rArr;  0, 0, 1, 4, 7, 1976, 6, <i class="i">false</i>, 5
+ (decode-universal-time 2414293200) &rArr;  0, 0, 1, 4, 7, 1976, 6, <i class="i">true</i>, 5
+
+;; This example assumes that the time zone is Eastern Daylight Time
+;; (and that the time zone is constant throughout the example).
+ (let* ((here (nth 8 (multiple-value-list (get-decoded-time)))) ;Time zone
+        (recently (get-universal-time))
+        (a (nthcdr 7 (multiple-value-list (decode-universal-time recently))))
+        (b (nthcdr 7 (multiple-value-list (decode-universal-time recently here)))))
+   (list a b (equal a b))) &rArr;  ((T 5) (NIL 5) NIL)
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-119"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-119"> &para;</a></span></h4>
+
+<p><i class="i">Implementation-dependent</i> mechanisms for calculating when or if daylight
+savings time is in effect for any given session.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-529"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-529"> &para;</a></span></h4>
+
+<p><a class="ref" href="encode_002duniversal_002dtime.html">encode-universal-time                                            [function]</a>
+, 
+<a class="ref" href="get_002duniversal_002dtime.html">get-universal-time, get-decoded-time                             [Function]</a>
+, 
+<a class="ref" href="Time.html">Time</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="encode_002duniversal_002dtime.html">encode-universal-time                                            [function]</a>, Previous: <a href="Environment-Dictionary.html">Environment Dictionary</a>, Up: <a href="Environment-Dictionary.html">Environment Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/defclass.html
@@ -0,0 +1,396 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>defclass (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="defclass (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="defclass (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="defgeneric.html" rel="next" title="defgeneric">
+<link href="with_002dslots.html" rel="prev" title="with-slots">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="defclass">
+<div class="nav-panel">
+<p>
+Next: <a href="defgeneric.html" accesskey="n" rel="next">defgeneric                                                          [Macro]</a>, Previous: <a href="with_002dslots.html" accesskey="p" rel="prev">with-slots                                                          [Macro]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="defclass-_005bMacro_005d"><span>7.7.25 defclass                                                            [Macro]<a class="copiable-link" href="#defclass-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">defclass</code>  <i class="i"><i class="i">class-name</i> <span class="r">(</span>{<i class="i">superclass-name</i>}*<span class="r">)</span>
+<span class="r">(</span>{<i class="i">slot-specifier</i>}*<span class="r">)</span>
+ [[!<i class="i">class-option</i>]]</i><br>
+   &rArr;  <i class="i">new-class</i>
+</p>
+<p>&nbsp;slot-specifier::=<i class="i">slot-name</i>&nbsp;|&nbsp;(<i class="i">slot-name</i>&nbsp;[[!<i class="i">slot-option</i>]])<!-- /@w --><br>
+</p>
+<p>&nbsp;<i class="i">slot-name</i>::=&nbsp;<i class="i">symbol</i><!-- /@w --><br>
+</p>
+<p>&nbsp;slot-option::={<code class="t">:reader</code>&nbsp;<i class="i">reader-function-name</i>}*&nbsp;|<!-- /@w --><br>
+&nbsp;{<code class="t">:writer</code>&nbsp;<i class="i">writer-function-name</i>}*&nbsp;|<!-- /@w --><br>
+&nbsp;{<code class="t">:accessor</code>&nbsp;<i class="i">reader-function-name</i>}*&nbsp;|<!-- /@w --><br>
+&nbsp;{<code class="t">:allocation</code>&nbsp;<i class="i">allocation-type</i>}&nbsp;|<!-- /@w --><br>
+&nbsp;{<code class="t">:initarg</code>&nbsp;<i class="i">initarg-name</i>}*&nbsp;|<!-- /@w --><br>
+&nbsp;{<code class="t">:initform</code>&nbsp;<i class="i">form</i>}&nbsp;|<!-- /@w --><br>
+&nbsp;{<code class="t">:type</code>&nbsp;<i class="i">type-specifier</i>}&nbsp;|<!-- /@w --><br>
+&nbsp;{<code class="t">:documentation</code>&nbsp;<i class="i">string</i>}<!-- /@w --><br>
+</p>
+<p>&nbsp;<i class="i">function-name</i>::=&nbsp;{<i class="i">symbol</i>&nbsp;|&nbsp;<code class="t">(setf&nbsp;<i class="i">symbol</i>)</code>}<!-- /@w --><br>
+</p>
+<p>&nbsp;class-option::=(<code class="t">:default-initargs</code>&nbsp;<code class="t">.</code>&nbsp;<i class="i">initarg-list</i>)&nbsp;|<!-- /@w --><br>
+&nbsp;(<code class="t">:documentation</code>&nbsp;<i class="i">string</i>)&nbsp;|<!-- /@w --><br>
+&nbsp;(<code class="t">:metaclass</code>&nbsp;<i class="i">class-name</i>)<!-- /@w --><br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-113"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-113"> &para;</a></span></h4>
+
+<p><i class="i">Class-name</i>&mdash;a <i class="i">non-nil</i> <i class="i">symbol</i>.
+</p>
+<p><i class="i">Superclass-name</i>&ndash;a <i class="i">non-nil</i> <i class="i">symbol</i>.
+</p>
+<p><i class="i">Slot-name</i>&ndash;a <i class="i">symbol</i>.
+  The <i class="i">slot-name</i> argument is 
+  a <i class="i">symbol</i> that is syntactically valid for use as a variable name.
+</p>
+<p><i class="i">Reader-function-name</i>&mdash;a <i class="i">non-nil</i> <i class="i">symbol</i>.
+ <code class="t">:reader</code> can be supplied more than once for a given <i class="i">slot</i>.
+</p>
+<p><i class="i">Writer-function-name</i>&mdash;a <i class="i">generic function</i> name.
+ <code class="t">:writer</code> can be supplied more than once for a given <i class="i">slot</i>.
+</p>
+<p><i class="i">Reader-function-name</i>&mdash;a <i class="i">non-nil</i> <i class="i">symbol</i>.
+ <code class="t">:accessor</code> can be supplied more than once for a given <i class="i">slot</i>.
+</p>
+<p><i class="i">Allocation-type</i>&mdash;(member <code class="t">:instance</code> <code class="t">:class</code>).
+ <code class="t">:allocation</code> can be supplied once at most for a given <i class="i">slot</i>.
+</p>
+<p><i class="i">Initarg-name</i>&mdash;a <i class="i">symbol</i>.
+ <code class="t">:initarg</code> can be supplied more than once for a given <i class="i">slot</i>.  
+</p>
+<p><i class="i">Form</i>&mdash;a <i class="i">form</i>. 
+ <code class="t">:init-form</code> can be supplied once at most for a given <i class="i">slot</i>.  
+</p>
+<p><i class="i">Type-specifier</i>&mdash;a <i class="i">type specifier</i>.
+ <code class="t">:type</code> can be supplied once at most for a given <i class="i">slot</i>. 
+</p>
+<p><i class="i">Class-option</i>&mdash; refers to the <i class="i">class</i> as a whole or to all class <i class="i">slots</i>.
+</p>
+<p><i class="i">Initarg-list</i>&mdash;a <i class="i">list</i> of alternating initialization argument
+		        <i class="i">names</i> and default initial value <i class="i">forms</i>.
+ <code class="t">:default-initargs</code> can be supplied at most once.
+</p>
+<p><i class="i">Class-name</i>&mdash;a <i class="i">non-nil</i> <i class="i">symbol</i>.
+ <code class="t">:metaclass</code> can be supplied once at most.
+</p>
+<p><i class="i">new-class</i>&mdash;the new <i class="i">class</i> <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-152"><span>Description::<a class="copiable-link" href="#Description_003a_003a-152"> &para;</a></span></h4>
+
+<p>The macro <b class="b">defclass</b> defines a new named <i class="i">class</i>.  It returns
+the new <i class="i">class</i> <i class="i">object</i> as its result.
+</p>
+<p>The syntax of <b class="b">defclass</b> provides options for specifying
+initialization arguments for <i class="i">slots</i>, for specifying default
+initialization values for <i class="i">slots</i>, and for requesting that 
+<i class="i">methods</i> on specified <i class="i">generic functions</i> be automatically 
+generated for reading and writing the values of <i class="i">slots</i>.  
+No reader or writer functions are defined by default; 
+their generation must be explicitly requested.  However,
+<i class="i">slots</i> can always be <i class="i">accessed</i> using <b class="b">slot-value</b>.
+</p>
+<p>Defining a new <i class="i">class</i> also causes a <i class="i">type</i> of the same name to be
+defined.  The predicate <code class="t">(typep <i class="i">object</i> <i class="i">class-name</i>)</code> returns
+true if the <i class="i">class</i> of the given <i class="i">object</i> is 
+the <i class="i">class</i> named by <i class="i">class-name</i> itself or
+a subclass of the class <i class="i">class-name</i>.  A <i class="i">class</i> <i class="i">object</i> 
+can be used as a <i class="i">type specifier</i>.  
+Thus <code class="t">(typep <i class="i">object</i> <i class="i">class</i>)</code> returns <i class="i">true</i>
+if the <i class="i">class</i> of the <i class="i">object</i> is 
+<i class="i">class</i> itself or a subclass of <i class="i">class</i>.   
+</p>
+<p>The <i class="i">class-name</i> argument specifies the <i class="i">proper name</i> 
+of the new <i class="i">class</i>.  
+If a <i class="i">class</i> with the same <i class="i">proper name</i> already exists 
+ and that <i class="i">class</i> is an <i class="i">instance</i> of <b class="b">standard-class</b>, 
+ and if the <b class="b">defclass</b> form for the definition of the new <i class="i">class</i>
+      specifies a <i class="i">class</i> of <i class="i">class</i> <b class="b">standard-class</b>,
+the existing <i class="i">class</i> is redefined,
+and instances of it (and its <i class="i">subclasses</i>) are updated 
+ to the new definition at the time that they are next <i class="i">accessed</i>.
+For details, see <a class="ref" href="Redefining-Classes.html">Redefining Classes</a>.
+</p>
+<p>Each <i class="i">superclass-name</i> argument 
+specifies a direct <i class="i">superclass</i> of the new <i class="i">class</i>.  
+If the <i class="i">superclass</i> list is empty, then the <i class="i">superclass</i>
+defaults depending on the <i class="i">metaclass</i>, 
+with <b class="b">standard-object</b> being the
+default for <b class="b">standard-class</b>.
+</p>
+<p>The new <i class="i">class</i> will
+inherit <i class="i">slots</i> and <i class="i">methods</i> 
+from each of its direct <i class="i">superclasses</i>, from
+their direct <i class="i">superclasses</i>, and so on.  
+For a discussion of how <i class="i">slots</i> and <i class="i">methods</i> are inherited,
+see <a class="ref" href="Inheritance.html">Inheritance</a>.
+</p>
+<p>The following slot options are available:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:reader</code> slot option specifies that an <i class="i">unqualified method</i> is
+to be defined on the <i class="i">generic function</i> named <i class="i">reader-function-name</i>
+to read the value of the given <i class="i">slot</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:writer</code> slot option specifies that an <i class="i">unqualified method</i> is
+to be defined on the <i class="i">generic function</i> named <i class="i">writer-function-name</i>
+to write the value of the <i class="i">slot</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:accessor</code> slot option specifies that an <i class="i">unqualified method</i>
+is to be defined on the generic function named <i class="i">reader-function-name</i>
+to read the value of the given <i class="i">slot</i>
+and that an <i class="i">unqualified method</i> is to be defined on the 
+<i class="i">generic function</i> named <code class="t">(setf <i class="i">reader-function-name</i>)</code> to be
+used with <b class="b">setf</b> to modify the value of the <i class="i">slot</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:allocation</code> slot option is used to specify where storage is
+to be allocated for the given <i class="i">slot</i>.  Storage for a 
+<i class="i">slot</i> can be located
+in each instance or in the <i class="i">class</i> <i class="i">object</i> itself.
+The value of the <i class="i">allocation-type</i> argument can be 
+either the keyword <code class="t">:instance</code>
+or the keyword <code class="t">:class</code>.    If the <code class="t">:allocation</code>
+slot option is not specified, the effect is the same as specifying
+<code class="t">:allocation :instance</code>.
+</p><dl class="table">
+<dt>&ndash;</dt>
+<dd><p>If <i class="i">allocation-type</i> is <code class="t">:instance</code>, a <i class="i">local slot</i> of
+the name <i class="i">slot-name</i> is allocated in each instance of the 
+<i class="i">class</i>.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>If <i class="i">allocation-type</i> is <code class="t">:class</code>, a shared 
+<i class="i">slot</i> of the given                                      
+name is allocated in the <i class="i">class</i> <i class="i">object</i> created by this <b class="b">defclass</b>
+form.  The value of the <i class="i">slot</i> is shared by all 
+<i class="i">instances</i> of the <i class="i">class</i>.
+If a class C_1 defines such a <i class="i">shared slot</i>, any 
+subclass C_2 of
+C_1 will share this single <i class="i">slot</i> unless the <b class="b">defclass</b> form
+for C_2 specifies a <i class="i">slot</i> of the same <i class="i">name</i> or there is a
+superclass of C_2 that precedes C_1 in the class precedence
+list of C_2 and that defines a <i class="i">slot</i> of the same <i class="i">name</i>.
+</p></dd>
+</dl>
+
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:initform</code> slot option is used to provide a default
+initial value form to be used in the initialization of the <i class="i">slot</i>.  This
+<i class="i">form</i> is evaluated every time it is used to initialize the 
+<i class="i">slot</i>.  The
+lexical environment in which this <i class="i">form</i> is evaluated is the lexical
+environment in which the <b class="b">defclass</b> form was evaluated.
+Note that the lexical environment refers both to variables and to
+functions.  For <i class="i">local slots</i>, the dynamic environment is the dynamic
+environment in which <b class="b">make-instance</b> is called; for shared
+<i class="i">slots</i>, the dynamic environment is the dynamic environment in which the
+<b class="b">defclass</b> form was evaluated.  
+See <a class="ref" href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a>.
+</p>
+<p>No implementation is permitted to extend the syntax of <b class="b">defclass</b>
+to allow <code class="t">(<i class="i">slot-name</i> <i class="i">form</i>)</code> as an abbreviation for 
+<code class="t">(<i class="i">slot-name</i> :initform <i class="i">form</i>)</code>.
+</p>
+<p>[Reviewer Note by Barmar: Can you extend this to mean something else?]
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:initarg</code> slot option declares an initialization
+argument named <i class="i">initarg-name</i> and specifies that this
+initialization argument initializes the given <i class="i">slot</i>.  If the
+initialization argument has a value in the call to
+<b class="b">initialize-instance</b>, the value will be stored into the given <i class="i">slot</i>,
+and the slot&rsquo;s <code class="t">:initform</code> slot option, if any, is not
+evaluated.  If none of the initialization arguments specified for a
+given <i class="i">slot</i> has a value, the <i class="i">slot</i> is initialized according to the
+<code class="t">:initform</code> slot option, if specified.  
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:type</code> slot option specifies that the contents of the
+<i class="i">slot</i> will always be of the specified data type.  It effectively
+declares the result type of the reader generic function when applied
+to an <i class="i">object</i> of this <i class="i">class</i>.  The consequences of attempting to store in a
+<i class="i">slot</i> a value that does not satisfy the type of the <i class="i">slot</i> are undefined.
+The <code class="t">:type</code> slot option is further discussed in 
+<a class="ref" href="Inheritance-of-Slots-and-Slot-Options.html">Inheritance of Slots and Slot Options</a>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:documentation</code> slot option provides a <i class="i">documentation string</i>
+for the <i class="i">slot</i>.  <code class="t">:documentation</code> can be supplied once at most 
+for a given <i class="i">slot</i>. 
+[Reviewer Note by Barmar: How is this retrieved?]
+</p></dd>
+</dl>
+
+<p>Each class option is an option that refers to the <i class="i">class</i> as a whole.
+The following class options are available:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:default-initargs</code> class option is followed by a list of
+alternating initialization argument <i class="i">names</i> and default initial value
+forms.  If any of these initialization arguments does not appear in
+the initialization argument list supplied to <b class="b">make-instance</b>, the
+corresponding default initial value form is evaluated, and the
+initialization argument <i class="i">name</i> and the <i class="i">form</i>&rsquo;s value are added to the end
+of the initialization argument list before the instance is created;
+see <a class="ref" href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a>.
+The default initial value form is evaluated each time it is used.  The lexical
+environment in which this <i class="i">form</i> is evaluated is the lexical environment
+in which the <b class="b">defclass</b> form was evaluated.  The dynamic
+environment is the dynamic environment in which <b class="b">make-instance</b>
+was called.  If an initialization argument <i class="i">name</i> appears more than once
+in a <code class="t">:default-initargs</code> class option, an error is signaled.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd>
+<p>The <code class="t">:documentation</code> class option causes a <i class="i">documentation string</i> 
+to be attached with the <i class="i">class</i> <i class="i">object</i>,
+and attached with kind <b class="b">type</b> to the <i class="i">class-name</i>.
+<code class="t">:documentation</code> can be supplied once at most.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:metaclass</code> class option is used to specify that
+instances of the <i class="i">class</i> being defined are to have a different metaclass
+than the default provided by the system (the <i class="i">class</i> <b class="b">standard-class</b>).
+</p>
+</dd>
+</dl>
+
+<p>Note the following rules of <b class="b">defclass</b> for <i class="i">standard classes</i>:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>It is not required that the <i class="i">superclasses</i> of a <i class="i">class</i> be defined before
+the <b class="b">defclass</b> form for that <i class="i">class</i> is evaluated.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>All the <i class="i">superclasses</i> of a <i class="i">class</i> must be defined before 
+an <i class="i">instance</i> of the <i class="i">class</i> can be made.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>A <i class="i">class</i> must be defined before it can be used as a parameter
+specializer in a <b class="b">defmethod</b> form.
+</p>
+</dd>
+</dl>
+
+<p>The object system can be extended to cover situations where these rules are not
+obeyed.
+</p>
+<p>Some slot options are inherited by a <i class="i">class</i> from its 
+<i class="i">superclasses</i>, and
+some can be shadowed or altered by providing a local slot description.
+No class options except <code class="t">:default-initargs</code> are inherited.  For a
+detailed description of how <i class="i">slots</i> and slot options are inherited, 
+see <a class="ref" href="Inheritance-of-Slots-and-Slot-Options.html">Inheritance of Slots and Slot Options</a>.
+</p>
+<p>The options to <b class="b">defclass</b> can be extended.  It is required that
+all implementations signal an error if they observe a class option or
+a slot option that is not implemented locally.
+</p>
+<p>It is valid to specify more than one reader, writer, accessor, or
+initialization argument for a <i class="i">slot</i>.  No other slot option can
+appear
+more than once in a single slot description, or an error is
+signaled.
+</p>
+<p>If no reader, writer, or accessor is specified for a <i class="i">slot</i>, 
+the <i class="i">slot</i> can only be <i class="i">accessed</i> by the <i class="i">function</i> <b class="b">slot-value</b>.
+</p>
+<p>If a <b class="b">defclass</b> <i class="i">form</i> appears as a <i class="i">top level form</i>,
+the <i class="i">compiler</i> must make the <i class="i">class</i> <i class="i">name</i> be recognized as a
+valid <i class="i">type</i> <i class="i">name</i> in subsequent declarations (as for <b class="b">deftype</b>)
+and be recognized as a valid <i class="i">class</i> <i class="i">name</i> for <b class="b">defmethod</b>
+<i class="i">parameter specializers</i> and for use as the <code class="t">:metaclass</code> option of a
+subsequent <b class="b">defclass</b>.  The <i class="i">compiler</i> must make 
+the <i class="i">class</i> definition 
+available to be returned by <b class="b">find-class</b> when its <i class="i">environment</i>
+<i class="i">argument</i> is a value received as the <i class="i">environment parameter</i> of a <i class="i">macro</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-37"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-37"> &para;</a></span></h4>
+
+<p>If there are any duplicate slot names, 
+an error of <i class="i">type</i> <b class="b">program-error</b> is signaled.
+</p>
+<p>If an initialization argument <i class="i">name</i> appears more than once in 
+<code class="t">:default-initargs</code> class option, 
+an error of <i class="i">type</i> <b class="b">program-error</b> is signaled.
+</p>
+<p>If any of the following slot options appears more than once in a
+single slot description, an error of <i class="i">type</i> <b class="b">program-error</b>
+is signaled: <code class="t">:allocation</code>,
+<code class="t">:initform</code>, <code class="t">:type</code>, <code class="t">:documentation</code>.
+</p>
+<p>It is required that all implementations signal 
+an error of <i class="i">type</i> <b class="b">program-error</b> if they observe a class option 
+or a slot option that is not implemented locally.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-134"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-134"> &para;</a></span></h4>
+
+<p><a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="Initialize_002dInstance.html">Initialize-Instance</a>
+,
+<a class="ref" href="make_002dinstance.html">make-instance                                   [Standard Generic Function]</a>
+,
+<a class="ref" href="slot_002dvalue.html">slot-value                                                       [Function]</a>
+,
+<a class="ref" href="Classes.html">Classes</a>,
+<a class="ref" href="Inheritance.html">Inheritance</a>,
+<a class="ref" href="Redefining-Classes.html">Redefining Classes</a>,
+<a class="ref" href="Determining-the-Class-Precedence-List.html">Determining the Class Precedence List</a>,
+<a class="ref" href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="defgeneric.html">defgeneric                                                          [Macro]</a>, Previous: <a href="with_002dslots.html">with-slots                                                          [Macro]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/defconstant.html
@@ -0,0 +1,141 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>defconstant (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="defconstant (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="defconstant (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="defparameter.html" rel="next" title="defparameter">
+<link href="lambda_002dparameters_002dlimit.html" rel="prev" title="lambda-parameters-limit">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="defconstant">
+<div class="nav-panel">
+<p>
+Next: <a href="defparameter.html" accesskey="n" rel="next">defparameter, defvar                                                [Macro]</a>, Previous: <a href="lambda_002dparameters_002dlimit.html" accesskey="p" rel="prev">lambda-parameters-limit                                 [Constant Variable]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="defconstant-_005bMacro_005d"><span>5.3.15 defconstant                                                         [Macro]<a class="copiable-link" href="#defconstant-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">defconstant</code>  <i class="i">name initial-value <span class="r">[</span>documentation<span class="r">]</span></i> &rArr;  <i class="i">name</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-36"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-36"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>; not evaluated.
+</p>
+<p><i class="i">initial-value</i>&mdash;a <i class="i">form</i>; evaluated.
+</p>
+<p><i class="i">documentation</i>&mdash;a <i class="i">string</i>; not evaluated.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-68"><span>Description::<a class="copiable-link" href="#Description_003a_003a-68"> &para;</a></span></h4>
+
+<p><b class="b">defconstant</b> 
+causes the global variable named by <i class="i">name</i> to be 
+given a value that is the result of evaluating <i class="i">initial-value</i>.
+</p>
+<p>A constant defined by <b class="b">defconstant</b> can be redefined
+with <b class="b">defconstant</b>.
+However, the consequences are undefined if an attempt is made to assign
+a <i class="i">value</i> to the <i class="i">symbol</i> using another operator, or to
+assign it to a <i class="i">different</i>
+<i class="i">value</i> using a subsequent
+<b class="b">defconstant</b>.
+</p>
+<p>If <i class="i">documentation</i> is supplied, it is attached to <i class="i">name</i> as a
+<i class="i">documentation string</i> of kind <b class="b">variable</b>. 
+</p>
+<p><b class="b">defconstant</b> 
+normally appears as a <i class="i">top level form</i>, but it is meaningful
+for it to appear as a <i class="i">non-top-level form</i>.
+However, the compile-time side
+effects described below
+only take place when <b class="b">defconstant</b> appears as a 
+<i class="i">top level form</i>.
+</p>
+<p>The consequences are undefined if there are any 
+<i class="i">bindings</i>
+of the variable named by <i class="i">name</i> at the time <b class="b">defconstant</b> 
+is executed or if the value is not <b class="b">eql</b> to the value of
+<i class="i">initial-value</i>.
+</p>
+<p>The consequences are undefined when constant <i class="i">symbols</i> are rebound
+as either lexical or dynamic variables.  In other words, a reference to a
+<i class="i">symbol</i> declared with <b class="b">defconstant</b> always refers to its global value.
+</p>
+<p>The side effects of the execution of <b class="b">defconstant</b> must
+be equivalent to at least the side effects of the execution of the following
+code:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setf (symbol-value '<i class="i">name</i>) <i class="i">initial-value</i>)
+ (setf (documentation '<i class="i">name</i> 'variable) '<i class="i">documentation</i>)
+</pre></div>
+
+<p>If a <b class="b">defconstant</b> <i class="i">form</i> appears as a <i class="i">top level form</i>,
+the <i class="i">compiler</i> must recognize that <i class="i">name</i> names
+a <i class="i">constant variable</i>.  An implementation may choose to
+evaluate the value-form at compile time, load time, or both.
+Therefore, users must ensure that the <i class="i">initial-value</i>
+can be <i class="i">evaluated</i> at compile time
+(regardless of whether or not references to <i class="i">name</i>
+appear in the file) and that it always <i class="i">evaluates</i>
+to the same value.
+</p>
+<p>[Editorial Note by KMP: Does &ldquo;same value&rdquo; here mean eql or similar?]
+</p>
+<p>[Reviewer Note by Moon: Probably depends on whether load time is compared to compile time,
+		or two compiles.]
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-42"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-42"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (defconstant this-is-a-constant 'never-changing &quot;for a test&quot;) &rArr;  THIS-IS-A-CONSTANT
+this-is-a-constant &rArr;  NEVER-CHANGING
+ (documentation 'this-is-a-constant 'variable) &rArr;  &quot;for a test&quot;
+ (constantp 'this-is-a-constant) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-53"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-53"> &para;</a></span></h4>
+
+<p><a class="ref" href="declaim.html">declaim                                                             [Macro]</a>
+,
+<a class="ref" href="defparameter.html">defparameter, defvar                                                [Macro]</a>
+, 
+<b class="b">defvar</b>,
+<a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="proclaim.html">proclaim                                                         [Function]</a>
+,
+<a class="ref" href="Constant-Variables.html">Constant Variables</a>,
+<a class="ref" href="Compilation.html">Compilation</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="defparameter.html">defparameter, defvar                                                [Macro]</a>, Previous: <a href="lambda_002dparameters_002dlimit.html">lambda-parameters-limit                                 [Constant Variable]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/defgeneric.html
@@ -0,0 +1,323 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>defgeneric (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="defgeneric (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="defgeneric (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="defmethod.html" rel="next" title="defmethod">
+<link href="defclass.html" rel="prev" title="defclass">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="defgeneric">
+<div class="nav-panel">
+<p>
+Next: <a href="defmethod.html" accesskey="n" rel="next">defmethod                                                           [Macro]</a>, Previous: <a href="defclass.html" accesskey="p" rel="prev">defclass                                                            [Macro]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="defgeneric-_005bMacro_005d"><span>7.7.26 defgeneric                                                          [Macro]<a class="copiable-link" href="#defgeneric-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">defgeneric</code>  <i class="i">function-name gf-lambda-list
+	  		  [[!<i class="i">option</i> | {!<i class="i">method-description</i>}*]]</i><br>
+   &rArr;  <i class="i">new-generic</i>
+</p>
+<p><i class="i">option</i>&nbsp;::=<span class="r">(</span><code class="t">:argument-precedence-order</code>&nbsp;{<i class="i">parameter-name</i>}^+<span class="r">)</span>&nbsp;|<!-- /@w -->
+&nbsp;<span class="r">(</span><b class="b">declare</b>&nbsp;{<i class="i">gf-declaration</i>}^+<span class="r">)</span>&nbsp;|<!-- /@w -->
+&nbsp;<span class="r">(</span><code class="t">:documentation</code>&nbsp;<i class="i">gf-documentation</i><span class="r">)</span>&nbsp;|<!-- /@w -->
+&nbsp;<span class="r">(</span><code class="t">:method-combination</code>&nbsp;<i class="i">method-combination</i>&nbsp;{<i class="i">method-combination-argument</i>}*<span class="r">)</span>&nbsp;|<!-- /@w -->
+&nbsp;<span class="r">(</span><code class="t">:generic-function-class</code>&nbsp;<i class="i">generic-function-class</i><span class="r">)</span>&nbsp;|<!-- /@w -->
+&nbsp;<span class="r">(</span><code class="t">:method-class</code>&nbsp;<i class="i">method-class</i><span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">method-description</i>&nbsp;::=<span class="r">(</span><code class="t">:method</code>&nbsp;{<i class="i">method-qualifier</i>}*&nbsp;<i class="i">specialized-lambda-list</i>&nbsp;<span class="r">[[{<i class="i">declaration</i>}*&nbsp;|&nbsp;<i class="i">documentation</i>]]</span>&nbsp;{<i class="i">form</i>}*<span class="r">)</span><!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-114"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-114"> &para;</a></span></h4>
+
+<p><i class="i">function-name</i>&mdash;a <i class="i">function name</i>.
+</p>
+<p><i class="i">generic-function-class</i>&mdash;a <i class="i">non-nil</i> <i class="i">symbol</i> naming a <i class="i">class</i>.
+</p>
+<p><i class="i">gf-declaration</i>&mdash;an <b class="b">optimize</b> <i class="i">declaration specifier</i>;
+  other <i class="i">declaration specifiers</i> are not permitted.
+</p>
+<p><i class="i">gf-documentation</i>&mdash;a <i class="i">string</i>; not evaluated.
+</p>
+<p><i class="i">gf-lambda-list</i>&mdash;a <i class="i">generic function lambda list</i>.
+</p>
+<p><i class="i">method-class</i>&mdash;a <i class="i">non-nil</i> <i class="i">symbol</i> naming a <i class="i">class</i>.
+</p>
+<p><i class="i">method-combination-argument</i>&mdash;an <i class="i">object.</i>
+</p>
+<p><i class="i">method-combination-name</i>&mdash;a <i class="i">symbol</i> 
+				  naming a <i class="i">method combination</i> <i class="i">type</i>.
+</p>
+<p><i class="i">method-qualifiers</i>,
+<i class="i">specialized-lambda-list</i>,
+<i class="i">declarations</i>,
+<i class="i">documentation</i>,
+<i class="i">forms</i>&mdash;as per <b class="b">defmethod</b>.
+</p>
+<p><i class="i">new-generic</i>&mdash;the <i class="i">generic function</i> <i class="i">object</i>.
+</p>
+<p><i class="i">parameter-name</i>&mdash;a <i class="i">symbol</i> that names a <i class="i">required parameter</i> 
+			 in the <i class="i">lambda-list</i>.
+  (If the <code class="t">:argument-precedence-order</code> option is specified,
+   each <i class="i">required parameter</i> in the <i class="i">lambda-list</i>
+   must be used exactly once as a <i class="i">parameter-name</i>.)
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-153"><span>Description::<a class="copiable-link" href="#Description_003a_003a-153"> &para;</a></span></h4>
+
+<p>The macro <b class="b">defgeneric</b> is used to define a <i class="i">generic function</i>
+or to specify options and declarations that pertain 
+to a <i class="i">generic function</i> as a whole.
+</p>
+<p>If <i class="i">function-name</i> is a 
+<i class="i">list</i> it must be of the form <code class="t">(setf <i class="i">symbol</i>)</code>.
+If <code class="t">(fboundp <i class="i">function-name</i>)</code> is <i class="i">false</i>, a new
+<i class="i">generic function</i> is created.  
+</p>
+<p>If <code class="t">(fdefinition <i class="i">function-name</i>)</code> is a <i class="i">generic function</i>, that 
+</p>
+<p><i class="i">generic function</i>
+is modified.  If <i class="i">function-name</i> names 
+an <i class="i">ordinary function</i>,
+a <i class="i">macro</i>, or a <i class="i">special operator</i>, 
+an error is signaled.
+</p>
+<p>The effect of the <b class="b">defgeneric</b> macro is as if the following three
+steps were performed: first, 
+<i class="i">methods</i> defined by previous <b class="b">defgeneric</b> <i class="i">forms</i> are removed; 
+</p>
+<p>[Reviewer Note by Barmar: Shouldn&rsquo;t this (second) be first?]
+second, <b class="b">ensure-generic-function</b>
+is called; and finally, <i class="i">methods</i> specified by the current
+<b class="b">defgeneric</b> <i class="i">form</i> are added to the <i class="i">generic function</i>. 
+</p>
+<p>Each <i class="i">method-description</i> defines a <i class="i">method</i> on the <i class="i">generic function</i>.
+The <i class="i">lambda list</i> of each <i class="i">method</i> must be congruent with the 
+<i class="i">lambda list</i>
+specified by the <i class="i">gf-lambda-list</i> option.  
+If no <i class="i">method</i> descriptions are specified and a <i class="i">generic function</i> of the same
+name does not already exist, a <i class="i">generic function</i> with no 
+<i class="i">methods</i> is created.
+</p>
+<p>The <i class="i">gf-lambda-list</i> argument of <b class="b">defgeneric</b> specifies the shape of
+<i class="i">lambda lists</i> for the <i class="i">methods</i> on this <i class="i">generic function</i>.
+All <i class="i">methods</i> on the resulting 
+<i class="i">generic function</i> must have
+<i class="i">lambda lists</i> that are congruent with this shape.  If a <b class="b">defgeneric</b>
+form is evaluated and some 
+<i class="i">methods</i> for that <i class="i">generic function</i>
+have <i class="i">lambda lists</i> that are not congruent with that given in
+the <b class="b">defgeneric</b> form, an error is signaled.  For further details
+on method congruence, see <a class="ref" href="Congruent-Lambda_002dlists-for-all-Methods-of-a-Generic-Function.html">Congruent Lambda-lists for all Methods of a Generic Function</a>.
+</p>
+<p>The <i class="i">generic function</i> passes to the 
+<i class="i">method</i> all the argument values passed to
+it, and only those; default values are not supported.
+Note that optional and keyword arguments in method definitions, however,
+can have default initial value forms and can use supplied-p parameters. 
+</p>
+<p>The following options are provided.  
+</p>
+<p>Except as otherwise noted, 
+</p>
+<p>a given option may occur only once.
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:argument-precedence-order</code> option is used to specify the
+order in which the required arguments in a call to the <i class="i">generic function</i>
+are tested for specificity when selecting a particular
+<i class="i">method</i>. Each required argument, as specified in the <i class="i">gf-lambda-list</i>
+argument, must be included exactly once as a <i class="i">parameter-name</i>
+so that the full and unambiguous precedence order is
+supplied.  If this condition is not met, an error is signaled.
+</p>
+<p>[Reviewer Note by Barmar: What is the default order?]
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <b class="b">declare</b> option is used to specify declarations that pertain
+to the <i class="i">generic function</i>.
+</p>
+<p>An <b class="b">optimize</b> <i class="i">declaration specifier</i> is allowed.
+It specifies whether method selection should be optimized for 
+speed or space, but it has no effect on <i class="i">methods</i>.
+To control how a <i class="i">method</i> is optimized, an <b class="b">optimize</b>
+declaration must be placed directly in the <b class="b">defmethod</b> <i class="i">form</i>
+or method description.  The optimization qualities <b class="b">speed</b> and
+<b class="b">space</b> are the only qualities this standard requires, but an
+implementation can extend the object system to recognize other qualities.  
+A simple implementation that has only one method selection technique 
+and ignores <b class="b">optimize</b> <i class="i">declaration specifiers</i> is valid.
+</p>
+<p>The <b class="b">special</b>, <b class="b">ftype</b>, <b class="b">function</b>, <b class="b">inline</b>,
+<b class="b">notinline</b>, and <b class="b">declaration</b> declarations are not permitted.
+Individual implementations can extend the <b class="b">declare</b> option to
+support additional declarations.
+</p>
+<p>[Editorial Note by KMP: Does &ldquo;additional&rdquo; mean including special, ftype, etc.?  
+Or only other things that are not mentioned here?]
+If an implementation notices a <i class="i">declaration specifier</i> that it does
+not support and that has not been proclaimed as a non-standard 
+<i class="i">declaration identifier</i> name in a <b class="b">declaration</b> <i class="i">proclamation</i>, 
+it should issue a warning. 
+[Editorial Note by KMP: The wording of this previous sentence,
+particularly the word &ldquo;and&rdquo; suggests to me that you can &lsquo;proclaim declaration&rsquo;
+of an unsupported declaration (e.g., ftype) in order to suppress the warning.
+That seems wrong.  Perhaps it instead means to say &ldquo;does not support or 
+is both undefined and not proclaimed declaration.&rdquo;]
+</p>
+<p>The <b class="b">declare</b> option may be specified more than once.
+The effect is the same as if the lists of <i class="i">declaration specifiers</i> 
+had been appended together into a single list and specified as a 
+single <b class="b">declare</b> option.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:documentation</code> argument is a <i class="i">documentation string</i>
+to be attached to the <i class="i">generic function</i> <i class="i">object</i>, 
+and to be attached with kind <b class="b">function</b> to the <i class="i">function-name</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:generic-function-class</code> option may be used to specify that
+the <i class="i">generic function</i> is to have a different <i class="i">class</i> than
+the default provided by the system (the <i class="i">class</i> <b class="b">standard-generic-function</b>).
+The <i class="i">class-name</i> argument is the name of a <i class="i">class</i> that can be the
+<i class="i">class</i> of a <i class="i">generic function</i>.  If <i class="i">function-name</i> specifies
+an existing <i class="i">generic function</i> that has a different value for the
+<code class="t">:generic-function-class</code> argument and the new generic function 
+<i class="i">class</i> is compatible with the old, <b class="b">change-class</b> is called 
+to change the <i class="i">class</i> of the <i class="i">generic function</i>; 
+otherwise an error is signaled.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:method-class</code> option is used to specify that all <i class="i">methods</i> on
+this <i class="i">generic function</i> are to have a different <i class="i">class</i> from the 
+default provided by the system (the <i class="i">class</i> <b class="b">standard-method</b>).
+The <i class="i">class-name</i> argument is the name of a <i class="i">class</i> that is capable 
+of being the <i class="i">class</i> of a <i class="i">method</i>.
+</p>
+<p>[Reviewer Note by Barmar: Is <b class="b">change-class</b> called on existing methods?]
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:method-combination</code> option is followed by a symbol that
+names a type of method combination.  The arguments (if any) that
+follow that symbol depend on the type of method combination.  Note
+that the standard method combination type does not support any
+arguments.  However, all types of method combination defined by the
+short form of <b class="b">define-method-combination</b> accept an optional
+argument named <i class="i">order</i>, defaulting to <code class="t">:most-specific-first</code>,
+where a value of <code class="t">:most-specific-last</code> reverses
+the order of the primary <i class="i">methods</i> without affecting the order of the
+auxiliary <i class="i">methods</i>.
+</p>
+</dd>
+</dl>
+
+<p>The <i class="i">method-description</i> arguments define <i class="i">methods</i> that will
+be associated with the <i class="i">generic function</i>.  The <i class="i">method-qualifier</i>
+and <i class="i">specialized-lambda-list</i> arguments in a method description
+are the same as for <b class="b">defmethod</b>.
+</p>
+<p>The <i class="i">form</i> arguments specify the method body.  The body of the
+<i class="i">method</i> is enclosed in an <i class="i">implicit block</i>.
+If <i class="i">function-name</i> is a <i class="i">symbol</i>, this block bears the same name as
+the <i class="i">generic function</i>.  If <i class="i">function-name</i> is a 
+<i class="i">list</i> of the
+form <code class="t">(setf <i class="i">symbol</i>)</code>, the name of the block is <i class="i">symbol</i>.  
+</p>
+<p>Implementations can extend <b class="b">defgeneric</b> to include other options.
+It is required that an implementation signal an error if
+it observes an option that is not implemented locally.
+</p>
+<p><b class="b">defgeneric</b> is not required to perform any compile-time side effects.
+In particular, the <i class="i">methods</i> are not installed for invocation during 
+compilation.  An <i class="i">implementation</i> may choose to store information about
+the <i class="i">generic function</i> for the purposes of compile-time error-checking
+(such as checking the number of arguments on calls, or noting that a definition
+ for the function name has been seen).
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-108"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-108"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-38"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-38"> &para;</a></span></h4>
+
+<p>If <i class="i">function-name</i> names an <i class="i">ordinary function</i>, a <i class="i">macro</i>,
+or a <i class="i">special operator</i>, an error of <i class="i">type</i> <b class="b">program-error</b> is signaled.
+</p>
+<p>Each required argument, as specified in the <i class="i">gf-lambda-list</i>
+argument, must be included exactly once as a <i class="i">parameter-name</i>,
+or an error of <i class="i">type</i> <b class="b">program-error</b> is signaled.
+</p>
+<p>The <i class="i">lambda list</i> of each <i class="i">method</i> specified by a 
+<i class="i">method-description</i> must be congruent with the <i class="i">lambda list</i> specified
+by the <i class="i">gf-lambda-list</i> option, or
+an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<p>If a <b class="b">defgeneric</b> form is evaluated and some <i class="i">methods</i> for
+that <i class="i">generic function</i> have <i class="i">lambda lists</i> that are not congruent with
+that given in the <b class="b">defgeneric</b> form, 
+an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<p>A given <i class="i">option</i> may occur only once,
+or an error of <i class="i">type</i> <b class="b">program-error</b> is signaled.
+</p>
+<p>[Reviewer Note by Barmar: This says that an error is signaled if you specify the same generic
+    function class as it already has!]
+If <i class="i">function-name</i> specifies an existing <i class="i">generic function</i> 
+that has a different value for the <code class="t">:generic-function-class</code> 
+argument and the new generic function <i class="i">class</i> is compatible with the
+old, <b class="b">change-class</b> is called to change the <i class="i">class</i> of 
+the <i class="i">generic function</i>; otherwise an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<p>Implementations can extend <b class="b">defgeneric</b> to include other options.
+It is required that an implementation 
+signal an error of <i class="i">type</i> <b class="b">program-error</b> if
+it observes an option that is not implemented locally.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-135"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-135"> &para;</a></span></h4>
+
+<p><a class="ref" href="defmethod.html">defmethod                                                           [Macro]</a>
+,
+<a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="ensure_002dgeneric_002dfunction.html">ensure-generic-function                                          [Function]</a>
+,
+</p>
+<p><b class="b">generic-function</b>,
+</p>
+<p><a class="ref" href="Congruent-Lambda_002dlists-for-all-Methods-of-a-Generic-Function.html">Congruent Lambda-lists for all Methods of a Generic Function</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="defmethod.html">defmethod                                                           [Macro]</a>, Previous: <a href="defclass.html">defclass                                                            [Macro]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/define_002dcompiler_002dmacro.html
@@ -0,0 +1,232 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>define-compiler-macro (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="define-compiler-macro (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="define-compiler-macro (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="defmacro.html" rel="next" title="defmacro">
+<link href="compiler_002dmacro_002dfunction.html" rel="prev" title="compiler-macro-function">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="define_002dcompiler_002dmacro">
+<div class="nav-panel">
+<p>
+Next: <a href="defmacro.html" accesskey="n" rel="next">defmacro                                                            [Macro]</a>, Previous: <a href="compiler_002dmacro_002dfunction.html" accesskey="p" rel="prev">compiler-macro-function                                          [Accessor]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="define_002dcompiler_002dmacro-_005bMacro_005d"><span>3.8.9 define-compiler-macro                                               [Macro]<a class="copiable-link" href="#define_002dcompiler_002dmacro-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">define-compiler-macro</code>  <i class="i">name lambda-list [[{<i class="i">declaration</i>}* | <i class="i">documentation</i>]] {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">name</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-7"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-7"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">function name</i>.
+</p>
+<p><i class="i">lambda-list</i>&mdash;a <i class="i">macro lambda list</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">documentation</i>&mdash;a <i class="i">string</i>; not evaluated.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-8"><span>Description::<a class="copiable-link" href="#Description_003a_003a-8"> &para;</a></span></h4>
+
+<p>[Editorial Note by KMP: This definition probably needs to be fully expanded to not
+	 	 refer through the definition of defmacro, but should suffice for now.]
+</p>
+<p>This is the normal mechanism for defining a <i class="i">compiler macro function</i>.
+Its manner of definition is the same as for <b class="b">defmacro</b>; the only
+differences are:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The <i class="i">name</i> can be a <i class="i">function name</i> naming
+ any <i class="i">function</i> or <i class="i">macro</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The expander function is installed as a <i class="i">compiler macro function</i>
+ for the <i class="i">name</i>, rather than as a <i class="i">macro function</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <b class="b">&amp;whole</b> argument is bound to the form argument that 
+ is passed to the <i class="i">compiler macro function</i>.  The remaining lambda-list 
+ parameters are specified as if this form contained the function name in the
+ <i class="i">car</i> and the actual arguments in the <i class="i">cdr</i>, but if the <i class="i">car</i> 
+ of the actual form is the symbol <b class="b">funcall</b>, then the destructuring of 
+ the arguments is actually performed using its <i class="i">cddr</i> instead.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd>
+<p><i class="i">Documentation</i> is attached as a <i class="i">documentation string</i> 
+    to <i class="i">name</i> (as kind <b class="b">compiler-macro</b>)
+and to the <i class="i">compiler macro function</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Unlike an ordinary <i class="i">macro</i>, a <i class="i">compiler macro</i>
+ can decline to provide an expansion merely by returning a form that is
+ the <i class="i">same</i> as the original (which can be obtained by using
+ <b class="b">&amp;whole</b>).
+</p></dd>
+</dl>
+
+<h4 class="subsubheading" id="Examples_003a_003a-6"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-6"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun square (x) (expt x 2)) &rArr;  SQUARE
+ (define-compiler-macro square (&amp;whole form arg)
+   (if (atom arg)
+       `(expt ,arg 2)
+       (case (car arg)
+         (square (if (= (length arg) 2)
+                     `(expt ,(nth 1 arg) 4)
+                     form))
+         (expt   (if (= (length arg) 3)
+                     (if (numberp (nth 2 arg))
+                         `(expt ,(nth 1 arg) ,(* 2 (nth 2 arg)))
+                         `(expt ,(nth 1 arg) (* 2 ,(nth 2 arg))))
+                     form))
+         (otherwise `(expt ,arg 2))))) &rArr;  SQUARE
+ (square (square 3)) &rArr;  81
+ (macroexpand '(square x)) &rArr;  (SQUARE X), <i class="i">false</i>
+ (funcall (compiler-macro-function 'square) '(square x) nil)
+&rArr;  (EXPT X 2)
+ (funcall (compiler-macro-function 'square) '(square (square x)) nil)
+&rArr;  (EXPT X 4)
+ (funcall (compiler-macro-function 'square) '(funcall #'square x) nil)
+&rArr;  (EXPT X 2)
+
+ (defun distance-positional (x1 y1 x2 y2)
+   (sqrt (+ (expt (- x2 x1) 2) (expt (- y2 y1) 2))))
+&rArr;  DISTANCE-POSITIONAL
+ (defun distance (&amp;key (x1 0) (y1 0) (x2 x1) (y2 y1))
+   (distance-positional x1 y1 x2 y2))
+&rArr;  DISTANCE
+ (define-compiler-macro distance (&amp;whole form
+                                  &amp;rest key-value-pairs
+                                  &amp;key (x1 0  x1-p)
+                                       (y1 0  y1-p)
+                                       (x2 x1 x2-p)
+                                       (y2 y1 y2-p)
+                                  &amp;allow-other-keys
+                                  &amp;environment env)
+   (flet ((key (n) (nth (* n 2) key-value-pairs))
+          (arg (n) (nth (1+ (* n 2)) key-value-pairs))
+          (simplep (x)
+            (let ((expanded-x (macroexpand x env)))
+              (or (constantp expanded-x env)
+                  (symbolp expanded-x)))))
+     (let ((n (/ (length key-value-pairs) 2)))
+       (multiple-value-bind (x1s y1s x2s y2s others)
+           (loop for (key) on key-value-pairs by #'cddr
+                 count (eq key ':x1) into x1s
+                 count (eq key ':y1) into y1s
+                 count (eq key ':x2) into x2s
+                 count (eq key ':y1) into y2s
+                 count (not (member key '(:x1 :x2 :y1 :y2)))
+                   into others
+                 finally (return (values x1s y1s x2s y2s others)))
+         (cond ((and (= n 4)
+                     (eq (key 0) :x1)
+                     (eq (key 1) :y1)
+                     (eq (key 2) :x2)
+                     (eq (key 3) :y2))
+                `(distance-positional ,x1 ,y1 ,x2 ,y2))
+               ((and (if x1-p (and (= x1s 1) (simplep x1)) t)
+                     (if y1-p (and (= y1s 1) (simplep y1)) t)
+                     (if x2-p (and (= x2s 1) (simplep x2)) t)
+                     (if y2-p (and (= y2s 1) (simplep y2)) t)
+                     (zerop others))
+                `(distance-positional ,x1 ,y1 ,x2 ,y2))
+               ((and (&lt; x1s 2) (&lt; y1s 2) (&lt; x2s 2) (&lt; y2s 2)
+                     (zerop others))
+                (let ((temps (loop repeat n collect (gensym))))
+                  `(let ,(loop for i below n
+                               collect (list (nth i temps) (arg i)))
+                     (distance
+                       ,@(loop for i below n
+                               append (list (key i) (nth i temps)))))))
+               (t form))))))
+&rArr;  DISTANCE
+ (dolist (form
+           '((distance :x1 (setq x 7) :x2 (decf x) :y1 (decf x) :y2 (decf x))
+             (distance :x1 (setq x 7) :y1 (decf x) :x2 (decf x) :y2 (decf x))
+             (distance :x1 (setq x 7) :y1 (incf x))
+             (distance :x1 (setq x 7) :y1 (incf x) :x1 (incf x))
+             (distance :x1 a1 :y1 b1 :x2 a2 :y2 b2)
+             (distance :x1 a1 :x2 a2 :y1 b1 :y2 b2)
+             (distance :x1 a1 :y1 b1 :z1 c1 :x2 a2 :y2 b2 :z2 c2)))
+   (print (funcall (compiler-macro-function 'distance) form nil)))
+<code class="t"> |&gt; </code> (LET ((#:G6558 (SETQ X 7))
+<code class="t"> |&gt; </code>       (#:G6559 (DECF X))
+<code class="t"> |&gt; </code>       (#:G6560 (DECF X))
+<code class="t"> |&gt; </code>       (#:G6561 (DECF X)))
+<code class="t"> |&gt; </code>   (DISTANCE :X1 #:G6558 :X2 #:G6559 :Y1 #:G6560 :Y2 #:G6561)) 
+<code class="t"> |&gt; </code> (DISTANCE-POSITIONAL (SETQ X 7) (DECF X) (DECF X) (DECF X)) 
+<code class="t"> |&gt; </code> (LET ((#:G6567 (SETQ X 7))
+<code class="t"> |&gt; </code>       (#:G6568 (INCF X)))
+<code class="t"> |&gt; </code>   (DISTANCE :X1 #:G6567 :Y1 #:G6568)) 
+<code class="t"> |&gt; </code> (DISTANCE :X1 (SETQ X 7) :Y1 (INCF X) :X1 (INCF X)) 
+<code class="t"> |&gt; </code> (DISTANCE-POSITIONAL A1 B1 A2 B2) 
+<code class="t"> |&gt; </code> (DISTANCE-POSITIONAL A1 B1 A2 B2) 
+<code class="t"> |&gt; </code> (DISTANCE :X1 A1 :Y1 B1 :Z1 C1 :X2 A2 :Y2 B2 :Z2 C2) 
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-8"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-8"> &para;</a></span></h4>
+
+<p><a class="ref" href="compiler_002dmacro_002dfunction.html">compiler-macro-function                                          [Accessor]</a>
+,
+<a class="ref" href="defmacro.html">defmacro                                                            [Macro]</a>
+,
+<a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="Syntactic-Interaction-of-Documentation-Strings-and-Declarations.html">Syntactic Interaction of Documentation Strings and Declarations</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-6"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-6"> &para;</a></span></h4>
+
+<p>The consequences of writing a <i class="i">compiler macro</i> definition for a function
+in the <code class="t">COMMON-LISP</code> <i class="i">package</i> are undefined; it is quite possible that in some
+<i class="i">implementations</i> such an attempt would override an equivalent or equally
+important definition.  In general, it is recommended that a programmer only
+write <i class="i">compiler macro</i> definitions for <i class="i">functions</i> he or she personally 
+maintains&ndash;writing a <i class="i">compiler macro</i> definition for a function maintained
+elsewhere is normally considered a violation of traditional rules of modularity
+and data abstraction.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="defmacro.html">defmacro                                                            [Macro]</a>, Previous: <a href="compiler_002dmacro_002dfunction.html">compiler-macro-function                                          [Accessor]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/define_002dcondition.html
@@ -0,0 +1,399 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>define-condition (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="define-condition (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="define-condition (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="make_002dcondition.html" rel="next" title="make-condition">
+<link href="ignore_002derrors.html" rel="prev" title="ignore-errors">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="define_002dcondition">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dcondition.html" accesskey="n" rel="next">make-condition                                                   [Function]</a>, Previous: <a href="ignore_002derrors.html" accesskey="p" rel="prev">ignore-errors                                                       [Macro]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="define_002dcondition-_005bMacro_005d"><span>9.2.29 define-condition                                                    [Macro]<a class="copiable-link" href="#define_002dcondition-_005bMacro_005d"> &para;</a></span></h4>
+
+<p>[Editorial Note by KMP: This syntax stuff is still very confused and needs lots of work.]
+</p>
+<p><code class="code">define-condition</code>  <i class="i">name <span class="r">(</span>{<i class="i">parent-type</i>}*<span class="r">)</span>
+	                <span class="r">(</span>{!<i class="i">slot-spec</i>}*<span class="r">)</span>
+                        {<i class="i">option</i>}*</i><br>
+   &rArr;  <i class="i">name</i>
+</p>
+<p><i class="i">slot-spec</i>&nbsp;::=slot-name&nbsp;|&nbsp;<span class="r">(</span>slot-name&nbsp;!<i class="i">slot-option</i><span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">slot-option</i>&nbsp;::=[[&nbsp;{<code class="t">:reader</code>&nbsp;<i class="i">symbol</i>}*&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;{<code class="t">:writer</code>&nbsp;!<i class="i">function-name</i>}*&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;{<code class="t">:accessor</code>&nbsp;<i class="i">symbol</i>}*&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;{<code class="t">:allocation</code>&nbsp;!<i class="i">allocation-type</i>}&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;{<code class="t">:initarg</code>&nbsp;<i class="i">symbol</i>}*&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;{<code class="t">:initform</code>&nbsp;<i class="i">form</i>}&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;{<code class="t">:type</code>&nbsp;<i class="i">type-specifier</i>}&nbsp;]]<!-- /@w -->
+</p>
+<p><i class="i">option</i>&nbsp;::=[[&nbsp;<span class="r">(</span><code class="t">:default-initargs</code>&nbsp;<code class="t">.</code>&nbsp;<i class="i">initarg-list</i><span class="r">)</span>&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;<span class="r">(</span><code class="t">:documentation</code>&nbsp;<i class="i">string</i><span class="r">)</span>&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;<span class="r">(</span><code class="t">:report</code>&nbsp;<i class="i">report-name</i><span class="r">)</span>&nbsp;]]<!-- /@w -->
+</p>
+<p><i class="i">function-name</i>&nbsp;::={<i class="i">symbol</i>&nbsp;|&nbsp;<code class="t">(setf&nbsp;<i class="i">symbol</i>)</code>}<!-- /@w -->
+</p>
+<p><i class="i">allocation-type</i>&nbsp;::=<code class="t">:instance</code>&nbsp;|&nbsp;<code class="t">:class</code><!-- /@w -->
+</p>
+<p><i class="i">report-name</i>&nbsp;::=<i class="i">string</i>&nbsp;|&nbsp;<i class="i">symbol</i>&nbsp;|&nbsp;<i class="i">lambda&nbsp;expression</i><!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-146"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-146"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">parent-type</i>&mdash;a <i class="i">symbol</i> naming a <i class="i">condition</i> <i class="i">type</i>.
+  If no <i class="i">parent-types</i> are supplied,
+  the <i class="i">parent-types</i> default to <code class="t">(condition)</code>.
+</p>
+<p><i class="i">default-initargs</i>&mdash;a <i class="i">list</i> of <i class="i">keyword/value pairs</i>.
+</p>
+<p>[Editorial Note by KMP: This is all mixed up as to which is a slot option and which is
+		 a main option.  I&rsquo;ll sort that out.  Also, some of this is implied
+		 by the bnf and needn&rsquo;t be stated explicitly.]
+</p>
+<p><i class="i">Slot-spec</i> &ndash; the <i class="i">name</i> of a <i class="i">slot</i> or a <i class="i">list</i>
+consisting of the <i class="i">slot-name</i> followed by zero or more <i class="i">slot-options</i>.
+</p>
+<p><i class="i">Slot-name</i> &ndash; a slot name (a <i class="i">symbol</i>), 
+the <i class="i">list</i> of a slot name, or the 
+<i class="i">list</i> of slot name/slot form pairs.
+</p>
+<p><i class="i">Option</i> &ndash; Any of the following:
+</p>
+<dl class="table">
+<dt><code class="t">:reader</code></dt>
+<dd><p><code class="t">:reader</code> can be supplied more than once for a given <i class="i">slot</i> 
+and cannot be <b class="b">nil</b>.
+</p>
+</dd>
+<dt><code class="t">:writer</code></dt>
+<dd><p><code class="t">:writer</code> can be supplied more than once for a given <i class="i">slot</i>
+and must name a <i class="i">generic function</i>.
+</p>
+</dd>
+<dt><code class="t">:accessor</code></dt>
+<dd><p><code class="t">:accessor</code> can be supplied more than once for a given <i class="i">slot</i>
+and cannot be <b class="b">nil</b>.
+</p>
+</dd>
+<dt><code class="t">:allocation</code></dt>
+<dd><p><code class="t">:allocation</code> can be supplied once at most for a given <i class="i">slot</i>.
+The default if <code class="t">:allocation</code> is not supplied is <code class="t">:instance</code>.
+</p>
+</dd>
+<dt><code class="t">:initarg</code></dt>
+<dd><p><code class="t">:initarg</code> can be supplied more than once for a given <i class="i">slot</i>.  
+</p>
+</dd>
+<dt><code class="t">:initform</code></dt>
+<dd><p><code class="t">:initform</code> can be supplied once at most for a given <i class="i">slot</i>.  
+</p>
+</dd>
+<dt><code class="t">:type</code></dt>
+<dd><p><code class="t">:type</code> can be supplied once at most for a given <i class="i">slot</i>. 
+</p>
+</dd>
+<dt><code class="t">:documentation</code></dt>
+<dd><p><code class="t">:documentation</code> can be supplied once at most for a given <i class="i">slot</i>. 
+</p>
+</dd>
+<dt><code class="t">:report</code></dt>
+<dd><p><code class="t">:report</code> can be supplied once at most.
+</p>
+</dd>
+</dl>
+
+<h4 class="subsubheading" id="Description_003a_003a-199"><span>Description::<a class="copiable-link" href="#Description_003a_003a-199"> &para;</a></span></h4>
+
+<p><b class="b">define-condition</b> defines a new condition type called <i class="i">name</i>, 
+which is a <i class="i">subtype</i> of 
+</p>
+<p>the <i class="i">type</i> or <i class="i">types</i> named by
+  <i class="i">parent-type</i>.  
+Each <i class="i">parent-type</i> argument specifies a direct <i class="i">supertype</i>
+of the new <i class="i">condition</i>. The new <i class="i">condition</i>
+inherits <i class="i">slots</i> and <i class="i">methods</i> from each of its direct
+<i class="i">supertypes</i>, and so on.
+</p>
+<p>If a slot name/slot form pair is supplied,
+the slot form is a <i class="i">form</i> that 
+can be evaluated by <b class="b">make-condition</b> to
+  produce a default value when an explicit value is not provided.  If no 
+slot form
+is supplied, the contents of the <i class="i">slot</i> 
+is initialized in an 
+  <i class="i">implementation-dependent</i> way.  
+</p>
+<p>If the <i class="i">type</i> being defined and some other 
+<i class="i">type</i> from which it inherits
+  have a slot by the same name, only one slot is allocated in the
+  <i class="i">condition</i>, 
+but the supplied slot form overrides any slot form
+  that might otherwise have been inherited from a <i class="i">parent-type</i>.  If no 
+slot form is supplied, the inherited slot form (if any) is still visible.
+</p>
+<p>Accessors are created according to the same rules as used by 
+<b class="b">defclass</b>.
+</p>
+<p>A description of <i class="i">slot-options</i> follows:
+</p>
+<dl class="table">
+<dt><code class="t">:reader</code></dt>
+<dd><p>The <code class="t">:reader</code> slot option specifies that an <i class="i">unqualified method</i> is
+to be defined on the <i class="i">generic function</i> named by the argument
+to <code class="t">:reader</code> to read the value of the given <i class="i">slot</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:initform</code> slot option is used to provide a default
+initial value form to be used in the initialization of the <i class="i">slot</i>.  This
+<i class="i">form</i> is evaluated every time it is used to initialize the 
+<i class="i">slot</i>.  The
+<i class="i">lexical environment</i> 
+in which this <i class="i">form</i> is evaluated is the lexical
+<i class="i">environment</i> in which the <b class="b">define-condition</b> 
+form was evaluated.
+Note that the <i class="i">lexical environment</i> refers both to variables and to
+<i class="i">functions</i>.  
+For <i class="i">local slots</i>, the <i class="i">dynamic environment</i> is the dynamic
+<i class="i">environment</i> 
+in which <b class="b">make-condition</b> was called; for 
+<i class="i">shared slots</i>, the <i class="i">dynamic environment</i> 
+is the <i class="i">dynamic environment</i> in which the
+<b class="b">define-condition</b> form was evaluated.  
+</p>
+<p>[Reviewer Note by Barmar: Issue CLOS-CONDITIONS doesn&rsquo;t say this.]
+No implementation is permitted to extend the syntax of <b class="b">define-condition</b>
+to allow <code class="t">(<i class="i">slot-name</i> <i class="i">form</i>)</code> as an abbreviation for
+<code class="t">(<i class="i">slot-name</i> :initform <i class="i">form</i>)</code>.
+</p>
+</dd>
+<dt><code class="t">:initarg</code></dt>
+<dd><p>The <code class="t">:initarg</code> slot option declares an initialization
+argument named by its <i class="i">symbol</i> argument
+and specifies that this
+initialization argument initializes the given <i class="i">slot</i>.  If the
+initialization argument has a value in the call to 
+<b class="b">initialize-instance</b>, the value is stored into the given <i class="i">slot</i>,
+and the slot&rsquo;s <code class="t">:initform</code> slot option, if any, is not
+evaluated.  If none of the initialization arguments specified for a
+given <i class="i">slot</i> has a value, the <i class="i">slot</i> is initialized according to the
+<code class="t">:initform</code> slot option, if specified.  
+</p>
+</dd>
+<dt><code class="t">:type</code></dt>
+<dd><p>The <code class="t">:type</code> slot option specifies that the contents of the
+<i class="i">slot</i> is always of the specified <i class="i">type</i>.  It effectively
+declares the result type of the reader generic function when applied
+to an <i class="i">object</i> of this <i class="i">condition</i> type.  
+The consequences of attempting to store in a
+<i class="i">slot</i> a value that 
+does not satisfy the type of the <i class="i">slot</i> is undefined.
+</p>
+</dd>
+<dt><code class="t">:default-initargs</code></dt>
+<dd>
+<p>[Editorial Note by KMP: This is an option, not a slot option.]
+</p>
+<p>This option is treated the same as it would be <b class="b">defclass</b>.
+</p>
+</dd>
+<dt><code class="t">:documentation</code></dt>
+<dd>
+<p>[Editorial Note by KMP: This is both an option and a slot option.]
+</p>
+<p>The <code class="t">:documentation</code> slot option provides a <i class="i">documentation string</i>
+for the <i class="i">slot</i>.
+</p>
+</dd>
+<dt><code class="t">:report</code></dt>
+<dd>
+<p>[Editorial Note by KMP: This is an option, not a slot option.]
+</p>
+<p><i class="i">Condition</i> reporting is mediated through the <b class="b">print-object</b>
+method for the <i class="i">condition</i> type in question, with <b class="b">*print-escape*</b>
+always being <b class="b">nil</b>. Specifying <code class="t">(:report <i class="i">report-name</i>)</code> 
+in the definition of a condition type <code class="t">C</code> is equivalent to:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmethod print-object ((x c) stream)
+   (if *print-escape* (call-next-method) (<i class="i">report-name</i> x stream)))
+</pre></div>
+
+<p>If the value supplied by the argument to <code class="t">:report</code> (<i class="i">report-name</i>)
+is a <i class="i">symbol</i> or a <i class="i">lambda expression</i>, 
+it must be acceptable to 
+     <b class="b">function</b>. <code class="t">(function <i class="i">report-name</i>)</code> 
+is evaluated
+     in the current <i class="i">lexical environment</i>.  
+It should return a <i class="i">function</i> 
+of two
+     arguments, a <i class="i">condition</i> and a <i class="i">stream</i>, 
+that prints on the <i class="i">stream</i> a
+     description of the <i class="i">condition</i>. 
+ This <i class="i">function</i> is called whenever the
+     <i class="i">condition</i> is printed while <b class="b">*print-escape*</b> is <b class="b">nil</b>.
+</p>
+<p>If <i class="i">report-name</i> is a <i class="i">string</i>, it is a shorthand for 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (lambda (condition stream)
+   (declare (ignore condition))
+   (write-string <i class="i">report-name</i> stream))
+</pre></div>
+
+<p>This option is processed after the new <i class="i">condition</i> type has been defined,
+so use of the <i class="i">slot</i> accessors within the <code class="t">:report</code> function is permitted.
+If this option is not supplied, information about how to report this
+type of <i class="i">condition</i> is inherited from the <i class="i">parent-type</i>.
+</p>
+</dd>
+</dl>
+
+<p>The consequences are unspecifed if an attempt is made to <i class="i">read</i> a 
+<i class="i">slot</i> that has not been explicitly initialized and that has not 
+been given a default value.
+</p>
+<p>The consequences are unspecified if an attempt is made to assign the
+<i class="i">slots</i> by using <b class="b">setf</b>.
+</p>
+<p>If a <b class="b">define-condition</b> <i class="i">form</i> appears as a <i class="i">top level form</i>,
+the <i class="i">compiler</i> must make <i class="i">name</i> recognizable as a valid <i class="i">type</i> name,
+and it must be possible to reference the <i class="i">condition</i> <i class="i">type</i> as the
+<i class="i">parent-type</i> of another <i class="i">condition</i> <i class="i">type</i> in a subsequent
+<b class="b">define-condition</b> <i class="i">form</i> in the <i class="i">file</i> being compiled.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-128"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-128"> &para;</a></span></h4>
+
+<p>The following form defines a condition of <i class="i">type</i> 
+<code class="t">peg/hole-mismatch</code> which inherits from a condition type
+called <code class="t">blocks-world-error</code>:
+</p>
+<div class="example">
+<pre class="example-preformatted">(define-condition peg/hole-mismatch 
+                  (blocks-world-error)
+                  ((peg-shape  :initarg :peg-shape
+                               :reader peg/hole-mismatch-peg-shape)
+                   (hole-shape :initarg :hole-shape
+                               :reader peg/hole-mismatch-hole-shape))
+  (:report (lambda (condition stream)
+             (format stream &quot;A ~A peg cannot go in a ~A hole.&quot;
+                     (peg/hole-mismatch-peg-shape  condition)
+                     (peg/hole-mismatch-hole-shape condition)))))
+</pre></div>
+
+<p>The new type has slots <code class="t">peg-shape</code> and <code class="t">hole-shape</code>, 
+so <b class="b">make-condition</b> accepts <code class="t">:peg-shape</code> and <code class="t">:hole-shape</code> keywords.  
+The <i class="i">readers</i> <code class="t">peg/hole-mismatch-peg-shape</code> and <code class="t">peg/hole-mismatch-hole-shape</code> 
+apply to objects of this type, as illustrated in the <code class="t">:report</code> information.
+</p>
+<p>The following form defines a <i class="i">condition</i> <i class="i">type</i> named <code class="t">machine-error</code>
+which inherits from <b class="b">error</b>: 
+</p>
+<div class="example">
+<pre class="example-preformatted">(define-condition machine-error 
+                  (error)
+                  ((machine-name :initarg :machine-name
+                                 :reader machine-error-machine-name))
+  (:report (lambda (condition stream)
+             (format stream &quot;There is a problem with ~A.&quot;
+                     (machine-error-machine-name condition)))))
+</pre></div>
+
+<p>Building on this definition, a new error condition can be defined which
+is a subtype of <code class="t">machine-error</code> for use when machines are not available: 
+</p>
+<div class="example">
+<pre class="example-preformatted">(define-condition machine-not-available-error (machine-error) ()
+  (:report (lambda (condition stream)
+             (format stream &quot;The machine ~A is not available.&quot;
+                     (machine-error-machine-name condition)))))
+</pre></div>
+
+<p>This defines a still more specific condition, built upon 
+<code class="t">machine-not-available-error</code>, which provides a slot initialization form
+for <code class="t">machine-name</code> but which does not provide any new slots or report
+information.  It just gives the <code class="t">machine-name</code> slot a default initialization:
+</p>
+<div class="example">
+<pre class="example-preformatted">(define-condition my-favorite-machine-not-available-error
+                  (machine-not-available-error)
+  ((machine-name :initform &quot;mc.lcs.mit.edu&quot;)))
+</pre></div>
+
+<p>Note that since no <code class="t">:report</code> clause was given, the information 
+inherited from <code class="t">machine-not-available-error</code> is used to
+report this type of condition.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (define-condition ate-too-much (error) 
+     ((person :initarg :person :reader ate-too-much-person)
+      (weight :initarg :weight :reader ate-too-much-weight)
+      (kind-of-food :initarg :kind-of-food
+                    :reader :ate-too-much-kind-of-food)))
+&rArr;  ATE-TOO-MUCH
+ (define-condition ate-too-much-ice-cream (ate-too-much)
+   ((kind-of-food :initform 'ice-cream)
+    (flavor       :initarg :flavor
+                  :reader ate-too-much-ice-cream-flavor
+                  :initform 'vanilla ))
+   (:report (lambda (condition stream)
+              (format stream &quot;~A ate too much ~A ice-cream&quot;
+                      (ate-too-much-person condition)
+                      (ate-too-much-ice-cream-flavor condition)))))
+&rArr;  ATE-TOO-MUCH-ICE-CREAM
+ (make-condition 'ate-too-much-ice-cream
+                 :person 'fred
+                 :weight 300
+                 :flavor 'chocolate)
+&rArr;  #&lt;ATE-TOO-MUCH-ICE-CREAM 32236101&gt;
+ (format t &quot;~A&quot; *)
+<code class="t"> |&gt; </code> FRED ate too much CHOCOLATE ice-cream
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-174"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-174"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dcondition.html">make-condition                                                   [Function]</a>
+, 
+<a class="ref" href="defclass.html">defclass                                                            [Macro]</a>
+, <a class="ref" href="Condition-System-Concepts.html">Condition System Concepts</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dcondition.html">make-condition                                                   [Function]</a>, Previous: <a href="ignore_002derrors.html">ignore-errors                                                       [Macro]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/define_002dmethod_002dcombination.html
@@ -0,0 +1,622 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>define-method-combination (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="define-method-combination (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="define-method-combination (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="find_002dmethod.html" rel="next" title="find-method">
+<link href="compute_002dapplicable_002dmethods.html" rel="prev" title="compute-applicable-methods">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="define_002dmethod_002dcombination">
+<div class="nav-panel">
+<p>
+Next: <a href="find_002dmethod.html" accesskey="n" rel="next">find-method                                     [Standard Generic Function]</a>, Previous: <a href="compute_002dapplicable_002dmethods.html" accesskey="p" rel="prev">compute-applicable-methods                      [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="define_002dmethod_002dcombination-_005bMacro_005d"><span>7.7.33 define-method-combination                                           [Macro]<a class="copiable-link" href="#define_002dmethod_002dcombination-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">define-method-combination</code>  <i class="i">name [[!<i class="i">short-form-option</i>]]</i><br>
+   &rArr;  <i class="i">name</i>
+</p>
+<p><code class="code">define-method-combination</code>  <i class="i">name lambda-list
+                                <span class="r">(</span>{<i class="i">method-group-specifier</i>}*<span class="r">)</span>
+                                <span class="r">[</span><span class="r">(</span><code class="t">:arguments</code> . args-lambda-list<span class="r">)</span><span class="r">]</span>
+                                <span class="r">[</span><span class="r">(</span><code class="t">:generic-function</code> 
+                                                   generic-function-symbol<span class="r">)</span><span class="r">]</span>
+                                [[{<i class="i">declaration</i>}* | <i class="i">documentation</i>]]
+                                {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">name</i>
+</p>
+<p><i class="i">short-form-option</i>&nbsp;::=<code class="t">:documentation</code>&nbsp;<i class="i">documentation</i>&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;<code class="t">:identity-with-one-argument</code>&nbsp;<i class="i">identity-with-one-argument</i>&nbsp;|<!-- /@w -->
+&nbsp;<code class="t">:operator</code>&nbsp;<i class="i">operator</i><!-- /@w -->
+</p>
+<p><i class="i">method-group-specifier</i>&nbsp;::=<span class="r">(</span>name&nbsp;{{<i class="i">qualifier-pattern</i>}^+&nbsp;|&nbsp;predicate}&nbsp;[[!<i class="i">long-form-option</i>]]<span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">long-form-option</i>&nbsp;::=<code class="t">:description</code>&nbsp;<i class="i">description</i>&nbsp;|<!-- /@w -->
+&nbsp;<code class="t">:order</code>&nbsp;<i class="i">order</i>&nbsp;|<!-- /@w -->
+&nbsp;<code class="t">:required</code>&nbsp;<i class="i">required-p</i><!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-121"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-121"> &para;</a></span></h4>
+
+<p><i class="i">args-lambda-list</i>&mdash;
+a <i class="i">define-method-combination arguments lambda list</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">description</i>&mdash;a <i class="i">format control</i>.
+</p>
+<p><i class="i">documentation</i>&mdash;a <i class="i">string</i>; not evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i> 
+  that must compute and return the <i class="i">form</i> that specifies how
+  the <i class="i">methods</i> are combined, that is, the <i class="i">effective method</i>.
+</p>
+<p><i class="i">generic-function-symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">identity-with-one-argument</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">lambda-list</i>&mdash;<i class="i">ordinary lambda list</i>.
+</p>
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>. 
+  Non-<i class="i">keyword</i>, <i class="i">non-nil</i> <i class="i">symbols</i> are usually used.
+</p>
+<p><i class="i">operator</i>&mdash;an <i class="i">operator</i>.
+  <i class="i">Name</i> and <i class="i">operator</i> are often the <i class="i">same</i> <i class="i">symbol</i>.
+  This is the default, but it is not required.
+</p>
+<p><i class="i">order</i>&mdash;<code class="t">:most-specific-first</code> or <code class="t">:most-specific-last</code>; evaluated.
+</p>
+<p><i class="i">predicate</i>&mdash;a <i class="i">symbol</i> that names a <i class="i">function</i> of one argument
+		    that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">qualifier-pattern</i>&mdash;a <i class="i">list</i>,
+			 or the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<p><i class="i">required-p</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-160"><span>Description::<a class="copiable-link" href="#Description_003a_003a-160"> &para;</a></span></h4>
+
+<p>The macro <b class="b">define-method-combination</b> is used to define new types
+of method combination.
+</p>
+<p>There are two forms of <b class="b">define-method-combination</b>.  The short
+form is a simple facility for the cases that are expected
+to be most commonly needed.  The long form is more powerful but more
+verbose.  It resembles <b class="b">defmacro</b> in that the body is an
+expression, usually using backquote, that computes a <i class="i">form</i>.  Thus
+arbitrary control structures can be implemented.  The long form also
+allows arbitrary processing of method <i class="i">qualifiers</i>.
+</p>
+<dl class="table">
+<dt><b class="b">Short Form</b></dt>
+<dd><p>The short form syntax of <b class="b">define-method-combination</b> is recognized
+when the second <i class="i">subform</i> is a <i class="i">non-nil</i> symbol or is not present.
+When the short form is used, <i class="i">name</i> is defined as a type of
+method combination that produces a Lisp form
+<code class="t">(<span class="r"><i class="i">operator</i> <i class="i">method-call</i> <i class="i">method-call</i> ...</span>)</code>.
+The <i class="i">operator</i> is a <i class="i">symbol</i> that can be the <i class="i">name</i> of a 
+<i class="i">function</i>, <i class="i">macro</i>, or <i class="i">special operator</i>.  
+The <i class="i">operator</i> can be supplied by a keyword option;
+it defaults to <i class="i">name</i>.
+</p>
+<p>Keyword options for the short form are the following:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:documentation</code> option is used to document the method-combination type;
+see description of long form below.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:identity-with-one-argument</code> option enables an optimization
+when its value is <i class="i">true</i> (the default is <i class="i">false</i>).  If there is
+exactly one applicable method and it is a primary method, that method
+serves as the effective method and <i class="i">operator</i> is not called.
+This optimization avoids the need to create a new effective method and
+avoids the overhead of a <i class="i">function</i> call.  This option is designed to be
+used with operators such as <b class="b">progn</b>, <b class="b">and</b>, <b class="b">+</b>, and
+<b class="b">max</b>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:operator</code> option specifies the <i class="i">name</i> of the operator.  The
+<i class="i">operator</i> argument is a <i class="i">symbol</i> that can be the 
+<i class="i">name</i> of a <i class="i">function</i>,
+<i class="i">macro</i>, or 
+<i class="i">special form</i>.  
+</p>
+</dd>
+</dl>
+
+<p>These types of method combination require exactly one <i class="i">qualifier</i> per
+method.  An error is signaled if there are applicable methods with no
+<i class="i">qualifiers</i> or with <i class="i">qualifiers</i> that are not supported by 
+the method combination type. 
+</p>
+<p>A method combination procedure defined in this way recognizes two
+roles for methods.  A method whose one <i class="i">qualifier</i> is the symbol naming
+this type of method combination is defined to be a primary method.  At
+least one primary method must be applicable or an error is signaled.
+A method with <code class="t">:around</code> as its one <i class="i">qualifier</i> is an auxiliary
+method that behaves the same as an <i class="i">around method</i> in standard
+method combination.  The <i class="i">function</i> <b class="b">call-next-method</b> can only be
+used in <i class="i">around methods</i>; it cannot be used in primary methods
+defined by the short form of the <b class="b">define-method-combination</b> macro.
+</p>
+<p>A method combination procedure defined in this way accepts an optional
+argument named <i class="i">order</i>, which defaults to 
+<code class="t">:most-specific-first</code>.  A value of <code class="t">:most-specific-last</code> reverses
+the order of the primary methods without affecting the order of the
+auxiliary methods.
+</p>
+<p>The short form automatically includes error checking and support for
+<i class="i">around methods</i>.
+</p>
+<p>For a discussion of built-in method combination types, 
+see <a class="ref" href="Built_002din-Method-Combination-Types.html">Built-in Method Combination Types</a>.
+</p>
+</dd>
+<dt><b class="b">Long Form</b></dt>
+<dd><p>The long form syntax of <b class="b">define-method-combination</b> is recognized 
+when the second <i class="i">subform</i> is a list.  
+</p>
+<p>The <i class="i">lambda-list</i> 
+receives any arguments provided after the <i class="i">name</i> of the method
+combination type in the <code class="t">:method-combination</code> option to
+<b class="b">defgeneric</b>.
+</p>
+<p>A list of method group specifiers follows.  Each specifier selects a subset
+of the applicable methods to play a particular role, either by matching
+their <i class="i">qualifiers</i> against some patterns or by testing their <i class="i">qualifiers</i> with
+a <i class="i">predicate</i>.   
+These method group specifiers define all method <i class="i">qualifiers</i>
+that can be used with this type of method combination.
+</p>
+<p>The <i class="i">car</i> of each <i class="i">method-group-specifier</i> is a <i class="i">symbol</i>
+which <i class="i">names</i> a <i class="i">variable</i>.
+During the execution of
+the <i class="i">forms</i> in the body of <b class="b">define-method-combination</b>, this
+<i class="i">variable</i> is bound to a list of the <i class="i">methods</i> in the method group.  The
+<i class="i">methods</i> in this list occur in the order specified by the 
+<code class="t">:order</code> option.
+</p>
+<p>If <i class="i">qualifier-pattern</i> is a <i class="i">symbol</i> it must be <b class="b">*</b>.  
+A method matches
+a <i class="i">qualifier-pattern</i> if the method&rsquo;s 
+list of <i class="i">qualifiers</i> is <b class="b">equal</b>
+to the <i class="i">qualifier-pattern</i> (except that the symbol <b class="b">*</b> in a 
+<i class="i">qualifier-pattern</i> matches anything).  Thus 
+a <i class="i">qualifier-pattern</i> can be one of the
+following:
+ the <i class="i">empty list</i>, which matches <i class="i">unqualified methods</i>;
+ the symbol <b class="b">*</b>, which matches all methods;
+ a true list, which matches methods with the same number of <i class="i">qualifiers</i> 
+   as the length of the list when each <i class="i">qualifier</i> matches 
+   the corresponding list element; or
+ a dotted list that ends in the symbol <b class="b">*</b> 
+   (the <b class="b">*</b> matches any number of additional <i class="i">qualifiers</i>).
+</p>
+<p>Each applicable method is tested against the <i class="i">qualifier-patterns</i> and
+<i class="i">predicates</i> in left-to-right order.  
+As soon as a <i class="i">qualifier-pattern</i> matches
+or a <i class="i">predicate</i> returns true, the method becomes a member of the
+corresponding method group and no further tests are made.  Thus if a method
+could be a member of more than one method group, it joins only the first
+such group.  If a method group has more than one 
+<i class="i">qualifier-pattern</i>, a
+method need only satisfy one of the <i class="i">qualifier-patterns</i> to be a member of
+the group.
+</p>
+<p>The <i class="i">name</i> of a <i class="i">predicate</i> function can appear instead of 
+<i class="i">qualifier-patterns</i> in a method group specifier.  
+The <i class="i">predicate</i> is called for
+each method that has not been assigned to an earlier method group; it
+is called with one argument, the method&rsquo;s <i class="i">qualifier</i> <i class="i">list</i>.
+The <i class="i">predicate</i> should return true if the method is to be a member of the
+method group.  A <i class="i">predicate</i> can be distinguished from a 
+<i class="i">qualifier-pattern</i>
+because it is a <i class="i">symbol</i> other than <b class="b">nil</b> or <b class="b">*</b>.
+</p>
+<p>If there is an applicable method that does not fall into any method group,
+the <i class="i">function</i> <b class="b">invalid-method-error</b> is called.
+</p>
+<p>Method group specifiers can have keyword options following the
+<i class="i">qualifier</i> patterns or predicate.  Keyword options can be distinguished from
+additional <i class="i">qualifier</i> patterns because they are neither lists nor the symbol
+<b class="b">*</b>.  The keyword options are as follows:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:description</code> option is used to provide a description of the
+role of methods in the method group.  Programming environment tools
+use
+ <code class="t">(apply #'format stream <i class="i">format-control</i> (method-qualifiers <i class="i">method</i>))</code>
+to print this description, which
+is expected to be concise.  This keyword
+option allows the description of a method <i class="i">qualifier</i> to be defined in
+the same module that defines the meaning of the 
+method <i class="i">qualifier</i>.  In most cases, <i class="i">format-control</i> will not contain any
+<b class="b">format</b> directives, but they are available for generality.  
+If <code class="t">:description</code> is not supplied, a default description is generated
+based on the variable name and the <i class="i">qualifier</i> patterns and on whether
+this method group includes the <i class="i">unqualified methods</i>.  
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:order</code> option specifies the order of methods.  The <i class="i">order</i>
+argument is a <i class="i">form</i> that evaluates to 
+<code class="t">:most-specific-first</code> or <code class="t">:most-specific-last</code>.  If it evaluates
+to any other value, an error is signaled.  
+If <code class="t">:order</code> is not supplied, it defaults to 
+<code class="t">:most-specific-first</code>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <code class="t">:required</code> option specifies whether at least one method in
+this method group is required.
+If its value is <i class="i">true</i> and the method group is empty 
+(that is, no applicable methods match the <i class="i">qualifier</i> patterns
+or satisfy the predicate), 
+an error is signaled.  
+If <code class="t">:required</code> is not supplied,
+it defaults to <b class="b">nil</b>.  
+</p>
+</dd>
+</dl>
+
+<p>The use of method group specifiers provides a convenient syntax to
+select methods, to divide them among the possible roles, and to perform the
+necessary error checking.  It is possible to perform further filtering
+of methods in the body <i class="i">forms</i> by using normal list-processing operations
+and the functions <b class="b">method-qualifiers</b> and 
+<b class="b">invalid-method-error</b>.  It is permissible to use <b class="b">setq</b> on the
+variables named in the method group specifiers and to bind additional
+variables.  It is also possible to bypass the method group specifier
+mechanism and do everything in the body <i class="i">forms</i>.  This is accomplished
+by writing a single method group with <b class="b">*</b> as its only 
+<i class="i">qualifier-pattern</i>; 
+the variable is then bound to a <i class="i">list</i> of all of the
+<i class="i">applicable methods</i>, in most-specific-first order.
+</p>
+<p>The body <i class="i">forms</i> compute and return the <i class="i">form</i> that specifies
+how the methods are combined, that is, the effective method.
+The effective method is evaluated in
+the <i class="i">null lexical environment</i> augmented with a local macro definition
+for <b class="b">call-method</b> and with bindings named by
+symbols not <i class="i">accessible</i> from the <code class="t">COMMON-LISP-USER</code> <i class="i">package</i>.
+Given a method object in one of the 
+<i class="i">lists</i> produced by the method group
+specifiers and a <i class="i">list</i> of next methods,
+<b class="b">call-method</b>
+will invoke the method such that <b class="b">call-next-method</b> has available
+the next methods.
+</p>
+<p>When an effective method has no effect other than to call a single
+method, some implementations employ an optimization that uses the
+single method directly as the effective method, thus avoiding the need
+to create a new effective method.  This optimization is active when
+the effective method form consists entirely of an invocation of
+the <b class="b">call-method</b> macro whose first <i class="i">subform</i> is a method object and
+whose second <i class="i">subform</i> is <b class="b">nil</b> or unsupplied.  Each
+<b class="b">define-method-combination</b> body is responsible for stripping off
+redundant invocations of <b class="b">progn</b>, <b class="b">and</b>,
+<b class="b">multiple-value-prog1</b>, and the like, if this optimization is desired.
+</p>
+<p>The list <code class="t">(:arguments . <i class="i">lambda-list</i>)</code> can appear before
+any declarations or <i class="i">documentation string</i>.  This form is useful when
+the method combination type performs some specific behavior as part of
+the combined method and that behavior needs access to the arguments to
+the <i class="i">generic function</i>.  Each parameter variable defined by 
+<i class="i">lambda-list</i> is bound to a <i class="i">form</i> that can be inserted into the
+effective method.  When this <i class="i">form</i> is evaluated during execution of the
+effective method, its value is the corresponding argument to the
+<i class="i">generic function</i>; the consequences of using such a <i class="i">form</i> as
+the <i class="i">place</i> in a <b class="b">setf</b> <i class="i">form</i> are undefined.
+</p>
+<p>Argument correspondence is computed by dividing the <code class="t">:arguments</code> <i class="i">lambda-list</i>
+and the <i class="i">generic function</i> <i class="i">lambda-list</i> into three sections:
+     the <i class="i">required parameters</i>,
+     the <i class="i">optional parameters</i>,
+ and the <i class="i">keyword</i> and <i class="i">rest parameters</i>.
+The <i class="i">arguments</i> supplied to the <i class="i">generic function</i> for a particular <i class="i">call</i>
+are also divided into three sections;
+     the required <i class="i">arguments</i> section contains as many <i class="i">arguments</i>
+      as the <i class="i">generic function</i> has <i class="i">required parameters</i>,
+     the optional <i class="i">arguments</i> section contains as many arguments
+      as the <i class="i">generic function</i> has <i class="i">optional parameters</i>,
+     and the keyword/rest <i class="i">arguments</i> section contains the remaining arguments.
+Each <i class="i">parameter</i> in the required and optional sections of the 
+<code class="t">:arguments</code> <i class="i">lambda-list</i> accesses the argument at the same position
+in the corresponding section of the <i class="i">arguments</i>.
+If the section of the <code class="t">:arguments</code> <i class="i">lambda-list</i> is shorter,
+ extra <i class="i">arguments</i> are ignored. 
+If the section of the <code class="t">:arguments</code> <i class="i">lambda-list</i> is longer,
+ excess <i class="i">required parameters</i> are bound to forms that evaluate to <b class="b">nil</b> 
+ and excess <i class="i">optional parameters</i> are <i class="i">bound</i> to their initforms.
+The <i class="i">keyword parameters</i> and <i class="i">rest parameters</i> in the <code class="t">:arguments</code>
+<i class="i">lambda-list</i> access the keyword/rest section of the <i class="i">arguments</i>.
+If the <code class="t">:arguments</code> <i class="i">lambda-list</i> contains <b class="b">&amp;key</b>, it behaves as
+if it also contained <b class="b">&amp;allow-other-keys</b>.
+</p>
+<p>In addition, <b class="b">&amp;whole</b> <i class="i">var</i> can be placed first in the <code class="t">:arguments</code>
+<i class="i">lambda-list</i>.  It causes <i class="i">var</i> to be <i class="i">bound</i> to a <i class="i">form</i>
+that <i class="i">evaluates</i> to a <i class="i">list</i> of all of the <i class="i">arguments</i> supplied
+to the <i class="i">generic function</i>.  This is different from <b class="b">&amp;rest</b> because it
+accesses all of the arguments, not just the keyword/rest <i class="i">arguments</i>.
+</p>
+<p>Erroneous conditions detected by the body should be reported with
+<b class="b">method-combination-error</b> or <b class="b">invalid-method-error</b>; these
+<i class="i">functions</i>
+add any necessary contextual information to the error message and will
+signal the appropriate error.
+</p>
+<p>The body <i class="i">forms</i> are evaluated inside of the <i class="i">bindings</i> created by
+the
+<i class="i">lambda list</i> and method group specifiers. 
+</p>
+<p>[Reviewer Note by Barmar: Are they inside or outside the :ARGUMENTS bindings?]
+Declarations at the head of
+the body are positioned directly inside of <i class="i">bindings</i> created by the
+<i class="i">lambda list</i> and outside of the <i class="i">bindings</i> of the method group variables. 
+Thus method group variables cannot be declared in this way.  <b class="b">locally</b> may be used
+around the body, however.
+</p>
+<p>Within the body <i class="i">forms</i>, <i class="i">generic-function-symbol</i>
+is bound to the <i class="i">generic function</i> <i class="i">object</i>.
+</p>
+<p><i class="i">Documentation</i> is attached as a <i class="i">documentation string</i> 
+    to <i class="i">name</i> (as kind <b class="b">method-combination</b>)
+and to the <i class="i">method combination</i> <i class="i">object</i>.
+</p>
+<p>Note that two methods with identical specializers, but with different
+<i class="i">qualifiers</i>, are not ordered by the algorithm described in Step 2 of
+the method selection and combination process described in 
+<a class="ref" href="Method-Selection-and-Combination.html">Method Selection and Combination</a>.  Normally the two methods play
+different roles in the effective method because they have different
+<i class="i">qualifiers</i>, and no matter how they are ordered in the result of Step
+2, the effective method is the same.  If the two methods play the same
+role and their order matters, 
+</p>
+<p>[Reviewer Note by Barmar: How does the system know when the order matters?]
+an error is signaled.  This happens as
+part of the <i class="i">qualifier</i> pattern matching in
+<b class="b">define-method-combination</b>.
+</p>
+</dd>
+</dl>
+
+<p>If a <b class="b">define-method-combination</b> <i class="i">form</i> appears as a
+<i class="i">top level form</i>, the <i class="i">compiler</i> must make the
+<i class="i">method combination</i> <i class="i">name</i> be recognized as a valid
+<i class="i">method combination</i> <i class="i">name</i> in subsequent <b class="b">defgeneric</b>
+<i class="i">forms</i>.  However, the <i class="i">method combination</i> is executed
+no earlier than when the <b class="b">define-method-combination</b> <i class="i">form</i>
+is executed, and possibly as late as the time that <i class="i">generic functions</i>
+that use the <i class="i">method combination</i> are executed.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-110"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-110"> &para;</a></span></h4>
+
+<p>Most examples of the long form of <b class="b">define-method-combination</b> also
+illustrate the use of the related <i class="i">functions</i> that are provided as part
+of the declarative method combination facility.
+</p>
+<div class="example">
+<pre class="example-preformatted">;;; Examples of the short form of define-method-combination
+
+ (define-method-combination and :identity-with-one-argument t) 
+
+ (defmethod func and ((x class1) y) ...)
+
+;;; The equivalent of this example in the long form is:
+
+ (define-method-combination and 
+         (&amp;optional (order :most-specific-first))
+         ((around (:around))
+          (primary (and) :order order :required t))
+   (let ((form (if (rest primary)
+                   `(and ,@(mapcar #'(lambda (method)
+                                       `(call-method ,method))
+                                   primary))
+                   `(call-method ,(first primary)))))
+     (if around
+         `(call-method ,(first around)
+                       (,@(rest around)
+                        (make-method ,form)))
+         form)))
+
+;;; Examples of the long form of define-method-combination
+
+;The default method-combination technique
+ (define-method-combination standard ()
+         ((around (:around))
+          (before (:before))
+          (primary () :required t)
+          (after (:after)))
+   (flet ((call-methods (methods)
+            (mapcar #'(lambda (method)
+                        `(call-method ,method))
+                    methods)))
+     (let ((form (if (or before after (rest primary))
+                     `(multiple-value-prog1
+                        (progn ,@(call-methods before)
+                               (call-method ,(first primary)
+                                            ,(rest primary)))
+                        ,@(call-methods (reverse after)))
+                     `(call-method ,(first primary)))))
+       (if around
+           `(call-method ,(first around)
+                         (,@(rest around)
+                          (make-method ,form)))
+           form))))
+
+;A simple way to try several methods until one returns non-nil
+ (define-method-combination or ()
+         ((methods (or)))
+   `(or ,@(mapcar #'(lambda (method)
+                      `(call-method ,method))
+                  methods)))
+
+;A more complete version of the preceding
+ (define-method-combination or 
+         (&amp;optional (order ':most-specific-first))
+         ((around (:around))
+          (primary (or)))
+   ;; Process the order argument
+   (case order
+     (:most-specific-first)
+     (:most-specific-last (setq primary (reverse primary)))
+     (otherwise (method-combination-error &quot;~S is an invalid order.~@
+     :most-specific-first and :most-specific-last are the possible values.&quot;
+                                          order)))
+   ;; Must have a primary method
+   (unless primary
+     (method-combination-error &quot;A primary method is required.&quot;))
+   ;; Construct the form that calls the primary methods
+   (let ((form (if (rest primary)
+                   `(or ,@(mapcar #'(lambda (method)
+                                      `(call-method ,method))
+                                  primary))
+                   `(call-method ,(first primary)))))
+     ;; Wrap the around methods around that form
+     (if around
+         `(call-method ,(first around)
+                       (,@(rest around)
+                        (make-method ,form)))
+         form)))
+
+;The same thing, using the :order and :required keyword options
+ (define-method-combination or 
+         (&amp;optional (order ':most-specific-first))
+         ((around (:around))
+          (primary (or) :order order :required t))
+   (let ((form (if (rest primary)
+                   `(or ,@(mapcar #'(lambda (method)
+                                      `(call-method ,method))
+                                  primary))
+                   `(call-method ,(first primary)))))
+     (if around
+         `(call-method ,(first around)
+                       (,@(rest around)
+                        (make-method ,form)))
+         form)))
+
+;This short-form call is behaviorally identical to the preceding
+ (define-method-combination or :identity-with-one-argument t)
+
+;Order methods by positive integer qualifiers
+;:around methods are disallowed to keep the example small
+ (define-method-combination example-method-combination ()
+         ((methods positive-integer-qualifier-p))
+   `(progn ,@(mapcar #'(lambda (method)
+                         `(call-method ,method))
+                     (stable-sort methods #'&lt;
+                       :key #'(lambda (method)
+                                (first (method-qualifiers method)))))))
+
+ (defun positive-integer-qualifier-p (method-qualifiers)
+   (and (= (length method-qualifiers) 1)
+        (typep (first method-qualifiers) '(integer 0 *))))
+
+;;; Example of the use of :arguments
+ (define-method-combination progn-with-lock ()
+         ((methods ()))
+   (:arguments object)
+   `(unwind-protect
+        (progn (lock (object-lock ,object))
+               ,@(mapcar #'(lambda (method)
+                             `(call-method ,method))
+                         methods))
+      (unlock (object-lock ,object))))
+
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-7"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-7"> &para;</a></span></h4>
+
+<p>The <i class="i">compiler</i> is not required to perform any compile-time side-effects.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-42"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-42"> &para;</a></span></h4>
+
+<p>Method combination types defined with the short form require exactly
+one <i class="i">qualifier</i> per method.  
+An error of <i class="i">type</i> <b class="b">error</b> is signaled if there are
+applicable methods with no <i class="i">qualifiers</i> or with <i class="i">qualifiers</i> that are not
+supported by the method combination type.
+At least one primary method must be applicable or 
+an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<p>If an applicable method does not fall into any method group, the
+system signals an error of <i class="i">type</i> <b class="b">error</b>
+indicating that the method is invalid for the kind of
+method combination in use.
+</p>
+<p>If the value of the <code class="t">:required</code> option is <i class="i">true</i>
+and the method group is empty (that is, no applicable
+methods match the <i class="i">qualifier</i> patterns or satisfy the predicate), 
+an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<p>If the <code class="t">:order</code> option evaluates to a value other than 
+<code class="t">:most-specific-first</code> or <code class="t">:most-specific-last</code>, 
+an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-142"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-142"> &para;</a></span></h4>
+
+<p><a class="ref" href="call_002dmethod.html">call-method, make-method                                      [Local Macro]</a>
+,
+<a class="ref" href="call_002dnext_002dmethod.html">call-next-method                                           [Local Function]</a>
+,
+<a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="method_002dqualifiers.html">method-qualifiers                               [Standard Generic Function]</a>
+,
+<a class="ref" href="method_002dcombination_002derror.html">method-combination-error                                         [Function]</a>
+,
+<a class="ref" href="invalid_002dmethod_002derror.html">invalid-method-error                                             [Function]</a>
+,
+<a class="ref" href="defgeneric.html">defgeneric                                                          [Macro]</a>
+,
+<a class="ref" href="Method-Selection-and-Combination.html">Method Selection and Combination</a>,
+<a class="ref" href="Built_002din-Method-Combination-Types.html">Built-in Method Combination Types</a>,
+<a class="ref" href="Syntactic-Interaction-of-Documentation-Strings-and-Declarations.html">Syntactic Interaction of Documentation Strings and Declarations</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-90"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-90"> &para;</a></span></h4>
+
+<p>The <code class="t">:method-combination</code> option of <b class="b">defgeneric</b> is used to
+specify that a <i class="i">generic function</i> should use a particular method
+combination type.  The first argument to the <code class="t">:method-combination</code>
+option is the <i class="i">name</i> of a method combination type and the remaining
+arguments are options for that type.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="find_002dmethod.html">find-method                                     [Standard Generic Function]</a>, Previous: <a href="compute_002dapplicable_002dmethods.html">compute-applicable-methods                      [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/define_002dmodify_002dmacro.html
@@ -0,0 +1,134 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>define-modify-macro (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="define-modify-macro (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="define-modify-macro (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="defsetf.html" rel="next" title="defsetf">
+<link href="progn.html" rel="prev" title="progn">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="define_002dmodify_002dmacro">
+<div class="nav-panel">
+<p>
+Next: <a href="defsetf.html" accesskey="n" rel="next">defsetf                                                             [Macro]</a>, Previous: <a href="progn.html" accesskey="p" rel="prev">progn                                                    [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="define_002dmodify_002dmacro-_005bMacro_005d"><span>5.3.60 define-modify-macro                                                 [Macro]<a class="copiable-link" href="#define_002dmodify_002dmacro-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">define-modify-macro</code>  <i class="i">name lambda-list function <span class="r">[</span>documentation<span class="r">]</span></i> &rArr;  <i class="i">name</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-78"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-78"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">lambda-list</i>&mdash;a <i class="i">define-modify-macro lambda list</i> 
+</p>
+<p><i class="i">function</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">documentation</i>&mdash;a <i class="i">string</i>; not evaluated.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-113"><span>Description::<a class="copiable-link" href="#Description_003a_003a-113"> &para;</a></span></h4>
+
+<p><b class="b">define-modify-macro</b> defines a <i class="i">macro</i> named
+<i class="i">name</i> to <i class="i">read</i> and <i class="i">write</i> a <i class="i">place</i>.
+</p>
+<p>The arguments to the new <i class="i">macro</i> are a <i class="i">place</i>,
+followed
+by the arguments that are supplied in <i class="i">lambda-list</i>.
+</p>
+<p><i class="i">Macros</i> defined with <b class="b">define-modify-macro</b> 
+correctly pass the <i class="i">environment parameter</i> to 
+</p>
+<p><b class="b">get-setf-expansion</b>.
+</p>
+<p>When the <i class="i">macro</i> is invoked, <i class="i">function</i> 
+is applied to the old contents of the <i class="i">place</i>
+and the <i class="i">lambda-list</i> arguments to obtain the new value,
+and the <i class="i">place</i> is updated to contain the result.
+</p>
+<p>Except for the issue of avoiding multiple evaluation (see below), the expansion
+of a <b class="b">define-modify-macro</b> is equivalent to the following:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmacro <i class="i">name</i> (reference . <i class="i">lambda-list</i>)
+   <i class="i">documentation</i>
+   `(setf ,reference
+          (<i class="i">function</i> ,reference ,<i class="i">arg1</i> ,<i class="i">arg2</i> ...)))
+</pre></div>
+
+<p>where <i class="i">arg1</i>, <i class="i">arg2</i>, ..., 
+are the parameters appearing in <i class="i">lambda-list</i>;
+appropriate provision is made for a <i class="i">rest parameter</i>.
+</p>
+<p>The <i class="i">subforms</i> of the macro calls defined by <b class="b">define-modify-macro</b>
+are evaluated as specified in <a class="ref" href="Evaluation-of-Subforms-to-Places.html">Evaluation of Subforms to Places</a>.
+</p>
+<p><i class="i">Documentation</i> is attached as a <i class="i">documentation string</i> 
+    to <i class="i">name</i> (as kind <b class="b">function</b>)
+and to the <i class="i">macro function</i>.
+</p>
+<p>If a <b class="b">define-modify-macro</b> <i class="i">form</i> appears as a <i class="i">top level form</i>,
+the <i class="i">compiler</i> must store the <i class="i">macro</i> definition at compile time,
+so that occurrences of the macro later on in the file can be expanded correctly.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-86"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-86"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (define-modify-macro appendf (&amp;rest args) 
+    append &quot;Append onto list&quot;) &rArr;  APPENDF
+ (setq x '(a b c) y x) &rArr;  (A B C)
+ (appendf x '(d e f) '(1 2 3)) &rArr;  (A B C D E F 1 2 3)
+ x &rArr;  (A B C D E F 1 2 3)
+ y &rArr;  (A B C)
+ (define-modify-macro new-incf (&amp;optional (delta 1)) +)
+ (define-modify-macro unionf (other-set &amp;rest keywords) union)
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-4"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-4"> &para;</a></span></h4>
+
+<p>A macro definition is assigned to <i class="i">name</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-97"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-97"> &para;</a></span></h4>
+
+<p><a class="ref" href="defsetf.html">defsetf                                                             [Macro]</a>
+,
+</p>
+<p><a class="ref" href="define_002dsetf_002dexpander.html">define-setf-expander                                                [Macro]</a>
+,
+</p>
+<p><a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="Syntactic-Interaction-of-Documentation-Strings-and-Declarations.html">Syntactic Interaction of Documentation Strings and Declarations</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="defsetf.html">defsetf                                                             [Macro]</a>, Previous: <a href="progn.html">progn                                                    [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/define_002dsetf_002dexpander.html
@@ -0,0 +1,184 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>define-setf-expander (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="define-setf-expander (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="define-setf-expander (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="get_002dsetf_002dexpansion.html" rel="next" title="get-setf-expansion">
+<link href="defsetf.html" rel="prev" title="defsetf">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="define_002dsetf_002dexpander">
+<div class="nav-panel">
+<p>
+Next: <a href="get_002dsetf_002dexpansion.html" accesskey="n" rel="next">get-setf-expansion                                               [Function]</a>, Previous: <a href="defsetf.html" accesskey="p" rel="prev">defsetf                                                             [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="define_002dsetf_002dexpander-_005bMacro_005d"><span>5.3.62 define-setf-expander                                                [Macro]<a class="copiable-link" href="#define_002dsetf_002dexpander-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">define-setf-expander</code>  <i class="i">access-fn lambda-list
+			 <span class="r">[[{<i class="i">declaration</i>}* | <i class="i">documentation</i>]]</span> {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">access-fn</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-80"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-80"> &para;</a></span></h4>
+
+<p><i class="i">access-fn</i>&mdash;a <i class="i">symbol</i> that <i class="i">names</i> a <i class="i">function</i> or <i class="i">macro</i>.
+</p>
+<p><i class="i">lambda-list</i> &ndash; <i class="i">macro lambda list</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">documentation</i>&mdash;a <i class="i">string</i>; not evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-115"><span>Description::<a class="copiable-link" href="#Description_003a_003a-115"> &para;</a></span></h4>
+
+<p><b class="b">define-setf-expander</b> specifies the means by which <b class="b">setf</b> 
+updates a <i class="i">place</i> that is referenced by <i class="i">access-fn</i>.
+</p>
+<p>When <b class="b">setf</b> is given a <i class="i">place</i> that is
+specified in terms of <i class="i">access-fn</i> and a new value for the 
+<i class="i">place</i>, it is expanded into a form that performs
+the appropriate update. 
+</p>
+<p>The <i class="i">lambda-list</i> supports destructuring.
+See <a class="ref" href="Macro-Lambda-Lists.html">Macro Lambda Lists</a>.
+</p>
+<p><i class="i">Documentation</i> is attached to <i class="i">access-fn</i> as a <i class="i">documentation string</i>
+of kind <b class="b">setf</b>.
+</p>
+<p><i class="i">Forms</i> constitute the body of the 
+</p>
+<p><i class="i">setf expander</i> 
+</p>
+<p>definition and must compute the <i class="i">setf expansion</i> for a call on <b class="b">setf</b> 
+that references the <i class="i">place</i> by means of the given
+<i class="i">access-fn</i>.
+</p>
+<p>The <i class="i">setf expander</i> function is defined in the same <i class="i">lexical environment</i>
+in which the <b class="b">define-setf-expander</b> <i class="i">form</i> appears.
+</p>
+<p>While <i class="i">forms</i> are being executed,
+the variables in <i class="i">lambda-list</i> are bound to parts of the <i class="i">place</i> <i class="i">form</i>.
+</p>
+<p>The body <i class="i">forms</i> (but not the <i class="i">lambda-list</i>)
+</p>
+<p>in a <b class="b">define-setf-expander</b> <i class="i">form</i> are implicitly enclosed in a 
+<i class="i">block</i> whose name is 
+<i class="i">access-fn</i>.
+</p>
+<p>The evaluation of <i class="i">forms</i> must result in the five values
+described in <a class="ref" href="Setf-Expansions.html">Setf Expansions</a>.
+</p>
+<p>If a <b class="b">define-setf-expander</b> <i class="i">form</i> appears as a <i class="i">top level form</i>,
+the <i class="i">compiler</i> must make the <i class="i">setf expander</i> available so that
+it may be used to expand calls to <b class="b">setf</b> later on in the <i class="i">file</i>.
+<i class="i">Programmers</i> must ensure that the <i class="i">forms</i> can be evaluated
+at compile time if the <i class="i">access-fn</i> is used in a <i class="i">place</i>
+later in the same <i class="i">file</i>.
+The <i class="i">compiler</i> must make these <i class="i">setf expanders</i> available to 
+compile-time calls to <b class="b">get-setf-expansion</b> when its <i class="i">environment</i> 
+argument is a value received as the <i class="i">environment parameter</i> of a <i class="i">macro</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-88"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-88"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (defun lastguy (x) (car (last x))) &rArr;  LASTGUY
+ (define-setf-expander lastguy (x &amp;environment env)
+   &quot;Set the last element in a list to the given value.&quot;
+   (multiple-value-bind (dummies vals newval setter getter)
+       (get-setf-expansion x env)
+     (let ((store (gensym)))
+       (values dummies
+               vals
+               `(,store)
+               `(progn (rplaca (last ,getter) ,store) ,store)
+               `(lastguy ,getter))))) &rArr;  LASTGUY
+ (setq a (list 'a 'b 'c 'd)
+       b (list 'x)
+       c (list 1 2 3 (list 4 5 6))) &rArr;  (1 2 3 (4 5 6))
+ (setf (lastguy a) 3) &rArr;  3
+ (setf (lastguy b) 7) &rArr;  7
+ (setf (lastguy (lastguy c)) 'lastguy-symbol) &rArr;  LASTGUY-SYMBOL
+ a &rArr;  (A B C 3)
+ b &rArr;  (7)
+ c &rArr;  (1 2 3 (4 5 LASTGUY-SYMBOL))
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted">;;; Setf expander for the form (LDB bytespec int).
+;;; Recall that the int form must itself be suitable for SETF.
+ (define-setf-expander ldb (bytespec int &amp;environment env)
+   (multiple-value-bind (temps vals stores
+                          store-form access-form)
+       (get-setf-expansion int env);Get setf expansion for int.
+     (let ((btemp (gensym))     ;Temp var for byte specifier.
+           (store (gensym))     ;Temp var for byte to store.
+           (stemp (first stores))) ;Temp var for int to store.
+       (if (cdr stores) (error &quot;Can't expand this.&quot;))
+;;; Return the setf expansion for LDB as five values.
+       (values (cons btemp temps)       ;Temporary variables.
+               (cons bytespec vals)     ;Value forms.
+               (list store)             ;Store variables.
+               `(let ((,stemp (dpb ,store ,btemp ,access-form)))
+                  ,store-form
+                  ,store)               ;Storing form.
+               `(ldb ,btemp ,access-form) ;Accessing form.
+              ))))
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-99"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-99"> &para;</a></span></h4>
+
+<p><a class="ref" href="setf.html">setf, psetf                                                         [Macro]</a>
+,
+<a class="ref" href="defsetf.html">defsetf                                                             [Macro]</a>
+,
+<a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="get_002dsetf_002dexpansion.html">get-setf-expansion                                               [Function]</a>
+,
+<a class="ref" href="Syntactic-Interaction-of-Documentation-Strings-and-Declarations.html">Syntactic Interaction of Documentation Strings and Declarations</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-65"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-65"> &para;</a></span></h4>
+
+<p><b class="b">define-setf-expander</b> differs from the long form of <b class="b">defsetf</b>
+in that while the body is being executed the <i class="i">variables</i>
+in <i class="i">lambda-list</i> are bound to parts of the <i class="i">place</i> <i class="i">form</i>,
+not to temporary variables that will be bound to the values of such parts.
+In addition, <b class="b">define-setf-expander</b> does not have <b class="b">defsetf</b>&rsquo;s
+restriction that <i class="i">access-fn</i> must be a <i class="i">function</i> 
+or a function-like <i class="i">macro</i>; an arbitrary <b class="b">defmacro</b> destructuring
+pattern is permitted in <i class="i">lambda-list</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="get_002dsetf_002dexpansion.html">get-setf-expansion                                               [Function]</a>, Previous: <a href="defsetf.html">defsetf                                                             [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/define_002dsymbol_002dmacro.html
@@ -0,0 +1,126 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>define-symbol-macro (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="define-symbol-macro (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="define-symbol-macro (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="symbol_002dmacrolet.html" rel="next" title="symbol-macrolet">
+<link href="macroexpand.html" rel="prev" title="macroexpand">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="define_002dsymbol_002dmacro">
+<div class="nav-panel">
+<p>
+Next: <a href="symbol_002dmacrolet.html" accesskey="n" rel="next">symbol-macrolet                                          [Special Operator]</a>, Previous: <a href="macroexpand.html" accesskey="p" rel="prev">macroexpand, macroexpand-1                                       [Function]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="define_002dsymbol_002dmacro-_005bMacro_005d"><span>3.8.13 define-symbol-macro                                                 [Macro]<a class="copiable-link" href="#define_002dsymbol_002dmacro-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">define-symbol-macro</code>  <i class="i">symbol expansion</i><br>
+   &rArr;  <i class="i">symbol</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-11"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-11"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">expansion</i>&mdash;a <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-12"><span>Description::<a class="copiable-link" href="#Description_003a_003a-12"> &para;</a></span></h4>
+
+<p>Provides a mechanism for globally affecting the <i class="i">macro expansion</i>
+of the indicated <i class="i">symbol</i>.
+</p>
+<p>Globally establishes an expansion function for the <i class="i">symbol macro</i> 
+named by <i class="i">symbol</i>.
+The only guaranteed property of an expansion <i class="i">function</i> for a <i class="i">symbol macro</i>
+is that when it is applied to the <i class="i">form</i> and the <i class="i">environment</i> it returns
+the correct expansion.  (In particular, it is <i class="i">implementation-dependent</i> 
+whether the expansion is conceptually stored in the expansion function,
+the <i class="i">environment</i>, or both.)
+</p>
+<p>Each global reference to <i class="i">symbol</i> (<i class="i">i.e.</i>, not <i class="i">shadowed</i>_2 by a 
+<i class="i">binding</i> for a <i class="i">variable</i> or <i class="i">symbol macro</i> named by
+the same <i class="i">symbol</i>) is expanded by the normal macro expansion process;
+see <a class="ref" href="Symbols-as-Forms.html">Symbols as Forms</a>.
+The expansion of a <i class="i">symbol macro</i> is subject to further <i class="i">macro expansion</i>
+in the same <i class="i">lexical environment</i> as the <i class="i">symbol macro</i> reference,
+exactly analogous to normal <i class="i">macros</i>.
+</p>
+<p>The consequences are unspecified if a <b class="b">special</b> declaration is made for
+<i class="i">symbol</i> while in the scope of this definition (<i class="i">i.e.</i>, when it is not 
+<i class="i">shadowed</i>_2 by a <i class="i">binding</i> for a <i class="i">variable</i>
+or <i class="i">symbol macro</i> named by the same <i class="i">symbol</i>).
+</p>
+<p>Any use of <b class="b">setq</b> to set the value of 
+the <i class="i">symbol</i>
+ while in the scope of this definition
+ is treated as if it were a <b class="b">setf</b>.
+<b class="b">psetq</b> of <i class="i">symbol</i>
+ is treated as if it were a <b class="b">psetf</b>, and
+<b class="b">multiple-value-setq</b> 
+ is treated as if it were a <b class="b">setf</b> of <b class="b">values</b>.
+</p>
+<p>A <i class="i">binding</i> for a <i class="i">symbol macro</i> can be <i class="i">shadowed</i>_2
+by <b class="b">let</b> or <b class="b">symbol-macrolet</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-10"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-10"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">(defvar *things* (list 'alpha 'beta 'gamma)) &rArr;  *THINGS*
+
+(define-symbol-macro thing1 (first *things*)) &rArr;  THING1
+(define-symbol-macro thing2 (second *things*)) &rArr;  THING2
+(define-symbol-macro thing3 (third *things*)) &rArr;  THING3
+
+thing1 &rArr;  ALPHA
+(setq thing1 'ONE) &rArr;  ONE
+*things* &rArr;  (ONE BETA GAMMA)
+(multiple-value-setq (thing2 thing3) (values 'two 'three)) &rArr;  TWO
+thing3 &rArr;  THREE
+*things* &rArr;  (ONE TWO THREE)
+
+(list thing2 (let ((thing2 2)) thing2)) &rArr;  (TWO 2)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-3"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-3"> &para;</a></span></h4>
+
+<p>If <i class="i">symbol</i> is already defined as a <i class="i">global variable</i>,
+an error of <i class="i">type</i> <b class="b">program-error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-12"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-12"> &para;</a></span></h4>
+
+<p><a class="ref" href="symbol_002dmacrolet.html">symbol-macrolet                                          [Special Operator]</a>
+,
+<a class="ref" href="macroexpand.html">macroexpand, macroexpand-1                                       [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="symbol_002dmacrolet.html">symbol-macrolet                                          [Special Operator]</a>, Previous: <a href="macroexpand.html">macroexpand, macroexpand-1                                       [Function]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/defmacro.html
@@ -0,0 +1,235 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>defmacro (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="defmacro (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="defmacro (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="macro_002dfunction.html" rel="next" title="macro-function">
+<link href="define_002dcompiler_002dmacro.html" rel="prev" title="define-compiler-macro">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="defmacro">
+<div class="nav-panel">
+<p>
+Next: <a href="macro_002dfunction.html" accesskey="n" rel="next">macro-function                                                   [Accessor]</a>, Previous: <a href="define_002dcompiler_002dmacro.html" accesskey="p" rel="prev">define-compiler-macro                                               [Macro]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="defmacro-_005bMacro_005d"><span>3.8.10 defmacro                                                            [Macro]<a class="copiable-link" href="#defmacro-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">defmacro</code>  <i class="i">name lambda-list [[{<i class="i">declaration</i>}* | <i class="i">documentation</i>]] {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">name</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-8"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-8"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>. 
+</p>
+<p><i class="i">lambda-list</i>&mdash;a <i class="i">macro lambda list</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">documentation</i>&mdash;a <i class="i">string</i>; not evaluated.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-9"><span>Description::<a class="copiable-link" href="#Description_003a_003a-9"> &para;</a></span></h4>
+
+<p>Defines <i class="i">name</i> as a <i class="i">macro</i> 
+by associating a <i class="i">macro function</i> with that <i class="i">name</i>
+in the global environment.
+</p>
+<p>The <i class="i">macro function</i> is defined in the same <i class="i">lexical environment</i>
+in which the <b class="b">defmacro</b> <i class="i">form</i> appears.
+</p>
+<p>The parameter variables in <i class="i">lambda-list</i> are bound to
+destructured portions of the macro call.
+</p>
+<p>The expansion function
+accepts two arguments, a <i class="i">form</i> and an 
+<i class="i">environment</i>.  The expansion function returns a <i class="i">form</i>.  
+The body of the expansion function is specified by <i class="i">forms</i>.
+<i class="i">Forms</i> are executed in order.  The value of the
+last <i class="i">form</i> executed is returned as the expansion of the
+<i class="i">macro</i>.
+</p>
+<p>The body <i class="i">forms</i> of the expansion function (but not the <i class="i">lambda-list</i>)
+</p>
+<p>are implicitly enclosed in a <i class="i">block</i> whose name is <i class="i">name</i>.
+</p>
+<p>The <i class="i">lambda-list</i> conforms to the requirements described in <a class="ref" href="Macro-Lambda-Lists.html">Macro Lambda Lists</a>.
+</p>
+<p><i class="i">Documentation</i> is attached as a <i class="i">documentation string</i> 
+    to <i class="i">name</i> (as kind <b class="b">function</b>)
+and to the <i class="i">macro function</i>.
+</p>
+<p><b class="b">defmacro</b> can be used to redefine a <i class="i">macro</i> or to replace
+a <i class="i">function</i> definition with a <i class="i">macro</i> definition.
+</p>
+<p>Recursive expansion of the <i class="i">form</i> returned must terminate,
+including the expansion of other <i class="i">macros</i> which are <i class="i">subforms</i>
+of other <i class="i">forms</i> returned.
+</p>
+<p>The consequences are undefined if the result of fully macroexpanding
+a <i class="i">form</i>
+contains any <i class="i">circular</i> <i class="i">list structure</i> except in <i class="i">literal objects</i>.
+</p>
+<p>If a <b class="b">defmacro</b> <i class="i">form</i> appears as a <i class="i">top level form</i>,
+the <i class="i">compiler</i> must store the <i class="i">macro</i> definition at compile time,
+so that occurrences of the macro later on in the file can be expanded correctly.
+Users must ensure that the body of the <i class="i">macro</i> can be evaluated at 
+compile time if it is referenced within the <i class="i">file</i> being <i class="i">compiled</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-7"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-7"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defmacro mac1 (a b) &quot;Mac1 multiplies and adds&quot; 
+            `(+ ,a (* ,b 3))) &rArr;  MAC1 
+ (mac1 4 5) &rArr;  19 
+ (documentation 'mac1 'function) &rArr;  &quot;Mac1 multiplies and adds&quot; 
+ (defmacro mac2 (&amp;optional (a 2 b) (c 3 d) &amp;rest x) `'(,a ,b ,c ,d ,x)) &rArr;  MAC2 
+ (mac2 6) &rArr;  (6 T 3 NIL NIL) 
+ (mac2 6 3 8) &rArr;  (6 T 3 T (8)) 
+ (defmacro mac3 (&amp;whole r a &amp;optional (b 3) &amp;rest x &amp;key c (d a))
+    `'(,r ,a ,b ,c ,d ,x)) &rArr;  MAC3 
+ (mac3 1 6 :d 8 :c 9 :d 10) &rArr;  ((MAC3 1 6 :D 8 :C 9 :D 10) 1 6 9 8 (:D 8 :C 9 :D 10)) 
+</pre></div>
+
+<p>The stipulation that
+an embedded <i class="i">destructuring lambda list</i> is permitted only
+where <i class="i">ordinary lambda list</i> syntax would permit a parameter name
+but not a <i class="i">list</i> is made to prevent ambiguity.  For example,
+the following is not valid:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmacro loser (x &amp;optional (a b &amp;rest c) &amp;rest z)
+   ...)
+</pre></div>
+
+<p>because <i class="i">ordinary lambda list</i> syntax does permit a 
+<i class="i">list</i> following <code class="t">&amp;optional</code>;
+the list <code class="t">(a b &amp;rest c)</code> would be interpreted as describing an
+optional parameter named <code class="t">a</code> whose default value is that of the
+form <code class="t">b</code>, with a supplied-p parameter named <b class="b">&amp;rest</b> (not valid),
+and an extraneous symbol <code class="t">c</code> in the list (also not valid).  An almost
+correct way to express this is
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmacro loser (x &amp;optional ((a b &amp;rest c)) &amp;rest z)
+   ...)
+</pre></div>
+
+<p>The extra set of parentheses removes the ambiguity.  However, the
+definition is now incorrect because a macro call such as <code class="t">(loser (car pool))</code>
+would not provide any argument form for the lambda list <code class="t">(a b &amp;rest c)</code>,
+and so the default value against which to match the <i class="i">lambda list</i> would be
+<b class="b">nil</b> because no explicit default value was specified.  
+The consequences of this are  unspecified
+since the empty list, <b class="b">nil</b>, does not have <i class="i">forms</i> to satisfy the
+parameters <code class="t">a</code> and <code class="t">b</code>.  The fully correct definition would be either
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmacro loser (x &amp;optional ((a b &amp;rest c) '(nil nil)) &amp;rest z)
+   ...)
+</pre></div>
+
+<p>or
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmacro loser (x &amp;optional ((&amp;optional a b &amp;rest c)) &amp;rest z)
+   ...)
+</pre></div>
+
+<p>These differ slightly: the first requires that if the macro call
+specifies <code class="t">a</code> explicitly then it must also specify <code class="t">b</code> explicitly,
+whereas the second does not have this requirement.  For example,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (loser (car pool) ((+ x 1)))
+</pre></div>
+
+<p>would be a valid call for the second definition but not for the first.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmacro dm1a (&amp;whole x) `',x)
+ (macroexpand '(dm1a))  &rArr;  (QUOTE (DM1A))
+ (macroexpand '(dm1a a)) is an error.
+
+ (defmacro dm1b (&amp;whole x a &amp;optional b) `'(,x ,a ,b))
+ (macroexpand '(dm1b))  is an error.
+ (macroexpand '(dm1b q))  &rArr;  (QUOTE ((DM1B Q) Q NIL))
+ (macroexpand '(dm1b q r)) &rArr;  (QUOTE ((DM1B Q R) Q R))
+ (macroexpand '(dm1b q r s)) is an error.
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (defmacro dm2a (&amp;whole form a b) `'(form ,form a ,a b ,b))
+ (macroexpand '(dm2a x y)) &rArr;  (QUOTE (FORM (DM2A X Y) A X B Y))
+ (dm2a x y) &rArr;  (FORM (DM2A X Y) A X B Y)
+
+ (defmacro dm2b (&amp;whole form a (&amp;whole b (c . d) &amp;optional (e 5)) 
+                 &amp;body f &amp;environment env)
+   ``(,',form ,,a ,',b ,',(macroexpand c env) ,',d ,',e ,',f))
+ ;Note that because backquote is involved, implementations may differ
+ ;slightly in the nature (though not the functionality) of the expansion.
+ (macroexpand '(dm2b x1 (((incf x2) x3 x4)) x5 x6))
+ &rArr;  (LIST* '(DM2B X1 (((INCF X2) X3 X4))
+                   X5 X6)
+            X1
+            '((((INCF X2) X3 X4)) (SETQ X2 (+ X2 1)) (X3 X4) 5 (X5 X6))),
+     T
+ (let ((x1 5))
+   (macrolet ((segundo (x) `(cadr ,x)))
+     (dm2b x1 (((segundo x2) x3 x4)) x5 x6)))
+ &rArr;  ((DM2B X1 (((SEGUNDO X2) X3 X4)) X5 X6)
+      5 (((SEGUNDO X2) X3 X4)) (CADR X2) (X3 X4) 5 (X5 X6))
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-9"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-9"> &para;</a></span></h4>
+
+<p><a class="ref" href="define_002dcompiler_002dmacro.html">define-compiler-macro                                               [Macro]</a>
+,
+</p>
+<p><a class="ref" href="destructuring_002dbind.html">destructuring-bind                                                  [Macro]</a>
+, 
+<a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="macroexpand.html">macroexpand, macroexpand-1                                       [Function]</a>
+,
+<b class="b">*macroexpand-hook*</b>,
+<b class="b">macrolet</b>, 
+<a class="ref" href="macro_002dfunction.html">macro-function                                                   [Accessor]</a>
+, 
+<a class="ref" href="Evaluation.html">Evaluation</a>,
+<a class="ref" href="Compilation.html">Compilation</a>,
+<a class="ref" href="Syntactic-Interaction-of-Documentation-Strings-and-Declarations.html">Syntactic Interaction of Documentation Strings and Declarations</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="macro_002dfunction.html">macro-function                                                   [Accessor]</a>, Previous: <a href="define_002dcompiler_002dmacro.html">define-compiler-macro                                               [Macro]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/defmethod.html
@@ -0,0 +1,231 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>defmethod (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="defmethod (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="defmethod (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="find_002dclass.html" rel="next" title="find-class">
+<link href="defgeneric.html" rel="prev" title="defgeneric">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="defmethod">
+<div class="nav-panel">
+<p>
+Next: <a href="find_002dclass.html" accesskey="n" rel="next">find-class                                                       [Accessor]</a>, Previous: <a href="defgeneric.html" accesskey="p" rel="prev">defgeneric                                                          [Macro]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="defmethod-_005bMacro_005d"><span>7.7.27 defmethod                                                           [Macro]<a class="copiable-link" href="#defmethod-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">defmethod</code>  <i class="i"><i class="i">function-name</i>
+				      {<i class="i">method-qualifier</i>}*
+				      <i class="i">specialized-lambda-list</i>
+				<span class="r">[[{<i class="i">declaration</i>}* | <i class="i">documentation</i>]]</span> {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">new-method</i>
+</p>
+<p><i class="i">function-name</i>::= {<i class="i">symbol</i> 
+| <code class="t">(setf <i class="i">symbol</i>)</code>}
+</p>
+<p><i class="i">method-qualifier</i>::= <i class="i">non-list</i>
+</p>
+<p>&nbsp;<i class="i">specialized-lambda-list</i>::=&nbsp;({<i class="i">var</i>&nbsp;|&nbsp;<span class="r">(</span><span class="r"><i class="i">var</i>&nbsp;<i class="i">parameter-specializer-name</i></span><span class="r">)</span>}*<!-- /@w --><br>
+&nbsp;<code class="t">[</code><span class="r">&amp;optional</span>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;<span class="r">(</span>var&nbsp;<code class="t">[</code><i class="i">initform</i>&nbsp;<span class="r"><span class="r">[</span><i class="i">supplied-p-parameter</i><span class="r">]</span></span>&nbsp;<code class="t">]</code><span class="r">)</span>}*<code class="t">]</code><!-- /@w --><br>
+&nbsp;<code class="t">[</code><code class="t">&amp;rest</code>&nbsp;<i class="i">var</i><code class="t">]</code><!-- /@w --><br>
+&nbsp;<code class="t">[</code><span class="r"><span class="r">&amp;key</span></span>{<i class="i">var</i>&nbsp;|&nbsp;<span class="r">(</span>{<i class="i">var</i>&nbsp;|&nbsp;<span class="r">(</span><i class="i">keyword</i><i class="i">var</i><span class="r">)</span>}&nbsp;<code class="t">[</code><i class="i">initform</i>&nbsp;<span class="r">[</span><i class="i">supplied-p-parameter</i><span class="r">]</span>&nbsp;<code class="t">]</code><span class="r">)</span>}*<!-- /@w --><br>
+&nbsp;<span class="r">[</span><b class="b">&amp;allow-other-keys</b><span class="r">]</span>&nbsp;<code class="t">]</code><!-- /@w --><br>
+&nbsp;<code class="t">[</code><code class="t">&amp;aux</code>&nbsp;{<i class="i">var</i>&nbsp;|&nbsp;<span class="r">(</span><i class="i">var</i>&nbsp;<span class="r">[</span><i class="i">initform</i><span class="r">]</span>&nbsp;<span class="r">)</span>}*<code class="t">]</code>&nbsp;<span class="r">)</span><!-- /@w --><br>
+</p>
+<p>&nbsp;<i class="i">parameter-specializer-name</i>::=&nbsp;<i class="i">symbol</i>&nbsp;|&nbsp;<span class="r">(</span><code class="t">eql</code>&nbsp;<i class="i">eql-specializer-form</i><span class="r">)</span><!-- /@w --><br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-115"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-115"> &para;</a></span></h4>
+
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">documentation</i>&mdash;a <i class="i">string</i>; not evaluated.
+</p>
+<p><i class="i">var</i>&mdash;a <i class="i">variable</i> <i class="i">name</i>.
+</p>
+<p><i class="i">eql-specializer-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">Form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">Initform</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">Supplied-p-parameter</i>&mdash;variable name. 
+</p>
+<p><i class="i">new-method</i>&mdash;the new <i class="i">method</i> <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-154"><span>Description::<a class="copiable-link" href="#Description_003a_003a-154"> &para;</a></span></h4>
+
+<p>The macro <b class="b">defmethod</b> defines a <i class="i">method</i> on a 
+<i class="i">generic function</i>.  
+</p>
+<p>If <code class="t">(fboundp <i class="i">function-name</i>)</code> is <b class="b">nil</b>, a 
+<i class="i">generic function</i> is created with default values for 
+the argument precedence order
+(each argument is more specific than the arguments to its right
+in the argument list),
+for the generic function class (the <i class="i">class</i> <b class="b">standard-generic-function</b>),
+for the method class (the <i class="i">class</i> <b class="b">standard-method</b>),
+and for the method combination type (the standard method combination type).
+The <i class="i">lambda list</i> of the <i class="i">generic function</i> is
+congruent with the <i class="i">lambda list</i> of the 
+<i class="i">method</i> being defined; if the
+<b class="b">defmethod</b> form mentions keyword arguments, the <i class="i">lambda list</i> of
+the <i class="i">generic function</i> 
+will mention <code class="t">&amp;key</code> (but no keyword
+arguments).  If <i class="i">function-name</i> names 
+an <i class="i">ordinary function</i>,
+a <i class="i">macro</i>, or a <i class="i">special operator</i>, 
+an error is signaled.
+</p>
+<p>If a <i class="i">generic function</i> is currently named by <i class="i">function-name</i>,
+the <i class="i">lambda list</i> of the
+<i class="i">method</i> must be congruent with the <i class="i">lambda list</i> of the 
+<i class="i">generic function</i>.
+If this condition does not hold, an error is signaled.  
+For a definition of congruence in this context, see <a class="ref" href="Congruent-Lambda_002dlists-for-all-Methods-of-a-Generic-Function.html">Congruent Lambda-lists for all Methods of a Generic Function</a>.
+</p>
+<p>Each <i class="i">method-qualifier</i> argument is an <i class="i">object</i> that is used by
+method combination to identify the given <i class="i">method</i>.  
+The method combination type might further
+restrict what a method <i class="i">qualifier</i> can be.
+The standard method combination type allows for <i class="i">unqualified methods</i> and
+<i class="i">methods</i> whose sole
+<i class="i">qualifier</i> is one of the keywords <code class="t">:before</code>, <code class="t">:after</code>, or <code class="t">:around</code>.
+</p>
+<p>The <i class="i">specialized-lambda-list</i> argument is like an ordinary
+<i class="i">lambda list</i> except that the <i class="i">names</i> of required parameters can
+be replaced by specialized parameters.  A specialized parameter is a
+list of the form 
+<code class="t">(<i class="i">var</i> <i class="i">parameter-specializer-name</i>)</code>.
+Only required parameters can be
+specialized.  If <i class="i">parameter-specializer-name</i> is a <i class="i">symbol</i> it names a
+<i class="i">class</i>; if it is a <i class="i">list</i>,
+it is of the form <code class="t">(eql <i class="i">eql-specializer-form</i>)</code>.  The parameter
+specializer name <code class="t">(eql <i class="i">eql-specializer-form</i>)</code> indicates
+that the corresponding argument must be <b class="b">eql</b> to the <i class="i">object</i> that
+is the value of <i class="i">eql-specializer-form</i> for the <i class="i">method</i> to be applicable.  
+The <i class="i">eql-specializer-form</i> is evaluated at the time
+that the expansion of the <b class="b">defmethod</b> macro is evaluated.  
+If no <i class="i">parameter specializer name</i> is specified for a given
+required parameter, the <i class="i">parameter specializer</i> defaults to 
+the <i class="i">class</i> <b class="b">t</b>.
+For further discussion, see <a class="ref" href="Introduction-to-Methods.html">Introduction to Methods</a>.
+</p>
+<p>The <i class="i">form</i> arguments specify the method body.
+The body of the <i class="i">method</i> is enclosed in an <i class="i">implicit block</i>.  If
+<i class="i">function-name</i> is a <i class="i">symbol</i>, 
+this block bears the same <i class="i">name</i> as the <i class="i">generic function</i>.  
+If <i class="i">function-name</i> is a <i class="i">list</i> of the form 
+<code class="t">(setf <i class="i">symbol</i>)</code>, the <i class="i">name</i> of the block is <i class="i">symbol</i>.  
+</p>
+<p>The <i class="i">class</i> of the <i class="i">method</i> <i class="i">object</i> that is created is that given by the 
+method class option of the <i class="i">generic function</i> 
+on which the <i class="i">method</i> is defined.
+</p>
+<p>If the <i class="i">generic function</i> already has a <i class="i">method</i> that agrees with the
+<i class="i">method</i> being defined on <i class="i">parameter specializers</i> and <i class="i">qualifiers</i>,
+<b class="b">defmethod</b> replaces the existing <i class="i">method</i> with the one now being
+defined.
+For a definition of agreement in this context.
+see <a class="ref" href="Agreement-on-Parameter-Specializers-and-Qualifiers.html">Agreement on Parameter Specializers and Qualifiers</a>.
+</p>
+<p>The <i class="i">parameter specializers</i> are derived from 
+the <i class="i">parameter specializer names</i> as described in
+<a class="ref" href="Introduction-to-Methods.html">Introduction to Methods</a>.
+</p>
+<p>The expansion of the <b class="b">defmethod</b> macro &ldquo;refers to&rdquo; each
+specialized parameter (see the description of <b class="b">ignore</b> 
+within the description of <b class="b">declare</b>).
+This includes parameters that
+have an explicit <i class="i">parameter specializer name</i> of <b class="b">t</b>.  This means
+that a compiler warning does not occur if the body of the <i class="i">method</i> does
+not refer to a specialized parameter, while a warning might occur
+if the body of the <i class="i">method</i> does not refer to an unspecialized parameter.
+For this reason, a parameter that specializes on <b class="b">t</b> is not quite synonymous
+with an unspecialized parameter in this context.
+</p>
+<p>Declarations at the head of the method body that apply to the 
+method&rsquo;s <i class="i">lambda variables</i> are treated as <i class="i">bound declarations</i>
+whose <i class="i">scope</i> is the same as the corresponding <i class="i">bindings</i>.
+</p>
+<p>Declarations at the head of the method body that apply to the 
+functional bindings of <b class="b">call-next-method</b> or <b class="b">next-method-p</b>
+apply to references to those functions within the method body <i class="i">forms</i>.
+Any outer <i class="i">bindings</i> of the <i class="i">function names</i> <b class="b">call-next-method</b> and
+<b class="b">next-method-p</b>, and declarations associated with such <i class="i">bindings</i>
+are <i class="i">shadowed</i>_2 within the method body <i class="i">forms</i>.
+</p>
+<p>The <i class="i">scope</i> of <i class="i">free declarations</i> at the head of the method body 
+is the entire method body, 
+which includes any implicit local function definitions
+  but excludes <i class="i">initialization forms</i> for the <i class="i">lambda variables</i>.
+</p>
+<p><b class="b">defmethod</b> is not required to perform any compile-time side effects.
+In particular, the <i class="i">methods</i> are not installed for invocation during 
+compilation.  An <i class="i">implementation</i> may choose to store information about
+the <i class="i">generic function</i> for the purposes of compile-time error-checking
+(such as checking the number of arguments on calls, or noting that a definition
+ for the function name has been seen).
+</p>
+<p><i class="i">Documentation</i> is attached as a <i class="i">documentation string</i>
+to the <i class="i">method</i> <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-14"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-14"> &para;</a></span></h4>
+
+<p>The definition of the referenced <i class="i">generic function</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-39"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-39"> &para;</a></span></h4>
+
+<p>If <i class="i">function-name</i> names an <i class="i">ordinary function</i>,
+a <i class="i">macro</i>, or a <i class="i">special operator</i>, 
+an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<p>If a <i class="i">generic function</i> is currently named by <i class="i">function-name</i>,
+the <i class="i">lambda list</i> of the
+<i class="i">method</i> must be congruent with the <i class="i">lambda list</i> of the 
+<i class="i">generic function</i>, or
+an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-136"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-136"> &para;</a></span></h4>
+
+<p><a class="ref" href="defgeneric.html">defgeneric                                                          [Macro]</a>
+, 
+<a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="Introduction-to-Methods.html">Introduction to Methods</a>,
+<a class="ref" href="Congruent-Lambda_002dlists-for-all-Methods-of-a-Generic-Function.html">Congruent Lambda-lists for all Methods of a Generic Function</a>,
+<a class="ref" href="Agreement-on-Parameter-Specializers-and-Qualifiers.html">Agreement on Parameter Specializers and Qualifiers</a>,
+<a class="ref" href="Syntactic-Interaction-of-Documentation-Strings-and-Declarations.html">Syntactic Interaction of Documentation Strings and Declarations</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="find_002dclass.html">find-class                                                       [Accessor]</a>, Previous: <a href="defgeneric.html">defgeneric                                                          [Macro]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/defpackage.html
@@ -0,0 +1,317 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>defpackage (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="defpackage (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="defpackage (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="do_002dsymbols.html" rel="next" title="do-symbols">
+<link href="use_002dpackage.html" rel="prev" title="use-package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="defpackage">
+<div class="nav-panel">
+<p>
+Next: <a href="do_002dsymbols.html" accesskey="n" rel="next">do-symbols, do-external-symbols, do-all-symbols                     [Macro]</a>, Previous: <a href="use_002dpackage.html" accesskey="p" rel="prev">use-package                                                      [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="defpackage-_005bMacro_005d"><span>11.2.19 defpackage                                                          [Macro]<a class="copiable-link" href="#defpackage-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">defpackage</code>  <i class="i">defined-package-name [[!<i class="i">option</i>]]</i> &rArr;  <i class="i">package</i>
+</p>
+<p><i class="i">option</i>&nbsp;::={<span class="r">(</span><code class="t">:nicknames</code>&nbsp;{<i class="i">nickname</i>}*<span class="r">)</span>}*&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;<span class="r">(</span><code class="t">:documentation</code>&nbsp;<i class="i">string</i><span class="r">)</span>&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;{<span class="r">(</span><code class="t">:use</code>&nbsp;{<i class="i">package-name</i>}*<span class="r">)</span>}*&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;{<span class="r">(</span><code class="t">:shadow</code>&nbsp;{!<i class="i">symbol-name</i>}*<span class="r">)</span>}*&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;{<span class="r">(</span><code class="t">:shadowing-import-from</code>&nbsp;<i class="i">package-name</i>&nbsp;{!<i class="i">symbol-name</i>}*<span class="r">)</span>}*&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;{<span class="r">(</span><code class="t">:import-from</code>&nbsp;<i class="i">package-name</i>&nbsp;{!<i class="i">symbol-name</i>}*<span class="r">)</span>}*&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;{<span class="r">(</span><code class="t">:export</code>&nbsp;{!<i class="i">symbol-name</i>}*<span class="r">)</span>}*&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;{<span class="r">(</span><code class="t">:intern</code>&nbsp;{!<i class="i">symbol-name</i>}*<span class="r">)</span>}*&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;<span class="r">(</span><code class="t">:size</code>&nbsp;<i class="i">integer</i><span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">symbol-name</i>&nbsp;::=(<i class="i">symbol</i>&nbsp;|&nbsp;<i class="i">string</i>)<!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-191"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-191"> &para;</a></span></h4>
+
+<p><i class="i">defined-package-name</i>&mdash;a <i class="i">string designator</i>.
+</p>
+<p><i class="i">package-name</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<p><i class="i">nickname</i>&mdash;a <i class="i">string designator</i>.
+</p>
+<p><i class="i">symbol-name</i>&mdash;a <i class="i">string designator</i>.
+</p>
+<p><i class="i">package</i>&mdash;the <i class="i">package</i> named <i class="i">package-name</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-255"><span>Description::<a class="copiable-link" href="#Description_003a_003a-255"> &para;</a></span></h4>
+
+<p><b class="b">defpackage</b> creates a <i class="i">package</i> as specified and returns 
+the <i class="i">package</i>.
+</p>
+<p>If <i class="i">defined-package-name</i> already refers to an existing 
+<i class="i">package</i>, the name-to-package mapping for that name is not changed.
+If the new definition is at variance with the current state of that
+<i class="i">package</i>, the consequences are undefined;  an implementation
+might choose to modify the existing <i class="i">package</i> to reflect the
+new definition.  If <i class="i">defined-package-name</i> is a <i class="i">symbol</i>,
+its <i class="i">name</i> is used.
+</p>
+<p>The standard <i class="i">options</i> are described below. 
+</p>
+<dl class="table">
+<dt><code class="t">:nicknames</code></dt>
+<dd><p>The arguments to <code class="t">:nicknames</code> set the <i class="i">package</i>&rsquo;s nicknames to the
+supplied names.
+</p>
+</dd>
+<dt><code class="t">:documentation</code></dt>
+<dd><p>The argument to <code class="t">:documentation</code> specifies a <i class="i">documentation string</i>;
+it is attached as a <i class="i">documentation string</i> to the <i class="i">package</i>.
+At most one <code class="t">:documentation</code> option 
+can appear in a single <b class="b">defpackage</b> <i class="i">form</i>.
+</p>
+</dd>
+<dt><code class="t">:use</code></dt>
+<dd><p>The arguments to <code class="t">:use</code> set the <i class="i">packages</i> that the <i class="i">package</i>
+named by <i class="i">package-name</i>
+will inherit from. If <code class="t">:use</code> is not supplied,
+</p>
+<p>it defaults to the same <i class="i">implementation-dependent</i> value as the <code class="t">:use</code> <i class="i">argument</i> to
+<b class="b">make-package</b>.
+</p>
+</dd>
+<dt><code class="t">:shadow</code></dt>
+<dd><p>The arguments to <code class="t">:shadow</code>, <i class="i">symbol-names</i>, name <i class="i">symbols</i> 
+that are to be created in the <i class="i">package</i> being defined.
+These <i class="i">symbols</i> are added to the list of shadowing
+<i class="i">symbols</i> effectively as if by <b class="b">shadow</b>.
+</p>
+</dd>
+<dt><code class="t">:shadowing-import-from</code></dt>
+<dd><p>The <i class="i">symbols</i> named by the argument <i class="i">symbol-names</i>
+are found (involving a lookup as if by <b class="b">find-symbol</b>)
+in the specified <i class="i">package-name</i>.  The resulting <i class="i">symbols</i>
+are <i class="i">imported</i> into the <i class="i">package</i> being defined, and 
+placed on the shadowing symbols list as if by <b class="b">shadowing-import</b>.
+In no case are <i class="i">symbols</i> created in any <i class="i">package</i>
+other than the one being defined.
+</p>
+</dd>
+<dt><code class="t">:import-from</code></dt>
+<dd><p>The <i class="i">symbols</i> named by the argument <i class="i">symbol-names</i>
+are found in the <i class="i">package</i> named by <i class="i">package-name</i> and 
+they are <i class="i">imported</i> into the <i class="i">package</i> being defined.
+In no case are <i class="i">symbols</i> created in any <i class="i">package</i>
+other than the one being defined.
+</p>
+</dd>
+<dt><code class="t">:export</code></dt>
+<dd><p>The <i class="i">symbols</i> named by
+the argument <i class="i">symbol-names</i>  are found 
+or created in the <i class="i">package</i> being defined
+and <i class="i">exported</i>.
+The <code class="t">:export</code> option interacts
+with the <code class="t">:use</code> option, since inherited <i class="i">symbols</i> 
+        can be used rather than new ones created.
+The <code class="t">:export</code> option interacts
+        with the 
+<code class="t">:import-from</code> and <code class="t">:shadowing-import-from</code> options, since 
+	<i class="i">imported</i> 
+symbols can be used rather than new ones created.
+If an argument to the <code class="t">:export</code> option is <i class="i">accessible</i> as
+an (inherited) <i class="i">internal symbol</i> via <b class="b">use-package</b>, that the
+<i class="i">symbol</i> named by <i class="i">symbol-name</i>
+is first <i class="i">imported</i> into the <i class="i">package</i> being
+defined, and is then <i class="i">exported</i> from that <i class="i">package</i>.
+</p>
+</dd>
+<dt><code class="t">:intern</code></dt>
+<dd><p>The <i class="i">symbols</i> named by the argument <i class="i">symbol-names</i> 
+are found or created in the <i class="i">package</i> being defined.
+The <code class="t">:intern</code> option interacts with the 
+<code class="t">:use</code> option, since inherited <i class="i">symbols</i> 
+can be used rather than new ones created.  
+</p>
+</dd>
+<dt><code class="t">:size</code></dt>
+<dd><p>The argument to the <code class="t">:size</code> option
+declares the approximate number of <i class="i">symbols</i> expected in the 
+<i class="i">package</i>.
+        This is an efficiency hint only and might be ignored by an
+implementation.
+</p></dd>
+</dl>
+
+<p>The order in which the options appear in a 
+<b class="b">defpackage</b> form is irrelevant.
+The order in which they are executed is as follows:
+</p><dl class="table">
+<dt>1.</dt>
+<dd><p><code class="t">:shadow</code> and <code class="t">:shadowing-import-from</code>.
+</p></dd>
+<dt>2.</dt>
+<dd><p><code class="t">:use</code>. 
+</p></dd>
+<dt>3.</dt>
+<dd><p><code class="t">:import-from</code> and <code class="t">:intern</code>.
+</p></dd>
+<dt>4.</dt>
+<dd><p><code class="t">:export</code>.
+</p></dd>
+</dl>
+
+<p>Shadows are established first, since they might  be necessary to block 
+spurious name conflicts when the <code class="t">:use</code> 
+option is processed. The <code class="t">:use</code> option is executed
+next so that <code class="t">:intern</code> and <code class="t">:export</code> options can refer to normally 
+inherited <i class="i">symbols</i>.  
+The <code class="t">:export</code> option is executed last so that it can refer to 
+<i class="i">symbols</i> created by any of the other options; in 
+particular, <i class="i">shadowing symbols</i> and 
+<i class="i">imported</i> <i class="i">symbols</i> can be made external.  
+</p>
+<p>If a <i class="i">defpackage</i> <i class="i">form</i> appears as a <i class="i">top level form</i>,
+all of the actions normally performed by this <i class="i">macro</i> 
+at load time must also be performed at compile time.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-173"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-173"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defpackage &quot;MY-PACKAGE&quot;
+   (:nicknames &quot;MYPKG&quot; &quot;MY-PKG&quot;)
+   (:use &quot;COMMON-LISP&quot;)
+   (:shadow &quot;CAR&quot; &quot;CDR&quot;)
+   (:shadowing-import-from &quot;VENDOR-COMMON-LISP&quot;  &quot;CONS&quot;)
+   (:import-from &quot;VENDOR-COMMON-LISP&quot;  &quot;GC&quot;)
+   (:export &quot;EQ&quot; &quot;CONS&quot; &quot;FROBOLA&quot;)
+   )
+
+ (defpackage my-package
+   (:nicknames mypkg :MY-PKG)  ; remember Common Lisp conventions for case
+   (:use common-lisp)          ; conversion on symbols
+   (:shadow CAR :cdr #:cons)                              
+   (:export &quot;CONS&quot;)            ; this is the shadowed one.
+   )
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-53"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-53"> &para;</a></span></h4>
+
+<p>Existing <i class="i">packages</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-71"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-71"> &para;</a></span></h4>
+
+<p>If one of the supplied <code class="t">:nicknames</code> already
+refers to an existing <i class="i">package</i>, 
+an error of <i class="i">type</i> <b class="b">package-error</b> is signaled.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">program-error</b> should be signaled if <code class="t">:size</code> or <code class="t">:documentation</code>
+appears more than once.
+</p>
+<p>Since <i class="i">implementations</i> might allow extended <i class="i">options</i>
+an error of <i class="i">type</i> <b class="b">program-error</b> should be signaled
+if an <i class="i">option</i> is present that is not 
+actually supported in the host <i class="i">implementation</i>.
+</p>
+<p>The collection of <i class="i">symbol-name</i> arguments given to the options 
+      <code class="t">:shadow</code>, <code class="t">:intern</code>, 
+<code class="t">:import-from</code>, and <code class="t">:shadowing-import-from</code> must 
+      all be disjoint; additionally, the <i class="i">symbol-name</i> arguments given to 
+      <code class="t">:export</code> and <code class="t">:intern</code> 
+must be disjoint. 
+Disjoint in this context is defined as no two of the <i class="i">symbol-names</i>
+being <b class="b">string=</b> with each other. If either condition is 
+      violated, an error of <i class="i">type</i> <b class="b">program-error</b> should be signaled.
+</p>
+<p>For the <code class="t">:shadowing-import-from</code> and <code class="t">:import-from</code> options,
+a <i class="i">correctable</i> <i class="i">error</i> of <i class="i">type</i> <b class="b">package-error</b>
+        is signaled if no <i class="i">symbol</i> is 
+<i class="i">accessible</i> in the <i class="i">package</i> named by
+        <i class="i">package-name</i> for one of the argument <i class="i">symbol-names</i>.
+</p>
+<p>Name conflict errors are handled by the underlying calls to 
+<b class="b">make-package</b>, <b class="b">use-package</b>, <b class="b">import</b>, and 
+<b class="b">export</b>. See <a class="ref" href="Package-Concepts.html">Package Concepts</a>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-227"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-227"> &para;</a></span></h4>
+
+<p><a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="Package-Concepts.html">Package Concepts</a>,
+<a class="ref" href="Compilation.html">Compilation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-132"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-132"> &para;</a></span></h4>
+
+<p>The <code class="t">:intern</code> option is useful if an <code class="t">:import-from</code> or a 
+<code class="t">:shadowing-import-from</code> option in a subsequent call to <b class="b">defpackage</b> 
+(for some other <i class="i">package</i>) expects to find
+these <i class="i">symbols</i> <i class="i">accessible</i> but not necessarily external.
+</p>
+<p>It is recommended that the entire <i class="i">package</i> definition is put
+in a single place, and that all the <i class="i">package</i> definitions of a
+program are in a single file.  This file can be <i class="i">loaded</i> before
+<i class="i">loading</i> or compiling anything else that depends on those 
+<i class="i">packages</i>. Such a file can be read in the <code class="t">COMMON-LISP-USER</code> <i class="i">package</i>,
+avoiding any initial state issues.
+</p>
+<p><b class="b">defpackage</b> cannot be used to create two &ldquo;mutually
+recursive&rdquo; packages, such as:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defpackage my-package
+   (:use common-lisp your-package)    ;requires your-package to exist first
+   (:export &quot;MY-FUN&quot;))                
+ (defpackage your-package
+   (:use common-lisp)
+   (:import-from my-package &quot;MY-FUN&quot;) ;requires my-package to exist first
+   (:export &quot;MY-FUN&quot;))
+</pre></div>
+
+<p>However, nothing prevents the user from using the 
+<i class="i">package</i>-affecting functions 
+such as <b class="b">use-package</b>, 
+<b class="b">import</b>, and <b class="b">export</b> to establish such links
+after a more standard use of <b class="b">defpackage</b>.
+</p>
+<p>The macroexpansion of <b class="b">defpackage</b> 
+could usefully canonicalize the names
+into <i class="i">strings</i>, 
+so that even if a source file has random <i class="i">symbols</i> in the
+<b class="b">defpackage</b> form, the compiled file would only contain 
+<i class="i">strings</i>.
+</p>
+<p>Frequently additional <i class="i">implementation-dependent</i> options take the
+form of a <i class="i">keyword</i> standing by itself as an abbreviation for a list
+<code class="t">(keyword T)</code>; this syntax should be properly reported as an unrecognized
+option in implementations that do not support it.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="do_002dsymbols.html">do-symbols, do-external-symbols, do-all-symbols                     [Macro]</a>, Previous: <a href="use_002dpackage.html">use-package                                                      [Function]</a>, Up: <a href="Packages-Dictionary.html">Packages Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/defparameter.html
@@ -0,0 +1,227 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>defparameter (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="defparameter (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="defparameter (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="destructuring_002dbind.html" rel="next" title="destructuring-bind">
+<link href="defconstant.html" rel="prev" title="defconstant">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="defparameter">
+<div class="nav-panel">
+<p>
+Next: <a href="destructuring_002dbind.html" accesskey="n" rel="next">destructuring-bind                                                  [Macro]</a>, Previous: <a href="defconstant.html" accesskey="p" rel="prev">defconstant                                                         [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="defparameter_002c-defvar-_005bMacro_005d"><span>5.3.16 defparameter, defvar                                                [Macro]<a class="copiable-link" href="#defparameter_002c-defvar-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">defparameter</code>  <i class="i">name         initial-value <span class="r">[</span>documentation<span class="r">]</span> </i> &rArr;  <i class="i">name</i>
+</p>
+<p><code class="code">defvar</code>  <i class="i">name <code class="t">[</code>initial-value <span class="r">[</span>documentation<span class="r">]</span><code class="t">]</code></i> &rArr;  <i class="i">name</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-37"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-37"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>; not evaluated.
+</p>
+<p><i class="i">initial-value</i>&mdash;a <i class="i">form</i>; 
+     for <b class="b">defparameter</b>, it is always <i class="i">evaluated</i>,
+ but for <b class="b">defvar</b> it is <i class="i">evaluated</i> 
+     only if <i class="i">name</i> is not already <i class="i">bound</i>.
+</p>
+<p><i class="i">documentation</i>&mdash;a <i class="i">string</i>; not evaluated.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-69"><span>Description::<a class="copiable-link" href="#Description_003a_003a-69"> &para;</a></span></h4>
+
+<p><b class="b">defparameter</b> and <b class="b">defvar</b> <i class="i">establish</i> <i class="i">name</i> 
+as a <i class="i">dynamic variable</i>.
+</p>
+<p><b class="b">defparameter</b> unconditionally
+<i class="i">assigns</i> the <i class="i">initial-value</i> to the <i class="i">dynamic variable</i> named <i class="i">name</i>.
+<b class="b">defvar</b>, by contrast, <i class="i">assigns</i> <i class="i">initial-value</i> (if supplied) 
+to the <i class="i">dynamic variable</i> named <i class="i">name</i> 
+only if <i class="i">name</i> is not already <i class="i">bound</i>.
+</p>
+<p>If no <i class="i">initial-value</i> is supplied,
+<b class="b">defvar</b> leaves the <i class="i">value cell</i> of 
+the <i class="i">dynamic variable</i> named <i class="i">name</i> undisturbed;
+    if <i class="i">name</i> was previously <i class="i">bound</i>, its old <i class="i">value</i> persists,
+and if it was previously <i class="i">unbound</i>, it remains <i class="i">unbound</i>.
+</p>
+<p>If <i class="i">documentation</i> is supplied, it is attached to <i class="i">name</i> as a
+<i class="i">documentation string</i> of kind <b class="b">variable</b>. 
+</p>
+<p><b class="b">defparameter</b> and <b class="b">defvar</b> normally appear as a <i class="i">top level form</i>, 
+but it is meaningful for them to appear as <i class="i">non-top-level forms</i>.  However,
+the compile-time side effects described below only take place when
+they appear as <i class="i">top level forms</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-43"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-43"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defparameter *p* 1) &rArr;  *P*
+ *p* &rArr;  1
+ (constantp '*p*) &rArr;  <i class="i">false</i>
+ (setq *p* 2) &rArr;  2
+ (defparameter *p* 3) &rArr;  *P*
+ *p* &rArr;  3
+
+ (defvar *v* 1) &rArr;  *V*
+ *v* &rArr;  1
+ (constantp '*v*) &rArr;  <i class="i">false</i>
+ (setq *v* 2) &rArr;  2
+ (defvar *v* 3) &rArr;  *V*
+ *v* &rArr;  2
+
+ (defun foo ()
+   (let ((*p* 'p) (*v* 'v))
+     (bar))) &rArr;  FOO
+ (defun bar () (list *p* *v*)) &rArr;  BAR
+ (foo) &rArr;  (P V)
+</pre></div>
+
+<p>The principal operational distinction between <b class="b">defparameter</b> and <b class="b">defvar</b>
+is that <b class="b">defparameter</b> makes an unconditional assignment to <i class="i">name</i>,
+while <b class="b">defvar</b> makes a conditional one.  In practice, this means that
+<b class="b">defparameter</b> is useful in situations where loading or reloading the definition
+would want to pick up a new value of the variable, while <b class="b">defvar</b> is used in
+situations where the old value would want to be retained if the file were loaded or reloaded.
+For example, one might create a file which contained:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defvar *the-interesting-numbers* '())
+ (defmacro define-interesting-number (name n)
+   `(progn (defvar ,name ,n)
+           (pushnew ,name *the-interesting-numbers*)
+           ',name))
+ (define-interesting-number *my-height* 168) ;cm
+ (define-interesting-number *my-weight* 13)  ;stones
+</pre></div>
+
+<p>Here the initial value, <code class="t">()</code>, for the variable <code class="t">*the-interesting-numbers*</code>
+is just a seed that we are never likely to want to reset to something else
+once something has been grown from it.  As such, we have used <b class="b">defvar</b> 
+to avoid having the <code class="t">*interesting-numbers*</code> information reset if the file is
+loaded a second time.  It is true that the two calls to
+<b class="b">define-interesting-number</b> here would be reprocessed, but
+if there were additional calls in another file, they would not be and that 
+information would be lost.  On the other hand, consider the following code:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defparameter *default-beep-count* 3)
+ (defun beep (&amp;optional (n *default-beep-count*))
+   (dotimes (i n) (si:
+</pre></div>
+
+<p>Here we could easily imagine editing the code to change the initial value of
+<code class="t">*default-beep-count*</code>, and then reloading the file to pick up the new value.
+In order to make value updating easy, we have used <b class="b">defparameter</b>.
+</p>
+<p>On the other hand, there is potential value to using <b class="b">defvar</b> in this
+situation.  For example, suppose that someone had predefined an alternate
+value for <code class="t">*default-beep-count*</code>, or had loaded the file and then manually
+changed the value.  In both cases, if we had used <b class="b">defvar</b> instead of
+<b class="b">defparameter</b>, those user preferences would not be overridden by
+(re)loading the file.
+</p>
+<p>The choice of whether to use <b class="b">defparameter</b> or <b class="b">defvar</b> has
+visible consequences to programs, but is nevertheless often made for subjective
+reasons.
+</p>
+<h4 class="subsubheading" id="Side-Effects_003a_003a"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a"> &para;</a></span></h4>
+
+<p>If a <b class="b">defvar</b> or <b class="b">defparameter</b> <i class="i">form</i> appears as a <i class="i">top level form</i>,
+the <i class="i">compiler</i> must recognize that the <i class="i">name</i> has been
+proclaimed <b class="b">special</b>.  However, it must neither <i class="i">evaluate</i> 
+the <i class="i">initial-value</i> <i class="i">form</i> nor <i class="i">assign</i> the 
+<i class="i">dynamic variable</i> named <i class="i">name</i> at compile time.
+</p>
+<p>There may be additional (<i class="i">implementation-defined</i>) compile-time or 
+run-time side effects, as long as such effects do not interfere with the
+correct operation of <i class="i">conforming programs</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-4"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-4"> &para;</a></span></h4>
+
+<p><b class="b">defvar</b> is affected by whether <i class="i">name</i> is already <i class="i">bound</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-54"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-54"> &para;</a></span></h4>
+
+<p><a class="ref" href="declaim.html">declaim                                                             [Macro]</a>
+, 
+<a class="ref" href="defconstant.html">defconstant                                                         [Macro]</a>
+,
+<a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="Compilation.html">Compilation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-34"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-34"> &para;</a></span></h4>
+
+<p>It is customary to name <i class="i">dynamic variables</i> with an <i class="i">asterisk</i>
+at the beginning and end of the name.  e.g., <code class="t">*foo*</code> is a good name for
+a <i class="i">dynamic variable</i>, but not for a <i class="i">lexical variable</i>;
+<code class="t">foo</code> is a good name for a <i class="i">lexical variable</i>, 
+but not for a <i class="i">dynamic variable</i>.
+This naming convention is observed for all <i class="i">defined names</i> in <span class="r">Common Lisp</span>;
+however, neither <i class="i">conforming programs</i> nor <i class="i">conforming implementations</i>
+are obliged to adhere to this convention.
+</p>
+<p>The intent of the permission for additional side effects is to allow
+<i class="i">implementations</i> to do normal &ldquo;bookkeeping&rdquo; that accompanies
+definitions.  For example, the <i class="i">macro expansion</i> of a <b class="b">defvar</b>
+or <b class="b">defparameter</b> <i class="i">form</i> might include code that arranges to
+record the name of the source file in which the definition occurs.
+</p>
+<p><b class="b">defparameter</b> and <b class="b">defvar</b> might be defined as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmacro defparameter (name initial-value 
+                         &amp;optional (documentation nil documentation-p))
+   `(progn (declaim (special ,name))
+           (setf (symbol-value ',name) ,initial-value)
+           ,(when documentation-p
+              `(setf (documentation ',name 'variable) ',documentation))
+           ',name))
+ (defmacro defvar (name &amp;optional
+                        (initial-value nil initial-value-p)
+                        (documentation nil documentation-p))
+   `(progn (declaim (special ,name))
+           ,(when initial-value-p
+              `(unless (boundp ',name)
+                 (setf (symbol-value ',name) ,initial-value)))
+           ,(when documentation-p
+              `(setf (documentation ',name 'variable) ',documentation))
+           ',name))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="destructuring_002dbind.html">destructuring-bind                                                  [Macro]</a>, Previous: <a href="defconstant.html">defconstant                                                         [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/defsetf.html
@@ -0,0 +1,262 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>defsetf (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="defsetf (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="defsetf (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="define_002dsetf_002dexpander.html" rel="next" title="define-setf-expander">
+<link href="define_002dmodify_002dmacro.html" rel="prev" title="define-modify-macro">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="defsetf">
+<div class="nav-panel">
+<p>
+Next: <a href="define_002dsetf_002dexpander.html" accesskey="n" rel="next">define-setf-expander                                                [Macro]</a>, Previous: <a href="define_002dmodify_002dmacro.html" accesskey="p" rel="prev">define-modify-macro                                                 [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="defsetf-_005bMacro_005d"><span>5.3.61 defsetf                                                             [Macro]<a class="copiable-link" href="#defsetf-_005bMacro_005d"> &para;</a></span></h4>
+
+<p>The &ldquo;short form&rdquo;:
+</p>
+<p><code class="code">defsetf</code>  <i class="i">access-fn update-fn <span class="r">[</span>documentation<span class="r">]</span></i><br>
+   &rArr;  <i class="i">access-fn</i>
+</p>
+<p>The &ldquo;long form&rdquo;:
+</p>
+<p><code class="code">defsetf</code>  <i class="i">access-fn lambda-list <span class="r">(</span>{<i class="i">store-variable</i>}*<span class="r">)</span>
+                          <span class="r">[[{<i class="i">declaration</i>}* | <i class="i">documentation</i>]]</span> {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">access-fn</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-79"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-79"> &para;</a></span></h4>
+
+<p><i class="i">access-fn</i>&mdash;a <i class="i">symbol</i> which names a <i class="i">function</i> or a <i class="i">macro</i>.
+</p>
+<p><i class="i">update-fn</i>&mdash;a <i class="i">symbol</i> naming a <i class="i">function</i> or <i class="i">macro</i>.
+</p>
+<p><i class="i">lambda-list</i>&mdash;a <i class="i">defsetf lambda list</i>.
+</p>
+<p><i class="i">store-variable</i>&mdash;a <i class="i">symbol</i> (a <i class="i">variable</i> <i class="i">name</i>).
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">documentation</i>&mdash;a <i class="i">string</i>; not evaluated.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-114"><span>Description::<a class="copiable-link" href="#Description_003a_003a-114"> &para;</a></span></h4>
+
+<p><b class="b">defsetf</b> defines how to 
+<b class="b">setf</b> a <i class="i">place</i>
+of the form <code class="t">(<i class="i">access-fn</i> ...)</code> for relatively simple cases.
+(See <b class="b">define-setf-expander</b> for more general access to this facility.)
+</p>
+<p>It must be the case that the <i class="i">function</i> or <i class="i">macro</i> named by <i class="i">access-fn</i> 
+evaluates all of its arguments.
+</p>
+<p><b class="b">defsetf</b> may take one of two forms, called the &ldquo;short form&rdquo; and the &ldquo;long form,&rdquo;
+which are distinguished by the <i class="i">type</i> of the second <i class="i">argument</i>.
+</p>
+<p>When the short form is used, 
+<i class="i">update-fn</i> must name 
+a <i class="i">function</i> (or <i class="i">macro</i>) that takes one more argument
+than <i class="i">access-fn</i> takes.  When <b class="b">setf</b> is given a <i class="i">place</i>
+that is a call on <i class="i">access-fn</i>, it expands into
+a call on <i class="i">update-fn</i> that is given all the arguments to
+<i class="i">access-fn</i> and also, as its last argument, the new value
+(which must be returned by <i class="i">update-fn</i> as its value).
+</p>
+<p>The long form <b class="b">defsetf</b> 
+resembles <b class="b">defmacro</b>.
+The <i class="i">lambda-list</i> describes the arguments of <i class="i">access-fn</i>. 
+The <i class="i">store-variables</i> describe the
+value 
+</p>
+<p>or values 
+</p>
+<p>to be stored into the <i class="i">place</i>.
+The <i class="i">body</i> must
+compute the expansion of a <b class="b">setf</b> of a call on <i class="i">access-fn</i>.
+</p>
+<p>The expansion function is defined in the same <i class="i">lexical environment</i>
+in which the <b class="b">defsetf</b> <i class="i">form</i> appears.
+</p>
+<p>During the evaluation of the
+<i class="i">forms</i>, the variables in the <i class="i">lambda-list</i> and the
+<i class="i">store-variables</i>
+are bound to names of temporary variables,
+generated as if by <b class="b">gensym</b>
+or <b class="b">gentemp</b>,
+that will be bound by the
+expansion of <b class="b">setf</b> 
+to the values of those <i class="i">subforms</i>.  This binding
+permits the
+<i class="i">forms</i> to be written without regard for order-of-evaluation
+issues.  <b class="b">defsetf</b> arranges for the temporary variables to be
+optimized out of the final result in cases where that is possible.  
+</p>
+<p>The body code in <b class="b">defsetf</b> is implicitly enclosed in a 
+<i class="i">block</i> whose name is 
+<i class="i">access-fn</i>
+</p>
+<p><b class="b">defsetf</b> 
+ensures that <i class="i">subforms</i> 
+of the <i class="i">place</i> are evaluated exactly once.
+</p>
+<p><i class="i">Documentation</i> is attached to <i class="i">access-fn</i> as a <i class="i">documentation string</i>
+of kind <b class="b">setf</b>.
+</p>
+<p>If a <b class="b">defsetf</b> <i class="i">form</i> appears as a <i class="i">top level form</i>,
+the <i class="i">compiler</i> must make the <i class="i">setf expander</i> available so that
+it may be used to expand calls to <b class="b">setf</b> later on in the <i class="i">file</i>.
+Users must ensure that the <i class="i">forms</i>, if any, can be evaluated
+at compile time if the <i class="i">access-fn</i> is used in a <i class="i">place</i>
+later in the same <i class="i">file</i>.
+The <i class="i">compiler</i> must make these <i class="i">setf expanders</i> available to 
+compile-time calls to <b class="b">get-setf-expansion</b> when its <i class="i">environment</i> 
+argument is a value received as the <i class="i">environment parameter</i> of a <i class="i">macro</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-87"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-87"> &para;</a></span></h4>
+<p>The effect of
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defsetf symbol-value set)
+</pre></div>
+
+<p>is built into the <span class="r">Common Lisp</span> system.
+This causes the form <code class="t">(setf (symbol-value foo) fu)</code>
+to expand into <code class="t">(set foo fu)</code>.
+</p>
+<p>Note that
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defsetf car rplaca)
+</pre></div>
+
+<p>would be incorrect because <b class="b">rplaca</b> does not return its last argument.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun middleguy (x) (nth (truncate (1- (list-length x)) 2) x)) &rArr;  MIDDLEGUY
+ (defun set-middleguy (x v)
+    (unless (null x)
+      (rplaca (nthcdr (truncate (1- (list-length x)) 2) x) v))
+    v) &rArr;  SET-MIDDLEGUY
+ (defsetf middleguy set-middleguy) &rArr;  MIDDLEGUY
+ (setq a (list 'a 'b 'c 'd)
+       b (list 'x)
+       c (list 1 2 3 (list 4 5 6) 7 8 9)) &rArr;  (1 2 3 (4 5 6) 7 8 9)
+ (setf (middleguy a) 3) &rArr;  3
+ (setf (middleguy b) 7) &rArr;  7
+ (setf (middleguy (middleguy c)) 'middleguy-symbol) &rArr;  MIDDLEGUY-SYMBOL
+ a &rArr;  (A 3 C D)
+ b &rArr;  (7)
+ c &rArr;  (1 2 3 (4 MIDDLEGUY-SYMBOL 6) 7 8 9)
+</pre></div>
+
+<p>An example of the use of the long form of <b class="b">defsetf</b>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defsetf subseq (sequence start &amp;optional end) (new-sequence)
+   `(progn (replace ,sequence ,new-sequence
+                    :start1 ,start :end1 ,end)
+           ,new-sequence)) &rArr;  SUBSEQ
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (defvar *xy* (make-array '(10 10)))
+ (defun xy (&amp;key ((x x) 0) ((y y) 0)) (aref *xy* x y)) &rArr;  XY
+ (defun set-xy (new-value &amp;key ((x x) 0) ((y y) 0))
+   (setf (aref *xy* x y) new-value)) &rArr;  SET-XY
+ (defsetf xy (&amp;key ((x x) 0) ((y y) 0)) (store)
+   `(set-xy ,store 'x ,x 'y ,y)) &rArr;  XY
+ (get-setf-expansion '(xy a b))
+&rArr;  (#:t0 #:t1),
+   (a b),
+   (#:store),
+   ((lambda (&amp;key ((x #:x)) ((y #:y))) 
+      (set-xy #:store 'x #:x 'y #:y))
+    #:t0 #:t1),
+   (xy #:t0 #:t1)
+ (xy 'x 1) &rArr;  NIL
+ (setf (xy 'x 1) 1) &rArr;  1
+ (xy 'x 1) &rArr;  1
+ (let ((a 'x) (b 'y))
+   (setf (xy a 1 b 2) 3)
+   (setf (xy b 5 a 9) 14))
+&rArr;  14
+ (xy 'y 0 'x 1) &rArr;  1
+ (xy 'x 1 'y 2) &rArr;  3
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-98"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-98"> &para;</a></span></h4>
+
+<p><a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="setf.html">setf, psetf                                                         [Macro]</a>
+,
+</p>
+<p><a class="ref" href="define_002dsetf_002dexpander.html">define-setf-expander                                                [Macro]</a>
+,
+<a class="ref" href="get_002dsetf_002dexpansion.html">get-setf-expansion                                               [Function]</a>
+,
+</p>
+<p><a class="ref" href="Generalized-Reference.html">Generalized Reference</a>,
+<a class="ref" href="Syntactic-Interaction-of-Documentation-Strings-and-Declarations.html">Syntactic Interaction of Documentation Strings and Declarations</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-64"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-64"> &para;</a></span></h4>
+
+<p><i class="i">forms</i> must include provision
+for returning the correct value (the value 
+</p>
+<p>or values 
+</p>
+<p>of <i class="i">store-variable</i>).  
+This is
+handled by <i class="i">forms</i> rather than by <b class="b">defsetf</b> because
+in many cases this value can be returned at no extra cost, by calling a
+function that simultaneously stores into the <i class="i">place</i> and 
+returns the correct value.
+</p>
+<p>A <b class="b">setf</b> of a call on <i class="i">access-fn</i> also evaluates
+all of <i class="i">access-fn</i>&rsquo;s arguments; it cannot treat any of them specially.
+This means that <b class="b">defsetf</b> 
+cannot be used to describe how to store into
+a <i class="i">generalized reference</i> to a byte, such as <code class="t">(ldb field reference)</code>.
+</p>
+<p><b class="b">define-setf-expander</b>
+</p>
+<p>is used to handle situations that 
+do not fit the restrictions imposed by <b class="b">defsetf</b>
+and gives the user additional control.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="define_002dsetf_002dexpander.html">define-setf-expander                                                [Macro]</a>, Previous: <a href="define_002dmodify_002dmacro.html">define-modify-macro                                                 [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/defstruct.html
@@ -0,0 +1,1187 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>defstruct (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="defstruct (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="defstruct (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Structures-Dictionary.html" rel="up" title="Structures Dictionary">
+<link href="copy_002dstructure.html" rel="next" title="copy-structure">
+<link href="Structures-Dictionary.html" rel="prev" title="Structures Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="defstruct">
+<div class="nav-panel">
+<p>
+Next: <a href="copy_002dstructure.html" accesskey="n" rel="next">copy-structure                                                   [Function]</a>, Previous: <a href="Structures-Dictionary.html" accesskey="p" rel="prev">Structures Dictionary</a>, Up: <a href="Structures-Dictionary.html" accesskey="u" rel="up">Structures Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="defstruct-_005bMacro_005d"><span>8.1.1 defstruct                                                           [Macro]<a class="copiable-link" href="#defstruct-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">defstruct</code>  <i class="i">name-and-options <span class="r">[</span>documentation<span class="r">]</span> {!<i class="i">slot-description</i>}*</i><br>
+   &rArr;  <i class="i">structure-name</i>
+</p>
+<p><i class="i">name-and-options</i>&nbsp;::=structure-name&nbsp;|&nbsp;<span class="r">(</span>structure-name&nbsp;[[!<i class="i">options</i>]]<span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">options</i>&nbsp;::=!<i class="i">conc-name-option</i>&nbsp;|<!-- /@w -->
+&nbsp;{!<i class="i">constructor-option</i>}*&nbsp;|<!-- /@w -->
+&nbsp;!<i class="i">copier-option</i>&nbsp;|<!-- /@w -->
+&nbsp;!<i class="i">include-option</i>&nbsp;|<!-- /@w -->
+&nbsp;!<i class="i">initial-offset-option</i>&nbsp;|<!-- /@w -->
+&nbsp;!<i class="i">named-option</i>&nbsp;|<!-- /@w -->
+&nbsp;!<i class="i">predicate-option</i>&nbsp;|<!-- /@w -->
+&nbsp;!<i class="i">printer-option</i>&nbsp;|<!-- /@w -->
+&nbsp;!<i class="i">type-option</i><!-- /@w -->
+</p>
+<p><i class="i">conc-name-option</i>&nbsp;::=<code class="t">:conc-name</code>&nbsp;|&nbsp;<span class="r">(</span><code class="t">:conc-name</code><span class="r">)</span>&nbsp;|&nbsp;<span class="r">(</span><code class="t">:conc-name</code>&nbsp;<i class="i">conc-name</i><span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">constructor-option</i>&nbsp;::=<code class="t">:constructor</code>&nbsp;|<!-- /@w -->
+&nbsp;<span class="r">(</span><code class="t">:constructor</code><span class="r">)</span>&nbsp;|<!-- /@w -->
+&nbsp;<span class="r">(</span><code class="t">:constructor</code>&nbsp;<i class="i">constructor-name</i><span class="r">)</span>&nbsp;|<!-- /@w -->
+&nbsp;<span class="r">(</span><code class="t">:constructor</code>&nbsp;<i class="i">constructor-name</i>&nbsp;<i class="i">constructor-arglist</i><span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">copier-option</i>&nbsp;::=<code class="t">:copier</code>&nbsp;|&nbsp;<span class="r">(</span><code class="t">:copier</code><span class="r">)</span>&nbsp;|&nbsp;<span class="r">(</span><code class="t">:copier</code>&nbsp;<i class="i">copier-name</i><span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">predicate-option</i>&nbsp;::=<code class="t">:predicate</code>&nbsp;|&nbsp;<span class="r">(</span><code class="t">:predicate</code><span class="r">)</span>&nbsp;|&nbsp;<span class="r">(</span><code class="t">:predicate</code>&nbsp;<i class="i">predicate-name</i><span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">include-option</i>&nbsp;::=<span class="r">(</span><code class="t">:include</code>&nbsp;<i class="i">included-structure-name</i>&nbsp;{!<i class="i">slot-description</i>}*<span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">printer-option</i>&nbsp;::=!<i class="i">print-object-option</i>&nbsp;|&nbsp;!<i class="i">print-function-option</i><!-- /@w -->
+</p>
+<p><i class="i">print-object-option</i>&nbsp;::=<span class="r">(</span><code class="t">:print-object</code>&nbsp;<i class="i">printer-name</i><span class="r">)</span>&nbsp;|&nbsp;<span class="r">(</span><code class="t">:print-object</code><span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">print-function-option</i>&nbsp;::=<span class="r">(</span><code class="t">:print-function</code>&nbsp;<i class="i">printer-name</i><span class="r">)</span>&nbsp;|&nbsp;<span class="r">(</span><code class="t">:print-function</code><span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">type-option</i>&nbsp;::=<span class="r">(</span><code class="t">:type</code>&nbsp;<i class="i">type</i><span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">named-option</i>&nbsp;::=<code class="t">:named</code><!-- /@w -->
+</p>
+<p><i class="i">initial-offset-option</i>&nbsp;::=<span class="r">(</span><code class="t">:initial-offset</code>&nbsp;<i class="i">initial-offset</i><span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">slot-description</i>&nbsp;::=<i class="i">slot-name</i>&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;<span class="r">(</span><i class="i">slot-name</i>&nbsp;<span class="r">[</span><i class="i">slot-initform</i>&nbsp;[[!<i class="i">slot-option</i>]]<span class="r">]</span><span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">slot-option</i>&nbsp;::=<code class="t">:type</code>&nbsp;<i class="i">slot-type</i>&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;<code class="t">:read-only</code>&nbsp;<i class="i">slot-read-only-p</i><!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-129"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-129"> &para;</a></span></h4>
+
+<p><i class="i">conc-name</i>&mdash;a <i class="i">string designator</i>.
+</p>
+<p><i class="i">constructor-arglist</i>&mdash;a <i class="i">boa lambda list</i>.
+</p>
+<p><i class="i">constructor-name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">copier-name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">included-structure-name</i>&mdash;an already-defined <i class="i">structure name</i>.
+</p>
+<p>Note that a <i class="i">derived type</i> is not permissible, 
+even if it would expand into a <i class="i">structure name</i>.
+</p>
+<p><i class="i">initial-offset</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<p><i class="i">predicate-name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">printer-name</i>&mdash;a <i class="i">function name</i> or a <i class="i">lambda expression</i>.
+</p>
+<p><i class="i">slot-name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">slot-initform</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">slot-read-only-p</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">structure-name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">type</i>&mdash;one of the <i class="i">type specifiers</i>
+		    <b class="b">list</b>,
+		    <b class="b">vector</b>,
+	         or <code class="t">(vector <i class="i">size</i>)</code>,
+		 or some other <i class="i">type specifier</i> defined 
+		    by the <i class="i">implementation</i> to be appropriate.
+</p>
+<p><i class="i">documentation</i>&mdash;a <i class="i">string</i>; not evaluated.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-169"><span>Description::<a class="copiable-link" href="#Description_003a_003a-169"> &para;</a></span></h4>
+
+<p><b class="b">defstruct</b> defines a structured <i class="i">type</i>, named <i class="i">structure-type</i>,
+with named slots as specified by the <i class="i">slot-options</i>.
+</p>
+<p><b class="b">defstruct</b> defines <i class="i">readers</i> for the slots and
+arranges for <b class="b">setf</b> to work properly on such
+<i class="i">reader</i> functions.
+Also, unless overridden, it
+     defines a predicate named <code class="t"><i class="i">name</i>-p</code>,
+     defines a constructor function named <code class="t">make-<i class="i">constructor-name</i></code>,
+ and defines a copier function named <code class="t">copy-<i class="i">constructor-name</i></code>.
+All names of automatically created functions might automatically
+be declared <b class="b">inline</b> (at the discretion of the <i class="i">implementation</i>).
+</p>
+<p>If <i class="i">documentation</i> is supplied, it is attached to <i class="i">structure-name</i>
+as a <i class="i">documentation string</i> of kind <b class="b">structure</b>,
+</p>
+<p>and unless <code class="t">:type</code> is used, the <i class="i">documentation</i> is also attached 
+to <i class="i">structure-name</i> as a <i class="i">documentation string</i> of kind
+<b class="b">type</b> and as a <i class="i">documentation string</i> to the <i class="i">class</i> <i class="i">object</i> 
+for the <i class="i">class</i> named <i class="i">structure-name</i>.
+</p>
+<p><b class="b">defstruct</b> defines a constructor function that is used to
+create instances of the structure created by <b class="b">defstruct</b>.
+The default name is <code class="t">make-<i class="i">structure-name</i></code>.
+A different name can be supplied
+by giving the name as the argument to the <i class="i">constructor</i> option.
+<b class="b">nil</b> indicates that no constructor function will be created.
+</p>
+<p>After a new structure type has been defined, instances of that type
+normally can be created by using the constructor function for the
+type.
+A call to a constructor function is of the following form:
+</p>
+<p>&nbsp;(<code class="t">constructor-function-name</code><!-- /@w --><br>
+&nbsp;<code class="t">slot-keyword-1&nbsp;form-1</code><!-- /@w --><br>
+&nbsp;<code class="t">slot-keyword-2&nbsp;form-2</code><!-- /@w --><br>
+&nbsp;...)<!-- /@w --><br>
+</p>
+<p>The arguments to the constructor function are all keyword arguments.  Each
+slot keyword argument must  be 
+a keyword whose name corresponds to the name of a structure slot.  
+All the <i class="i">keywords</i> and <i class="i">forms</i>
+are evaluated.  
+If a slot is not initialized in this way, 
+it is initialized by evaluating <i class="i">slot-initform</i> in the slot description
+</p>
+<p>at the time the constructor function is called.
+</p>
+<p>If no <i class="i">slot-initform</i> is supplied, 
+the consequences are undefined if an attempt is later made to read the slot&rsquo;s value
+before a value is explicitly assigned.
+</p>
+<p>Each <i class="i">slot-initform</i> supplied for a <b class="b">defstruct</b> component,
+when used by the constructor function for an otherwise unsupplied
+component, is re-evaluated on every call to the
+constructor function.  
+</p>
+<p>The <i class="i">slot-initform</i> is not evaluated 
+        unless it is needed in the creation of a particular structure
+        instance.  If it is never needed, there can be no type-mismatch
+        error, even if the <i class="i">type</i> 
+of the slot is specified; no warning
+        should be issued in this case.
+</p>
+<p>For example, in the following sequence, only the last call is an error.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct person (name 007 :type string)) 
+ (make-person :name &quot;James&quot;)
+ (make-person)
+</pre></div>
+
+<p>It is as if the <i class="i">slot-initforms</i> were 
+used as <i class="i">initialization forms</i> for the <i class="i">keyword parameters</i> 
+of the constructor function.
+</p>
+<p>The <i class="i">symbols</i> which name the slots must not be used by the 
+<i class="i">implementation</i> as the <i class="i">names</i> for the <i class="i">lambda variables</i>
+in the constructor function, since one or more of those <i class="i">symbols</i>
+might have been proclaimed <b class="b">special</b> or might be defined as
+the name of a <i class="i">constant variable</i>.
+The slot default init forms are evaluated 
+in the <i class="i">lexical environment</i> in which the <b class="b">defstruct</b> form itself appears and
+in the <i class="i">dynamic environment</i> in which the call to the constructor function appears.
+</p>
+<p>For example, if the form <code class="t">(gensym)</code> were used as an initialization form,
+either in the constructor-function call or as the default initialization form
+in <b class="b">defstruct</b>, then every call to the constructor function would call
+<b class="b">gensym</b> once to generate a new <i class="i">symbol</i>.
+</p>
+<p>Each <i class="i">slot-description</i> in <b class="b">defstruct</b> can specify zero or more
+<i class="i">slot-options</i>.  
+</p>
+<p>A <i class="i">slot-option</i> consists of a pair of a keyword and a value
+(which is not a form to be evaluated, but the value itself).  For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct ship
+   (x-position 0.0 :type short-float)
+   (y-position 0.0 :type short-float)
+   (x-velocity 0.0 :type short-float)
+   (y-velocity 0.0 :type short-float)
+   (mass *default-ship-mass* :type short-float :read-only t))
+</pre></div>
+
+<p>This specifies that each slot always contains a <i class="i">short float</i>,
+and that the last slot cannot be altered once a ship is constructed.
+</p>
+<p>The available slot-options are:
+</p><dl class="table">
+<dt><code class="t">:type</code> <i class="i">type</i></dt>
+<dd><p>This specifies that the contents of the
+slot is always of type <i class="i">type</i>.  This is entirely
+analogous to the declaration of a variable or function; it
+effectively declares the result type of the <i class="i">reader</i> function.  
+It is <i class="i">implementation-dependent</i> whether the <i class="i">type</i> is checked 
+    when initializing a slot
+ or when assigning to it.
+<i class="i">Type</i> is not evaluated; it must be a valid <i class="i">type specifier</i>.
+</p>
+</dd>
+<dt><code class="t">:read-only</code> <i class="i">x</i></dt>
+<dd><p>When <i class="i">x</i> is <i class="i">true</i>,
+this specifies that this slot cannot be
+altered; it will always contain the value supplied at construction time.
+<b class="b">setf</b> will not accept the <i class="i">reader</i> function for this slot.
+If <i class="i">x</i> is <i class="i">false</i>, this slot-option has no effect.
+<i class="i">X</i> is not evaluated.
+</p>
+<p>When this option is <i class="i">false</i> or unsupplied,
+it is <i class="i">implementation-dependent</i> whether the ability to <i class="i">write</i>
+the slot is implemented by a <i class="i">setf function</i> or a <i class="i">setf expander</i>.
+</p>
+</dd>
+</dl>
+
+<p>The following keyword options are available for use with <b class="b">defstruct</b>.  
+A <b class="b">defstruct</b> option can be either a keyword or a <i class="i">list</i>
+of a keyword and arguments for that keyword; 
+specifying the keyword by itself is equivalent to specifying a list consisting of
+the keyword and no arguments.
+The syntax for <b class="b">defstruct</b> options differs from the pair syntax 
+used for slot-options.  No part of any of these options is evaluated.
+</p><dl class="table">
+<dt><code class="t">:conc-name</code></dt>
+<dd><p>This provides for automatic prefixing of names of <i class="i">reader</i> (or <i class="i">access</i>) functions.
+The default behavior is to begin the names of all the <i class="i">reader</i> functions of
+a structure with the name of the structure followed by a hyphen.
+</p>
+<p><code class="t">:conc-name</code> supplies an alternate
+prefix to be used.  If a hyphen is to be used as a separator,
+it must be supplied as part of the prefix.
+If <code class="t">:conc-name</code> is <b class="b">nil</b> or no argument is supplied, 
+then no prefix is used;
+then the names of the <i class="i">reader</i> functions
+are the same as the slot names.
+If a <i class="i">non-nil</i> prefix is given,
+the name of the <i class="i">reader</i> <i class="i">function</i> for each slot is constructed by
+concatenating that prefix and the name of the slot, and interning the resulting
+<i class="i">symbol</i> in the <i class="i">package</i> that is current at the time the 
+<b class="b">defstruct</b> form is expanded.
+</p>
+<p>Note that no matter what is supplied for <code class="t">:conc-name</code>,
+slot keywords that match the slot names with no prefix attached are used
+with a constructor function.
+The <i class="i">reader</i> function name is used
+in conjunction with <b class="b">setf</b>.  Here is an example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct (door (:conc-name dr-)) knob-color width material) &rArr;  DOOR
+ (setq my-door (make-door :knob-color 'red :width 5.0)) 
+&rArr;  #S(DOOR :KNOB-COLOR RED :WIDTH 5.0 :MATERIAL NIL)
+ (dr-width my-door) &rArr;  5.0
+ (setf (dr-width my-door) 43.7) &rArr;  43.7
+ (dr-width my-door) &rArr;  43.7
+</pre></div>
+
+<p>Whether or not the <code class="t">:conc-name</code> option is explicitly supplied, 
+the following rule governs name conflicts of generated <i class="i">reader</i>
+(or <i class="i">accessor</i>) names:
+For any <i class="i">structure</i> <i class="i">type</i> S_1 
+having a <i class="i">reader</i> function named R for a slot named X_1
+that is inherited by another <i class="i">structure</i> <i class="i">type</i> S_2 
+that would have a <i class="i">reader</i> function with the same name R for a slot named X_2,
+no definition for R is generated by the definition of S_2;
+instead, the definition of R is inherited from the definition of S_1.
+(In such a case, if X_1 and X_2 are different slots,
+the <i class="i">implementation</i> might signal a style warning.)
+</p>
+</dd>
+<dt><code class="t">:constructor</code></dt>
+<dd><p>This option takes zero, one, or two arguments.
+If at least one argument is supplied and the first argument is not <b class="b">nil</b>, then
+that argument is a <i class="i">symbol</i> which specifies the name of the 
+constructor function.  If the argument is not supplied (or if the option itself is not
+supplied), the name of the constructor is produced by concatenating the
+string <code class="t">&quot;MAKE-&quot;</code> and the name of the structure, interning the name
+in whatever <i class="i">package</i> is current at the time <b class="b">defstruct</b>
+is expanded.  If the argument is provided and is <b class="b">nil</b>,
+no constructor function is defined.
+</p>
+<p>If <code class="t">:constructor</code> is given as
+<code class="t">(:constructor <i class="i">name</i> <i class="i">arglist</i>)</code>, 
+then instead of making a keyword
+driven constructor function, <b class="b">defstruct</b> 
+defines a &ldquo;positional&rdquo; constructor function,
+taking arguments whose meaning is determined by the argument&rsquo;s position
+and possibly by keywords.
+<i class="i">Arglist</i> is used to describe what the arguments to the
+constructor will be. In the simplest case something like
+<code class="t">(:constructor make-foo (a b c))</code> defines <code class="t">make-foo</code> to be
+a three-argument 
+constructor function whose arguments are used to initialize the
+slots named <code class="t">a</code>, <code class="t">b</code>, and <code class="t">c</code>.
+</p>
+<p>Because a constructor of this type operates &ldquo;By Order of Arguments,&rdquo;
+it is sometimes known as a &ldquo;boa constructor.&rdquo;
+</p>
+<p>For information on how the <i class="i">arglist</i> for a &ldquo;boa constructor&rdquo; is
+processed, see <a class="ref" href="Boa-Lambda-Lists.html">Boa Lambda Lists</a>.
+</p>
+<p>It is permissible to use the
+<code class="t">:constructor</code> option more than once, so that you can define several
+different constructor functions, each taking different parameters.
+</p>
+<p>[Reviewer Note by Barmar: What about (:constructor) and (:constructor nil).
+		  Should we worry about it?]
+</p>
+<p><b class="b">defstruct</b> creates the default-named keyword constructor function
+only if no explicit <code class="t">:constructor</code> options are specified, or if the
+<code class="t">:constructor</code> option is specified without a <i class="i">name</i> argument.
+</p>
+<p><code class="t">(:constructor nil)</code> is meaningful only when there are no other
+<code class="t">:constructor</code> options specified.  It prevents <b class="b">defstruct</b>
+from generating any constructors at all.
+</p>
+<p>Otherwise, <b class="b">defstruct</b> creates a constructor function corresponding
+to each supplied <code class="t">:constructor</code> option.  It is permissible to specify
+multiple keyword constructor functions as well as multiple 
+&ldquo;boa constructors&rdquo;.
+</p>
+</dd>
+<dt><code class="t">:copier</code></dt>
+<dd><p>This option takes one argument, a <i class="i">symbol</i>,
+which specifies the name of the copier
+function.  If the argument is not provided or if the option itself is not
+provided, the name of the copier is produced by concatenating the
+string <code class="t">&quot;COPY-&quot;</code> and the name of the structure, interning the name
+in whatever <i class="i">package</i> is current at the time <b class="b">defstruct</b>
+is expanded.
+If the argument is provided and is <b class="b">nil</b>, no copier function is defined.
+</p>
+<p>The automatically defined copier function is a function of
+one <i class="i">argument</i>,
+</p>
+<p>which must be of the structure type being defined.
+</p>
+<p>The copier function creates a <i class="i">fresh</i> 
+structure that has the same <i class="i">type</i> as its <i class="i">argument</i>,
+and that has the <i class="i">same</i> component values as the original 
+structure; that is, the component values are not copied recursively.
+</p>
+<p>If the <b class="b">defstruct</b> <code class="t">:type</code> option was not used,
+the following equivalence applies:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (<i class="i">copier-name</i> x) = (copy-structure (the <i class="i">structure-name</i> x))
+</pre></div>
+
+</dd>
+<dt><code class="t">:include</code></dt>
+<dd><p>This option is used for building a new structure definition as
+an extension of another structure definition.  For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct person name age sex)
+</pre></div>
+
+<p>To make a new structure to represent an astronaut
+that has the
+attributes of name, age, and sex, and <i class="i">functions</i>
+that operate on <code class="t">person</code> structures, <code class="t">astronaut</code> is defined
+with <code class="t">:include</code> as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct (astronaut (:include person)
+                       (:conc-name astro-))
+    helmet-size
+    (favorite-beverage 'tang))
+</pre></div>
+
+<p><code class="t">:include</code> causes the structure being defined
+to have the same slots as the included structure.
+This is done in such a way
+that the <i class="i">reader</i> functions for the included
+structure also work on the structure being defined.
+In this example, an
+<code class="t">astronaut</code> therefore has five slots: the three defined in
+<code class="t">person</code> and the two defined in <code class="t">astronaut</code>
+itself.  The <i class="i">reader</i> functions defined by the <code class="t">person</code> structure
+can be applied to instances of the <code class="t">astronaut</code> structure, and they
+work correctly.
+Moreover, <code class="t">astronaut</code> has its own <i class="i">reader</i> functions for
+components defined by the <code class="t">person</code> structure.
+The following examples illustrate the 
+use of <code class="t">astronaut</code> structures:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq x (make-astronaut :name 'buzz
+                         :age 45.
+                         :sex t
+                         :helmet-size 17.5))
+ (person-name x) &rArr;  BUZZ
+ (astro-name x) &rArr;  BUZZ
+ (astro-favorite-beverage x) &rArr;  TANG
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (reduce #'+ astros :key #'person-age) ; obtains the total of the ages 
+                                       ; of the possibly empty
+                                       ; sequence of astros
+</pre></div>
+
+<p>The difference between the <i class="i">reader</i> functions <code class="t">person-name</code> and <code class="t">astro-name</code>
+is that <code class="t">person-name</code> can be correctly applied to any <code class="t">person</code>,
+including an <code class="t">astronaut</code>, while <code class="t">astro-name</code> can be correctly
+applied only to an <code class="t">astronaut</code>.  An implementation might 
+check for incorrect use of <i class="i">reader</i> functions.
+</p>
+<p>At most one <code class="t">:include</code> can be supplied in a single <b class="b">defstruct</b>.
+The argument to <code class="t">:include</code> is required and must be the
+name of some previously defined structure.  If the structure being
+defined has no <code class="t">:type</code> option, then the included structure must
+also have had no <code class="t">:type</code> option supplied for it.
+If the structure being defined has a <code class="t">:type</code> option,
+then the included structure must have been declared with a <code class="t">:type</code>
+option specifying the same representation <i class="i">type</i>.
+</p>
+<p>If no <code class="t">:type</code> option is involved, then
+the structure name of the including structure definition
+becomes the name of a <i class="i">data type</i>, and therefore
+a valid <i class="i">type specifier</i> recognizable by <b class="b">typep</b>; it becomes
+a <i class="i">subtype</i> of the included structure.  
+In the above example,
+<code class="t">astronaut</code> is a <i class="i">subtype</i> of <code class="t">person</code>; hence
+</p>
+<div class="example">
+<pre class="example-preformatted"> (typep (make-astronaut) 'person) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<p>indicating that all operations on persons also
+work on astronauts.
+</p>
+<p>The structure using <code class="t">:include</code> can specify default values or
+slot-options for the included slots different from those the included
+structure specifies, by giving the <code class="t">:include</code> option as:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (:include <i class="i">included-structure-name</i> {<i class="i">slot-description</i>}*)
+</pre></div>
+
+<p>Each <i class="i">slot-description</i> must have a <i class="i">slot-name</i> 
+that is the same
+as that of some slot in the included structure.
+If a <i class="i">slot-description</i> has no <i class="i">slot-initform</i>,
+then in the new structure the slot has no initial value.
+Otherwise its initial value form is replaced by
+the <i class="i">slot-initform</i> in the <i class="i">slot-description</i>.
+A normally writable slot can be made read-only.
+If a slot is read-only in the included structure, then it
+must also be so in the including structure.
+If a <i class="i">type</i> is supplied for a slot, it must be 
+a <i class="i">subtype</i> of
+the
+<i class="i">type</i> specified in the included structure.
+</p>
+<p>For example, if the
+default age for an astronaut is <code class="t">45</code>, then 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct (astronaut (:include person (age 45)))
+    helmet-size
+    (favorite-beverage 'tang))
+</pre></div>
+
+<p>If <code class="t">:include</code> is used with the <code class="t">:type</code>
+option, then the effect is first to skip over as many representation
+elements as needed to represent the included structure, then to
+skip over any additional elements supplied by the <code class="t">:initial-offset</code>
+option, and then to begin allocation of elements from that point.
+For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct (binop (:type list) :named (:initial-offset 2))
+   (operator '? :type symbol)   
+   operand-1
+   operand-2) &rArr;  BINOP
+ (defstruct (annotated-binop (:type list)
+                             (:initial-offset 3)
+                             (:include binop))
+  commutative associative identity) &rArr;  ANNOTATED-BINOP
+ (make-annotated-binop :operator '*
+                       :operand-1 'x
+                       :operand-2 5
+                       :commutative t
+                       :associative t
+                       :identity 1)
+   &rArr;  (NIL NIL BINOP * X 5 NIL NIL NIL T T 1)
+</pre></div>
+
+<p>The first two <b class="b">nil</b> elements stem from the <code class="t">:initial-offset</code> of <code class="t">2</code>
+in the definition of <code class="t">binop</code>.  The next four elements contain the
+structure name and three slots for <code class="t">binop</code>.  The next three <b class="b">nil</b> elements
+stem from the <code class="t">:initial-offset</code> of <code class="t">3</code> in the definition of
+<code class="t">annotated-binop</code>.  The last three list elements contain the additional
+slots for an <code class="t">annotated-binop</code>.
+</p>
+</dd>
+<dt><code class="t">:initial-offset</code></dt>
+<dd><p><code class="t">:initial-offset</code> instructs <b class="b">defstruct</b> to skip over a certain
+number of slots before it starts allocating the slots described in the
+body.  This option&rsquo;s argument is the number of slots <b class="b">defstruct</b> 
+should skip.  <code class="t">:initial-offset</code> can be used only if <code class="t">:type</code> is also supplied.
+</p>
+<p>[Reviewer Note by Barmar: What are initial values of the skipped slots?]
+</p>
+<p><code class="t">:initial-offset</code> allows 
+slots to be allocated beginning at a representational
+element other than the first.  For example, the form
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct (binop (:type list) (:initial-offset 2))
+   (operator '? :type symbol)
+   operand-1
+   operand-2) &rArr;  BINOP
+</pre></div>
+
+<p>would result in the following behavior for <code class="t">make-binop</code>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (make-binop :operator '+ :operand-1 'x :operand-2 5)
+&rArr;  (NIL NIL + X 5)
+ (make-binop :operand-2 4 :operator '*)
+&rArr;  (NIL NIL * NIL 4)
+</pre></div>
+
+<p>The selector functions
+<code class="t">binop-operator</code>, <code class="t">binop-operand-1</code>,
+and <code class="t">binop-operand-2</code> would be essentially equivalent to <b class="b">third</b>,
+<b class="b">fourth</b>, and <b class="b">fifth</b>, respectively.
+Similarly, the form
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct (binop (:type list) :named (:initial-offset 2))
+   (operator '? :type symbol)
+   operand-1
+   operand-2) &rArr;  BINOP
+</pre></div>
+
+<p>would result in the following behavior for <code class="t">make-binop</code>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (make-binop :operator '+ :operand-1 'x :operand-2 5) &rArr;  (NIL NIL BINOP + X 5)
+ (make-binop :operand-2 4 :operator '*) &rArr;  (NIL NIL BINOP * NIL 4)
+</pre></div>
+
+<p>The first two <b class="b">nil</b> elements stem from the <code class="t">:initial-offset</code> of <code class="t">2</code>
+in the definition of <code class="t">binop</code>.  The next four elements contain the
+structure name and three slots for <code class="t">binop</code>.  
+</p>
+</dd>
+<dt><code class="t">:named</code></dt>
+<dd><p><code class="t">:named</code> specifies that the structure is named.
+If no <code class="t">:type</code> is supplied,
+then the structure is always named.
+</p>
+<p>For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct (binop (:type list))
+   (operator '? :type symbol)
+   operand-1
+   operand-2) &rArr;  BINOP
+</pre></div>
+
+<p>This defines a constructor function <code class="t">make-binop</code> and three
+selector functions, namely <code class="t">binop-operator</code>, <code class="t">binop-operand-1</code>,
+and <code class="t">binop-operand-2</code>.  (It does not, however, define a predicate
+<code class="t">binop-p</code>, for reasons explained below.)
+</p>
+<p>The effect of <code class="t">make-binop</code> is simply to construct a list of length three:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (make-binop :operator '+ :operand-1 'x :operand-2 5) &rArr;  (+ X 5)  
+ (make-binop :operand-2 4 :operator '*) &rArr;  (* NIL 4)
+</pre></div>
+
+<p>It is just like the function <code class="t">list</code> except that it takes
+keyword arguments and performs slot defaulting appropriate to the <code class="t">binop</code>
+conceptual data type.  Similarly, the selector functions
+<code class="t">binop-operator</code>, <code class="t">binop-operand-1</code>,
+and <code class="t">binop-operand-2</code> are essentially equivalent to <b class="b">car</b>,
+<b class="b">cadr</b>, and <b class="b">caddr</b>, respectively.  They might not be
+completely equivalent because,
+for example, an implementation would be justified in adding error-checking
+code to ensure that the argument to each selector function is a length-3
+list.
+</p>
+<p><code class="t">binop</code> is a conceptual data type in that it is not made a part of
+the <span class="r">Common Lisp</span> type system.  <b class="b">typep</b> does not recognize <code class="t">binop</code> as
+a <i class="i">type specifier</i>, and <b class="b">type-of</b> returns <code class="t">list</code> when
+given a <code class="t">binop</code> structure.  There is no way to distinguish a data
+structure constructed by <code class="t">make-binop</code> from any other <i class="i">list</i> that 
+happens to have the correct structure.
+</p>
+<p>There is not any way to recover the structure name <code class="t">binop</code> from
+a structure created by <code class="t">make-binop</code>.  This can only be done
+if the structure is named.
+A named structure has the property that, given an instance of the
+structure, the structure name (that names the type) can be reliably
+recovered.  For structures defined
+with no <code class="t">:type</code> option, the structure name actually becomes part
+of the <span class="r">Common Lisp</span> data-type system.  <b class="b">type-of</b>,
+when applied to such a structure, returns the structure name
+as the <i class="i">type</i> of the <i class="i">object</i>;
+<b class="b">typep</b> recognizes
+the structure name as a valid <i class="i">type specifier</i>.
+</p>
+<p>For structures defined with a <code class="t">:type</code> option, <b class="b">type-of</b> 
+returns a <i class="i">type specifier</i> such as <code class="t">list</code> or <code class="t">(vector t)</code>,
+depending on the type supplied to the <code class="t">:type</code> option.
+The structure name does not become a valid <i class="i">type specifier</i>.
+However,
+if the <code class="t">:named</code> option is also supplied, then the first component
+of the structure (as created by a <b class="b">defstruct</b> constructor function)
+always contains the structure name.  This allows the structure name
+to be recovered from an instance of the structure and allows a reasonable
+predicate for the conceptual type to be defined:
+the automatically defined
+<i class="i">name-p</i> predicate for the structure operates by first
+checking that its argument is of the proper type (<b class="b">list</b>, 
+<code class="t">(vector t)</code>,
+or whatever) and then checking whether the first component contains
+the appropriate type name.
+</p>
+<p>Consider the <code class="t">binop</code> example shown above, modified only to
+include the <code class="t">:named</code> option:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct (binop (:type list) :named)
+   (operator '? :type symbol)
+   operand-1
+   operand-2) &rArr;  BINOP
+</pre></div>
+
+<p>As before, this defines a constructor function <code class="t">make-binop</code> and three
+selector functions <code class="t">binop-operator</code>, <code class="t">binop-operand-1</code>,
+and <code class="t">binop-operand-2</code>.  It also defines a predicate <code class="t">binop-p</code>.
+The effect of <code class="t">make-binop</code> is now to construct a list of length four:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (make-binop :operator '+ :operand-1 'x :operand-2 5) &rArr;  (BINOP + X 5)
+ (make-binop :operand-2 4 :operator '*) &rArr;  (BINOP * NIL 4)
+</pre></div>
+
+<p>The structure has the same layout as before except that the structure name
+<code class="t">binop</code> is included as the first list element.
+The selector functions
+<code class="t">binop-operator</code>, <code class="t">binop-operand-1</code>,
+and <code class="t">binop-operand-2</code> are essentially equivalent to <b class="b">cadr</b>,
+<b class="b">caddr</b>, and <b class="b">cadddr</b>, respectively.
+The predicate <code class="t">binop-p</code> is more or less equivalent to this
+definition:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun binop-p (x)
+   (and (consp x) (eq (car x) 'binop))) &rArr;  BINOP-P
+</pre></div>
+
+<p>The name <code class="t">binop</code> is still not a valid <i class="i">type specifier</i> recognizable
+to <b class="b">typep</b>, but at least there is a way of distinguishing <code class="t">binop</code>
+structures from other similarly defined structures.
+</p>
+</dd>
+<dt><code class="t">:predicate</code></dt>
+<dd><p>This option takes one argument, which specifies the name of the type predicate.
+If the argument is not supplied or if the option itself is not
+supplied, the name of the predicate is made by concatenating the
+name of the structure to the string <code class="t">&quot;-P&quot;</code>, interning the name
+in whatever <i class="i">package</i> is current at the time <b class="b">defstruct</b>
+is expanded.
+If the argument is provided and is <b class="b">nil</b>, no predicate is defined.
+A predicate can be defined only if the structure is named;
+if <code class="t">:type</code> is supplied and <code class="t">:named</code> is not supplied,
+then <code class="t">:predicate</code> must either be unsupplied or have the value <b class="b">nil</b>.
+</p>
+</dd>
+<dt><code class="t">:print-function</code>, <code class="t">:print-object</code></dt>
+<dd><p>The <code class="t">:print-function</code> and <code class="t">:print-object</code> 
+options
+specify that a <b class="b">print-object</b>
+<i class="i">method</i> for <i class="i">structures</i> of type <i class="i">structure-name</i> should be generated.
+These options are not synonyms, but do perform a similar service;
+the choice of which option (<code class="t">:print-function</code> or <code class="t">:print-object</code>) is used 
+affects how the function named <i class="i">printer-name</i> is called.
+Only one of these options may be used, and
+these options may be used only if <code class="t">:type</code> is not supplied.
+</p>
+<p>If the <code class="t">:print-function</code> option is used, 
+then when a structure of type <i class="i">structure-name</i> is to be printed,
+the designated printer function is called on three <i class="i">arguments</i>:
+</p>
+<dl class="table">
+<dt>&ndash;</dt>
+<dd><p>the structure to be printed
+	      (a <i class="i">generalized instance</i> of <i class="i">structure-name</i>).
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>a <i class="i">stream</i> to print to.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>an <i class="i">integer</i> indicating the current depth.
+	      The magnitude of this integer may vary between <i class="i">implementations</i>;
+	      however, it can reliably be compared against <b class="b">*print-level*</b>
+	      to determine whether depth abbreviation is appropriate.
+</p>
+</dd>
+</dl>
+
+<p>Specifying <code class="t">(:print-function <i class="i">printer-name</i>)</code>
+is approximately equivalent to specifying:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmethod print-object ((object <i class="i">structure-name</i>) stream)
+   (funcall (function <i class="i">printer-name</i>) object stream &lt;&lt;<i class="i">current-print-depth</i>&gt;&gt;))
+</pre></div>
+
+<p>where the &lt;&lt;<i class="i">current-print-depth</i>&gt;&gt; represents the printer&rsquo;s belief of
+how deep it is currently printing.  It is <i class="i">implementation-dependent</i>
+whether &lt;&lt;<i class="i">current-print-depth</i>&gt;&gt; is always 0 and <i class="i">*print-level*</i>,
+if <i class="i">non-nil</i>, is re-bound to successively smaller values as printing
+descends recursively, or whether <i class="i">current-print-depth</i> varies in 
+value as printing descends recursively and <i class="i">*print-level*</i> remains
+constant during the same traversal.
+</p>
+<p>If the <code class="t">:print-object</code> option is used, then
+when a structure of type <i class="i">structure-name</i> is to be printed,
+the designated printer function is called on two arguments:
+</p>
+<dl class="table">
+<dt>&ndash;</dt>
+<dd><p>the structure to be printed.
+</p>
+</dd>
+<dt>&ndash;</dt>
+<dd><p>the stream to print to.
+</p>
+</dd>
+</dl>
+
+<p>Specifying <code class="t">(:print-object <i class="i">printer-name</i>)</code> is equivalent to specifying:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmethod print-object ((object <i class="i">structure-name</i>) stream)
+   (funcall (function <i class="i">printer-name</i>) object stream))
+</pre></div>
+
+<p>If no <code class="t">:type</code> option is supplied,
+and if either a <code class="t">:print-function</code> or a <code class="t">:print-object</code> option is supplied,
+and if no <i class="i">printer-name</i> is supplied,
+then a <b class="b">print-object</b> <i class="i">method</i> <i class="i">specialized</i> for <i class="i">structure-name</i>
+is generated that calls a function that implements the default printing behavior for
+structures using <code class="t">#S</code> notation; see <a class="ref" href="Printing-Structures.html">Printing Structures</a>.
+</p>
+<p>If neither a <code class="t">:print-function</code> 
+       nor a <code class="t">:print-object</code> option 
+is supplied,
+then <b class="b">defstruct</b> does not generate a <b class="b">print-object</b> <i class="i">method</i>
+<i class="i">specialized</i> for <i class="i">structure-name</i> and some default behavior is inherited
+either from a structure named in an <code class="t">:include</code> option 
+    or from the default behavior for printing structures;
+see the <i class="i">function</i> <b class="b">print-object</b> and <a class="ref" href="Printing-Structures.html">Printing Structures</a>.
+</p>
+<p>When <b class="b">*print-circle*</b> is <i class="i">true</i>,
+a user-defined print function can print <i class="i">objects</i> 
+to the supplied <i class="i">stream</i> using  
+    <b class="b">write</b>,
+    <b class="b">prin1</b>,
+    <b class="b">princ</b>, 
+ or <b class="b">format</b>
+and expect circularities to be detected and printed using the <code class="t">#<i class="i">n</i>#</code> syntax.
+This applies to <i class="i">methods</i> on <b class="b">print-object</b> in addition to
+<code class="t">:print-function</code> options.
+If a user-defined print function prints to a <i class="i">stream</i> other than the one
+that was supplied, then circularity detection starts over for that <i class="i">stream</i>. 
+See the <i class="i">variable</i> <b class="b">*print-circle*</b>.
+</p>
+</dd>
+<dt><code class="t">:type</code></dt>
+<dd><p><code class="t">:type</code> explicitly specifies the representation to be used for
+the structure.  Its argument must be one of these <i class="i">types</i>:
+</p>
+<dl class="table">
+<dt><b class="b">vector</b></dt>
+<dd><p>This produces the same result as specifying <code class="t">(vector t)</code>.
+The structure is represented
+as a general <i class="i">vector</i>, storing components as vector elements.
+The first component is vector 
+element 1 if the structure is <code class="t">:named</code>, and element 0 otherwise.
+</p>
+<p>[Reviewer Note by Barmar: Do any implementations create non-simple vectors?]
+</p>
+</dd>
+<dt><code class="t">(vector <i class="i">element-type</i>)</code></dt>
+<dd><p>The structure is represented as a (possibly specialized) <i class="i">vector</i>, storing
+components as vector elements.  Every component must be of a <i class="i">type</i> 
+that can be stored in a <i class="i">vector</i> of the <i class="i">type</i> specified.  
+The first component is vector
+element 1 if the structure is <code class="t">:named</code>, and element 0 otherwise.
+The structure can be <code class="t">:named</code> only if the <i class="i">type</i> <b class="b">symbol</b> 
+is a <i class="i">subtype</i> of the supplied <i class="i">element-type</i>.
+</p>
+</dd>
+<dt><b class="b">list</b></dt>
+<dd><p>The structure is represented as a <i class="i">list</i>.
+The first component is the <i class="i">cadr</i> if the structure is <code class="t">:named</code>,
+and the <i class="i">car</i> if it is not <code class="t">:named</code>.
+</p></dd>
+</dl>
+
+<p>Specifying this option has the effect of forcing
+a specific representation and of forcing the components to be
+stored in the order specified in <b class="b">defstruct</b> 
+in corresponding successive elements of the specified representation.
+It also prevents the structure name from becoming a valid
+<i class="i">type specifier</i> recognizable by <b class="b">typep</b>.
+</p>
+<p>For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct (quux (:type list) :named) x y)
+</pre></div>
+
+<p>should make a constructor that builds a <i class="i">list</i> exactly like the one
+that <b class="b">list</b> produces, 
+with <code class="t">quux</code> as its <i class="i">car</i>.
+</p>
+<p>If this type is defined:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (deftype quux () '(satisfies quux-p))
+</pre></div>
+
+<p>then this form
+</p>
+<div class="example">
+<pre class="example-preformatted"> (typep (make-quux) 'quux)
+</pre></div>
+
+<p>should return precisely what this one does
+</p>
+<div class="example">
+<pre class="example-preformatted"> (typep (list 'quux nil nil) 'quux)
+</pre></div>
+
+<p>If <code class="t">:type</code> is not supplied,
+the structure is represented as an <i class="i">object</i> of <i class="i">type</i> <b class="b">structure-object</b>.
+</p>
+<p><b class="b">defstruct</b> without a <code class="t">:type</code> option defines a <i class="i">class</i> with
+the structure name as its name. The <i class="i">metaclass</i> of structure
+<i class="i">instances</i> is <b class="b">structure-class</b>.  
+</p>
+</dd>
+</dl>
+
+<p>The consequences of redefining a <b class="b">defstruct</b> structure are undefined.
+</p>
+<p>In the case where no <b class="b">defstruct</b> options have been supplied, 
+the following functions are automatically defined to operate 
+on instances of the new structure:
+</p>
+<dl class="table">
+<dt>Predicate</dt>
+<dd><p>A predicate with the name <code class="t"><i class="i">structure-name</i>-p</code> is defined to
+test membership in the structure type.  The predicate 
+<code class="t">(<i class="i">structure-name</i>-p <i class="i">object</i>)</code> is <i class="i">true</i> if an <i class="i">object</i> 
+is of this <i class="i">type</i>; otherwise it is <i class="i">false</i>.  <b class="b">typep</b> can also
+be used with the name of the new <i class="i">type</i> to test whether an 
+<i class="i">object</i>
+belongs to the <i class="i">type</i>. 
+Such a function call has the form 
+<code class="t">(typep <i class="i">object</i> '<i class="i">structure-name</i>)</code>.
+</p>
+</dd>
+<dt>Component reader functions</dt>
+<dd><p><i class="i">Reader</i> functions are defined to <i class="i">read</i> the components of the
+structure.  For each slot name, there is a corresponding
+<i class="i">reader</i> function with the name <code class="t"><i class="i">structure-name</i>-<i class="i">slot-name</i></code>.
+This function <i class="i">reads</i> the contents of that slot.  
+Each <i class="i">reader</i> function takes one argument, which is
+an instance of the structure type.  
+<b class="b">setf</b> can be used with any of these <i class="i">reader</i> functions
+to alter the slot contents.
+</p>
+</dd>
+<dt>Constructor function</dt>
+<dd><p>A constructor function with the name <code class="t">make-<i class="i">structure-name</i></code>
+is defined.  This function creates and returns new 
+instances of the structure type.
+</p>
+</dd>
+<dt>Copier function</dt>
+<dd><p>A copier function with the name <code class="t">copy-<i class="i">structure-name</i></code> is defined.
+The copier function takes an object of the structure type and creates a
+new object of the same  type that is a copy of the first.  The copier
+function creates a new structure with the same component entries
+as the original.  Corresponding components of the two structure instances
+are <b class="b">eql</b>.
+</p></dd>
+</dl>
+
+<p>If a <b class="b">defstruct</b> <i class="i">form</i> appears as a <i class="i">top level form</i>,
+the <i class="i">compiler</i> must make the <i class="i">structure</i> <i class="i">type</i> name recognized
+as a valid <i class="i">type</i> name in subsequent declarations (as for <b class="b">deftype</b>)
+and make the structure slot readers known to <b class="b">setf</b>.  In addition, the
+<i class="i">compiler</i> must save enough information about the <i class="i">structure</i> <i class="i">type</i>
+so that further <b class="b">defstruct</b> definitions can use <code class="t">:include</code> in a subsequent
+<b class="b">deftype</b> in the same <i class="i">file</i> to refer to the <i class="i">structure</i> <i class="i">type</i> name.
+The functions which <b class="b">defstruct</b> generates are not defined 
+in the compile time environment, although the <i class="i">compiler</i> may save enough
+information about the functions to code subsequent calls inline.
+The <code class="t">#S</code> <i class="i">reader macro</i> might or might not recognize the newly defined 
+<i class="i">structure</i> <i class="i">type</i> name at compile time.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-113"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-113"> &para;</a></span></h4>
+<p>An example of a structure definition follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct ship
+   x-position
+   y-position
+   x-velocity
+   y-velocity
+   mass)
+</pre></div>
+
+<p>This declares that every <code class="t">ship</code> is an <i class="i">object</i> 
+with five named components.
+The evaluation of this form does the following:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>It defines <code class="t">ship-x-position</code> to be a function
+of one argument, a ship, that returns the <code class="t">x-position</code>
+of the ship; <code class="t">ship-y-position</code>
+and the other components are given similar function definitions.
+These functions are called the <i class="i">access</i> functions, as they
+are used to <i class="i">access</i> elements of the structure.
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p><code class="t">ship</code> becomes the name of a <i class="i">type</i> of which instances
+of ships are elements.  <code class="t">ship</code> becomes acceptable to <b class="b">typep</b>,
+for example; <code class="t">(typep x 'ship)</code> is <i class="i">true</i> if <code class="t">x</code> is a ship
+and false if <code class="t">x</code> is any <i class="i">object</i> other than a ship.
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>A function named <code class="t">ship-p</code> of 
+one argument is defined; it is a predicate
+that is <i class="i">true</i> if its argument is a ship and is <i class="i">false</i> otherwise.
+</p>
+</dd>
+<dt>4.</dt>
+<dd><p>A function called <code class="t">make-ship</code> is defined that, when invoked,
+creates a data structure with five components, suitable for use with
+the <i class="i">access</i> functions.  Thus executing
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq ship2 (make-ship))
+</pre></div>
+
+<p>sets <code class="t">ship2</code> to a newly created <code class="t">ship</code> <i class="i">object</i>.
+One can supply the initial values of any desired component in the call
+to <code class="t">make-ship</code> by using keyword arguments in this way:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq ship2 (make-ship :mass *default-ship-mass*
+                        :x-position 0
+                        :y-position 0))
+</pre></div>
+
+<p>This constructs a new ship and initializes three of its components.
+This function is called the &ldquo;constructor function&rdquo;
+because it constructs a new structure.
+</p>
+</dd>
+<dt>5.</dt>
+<dd><p>A function called <code class="t">copy-ship</code> of one argument
+is defined that, when given a <code class="t">ship</code> <i class="i">object</i>,
+creates a new <code class="t">ship</code> <i class="i">object</i> that is a copy of the given one.
+This function is called the &ldquo;copier function.&rdquo;
+</p></dd>
+</dl>
+
+<p><b class="b">setf</b> can be used to alter the components of a <code class="t">ship</code>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setf (ship-x-position ship2) 100)
+</pre></div>
+
+<p>This alters the <code class="t">x-position</code> of <code class="t">ship2</code> to be <code class="t">100</code>.
+This works because <b class="b">defstruct</b> behaves as if
+it generates an appropriate <b class="b">defsetf</b>
+for each <i class="i">access</i> function.
+</p>
+<div class="example">
+<pre class="example-preformatted">;;;
+;;; Example 1
+;;; define town structure type
+;;; area, watertowers, firetrucks, population, elevation are its components
+;;;
+ (defstruct town
+             area
+             watertowers
+             (firetrucks 1 :type fixnum)    ;an initialized slot
+             population 
+             (elevation 5128 :read-only t)) ;a slot that can't be changed
+&rArr;  TOWN
+;create a town instance
+ (setq town1 (make-town :area 0 :watertowers 0)) &rArr;  #S(TOWN...)
+;town's predicate recognizes the new instance
+ (town-p town1) &rArr;  <i class="i">true</i>
+;new town's area is as specified by make-town
+ (town-area town1) &rArr;  0
+;new town's elevation has initial value
+ (town-elevation town1) &rArr;  5128
+;setf recognizes reader function
+ (setf (town-population town1) 99) &rArr;  99
+ (town-population town1) &rArr;  99
+;copier function makes a copy of town1
+ (setq town2 (copy-town town1)) &rArr;  #S(TOWN...)
+ (= (town-population town1) (town-population town2))  &rArr;  <i class="i">true</i>
+;since elevation is a read-only slot, its value can be set only
+;when the structure is created
+ (setq town3 (make-town :area 0 :watertowers 3 :elevation 1200))
+&rArr;  #S(TOWN...)
+;;;
+;;; Example 2
+;;; define clown structure type
+;;; this structure uses a nonstandard prefix
+;;;
+ (defstruct (clown (:conc-name bozo-))
+             (nose-color 'red)         
+             frizzy-hair-p polkadots) &rArr;  CLOWN
+ (setq funny-clown (make-clown)) &rArr;  #S(CLOWN)
+;use non-default reader name
+ (bozo-nose-color funny-clown) &rArr;  RED        
+ (defstruct (klown (:constructor make-up-klown) ;similar def using other
+             (:copier clone-klown)              ;customizing keywords
+             (:predicate is-a-bozo-p))
+             nose-color frizzy-hair-p polkadots) &rArr;  klown
+;custom constructor now exists
+ (fboundp 'make-up-klown) &rArr;  <i class="i">true</i>
+;;;
+;;; Example 3
+;;; define a vehicle structure type
+;;; then define a truck structure type that includes 
+;;; the vehicle structure
+;;;
+ (defstruct vehicle name year (diesel t :read-only t)) &rArr;  VEHICLE
+ (defstruct (truck (:include vehicle (year 79)))
+             load-limit                          
+             (axles 6)) &rArr;  TRUCK
+ (setq x (make-truck :name 'mac :diesel t :load-limit 17))
+&rArr;  #S(TRUCK...)
+;vehicle readers work on trucks
+ (vehicle-name x)
+&rArr;  MAC
+;default taken from :include clause 
+ (vehicle-year x)
+&rArr;  79 
+ (defstruct (pickup (:include truck))     ;pickup type includes truck
+             camper long-bed four-wheel-drive) &rArr;  PICKUP
+ (setq x (make-pickup :name 'king :long-bed t)) &rArr;  #S(PICKUP...)
+;:include default inherited
+ (pickup-year x) &rArr;  79
+;;;
+;;; Example 4
+;;; use of BOA constructors
+;;;
+ (defstruct (dfs-boa                      ;BOA constructors
+               (:constructor make-dfs-boa (a b c)) 
+               (:constructor create-dfs-boa
+                 (a &amp;optional b (c 'cc) &amp;rest d &amp;aux e (f 'ff))))
+             a b c d e f) &rArr;  DFS-BOA
+;a, b, and c set by position, and the rest are uninitialized
+ (setq x (make-dfs-boa 1 2 3)) &rArr;  #(DFS-BOA...)
+ (dfs-boa-a x) &rArr;  1
+;a and b set, c and f defaulted
+ (setq x (create-dfs-boa 1 2)) &rArr;  #(DFS-BOA...)
+ (dfs-boa-b x) &rArr;  2
+ (eq (dfs-boa-c x) 'cc) &rArr;  <i class="i">true</i>
+;a, b, and c set, and the rest are collected into d
+ (setq x (create-dfs-boa 1 2 3 4 5 6)) &rArr;  #(DFS-BOA...)
+ (dfs-boa-d x) &rArr;  (4 5 6)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-45"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-45"> &para;</a></span></h4>
+
+<p>If any two slot names (whether present directly or inherited by the <code class="t">:include</code> option)
+are the <i class="i">same</i> under <b class="b">string=</b>,
+<b class="b">defstruct</b> should signal an error of <i class="i">type</i> <b class="b">program-error</b>.
+</p>
+<p>The consequences are undefined if the <i class="i">included-structure-name</i> 
+does not name a <i class="i">structure type</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-151"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-151"> &para;</a></span></h4>
+
+<p><a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="print_002dobject.html">print-object                                    [Standard Generic Function]</a>
+,
+<a class="ref" href="setf.html">setf, psetf                                                         [Macro]</a>
+,
+<a class="ref" href="subtypep.html">subtypep                                                         [Function]</a>
+,
+<a class="ref" href="type_002dof.html">type-of                                                          [Function]</a>
+,
+<a class="ref" href="typep.html">typep                                                            [Function]</a>
+,
+<a class="ref" href="Compilation.html">Compilation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-92"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-92"> &para;</a></span></h4>
+
+<p>The <i class="i">printer-name</i> should observe the values of
+such printer-control variables as <b class="b">*print-escape*</b>.
+</p>
+<p>The restriction against issuing a warning for type mismatches between
+a <i class="i">slot-initform</i> and the corresponding slot&rsquo;s <code class="t">:type</code> option is
+necessary because a <i class="i">slot-initform</i> must be specified in order to
+specify slot options; in some cases, no suitable default may exist.
+</p>
+<p>The mechanism by which <b class="b">defstruct</b> arranges for slot accessors to
+be usable with <b class="b">setf</b> is <i class="i">implementation-dependent</i>; 
+for example, it may use <i class="i">setf functions</i>, <i class="i">setf expanders</i>, or
+some other <i class="i">implementation-dependent</i> mechanism known to that
+<i class="i">implementation</i>&rsquo;s <i class="i">code</i> for <b class="b">setf</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="copy_002dstructure.html">copy-structure                                                   [Function]</a>, Previous: <a href="Structures-Dictionary.html">Structures Dictionary</a>, Up: <a href="Structures-Dictionary.html">Structures Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/deftype.html
@@ -0,0 +1,144 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>deftype (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="deftype (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="deftype (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="subtypep.html" rel="next" title="subtypep">
+<link href="coerce.html" rel="prev" title="coerce">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="deftype">
+<div class="nav-panel">
+<p>
+Next: <a href="subtypep.html" accesskey="n" rel="next">subtypep                                                         [Function]</a>, Previous: <a href="coerce.html" accesskey="p" rel="prev">coerce                                                           [Function]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="deftype-_005bMacro_005d"><span>4.4.25 deftype                                                             [Macro]<a class="copiable-link" href="#deftype-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">deftype</code>  <i class="i">name lambda-list <span class="r">[[{<i class="i">declaration</i>}* | <i class="i">documentation</i>]]</span> {<i class="i">form</i>}*</i> &rArr;  <i class="i">name</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-20"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-20"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">lambda-list</i>&mdash;a <i class="i">deftype lambda list</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">documentation</i>&mdash;a <i class="i">string</i>; not evaluated.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-47"><span>Description::<a class="copiable-link" href="#Description_003a_003a-47"> &para;</a></span></h4>
+
+<p><b class="b">deftype</b> defines a <i class="i">derived type specifier</i> named <i class="i">name</i>.
+</p>
+<p>The meaning of the new <i class="i">type specifier</i> is given in terms of
+a function which expands the <i class="i">type specifier</i> into another
+<i class="i">type specifier</i>, which itself will be expanded if it contains
+references to another <i class="i">derived type specifier</i>.
+</p>
+<p>The newly defined <i class="i">type specifier</i> may be referenced as a list of
+the form <code class="t">(<i class="i">name</i> <i class="i">arg_1</i> <i class="i">arg_2</i> ...)\/</code>.
+The number of arguments must be appropriate to the <i class="i">lambda-list</i>.
+If the new <i class="i">type specifier</i> takes no arguments, 
+or if all of its arguments are optional, 
+the <i class="i">type specifier</i> may be used as an <i class="i">atomic type specifier</i>.
+</p>
+<p>The <i class="i">argument</i> <i class="i">expressions</i> to the <i class="i">type specifier</i>,
+<i class="i">arg_1</i> ... <i class="i">arg_n</i>, are not <i class="i">evaluated</i>.
+Instead, these <i class="i">literal objects</i> become the <i class="i">objects</i> to which
+corresponding <i class="i">parameters</i> become <i class="i">bound</i>.
+</p>
+<p>The body of the <b class="b">deftype</b> <i class="i">form</i> 
+</p>
+<p>(but not the <i class="i">lambda-list</i>)
+</p>
+<p>is
+</p>
+<p>implicitly enclosed in a <i class="i">block</i> named <i class="i">name</i>,
+</p>
+<p>and is evaluated as an <i class="i">implicit progn</i>, 
+returning a new <i class="i">type specifier</i>.
+</p>
+<p>The <i class="i">lexical environment</i> of the body is the one which was current
+at the time the <b class="b">deftype</b> form was evaluated, augmented by the 
+<i class="i">variables</i> in the <i class="i">lambda-list</i>.
+</p>
+<p>Recursive expansion of the <i class="i">type specifier</i> returned as the expansion
+must terminate, including the expansion of <i class="i">type specifiers</i> which
+are nested within the expansion.
+</p>
+<p>The consequences are undefined if the result of fully expanding a
+<i class="i">type specifier</i> contains any circular structure, except within
+the <i class="i">objects</i> referred to by <b class="b">member</b> and <b class="b">eql</b>
+<i class="i">type specifiers</i>.
+</p>
+<p><i class="i">Documentation</i> is attached to <i class="i">name</i> as a <i class="i">documentation string</i>
+of kind <b class="b">type</b>.
+</p>
+<p>If a <b class="b">deftype</b> <i class="i">form</i> appears as a <i class="i">top level form</i>,
+the <i class="i">compiler</i> must ensure that the <i class="i">name</i> is recognized
+in subsequent <i class="i">type</i> declarations.  
+The <i class="i">programmer</i> must ensure that the body of a <b class="b">deftype</b> form 
+can be <i class="i">evaluated</i> at compile time if the <i class="i">name</i> is
+referenced in subsequent <i class="i">type</i> declarations.  
+If the expansion of a <i class="i">type specifier</i> is not defined fully at compile time
+(perhaps because it expands into an unknown <i class="i">type specifier</i> or a
+<b class="b">satisfies</b> of a named <i class="i">function</i> that isn&rsquo;t defined in the
+compile-time environment), an <i class="i">implementation</i> may ignore any references to
+this <i class="i">type</i> in declarations and/or signal a warning.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-27"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-27"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (defun equidimensional (a)
+   (or (&lt; (array-rank a) 2)
+       (apply #'= (array-dimensions a)))) &rArr;  EQUIDIMENSIONAL
+ (deftype square-matrix (&amp;optional type size)
+   `(and (array ,type (,size ,size))
+         (satisfies equidimensional))) &rArr;  SQUARE-MATRIX
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-34"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-34"> &para;</a></span></h4>
+
+<p><b class="b">declare</b>,
+<a class="ref" href="defmacro.html">defmacro                                                            [Macro]</a>
+,
+<a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="Type-Specifiers.html">Type Specifiers</a>,
+<a class="ref" href="Syntactic-Interaction-of-Documentation-Strings-and-Declarations.html">Syntactic Interaction of Documentation Strings and Declarations</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="subtypep.html">subtypep                                                         [Function]</a>, Previous: <a href="coerce.html">coerce                                                           [Function]</a>, Up: <a href="Types-and-Classes-Dictionary.html">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/defun.html
@@ -0,0 +1,167 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>defun (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="defun (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="defun (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="fdefinition.html" rel="next" title="fdefinition">
+<link href="apply.html" rel="prev" title="apply">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="defun">
+<div class="nav-panel">
+<p>
+Next: <a href="fdefinition.html" accesskey="n" rel="next">fdefinition                                                      [Accessor]</a>, Previous: <a href="apply.html" accesskey="p" rel="prev">apply                                                            [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="defun-_005bMacro_005d"><span>5.3.2 defun                                                               [Macro]<a class="copiable-link" href="#defun-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">defun</code>  <i class="i">function-name lambda-list <span class="r">[[{<i class="i">declaration</i>}* | <i class="i">documentation</i>]]</span> {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">function-name</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-26"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-26"> &para;</a></span></h4>
+
+<p><i class="i">function-name</i>&mdash;a <i class="i">function name</i>.
+</p>
+<p><i class="i">lambda-list</i>&mdash;an <i class="i">ordinary lambda list</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">documentation</i>&mdash;a <i class="i">string</i>; not evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">block-name</i>&mdash;the <i class="i">function block name</i> of the <i class="i">function-name</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-55"><span>Description::<a class="copiable-link" href="#Description_003a_003a-55"> &para;</a></span></h4>
+
+<p>Defines a new <i class="i">function</i> named <i class="i">function-name</i> in the <i class="i">global environment</i>.
+The body of the <i class="i">function</i> defined by <b class="b">defun</b> consists 
+of <i class="i">forms</i>; they are executed as an <i class="i">implicit progn</i>
+when the <i class="i">function</i> is called. 
+<b class="b">defun</b> can be used
+     to define a new <i class="i">function</i>,
+     to install a corrected version of an incorrect definition,
+     to redefine an already-defined <i class="i">function</i>,
+  or to redefine a <i class="i">macro</i> as a <i class="i">function</i>.
+</p>
+<p><b class="b">defun</b> implicitly puts a <b class="b">block</b> named <i class="i">block-name</i>
+around the body <i class="i">forms</i> 
+</p>
+<p>(but not the <i class="i">forms</i> in the <i class="i">lambda-list</i>)
+</p>
+<p>of the <i class="i">function</i> defined.
+</p>
+<p><i class="i">Documentation</i> is attached as a <i class="i">documentation string</i> 
+    to <i class="i">name</i> (as kind <b class="b">function</b>)
+and to the <i class="i">function</i> <i class="i">object</i>.
+</p>
+<p>Evaluating <b class="b">defun</b> causes <i class="i">function-name</i> to be a global name
+for the <i class="i">function</i> specified by the <i class="i">lambda expression</i>
+</p>
+<div class="example">
+<pre class="example-preformatted"> (lambda <i class="i">lambda-list</i>
+   <span class="r">[[{<i class="i">declaration</i>}* | <i class="i">documentation</i>]]</span>
+   (block <i class="i">block-name</i> {<i class="i">form</i>}*))
+</pre></div>
+
+<p>processed in the <i class="i">lexical environment</i> in which <b class="b">defun</b> was executed.
+</p>
+<p>(None of the arguments are evaluated at macro expansion time.)
+</p>
+<p><b class="b">defun</b> is not required to perform any compile-time side effects.
+In particular, <b class="b">defun</b> does not make the <i class="i">function</i> definition available
+at compile time.  An <i class="i">implementation</i> may choose to store information
+about the <i class="i">function</i> for the purposes of compile-time error-checking
+(such as checking the number of arguments on calls),
+or to enable the <i class="i">function</i> to be expanded inline.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-33"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-33"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun recur (x)
+  (when (&gt; x 0)
+    (recur (1- x)))) &rArr;  RECUR 
+ (defun ex (a b &amp;optional c (d 66) &amp;rest keys &amp;key test (start 0))
+    (list a b c d keys test start)) &rArr;  EX 
+ (ex 1 2) &rArr;  (1 2 NIL 66 NIL NIL 0)
+ (ex 1 2 3 4 :test 'equal :start 50) 
+&rArr;  (1 2 3 4 (:TEST EQUAL :START 50) EQUAL 50)
+ (ex :test 1 :start 2) &rArr;  (:TEST 1 :START 2 NIL NIL 0)
+
+ ;; This function assumes its callers have checked the types of the
+ ;; arguments, and authorizes the compiler to build in that assumption.
+ (defun discriminant (a b c)
+   (declare (number a b c))
+   &quot;Compute the discriminant for a quadratic equation.&quot;
+   (- (* b b) (* 4 a c))) &rArr;  DISCRIMINANT
+ (discriminant 1 2/3 -2) &rArr;  76/9
+
+ ;; This function assumes its callers have not checked the types of the
+ ;; arguments, and performs explicit type checks before making any assumptions. 
+ (defun careful-discriminant (a b c)
+   &quot;Compute the discriminant for a quadratic equation.&quot;
+   (check-type a number)
+   (check-type b number)
+   (check-type c number)
+   (locally (declare (number a b c))
+     (- (* b b) (* 4 a c)))) &rArr;  CAREFUL-DISCRIMINANT
+ (careful-discriminant 1 2/3 -2) &rArr;  76/9
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-42"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-42"> &para;</a></span></h4>
+
+<p><a class="ref" href="flet.html">flet, labels, macrolet                                   [Special Operator]</a>
+,
+<b class="b">labels</b>, 
+<a class="ref" href="block.html">block                                                    [Special Operator]</a>
+,
+<a class="ref" href="return_002dfrom.html">return-from                                              [Special Operator]</a>
+,
+<b class="b">declare</b>, 
+<a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="Evaluation.html">Evaluation</a>,
+<a class="ref" href="Ordinary-Lambda-Lists.html">Ordinary Lambda Lists</a>,
+<a class="ref" href="Syntactic-Interaction-of-Documentation-Strings-and-Declarations.html">Syntactic Interaction of Documentation Strings and Declarations</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-24"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-24"> &para;</a></span></h4>
+<p><b class="b">return-from</b> can be used to return
+prematurely from a <i class="i">function</i> defined by <b class="b">defun</b>.
+</p>
+<p>Additional side effects might take place when additional information
+(typically debugging information)
+about the function definition is recorded. 
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="fdefinition.html">fdefinition                                                      [Accessor]</a>, Previous: <a href="apply.html">apply                                                            [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/delete_002dfile.html
@@ -0,0 +1,105 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>delete-file (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="delete-file (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="delete-file (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Files-Dictionary.html" rel="up" title="Files Dictionary">
+<link href="file_002derror.html" rel="next" title="file-error">
+<link href="rename_002dfile.html" rel="prev" title="rename-file">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="delete_002dfile">
+<div class="nav-panel">
+<p>
+Next: <a href="file_002derror.html" accesskey="n" rel="next">file-error                                                 [Condition Type]</a>, Previous: <a href="rename_002dfile.html" accesskey="p" rel="prev">rename-file                                                      [Function]</a>, Up: <a href="Files-Dictionary.html" accesskey="u" rel="up">Files Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="delete_002dfile-_005bFunction_005d"><span>20.2.8 delete-file                                                      [Function]<a class="copiable-link" href="#delete_002dfile-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">delete-file</code>  <i class="i">filespec</i> &rArr;  <i class="i"><b class="b">t</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-410"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-410"> &para;</a></span></h4>
+
+<p><i class="i">filespec</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-529"><span>Description::<a class="copiable-link" href="#Description_003a_003a-529"> &para;</a></span></h4>
+
+<p>Deletes the <i class="i">file</i> specified by <i class="i">filespec</i>.
+</p>
+<p>If the <i class="i">filespec</i> <i class="i">designator</i> is an open <i class="i">stream</i>,
+then <i class="i">filespec</i> and the file associated with it are affected 
+(if the file system permits),
+in which case <i class="i">filespec</i> might be closed immediately,
+and the deletion might be immediate or delayed until <i class="i">filespec</i> is explicitly closed,
+depending on the requirements of the file system.
+</p>
+<p>It is <i class="i">implementation-dependent</i> whether an attempt
+to delete a nonexistent file is considered to be successful.
+</p>
+<p><b class="b">delete-file</b> returns <i class="i">true</i> if it succeeds,
+or signals an error of <i class="i">type</i> <b class="b">file-error</b> if it does not.
+</p>
+<p>The consequences are undefined 
+    if <i class="i">filespec</i> has a <i class="i">wild</i> component,
+ or if <i class="i">filespec</i> has a <b class="b">nil</b> component 
+     and the file system does not permit a <b class="b">nil</b> component.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-386"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-386"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (with-open-file (s &quot;delete-me.text&quot; :direction :output :if-exists :error))
+&rArr;  NIL
+ (setq p (probe-file &quot;delete-me.text&quot;)) &rArr;  #P&quot;R:&gt;fred&gt;delete-me.text.1&quot;
+ (delete-file p) &rArr;  T
+ (probe-file &quot;delete-me.text&quot;) &rArr;  <i class="i">false</i>
+ (with-open-file (s &quot;delete-me.text&quot; :direction :output :if-exists :error)
+   (delete-file s))
+&rArr;  T
+ (probe-file &quot;delete-me.text&quot;) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-190"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-190"> &para;</a></span></h4>
+
+<p>If the deletion operation is not successful, an error of <i class="i">type</i> <b class="b">file-error</b> is signaled.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> might be signaled if <i class="i">filespec</i> is <i class="i">wild</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-432"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-432"> &para;</a></span></h4>
+
+<p><b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="file_002derror.html">file-error                                                 [Condition Type]</a>, Previous: <a href="rename_002dfile.html">rename-file                                                      [Function]</a>, Up: <a href="Files-Dictionary.html">Files Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/delete_002dpackage.html
@@ -0,0 +1,189 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>delete-package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="delete-package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="delete-package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="make_002dpackage.html" rel="next" title="make-package">
+<link href="shadowing_002dimport.html" rel="prev" title="shadowing-import">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="delete_002dpackage">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dpackage.html" accesskey="n" rel="next">make-package                                                     [Function]</a>, Previous: <a href="shadowing_002dimport.html" accesskey="p" rel="prev">shadowing-import                                                 [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="delete_002dpackage-_005bFunction_005d"><span>11.2.11 delete-package                                                   [Function]<a class="copiable-link" href="#delete_002dpackage-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">delete-package</code>  <i class="i">package</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-183"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-183"> &para;</a></span></h4>
+
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-247"><span>Description::<a class="copiable-link" href="#Description_003a_003a-247"> &para;</a></span></h4>
+
+<p><b class="b">delete-package</b> deletes <i class="i">package</i> from all package system
+data structures. 
+If the operation is successful, <b class="b">delete-package</b> returns
+true, otherwise <b class="b">nil</b>.
+The effect of <b class="b">delete-package</b> is that the name and nicknames
+of <i class="i">package</i> cease to be recognized package names.
+The package <i class="i">object</i> is still a <i class="i">package</i> 
+(<i class="i">i.e.</i>, <b class="b">packagep</b> is <i class="i">true</i> of it)
+but <b class="b">package-name</b> returns <b class="b">nil</b>.
+The consequences of deleting the <code class="t">COMMON-LISP</code> <i class="i">package</i> or the <code class="t">KEYWORD</code> <i class="i">package</i> are undefined.
+The consequences of invoking any other package operation on <i class="i">package</i>
+once it has been deleted are unspecified.
+In particular, the consequences of invoking <b class="b">find-symbol</b>,
+<b class="b">intern</b> and other functions that look for a symbol name in
+a <i class="i">package</i> are unspecified if they are called with <b class="b">*package*</b>
+bound to the deleted <i class="i">package</i> or with the deleted <i class="i">package</i> 
+as an argument.
+</p>
+<p>If <i class="i">package</i> is a <i class="i">package</i> <i class="i">object</i> that has already
+been deleted, <b class="b">delete-package</b> immediately returns <b class="b">nil</b>.
+</p>
+<p>After this operation completes, the 
+<i class="i">home package</i>
+of any <i class="i">symbol</i> whose <i class="i">home package</i> 
+had previously been
+<i class="i">package</i> 
+is
+<i class="i">implementation-dependent</i>.
+Except for this, <i class="i">symbols</i> <i class="i">accessible</i>
+in <i class="i">package</i> are not modified in any other way;
+<i class="i">symbols</i> whose <i class="i">home package</i> is not <i class="i">package</i> remain unchanged.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-166"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-166"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq *foo-package* (make-package &quot;FOO&quot; :use nil))
+ (setq *foo-symbol*  (intern &quot;FOO&quot; *foo-package*))
+ (export *foo-symbol* *foo-package*)
+
+ (setq *bar-package* (make-package &quot;BAR&quot; :use '(&quot;FOO&quot;)))
+ (setq *bar-symbol*  (intern &quot;BAR&quot; *bar-package*))
+ (export *foo-symbol* *bar-package*)
+ (export *bar-symbol* *bar-package*)
+
+ (setq *baz-package* (make-package &quot;BAZ&quot; :use '(&quot;BAR&quot;)))
+
+ (symbol-package *foo-symbol*) &rArr;  #&lt;PACKAGE &quot;FOO&quot;&gt;
+ (symbol-package *bar-symbol*) &rArr;  #&lt;PACKAGE &quot;BAR&quot;&gt;
+
+ (prin1-to-string *foo-symbol*) &rArr;  &quot;FOO:FOO&quot;
+ (prin1-to-string *bar-symbol*) &rArr;  &quot;BAR:BAR&quot;
+
+ (find-symbol &quot;FOO&quot; *bar-package*) &rArr;  FOO:FOO, :EXTERNAL
+
+ (find-symbol &quot;FOO&quot; *baz-package*) &rArr;  FOO:FOO, :INHERITED
+ (find-symbol &quot;BAR&quot; *baz-package*) &rArr;  BAR:BAR, :INHERITED
+
+ (packagep *foo-package*) &rArr;  <i class="i">true</i>
+ (packagep *bar-package*) &rArr;  <i class="i">true</i>
+ (packagep *baz-package*) &rArr;  <i class="i">true</i>
+
+ (package-name *foo-package*) &rArr;  &quot;FOO&quot;
+ (package-name *bar-package*) &rArr;  &quot;BAR&quot;
+ (package-name *baz-package*) &rArr;  &quot;BAZ&quot;
+
+ (package-use-list *foo-package*) &rArr;  ()
+ (package-use-list *bar-package*) &rArr;  (#&lt;PACKAGE &quot;FOO&quot;&gt;)
+ (package-use-list *baz-package*) &rArr;  (#&lt;PACKAGE &quot;BAR&quot;&gt;)
+
+ (package-used-by-list *foo-package*) &rArr;  (#&lt;PACKAGE &quot;BAR&quot;&gt;)
+ (package-used-by-list *bar-package*) &rArr;  (#&lt;PACKAGE &quot;BAZ&quot;&gt;)
+ (package-used-by-list *baz-package*) &rArr;  ()
+
+ (delete-package *bar-package*)
+<code class="t"> |&gt; </code> Error: Package BAZ uses package BAR.
+<code class="t"> |&gt; </code> If continued, BAZ will be made to unuse-package BAR,
+<code class="t"> |&gt; </code> and then BAR will be deleted.
+<code class="t"> |&gt; </code> Type :CONTINUE to continue.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:CONTINUE</code><b class="b">&lt;&lt;|</b>
+&rArr;  T
+
+ (symbol-package *foo-symbol*) &rArr;  #&lt;PACKAGE &quot;FOO&quot;&gt;
+ (symbol-package *bar-symbol*) is unspecified
+
+ (prin1-to-string *foo-symbol*) &rArr;  &quot;FOO:FOO&quot;
+ (prin1-to-string *bar-symbol*) is unspecified
+
+ (find-symbol &quot;FOO&quot; *bar-package*) is unspecified
+
+ (find-symbol &quot;FOO&quot; *baz-package*) &rArr;  NIL, NIL
+ (find-symbol &quot;BAR&quot; *baz-package*) &rArr;  NIL, NIL
+
+ (packagep *foo-package*) &rArr;  T
+ (packagep *bar-package*) &rArr;  T
+ (packagep *baz-package*) &rArr;  T
+
+ (package-name *foo-package*) &rArr;  &quot;FOO&quot;
+ (package-name *bar-package*) &rArr;  NIL
+ (package-name *baz-package*) &rArr;  &quot;BAZ&quot;
+
+ (package-use-list *foo-package*) &rArr;  ()
+ (package-use-list *bar-package*) is unspecified
+ (package-use-list *baz-package*) &rArr;  ()
+
+ (package-used-by-list *foo-package*) &rArr;  ()
+ (package-used-by-list *bar-package*) is unspecified
+ (package-used-by-list *baz-package*) &rArr;  ()
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-65"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-65"> &para;</a></span></h4>
+
+<p>If the <i class="i">package</i> <i class="i">designator</i> is a <i class="i">name</i> that does not 
+currently name a <i class="i">package</i>, 
+a <i class="i">correctable</i> error of <i class="i">type</i> <b class="b">package-error</b> is signaled.
+If correction is attempted, no deletion action is attempted; 
+instead, <b class="b">delete-package</b> immediately returns <b class="b">nil</b>.
+</p>
+<p>If <i class="i">package</i> is used by other <i class="i">packages</i>, 
+a <i class="i">correctable</i> error of <i class="i">type</i> <b class="b">package-error</b> is signaled.
+If correction is attempted,
+<b class="b">unuse-package</b> is effectively called to remove any dependencies, 
+causing <i class="i">package</i>&rsquo;s <i class="i">external symbols</i> to cease being <i class="i">accessible</i> to those 
+<i class="i">packages</i> that use <i class="i">package</i>. 
+<b class="b">delete-package</b> then deletes <i class="i">package</i> just as it would have had 
+there been no <i class="i">packages</i> that used it.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-219"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-219"> &para;</a></span></h4>
+
+<p><a class="ref" href="unuse_002dpackage.html">unuse-package                                                    [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dpackage.html">make-package                                                     [Function]</a>, Previous: <a href="shadowing_002dimport.html">shadowing-import                                                 [Function]</a>, Up: <a href="Packages-Dictionary.html">Packages Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/deposit_002dfield.html
@@ -0,0 +1,89 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>deposit-field (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="deposit-field (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="deposit-field (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="dpb.html" rel="next" title="dpb">
+<link href="byte.html" rel="prev" title="byte">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="deposit_002dfield">
+<div class="nav-panel">
+<p>
+Next: <a href="dpb.html" accesskey="n" rel="next">dpb                                                              [Function]</a>, Previous: <a href="byte.html" accesskey="p" rel="prev">byte, byte-size, byte-position                                   [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="deposit_002dfield-_005bFunction_005d"><span>12.2.67 deposit-field                                                    [Function]<a class="copiable-link" href="#deposit_002dfield-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">deposit-field</code>  <i class="i">newbyte bytespec integer</i> &rArr;  <i class="i">result-integer</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-249"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-249"> &para;</a></span></h4>
+
+<p><i class="i">newbyte</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">bytespec</i>&mdash;a <i class="i">byte specifier</i>.
+</p>
+<p><i class="i">integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">result-integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-332"><span>Description::<a class="copiable-link" href="#Description_003a_003a-332"> &para;</a></span></h4>
+
+<p>Replaces a field of bits within <i class="i">integer</i>; specifically,
+returns an <i class="i">integer</i> that contains the bits of <i class="i">newbyte</i>
+within the <i class="i">byte</i> specified by <i class="i">bytespec</i>,
+and elsewhere contains the bits of <i class="i">integer</i>.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-234"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-234"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (deposit-field 7 (byte 2 1) 0) &rArr;  6
+ (deposit-field -1 (byte 4 0) 0) &rArr;  15
+ (deposit-field 0 (byte 2 1) -3) &rArr;  -7
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-274"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-274"> &para;</a></span></h4>
+
+<p><a class="ref" href="byte.html">byte, byte-size, byte-position                                   [Function]</a>
+,
+<a class="ref" href="dpb.html">dpb                                                              [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-177"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-177"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (logbitp <i class="i">j</i> (deposit-field <i class="i">m</i> (byte <i class="i">s</i> <i class="i">p</i>) <i class="i">n</i>))
+ &equiv; (if (and (&gt;= <i class="i">j</i> <i class="i">p</i>) (&lt; <i class="i">j</i> (+ <i class="i">p</i> <i class="i">s</i>)))
+        (logbitp <i class="i">j</i> <i class="i">m</i>)
+        (logbitp <i class="i">j</i> <i class="i">n</i>))
+</pre></div>
+
+<p><b class="b">deposit-field</b> is to <b class="b">mask-field</b> 
+as <b class="b">dpb</b>           is to <b class="b">ldb</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/describe.html
@@ -0,0 +1,102 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>describe (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="describe (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="describe (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="describe_002dobject.html" rel="next" title="describe-object">
+<link href="apropos.html" rel="prev" title="apropos">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="describe">
+<div class="nav-panel">
+<p>
+Next: <a href="describe_002dobject.html" accesskey="n" rel="next">describe-object                                 [Standard Generic Function]</a>, Previous: <a href="apropos.html" accesskey="p" rel="prev">apropos, apropos-list                                            [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="describe-_005bFunction_005d"><span>25.2.6 describe                                                         [Function]<a class="copiable-link" href="#describe-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">describe</code>  <i class="i">object <span class="r">&amp;optional</span> stream</i> &rArr;  <i class="i">&lt;<i class="i">no <i class="i">values</i></i>&gt;</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-492"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-492"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">stream</i>&mdash;an <i class="i">output</i> <i class="i">stream designator</i>.
+ The default is <i class="i">standard output</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-654"><span>Description::<a class="copiable-link" href="#Description_003a_003a-654"> &para;</a></span></h4>
+
+<p><b class="b">describe</b> displays information about <i class="i">object</i>
+</p>
+<p>to <i class="i">stream</i>.
+</p>
+<p>For example, <b class="b">describe</b> of a <i class="i">symbol</i> might show the
+<i class="i">symbol</i>&rsquo;s value, its definition, and each of its properties. 
+<b class="b">describe</b> of a <i class="i">float</i> might show the number&rsquo;s
+internal representation in a way that is useful for tracking
+down round-off errors.  In all cases, however, the nature and format of the
+output of <b class="b">describe</b> is <i class="i">implementation-dependent</i>.
+</p>
+<p><b class="b">describe</b> can describe something that it finds inside the <i class="i">object</i>;
+in such cases, a notational device such as increased indentation or positioning in a
+table is typically used in order to visually distinguish such recursive descriptions 
+from descriptions of the argument <i class="i">object</i>.
+</p>
+<p>The actual act of describing the object is implemented by <b class="b">describe-object</b>.
+<b class="b">describe</b> exists as an interface primarily to manage argument defaulting (including
+conversion of arguments <b class="b">t</b> and <b class="b">nil</b> into <i class="i">stream</i> <i class="i">objects</i>) and to inhibit
+any return values from <b class="b">describe-object</b>.
+</p>
+<p><b class="b">describe</b> is not intended to be an interactive function.  In a 
+<i class="i">conforming implementation</i>, <b class="b">describe</b> must not, by default, 
+prompt for user input.  User-defined methods for <b class="b">describe-object</b>
+are likewise restricted.  
+</p>
+<h4 class="subsubheading" id="Side-Effects_003a_003a-83"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-83"> &para;</a></span></h4>
+
+<p>Output to <i class="i">standard output</i> or <i class="i">terminal I/O</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-123"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-123"> &para;</a></span></h4>
+
+<p><b class="b">*standard-output*</b> and <b class="b">*terminal-io*</b>,
+methods on <b class="b">describe-object</b> and <b class="b">print-object</b>
+for <i class="i">objects</i> having user-defined <i class="i">classes</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-532"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-532"> &para;</a></span></h4>
+
+<p><a class="ref" href="inspect.html">inspect                                                          [Function]</a>
+, 
+<a class="ref" href="describe_002dobject.html">describe-object                                 [Standard Generic Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="describe_002dobject.html">describe-object                                 [Standard Generic Function]</a>, Previous: <a href="apropos.html">apropos, apropos-list                                            [Function]</a>, Up: <a href="Environment-Dictionary.html">Environment Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/describe_002dobject.html
@@ -0,0 +1,130 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>describe-object (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="describe-object (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="describe-object (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="trace.html" rel="next" title="trace">
+<link href="describe.html" rel="prev" title="describe">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="describe_002dobject">
+<div class="nav-panel">
+<p>
+Next: <a href="trace.html" accesskey="n" rel="next">trace, untrace                                                      [Macro]</a>, Previous: <a href="describe.html" accesskey="p" rel="prev">describe                                                         [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="describe_002dobject-_005bStandard-Generic-Function_005d"><span>25.2.7 describe-object                                 [Standard Generic Function]<a class="copiable-link" href="#describe_002dobject-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-41"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-41"> &para;</a></span></h4>
+
+<p><code class="code">describe-object</code>  <i class="i">object stream</i> &rArr;  <i class="i"><i class="i">implementation-dependent</i></i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-23"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-23"> &para;</a></span></h4>
+
+<p><code class="code">describe-object</code>  <i class="i">(<i class="i">object</i> standard-object) <i class="i">stream</i></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-493"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-493"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">stream</i>&mdash;a <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-655"><span>Description::<a class="copiable-link" href="#Description_003a_003a-655"> &para;</a></span></h4>
+
+<p>The generic function <b class="b">describe-object</b> prints a description of
+<i class="i">object</i> to a <i class="i">stream</i>.  <b class="b">describe-object</b> is called 
+by <b class="b">describe</b>; it must not be called by the user.
+</p>
+<p>Each implementation is required to provide a <i class="i">method</i> on 
+the <i class="i">class</i> <b class="b">standard-object</b> and <i class="i">methods</i> on enough other
+<i class="i">classes</i> so as to ensure that there is always an applicable <i class="i">method</i>.  
+Implementations are free to add <i class="i">methods</i> for other <i class="i">classes</i>.
+Users can write <i class="i">methods</i> for <b class="b">describe-object</b> for their
+own <i class="i">classes</i> if they do not wish to inherit an implementation-supplied
+<i class="i">method</i>.
+</p>
+<p><i class="i">Methods</i> on <b class="b">describe-object</b> can recursively call
+<b class="b">describe</b>.  Indentation, depth limits, and circularity detection
+are all taken care of automatically, provided that each <i class="i">method</i> 
+handles exactly one level of structure and calls <b class="b">describe</b> 
+recursively if there are more structural levels.  The consequences are 
+undefined if this rule is not obeyed.
+</p>
+<p>In some implementations the <i class="i">stream</i> argument passed to a
+<b class="b">describe-object</b> method is not the original <i class="i">stream</i>, but is
+an intermediate <i class="i">stream</i> that implements parts of <b class="b">describe</b>.
+<i class="i">Methods</i> should therefore not depend on the identity of this
+<i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-465"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-465"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defclass spaceship ()
+   ((captain :initarg :captain :accessor spaceship-captain)
+    (serial# :initarg :serial-number :accessor spaceship-serial-number)))
+
+ (defclass federation-starship (spaceship) ())
+
+ (defmethod describe-object ((s spaceship) stream)
+   (with-slots (captain serial#) s
+     (format stream &quot;~&amp;~S is a spaceship of type ~S,~
+                     ~
+                       and with serial number ~D.~
+             s (type-of s) captain serial#)))
+
+ (make-instance 'federation-starship
+                :captain &quot;Rachel Garrett&quot;
+                :serial-number &quot;NCC-1701-C&quot;)
+&rArr;  #&lt;FEDERATION-STARSHIP 26312465&gt;
+
+ (describe *)
+<code class="t"> |&gt; </code> #&lt;FEDERATION-STARSHIP 26312465&gt; is a spaceship of type FEDERATION-STARSHIP,
+<code class="t"> |&gt; </code> with Rachel Garrett at the helm and with serial number NCC-1701-C.
+&rArr;  &lt;<i class="i">no <i class="i">values</i></i>&gt;
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-533"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-533"> &para;</a></span></h4>
+
+<p><a class="ref" href="describe.html">describe                                                         [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-326"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-326"> &para;</a></span></h4>
+
+<p>The same implementation techniques that are applicable to <b class="b">print-object</b> are
+applicable to <b class="b">describe-object</b>.
+</p>
+<p>The reason for making the return values for <b class="b">describe-object</b>
+unspecified is to  avoid forcing users to include explicit <code class="t">(values)</code>
+in all of their <i class="i">methods</i>.  <b class="b">describe</b> takes care of that.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="trace.html">trace, untrace                                                      [Macro]</a>, Previous: <a href="describe.html">describe                                                         [Function]</a>, Up: <a href="Environment-Dictionary.html">Environment Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/destructuring_002dbind.html
@@ -0,0 +1,86 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>destructuring-bind (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="destructuring-bind (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="destructuring-bind (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="let.html" rel="next" title="let">
+<link href="defparameter.html" rel="prev" title="defparameter">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="destructuring_002dbind">
+<div class="nav-panel">
+<p>
+Next: <a href="let.html" accesskey="n" rel="next">let, let*                                                [Special Operator]</a>, Previous: <a href="defparameter.html" accesskey="p" rel="prev">defparameter, defvar                                                [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="destructuring_002dbind-_005bMacro_005d"><span>5.3.17 destructuring-bind                                                  [Macro]<a class="copiable-link" href="#destructuring_002dbind-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">destructuring-bind</code>  <i class="i">lambda-list expression {<i class="i">declaration</i>}* {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-38"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-38"> &para;</a></span></h4>
+
+<p><i class="i">lambda-list</i>&mdash;a <i class="i">destructuring lambda list</i>.
+</p>
+<p><i class="i">expression</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated. 
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-70"><span>Description::<a class="copiable-link" href="#Description_003a_003a-70"> &para;</a></span></h4>
+
+<p><b class="b">destructuring-bind</b> binds the variables specified in <i class="i">lambda-list</i>
+to the corresponding values in the tree structure resulting from the evaluation 
+of <i class="i">expression</i>; then <b class="b">destructuring-bind</b> evaluates <i class="i">forms</i>.
+</p>
+<p>The <i class="i">lambda-list</i> supports destructuring as described in
+<a class="ref" href="Destructuring-Lambda-Lists.html">Destructuring Lambda Lists</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-44"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-44"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (defun iota (n) (loop for i from 1 to n collect i))       ;helper
+ (destructuring-bind ((a &amp;optional (b 'bee)) one two three)
+     `((alpha) ,@(iota 3))
+   (list a b three two one)) &rArr;  (ALPHA BEE 3 2 1)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-14"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-14"> &para;</a></span></h4>
+
+<p>If the result of evaluating the <i class="i">expression</i> does not match the 
+destructuring pattern, an error of <i class="i">type</i> <b class="b">error</b> should be signaled. 
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-55"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-55"> &para;</a></span></h4>
+
+<p><b class="b">macrolet</b>, 
+<a class="ref" href="defmacro.html">defmacro                                                            [Macro]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/digit_002dchar.html
@@ -0,0 +1,90 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>digit-char (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="digit-char (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="digit-char (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="digit_002dchar_002dp.html" rel="next" title="digit-char-p">
+<link href="alphanumericp.html" rel="prev" title="alphanumericp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="digit_002dchar">
+<div class="nav-panel">
+<p>
+Next: <a href="digit_002dchar_002dp.html" accesskey="n" rel="next">digit-char-p                                                     [Function]</a>, Previous: <a href="alphanumericp.html" accesskey="p" rel="prev">alphanumericp                                                    [Function]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="digit_002dchar-_005bFunction_005d"><span>13.2.10 digit-char                                                       [Function]<a class="copiable-link" href="#digit_002dchar-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">digit-char</code>  <i class="i">weight <span class="r">&amp;optional</span> radix</i> &rArr;  <i class="i">char</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-263"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-263"> &para;</a></span></h4>
+
+<p><i class="i">weight</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<p><i class="i">radix</i>&mdash;a <i class="i">radix</i>.
+ The default is <code class="t">10</code>.
+</p>
+<p><i class="i">char</i>&mdash;a <i class="i">character</i> or <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-359"><span>Description::<a class="copiable-link" href="#Description_003a_003a-359"> &para;</a></span></h4>
+
+<p>If <i class="i">weight</i> is less than <i class="i">radix</i>,
+<b class="b">digit-char</b> returns a <i class="i">character</i> which has that <i class="i">weight</i>
+when considered as a digit in the specified radix.
+If the resulting <i class="i">character</i> is to be an <i class="i">alphabetic</i>_1 <i class="i">character</i>,
+it will be an uppercase <i class="i">character</i>.
+</p>
+<p>If <i class="i">weight</i> is greater than or equal to <i class="i">radix</i>,
+<b class="b">digit-char</b> returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-247"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-247"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (digit-char 0) &rArr;  #\0
+ (digit-char 10 11) &rArr;  #\A
+ (digit-char 10 10) &rArr;  <i class="i">false</i>
+ (digit-char 7) &rArr;  #\7
+ (digit-char 12) &rArr;  <i class="i">false</i>
+ (digit-char 12 16) &rArr;  #\C  ;not #\c
+ (digit-char 6 2) &rArr;  <i class="i">false</i>
+ (digit-char 1 2) &rArr;  #\1
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-289"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-289"> &para;</a></span></h4>
+
+<p><a class="ref" href="digit_002dchar_002dp.html">digit-char-p                                                     [Function]</a>
+,
+<a class="ref" href="graphic_002dchar_002dp.html">graphic-char-p                                                   [Function]</a>
+,
+<a class="ref" href="Character-Syntax.html">Character Syntax</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-191"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-191"> &para;</a></span></h4>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/digit_002dchar_002dp.html
@@ -0,0 +1,99 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>digit-char-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="digit-char-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="digit-char-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="graphic_002dchar_002dp.html" rel="next" title="graphic-char-p">
+<link href="digit_002dchar.html" rel="prev" title="digit-char">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="digit_002dchar_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="graphic_002dchar_002dp.html" accesskey="n" rel="next">graphic-char-p                                                   [Function]</a>, Previous: <a href="digit_002dchar.html" accesskey="p" rel="prev">digit-char                                                       [Function]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="digit_002dchar_002dp-_005bFunction_005d"><span>13.2.11 digit-char-p                                                     [Function]<a class="copiable-link" href="#digit_002dchar_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">digit-char-p</code>  <i class="i">char <span class="r">&amp;optional</span> radix</i> &rArr;  <i class="i">weight</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-264"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-264"> &para;</a></span></h4>
+
+<p><i class="i">char</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">radix</i>&mdash;a <i class="i">radix</i>.
+ The default is <code class="t">10</code>.
+</p>
+<p><i class="i">weight</i>&mdash;either a non-negative <i class="i">integer</i> less than <i class="i">radix</i>, 
+		 or <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-360"><span>Description::<a class="copiable-link" href="#Description_003a_003a-360"> &para;</a></span></h4>
+
+<p>Tests whether <i class="i">char</i> is a digit in the specified <i class="i">radix</i>
+(<i class="i">i.e.</i>, with a weight less than <i class="i">radix</i>).
+If it is a digit in that <i class="i">radix</i>,
+its weight is returned as an <i class="i">integer</i>; 
+otherwise <b class="b">nil</b> is returned.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-248"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-248"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (digit-char-p #\5)    &rArr;  5
+ (digit-char-p #\5 2)  &rArr;  <i class="i">false</i>
+ (digit-char-p #\A)    &rArr;  <i class="i">false</i>
+ (digit-char-p #\a)    &rArr;  <i class="i">false</i>
+ (digit-char-p #\A 11) &rArr;  10
+ (digit-char-p #\a 11) &rArr;  10
+ (mapcar #'(lambda (radix) 
+             (map 'list #'(lambda (x) (digit-char-p x radix)) 
+                  &quot;059AaFGZ&quot;))
+         '(2 8 10 16 36))
+ &rArr;  ((0 NIL NIL NIL NIL NIL NIL NIL)
+     (0 5 NIL NIL NIL NIL NIL NIL)
+     (0 5 9 NIL NIL NIL NIL NIL)
+     (0 5 9 10 10 15 NIL NIL)
+     (0 5 9 10 10 15 16 35))
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-61"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-61"> &para;</a></span></h4>
+
+<p>None.
+(In particular, the results of this predicate are independent 
+of any special syntax which might have been enabled in the <i class="i">current readtable</i>.)
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-290"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-290"> &para;</a></span></h4>
+
+<p><a class="ref" href="alphanumericp.html">alphanumericp                                                    [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-192"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-192"> &para;</a></span></h4>
+
+<p>Digits are <i class="i">graphic</i> <i class="i">characters</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/directory.html
@@ -0,0 +1,103 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>directory (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="directory (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="directory (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Files-Dictionary.html" rel="up" title="Files Dictionary">
+<link href="probe_002dfile.html" rel="next" title="probe-file">
+<link href="Files-Dictionary.html" rel="prev" title="Files Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="directory">
+<div class="nav-panel">
+<p>
+Next: <a href="probe_002dfile.html" accesskey="n" rel="next">probe-file                                                       [Function]</a>, Previous: <a href="Files-Dictionary.html" accesskey="p" rel="prev">Files Dictionary</a>, Up: <a href="Files-Dictionary.html" accesskey="u" rel="up">Files Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="directory-_005bFunction_005d"><span>20.2.1 directory                                                        [Function]<a class="copiable-link" href="#directory-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">directory</code>  <i class="i">pathspec <span class="r">&amp;key</span></i> &rArr;  <i class="i">pathnames</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-403"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-403"> &para;</a></span></h4>
+
+<p><i class="i">pathspec</i>&mdash;a <i class="i">pathname designator</i>,
+		   which may contain <i class="i">wild</i> components.
+</p>
+<p><i class="i">pathnames</i>&mdash;a <i class="i">list</i> of
+</p>
+<p><i class="i">physical pathnames</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-522"><span>Description::<a class="copiable-link" href="#Description_003a_003a-522"> &para;</a></span></h4>
+
+<p>Determines which, if any, <i class="i">files</i> that are present
+in the file system have names matching <i class="i">pathspec</i>,
+and returns a 
+</p>
+<p><i class="i">fresh</i>
+</p>
+<p><i class="i">list</i> of <i class="i">pathnames</i> corresponding to the <i class="i">truenames</i> of
+those <i class="i">files</i>.
+</p>
+<p>An <i class="i">implementation</i> may be extended to accept 
+<i class="i">implementation-defined</i> keyword arguments to <b class="b">directory</b>.  
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-75"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-75"> &para;</a></span></h4>
+
+<p>The host computer&rsquo;s file system.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-183"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-183"> &para;</a></span></h4>
+
+<p>If the attempt to obtain a directory listing is not successful,
+an error of <i class="i">type</i> <b class="b">file-error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-425"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-425"> &para;</a></span></h4>
+
+<p><b class="b">pathname</b>,
+</p>
+<p><b class="b">logical-pathname</b>,
+</p>
+<p><a class="ref" href="ensure_002ddirectories_002dexist.html">ensure-directories-exist                                         [Function]</a>
+,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+<a class="ref" href="File-Operations-on-Open-and-Closed-Streams.html">File Operations on Open and Closed Streams</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-282"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-282"> &para;</a></span></h4>
+
+<p>If the <i class="i">pathspec</i> is not <i class="i">wild</i>,
+the resulting list will contain either zero or one elements.
+</p>
+<p><span class="r">Common Lisp</span> specifies &ldquo;<span class="r">&amp;key</span>&rdquo; in the argument list to <b class="b">directory</b> 
+even though no <i class="i">standardized</i> keyword arguments to <b class="b">directory</b> are defined.
+&ldquo;<code class="t">:allow-other-keys t</code>&rdquo;
+may be used in <i class="i">conforming programs</i> in order to quietly ignore any
+additional keywords which are passed by the program but not supported
+by the <i class="i">implementation</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/disassemble.html
@@ -0,0 +1,87 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>disassemble (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="disassemble (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="disassemble (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="documentation.html" rel="next" title="documentation">
+<link href="get_002dinternal_002drun_002dtime.html" rel="prev" title="get-internal-run-time">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="disassemble">
+<div class="nav-panel">
+<p>
+Next: <a href="documentation.html" accesskey="n" rel="next">documentation, (setf documentation)             [Standard Generic Function]</a>, Previous: <a href="get_002dinternal_002drun_002dtime.html" accesskey="p" rel="prev">get-internal-run-time                                            [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="disassemble-_005bFunction_005d"><span>25.2.14 disassemble                                                      [Function]<a class="copiable-link" href="#disassemble-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">disassemble</code>  <i class="i">fn</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-499"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-499"> &para;</a></span></h4>
+
+<p><i class="i">fn</i>&mdash;an <i class="i">extended function designator</i>
+	  or a <i class="i">lambda expression</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-662"><span>Description::<a class="copiable-link" href="#Description_003a_003a-662"> &para;</a></span></h4>
+
+<p>The <i class="i">function</i> <b class="b">disassemble</b> is a debugging aid that composes symbolic 
+instructions or expressions in some <i class="i">implementation-dependent</i> 
+language which represent the code used to produce the <i class="i">function</i>
+which is or is named by the argument <i class="i">fn</i>.  The result is displayed
+to <i class="i">standard output</i> in an <i class="i">implementation-dependent</i> format.
+</p>
+<p>If <i class="i">fn</i> is a <i class="i">lambda expression</i> or <i class="i">interpreted function</i>,
+it is compiled first and the result is disassembled.
+</p>
+<p>If the <i class="i">fn</i> <i class="i">designator</i> is a <i class="i">function name</i>,
+the <i class="i">function</i> that it <i class="i">names</i> is disassembled.
+</p>
+<p>(If that <i class="i">function</i> is an <i class="i">interpreted function</i>,
+it is first compiled but the result of this implicit compilation is not installed.)
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-467"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-467"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun f (a) (1+ a)) &rArr;  F
+ (eq (symbol-function 'f)
+     (progn (disassemble 'f)
+            (symbol-function 'f))) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-128"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-128"> &para;</a></span></h4>
+
+<p><b class="b">*standard-output*</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-240"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-240"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">fn</i> is not an <i class="i">extended function designator</i>
+		  or a <i class="i">lambda expression</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/division_002dby_002dzero.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>division-by-zero (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="division-by-zero (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="division-by-zero (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="floating_002dpoint_002dinvalid_002doperation.html" rel="next" title="floating-point-invalid-operation">
+<link href="arithmetic_002derror_002doperands.html" rel="prev" title="arithmetic-error-operands">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="division_002dby_002dzero">
+<div class="nav-panel">
+<p>
+Next: <a href="floating_002dpoint_002dinvalid_002doperation.html" accesskey="n" rel="next">floating-point-invalid-operation                           [Condition Type]</a>, Previous: <a href="arithmetic_002derror_002doperands.html" accesskey="p" rel="prev">arithmetic-error-operands, arithmetic-error-operation            [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="division_002dby_002dzero-_005bCondition-Type_005d"><span>12.2.80 division-by-zero                                           [Condition Type]<a class="copiable-link" href="#division_002dby_002dzero-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-44"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-44"> &para;</a></span></h4>
+<p><b class="b">division-by-zero</b>,
+<b class="b">arithmetic-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-345"><span>Description::<a class="copiable-link" href="#Description_003a_003a-345"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">division-by-zero</b> consists of error conditions that
+occur because of division by zero.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/do.html
@@ -0,0 +1,324 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>do (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="do (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="do (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Iteration-Dictionary.html" rel="up" title="Iteration Dictionary">
+<link href="dotimes.html" rel="next" title="dotimes">
+<link href="Iteration-Dictionary.html" rel="prev" title="Iteration Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="do">
+<div class="nav-panel">
+<p>
+Next: <a href="dotimes.html" accesskey="n" rel="next">dotimes                                                             [Macro]</a>, Previous: <a href="Iteration-Dictionary.html" accesskey="p" rel="prev">Iteration Dictionary</a>, Up: <a href="Iteration-Dictionary.html" accesskey="u" rel="up">Iteration Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="do_002c-do_002a-_005bMacro_005d"><span>6.2.1 do, do*                                                             [Macro]<a class="copiable-link" href="#do_002c-do_002a-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">do</code>  <i class="i"><span class="r">(</span>{<i class="i">var</i> | <span class="r">(</span><i class="i">var</i> <span class="r">[</span>init-form <span class="r">[</span>step-form<span class="r">]</span><span class="r">]</span><span class="r">)</span>}*<span class="r">)</span>
+	 	   	 <span class="r">(</span>end-test-form {<i class="i">result-form</i>}*<span class="r">)</span>
+	 	   	 {<i class="i">declaration</i>}* {tag | statement}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><code class="code">do*</code>  <i class="i"><span class="r">(</span>{<i class="i">var</i> | <span class="r">(</span><i class="i">var</i> <span class="r">[</span>init-form <span class="r">[</span>step-form<span class="r">]</span><span class="r">]</span><span class="r">)</span>}*<span class="r">)</span>
+	 	   	 <span class="r">(</span>end-test-form <span class="r">{<i class="i">result-form</i>}*</span><span class="r">)</span>
+	 	   	 {<i class="i">declaration</i>}* {tag | statement}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-85"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-85"> &para;</a></span></h4>
+
+<p><i class="i">var</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">init-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">step-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">end-test-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">result-forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">tag</i>&mdash;a <i class="i">go tag</i>; not evaluated.
+</p>
+<p><i class="i">statement</i>&mdash;a <i class="i">compound form</i>; evaluated as described below.
+</p>
+<p><i class="i">results</i>&mdash;if a <b class="b">return</b> or <b class="b">return-from</b> form is executed,
+ the <i class="i">values</i> passed from that <i class="i">form</i>;
+ otherwise, the <i class="i">values</i> returned by the <i class="i">result-forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-123"><span>Description::<a class="copiable-link" href="#Description_003a_003a-123"> &para;</a></span></h4>
+
+<p><b class="b">do</b> iterates over a group of <i class="i">statements</i>
+while a test condition holds.
+<b class="b">do</b> accepts an arbitrary number of iteration <i class="i">vars</i>
+which are bound within the iteration and stepped in parallel.
+An initial value may be supplied for each iteration variable by use of
+an <i class="i">init-form</i>.
+<i class="i">Step-forms</i> may be used to specify how the
+<i class="i">vars</i> should be updated on succeeding iterations through the loop.  
+<i class="i">Step-forms</i> may be used both to generate successive
+values or to accumulate results.
+If the <i class="i">end-test-form</i> condition 
+is met prior to an execution of the body, the iteration terminates.
+<i class="i">Tags</i> label <i class="i">statements</i>.
+</p>
+<p><b class="b">do*</b> is exactly like <b class="b">do</b> 
+except that the <i class="i">bindings</i> and steppings
+of the <i class="i">vars</i> are performed sequentially rather than in parallel.
+</p>
+<p>Before the first iteration, all the <i class="i">init-forms</i> are evaluated, and
+each <i class="i">var</i> is bound to the value of its respective <i class="i">init-form</i>,
+if supplied.
+This is a <i class="i">binding</i>, not an assignment; when the loop terminates,
+the old values of those variables will be restored.
+For <b class="b">do</b>, all 
+of the <i class="i">init-forms</i> are evaluated before any <i class="i">var</i>
+is bound. The
+<i class="i">init-forms</i> can refer to the <i class="i">bindings</i> of the <i class="i">vars</i>
+visible before beginning execution of
+<b class="b">do</b>.
+For <b class="b">do*</b>, the first <i class="i">init-form</i> is evaluated, then the first
+<i class="i">var</i> is bound to that value, then the second <i class="i">init-form</i> 
+is evaluated, then the second <i class="i">var</i> is bound, and so on;
+in general, the <i class="i">k</i>th <i class="i">init-form</i> can refer to the new binding 
+of the <i class="i">j</i>th <i class="i">var</i> if <i class="i">j</i> &lt; <i class="i">k</i>, and otherwise to the 
+old binding of the <i class="i">j</i>th <i class="i">var</i>.
+</p>
+<p>At the beginning of each iteration, after processing the variables,
+the <i class="i">end-test-form</i> is evaluated.  If the result is
+<i class="i">false</i>, execution proceeds with the body of the <b class="b">do</b> 
+(or <b class="b">do*</b>) form.
+If the result is <i class="i">true</i>, the <i class="i">result-forms</i> are evaluated in order
+as an <i class="i">implicit progn</i>,
+and then <b class="b">do</b> or <b class="b">do*</b> returns.  
+</p>
+<p>At the beginning of each iteration other than the first, 
+<i class="i">vars</i> are updated as follows.  All the <i class="i">step-forms</i>, if supplied,
+are evaluated, from left to right, and the resulting values are
+assigned to the respective <i class="i">vars</i>.
+Any <i class="i">var</i> that has no associated <i class="i">step-form</i> is not assigned to.
+For <b class="b">do</b>, all the <i class="i">step-forms</i> are evaluated before any <i class="i">var</i>
+is updated; the assignment of values to <i class="i">vars</i> is done in parallel,
+as if by <b class="b">psetq</b>.
+Because all of the <i class="i">step-forms</i> are evaluated before any
+of the <i class="i">vars</i> are altered, a <i class="i">step-form</i> when evaluated always has
+access to the old values of all the <i class="i">vars</i>, even if other <i class="i">step-forms</i>
+precede it.
+For <b class="b">do*</b>, the first <i class="i">step-form</i> is evaluated, then the
+value is assigned to the first <i class="i">var</i>, then the second <i class="i">step-form</i> 
+is evaluated, then the value is assigned to the second <i class="i">var</i>, and so on;
+the assignment of values to variables is done sequentially,
+as if by <b class="b">setq</b>.
+For either <b class="b">do</b> or <b class="b">do*</b>,
+after the <i class="i">vars</i> have been updated,
+the <i class="i">end-test-form</i> 
+is evaluated as described above, and the iteration continues.
+</p>
+<p>The remainder of the <b class="b">do</b> (or <b class="b">do*</b>) form constitutes 
+an <i class="i">implicit tagbody</i>.
+<i class="i">Tags</i> may appear within the body of a <b class="b">do</b> loop
+for use by <b class="b">go</b> statements appearing in the body (but such <b class="b">go</b>
+statements may not appear in the variable specifiers, the <i class="i">end-test-form</i>,
+or the <i class="i">result-forms</i>).
+When the end of a <b class="b">do</b> body is reached, the next iteration cycle
+(beginning with the evaluation of <i class="i">step-forms</i>) occurs.
+</p>
+<p>An <i class="i">implicit block</i> named <b class="b">nil</b> surrounds the entire <b class="b">do</b> 
+(or <b class="b">do*</b>) form.
+A <b class="b">return</b> statement may be used at any point to exit the loop
+immediately.
+</p>
+<p><i class="i">Init-form</i>  is an
+initial value for the <i class="i">var</i> with which it is associated.
+If <i class="i">init-form</i> is omitted, the initial value of <i class="i">var</i> is <b class="b">nil</b>.
+If a <i class="i">declaration</i> is supplied for a <i class="i">var</i>, <i class="i">init-form</i> 
+must be consistent with the <i class="i">declaration</i>.
+</p>
+<p><i class="i">Declarations</i> can appear at the beginning of a <b class="b">do</b> 
+(or <b class="b">do*</b>) body.
+They apply to code in the <b class="b">do</b> (or <b class="b">do*</b>) body, 
+to the <i class="i">bindings</i> of the <b class="b">do</b> (or <b class="b">do*</b>) 
+<i class="i">vars</i>, 
+to the <i class="i">step-forms</i>,
+to the <i class="i">end-test-form</i>, and to the <i class="i">result-forms</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-93"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-93"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (do ((temp-one 1 (1+ temp-one))
+       (temp-two 0 (1- temp-two)))
+      ((&gt; (- temp-one temp-two) 5) temp-one)) &rArr;  4
+
+ (do ((temp-one 1 (1+ temp-one))
+       (temp-two 0 (1+ temp-one)))     
+      ((= 3 temp-two) temp-one)) &rArr;  3
+
+ (do* ((temp-one 1 (1+ temp-one))
+        (temp-two 0 (1+ temp-one)))
+       ((= 3 temp-two) temp-one)) &rArr;  2                     
+
+ (do ((j 0 (+ j 1)))
+     (nil)                       ;Do forever.
+   (format t &quot;~
+   (let ((item (read)))
+     (if (null item) (return)   ;Process items until NIL seen.
+         (format t &quot;~&amp;Output ~D: ~S&quot; j item))))
+<code class="t"> |&gt; </code> Input 0: <b class="b">|&gt;&gt;</b><code class="t">banana</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Output 0: BANANA
+<code class="t"> |&gt; </code> Input 1: <b class="b">|&gt;&gt;</b><code class="t">(57 boxes)</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Output 1: (57 BOXES)
+<code class="t"> |&gt; </code> Input 2: <b class="b">|&gt;&gt;</b><code class="t">NIL</code><b class="b">&lt;&lt;|</b>
+&rArr;  NIL
+
+ (setq a-vector (vector 1 nil 3 nil))
+ (do ((i 0 (+ i 1))     ;Sets every null element of a-vector to zero.
+      (n (array-dimension a-vector 0)))
+     ((= i n))
+   (when (null (aref a-vector i))
+     (setf (aref a-vector i) 0))) &rArr;  NIL
+a-vector &rArr;  #(1 0 3 0)
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (do ((x e (cdr x))
+      (oldx x x))
+     ((null x))
+   body)
+</pre></div>
+
+<p>is an example of parallel assignment to index variables.  On the first
+iteration, the value of <code class="t">oldx</code> is whatever value <code class="t">x</code> had before
+the <b class="b">do</b> was entered.  On succeeding iterations, <code class="t">oldx</code> contains
+the value that <code class="t">x</code> had on the previous iteration. 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (do ((x foo (cdr x))
+      (y bar (cdr y))
+      (z '() (cons (f (car x) (car y)) z)))
+     ((or (null x) (null y))
+      (nreverse z)))
+</pre></div>
+
+<p>does the same thing as <code class="t">(mapcar #'f foo bar)</code>.  The step
+computation for <code class="t">z</code> is an example of the fact that variables 
+are stepped in parallel.
+Also, the body of the loop is empty.  
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun list-reverse (list)
+        (do ((x list (cdr x))
+             (y '() (cons (car x) y)))
+            ((endp x) y)))
+</pre></div>
+
+<p>As an example of nested iterations, consider a data structure that is a 
+<i class="i">list</i> of <i class="i">conses</i>. The <i class="i">car</i> of each <i class="i">cons</i> is a 
+<i class="i">list</i> of <i class="i">symbols</i>,
+and the <i class="i">cdr</i> of each <i class="i">cons</i> is a 
+<i class="i">list</i> of equal length containing
+corresponding values.  Such a data structure is similar to an association
+list,
+but is divided into &ldquo;frames&rdquo;; the overall structure resembles a rib-cage.
+A lookup function on such a data structure might be:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun ribcage-lookup (sym ribcage)           
+        (do ((r ribcage (cdr r)))
+            ((null r) nil)
+          (do ((s (caar r) (cdr s))
+               (v (cdar r) (cdr v))) 
+              ((null s))
+            (when (eq (car s) sym)
+              (return-from ribcage-lookup (car v)))))) &rArr;  RIBCAGE-LOOKUP
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-105"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-105"> &para;</a></span></h4>
+
+<p>other iteration functions
+ (
+<a class="ref" href="dolist.html">dolist                                                              [Macro]</a>
+, 
+<a class="ref" href="dotimes.html">dotimes                                                             [Macro]</a>
+, and 
+<a class="ref" href="loop.html">loop                                                                [Macro]</a>
+)
+and more primitive functionality 
+ (
+<a class="ref" href="tagbody.html">tagbody                                                  [Special Operator]</a>
+, 
+<a class="ref" href="go.html">go                                                       [Special Operator]</a>
+, 
+<a class="ref" href="block.html">block                                                    [Special Operator]</a>
+, 
+<a class="ref" href="return.html">return                                                              [Macro]</a>
+, 
+</p>
+<p><a class="ref" href="let.html">let, let*                                                [Special Operator]</a>
+, and 
+<a class="ref" href="setq.html">setq                                                         [Special Form]</a>
+)
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-69"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-69"> &para;</a></span></h4>
+<p>If <i class="i">end-test-form</i> is <b class="b">nil</b>, the test will never succeed.
+This provides an idiom for &ldquo;do forever&rdquo;:
+the body of the <b class="b">do</b> or <b class="b">do*</b> 
+is executed repeatedly.
+The infinite loop can be terminated by the use of <b class="b">return</b>,
+<b class="b">return-from</b>, <b class="b">go</b> to an outer level, or <b class="b">throw</b>.
+</p>
+<p>A <b class="b">do</b> <i class="i">form</i> may be explained in terms of the more primitive <i class="i">forms</i>
+<b class="b">block</b>, <b class="b">return</b>, 
+<b class="b">let</b>, <b class="b">loop</b>, <b class="b">tagbody</b>,
+and <b class="b">psetq</b> as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (block nil        
+   (let ((var1 init1)
+         (var2 init2)
+         ...
+         (varn initn))
+     <i class="i">declarations</i>
+     (loop (when end-test (return (progn . result)))
+           (tagbody . tagbody)
+           (psetq var1 step1
+                  var2 step2
+                  ...
+                  varn stepn))))
+</pre></div>
+
+<p><b class="b">do*</b> is similar, except that <b class="b">let*</b> and <b class="b">setq</b> replace
+the <b class="b">let</b> and <b class="b">psetq</b>, respectively.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="dotimes.html">dotimes                                                             [Macro]</a>, Previous: <a href="Iteration-Dictionary.html">Iteration Dictionary</a>, Up: <a href="Iteration-Dictionary.html">Iteration Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/do_002dsymbols.html
@@ -0,0 +1,168 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>do-symbols (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="do-symbols (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="do-symbols (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="intern.html" rel="next" title="intern">
+<link href="defpackage.html" rel="prev" title="defpackage">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="do_002dsymbols">
+<div class="nav-panel">
+<p>
+Next: <a href="intern.html" accesskey="n" rel="next">intern                                                           [Function]</a>, Previous: <a href="defpackage.html" accesskey="p" rel="prev">defpackage                                                          [Macro]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="do_002dsymbols_002c-do_002dexternal_002dsymbols_002c-do_002dall_002dsymbols-_005bMacro_005d"><span>11.2.20 do-symbols, do-external-symbols, do-all-symbols                     [Macro]<a class="copiable-link" href="#do_002dsymbols_002c-do_002dexternal_002dsymbols_002c-do_002dall_002dsymbols-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">do-symbols</code>  <i class="i"><span class="r">(</span>var <span class="r">[</span>package <span class="r">[</span>result-form<span class="r">]</span><span class="r">]</span><span class="r">)</span>
+			 {<i class="i">declaration</i>}*
+			       {tag | statement}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><code class="code">do-external-symbols</code>  <i class="i"><span class="r">(</span>var <span class="r">[</span>package <span class="r">[</span>result-form<span class="r">]</span><span class="r">]</span><span class="r">)</span>
+			 {<i class="i">declaration</i>}*
+			       {tag | statement}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><code class="code">do-all-symbols</code>  <i class="i"><span class="r">(</span>var <span class="r">[</span>result-form<span class="r">]</span><span class="r">)</span>
+			 {<i class="i">declaration</i>}*
+		    	       {tag | statement}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-192"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-192"> &para;</a></span></h4>
+
+<p><i class="i">var</i>&mdash;a <i class="i">variable</i> <i class="i">name</i>; not evaluated.
+</p>
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>; evaluated.
+</p>
+<p>The default in <b class="b">do-symbols</b> and <b class="b">do-external-symbols</b> is the <i class="i">current package</i>.
+</p>
+<p><i class="i">result-form</i>&mdash;a <i class="i">form</i>; evaluated as described below.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">tag</i>&mdash;a <i class="i">go tag</i>; not evaluated.
+</p>
+<p><i class="i">statement</i>&mdash;a <i class="i">compound form</i>; evaluated as described below.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">result-form</i> 
+            if a <i class="i">normal return</i> occurs,
+   or else, if an <i class="i">explicit return</i> occurs, the <i class="i">values</i> that were transferred.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-256"><span>Description::<a class="copiable-link" href="#Description_003a_003a-256"> &para;</a></span></h4>
+
+<p><b class="b">do-symbols</b>,
+<b class="b">do-external-symbols</b>, and
+<b class="b">do-all-symbols</b> iterate over the <i class="i">symbols</i> 
+of <i class="i">packages</i>.
+For each <i class="i">symbol</i> in the set of <i class="i">packages</i> chosen,
+the <i class="i">var</i> is bound to the <i class="i">symbol</i>,
+and the <i class="i">statements</i> in the body are executed.  
+When all the <i class="i">symbols</i> have been processed,
+<i class="i">result-form</i> is evaluated and returned as the value of the macro.  
+</p>
+<p><b class="b">do-symbols</b> iterates 
+over the <i class="i">symbols</i> <i class="i">accessible</i> in
+<i class="i">package</i>.
+</p>
+<p><i class="i">Statements</i> may execute more than once for <i class="i">symbols</i> 
+that are inherited from multiple <i class="i">packages</i>.
+</p>
+<p><b class="b">do-all-symbols</b> iterates on every <i class="i">registered package</i>. 
+<b class="b">do-all-symbols</b> will not process every <i class="i">symbol</i>
+whatsoever, because a <i class="i">symbol</i> not <i class="i">accessible</i> in any
+<i class="i">registered package</i> will not be processed.
+<b class="b">do-all-symbols</b> may cause a <i class="i">symbol</i> that is <i class="i">present</i> in
+several <i class="i">packages</i> to be processed more than once.
+</p>
+<p><b class="b">do-external-symbols</b> iterates on the external symbols of <i class="i">package</i>.
+</p>
+<p>When <i class="i">result-form</i> is evaluated, <i class="i">var</i> is bound and has the value <b class="b">nil</b>.
+</p>
+<p>An <i class="i">implicit block</i> named <b class="b">nil</b> surrounds the entire <b class="b">do-symbols</b>,
+<b class="b">do-external-symbols</b>, or <b class="b">do-all-symbols</b> <i class="i">form</i>.
+</p>
+<p><b class="b">return</b> or <b class="b">return-from</b> may be used to terminate the 
+iteration prematurely.  
+</p>
+<p>If execution of the body affects which <i class="i">symbols</i> 
+are contained in the set of <i class="i">packages</i> over which iteration
+is occurring, other than to
+remove the <i class="i">symbol</i> 
+currently the value of <i class="i">var</i> by using <b class="b">unintern</b>,
+the consequences are undefined.
+</p>
+<p>For each of these macros, the 
+<i class="i">scope</i> of the name binding does not include any
+initial value form, but the optional result forms are included.
+</p>
+<p>Any <i class="i">tag</i> in the body is treated as with <b class="b">tagbody</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-174"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-174"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (make-package 'temp :use nil) &rArr;  #&lt;PACKAGE &quot;TEMP&quot;&gt;
+ (intern &quot;SHY&quot; 'temp) &rArr;  TEMP::SHY, NIL ;SHY will be an internal symbol
+                                         ;in the package TEMP
+ (export (intern &quot;BOLD&quot; 'temp) 'temp)  &rArr;  T  ;BOLD will be external  
+ (let ((lst ()))
+   (do-symbols (s (find-package 'temp)) (push s lst))
+   lst)
+&rArr;  (TEMP::SHY TEMP:BOLD)
+<i class="i">OR</i>&rArr; (TEMP:BOLD TEMP::SHY)
+ (let ((lst ()))
+   (do-external-symbols (s (find-package 'temp) lst) (push s lst))
+   lst) 
+&rArr;  (TEMP:BOLD)
+ (let ((lst ()))                                                     
+   (do-all-symbols (s lst)
+     (when (eq (find-package 'temp) (symbol-package s)) (push s lst)))
+   lst)
+&rArr;  (TEMP::SHY TEMP:BOLD)
+<i class="i">OR</i>&rArr; (TEMP:BOLD TEMP::SHY)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-228"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-228"> &para;</a></span></h4>
+
+<p><a class="ref" href="intern.html">intern                                                           [Function]</a>
+,
+<a class="ref" href="export.html">export                                                           [Function]</a>
+,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="intern.html">intern                                                           [Function]</a>, Previous: <a href="defpackage.html">defpackage                                                          [Macro]</a>, Up: <a href="Packages-Dictionary.html">Packages Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/documentation.html
@@ -0,0 +1,239 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>documentation (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="documentation (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="documentation (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="room.html" rel="next" title="room">
+<link href="disassemble.html" rel="prev" title="disassemble">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="documentation">
+<div class="nav-panel">
+<p>
+Next: <a href="room.html" accesskey="n" rel="next">room                                                             [Function]</a>, Previous: <a href="disassemble.html" accesskey="p" rel="prev">disassemble                                                      [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="documentation_002c-_0028setf-documentation_0029-_005bStandard-Generic-Function_005d"><span>25.2.15 documentation, (setf documentation)             [Standard Generic Function]<a class="copiable-link" href="#documentation_002c-_0028setf-documentation_0029-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-42"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-42"> &para;</a></span></h4>
+
+<p><code class="code">documentation</code>  <i class="i">x doc-type</i> &rArr;  <i class="i">documentation</i>
+</p>
+<p><code class="code">(setf documentation)</code>  <i class="i">new-value x doc-type</i> &rArr;  <i class="i">new-value</i>
+</p>
+<h4 class="subsubheading" id="Argument-Precedence-Order_003a_003a"><span>Argument Precedence Order::<a class="copiable-link" href="#Argument-Precedence-Order_003a_003a"> &para;</a></span></h4>
+
+<p><i class="i">doc-type</i>, <i class="i">object</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-24"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-24"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Functions_002c-Macros_002c-and-Special-Forms"><span>Functions, Macros, and Special Forms<a class="copiable-link" href="#Functions_002c-Macros_002c-and-Special-Forms"> &para;</a></span></h4>
+
+<p>documentation (<i class="i">x</i> <code class="code">function</code>) (doc-type (eql &rsquo;t))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">function</code>) (doc-type (eql &rsquo;t))
+</p>
+<p>documentation (<i class="i">x</i> <code class="code">function</code>) (doc-type (eql &rsquo;function))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">function</code>) (doc-type (eql &rsquo;function))
+</p>
+<p>documentation (<i class="i">x</i> <code class="code">list</code>) (doc-type (eql &rsquo;function))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">list</code>) (doc-type (eql &rsquo;function))
+</p>
+<p>documentation (<i class="i">x</i> <code class="code">list</code>) (doc-type (eql &rsquo;compiler-macro))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">list</code>) (doc-type (eql &rsquo;compiler-macro))
+</p>
+<p>documentation (<i class="i">x</i> <code class="code">symbol</code>) (doc-type (eql &rsquo;function))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">symbol</code>) (doc-type (eql &rsquo;function))
+</p>
+<p>documentation (<i class="i">x</i> <code class="code">symbol</code>) (doc-type (eql &rsquo;compiler-macro))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">symbol</code>) (doc-type (eql &rsquo;compiler-macro))
+</p>
+<p>documentation (<i class="i">x</i> <code class="code">symbol</code>) (doc-type (eql &rsquo;setf))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">symbol</code>) (doc-type (eql &rsquo;setf))
+</p>
+<h4 class="subsubheading" id="Method-Combinations"><span>Method Combinations<a class="copiable-link" href="#Method-Combinations"> &para;</a></span></h4>
+
+<p>documentation (<i class="i">x</i> <code class="code">method-combination</code>) (doc-type (eql &rsquo;t))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">method-combination</code>) (doc-type (eql &rsquo;t))
+</p>
+<p>documentation (<i class="i">x</i> <code class="code">method-combination</code>) (doc-type (eql &rsquo;method-combination))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">method-combination</code>) (doc-type (eql &rsquo;method-combination))
+</p>
+<p>documentation (<i class="i">x</i> <code class="code">symbol</code>) (doc-type (eql &rsquo;method-combination))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">symbol</code>) (doc-type (eql &rsquo;method-combination))
+</p>
+<h4 class="subsubheading" id="Methods"><span>Methods<a class="copiable-link" href="#Methods"> &para;</a></span></h4>
+
+<p>documentation (<i class="i">x</i> <code class="code">standard-method</code>) (doc-type (eql &rsquo;t))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">standard-method</code>) (doc-type (eql &rsquo;t))
+</p>
+<h4 class="subsubheading" id="Packages-2"><span>Packages<a class="copiable-link" href="#Packages-2"> &para;</a></span></h4>
+
+<p>documentation (<i class="i">x</i> <code class="code">package</code>) (doc-type (eql &rsquo;t))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">package</code>) (doc-type (eql &rsquo;t))
+</p>
+<h4 class="subsubheading" id="Types_002c-Classes_002c-and-Structure-Names"><span>Types, Classes, and Structure Names<a class="copiable-link" href="#Types_002c-Classes_002c-and-Structure-Names"> &para;</a></span></h4>
+
+<p>documentation (<i class="i">x</i> <code class="code">standard-class</code>) (doc-type (eql &rsquo;t))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">standard-class</code>) (doc-type (eql &rsquo;t))
+</p>
+<p>documentation (<i class="i">x</i> <code class="code">standard-class</code>) (doc-type (eql &rsquo;type))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">standard-class</code>) (doc-type (eql &rsquo;type))
+</p>
+<p>documentation (<i class="i">x</i> <code class="code">structure-class</code>) (doc-type (eql &rsquo;t))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">structure-class</code>) (doc-type (eql &rsquo;t))
+</p>
+<p>documentation (<i class="i">x</i> <code class="code">structure-class</code>) (doc-type (eql &rsquo;type))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">structure-class</code>) (doc-type (eql &rsquo;type))
+</p>
+<p>documentation (<i class="i">x</i> <code class="code">symbol</code>) (doc-type (eql &rsquo;type))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">symbol</code>) (doc-type (eql &rsquo;type))
+</p>
+<p>documentation (<i class="i">x</i> <code class="code">symbol</code>) (doc-type (eql &rsquo;structure))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">symbol</code>) (doc-type (eql &rsquo;structure))
+</p>
+<h4 class="subsubheading" id="Variables"><span>Variables<a class="copiable-link" href="#Variables"> &para;</a></span></h4>
+
+<p>documentation (<i class="i">x</i> <code class="code">symbol</code>) (doc-type (eql &rsquo;variable))<br>
+(setf documentation) <i class="i">new-value</i>(<i class="i">x</i> <code class="code">symbol</code>) (doc-type (eql &rsquo;variable))
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-500"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-500"> &para;</a></span></h4>
+
+<p><i class="i">x</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">doc-type</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">documentation</i>&mdash;a <i class="i">string</i>, or <b class="b">nil</b>.
+</p>
+<p><i class="i">new-value</i>&mdash;a <i class="i">string</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-663"><span>Description::<a class="copiable-link" href="#Description_003a_003a-663"> &para;</a></span></h4>
+
+<p>The <i class="i">generic function</i> <b class="b">documentation</b> returns the <i class="i">documentation string</i>
+associated with the given <i class="i">object</i> if it is available;
+otherwise it returns <b class="b">nil</b>.
+</p>
+<p>The <i class="i">generic function</i> <code class="t">(setf documentation)</code> updates the 
+<i class="i">documentation string</i> associated with <i class="i">x</i> to <i class="i">new-value</i>.
+If <i class="i">x</i> is a <i class="i">list</i>,
+it must be of the form <code class="t">(setf <i class="i">symbol</i>)</code>.
+</p>
+<p><i class="i">Documentation strings</i> are made available for debugging purposes.
+<i class="i">Conforming programs</i> are permitted to use <i class="i">documentation strings</i>
+when they are present, but should not depend for their correct behavior on 
+the presence of those <i class="i">documentation strings</i>.
+An <i class="i">implementation</i> is permitted to discard <i class="i">documentation strings</i> 
+at any time for <i class="i">implementation-defined</i> reasons.
+</p>
+<p>The nature of the <i class="i">documentation string</i> returned depends on the
+<i class="i">doc-type</i>, as follows:
+</p>
+<dl class="table">
+<dt><b class="b">compiler-macro</b></dt>
+<dd><p>Returns the <i class="i">documentation string</i> of the <i class="i">compiler macro</i>
+whose <i class="i">name</i> is the <i class="i">function name</i> <i class="i">x</i>.
+</p>
+</dd>
+<dt><b class="b">function</b></dt>
+<dd><p>If <i class="i">x</i> is a <i class="i">function name</i>,
+returns the <i class="i">documentation string</i> of 
+the <i class="i">function</i>, <i class="i">macro</i>, or <i class="i">special operator</i> 
+whose <i class="i">name</i> is <i class="i">x</i>.
+</p>
+<p>If <i class="i">x</i> is a <i class="i">function</i>,
+returns the <i class="i">documentation string</i> associated with <i class="i">x</i>.
+</p>
+</dd>
+<dt><b class="b">method-combination</b></dt>
+<dd><p>If <i class="i">x</i> is a <i class="i">symbol</i>,
+returns the <i class="i">documentation string</i> of
+the <i class="i">method combination</i>
+whose <i class="i">name</i> is <i class="i">x</i>.
+</p>
+<p>If <i class="i">x</i> is a <i class="i">method combination</i>,
+returns the <i class="i">documentation string</i> associated with <i class="i">x</i>.
+</p>
+</dd>
+<dt><b class="b">setf</b></dt>
+<dd><p>Returns the <i class="i">documentation string</i> of 
+</p>
+<p>the <i class="i">setf expander</i>
+</p>
+<p>whose <i class="i">name</i> is the <i class="i">symbol</i> <i class="i">x</i>.
+</p>
+</dd>
+<dt><b class="b">structure</b></dt>
+<dd><p>Returns the <i class="i">documentation string</i> 
+associated with the <i class="i">structure name</i> <i class="i">x</i>.
+</p>
+</dd>
+<dt><b class="b">t</b></dt>
+<dd><p>Returns a <i class="i">documentation string</i> specialized on the <i class="i">class</i> of
+the argument <i class="i">x</i> itself.
+For example, if <i class="i">x</i> is a <i class="i">function</i>,
+the <i class="i">documentation string</i> associated with the <i class="i">function</i> <i class="i">x</i> is returned.
+</p>
+</dd>
+<dt><b class="b">type</b></dt>
+<dd><p>If <i class="i">x</i> is a <i class="i">symbol</i>,
+returns the <i class="i">documentation string</i> of the <i class="i">class</i>
+whose <i class="i">name</i> is the <i class="i">symbol</i> <i class="i">x</i>,
+if there is such a <i class="i">class</i>.
+Otherwise, it returns the <i class="i">documentation string</i> of the <i class="i">type</i> 
+which is the <i class="i">type specifier</i> <i class="i">symbol</i> <i class="i">x</i>.
+</p>
+<p>If <i class="i">x</i> is a <i class="i">structure class</i> or <i class="i">standard class</i>,
+returns the <i class="i">documentation string</i> associated with
+the <i class="i">class</i> <i class="i">x</i>.
+</p>
+</dd>
+<dt><b class="b">variable</b></dt>
+<dd><p>Returns the <i class="i">documentation string</i> of
+the <i class="i">dynamic variable</i> or <i class="i">constant variable</i>
+whose <i class="i">name</i> is the <i class="i">symbol</i> <i class="i">x</i>.
+</p>
+</dd>
+</dl>
+
+<p>A <i class="i">conforming implementation</i> or a <i class="i">conforming program</i>
+may extend the set of <i class="i">symbols</i> that are acceptable as the <i class="i">doc-type</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-332"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-332"> &para;</a></span></h4>
+
+<p>This standard prescribes no means to retrieve the <i class="i">documentation strings</i>
+for individual slots specified in a <b class="b">defclass</b> form, but 
+<i class="i">implementations</i> might still provide debugging tools and/or
+programming language extensions which manipulate this information.
+Implementors wishing to provide such support are encouraged to consult the
+<i class="i">Metaobject Protocol</i> for suggestions about how this might be done.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="room.html">room                                                             [Function]</a>, Previous: <a href="disassemble.html">disassemble                                                      [Function]</a>, Up: <a href="Environment-Dictionary.html">Environment Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/dolist.html
@@ -0,0 +1,138 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>dolist (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="dolist (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="dolist (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Iteration-Dictionary.html" rel="up" title="Iteration Dictionary">
+<link href="loop.html" rel="next" title="loop">
+<link href="dotimes.html" rel="prev" title="dotimes">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="dolist">
+<div class="nav-panel">
+<p>
+Next: <a href="loop.html" accesskey="n" rel="next">loop                                                                [Macro]</a>, Previous: <a href="dotimes.html" accesskey="p" rel="prev">dotimes                                                             [Macro]</a>, Up: <a href="Iteration-Dictionary.html" accesskey="u" rel="up">Iteration Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="dolist-_005bMacro_005d"><span>6.2.3 dolist                                                              [Macro]<a class="copiable-link" href="#dolist-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">dolist</code>  <i class="i"><span class="r">(</span>var list-form <span class="r">[</span>result-form<span class="r">]</span><span class="r">)</span>
+		   {<i class="i">declaration</i>}*
+	           {tag | statement}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-87"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-87"> &para;</a></span></h4>
+
+<p><i class="i">var</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">list-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">result-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">tag</i>&mdash;a <i class="i">go tag</i>; not evaluated.
+</p>
+<p><i class="i">statement</i>&mdash;a <i class="i">compound form</i>; evaluated as described below.
+</p>
+<p><i class="i">results</i>&mdash;if a <b class="b">return</b> or <b class="b">return-from</b> form is executed,
+ the <i class="i">values</i> passed from that <i class="i">form</i>;
+ otherwise, the <i class="i">values</i> returned by the <i class="i">result-form</i>
+ or <b class="b">nil</b> if there is no <i class="i">result-form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-125"><span>Description::<a class="copiable-link" href="#Description_003a_003a-125"> &para;</a></span></h4>
+
+<p><b class="b">dolist</b> iterates over the elements of a <i class="i">list</i>.
+The body of <b class="b">dolist</b> is like a <b class="b">tagbody</b>.
+It consists of a series of <i class="i">tags</i> and <i class="i">statements</i>.
+</p>
+<p><b class="b">dolist</b>
+evaluates <i class="i">list-form</i>,
+which should produce a <i class="i">list</i>. It then executes the body
+once for each element in the <i class="i">list</i>, in the order in which the
+<i class="i">tags</i> and <i class="i">statements</i> occur, with
+<i class="i">var</i> bound to the element.
+Then <i class="i">result-form</i> 
+is evaluated.
+<i class="i">tags</i> label
+<i class="i">statements</i>.
+</p>
+<p>At the time <i class="i">result-form</i> is processed, 
+<i class="i">var</i> is bound to <b class="b">nil</b>.
+</p>
+<p>An <i class="i">implicit block</i>  
+named <b class="b">nil</b> surrounds <b class="b">dolist</b>.
+<b class="b">return</b> may be used to terminate the loop immediately without
+performing any further iterations, returning zero or more <i class="i">values</i>.
+</p>
+<p>The <i class="i">scope</i> of the binding of <i class="i">var</i>
+does not include the <i class="i">list-form</i>,
+but the <i class="i">result-form</i> is included.
+</p>
+<p>It is <i class="i">implementation-dependent</i> whether <b class="b">dolist</b>
+<i class="i">establishes</i> a new <i class="i">binding</i> of <i class="i">var</i> on each iteration
+or whether it <i class="i">establishes</i> a binding for <i class="i">var</i> once at the
+beginning and then <i class="i">assigns</i> it on any subsequent iterations.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-95"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-95"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (setq temp-two '()) &rArr;  NIL
+ (dolist (temp-one '(1 2 3 4) temp-two) (push temp-one temp-two)) &rArr;  (4 3 2 1)
+
+ (setq temp-two 0) &rArr;  0
+ (dolist (temp-one '(1 2 3 4)) (incf temp-two)) &rArr;  NIL
+ temp-two &rArr;  4
+
+ (dolist (x '(a b c d)) (prin1 x) (princ &quot; &quot;)) 
+<code class="t"> |&gt; </code> A B C D 
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-107"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-107"> &para;</a></span></h4>
+
+<p><a class="ref" href="do.html">do, do*                                                             [Macro]</a>
+,
+<a class="ref" href="dotimes.html">dotimes                                                             [Macro]</a>
+,
+<a class="ref" href="tagbody.html">tagbody                                                  [Special Operator]</a>
+,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-71"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-71"> &para;</a></span></h4>
+
+<p><b class="b">go</b> may be used within the body of <b class="b">dolist</b> 
+to transfer control to a statement labeled by a <i class="i">tag</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="loop.html">loop                                                                [Macro]</a>, Previous: <a href="dotimes.html">dotimes                                                             [Macro]</a>, Up: <a href="Iteration-Dictionary.html">Iteration Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/dotimes.html
@@ -0,0 +1,166 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>dotimes (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="dotimes (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="dotimes (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Iteration-Dictionary.html" rel="up" title="Iteration Dictionary">
+<link href="dolist.html" rel="next" title="dolist">
+<link href="do.html" rel="prev" title="do">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="dotimes">
+<div class="nav-panel">
+<p>
+Next: <a href="dolist.html" accesskey="n" rel="next">dolist                                                              [Macro]</a>, Previous: <a href="do.html" accesskey="p" rel="prev">do, do*                                                             [Macro]</a>, Up: <a href="Iteration-Dictionary.html" accesskey="u" rel="up">Iteration Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="dotimes-_005bMacro_005d"><span>6.2.2 dotimes                                                             [Macro]<a class="copiable-link" href="#dotimes-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">dotimes</code>  <i class="i"><span class="r">(</span>var count-form <span class="r">[</span>result-form<span class="r">]</span><span class="r">)</span>
+		  {<i class="i">declaration</i>}*
+		  {tag | statement}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-86"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-86"> &para;</a></span></h4>
+
+<p><i class="i">var</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">count-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">result-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">tag</i>&mdash;a <i class="i">go tag</i>; not evaluated.
+</p>
+<p><i class="i">statement</i>&mdash;a <i class="i">compound form</i>; evaluated as described below.
+</p>
+<p><i class="i">results</i>&mdash;if a <b class="b">return</b> or <b class="b">return-from</b> form is executed,
+ the <i class="i">values</i> passed from that <i class="i">form</i>;
+ otherwise, the <i class="i">values</i> returned by the <i class="i">result-form</i>
+ or <b class="b">nil</b> if there is no <i class="i">result-form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-124"><span>Description::<a class="copiable-link" href="#Description_003a_003a-124"> &para;</a></span></h4>
+
+<p><b class="b">dotimes</b> iterates over a series of <i class="i">integers</i>.
+</p>
+<p><b class="b">dotimes</b> evaluates <i class="i">count-form</i>,
+which should produce an <i class="i">integer</i>. 
+If <i class="i">count-form</i> is zero or negative,
+the body is not executed.
+<b class="b">dotimes</b> then executes the body once for each <i class="i">integer</i> from 0 up to
+but not including
+the value of <i class="i">count-form</i>,
+in the order in which the
+<i class="i">tags</i> and <i class="i">statements</i> occur, with
+<i class="i">var</i> bound to each <i class="i">integer</i>.
+Then <i class="i">result-form</i> 
+is evaluated.
+At the time <i class="i">result-form</i> is processed, <i class="i">var</i> is bound to
+the number of times the body was executed.
+<i class="i">Tags</i> label
+<i class="i">statements</i>.
+</p>
+<p>An <i class="i">implicit block</i>  
+named <b class="b">nil</b> surrounds <b class="b">dotimes</b>.
+<b class="b">return</b> may be used to terminate the loop immediately without
+performing any further iterations, returning zero or more <i class="i">values</i>.
+</p>
+<p>The body of the loop is an <i class="i">implicit tagbody</i>; 
+it may contain tags to serve as the targets of <b class="b">go</b> statements.
+Declarations may appear before the body of the loop.
+</p>
+<p>The <i class="i">scope</i> of the binding of <i class="i">var</i>
+does not include the <i class="i">count-form</i>,
+but the <i class="i">result-form</i> is included.
+</p>
+<p>It is <i class="i">implementation-dependent</i> whether <b class="b">dotimes</b>
+<i class="i">establishes</i> a new <i class="i">binding</i> of <i class="i">var</i> on each iteration
+or whether it <i class="i">establishes</i> a binding for <i class="i">var</i> once at the
+beginning and then <i class="i">assigns</i> it on any subsequent iterations.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-94"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-94"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (dotimes (temp-one 10 temp-one)) &rArr;  10
+ (setq temp-two 0) &rArr;  0
+ (dotimes (temp-one 10 t) (incf temp-two)) &rArr;  T
+ temp-two &rArr;  10
+</pre></div>
+
+<p>Here is an example of the use of <code class="t">dotimes</code> in processing strings:
+</p>
+<div class="example">
+<pre class="example-preformatted">;;; True if the specified subsequence of the string is a
+;;; palindrome (reads the same forwards and backwards).
+ (defun palindromep (string <code class="t">&amp;optional</code>
+                           (start 0)
+                           (end (length string)))
+   (dotimes (k (floor (- end start) 2) t)
+    (unless (char-equal (char string (+ start k))
+                        (char string (- end k 1)))
+      (return nil))))
+ (palindromep &quot;Able was I ere I saw Elba&quot;) &rArr;  T
+ (palindromep &quot;A man, a plan, a canal--Panama!&quot;) &rArr;  NIL
+ (remove-if-not #'alpha-char-p          ;Remove punctuation.
+               &quot;A man, a plan, a canal--Panama!&quot;)
+&rArr;  &quot;AmanaplanacanalPanama&quot;
+ (palindromep
+  (remove-if-not #'alpha-char-p
+                &quot;A man, a plan, a canal--Panama!&quot;)) &rArr;  T
+ (palindromep
+  (remove-if-not
+   #'alpha-char-p
+   &quot;Unremarkable was I ere I saw Elba Kramer, nu?&quot;)) &rArr;  T
+ (palindromep
+  (remove-if-not
+   #'alpha-char-p
+   &quot;A man, a plan, a cat, a ham, a yak,
+                  a yam, a hat, a canal--Panama!&quot;)) &rArr;  T
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-106"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-106"> &para;</a></span></h4>
+
+<p><a class="ref" href="do.html">do, do*                                                             [Macro]</a>
+, 
+<a class="ref" href="dolist.html">dolist                                                              [Macro]</a>
+, 
+<a class="ref" href="tagbody.html">tagbody                                                  [Special Operator]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-70"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-70"> &para;</a></span></h4>
+
+<p><b class="b">go</b> may be used within the body of
+<b class="b">dotimes</b> to transfer control to a statement labeled by a <i class="i">tag</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="dolist.html">dolist                                                              [Macro]</a>, Previous: <a href="do.html">do, do*                                                             [Macro]</a>, Up: <a href="Iteration-Dictionary.html">Iteration Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/dpb.html
@@ -0,0 +1,116 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>dpb (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="dpb (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="dpb (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="ldb.html" rel="next" title="ldb">
+<link href="deposit_002dfield.html" rel="prev" title="deposit-field">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="dpb">
+<div class="nav-panel">
+<p>
+Next: <a href="ldb.html" accesskey="n" rel="next">ldb                                                              [Accessor]</a>, Previous: <a href="deposit_002dfield.html" accesskey="p" rel="prev">deposit-field                                                    [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="dpb-_005bFunction_005d"><span>12.2.68 dpb                                                              [Function]<a class="copiable-link" href="#dpb-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">dpb</code>  <i class="i">newbyte bytespec integer</i> &rArr;  <i class="i">result-integer</i>
+</p>
+<h4 class="subsubheading" id="Pronunciation_003a_003a-5"><span>Pronunciation::<a class="copiable-link" href="#Pronunciation_003a_003a-5"> &para;</a></span></h4>
+
+<p>pronounced ,de  &rsquo;pib 
+ or pronounced ,de  &rsquo;pe b 
+ or pronounced &rsquo;d\=e &rsquo;p\=e &rsquo;b\=e 
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-250"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-250"> &para;</a></span></h4>
+
+<p><i class="i">newbyte</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">bytespec</i>&mdash;a <i class="i">byte specifier</i>.
+</p>
+<p><i class="i">integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">result-integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-333"><span>Description::<a class="copiable-link" href="#Description_003a_003a-333"> &para;</a></span></h4>
+
+<p><b class="b">dpb</b> (deposit byte) is used to 
+replace a field of bits within <i class="i">integer</i>.  
+<b class="b">dpb</b> returns an <i class="i">integer</i> that is 
+the same as <i class="i">integer</i> except in the bits specified by <i class="i">bytespec</i>.
+</p>
+<p>Let <code class="t">s</code> be the size specified
+by <i class="i">bytespec</i>; then the low <code class="t">s</code> bits of <i class="i">newbyte</i> appear in
+the result in the byte specified by <i class="i">bytespec</i>.
+<i class="i">Newbyte</i> is interpreted as
+being right-justified, as if it were the result of <b class="b">ldb</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-235"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-235"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (dpb 1 (byte 1 10) 0) &rArr;  1024
+ (dpb -2 (byte 2 10) 0) &rArr;  2048
+ (dpb 1 (byte 2 10) 2048) &rArr;  1024
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-275"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-275"> &para;</a></span></h4>
+
+<p><a class="ref" href="byte.html">byte, byte-size, byte-position                                   [Function]</a>
+, 
+<a class="ref" href="deposit_002dfield.html">deposit-field                                                    [Function]</a>
+, 
+<a class="ref" href="ldb.html">ldb                                                              [Accessor]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-178"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-178"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (logbitp <i class="i">j</i> (dpb <i class="i">m</i> (byte <i class="i">s</i> <i class="i">p</i>) <i class="i">n</i>))
+ &equiv; (if (and (&gt;= <i class="i">j</i> <i class="i">p</i>) (&lt; <i class="i">j</i> (+ <i class="i">p</i> <i class="i">s</i>)))
+        (logbitp (- <i class="i">j</i> <i class="i">p</i>) <i class="i">m</i>)
+        (logbitp <i class="i">j</i> <i class="i">n</i>))
+</pre></div>
+
+<p>In general,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (dpb <i class="i">x</i> (byte 0 <i class="i">y</i>) <i class="i">z</i>) &rArr;  <i class="i">z</i>
+</pre></div>
+
+<p>for all valid values of <i class="i">x</i>, <i class="i">y</i>, and <i class="i">z</i>.
+</p>
+<p>Historically, the name &ldquo;dpb&rdquo; comes from a DEC PDP-10 assembly language
+instruction meaning &ldquo;deposit byte.&rdquo;
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="ldb.html">ldb                                                              [Accessor]</a>, Previous: <a href="deposit_002dfield.html">deposit-field                                                    [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/dribble.html
@@ -0,0 +1,105 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>dribble (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="dribble (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="dribble (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="_002d-_0028Variable_0029.html" rel="next" title="- (Variable)">
+<link href="inspect.html" rel="prev" title="inspect">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="dribble">
+<div class="nav-panel">
+<p>
+Next: <a href="_002d-_0028Variable_0029.html" accesskey="n" rel="next">-                                                              [Variable]</a>, Previous: <a href="inspect.html" accesskey="p" rel="prev">inspect                                                          [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="dribble-_005bFunction_005d"><span>25.2.19 dribble                                                          [Function]<a class="copiable-link" href="#dribble-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">dribble</code>  <i class="i"><span class="r">&amp;optional</span> pathname</i> &rArr;  <i class="i"><i class="i">implementation-dependent</i></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-504"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-504"> &para;</a></span></h4>
+
+<p><i class="i">pathname</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-667"><span>Description::<a class="copiable-link" href="#Description_003a_003a-667"> &para;</a></span></h4>
+
+<p>Either <i class="i">binds</i> <b class="b">*standard-input*</b> and <b class="b">*standard-output*</b> 
+or takes other appropriate action, 
+so as to send a record of the input/output interaction to a file 
+named by <i class="i">pathname</i>.  <b class="b">dribble</b> is intended to create
+a readable record of an interactive session.
+</p>
+<p>If <i class="i">pathname</i> is a <i class="i">logical pathname</i>, it is translated
+into a physical pathname as if by calling <b class="b">translate-logical-pathname</b>.
+</p>
+<p><code class="t">(dribble)</code> terminates the recording of input and output 
+and closes the dribble file.
+</p>
+<p>If <b class="b">dribble</b> is <i class="i">called</i> while a <i class="i">stream</i> to a &ldquo;dribble file&rdquo; 
+is still open from a previous <i class="i">call</i> to <b class="b">dribble</b>,
+the effect is <i class="i">implementation-defined</i>.  For example, 
+    the already-<i class="i">open</i> <i class="i">stream</i> might be <i class="i">closed</i>, 
+ or dribbling might occur both to the old <i class="i">stream</i> and to a new one,
+ or the old <i class="i">stream</i> might stay open but not receive any further output,
+ or the new request might be ignored,
+ or some other action might be taken.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-131"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-131"> &para;</a></span></h4>
+
+<p>The <i class="i">implementation</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-243"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-243"> &para;</a></span></h4>
+
+<p>If a failure occurs when performing some operation on the <i class="i">file system</i>
+while creating the dribble file, 
+an error of <i class="i">type</i> <b class="b">file-error</b> is signaled.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> might be signaled if <i class="i">pathname</i>
+is a <i class="i">designator</i> for a <i class="i">wild</i> <i class="i">pathname</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-542"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-542"> &para;</a></span></h4>
+
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-334"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-334"> &para;</a></span></h4>
+
+<p><b class="b">dribble</b> can return before subsequent 
+<i class="i">forms</i> are executed. It also
+can enter a recursive interaction loop, 
+returning only when <code class="t">(dribble)</code> is done.
+</p>
+<p><b class="b">dribble</b> is intended primarily for interactive debugging;
+its effect cannot be relied upon when used in a program.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002d-_0028Variable_0029.html">-                                                              [Variable]</a>, Previous: <a href="inspect.html">inspect                                                          [Function]</a>, Up: <a href="Environment-Dictionary.html">Environment Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/dynamic_002dextent.html
@@ -0,0 +1,261 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>dynamic-extent (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="dynamic-extent (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="dynamic-extent (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="type.html" rel="next" title="type">
+<link href="ignore.html" rel="prev" title="ignore">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="dynamic_002dextent">
+<div class="nav-panel">
+<p>
+Next: <a href="type.html" accesskey="n" rel="next">type                                                          [Declaration]</a>, Previous: <a href="ignore.html" accesskey="p" rel="prev">ignore, ignorable                                             [Declaration]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="dynamic_002dextent-_005bDeclaration_005d"><span>3.8.20 dynamic-extent                                                [Declaration]<a class="copiable-link" href="#dynamic_002dextent-_005bDeclaration_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-3"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-3"> &para;</a></span></h4>
+
+<p><code class="t">(dynamic-extent [[{<i class="i">var</i>}* |
+		               <span class="r">(</span><b class="b">function</b> <i class="i">fn</i><span class="r">)</span><span class="r">*</span>]])</code>
+</p>
+<h4 class="subsubheading" id="Arguments_003a_003a-3"><span>Arguments::<a class="copiable-link" href="#Arguments_003a_003a-3"> &para;</a></span></h4>
+
+<p><i class="i">var</i>&mdash;a <i class="i">variable</i> <i class="i">name</i>.
+</p>
+<p><i class="i">fn</i>&mdash;a <i class="i">function</i> <i class="i">name</i>.
+</p>
+<h4 class="subsubheading" id="Valid-Context_003a_003a-1"><span>Valid Context::<a class="copiable-link" href="#Valid-Context_003a_003a-1"> &para;</a></span></h4>
+
+<p><i class="i">declaration</i>
+</p>
+<h4 class="subsubheading" id="Binding-Types-Affected_003a_003a-1"><span>Binding Types Affected::<a class="copiable-link" href="#Binding-Types-Affected_003a_003a-1"> &para;</a></span></h4>
+
+<p><i class="i">variable</i>, <i class="i">function</i>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-19"><span>Description::<a class="copiable-link" href="#Description_003a_003a-19"> &para;</a></span></h4>
+
+<p>In some containing <i class="i">form</i>, <i class="i">F</i>, this declaration
+asserts for each <i class="i">var_i</i> (which need not be bound by <i class="i">F</i>),
+and for each <i class="i">value</i> <i class="i">v_{ij}</i> that <i class="i">var_i</i> takes on,
+and for each <i class="i">object</i> <i class="i">x_{ijk}</i> that 
+is
+an <i class="i">otherwise inaccessible part</i> of <i class="i">v_{ij}</i> at any time when
+<i class="i">v_{ij}</i>
+becomes the value of <i class="i">var_i</i>,
+that just after the execution of <i class="i">F</i> terminates, 
+<i class="i">x_{ijk}</i> is either <i class="i">inaccessible</i>
+(if <i class="i">F</i> established a <i class="i">binding</i> for <i class="i">var_i</i>)
+or still an <i class="i">otherwise inaccessible part</i> of the current value of 
+<i class="i">var_i</i> (if <i class="i">F</i> did not establish a <i class="i">binding</i> 
+for <i class="i">var_i</i>).
+</p>
+<p>The same relation holds for each <i class="i">fn_i</i>, 
+except that the <i class="i">bindings</i> are in the <i class="i">function</i> <i class="i">namespace</i>.
+</p>
+<p>The compiler is permitted to use
+this information in any way that is appropriate to the <i class="i">implementation</i>
+and that does not conflict with the semantics of <span class="r">Common Lisp</span>.
+</p>
+<p><b class="b">dynamic-extent</b> declarations can be <i class="i">free declarations</i>
+or <i class="i">bound declarations</i>.
+</p>
+<p>The <i class="i">vars</i> and <i class="i">fns</i> named in a <b class="b">dynamic-extent</b> 
+declaration must not refer to <i class="i">symbol macro</i> or <i class="i">macro</i> bindings.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-16"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-16"> &para;</a></span></h4>
+
+<p>Since stack allocation of the initial value entails knowing at the
+<i class="i">object</i>&rsquo;s creation time that the <i class="i">object</i> can be 
+<i class="i">stack-allocated</i>,  it is not generally useful to make a 
+<b class="b">dynamic-extent</b> <i class="i">declaration</i> for <i class="i">variables</i>
+which have no lexically apparent initial value. 
+For example, it is probably useful to write:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun f ()
+   (let ((x (list 1 2 3)))
+     (declare (dynamic-extent x))
+         ...))
+</pre></div>
+
+<p>This would permit those compilers that wish to do so to <i class="i">stack allocate</i>
+the list held by the local variable <code class="t">x</code>.  It is permissible,
+but in practice probably not as useful, to write:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun g (x) (declare (dynamic-extent x)) ...)
+ (defun f () (g (list 1 2 3)))
+</pre></div>
+
+<p>Most compilers would probably not <i class="i">stack allocate</i> the <i class="i">argument</i>
+to <code class="t">g</code> in <code class="t">f</code> because it would be a modularity violation for the compiler
+to assume facts about <code class="t">g</code> from within <code class="t">f</code>.   Only an implementation that 
+was willing to be responsible for recompiling <code class="t">f</code> if the definition of <code class="t">g</code> 
+changed incompatibly could legitimately <i class="i">stack allocate</i> the <i class="i">list</i> 
+argument to <code class="t">g</code> in <code class="t">f</code>.
+</p>
+<p>Here is another example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (declaim (inline g))
+ (defun g (x) (declare (dynamic-extent x)) ...)
+ (defun f () (g (list 1 2 3)))
+
+ (defun f ()
+   (flet ((g (x) (declare (dynamic-extent x)) ...))
+     (g (list 1 2 3))))
+
+</pre></div>
+
+<p>In the previous example, some compilers might determine that optimization was 
+possible and others might not.
+</p>
+<p>A variant of this is the so-called &ldquo;stack allocated rest list&rdquo;
+that can be achieved (in implementations supporting the optimization) by:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun f (&amp;rest x)
+   (declare (dynamic-extent x))
+   ...)
+</pre></div>
+
+<p>Note that although the initial value of <code class="t">x</code> is not explicit, the <code class="t">f</code>
+function is responsible for assembling the list <code class="t">x</code> from the passed arguments,
+so the <code class="t">f</code> function can be optimized by the compiler to construct a 
+<i class="i">stack-allocated</i> list instead of a heap-allocated list in implementations
+that support such.
+</p>
+<p>In the following example,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((x (list 'a1 'b1 'c1))
+       (y (cons 'a2 (cons 'b2 (cons 'c2 nil)))))
+   (declare (dynamic-extent x y))
+   ...)
+</pre></div>
+
+<p>The <i class="i">otherwise inaccessible parts</i> of <code class="t">x</code> are three 
+<i class="i">conses</i>,  and the <i class="i">otherwise inaccessible parts</i>
+of <code class="t">y</code> are three other <i class="i">conses</i>.  
+None of the symbols <code class="t">a1</code>,  <code class="t">b1</code>,  <code class="t">c1</code>,  <code class="t">a2</code>,
+<code class="t">b2</code>,  <code class="t">c2</code>,  or <b class="b">nil</b> is an
+<i class="i">otherwise inaccessible part</i> of <code class="t">x</code> or <code class="t">y</code> because each
+is <i class="i">interned</i> and hence <i class="i">accessible</i> by the <i class="i">package</i>
+(or <i class="i">packages</i>) in which it is <i class="i">interned</i>.
+However, if a freshly allocated <i class="i">uninterned</i> <i class="i">symbol</i> had
+been used, it would have been an <i class="i">otherwise inaccessible part</i> of
+the <i class="i">list</i> which contained it.
+</p>
+<div class="example">
+<pre class="example-preformatted">;; In this example, the implementation is permitted to <i class="i">stack allocate</i>
+;; the list that is bound to X.
+ (let ((x (list 1 2 3)))
+   (declare (dynamic-extent x))
+   (print x)
+   :done)
+<code class="t"> |&gt; </code> (1 2 3)
+&rArr;  :DONE
+
+;; In this example, the list to be bound to L can be <i class="i">stack-allocated</i>.
+ (defun zap (x y z)
+   (do ((l (list x y z) (cdr l)))
+       ((null l))
+     (declare (dynamic-extent l))
+     (prin1 (car l)))) &rArr;  ZAP
+ (zap 1 2 3)
+<code class="t"> |&gt; </code> 123
+&rArr;  NIL
+
+;; Some implementations might open-code LIST-ALL-PACKAGES in a way
+;; that permits using <i class="i">stack allocation</i> of the list to be bound to L.
+ (do ((l (list-all-packages) (cdr l)))
+     ((null l))
+   (declare (dynamic-extent l))
+   (let ((name (package-name (car l))))
+     (when (string-search &quot;COMMON-LISP&quot; name) (print name))))
+<code class="t"> |&gt; </code> &quot;COMMON-LISP&quot;
+<code class="t"> |&gt; </code> &quot;COMMON-LISP-USER&quot;
+&rArr;  NIL
+
+;; Some implementations might have the ability to <i class="i">stack allocate</i> 
+;; rest lists.  A declaration such as the following should be a cue
+;; to such implementations that stack-allocation of the rest list
+;; would be desirable.
+ (defun add (&amp;rest x)
+   (declare (dynamic-extent x))
+   (apply #'+ x)) &rArr;  ADD
+ (add 1 2 3) &rArr;  6
+
+ (defun zap (n m)
+   ;; Computes (RANDOM (+ M 1)) at relative speed of roughly O(N).
+   ;; It may be slow, but with a good compiler at least it
+   ;; doesn't waste much heap storage.  :-}
+   (let ((a (make-array n)))
+     (declare (dynamic-extent a))
+     (dotimes (i n) 
+       (declare (dynamic-extent i))
+       (setf (aref a i) (random (+ i 1))))
+     (aref a m))) &rArr;  ZAP
+ (&lt; (zap 5 3) 3) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<p>The following are in error, since the value of <code class="t">x</code> is used outside of its
+<i class="i">extent</i>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (length (list (let ((x (list 1 2 3)))  ; Invalid
+                (declare (dynamic-extent x))
+                x)))
+
+ (progn (let ((x (list 1 2 3)))  ; Invalid
+          (declare (dynamic-extent x))
+          x)
+        nil)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-19"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-19"> &para;</a></span></h4>
+
+<p><b class="b">declare</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-12"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-12"> &para;</a></span></h4>
+
+<p>The most common optimization is to <i class="i">stack allocate</i> the 
+initial value of the <i class="i">objects</i> named by the <i class="i">vars</i>. 
+</p>
+<p>It is permissible for an implementation to simply ignore this declaration.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="type.html">type                                                          [Declaration]</a>, Previous: <a href="ignore.html">ignore, ignorable                                             [Declaration]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/echo_002dstream.html
@@ -0,0 +1,68 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>echo-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="echo-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="echo-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="file_002dstream.html" rel="next" title="file-stream">
+<link href="concatenated_002dstream.html" rel="prev" title="concatenated-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="echo_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="file_002dstream.html" accesskey="n" rel="next">file-stream                                                  [System Class]</a>, Previous: <a href="concatenated_002dstream.html" accesskey="p" rel="prev">concatenated-stream                                          [System Class]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="echo_002dstream-_005bSystem-Class_005d"><span>21.2.4 echo-stream                                                  [System Class]<a class="copiable-link" href="#echo_002dstream-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-65"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-65"> &para;</a></span></h4>
+
+<p><b class="b">echo-stream</b>,
+<b class="b">stream</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-535"><span>Description::<a class="copiable-link" href="#Description_003a_003a-535"> &para;</a></span></h4>
+
+<p>An <i class="i">echo stream</i> is a <i class="i">bidirectional</i> <i class="i">stream</i>
+that gets  its input  from an associated <i class="i">input</i>  <i class="i">stream</i>
+and  sends its output to   an associated <i class="i">output</i> <i class="i">stream</i>.
+</p>
+<p>All input taken from the <i class="i">input</i> <i class="i">stream</i> 
+is echoed to the <i class="i">output</i> <i class="i">stream</i>.
+Whether the input is echoed immediately after it is encountered,
+or after it has been read from the <i class="i">input stream</i>
+is <i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-438"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-438"> &para;</a></span></h4>
+
+<p><a class="ref" href="echo_002dstream_002dinput_002dstream.html">echo-stream-input-stream, echo-stream-output-stream              [Function]</a>
+,
+<b class="b">echo-stream-output-stream</b>,
+<a class="ref" href="make_002decho_002dstream.html">make-echo-stream                                                 [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/echo_002dstream_002dinput_002dstream.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>echo-stream-input-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="echo-stream-input-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="echo-stream-input-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="make_002decho_002dstream.html" rel="next" title="make-echo-stream">
+<link href="two_002dway_002dstream_002dinput_002dstream.html" rel="prev" title="two-way-stream-input-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="echo_002dstream_002dinput_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002decho_002dstream.html" accesskey="n" rel="next">make-echo-stream                                                 [Function]</a>, Previous: <a href="two_002dway_002dstream_002dinput_002dstream.html" accesskey="p" rel="prev">two-way-stream-input-stream, two-way-stream-output-stream</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="echo_002dstream_002dinput_002dstream_002c-echo_002dstream_002doutput_002dstream-_005bFunction_005d"><span>21.2.44 echo-stream-input-stream, echo-stream-output-stream              [Function]<a class="copiable-link" href="#echo_002dstream_002dinput_002dstream_002c-echo_002dstream_002doutput_002dstream-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">echo-stream-input-stream</code>  <i class="i">echo-stream</i> &rArr;  <i class="i">input-stream</i>
+</p>
+<p><code class="code">echo-stream-output-stream</code>  <i class="i">echo-stream</i> &rArr;  <i class="i">output-stream</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-445"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-445"> &para;</a></span></h4>
+
+<p><i class="i">echo-stream</i>&mdash;an <i class="i">echo stream</i>.
+</p>
+<p><i class="i">input-stream</i>&mdash;an <i class="i">input</i> <i class="i">stream</i>.
+</p>
+<p><b class="b">output-stream</b>&mdash;an <i class="i">output</i> <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-575"><span>Description::<a class="copiable-link" href="#Description_003a_003a-575"> &para;</a></span></h4>
+
+<p><b class="b">echo-stream-input-stream</b> returns the <i class="i">input</i> <i class="i">stream</i> 
+from which <i class="i">echo-stream</i> receives input.
+</p>
+<p><b class="b">echo-stream-output-stream</b> returns the <i class="i">output</i> <i class="i">stream</i>
+to which <i class="i">echo-stream</i> sends output.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/ed.html
@@ -0,0 +1,99 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>ed (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="ed (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="ed (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="inspect.html" rel="next" title="inspect">
+<link href="room.html" rel="prev" title="room">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="ed">
+<div class="nav-panel">
+<p>
+Next: <a href="inspect.html" accesskey="n" rel="next">inspect                                                          [Function]</a>, Previous: <a href="room.html" accesskey="p" rel="prev">room                                                             [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="ed-_005bFunction_005d"><span>25.2.17 ed                                                               [Function]<a class="copiable-link" href="#ed-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">ed</code>  <i class="i"><span class="r">&amp;optional</span> x</i> &rArr;  <i class="i"><i class="i">implementation-dependent</i></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-502"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-502"> &para;</a></span></h4>
+
+<p><i class="i">x</i>&mdash;<b class="b">nil</b>, a <i class="i">pathname</i>, a <i class="i">string</i>, or a <i class="i">function name</i>.
+</p>
+<p>The default is <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-665"><span>Description::<a class="copiable-link" href="#Description_003a_003a-665"> &para;</a></span></h4>
+
+<p><b class="b">ed</b> invokes the editor if the <i class="i">implementation</i> provides a resident editor.
+</p>
+<p>If <i class="i">x</i> is <b class="b">nil</b>, the editor is entered.
+If the editor had been previously entered, its prior state is resumed, if possible.
+</p>
+<p>If <i class="i">x</i> is a <i class="i">pathname</i> or <i class="i">string</i>, 
+it is taken as the <i class="i">pathname designator</i> for a <i class="i">file</i> to be edited.
+</p>
+<p>If <i class="i">x</i> is a <i class="i">function name</i>, the text of its definition is edited.
+The means by which the function text is obtained is <i class="i">implementation-defined</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-241"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-241"> &para;</a></span></h4>
+
+<p>The consequences are undefined if the <i class="i">implementation</i> does not provide a resident editor.
+</p>
+<p>Might signal <b class="b">type-error</b> if its argument is supplied but is not
+a <i class="i">symbol</i>, a <i class="i">pathname</i>, or <b class="b">nil</b>. 
+</p>
+<p>If a failure occurs when performing some operation on the <i class="i">file system</i>
+while attempting to edit a <i class="i">file</i>,
+an error of <i class="i">type</i> <b class="b">file-error</b> is signaled.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> might be signaled if <i class="i">x</i>
+is a <i class="i">designator</i> for a <i class="i">wild</i> <i class="i">pathname</i>.
+</p>
+<p><i class="i">Implementation-dependent</i> additional conditions might be signaled as well.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-540"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-540"> &para;</a></span></h4>
+
+<p><b class="b">pathname</b>,
+</p>
+<p><b class="b">logical-pathname</b>,
+</p>
+<p><a class="ref" href="compile_002dfile.html">compile-file                                                     [Function]</a>
+,
+<a class="ref" href="load.html">load                                                             [Function]</a>
+,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="inspect.html">inspect                                                          [Function]</a>, Previous: <a href="room.html">room                                                             [Function]</a>, Up: <a href="Environment-Dictionary.html">Environment Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/elt.html
@@ -0,0 +1,92 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>elt (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="elt (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="elt (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="fill.html" rel="next" title="fill">
+<link href="copy_002dseq.html" rel="prev" title="copy-seq">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="elt">
+<div class="nav-panel">
+<p>
+Next: <a href="fill.html" accesskey="n" rel="next">fill                                                             [Function]</a>, Previous: <a href="copy_002dseq.html" accesskey="p" rel="prev">copy-seq                                                         [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="elt-_005bAccessor_005d"><span>17.3.3 elt                                                              [Accessor]<a class="copiable-link" href="#elt-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">elt</code>  <i class="i">sequence index</i> &rArr;  <i class="i">object</i>
+</p>
+<p>(setf (<code class="code">         elt</code> <i class="i">sequence index</i>) new-object)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-355"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-355"> &para;</a></span></h4>
+
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">index</i>&mdash;a <i class="i">valid sequence index</i> for <i class="i">sequence</i>.
+</p>
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">new-object</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-470"><span>Description::<a class="copiable-link" href="#Description_003a_003a-470"> &para;</a></span></h4>
+
+<p><i class="i">Accesses</i> the <i class="i">element</i> of <i class="i">sequence</i> specified by <i class="i">index</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-337"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-337"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq str (copy-seq &quot;0123456789&quot;)) &rArr;  &quot;0123456789&quot;
+ (elt str 6) &rArr;  #\6
+ (setf (elt str 0) #\#) &rArr;  #\#
+ str &rArr;  &quot;#123456789&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-151"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-151"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">index</i> is not a <i class="i">valid sequence index</i> for <i class="i">sequence</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-382"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-382"> &para;</a></span></h4>
+
+<p><a class="ref" href="aref.html">aref                                                             [Accessor]</a>
+,
+<a class="ref" href="nth.html">nth                                                              [Accessor]</a>
+,
+</p>
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-257"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-257"> &para;</a></span></h4>
+
+<p><b class="b">aref</b> may be used to <i class="i">access</i> <i class="i">vector</i> 
+elements that are beyond the <i class="i">vector</i>&rsquo;s <i class="i">fill pointer</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/encode_002duniversal_002dtime.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>encode-universal-time (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="encode-universal-time (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="encode-universal-time (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="get_002duniversal_002dtime.html" rel="next" title="get-universal-time">
+<link href="decode_002duniversal_002dtime.html" rel="prev" title="decode-universal-time">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="encode_002duniversal_002dtime">
+<div class="nav-panel">
+<p>
+Next: <a href="get_002duniversal_002dtime.html" accesskey="n" rel="next">get-universal-time, get-decoded-time                             [Function]</a>, Previous: <a href="decode_002duniversal_002dtime.html" accesskey="p" rel="prev">decode-universal-time                                            [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="encode_002duniversal_002dtime-_005bfunction_005d"><span>25.2.2 encode-universal-time                                            [function]<a class="copiable-link" href="#encode_002duniversal_002dtime-_005bfunction_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-40"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-40"> &para;</a></span></h4>
+
+<p><code class="code">encode-universal-time</code>  <i class="i">second minute hour date month year
+                               <span class="r">&amp;optional</span> time-zone</i><br>
+   &rArr;  <i class="i">universal-time</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-488"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-488"> &para;</a></span></h4>
+
+<p><i class="i">second</i>, <i class="i">minute</i>, <i class="i">hour</i>, 
+<i class="i">date</i>, <i class="i">month</i>, <i class="i">year</i>, 
+<i class="i">time-zone</i>&mdash;the corresponding parts of a <i class="i">decoded time</i>.
+ (Note that some of the nine values in a full <i class="i">decoded time</i> are redundant,
+  and so are not used as inputs to this function.)
+</p>
+<p><i class="i">universal-time</i>&mdash;a <i class="i">universal time</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-650"><span>Description::<a class="copiable-link" href="#Description_003a_003a-650"> &para;</a></span></h4>
+
+<p><b class="b">encode-universal-time</b> converts a time from Decoded Time format
+to a <i class="i">universal time</i>.
+</p>
+<p>If <i class="i">time-zone</i> is supplied, no adjustment for daylight savings time is performed.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-462"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-462"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (encode-universal-time 0 0 0 1 1 1900 0) &rArr;  0
+ (encode-universal-time 0 0 1 4 7 1976 5) &rArr;  2414296800
+;; The next example assumes Eastern Daylight Time.
+ (encode-universal-time 0 0 1 4 7 1976) &rArr;  2414293200
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-530"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-530"> &para;</a></span></h4>
+
+<p><a class="ref" href="decode_002duniversal_002dtime.html">decode-universal-time                                            [Function]</a>
+, <b class="b">get-decoded-time</b>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/end_002dof_002dfile.html
@@ -0,0 +1,65 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>end-of-file (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="end-of-file (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="end-of-file (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="stream_002derror_002dstream.html" rel="prev" title="stream-error-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="end_002dof_002dfile">
+<div class="nav-panel">
+<p>
+Previous: <a href="stream_002derror_002dstream.html" accesskey="p" rel="prev">stream-error-stream                                              [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="end_002dof_002dfile-_005bCondition-Type_005d"><span>21.2.57 end-of-file                                                [Condition Type]<a class="copiable-link" href="#end_002dof_002dfile-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-71"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-71"> &para;</a></span></h4>
+<p><b class="b">end-of-file</b>,
+<b class="b">stream-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-588"><span>Description::<a class="copiable-link" href="#Description_003a_003a-588"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">end-of-file</b> consists of
+error conditions related to read operations that are done on
+<i class="i">streams</i> that have no more data.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-479"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-479"> &para;</a></span></h4>
+
+<p><a class="ref" href="stream_002derror_002dstream.html">stream-error-stream                                              [Function]</a>
+</p>
+
+
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/endp.html
@@ -0,0 +1,95 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>endp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="endp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="endp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="null.html" rel="next" title="null">
+<link href="nth.html" rel="prev" title="nth">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="endp">
+<div class="nav-panel">
+<p>
+Next: <a href="null.html" accesskey="n" rel="next">null                                                             [Function]</a>, Previous: <a href="nth.html" accesskey="p" rel="prev">nth                                                              [Accessor]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="endp-_005bFunction_005d"><span>14.2.23 endp                                                             [Function]<a class="copiable-link" href="#endp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">endp</code>  <i class="i">list</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-292"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-292"> &para;</a></span></h4>
+
+<p><i class="i">list</i>&mdash;a <i class="i">list</i>,
+</p>
+<p>which might be a <i class="i">dotted list</i> or a <i class="i">circular list</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-393"><span>Description::<a class="copiable-link" href="#Description_003a_003a-393"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i>  if <i class="i">list</i> is the <i class="i">empty list</i>.
+Returns <i class="i">false</i> if <i class="i">list</i> is a <i class="i">cons</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-276"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-276"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (endp nil) &rArr;  <i class="i">true</i>
+ (endp '(1 2)) &rArr;  <i class="i">false</i>
+ (endp (cddr '(1 2))) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-123"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-123"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">list</i> is not a <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-211"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-211"> &para;</a></span></h4>
+
+<p>The purpose of <b class="b">endp</b> is to test for the end of <i class="i">proper list</i>.
+Since <b class="b">endp</b> does not descend into a <i class="i">cons</i>, 
+it is well-defined to pass it a <i class="i">dotted list</i>.
+However, if shorter &ldquo;lists&rdquo; are iteratively produced 
+by calling <b class="b">cdr</b> on such a <i class="i">dotted list</i> 
+and those &ldquo;lists&rdquo; are tested with <b class="b">endp</b>,
+a situation that has undefined consequences will eventually result 
+when the <i class="i">non-nil</i> <i class="i">atom</i> (which is not in fact a <i class="i">list</i>)
+finally becomes the argument to <b class="b">endp</b>.
+Since this is the usual way in which <b class="b">endp</b> is used,
+it is conservative programming style 
+and consistent with the intent of <b class="b">endp</b>
+to treat <b class="b">endp</b> as simply a function on <i class="i">proper lists</i> 
+which happens not to enforce an argument type of <i class="i">proper list</i> except
+when the argument is <i class="i">atomic</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="null.html">null                                                             [Function]</a>, Previous: <a href="nth.html">nth                                                              [Accessor]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/ensure_002ddirectories_002dexist.html
@@ -0,0 +1,95 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>ensure-directories-exist (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="ensure-directories-exist (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="ensure-directories-exist (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Files-Dictionary.html" rel="up" title="Files Dictionary">
+<link href="truename.html" rel="next" title="truename">
+<link href="probe_002dfile.html" rel="prev" title="probe-file">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="ensure_002ddirectories_002dexist">
+<div class="nav-panel">
+<p>
+Next: <a href="truename.html" accesskey="n" rel="next">truename                                                         [Function]</a>, Previous: <a href="probe_002dfile.html" accesskey="p" rel="prev">probe-file                                                       [Function]</a>, Up: <a href="Files-Dictionary.html" accesskey="u" rel="up">Files Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="ensure_002ddirectories_002dexist-_005bFunction_005d"><span>20.2.3 ensure-directories-exist                                         [Function]<a class="copiable-link" href="#ensure_002ddirectories_002dexist-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">ensure-directories-exist</code>  <i class="i">pathspec <span class="r">&amp;key</span> verbose</i> &rArr;  <i class="i">pathspec, created</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-405"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-405"> &para;</a></span></h4>
+
+<p><i class="i">pathspec</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">verbose</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">created</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-524"><span>Description::<a class="copiable-link" href="#Description_003a_003a-524"> &para;</a></span></h4>
+
+<p>Tests whether the directories containing the specified <i class="i">file</i> actually exist,
+and attempts to create them if they do not.
+</p>
+<p>If the containing directories do not exist and if <i class="i">verbose</i> is <i class="i">true</i>, 
+then the <i class="i">implementation</i> is permitted (but not required) 
+to perform output to <i class="i">standard output</i> saying what directories were created.
+If the containing directories exist, or if <i class="i">verbose</i> is <i class="i">false</i>,
+this function performs no output.
+</p>
+<p>The <i class="i">primary value</i> is the given <i class="i">pathspec</i> so that this operation can
+be straightforwardly composed with other file manipulation expressions.
+The <i class="i">secondary value</i>, <i class="i">created</i>, is <i class="i">true</i> if any directories were
+created.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-77"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-77"> &para;</a></span></h4>
+
+<p>The host computer&rsquo;s file system.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-185"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-185"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> is signaled if the host, device, or directory
+part of <i class="i">pathspec</i> is <i class="i">wild</i>.
+</p>
+<p>If the directory creation attempt is not successful,
+an error of <i class="i">type</i> <b class="b">file-error</b> is signaled;
+if this occurs, 
+it might be the case that none, some, or all
+of the requested creations have actually occurred 
+within the <i class="i">file system</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-427"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-427"> &para;</a></span></h4>
+
+<p><a class="ref" href="probe_002dfile.html">probe-file                                                       [Function]</a>
+,
+<a class="ref" href="open.html">open                                                             [Function]</a>
+,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/ensure_002dgeneric_002dfunction.html
@@ -0,0 +1,151 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>ensure-generic-function (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="ensure-generic-function (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="ensure-generic-function (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="allocate_002dinstance.html" rel="next" title="allocate-instance">
+<link href="function_002dkeywords.html" rel="prev" title="function-keywords">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="ensure_002dgeneric_002dfunction">
+<div class="nav-panel">
+<p>
+Next: <a href="allocate_002dinstance.html" accesskey="n" rel="next">allocate-instance                               [Standard Generic Function]</a>, Previous: <a href="function_002dkeywords.html" accesskey="p" rel="prev">function-keywords                               [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="ensure_002dgeneric_002dfunction-_005bFunction_005d"><span>7.7.2 ensure-generic-function                                          [Function]<a class="copiable-link" href="#ensure_002dgeneric_002dfunction-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">ensure-generic-function</code>  <i class="i">function-name <span class="r">&amp;key</span>
+			 argument-precedence-order declare
+                               documentation environment
+                               generic-function-class lambda-list
+                               method-class method-combination</i><br>
+   &rArr;  <i class="i">generic-function</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-90"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-90"> &para;</a></span></h4>
+
+<p><i class="i">function-name</i>&mdash;a <i class="i">function name</i>.
+</p>
+<p>The keyword arguments correspond to the <i class="i">option</i> arguments of
+<b class="b">defgeneric</b>, except that the <code class="t">:method-class</code> and
+<code class="t">:generic-function-class</code> arguments can be <i class="i">class</i> <i class="i">object</i>s
+as well as names.
+</p>
+<p><code class="t">Method-combination</code> &ndash; method combination object.
+</p>
+<p><code class="t">Environment</code> &ndash; the same as the <b class="b">&amp;environment</b> argument
+to macro expansion functions and is used to distinguish between compile-time
+and run-time environments.
+</p>
+<p>[Editorial Note by KMP: What about documentation. Missing from this arguments enumeration,
+  and confusing in description below.]
+</p>
+<p><i class="i">generic-function</i>&mdash;a <i class="i">generic function</i> <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-129"><span>Description::<a class="copiable-link" href="#Description_003a_003a-129"> &para;</a></span></h4>
+
+<p>The <i class="i">function</i> <b class="b">ensure-generic-function</b> is used to define 
+a globally named <i class="i">generic function</i> with no <i class="i">methods</i> 
+or to specify or modify options and declarations that pertain to 
+a globally named <i class="i">generic function</i> as a whole.
+</p>
+<p>If <i class="i">function-name</i> is not <i class="i">fbound</i> in the <i class="i">global environment</i>,
+a new
+<i class="i">generic function</i> is created.  
+If 
+</p>
+<p><code class="t">(fdefinition <i class="i">function-name</i>)</code> 
+</p>
+<p>is an <i class="i">ordinary function</i>, 
+a <i class="i">macro</i>, 
+or a <i class="i">special operator</i>,
+an error is signaled.
+</p>
+<p>If <i class="i">function-name</i> 
+is a <i class="i">list</i>, it must be of the
+form <code class="t">(setf <i class="i">symbol</i>)</code>.
+If <i class="i">function-name</i> specifies a <i class="i">generic function</i> that has a
+different value for any of the following arguments,
+the <i class="i">generic function</i> is modified to have the new value: 
+<code class="t">:argument-precedence-order</code>, <code class="t">:declare</code>, <code class="t">:documentation</code>,
+<code class="t">:method-combination</code>.
+</p>
+<p>If <i class="i">function-name</i> specifies a <i class="i">generic function</i> that has a
+different value for the <code class="t">:lambda-list</code> argument, and the new value
+is congruent with the <i class="i">lambda lists</i> of all existing 
+<i class="i">methods</i> or there
+are no <i class="i">methods</i>, the value is changed; otherwise an error is signaled.
+</p>
+<p>If <i class="i">function-name</i> specifies a <i class="i">generic function</i> that has a
+different value for the <code class="t">:generic-function-class</code> argument and if
+the new generic function class is compatible with the old,
+<b class="b">change-class</b> is called to change the <i class="i">class</i> of the 
+<i class="i">generic function</i>;
+otherwise an error is signaled.
+</p>
+<p>If <i class="i">function-name</i> specifies a <i class="i">generic function</i> that has a
+different value for the <code class="t">:method-class</code> argument, the value is
+changed, but any existing <i class="i">methods</i> are not changed.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-10"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-10"> &para;</a></span></h4>
+
+<p>Existing function binding of <i class="i">function-name</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-22"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-22"> &para;</a></span></h4>
+
+<p>If 
+</p>
+<p><code class="t">(fdefinition <i class="i">function-name</i>)</code>
+</p>
+<p>is an <i class="i">ordinary function</i>, a <i class="i">macro</i>, or a <i class="i">special operator</i>, 
+an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<p>If <i class="i">function-name</i> specifies a 
+<i class="i">generic function</i> that has a
+different value for the <code class="t">:lambda-list</code> argument, and the new value
+is not congruent with the <i class="i">lambda list</i> of any existing 
+<i class="i">method</i>,
+an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<p>If <i class="i">function-name</i> specifies a 
+<i class="i">generic function</i> that has a
+different value for the <code class="t">:generic-function-class</code> argument and if
+the new generic function class not is compatible with the old,
+an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-111"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-111"> &para;</a></span></h4>
+
+<p><a class="ref" href="defgeneric.html">defgeneric                                                          [Macro]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="allocate_002dinstance.html">allocate-instance                               [Standard Generic Function]</a>, Previous: <a href="function_002dkeywords.html">function-keywords                               [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/eq.html
@@ -0,0 +1,145 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>eq (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="eq (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="eq (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="eql.html" rel="next" title="eql">
+<link href="t.html" rel="prev" title="t">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="eq">
+<div class="nav-panel">
+<p>
+Next: <a href="eql.html" accesskey="n" rel="next">eql                                                              [Function]</a>, Previous: <a href="t.html" accesskey="p" rel="prev">t                                                       [Constant Variable]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="eq-_005bFunction_005d"><span>5.3.33 eq                                                               [Function]<a class="copiable-link" href="#eq-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">eq</code>  <i class="i">x y</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-52"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-52"> &para;</a></span></h4>
+
+<p><i class="i">x</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">y</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-86"><span>Description::<a class="copiable-link" href="#Description_003a_003a-86"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if its <i class="i">arguments</i> are the same, identical <i class="i">object</i>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-60"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-60"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (eq 'a 'b) &rArr;  <i class="i">false</i>
+ (eq 'a 'a) &rArr;  <i class="i">true</i>
+ (eq 3 3)
+&rArr;  <i class="i">true</i>
+<i class="i">OR</i>&rArr; <i class="i">false</i>
+ (eq 3 3.0) &rArr;  <i class="i">false</i>
+ (eq 3.0 3.0)
+&rArr;  <i class="i">true</i>
+<i class="i">OR</i>&rArr; <i class="i">false</i>
+ (eq #c(3 -4) #c(3 -4))
+&rArr;  <i class="i">true</i>
+<i class="i">OR</i>&rArr; <i class="i">false</i>
+ (eq #c(3 -4.0) #c(3 -4)) &rArr;  <i class="i">false</i>
+ (eq (cons 'a 'b) (cons 'a 'c)) &rArr;  <i class="i">false</i>
+ (eq (cons 'a 'b) (cons 'a 'b)) &rArr;  <i class="i">false</i>
+ (eq '(a . b) '(a . b))
+&rArr;  <i class="i">true</i>
+<i class="i">OR</i>&rArr; <i class="i">false</i>
+ (progn (setq x (cons 'a 'b)) (eq x x)) &rArr;  <i class="i">true</i>
+ (progn (setq x '(a . b)) (eq x x)) &rArr;  <i class="i">true</i>
+ (eq #\A #\A)
+&rArr;  <i class="i">true</i>
+<i class="i">OR</i>&rArr; <i class="i">false</i>
+ (let ((x &quot;Foo&quot;)) (eq x x)) &rArr;  <i class="i">true</i>
+ (eq &quot;Foo&quot; &quot;Foo&quot;)
+&rArr;  <i class="i">true</i>
+<i class="i">OR</i>&rArr; <i class="i">false</i>
+ (eq &quot;Foo&quot; (copy-seq &quot;Foo&quot;)) &rArr;  <i class="i">false</i>
+ (eq &quot;FOO&quot; &quot;foo&quot;) &rArr;  <i class="i">false</i>
+ (eq &quot;string-seq&quot; (copy-seq &quot;string-seq&quot;)) &rArr;  <i class="i">false</i>
+ (let ((x 5)) (eq x x))
+&rArr;  <i class="i">true</i>
+<i class="i">OR</i>&rArr; <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-71"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-71"> &para;</a></span></h4>
+
+<p><a class="ref" href="eql.html">eql                                                              [Function]</a>
+,
+<a class="ref" href="equal.html">equal                                                            [Function]</a>
+,
+<a class="ref" href="equalp.html">equalp                                                           [Function]</a>
+,
+<a class="ref" href="_003d.html">=, /=, &lt;, &gt;, &lt;=, &gt;=                                              [Function]</a>
+,
+<a class="ref" href="Compilation.html">Compilation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-42"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-42"> &para;</a></span></h4>
+<p><i class="i">Objects</i> that appear the same when printed are not necessarily
+<b class="b">eq</b> to each other.  <i class="i">Symbols</i> that print the same 
+usually are <b class="b">eq</b> to each other because of the use of the
+<b class="b">intern</b> function.  However, <i class="i">numbers</i> with the 
+same value need not be <b class="b">eq</b>, and two similar
+<i class="i">lists</i> are usually not <i class="i">identical</i>.
+</p>
+<p>An implementation is permitted to make &ldquo;copies&rdquo; of 
+<i class="i">characters</i> and <i class="i">numbers</i> at any time.  
+The effect is that <span class="r">Common Lisp</span> makes no guarantee that <b class="b">eq</b> 
+is true even when both its arguments are &ldquo;the same thing&rdquo; if 
+that thing is a <i class="i">character</i> or <i class="i">number</i>.
+</p>
+<p>Most <span class="r">Common Lisp</span> <i class="i">operators</i> use <b class="b">eql</b> rather than
+<b class="b">eq</b> to compare objects, or else they default to <b class="b">eql</b>
+and only use <b class="b">eq</b> if specifically requested to do so.
+However, the following <i class="i">operators</i> are defined to use <b class="b">eq</b>
+rather than <b class="b">eql</b> in a way that cannot be overridden by the
+<i class="i">code</i> which employs them:
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  catch           getf     throw  <!-- /@w -->
+  get             remf            <!-- /@w -->
+  get-properties  remprop  <!-- /@w -->
+
+  Figure 5&ndash;11: Operators that always prefer EQ over EQL<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="eql.html">eql                                                              [Function]</a>, Previous: <a href="t.html">t                                                       [Constant Variable]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/eql-_0028Type-Specifier_0029.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>eql (Type Specifier) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="eql (Type Specifier) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="eql (Type Specifier) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="coerce.html" rel="next" title="coerce">
+<link href="values-_0028Type-Specifier_0029.html" rel="prev" title="values (Type Specifier)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="eql-_0028Type-Specifier_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="coerce.html" accesskey="n" rel="next">coerce                                                           [Function]</a>, Previous: <a href="values-_0028Type-Specifier_0029.html" accesskey="p" rel="prev">values                                                     [Type Specifier]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="eql-_005bType-Specifier_005d"><span>4.4.23 eql                                                        [Type Specifier]<a class="copiable-link" href="#eql-_005bType-Specifier_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-7"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-7"> &para;</a></span></h4>
+
+<p>Combining.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-7"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-7"> &para;</a></span></h4>
+
+<p>(<code class="code">eql</code>{<i class="i">object</i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-7"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-7"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-7"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-7"> &para;</a></span></h4>
+
+<p>Represents the <i class="i">type</i> whose only <i class="i">element</i> is <i class="i">object</i>.
+</p>
+<p>The argument <i class="i">object</i> is required.  The <i class="i">object</i> can be <b class="b">*</b>,
+but if so it denotes itself (the symbol <b class="b">*</b>) 
+and does not represent an unspecified value.
+The <i class="i">symbol</i> <b class="b">eql</b> is not valid as an <i class="i">atomic type specifier</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/eql.html
@@ -0,0 +1,160 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>eql (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="eql (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="eql (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="equal.html" rel="next" title="equal">
+<link href="eq.html" rel="prev" title="eq">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="eql">
+<div class="nav-panel">
+<p>
+Next: <a href="equal.html" accesskey="n" rel="next">equal                                                            [Function]</a>, Previous: <a href="eq.html" accesskey="p" rel="prev">eq                                                               [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="eql-_005bFunction_005d"><span>5.3.34 eql                                                              [Function]<a class="copiable-link" href="#eql-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">eql</code>  <i class="i">x y</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-53"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-53"> &para;</a></span></h4>
+
+<p><i class="i">x</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">y</i>&mdash;an <i class="i">object</i>. 
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-87"><span>Description::<a class="copiable-link" href="#Description_003a_003a-87"> &para;</a></span></h4>
+
+<p>The value of <b class="b">eql</b> is <i class="i">true</i> of two objects, <i class="i">x</i> and
+<i class="i">y</i>, in the folowing cases:
+</p><dl class="table">
+<dt>1.</dt>
+<dd><p>If <i class="i">x</i> and <i class="i">y</i> are <b class="b">eq</b>.
+</p></dd>
+<dt>2.</dt>
+<dd><p>If <i class="i">x</i> and <i class="i">y</i> are both <i class="i">numbers</i> 
+of the same <i class="i">type</i> and the same value.
+</p></dd>
+<dt>3.</dt>
+<dd><p>If they are both <i class="i">characters</i> that represent the 
+same character.
+</p></dd>
+</dl>
+
+<p>Otherwise the value of <b class="b">eql</b> is <i class="i">false</i>.
+</p>
+<p>If an implementation supports positive and negative zeros as <i class="i">distinct</i> values,
+then <code class="t">(eql 0.0 -0.0)</code> returns <i class="i">false</i>.
+Otherwise, when the syntax <code class="t">-0.0</code> is read it is interpreted as the value <code class="t">0.0</code>,
+and so <code class="t">(eql 0.0 -0.0)</code> returns <i class="i">true</i>.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-61"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-61"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (eql 'a 'b) &rArr;  <i class="i">false</i>
+ (eql 'a 'a) &rArr;  <i class="i">true</i>
+ (eql 3 3) &rArr;  <i class="i">true</i>
+ (eql 3 3.0) &rArr;  <i class="i">false</i>
+ (eql 3.0 3.0) &rArr;  <i class="i">true</i>
+ (eql #c(3 -4) #c(3 -4)) &rArr;  <i class="i">true</i>
+ (eql #c(3 -4.0) #c(3 -4)) &rArr;  <i class="i">false</i>
+ (eql (cons 'a 'b) (cons 'a 'c)) &rArr;  <i class="i">false</i>
+ (eql (cons 'a 'b) (cons 'a 'b)) &rArr;  <i class="i">false</i>
+ (eql '(a . b) '(a . b))
+&rArr;  <i class="i">true</i>
+<i class="i">OR</i>&rArr; <i class="i">false</i>
+ (progn (setq x (cons 'a 'b)) (eql x x)) &rArr;  <i class="i">true</i>
+ (progn (setq x '(a . b)) (eql x x)) &rArr;  <i class="i">true</i>
+ (eql #\A #\A) &rArr;  <i class="i">true</i>
+ (eql &quot;Foo&quot; &quot;Foo&quot;)
+&rArr;  <i class="i">true</i>
+<i class="i">OR</i>&rArr; <i class="i">false</i>
+ (eql &quot;Foo&quot; (copy-seq &quot;Foo&quot;)) &rArr;  <i class="i">false</i>
+ (eql &quot;FOO&quot; &quot;foo&quot;) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<p>Normally <code class="t">(eql 1.0s0 1.0d0)</code> is false, under the assumption
+that <code class="t">1.0s0</code> and <code class="t">1.0d0</code> are of distinct data types.
+However, implementations that do not provide four distinct floating-point
+formats are permitted to &ldquo;collapse&rdquo; the four formats into some
+smaller number of them; in such an implementation <code class="t">(eql 1.0s0 1.0d0)</code>
+might be true.  
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-72"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-72"> &para;</a></span></h4>
+
+<p><a class="ref" href="eq.html">eq                                                               [Function]</a>
+,
+<a class="ref" href="equal.html">equal                                                            [Function]</a>
+,
+<a class="ref" href="equalp.html">equalp                                                           [Function]</a>
+,
+<a class="ref" href="_003d.html">=, /=, &lt;, &gt;, &lt;=, &gt;=                                              [Function]</a>
+,
+<a class="ref" href="char_003d.html">char=, char/=, char&lt;, char&gt;, char&lt;=, char&gt;=,</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-43"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-43"> &para;</a></span></h4>
+
+<p><b class="b">eql</b> is the same as <b class="b">eq</b>, except that if the
+arguments are <i class="i">characters</i> or <i class="i">numbers</i> 
+of the same type then their
+values are compared.  Thus <b class="b">eql</b> tells whether two <i class="i">objects</i>
+are conceptually the same, whereas <b class="b">eq</b> tells whether two
+<i class="i">objects</i> are implementationally identical.  It is for this reason
+that <b class="b">eql</b>, not <b class="b">eq</b>, is the default comparison predicate
+for <i class="i">operators</i> that take <i class="i">sequences</i>
+as arguments.
+</p>
+<p><b class="b">eql</b> may not be true of two <i class="i">floats</i>
+even when they represent the same
+value.  <b class="b">=</b> is used to compare
+mathematical values.
+</p>
+<p>Two <i class="i">complex</i> numbers are considered to be <b class="b">eql</b>
+if their real parts are <b class="b">eql</b> 
+and their imaginary parts are <b class="b">eql</b>.
+For example, <code class="t">(eql #C(4 5) #C(4 5))</code> is <i class="i">true</i> and
+<code class="t">(eql #C(4 5) #C(4.0 5.0))</code> is <i class="i">false</i>.
+Note that while <code class="t">(eql #C(5.0 0.0) 5.0)</code> is <i class="i">false</i>,
+<code class="t">(eql #C(5 0) 5)</code> is <i class="i">true</i>.
+In the case of <code class="t">(eql #C(5.0 0.0) 5.0)</code> the
+two arguments are of different types,
+and so cannot satisfy <b class="b">eql</b>.
+In the case of <code class="t">(eql #C(5 0) 5)</code>, 
+<code class="t">#C(5 0)</code> is not a <i class="i">complex</i> number, but
+is automatically reduced 
+to the <i class="i">integer</i> <code class="t">5</code>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="equal.html">equal                                                            [Function]</a>, Previous: <a href="eq.html">eq                                                               [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/equal.html
@@ -0,0 +1,187 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>equal (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="equal (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="equal (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="equalp.html" rel="next" title="equalp">
+<link href="eql.html" rel="prev" title="eql">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="equal">
+<div class="nav-panel">
+<p>
+Next: <a href="equalp.html" accesskey="n" rel="next">equalp                                                           [Function]</a>, Previous: <a href="eql.html" accesskey="p" rel="prev">eql                                                              [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="equal-_005bFunction_005d"><span>5.3.35 equal                                                            [Function]<a class="copiable-link" href="#equal-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">equal</code>  <i class="i">x y</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-54"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-54"> &para;</a></span></h4>
+
+<p><i class="i">x</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">y</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-88"><span>Description::<a class="copiable-link" href="#Description_003a_003a-88"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">x</i> and <i class="i">y</i> are structurally similar
+(isomorphic) <i class="i">objects</i>.  <i class="i">Objects</i> are treated as follows by
+<b class="b">equal</b>.
+</p>
+<dl class="table">
+<dt><i class="i">Symbols</i>, <i class="i">Numbers</i>, and <i class="i">Characters</i></dt>
+<dd><p><b class="b">equal</b> is <i class="i">true</i> of two <i class="i">objects</i> 
+if they are <i class="i">symbols</i> that are <b class="b">eq</b>,
+if they are <i class="i">numbers</i> that are <b class="b">eql</b>, or
+if they are <i class="i">characters</i> that are <b class="b">eql</b>.
+</p>
+</dd>
+<dt><i class="i">Conses</i></dt>
+<dd><p>For <i class="i">conses</i>, <b class="b">equal</b> is defined recursively as
+the two <i class="i">cars</i> being <b class="b">equal</b> 
+and the two <i class="i">cdrs</i> being <b class="b">equal</b>.
+</p>
+</dd>
+<dt><i class="i">Arrays</i></dt>
+<dd><p>Two <i class="i">arrays</i> are <b class="b">equal</b> only if they are <b class="b">eq</b>,
+with one exception:
+<i class="i">strings</i> and <i class="i">bit vectors</i> are compared element-by-element (using <b class="b">eql</b>).
+If either <i class="i">x</i> or <i class="i">y</i> has a <i class="i">fill pointer</i>, the 
+<i class="i">fill pointer</i> limits
+the number of elements examined by <b class="b">equal</b>.
+Uppercase and lowercase letters in <i class="i">strings</i> are considered by
+<b class="b">equal</b> to be different.  
+</p>
+</dd>
+<dt><i class="i">Pathnames</i></dt>
+<dd><p>Two <i class="i">pathnames</i> are <b class="b">equal</b> if and only if
+all the corresponding components
+(host, device, and so on) are 
+equivalent.  Whether or not
+uppercase and lowercase letters are considered equivalent
+in <i class="i">strings</i> appearing in components is <i class="i">implementation-dependent</i>.
+<i class="i">pathnames</i>
+that are <b class="b">equal</b> should be functionally equivalent.
+</p>
+</dd>
+<dt>Other (Structures, hash-tables, instances, ...)</dt>
+<dd><p>Two other <i class="i">objects</i> are <b class="b">equal</b> only if they are <b class="b">eq</b>.
+</p>
+</dd>
+</dl>
+
+<p><b class="b">equal</b> does not descend any <i class="i">objects</i> other than the
+ones explicitly specified above.
+Figure 5&ndash;12 summarizes the information given in the previous list.
+In addition, the figure specifies the priority of the behavior of <b class="b">equal</b>,
+with upper
+  entries taking priority over lower ones.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Type          Behavior                   <!-- /@w -->
+  <i class="i">number</i>        uses <b class="b">eql</b>                   <!-- /@w -->
+  <i class="i">character</i>     uses <b class="b">eql</b>                   <!-- /@w -->
+  <i class="i">cons</i>          descends                   <!-- /@w -->
+  <i class="i">bit vector</i>    descends                   <!-- /@w -->
+  <i class="i">string</i>        descends                   <!-- /@w -->
+  <i class="i">pathname</i>      &ldquo;functionally equivalent&rdquo;  <!-- /@w -->
+  <i class="i">structure</i>     uses <b class="b">eq</b>                    <!-- /@w -->
+  Other <i class="i">array</i>   uses <b class="b">eq</b>                    <!-- /@w -->
+  <i class="i">hash table</i>    uses <b class="b">eq</b>                    <!-- /@w -->
+  Other <i class="i">object</i>  uses <b class="b">eq</b>                    <!-- /@w -->
+
+  Figure 5&ndash;12: Summary and priorities of behavior of <b class="b">equal</b><!-- /@w -->
+
+</pre></div></div>
+
+<p>Any two <i class="i">objects</i> that are <b class="b">eql</b> are also <b class="b">equal</b>. 
+</p>
+<p><b class="b">equal</b> may fail to terminate if <i class="i">x</i> or <i class="i">y</i> is circular.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-62"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-62"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (equal 'a 'b) &rArr;  <i class="i">false</i>
+ (equal 'a 'a) &rArr;  <i class="i">true</i>
+ (equal 3 3) &rArr;  <i class="i">true</i>
+ (equal 3 3.0) &rArr;  <i class="i">false</i>
+ (equal 3.0 3.0) &rArr;  <i class="i">true</i>
+ (equal #c(3 -4) #c(3 -4)) &rArr;  <i class="i">true</i>
+ (equal #c(3 -4.0) #c(3 -4)) &rArr;  <i class="i">false</i>
+ (equal (cons 'a 'b) (cons 'a 'c)) &rArr;  <i class="i">false</i>
+ (equal (cons 'a 'b) (cons 'a 'b)) &rArr;  <i class="i">true</i>
+ (equal #\A #\A) &rArr;  <i class="i">true</i>
+ (equal #\A #\a) &rArr;  <i class="i">false</i>
+ (equal &quot;Foo&quot; &quot;Foo&quot;) &rArr;  <i class="i">true</i>
+ (equal &quot;Foo&quot; (copy-seq &quot;Foo&quot;)) &rArr;  <i class="i">true</i>
+ (equal &quot;FOO&quot; &quot;foo&quot;) &rArr;  <i class="i">false</i>
+ (equal &quot;This-string&quot; &quot;This-string&quot;) &rArr;  <i class="i">true</i>
+ (equal &quot;This-string&quot; &quot;this-string&quot;) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-73"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-73"> &para;</a></span></h4>
+
+<p><a class="ref" href="eq.html">eq                                                               [Function]</a>
+, 
+<a class="ref" href="eql.html">eql                                                              [Function]</a>
+, 
+<a class="ref" href="equalp.html">equalp                                                           [Function]</a>
+, 
+<a class="ref" href="_003d.html">=, /=, &lt;, &gt;, &lt;=, &gt;=                                              [Function]</a>
+, 
+<a class="ref" href="string_003d.html">string=, string/=, string&lt;, string&gt;, string&lt;=, string&gt;=,</a>
+, <b class="b">string-equal</b>, 
+<a class="ref" href="char_003d.html">char=, char/=, char&lt;, char&gt;, char&lt;=, char&gt;=,</a>
+, 
+<b class="b">char-equal</b>, 
+<a class="ref" href="tree_002dequal.html">tree-equal                                                       [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-44"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-44"> &para;</a></span></h4>
+
+<p><i class="i">Object</i> equality is not a concept for which there is a uniquely
+    determined correct algorithm. The appropriateness of an equality
+    predicate can be judged only in the context of the needs of some
+    particular program. Although these functions take any type of
+    argument and their names sound very generic, 
+<b class="b">equal</b> and <b class="b">equalp</b> are
+    not appropriate for every application. 
+</p>
+<p>A rough rule of thumb is that two <i class="i">objects</i> are <b class="b">equal</b> 
+if and only if their printed representations are the same.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="equalp.html">equalp                                                           [Function]</a>, Previous: <a href="eql.html">eql                                                              [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/equalp.html
@@ -0,0 +1,191 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>equalp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="equalp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="equalp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="identity.html" rel="next" title="identity">
+<link href="equal.html" rel="prev" title="equal">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="equalp">
+<div class="nav-panel">
+<p>
+Next: <a href="identity.html" accesskey="n" rel="next">identity                                                         [Function]</a>, Previous: <a href="equal.html" accesskey="p" rel="prev">equal                                                            [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="equalp-_005bFunction_005d"><span>5.3.36 equalp                                                           [Function]<a class="copiable-link" href="#equalp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">equalp</code>  <i class="i">x y</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-55"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-55"> &para;</a></span></h4>
+
+<p><i class="i">x</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">y</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-89"><span>Description::<a class="copiable-link" href="#Description_003a_003a-89"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">x</i> and <i class="i">y</i> are <b class="b">equal</b>,
+or if they have components that are of the same <i class="i">type</i> as each other
+   and if those components are <b class="b">equalp</b>;
+specifically, <b class="b">equalp</b> returns <i class="i">true</i> in the following cases:
+</p><dl class="table">
+<dt><i class="i">Characters</i></dt>
+<dd><p>If two <i class="i">characters</i> are <b class="b">char-equal</b>.
+</p>
+</dd>
+<dt><i class="i">Numbers</i></dt>
+<dd><p>If two <i class="i">numbers</i> are the <i class="i">same</i> under <b class="b">=</b>. 
+</p>
+</dd>
+<dt><i class="i">Conses</i></dt>
+<dd><p>If the two <i class="i">cars</i> in the <i class="i">conses</i> are <b class="b">equalp</b> 
+and the two <i class="i">cdrs</i> in the <i class="i">conses</i> are <b class="b">equalp</b>.
+</p>
+</dd>
+<dt><i class="i">Arrays</i></dt>
+<dd><p>If two <i class="i">arrays</i> have the same
+number of dimensions, the dimensions match,
+and the corresponding
+<i class="i">active elements</i> 
+are <b class="b">equalp</b>.
+The <i class="i">types</i> for which the <i class="i">arrays</i> are <i class="i">specialized</i> need not match; 
+for example, a <i class="i">string</i> and a general <i class="i">array</i> that happens to contain the same 
+<i class="i">characters</i> are <b class="b">equalp</b>.
+Because <b class="b">equalp</b> performs <i class="i">element</i>-by-<i class="i">element</i> comparisons
+of <i class="i">strings</i> and ignores the <i class="i">case</i> of <i class="i">characters</i>,
+<i class="i">case</i> distinctions are ignored when <b class="b">equalp</b> compares <i class="i">strings</i>.
+</p>
+</dd>
+<dt><i class="i">Structures</i></dt>
+<dd><p>If two <i class="i">structures</i> S_1 and S_2 have the same <i class="i">class</i>
+and the value of each <i class="i">slot</i> in S_1 is the <i class="i">same</i> under <b class="b">equalp</b>
+as the value of the corresponding <i class="i">slot</i> in S_2.
+</p>
+</dd>
+<dt><i class="i">Hash Tables</i></dt>
+<dd><p><b class="b">equalp</b> descends <i class="i">hash-tables</i> by first comparing the count of entries
+  and the <code class="t">:test</code> function; if those are the same, it compares the
+  keys of the tables using the <code class="t">:test</code> function and then the values
+  of the matching keys using <b class="b">equalp</b> recursively.
+</p>
+</dd>
+</dl>
+
+<p><b class="b">equalp</b> does not descend any <i class="i">objects</i>
+  other than the ones explicitly specified above.
+Figure 5&ndash;13 summarizes the information given in the previous list.
+In addition, the figure specifies the priority of the behavior of <b class="b">equalp</b>,
+with upper
+  entries taking priority over lower ones.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Type          Behavior                      <!-- /@w -->
+  <i class="i">number</i>        uses <b class="b">=</b>                        <!-- /@w -->
+  <i class="i">character</i>     uses <b class="b">char-equal</b>               <!-- /@w -->
+  <i class="i">cons</i>          descends                      <!-- /@w -->
+  <i class="i">bit vector</i>    descends                      <!-- /@w -->
+  <i class="i">string</i>        descends                      <!-- /@w -->
+  <i class="i">pathname</i>      same as <b class="b">equal</b>                 <!-- /@w -->
+  <i class="i">structure</i>     descends, as described above  <!-- /@w -->
+  Other <i class="i">array</i>   descends                      <!-- /@w -->
+  <i class="i">hash table</i>    descends, as described above  <!-- /@w -->
+  Other <i class="i">object</i>  uses <b class="b">eq</b>                       <!-- /@w -->
+
+  Figure 5&ndash;13: Summary and priorities of behavior of <b class="b">equalp</b><!-- /@w -->
+
+</pre></div></div>
+
+<h4 class="subsubheading" id="Examples_003a_003a-63"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-63"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (equalp 'a 'b) &rArr;  <i class="i">false</i>
+ (equalp 'a 'a) &rArr;  <i class="i">true</i>
+ (equalp 3 3) &rArr;  <i class="i">true</i>
+ (equalp 3 3.0) &rArr;  <i class="i">true</i>
+ (equalp 3.0 3.0) &rArr;  <i class="i">true</i>
+ (equalp #c(3 -4) #c(3 -4)) &rArr;  <i class="i">true</i>
+ (equalp #c(3 -4.0) #c(3 -4)) &rArr;  <i class="i">true</i>
+ (equalp (cons 'a 'b) (cons 'a 'c)) &rArr;  <i class="i">false</i>
+ (equalp (cons 'a 'b) (cons 'a 'b)) &rArr;  <i class="i">true</i>
+ (equalp #\A #\A) &rArr;  <i class="i">true</i>
+ (equalp #\A #\a) &rArr;  <i class="i">true</i>
+ (equalp &quot;Foo&quot; &quot;Foo&quot;) &rArr;  <i class="i">true</i>
+ (equalp &quot;Foo&quot; (copy-seq &quot;Foo&quot;)) &rArr;  <i class="i">true</i>
+ (equalp &quot;FOO&quot; &quot;foo&quot;) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (setq array1 (make-array 6 :element-type 'integer
+                            :initial-contents '(1 1 1 3 5 7))) 
+&rArr;  #(1 1 1 3 5 7)
+ (setq array2 (make-array 8 :element-type 'integer
+                            :initial-contents '(1 1 1 3 5 7 2 6)
+                            :fill-pointer 6))
+&rArr;  #(1 1 1 3 5 7)
+ (equalp array1 array2) &rArr;  <i class="i">true</i>
+ (setq vector1 (vector 1 1 1 3 5 7)) &rArr;  #(1 1 1 3 5 7)
+ (equalp array1 vector1) &rArr;  <i class="i">true</i> 
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-74"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-74"> &para;</a></span></h4>
+
+<p><a class="ref" href="eq.html">eq                                                               [Function]</a>
+, 
+<a class="ref" href="eql.html">eql                                                              [Function]</a>
+, 
+<a class="ref" href="equal.html">equal                                                            [Function]</a>
+, 
+<a class="ref" href="_003d.html">=, /=, &lt;, &gt;, &lt;=, &gt;=                                              [Function]</a>
+, 
+<a class="ref" href="string_003d.html">string=, string/=, string&lt;, string&gt;, string&lt;=, string&gt;=,</a>
+, <b class="b">string-equal</b>, 
+<a class="ref" href="char_003d.html">char=, char/=, char&lt;, char&gt;, char&lt;=, char&gt;=,</a>
+, 
+<b class="b">char-equal</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-45"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-45"> &para;</a></span></h4>
+
+<p><i class="i">Object</i> equality is not a concept for which there is a uniquely
+    determined correct algorithm. The appropriateness of an equality
+    predicate can be judged only in the context of the needs of some
+    particular program. Although these functions take any type of
+    argument and their names sound very generic, 
+<b class="b">equal</b> and <b class="b">equalp</b> are
+    not appropriate for every application. 
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="identity.html">identity                                                         [Function]</a>, Previous: <a href="equal.html">equal                                                            [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/error-_0028Condition-Type_0029.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>error (Condition Type) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="error (Condition Type) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="error (Condition Type) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="cell_002derror.html" rel="next" title="cell-error">
+<link href="serious_002dcondition.html" rel="prev" title="serious-condition">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="error-_0028Condition-Type_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="cell_002derror.html" accesskey="n" rel="next">cell-error                                                 [Condition Type]</a>, Previous: <a href="serious_002dcondition.html" accesskey="p" rel="prev">serious-condition                                          [Condition Type]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="error-_005bCondition-Type_005d"><span>9.2.5 error                                                      [Condition Type]<a class="copiable-link" href="#error-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-23"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-23"> &para;</a></span></h4>
+<p><b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-175"><span>Description::<a class="copiable-link" href="#Description_003a_003a-175"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">error</b> consists of all <i class="i">conditions</i> that represent <i class="i">errors</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/error.html
@@ -0,0 +1,165 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>error (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="error (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="error (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="cerror.html" rel="next" title="cerror">
+<link href="assert.html" rel="prev" title="assert">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="error">
+<div class="nav-panel">
+<p>
+Next: <a href="cerror.html" accesskey="n" rel="next">cerror                                                           [Function]</a>, Previous: <a href="assert.html" accesskey="p" rel="prev">assert                                                              [Macro]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="error-_005bFunction_005d"><span>9.2.11 error                                                            [Function]<a class="copiable-link" href="#error-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">error</code>  <i class="i">datum <span class="r">&amp;rest</span> arguments</i> 
+       &rArr;  #&lt;NoValue&gt;
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-133"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-133"> &para;</a></span></h4>
+
+<p><i class="i">datum</i>, <i class="i">arguments</i>&mdash;<i class="i">designators</i> for a <i class="i">condition</i> 
+ of default type <b class="b">simple-error</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-181"><span>Description::<a class="copiable-link" href="#Description_003a_003a-181"> &para;</a></span></h4>
+
+<p><b class="b">error</b> effectively invokes <b class="b">signal</b> on the denoted <i class="i">condition</i>.
+</p>
+<p>If the <i class="i">condition</i> is not handled, <code class="t">(invoke-debugger <i class="i">condition</i>)</code> is done.  
+As a consequence of calling <b class="b">invoke-debugger</b>, <b class="b">error</b> 
+cannot directly return; the only exit from <b class="b">error</b>
+can come by non-local transfer of control in a handler or by use of
+an interactive debugging command.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-115"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-115"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun factorial (x)
+   (cond ((or (not (typep x 'integer)) (minusp x))
+          (error &quot;~S is not a valid argument to FACTORIAL.&quot; x))
+         ((zerop x) 1)
+         (t (* x (factorial (- x 1))))))
+&rArr;  FACTORIAL
+(factorial 20)
+&rArr;  2432902008176640000
+(factorial -1)
+<code class="t"> |&gt; </code> Error: -1 is not a valid argument to FACTORIAL.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Return to Lisp Toplevel.
+<code class="t"> |&gt; </code> Debug&gt; 
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (setq a 'fred)
+&rArr;  FRED
+ (if (numberp a) (1+ a) (error &quot;~S is not a number.&quot; A))
+<code class="t"> |&gt; </code> Error: FRED is not a number.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Return to Lisp Toplevel.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:Continue 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Return to Lisp Toplevel.
+
+ (define-condition not-a-number (error) 
+                   ((argument :reader not-a-number-argument :initarg :argument))
+   (:report (lambda (condition stream)
+              (format stream &quot;~S is not a number.&quot;
+                      (not-a-number-argument condition)))))
+&rArr;  NOT-A-NUMBER
+
+ (if (numberp a) (1+ a) (error 'not-a-number :argument a))
+<code class="t"> |&gt; </code> Error: FRED is not a number.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Return to Lisp Toplevel.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:Continue 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Return to Lisp Toplevel.
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-8"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-8"> &para;</a></span></h4>
+
+<p><i class="i">Handlers</i> for the specified condition, if any, are invoked 
+and might have side effects.
+Program execution might stop, and the debugger might be entered.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-19"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-19"> &para;</a></span></h4>
+
+<p>Existing handler bindings.
+</p>
+<p><b class="b">*break-on-signals*</b>
+</p>
+<p>Signals an error of <i class="i">type</i> <b class="b">type-error</b> if <i class="i">datum</i> and <i class="i">arguments</i> are not <i class="i">designators</i> for a <i class="i">condition</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-159"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-159"> &para;</a></span></h4>
+
+<p><a class="ref" href="cerror.html">cerror                                                           [Function]</a>
+, 
+<a class="ref" href="signal.html">signal                                                           [Function]</a>
+, 
+<a class="ref" href="format.html">format                                                           [Function]</a>
+, 
+<a class="ref" href="ignore_002derrors.html">ignore-errors                                                       [Macro]</a>
+, <b class="b">*break-on-signals*</b>, 
+<a class="ref" href="handler_002dbind.html">handler-bind                                                        [Macro]</a>
+, <a class="ref" href="Condition-System-Concepts.html">Condition System Concepts</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-98"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-98"> &para;</a></span></h4>
+
+<p>Some implementations may provide debugger
+commands for interactively returning from individual stack frames.
+However, it should be possible for the programmer to feel confident
+about writing code like:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun wargames:no-win-scenario ()
+   (if (error &quot;pushing the button would be stupid.&quot;))
+   (push-the-button))
+</pre></div>
+
+<p>In this scenario, there should be no chance that
+<b class="b">error</b> will return
+and the button will get pushed.
+</p>
+<p>While the meaning of this program is clear and it might be proven &lsquo;safe&rsquo;
+by a formal theorem prover, such a proof is no guarantee that the
+program is safe to execute.  Compilers have been known to have bugs,
+computers to have signal glitches, and human beings to manually
+intervene in ways that are not always possible to predict.  Those kinds
+of errors, while beyond the scope of the condition system to formally
+model, are not beyond the scope of things that should seriously be
+considered when writing code that could have the kinds of sweeping
+effects hinted at by this example.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="cerror.html">cerror                                                           [Function]</a>, Previous: <a href="assert.html">assert                                                              [Macro]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/eval.html
@@ -0,0 +1,114 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>eval (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="eval (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="eval (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="eval_002dwhen.html" rel="next" title="eval-when">
+<link href="compile.html" rel="prev" title="compile">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="eval">
+<div class="nav-panel">
+<p>
+Next: <a href="eval_002dwhen.html" accesskey="n" rel="next">eval-when                                                [Special Operator]</a>, Previous: <a href="compile.html" accesskey="p" rel="prev">compile                                                          [Function]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="eval-_005bFunction_005d"><span>3.8.4 eval                                                             [Function]<a class="copiable-link" href="#eval-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">eval</code>  <i class="i">form</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-2"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-2"> &para;</a></span></h4>
+
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> <i class="i">yielded</i> by the <i class="i">evaluation</i> of <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-3"><span>Description::<a class="copiable-link" href="#Description_003a_003a-3"> &para;</a></span></h4>
+
+<p>Evaluates <i class="i">form</i> in the current <i class="i">dynamic environment</i>
+and the <i class="i">null lexical environment</i>.
+</p>
+<p><b class="b">eval</b> is a user interface to the evaluator.
+</p>
+<p>The evaluator expands macro calls as if through the use of <b class="b">macroexpand-1</b>.
+</p>
+<p>Constants appearing in code
+processed by <b class="b">eval</b> are
+not copied nor coalesced. The code resulting from the execution of 
+<b class="b">eval</b>
+references <i class="i">objects</i> 
+that are <b class="b">eql</b> to the corresponding <i class="i">objects</i> in
+the source code.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-2"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-2"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq form '(1+ a) a 999) &rArr;  999
+ (eval form) &rArr;  1000
+ (eval 'form) &rArr;  (1+ A)
+ (let ((a '(this would break if eval used local value))) (eval form))
+&rArr;  1000
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-3"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-3"> &para;</a></span></h4>
+
+<p><b class="b">macroexpand-1</b>,
+<a class="ref" href="The-Evaluation-Model.html">The Evaluation Model</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-2"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-2"> &para;</a></span></h4>
+
+<p>To obtain the current dynamic value of a <i class="i">symbol</i>, 
+use of <b class="b">symbol-value</b> is equivalent (and usually preferable) 
+to use of <b class="b">eval</b>.
+</p>
+<p>Note that an <b class="b">eval</b> <i class="i">form</i> involves two levels of <i class="i">evaluation</i> 
+for its <i class="i">argument</i>.  First, <i class="i">form</i> is <i class="i">evaluated</i> by the
+normal argument evaluation mechanism as would occur with any <i class="i">call</i>.
+The <i class="i">object</i> that results from this normal <i class="i">argument</i> <i class="i">evaluation</i> 
+becomes the <i class="i">value</i> of the <i class="i">form</i> <i class="i">parameter</i>, and is then
+<i class="i">evaluated</i> as part of the <b class="b">eval</b> <i class="i">form</i>.
+For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (eval (list 'cdr (car '((quote (a . b)) c)))) &rArr;  b
+</pre></div>
+
+<p>The <i class="i">argument</i> <i class="i">form</i> <code class="t">(list 'cdr (car '((quote (a . b)) c)))</code> is evaluated
+in the usual way to produce the <i class="i">argument</i> <code class="t">(cdr (quote (a . b)))</code>; 
+<b class="b">eval</b> then evaluates its <i class="i">argument</i>, <code class="t">(cdr (quote (a . b)))</code>, to produce <code class="t">b</code>.
+Since a single <i class="i">evaluation</i> already occurs for any <i class="i">argument</i> <i class="i">form</i>
+in any <i class="i">function form</i>,
+<b class="b">eval</b> is sometimes said to perform &ldquo;an extra level of evaluation.&rdquo;
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="eval_002dwhen.html">eval-when                                                [Special Operator]</a>, Previous: <a href="compile.html">compile                                                          [Function]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/eval_002dwhen.html
@@ -0,0 +1,256 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>eval-when (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="eval-when (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="eval-when (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="load_002dtime_002dvalue.html" rel="next" title="load-time-value">
+<link href="eval.html" rel="prev" title="eval">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="eval_002dwhen">
+<div class="nav-panel">
+<p>
+Next: <a href="load_002dtime_002dvalue.html" accesskey="n" rel="next">load-time-value                                          [Special Operator]</a>, Previous: <a href="eval.html" accesskey="p" rel="prev">eval                                                             [Function]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="eval_002dwhen-_005bSpecial-Operator_005d"><span>3.8.5 eval-when                                                [Special Operator]<a class="copiable-link" href="#eval_002dwhen-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">eval-when</code>  <i class="i"><span class="r">(</span>{<i class="i">situation</i>}*<span class="r">)</span> {<i class="i">form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-3"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-3"> &para;</a></span></h4>
+
+<p><i class="i">situation</i>&mdash;One of the <i class="i">symbols</i> 
+		    <code class="t">:compile-toplevel</code>
+,
+		    <code class="t">:load-toplevel</code>
+,
+		    <code class="t">:execute</code>
+,
+		    <b class="b">compile</b>
+<a class="index-entry-id" id="index-compile-2"></a>
+,
+		    <b class="b">load</b>
+<a class="index-entry-id" id="index-load-1"></a>
+, or
+		    <b class="b">eval</b>
+<a class="index-entry-id" id="index-eval"></a>
+.
+</p>
+<p>The use of <b class="b">eval</b>, <b class="b">compile</b>, and <b class="b">load</b> is deprecated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> of the <i class="i">forms</i> if they are executed,
+		  or <b class="b">nil</b> if they are not. 
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-4"><span>Description::<a class="copiable-link" href="#Description_003a_003a-4"> &para;</a></span></h4>
+
+<p>The body of an <b class="b">eval-when</b> form is processed as an <i class="i">implicit progn</i>, 
+but only in the <i class="i">situations</i> listed.  
+</p>
+<p>The use of the <i class="i">situations</i> <code class="t">:compile-toplevel</code> (or <code class="t">compile</code>) and
+<code class="t">:load-toplevel</code> (or <code class="t">load</code>) controls whether and when <i class="i">evaluation</i>
+occurs when <b class="b">eval-when</b> appears as a <i class="i">top level form</i> in
+code processed by <b class="b">compile-file</b>.  See <a class="ref" href="File-Compilation.html">File Compilation</a>.
+</p>
+<p>The use of the <i class="i">situation</i> <code class="t">:execute</code> (or <code class="t">eval</code>) controls whether
+evaluation occurs for other <b class="b">eval-when</b> <i class="i">forms</i>; that is, 
+those that are not <i class="i">top level forms</i>, or those in code processed by
+<b class="b">eval</b> or <b class="b">compile</b>.  If the <code class="t">:execute</code> situation is
+specified in such a <i class="i">form</i>, then the body <i class="i">forms</i> are processed as 
+an <i class="i">implicit progn</i>; otherwise, the <b class="b">eval-when</b> <i class="i">form</i>
+returns <b class="b">nil</b>.
+</p>
+<p><b class="b">eval-when</b> 
+normally appears as a <i class="i">top level form</i>, but it is meaningful
+for it to appear as a <i class="i">non-top-level form</i>.
+However, the compile-time side
+effects described in <a class="ref" href="Compilation.html">Compilation</a>
+only take place when <b class="b">eval-when</b> appears as a  
+<i class="i">top level form</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-3"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-3"> &para;</a></span></h4>
+
+<p>One example of the use of <b class="b">eval-when</b> is that for the 
+compiler to be able to read a file properly when it uses user-defined
+<i class="i">reader macros</i>, it is necessary to write
+</p>
+<div class="example">
+<pre class="example-preformatted"> (eval-when (:compile-toplevel :load-toplevel :execute)
+   (set-macro-character #\$ #'(lambda (stream char)
+                                (declare (ignore char))
+                                (list 'dollar (read stream))))) &rArr;  T
+</pre></div>
+
+<p>This causes the call to <b class="b">set-macro-character</b> to be executed
+in the compiler&rsquo;s execution environment, thereby modifying its
+reader syntax table.
+</p>
+<div class="example">
+<pre class="example-preformatted">;;;     The EVAL-WHEN in this case is not at toplevel, so only the :EXECUTE
+;;;     keyword is considered. At compile time, this has no effect.
+;;;     At load time (if the LET is at toplevel), or at execution time
+;;;     (if the LET is embedded in some other form which does not execute
+;;;     until later) this sets (SYMBOL-FUNCTION 'FOO1) to a function which
+;;;     returns 1.
+ (let ((x 1))
+   (eval-when (:execute :load-toplevel :compile-toplevel)
+     (setf (symbol-function 'foo1) #'(lambda () x))))
+
+;;;     If this expression occurs at the toplevel of a file to be compiled,
+;;;     it has BOTH a compile time AND a load-time effect of setting
+;;;     (SYMBOL-FUNCTION 'FOO2) to a function which returns 2.
+ (eval-when (:execute :load-toplevel :compile-toplevel)
+   (let ((x 2))
+     (eval-when (:execute :load-toplevel :compile-toplevel)
+       (setf (symbol-function 'foo2) #'(lambda () x)))))
+
+;;;     If this expression occurs at the toplevel of a file to be compiled,
+;;;     it has BOTH a compile time AND a load-time effect of setting the
+;;;     function cell of FOO3 to a function which returns 3.
+ (eval-when (:execute :load-toplevel :compile-toplevel)
+   (setf (symbol-function 'foo3) #'(lambda () 3)))
+
+;;; #4: This always does nothing. It simply returns NIL.
+ (eval-when (:compile-toplevel)
+   (eval-when (:compile-toplevel) 
+     (print 'foo4)))
+
+;;;     If this form occurs at toplevel of a file to be compiled, FOO5 is
+;;;     printed at compile time. If this form occurs in a non-top-level
+;;;     position, nothing is printed at compile time. Regardless of context,
+;;;     nothing is ever printed at load time or execution time.
+ (eval-when (:compile-toplevel) 
+   (eval-when (:execute)
+     (print 'foo5)))
+
+;;;     If this form occurs at toplevel of a file to be compiled, FOO6 is
+;;;     printed at compile time.  If this form occurs in a non-top-level
+;;;     position, nothing is printed at compile time. Regardless of context,
+;;;     nothing is ever printed at load time or execution time.
+ (eval-when (:execute :load-toplevel)
+   (eval-when (:compile-toplevel)
+     (print 'foo6)))
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-4"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-4"> &para;</a></span></h4>
+
+<p><a class="ref" href="compile_002dfile.html">compile-file                                                     [Function]</a>
+, <a class="ref" href="Compilation.html">Compilation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-3"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-3"> &para;</a></span></h4>
+
+<p>The following effects are logical consequences of the definition of 
+<b class="b">eval-when</b>:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>Execution of a single <b class="b">eval-when</b>
+expression executes the body code at most once.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><i class="i">Macros</i> intended for use in <i class="i">top level forms</i> 
+should be written so that side-effects are done by the <i class="i">forms</i>
+in the macro expansion.  The macro-expander itself should not do 
+the side-effects.
+</p>
+<p>For example:
+</p>
+<p>Wrong:  
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmacro foo ()
+   (really-foo)
+   `(really-foo))
+</pre></div>
+
+<p>Right:  
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmacro foo ()
+   `(eval-when (:compile-toplevel :execute :load-toplevel) (really-foo)))
+</pre></div>
+
+<p>Adherence to this convention means that such <i class="i">macros</i> behave
+intuitively when appearing as <i class="i">non-top-level forms</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Placing a variable binding around an <b class="b">eval-when</b> reliably 
+captures the binding because the compile-time-too mode cannot occur 
+ (<i class="i">i.e.</i>, introducing a variable binding means that the <b class="b">eval-when</b>
+      is not a <i class="i">top level form</i>).
+For example,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((x 3))
+   (eval-when (:execute :load-toplevel :compile-toplevel) (print x)))
+</pre></div>
+
+<p>prints <code class="t">3</code> 
+at execution (<i class="i">i.e.</i>, load) time, and does not print anything at
+compile time.  This is important so that expansions of 
+<b class="b">defun</b> and 
+<b class="b">defmacro</b> 
+can be done in terms of <b class="b">eval-when</b> and can correctly capture
+the <i class="i">lexical environment</i>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun bar (x) (defun foo () (+ x 3)))
+</pre></div>
+
+<p>might expand into
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun bar (x) 
+   (progn (eval-when (:compile-toplevel) 
+            (compiler::notice-function-definition 'foo '(x)))
+          (eval-when (:execute :load-toplevel)
+            (setf (symbol-function 'foo) #'(lambda () (+ x 3))))))
+</pre></div>
+
+<p>which would be treated by the above rules the same as
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun bar (x) 
+   (setf (symbol-function 'foo) #'(lambda () (+ x 3))))
+</pre></div>
+
+<p>when the definition of <code class="t">bar</code> is not a <i class="i">top level form</i>.
+</p></dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="load_002dtime_002dvalue.html">load-time-value                                          [Special Operator]</a>, Previous: <a href="eval.html">eval                                                             [Function]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/evenp.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>evenp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="evenp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="evenp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="exp.html" rel="next" title="exp">
+<link href="abs.html" rel="prev" title="abs">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="evenp">
+<div class="nav-panel">
+<p>
+Next: <a href="exp.html" accesskey="n" rel="next">exp, expt                                                        [Function]</a>, Previous: <a href="abs.html" accesskey="p" rel="prev">abs                                                              [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="evenp_002c-oddp-_005bFunction_005d"><span>12.2.30 evenp, oddp                                                      [Function]<a class="copiable-link" href="#evenp_002c-oddp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">evenp</code>  <i class="i">integer</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">oddp</code>  <i class="i">integer</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-215"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-215"> &para;</a></span></h4>
+
+<p><i class="i">integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-295"><span>Description::<a class="copiable-link" href="#Description_003a_003a-295"> &para;</a></span></h4>
+
+<p><b class="b">evenp</b> returns <i class="i">true</i> if <i class="i">integer</i> is even (divisible by two);
+otherwise, returns <i class="i">false</i>.
+</p>
+<p><b class="b">oddp</b> returns <i class="i">true</i> if <i class="i">integer</i> is odd (not divisible by two);
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-199"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-199"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (evenp 0) &rArr;  <i class="i">true</i>
+ (oddp 10000000000000000000000) &rArr;  <i class="i">false</i>
+ (oddp -1) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-89"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-89"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">integer</i> is not an <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-149"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-149"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (evenp <i class="i">integer</i>) &equiv; (not (oddp <i class="i">integer</i>))
+ (oddp <i class="i">integer</i>)  &equiv; (not (evenp <i class="i">integer</i>))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/every.html
@@ -0,0 +1,143 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>every (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="every (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="every (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="and.html" rel="next" title="and">
+<link href="constantly.html" rel="prev" title="constantly">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="every">
+<div class="nav-panel">
+<p>
+Next: <a href="and.html" accesskey="n" rel="next">and                                                                 [Macro]</a>, Previous: <a href="constantly.html" accesskey="p" rel="prev">constantly                                                       [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="every_002c-some_002c-notevery_002c-notany-_005bFunction_005d"><span>5.3.40 every, some, notevery, notany                                    [Function]<a class="copiable-link" href="#every_002c-some_002c-notevery_002c-notany-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">every</code>  <i class="i">predicate <span class="r">&amp;rest</span> sequences^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">some</code>  <i class="i">predicate <span class="r">&amp;rest</span> sequences^+</i> &rArr;  <i class="i">result</i>
+</p>
+<p><code class="code">notevery</code>  <i class="i">predicate <span class="r">&amp;rest</span> sequences^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">notany</code>  <i class="i">predicate <span class="r">&amp;rest</span> sequences^+</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-59"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-59"> &para;</a></span></h4>
+
+<p><i class="i">predicate</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of
+ as many <i class="i">arguments</i> as there are <i class="i">sequences</i>.
+</p>
+<p><i class="i">sequence</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<p><i class="i">result</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>. 
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-93"><span>Description::<a class="copiable-link" href="#Description_003a_003a-93"> &para;</a></span></h4>
+
+<p><b class="b">every</b>, <b class="b">some</b>, <b class="b">notevery</b>, and <b class="b">notany</b>
+test <i class="i">elements</i> of <i class="i">sequences</i> for satisfaction of a given <i class="i">predicate</i>.
+The first argument to <i class="i">predicate</i> is an <i class="i">element</i> of the first <i class="i">sequence</i>;
+each succeeding argument is an <i class="i">element</i> of a succeeding <i class="i">sequence</i>.
+</p>
+<p><i class="i">Predicate</i> is first applied to the elements
+with index <code class="t">0</code> in each of the <i class="i">sequences</i>, and possibly then to
+the elements with index <code class="t">1</code>, and so on, until a termination
+criterion is met or the end of the shortest of the <i class="i">sequences</i> is reached.
+</p>
+<p><b class="b">every</b> returns <i class="i">false</i> as soon 
+as any invocation of <i class="i">predicate</i> returns <i class="i">false</i>.
+If the end of a <i class="i">sequence</i> is reached,
+<b class="b">every</b> returns <i class="i">true</i>.
+Thus, <b class="b">every</b> returns <i class="i">true</i> if and only if
+every invocation of <i class="i">predicate</i> returns <i class="i">true</i>.
+</p>
+<p><b class="b">some</b> returns the first <i class="i">non-nil</i> value 
+which is returned by an invocation of <i class="i">predicate</i>.
+If the end of a <i class="i">sequence</i> is reached without any invocation of the
+<i class="i">predicate</i> returning <i class="i">true</i>, <b class="b">some</b> returns <i class="i">false</i>.
+Thus, <b class="b">some</b> returns <i class="i">true</i> if and only if
+some invocation of <i class="i">predicate</i> returns <i class="i">true</i>.
+</p>
+<p><b class="b">notany</b> returns <i class="i">false</i> 
+as soon as any invocation of <i class="i">predicate</i> returns <i class="i">true</i>.
+If the end of a <i class="i">sequence</i> is reached,
+<b class="b">notany</b> returns <i class="i">true</i>.
+Thus, <b class="b">notany</b> returns <i class="i">true</i> if and only if 
+it is not the case that any invocation of <i class="i">predicate</i> returns <i class="i">true</i>.
+</p>
+<p><b class="b">notevery</b> returns <i class="i">true</i> as soon as any invocation of
+<i class="i">predicate</i> returns <i class="i">false</i>.
+If the end of a <i class="i">sequence</i> is reached,
+<b class="b">notevery</b> returns <i class="i">false</i>.
+Thus, <b class="b">notevery</b> returns <i class="i">true</i> if and only if 
+it is not the case that every invocation of <i class="i">predicate</i> returns <i class="i">true</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-67"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-67"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (every #'characterp &quot;abc&quot;) &rArr;  <i class="i">true</i>
+ (some #'= '(1 2 3 4 5) '(5 4 3 2 1)) &rArr;  <i class="i">true</i>
+ (notevery #'&lt; '(1 2 3 4) '(5 6 7 8) '(9 10 11 12)) &rArr;  <i class="i">false</i>
+ (notany #'&gt; '(1 2 3 4) '(5 6 7 8) '(9 10 11 12)) &rArr;  <i class="i">true</i> 
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-17"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-17"> &para;</a></span></h4>
+
+<p>Should signal <b class="b">type-error</b> if its first argument is neither a
+<i class="i">symbol</i> nor a <i class="i">function</i> or if any subsequent
+argument is not a <i class="i">proper sequence</i>.
+</p>
+<p>Other exceptional situations are possible, depending on the nature
+of the <i class="i">predicate</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-77"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-77"> &para;</a></span></h4>
+
+<p><a class="ref" href="and.html">and                                                                 [Macro]</a>
+,
+<a class="ref" href="or.html">or                                                                  [Macro]</a>
+,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-49"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-49"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (notany <i class="i">predicate</i> {<i class="i">sequence</i>}*) &equiv; (not (some <i class="i">predicate</i> {<i class="i">sequence</i>}*))
+ (notevery <i class="i">predicate</i> {<i class="i">sequence</i>}*) &equiv; (not (every <i class="i">predicate</i> {<i class="i">sequence</i>}*))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="and.html">and                                                                 [Macro]</a>, Previous: <a href="constantly.html">constantly                                                       [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/exp.html
@@ -0,0 +1,158 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>exp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="exp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="exp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="gcd.html" rel="next" title="gcd">
+<link href="evenp.html" rel="prev" title="evenp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="exp">
+<div class="nav-panel">
+<p>
+Next: <a href="gcd.html" accesskey="n" rel="next">gcd                                                              [Function]</a>, Previous: <a href="evenp.html" accesskey="p" rel="prev">evenp, oddp                                                      [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="exp_002c-expt-_005bFunction_005d"><span>12.2.31 exp, expt                                                        [Function]<a class="copiable-link" href="#exp_002c-expt-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">exp</code>  <i class="i">number</i> &rArr;  <i class="i">result</i>
+</p>
+<p><code class="code">expt</code>  <i class="i">base-number power-number</i> &rArr;  <i class="i">result</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-216"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-216"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">base-number</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">power-number</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">result</i>&mdash;a <i class="i">number</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-296"><span>Description::<a class="copiable-link" href="#Description_003a_003a-296"> &para;</a></span></h4>
+
+<p><b class="b">exp</b> and <b class="b">expt</b> perform exponentiation.
+</p>
+<p><b class="b">exp</b> returns <i class="i">e</i> raised to the power <i class="i">number</i>,
+where <i class="i">e</i> is the base of the natural logarithms.
+<b class="b">exp</b> has no branch cut.
+</p>
+<p><b class="b">expt</b> returns <i class="i">base-number</i> 
+raised to the power <i class="i">power-number</i>.
+If the <i class="i">base-number</i> is a <i class="i">rational</i> 
+and <i class="i">power-number</i> is
+an <i class="i">integer</i>,
+the calculation is exact and the result will be of <i class="i">type</i> <b class="b">rational</b>;
+otherwise a floating-point approximation might result.
+</p>
+<p>For <b class="b">expt</b> of a <i class="i">complex rational</i> to an <i class="i">integer</i> power,
+the calculation must be exact and the result is
+of type <code class="t">(or rational (complex rational))</code>.
+</p>
+<p>The result of <b class="b">expt</b> can be a <i class="i">complex</i>,
+even when neither argument is a <i class="i">complex</i>,
+if <i class="i">base-number</i> is negative and <i class="i">power-number</i>
+is not an <i class="i">integer</i>. 
+The result is always the <i class="i">principal</i> <i class="i">complex</i> <i class="i">value</i>.
+For example, <code class="t">(expt -8 1/3)</code> is not permitted to return <code class="t">-2</code>,
+even though <code class="t">-2</code> is one of the cube roots of <code class="t">-8</code>. 
+The <i class="i">principal</i> cube root is a <i class="i">complex</i>
+approximately equal to <code class="t">#C(1.0 1.73205)</code>, not <code class="t">-2</code>.
+</p>
+<p><b class="b">expt</b> is defined
+as <i class="i">b^x = e^<i class="i">x log b\/</i></i>.
+This defines the <i class="i">principal</i> <i class="i">values</i> precisely.  The range of
+<b class="b">expt</b> is the entire complex plane.  Regarded
+as a function of <i class="i">x</i>, with <i class="i">b</i> fixed, there is no branch cut.
+Regarded as a function of <i class="i">b</i>, with <i class="i">x</i> fixed, there is in general
+a branch cut along the negative real axis, continuous with quadrant II.
+The domain excludes the origin.
+By definition, 0^0=1.  If <i class="i">b</i>=0 and the real part of <i class="i">x</i> is strictly
+positive, then 
+<i class="i">b^x</i>=0. For all other values of <i class="i">x</i>, 0^<i class="i">x</i> 
+is an error.
+</p>
+<p>When <i class="i">power-number</i> is an <i class="i">integer</i> <code class="t">0</code>,
+then the result is always the value one in the <i class="i">type</i> 
+of <i class="i">base-number</i>,
+even if the <i class="i">base-number</i> is zero (of any <i class="i">type</i>).  That is:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (expt x 0) &equiv; (coerce 1 (type-of x))
+</pre></div>
+
+<p>If <i class="i">power-number</i> is a zero of any other <i class="i">type</i>,
+then the result is also the value one, in the <i class="i">type</i> of the arguments
+after the application of the contagion rules in <a class="ref" href="Contagion-in-Numeric-Operations.html">Contagion in Numeric Operations</a>,
+with one exception:
+the consequences are undefined if <i class="i">base-number</i> is zero when <i class="i">power-number</i>
+is zero and not of <i class="i">type</i> <b class="b">integer</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-200"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-200"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (exp 0) &rArr;  1.0
+ (exp 1) &rArr;  2.718282
+ (exp (log 5)) &rArr;  5.0 
+ (expt 2 8) &rArr;  256
+ (expt 4 .5) &rArr;  2.0
+ (expt #c(0 1) 2) &rArr;  -1
+ (expt #c(2 2) 3) &rArr;  #C(-16 16)
+ (expt #c(2 2) 4) &rArr;  -64 
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-249"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-249"> &para;</a></span></h4>
+
+<p><a class="ref" href="log.html">log                                                              [Function]</a>
+,
+<a class="ref" href="Rule-of-Float-Substitutability.html">Rule of Float Substitutability</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-150"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-150"> &para;</a></span></h4>
+
+<p>Implementations of <b class="b">expt</b> are permitted to use different algorithms
+for the cases of a <i class="i">power-number</i> of <i class="i">type</i> <b class="b">rational</b> 
+	     and a <i class="i">power-number</i> of <i class="i">type</i> <b class="b">float</b>.
+</p>
+<p>Note that by the following logic, 
+<code class="t">(sqrt (expt <i class="i">x</i> 3))</code> is not equivalent to 
+<code class="t">(expt <i class="i">x</i> 3/2)</code>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq x (exp (/ (* 2 pi #c(0 1)) 3)))         ;exp(2.pi.i/3)
+ (expt x 3) &rArr;  1 ;except for round-off error
+ (sqrt (expt x 3)) &rArr;  1 ;except for round-off error
+ (expt x 3/2) &rArr;  -1 ;except for round-off error
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="gcd.html">gcd                                                              [Function]</a>, Previous: <a href="evenp.html">evenp, oddp                                                      [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/export.html
@@ -0,0 +1,152 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>export (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="export (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="export (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="find_002dsymbol.html" rel="next" title="find-symbol">
+<link href="package.html" rel="prev" title="package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="export">
+<div class="nav-panel">
+<p>
+Next: <a href="find_002dsymbol.html" accesskey="n" rel="next">find-symbol                                                      [Function]</a>, Previous: <a href="package.html" accesskey="p" rel="prev">package                                                      [System Class]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="export-_005bFunction_005d"><span>11.2.2 export                                                           [Function]<a class="copiable-link" href="#export-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">export</code>  <i class="i">symbols <span class="r">&amp;optional</span> package</i> &rArr;  <i class="i"><b class="b">t</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-174"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-174"> &para;</a></span></h4>
+
+<p><i class="i">symbols</i>&mdash;a <i class="i">designator</i> for a <i class="i">list</i> of <i class="i">symbols</i>.
+</p>
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<p>The default is the <i class="i">current package</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-238"><span>Description::<a class="copiable-link" href="#Description_003a_003a-238"> &para;</a></span></h4>
+
+<p><b class="b">export</b> makes one or more <i class="i">symbols</i> that are <i class="i">accessible</i> 
+in <i class="i">package</i> (whether directly or by inheritance) be <i class="i">external symbols</i>
+of that <i class="i">package</i>. 
+</p>
+<p>If any of the <i class="i">symbols</i> is already <i class="i">accessible</i> as 
+an <i class="i">external symbol</i> of <i class="i">package</i>,
+<b class="b">export</b> has no effect on that <i class="i">symbol</i>.
+If the <i class="i">symbol</i> is 
+<i class="i">present</i> in <i class="i">package</i> 
+as an internal symbol, it is simply changed to external status.  
+If it is <i class="i">accessible</i> as an <i class="i">internal symbol</i> via <b class="b">use-package</b>, 
+it
+is first <i class="i">imported</i> into <i class="i">package</i>,
+then <i class="i">exported</i>.
+(The <i class="i">symbol</i> is then <i class="i">present</i> in the <i class="i">package</i> 
+whether or not <i class="i">package</i> continues to use the <i class="i">package</i> through 
+which the <i class="i">symbol</i> was originally inherited.)  
+</p>
+<p><b class="b">export</b> makes 
+each <i class="i">symbol</i>
+<i class="i">accessible</i> to all the <i class="i">packages</i> that use <i class="i">package</i>.
+All of these <i class="i">packages</i> are checked for name conflicts:
+<code class="t">(export <i class="i">s</i> <i class="i">p</i>)</code> does
+<code class="t">(find-symbol (symbol-name <i class="i">s</i>) <i class="i">q</i>)</code> for each package <i class="i">q</i>
+in <code class="t">(package-used-by-list <i class="i">p</i>)</code>.  Note that in the usual case of
+an <b class="b">export</b> during the initial definition of a <i class="i">package</i>, 
+the
+result of <b class="b">package-used-by-list</b>
+is <b class="b">nil</b> and the name-conflict checking
+takes negligible time.
+When multiple changes are to be made,
+for example when <b class="b">export</b> 
+is given a <i class="i">list</i> of <i class="i">symbols</i>, it is
+permissible for the implementation to process each change separately,
+so that aborting from a name
+conflict caused by any but the first <i class="i">symbol</i> in the 
+<i class="i">list</i> does not unexport the
+first <i class="i">symbol</i> in the <i class="i">list</i>. 
+However, aborting from a name-conflict error
+caused by <b class="b">export</b> 
+of one of <i class="i">symbols</i> does not leave that <i class="i">symbol</i> 
+<i class="i">accessible</i>
+to some <i class="i">packages</i> 
+and <i class="i">inaccessible</i> to others; with respect to
+each of <i class="i">symbols</i> processed, <b class="b">export</b>
+behaves as if it were as an atomic operation.
+</p>
+<p>A name conflict in <b class="b">export</b> between one of
+<i class="i">symbols</i> being exported and a
+<i class="i">symbol</i> already <i class="i">present</i> in a <i class="i">package</i> 
+that would inherit the
+newly-exported <i class="i">symbol</i> 
+may be resolved in favor of the exported <i class="i">symbol</i>
+by uninterning the other one, or in favor of the already-present
+<i class="i">symbol</i> by making it a shadowing symbol.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-157"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-157"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (make-package 'temp :use nil) &rArr;  #&lt;PACKAGE &quot;TEMP&quot;&gt;
+ (use-package 'temp) &rArr;  T
+ (intern &quot;TEMP-SYM&quot; 'temp) &rArr;  TEMP::TEMP-SYM, NIL
+ (find-symbol &quot;TEMP-SYM&quot;) &rArr;  NIL, NIL
+ (export (find-symbol &quot;TEMP-SYM&quot; 'temp) 'temp) &rArr;  T
+ (find-symbol &quot;TEMP-SYM&quot;) &rArr;  TEMP-SYM, :INHERITED
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-24"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-24"> &para;</a></span></h4>
+
+<p>The package system is modified.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-42"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-42"> &para;</a></span></h4>
+
+<p><i class="i">Accessible</i> <i class="i">symbols</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-63"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-63"> &para;</a></span></h4>
+
+<p>If any of the <i class="i">symbols</i> is not <i class="i">accessible</i> at all in <i class="i">package</i>,
+an error of <i class="i">type</i> <b class="b">package-error</b> is signaled that is <i class="i">correctable</i> 
+by permitting the <i class="i">user</i>
+to interactively specify whether that <i class="i">symbol</i> should be <i class="i">imported</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-211"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-211"> &para;</a></span></h4>
+
+<p><a class="ref" href="import.html">import                                                           [Function]</a>
+,
+<a class="ref" href="unexport.html">unexport                                                         [Function]</a>
+,
+<a class="ref" href="Package-Concepts.html">Package Concepts</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="find_002dsymbol.html">find-symbol                                                      [Function]</a>, Previous: <a href="package.html">package                                                      [System Class]</a>, Up: <a href="Packages-Dictionary.html">Packages Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/extended_002dchar.html
@@ -0,0 +1,59 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>extended-char (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="extended-char (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="extended-char (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="char_003d.html" rel="next" title="char=">
+<link href="standard_002dchar.html" rel="prev" title="standard-char">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="extended_002dchar">
+<div class="nav-panel">
+<p>
+Next: <a href="char_003d.html" accesskey="n" rel="next">char=, char/=, char&lt;, char&gt;, char&lt;=, char&gt;=,</a>, Previous: <a href="standard_002dchar.html" accesskey="p" rel="prev">standard-char                                                        [Type]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="extended_002dchar-_005bType_005d"><span>13.2.4 extended-char                                                        [Type]<a class="copiable-link" href="#extended_002dchar-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-12"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-12"> &para;</a></span></h4>
+
+<p><b class="b">extended-char</b>,
+<b class="b">character</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-353"><span>Description::<a class="copiable-link" href="#Description_003a_003a-353"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">extended-char</b> is equivalent to the <i class="i">type</i> <code class="t">(and character (not base-char))</code>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-186"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-186"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">extended-char</b> might 
+have no <i class="i">elements</i>_4
+in <i class="i">implementations</i> in which all <i class="i">characters</i> are of <i class="i">type</i> <b class="b">base-char</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/fboundp.html
@@ -0,0 +1,116 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>fboundp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="fboundp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="fboundp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="fmakunbound.html" rel="next" title="fmakunbound">
+<link href="fdefinition.html" rel="prev" title="fdefinition">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="fboundp">
+<div class="nav-panel">
+<p>
+Next: <a href="fmakunbound.html" accesskey="n" rel="next">fmakunbound                                                      [Function]</a>, Previous: <a href="fdefinition.html" accesskey="p" rel="prev">fdefinition                                                      [Accessor]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="fboundp-_005bFunction_005d"><span>5.3.4 fboundp                                                          [Function]<a class="copiable-link" href="#fboundp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">fboundp</code>  <i class="i">name</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Pronunciation_003a_003a"><span>Pronunciation::<a class="copiable-link" href="#Pronunciation_003a_003a"> &para;</a></span></h4>
+
+<p>pronounced ,ef &rsquo;baund p\=e
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-28"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-28"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">function name</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-57"><span>Description::<a class="copiable-link" href="#Description_003a_003a-57"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">name</i> is <i class="i">fbound</i>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-34"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-34"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (fboundp 'car) &rArr;  <i class="i">true</i>
+ (fboundp 'nth-value) &rArr;  <i class="i">false</i>
+ (fboundp 'with-open-file) &rArr;  <i class="i">true</i>
+ (fboundp 'unwind-protect) &rArr;  <i class="i">true</i>
+ (defun my-function (x) x) &rArr;  MY-FUNCTION
+ (fboundp 'my-function) &rArr;  <i class="i">true</i>
+ (let ((saved-definition (symbol-function 'my-function)))
+   (unwind-protect (progn (fmakunbound 'my-function)
+                          (fboundp 'my-function))
+     (setf (symbol-function 'my-function) saved-definition)))
+&rArr;  <i class="i">false</i>
+ (fboundp 'my-function) &rArr;  <i class="i">true</i>
+ (defmacro my-macro (x) `',x) &rArr;  MY-MACRO
+ (fboundp 'my-macro) &rArr;  <i class="i">true</i>
+ (fmakunbound 'my-function) &rArr;  MY-FUNCTION
+ (fboundp 'my-function) &rArr;  <i class="i">false</i>
+ (flet ((my-function (x) x))
+   (fboundp 'my-function)) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-11"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-11"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">name</i> is not a <i class="i">function name</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-44"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-44"> &para;</a></span></h4>
+
+<p><a class="ref" href="symbol_002dfunction.html">symbol-function                                                  [Accessor]</a>
+, 
+<a class="ref" href="fmakunbound.html">fmakunbound                                                      [Function]</a>
+, 
+<a class="ref" href="fdefinition.html">fdefinition                                                      [Accessor]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-26"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-26"> &para;</a></span></h4>
+
+<p>It is permissible to call <b class="b">symbol-function</b> on any <i class="i">symbol</i>
+that is <i class="i">fbound</i>.
+</p>
+<p><b class="b">fboundp</b> is sometimes used to &ldquo;guard&rdquo;
+an access to the <i class="i">function cell</i>, as in:
+</p><div class="example">
+<pre class="example-preformatted">(if (fboundp x) (symbol-function x))
+</pre></div>
+
+<p>Defining a <i class="i">setf expander</i> <i class="i">F</i> does not cause the <i class="i">setf function</i>
+<code class="t">(setf <i class="i">F</i>)</code> to become defined.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="fmakunbound.html">fmakunbound                                                      [Function]</a>, Previous: <a href="fdefinition.html">fdefinition                                                      [Accessor]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/fdefinition.html
@@ -0,0 +1,114 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>fdefinition (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="fdefinition (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="fdefinition (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="fboundp.html" rel="next" title="fboundp">
+<link href="defun.html" rel="prev" title="defun">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="fdefinition">
+<div class="nav-panel">
+<p>
+Next: <a href="fboundp.html" accesskey="n" rel="next">fboundp                                                          [Function]</a>, Previous: <a href="defun.html" accesskey="p" rel="prev">defun                                                               [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="fdefinition-_005bAccessor_005d"><span>5.3.3 fdefinition                                                      [Accessor]<a class="copiable-link" href="#fdefinition-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">fdefinition</code>  <i class="i">function-name</i> &rArr;  <i class="i">definition</i>
+</p>
+<p>(setf (<code class="code">         fdefinition</code> <i class="i">function-name</i>) new-definition)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-27"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-27"> &para;</a></span></h4>
+
+<p><i class="i">function-name</i>&mdash;a <i class="i">function name</i>.
+</p>
+<p>In the non-<b class="b">setf</b> case, 
+the <i class="i">name</i> must be <i class="i">fbound</i> in the <i class="i">global environment</i>.
+</p>
+<p><i class="i">definition</i>&mdash;Current global function definition named by <i class="i">function-name</i>.  
+</p>
+<p><i class="i">new-definition</i>&mdash;a <i class="i">function</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-56"><span>Description::<a class="copiable-link" href="#Description_003a_003a-56"> &para;</a></span></h4>
+
+<p><b class="b">fdefinition</b> <i class="i">accesses</i> the current global function definition
+named by <i class="i">function-name</i>.  The definition may be a
+<i class="i">function</i> or may be an <i class="i">object</i> representing a 
+<i class="i">special form</i> or <i class="i">macro</i>.
+</p>
+<p>The value returned by <b class="b">fdefinition</b> when <b class="b">fboundp</b> returns true
+but the <i class="i">function-name</i> denotes a <i class="i">macro</i> or 
+<i class="i">special form</i> is not well-defined, but <b class="b">fdefinition</b> does not signal an error. 
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-10"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-10"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">function-name</i> is not a <i class="i">function name</i>.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">undefined-function</b> is signaled 
+in the non-<b class="b">setf</b> case if <i class="i">function-name</i> is not <i class="i">fbound</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-43"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-43"> &para;</a></span></h4>
+
+<p><a class="ref" href="fboundp.html">fboundp                                                          [Function]</a>
+,
+<a class="ref" href="fmakunbound.html">fmakunbound                                                      [Function]</a>
+,
+<a class="ref" href="macro_002dfunction.html">macro-function                                                   [Accessor]</a>
+,
+</p>
+<p><a class="ref" href="special_002doperator_002dp.html">special-operator-p                                               [Function]</a>
+,
+</p>
+<p><a class="ref" href="symbol_002dfunction.html">symbol-function                                                  [Accessor]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-25"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-25"> &para;</a></span></h4>
+
+<p><b class="b">fdefinition</b> cannot <i class="i">access</i> the value of a lexical function name
+produced by <b class="b">flet</b> or <b class="b">labels</b>; it can <i class="i">access</i> only
+the global function value.
+</p>
+<p><b class="b">setf</b> can be used with 
+<b class="b">fdefinition</b> to replace a global function
+definition when the <i class="i">function-name</i>&rsquo;s function definition 
+does not represent a <i class="i">special form</i>.
+</p>
+<p><b class="b">setf</b> of <b class="b">fdefinition</b> 
+requires a <i class="i">function</i> as the new value.
+It is an error to set the <b class="b">fdefinition</b> of a <i class="i">function-name</i>
+to a <i class="i">symbol</i>, a <i class="i">list</i>, or the value returned
+by <b class="b">fdefinition</b> on the name of a <i class="i">macro</i> 
+or <i class="i">special form</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="fboundp.html">fboundp                                                          [Function]</a>, Previous: <a href="defun.html">defun                                                               [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/file_002dauthor.html
@@ -0,0 +1,84 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>file-author (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="file-author (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="file-author (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Files-Dictionary.html" rel="up" title="Files Dictionary">
+<link href="file_002dwrite_002ddate.html" rel="next" title="file-write-date">
+<link href="truename.html" rel="prev" title="truename">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="file_002dauthor">
+<div class="nav-panel">
+<p>
+Next: <a href="file_002dwrite_002ddate.html" accesskey="n" rel="next">file-write-date                                                  [Function]</a>, Previous: <a href="truename.html" accesskey="p" rel="prev">truename                                                         [Function]</a>, Up: <a href="Files-Dictionary.html" accesskey="u" rel="up">Files Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="file_002dauthor-_005bFunction_005d"><span>20.2.5 file-author                                                      [Function]<a class="copiable-link" href="#file_002dauthor-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">file-author</code>  <i class="i">pathspec</i> &rArr;  <i class="i">author</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-407"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-407"> &para;</a></span></h4>
+
+<p><i class="i">pathspec</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">author</i>&mdash;a <i class="i">string</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-526"><span>Description::<a class="copiable-link" href="#Description_003a_003a-526"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">string</i> naming the author of the <i class="i">file</i> specified by <i class="i">pathspec</i>,
+or <b class="b">nil</b> if the author&rsquo;s name cannot be determined.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-383"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-383"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (with-open-file (stream &quot;&gt;relativity&gt;general.text&quot;)
+   (file-author s))
+&rArr;  &quot;albert&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-78"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-78"> &para;</a></span></h4>
+<p>The host computer&rsquo;s file system.
+</p>
+<p>Other users of the <i class="i">file</i> named by <i class="i">pathspec</i>.
+</p><h4 class="subsubheading" id="Exceptional-Situations_003a_003a-187"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-187"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> is signaled if <i class="i">pathspec</i> is <i class="i">wild</i>.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> is signaled
+if the <i class="i">file system</i> cannot perform the requested operation.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-429"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-429"> &para;</a></span></h4>
+
+<p><b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/file_002derror.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>file-error (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="file-error (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="file-error (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Files-Dictionary.html" rel="up" title="Files Dictionary">
+<link href="file_002derror_002dpathname.html" rel="next" title="file-error-pathname">
+<link href="delete_002dfile.html" rel="prev" title="delete-file">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="file_002derror">
+<div class="nav-panel">
+<p>
+Next: <a href="file_002derror_002dpathname.html" accesskey="n" rel="next">file-error-pathname                                              [Function]</a>, Previous: <a href="delete_002dfile.html" accesskey="p" rel="prev">delete-file                                                      [Function]</a>, Up: <a href="Files-Dictionary.html" accesskey="u" rel="up">Files Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="file_002derror-_005bCondition-Type_005d"><span>20.2.9 file-error                                                 [Condition Type]<a class="copiable-link" href="#file_002derror-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-61"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-61"> &para;</a></span></h4>
+<p><b class="b">file-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-530"><span>Description::<a class="copiable-link" href="#Description_003a_003a-530"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">file-error</b> consists of error conditions that occur during 
+an attempt to open or close a file, or during some low-level transactions 
+with a file system.  The &ldquo;offending pathname&rdquo; is initialized by 
+the <code class="t">:pathname</code> initialization argument to <b class="b">make-condition</b>, and is <i class="i">accessed</i>
+by the <i class="i">function</i> <b class="b">file-error-pathname</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-433"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-433"> &para;</a></span></h4>
+
+<p><span class="r">file-error-pathname</span>,
+<a class="ref" href="open.html">open                                                             [Function]</a>
+,
+<a class="ref" href="probe_002dfile.html">probe-file                                                       [Function]</a>
+,
+<a class="ref" href="directory.html">directory                                                        [Function]</a>
+,
+<a class="ref" href="ensure_002ddirectories_002dexist.html">ensure-directories-exist                                         [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/file_002derror_002dpathname.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>file-error-pathname (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="file-error-pathname (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="file-error-pathname (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Files-Dictionary.html" rel="up" title="Files Dictionary">
+<link href="file_002derror.html" rel="prev" title="file-error">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="file_002derror_002dpathname">
+<div class="nav-panel">
+<p>
+Previous: <a href="file_002derror.html" accesskey="p" rel="prev">file-error                                                 [Condition Type]</a>, Up: <a href="Files-Dictionary.html" accesskey="u" rel="up">Files Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="file_002derror_002dpathname-_005bFunction_005d"><span>20.2.10 file-error-pathname                                              [Function]<a class="copiable-link" href="#file_002derror_002dpathname-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">file-error-pathname</code>  <i class="i">condition</i> &rArr;  <i class="i">pathspec</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-411"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-411"> &para;</a></span></h4>
+
+<p><i class="i">condition</i>&mdash;a <i class="i">condition</i> of <i class="i">type</i> <b class="b">file-error</b>.
+</p>
+<p><i class="i">pathspec</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-531"><span>Description::<a class="copiable-link" href="#Description_003a_003a-531"> &para;</a></span></h4>
+
+<p>Returns the &ldquo;offending pathname&rdquo; of a <i class="i">condition</i> of <i class="i">type</i> <b class="b">file-error</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-191"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-191"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-434"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-434"> &para;</a></span></h4>
+
+<p><b class="b">file-error</b>,
+<a class="ref" href="Conditions.html">Conditions</a>
+</p>
+
+
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/file_002dlength.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>file-length (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="file-length (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="file-length (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="file_002dposition.html" rel="next" title="file-position">
+<link href="write_002dsequence.html" rel="prev" title="write-sequence">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="file_002dlength">
+<div class="nav-panel">
+<p>
+Next: <a href="file_002dposition.html" accesskey="n" rel="next">file-position                                                    [Function]</a>, Previous: <a href="write_002dsequence.html" accesskey="p" rel="prev">write-sequence                                                   [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="file_002dlength-_005bFunction_005d"><span>21.2.26 file-length                                                      [Function]<a class="copiable-link" href="#file_002dlength-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">file-length</code>  <i class="i">stream</i> &rArr;  <i class="i">length</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-427"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-427"> &para;</a></span></h4>
+
+<p><i class="i">stream</i>&mdash;a <i class="i">stream associated with a file</i>.
+</p>
+<p><i class="i">length</i>&mdash;a non-negative <i class="i">integer</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-557"><span>Description::<a class="copiable-link" href="#Description_003a_003a-557"> &para;</a></span></h4>
+
+<p><b class="b">file-length</b> returns the length of <i class="i">stream</i>,  
+or <b class="b">nil</b> if the length cannot be determined.
+</p>
+<p>For a binary file, the length is measured in units of
+the <i class="i">element type</i> of the <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-404"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-404"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (with-open-file (s &quot;decimal-digits.text&quot; 
+                    :direction :output :if-exists :error)
+   (princ &quot;0123456789&quot; s)
+   (truename s))
+&rArr;  #P&quot;A:&gt;Joe&gt;decimal-digits.text.1&quot;
+ (with-open-file (s &quot;decimal-digits.text&quot;)
+   (file-length s))
+&rArr;  10
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-205"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-205"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">stream</i> is not a <i class="i">stream associated with a file</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-454"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-454"> &para;</a></span></h4>
+
+<p><a class="ref" href="open.html">open                                                             [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/file_002dposition.html
@@ -0,0 +1,163 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>file-position (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="file-position (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="file-position (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="file_002dstring_002dlength.html" rel="next" title="file-string-length">
+<link href="file_002dlength.html" rel="prev" title="file-length">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="file_002dposition">
+<div class="nav-panel">
+<p>
+Next: <a href="file_002dstring_002dlength.html" accesskey="n" rel="next">file-string-length                                               [Function]</a>, Previous: <a href="file_002dlength.html" accesskey="p" rel="prev">file-length                                                      [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="file_002dposition-_005bFunction_005d"><span>21.2.27 file-position                                                    [Function]<a class="copiable-link" href="#file_002dposition-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">file-position</code>  <i class="i">stream</i> &rArr;  <i class="i">position</i>
+</p>
+<p><code class="code">file-position</code>  <i class="i">stream position-spec</i> &rArr;  <i class="i">success-p</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-428"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-428"> &para;</a></span></h4>
+
+<p><i class="i">stream</i>&mdash;a <i class="i">stream</i>.
+</p>
+<p><i class="i">position-spec</i>&mdash;a <i class="i">file position designator</i>.
+</p>
+<p><i class="i">position</i>&mdash;a <i class="i">file position</i> or <b class="b">nil</b>.
+</p>
+<p><i class="i">success-p</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-558"><span>Description::<a class="copiable-link" href="#Description_003a_003a-558"> &para;</a></span></h4>
+
+<p>Returns or changes the current position within a <i class="i">stream</i>.
+</p>
+<p>When <i class="i">position-spec</i> is not supplied,
+<b class="b">file-position</b> returns the current <i class="i">file position</i> in the <i class="i">stream</i>,
+or <b class="b">nil</b> if this cannot be determined.
+</p>
+<p>When <i class="i">position-spec</i> is supplied,
+the <i class="i">file position</i> in <i class="i">stream</i> is set to that <i class="i">file position</i> (if possible).
+<b class="b">file-position</b> returns <i class="i">true</i> 
+if the repositioning is performed successfully,
+or <i class="i">false</i> if it is not.
+</p>
+<p>An <i class="i">integer</i> returned by <b class="b">file-position</b> of one argument 
+should be acceptable as <i class="i">position-spec</i> for use with the same file.
+</p>
+<p>For a character file,
+performing a single <b class="b">read-char</b> or <b class="b">write-char</b> operation
+may cause the file position to be increased by more than 1 because of
+character-set translations (such as translating between the <span class="r">Common Lisp</span>
+<code class="t">#\Newline</code> character and an external ASCII
+carriage-return/line-feed sequence) and other aspects of the
+implementation.  For a binary file, every <b class="b">read-byte</b> 
+or <b class="b">write-byte</b>
+operation increases the file position by 1.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-405"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-405"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun tester ()
+   (let ((noticed '()) file-written)
+     (flet ((notice (x) (push x noticed) x))
+       (with-open-file (s &quot;test.bin&quot; 
+                          :element-type '(unsigned-byte 8)
+                          :direction :output
+                          :if-exists :error)
+          (notice (file-position s)) ;1
+          (write-byte 5 s) 
+          (write-byte 6 s)
+          (let ((p (file-position s)))
+            (notice p) ;2
+            (notice (when p (file-position s (1- p))))) ;3
+          (write-byte 7 s)
+          (notice (file-position s)) ;4
+          (setq file-written (truename s)))
+        (with-open-file (s file-written
+                           :element-type '(unsigned-byte 8)
+                           :direction :input)
+          (notice (file-position s)) ;5
+          (let ((length (file-length s)))
+            (notice length) ;6
+            (when length
+              (dotimes (i length)
+                (notice (read-byte s)))))) ;7,...
+        (nreverse noticed))))
+&rArr;  tester
+ (tester)
+&rArr;  (0 2 T 2 0 2 5 7)
+<i class="i">OR</i>&rArr; (0 2 NIL 3 0 3 5 6 7)
+<i class="i">OR</i>&rArr; (NIL NIL NIL NIL NIL NIL)
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-66"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-66"> &para;</a></span></h4>
+
+<p>When the <i class="i">position-spec</i> argument is supplied,
+the <i class="i">file position</i> in the <i class="i">stream</i> might be moved.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-90"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-90"> &para;</a></span></h4>
+
+<p>The value returned by <b class="b">file-position</b> increases monotonically
+as input or output operations are performed.  
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-206"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-206"> &para;</a></span></h4>
+
+<p>If <i class="i">position-spec</i> is supplied, but is too large or otherwise inappropriate, 
+an error is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-455"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-455"> &para;</a></span></h4>
+
+<p><a class="ref" href="file_002dlength.html">file-length                                                      [Function]</a>
+,
+<a class="ref" href="file_002dstring_002dlength.html">file-string-length                                               [Function]</a>
+,
+<a class="ref" href="open.html">open                                                             [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-293"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-293"> &para;</a></span></h4>
+
+<p>Implementations that have character files represented
+as a sequence of records of bounded size might choose to encode the
+file position as, for example,
+&lt;&lt;<i class="i">record-number</i>&gt;&gt;*&lt;&lt;<i class="i">max-record-size</i>&gt;&gt;+&lt;&lt;<i class="i">character-within-record</i>&gt;&gt;.
+This is a valid encoding because it increases monotonically as
+each character is read or written, though not necessarily by 1 at
+each step.  An <i class="i">integer</i> might then be considered &ldquo;inappropriate&rdquo;
+as <i class="i">position-spec</i> to <b class="b">file-position</b> if, when decoded into
+record number and character number, it turned out that the
+supplied record was too short for the specified character number.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="file_002dstring_002dlength.html">file-string-length                                               [Function]</a>, Previous: <a href="file_002dlength.html">file-length                                                      [Function]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/file_002dstream.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>file-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="file-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="file-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="string_002dstream.html" rel="next" title="string-stream">
+<link href="echo_002dstream.html" rel="prev" title="echo-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="file_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="string_002dstream.html" accesskey="n" rel="next">string-stream                                                [System Class]</a>, Previous: <a href="echo_002dstream.html" accesskey="p" rel="prev">echo-stream                                                  [System Class]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="file_002dstream-_005bSystem-Class_005d"><span>21.2.5 file-stream                                                  [System Class]<a class="copiable-link" href="#file_002dstream-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-66"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-66"> &para;</a></span></h4>
+
+<p><b class="b">file-stream</b>,
+<b class="b">stream</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-536"><span>Description::<a class="copiable-link" href="#Description_003a_003a-536"> &para;</a></span></h4>
+
+<p>An <i class="i">object</i> of <i class="i">type</i> <b class="b">file-stream</b> is a <i class="i">stream</i> the direct
+source or sink of which is a <i class="i">file</i>.  Such a <i class="i">stream</i> is
+created explicitly by <b class="b">open</b> and <b class="b">with-open-file</b>, and
+implicitly by <i class="i">functions</i> such as <b class="b">load</b> that process <i class="i">files</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-439"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-439"> &para;</a></span></h4>
+
+<p><a class="ref" href="load.html">load                                                             [Function]</a>
+,
+<a class="ref" href="open.html">open                                                             [Function]</a>
+,
+<a class="ref" href="with_002dopen_002dfile.html">with-open-file                                                      [macro]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/file_002dstring_002dlength.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>file-string-length (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="file-string-length (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="file-string-length (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="open.html" rel="next" title="open">
+<link href="file_002dposition.html" rel="prev" title="file-position">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="file_002dstring_002dlength">
+<div class="nav-panel">
+<p>
+Next: <a href="open.html" accesskey="n" rel="next">open                                                             [Function]</a>, Previous: <a href="file_002dposition.html" accesskey="p" rel="prev">file-position                                                    [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="file_002dstring_002dlength-_005bFunction_005d"><span>21.2.28 file-string-length                                               [Function]<a class="copiable-link" href="#file_002dstring_002dlength-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">file-string-length</code>  <i class="i">stream object</i> &rArr;  <i class="i">length</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-429"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-429"> &para;</a></span></h4>
+
+<p><i class="i">stream</i>&mdash;an <i class="i">output</i> <i class="i">character</i> <i class="i">file stream</i>.
+</p>
+<p><i class="i">object</i>&mdash;a <i class="i">string</i> or a <i class="i">character</i>.
+</p>
+<p><i class="i">length</i>&mdash;a non-negative <i class="i">integer</i>, or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-559"><span>Description::<a class="copiable-link" href="#Description_003a_003a-559"> &para;</a></span></h4>
+
+<p><b class="b">file-string-length</b> returns the difference between what 
+<code class="t">(file-position <i class="i">stream</i>)</code> would be after writing 
+<i class="i">object</i> and its current value, or <b class="b">nil</b> if this cannot be determined.  
+</p>
+<p>The returned value corresponds to the current state of <i class="i">stream</i>
+at the time of the call and might not be 
+the same if it is called again
+when the state of the <i class="i">stream</i> has changed.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/file_002dwrite_002ddate.html
@@ -0,0 +1,90 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>file-write-date (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="file-write-date (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="file-write-date (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Files-Dictionary.html" rel="up" title="Files Dictionary">
+<link href="rename_002dfile.html" rel="next" title="rename-file">
+<link href="file_002dauthor.html" rel="prev" title="file-author">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="file_002dwrite_002ddate">
+<div class="nav-panel">
+<p>
+Next: <a href="rename_002dfile.html" accesskey="n" rel="next">rename-file                                                      [Function]</a>, Previous: <a href="file_002dauthor.html" accesskey="p" rel="prev">file-author                                                      [Function]</a>, Up: <a href="Files-Dictionary.html" accesskey="u" rel="up">Files Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="file_002dwrite_002ddate-_005bFunction_005d"><span>20.2.6 file-write-date                                                  [Function]<a class="copiable-link" href="#file_002dwrite_002ddate-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">file-write-date</code>  <i class="i">pathspec</i> &rArr;  <i class="i">date</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-408"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-408"> &para;</a></span></h4>
+
+<p><i class="i">pathspec</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">date</i>&mdash;a <i class="i">universal time</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-527"><span>Description::<a class="copiable-link" href="#Description_003a_003a-527"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">universal time</i> representing the time at which the <i class="i">file</i> 
+specified by <i class="i">pathspec</i> was last written (or created), 
+or returns <b class="b">nil</b> if such a time cannot be determined.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-384"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-384"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (with-open-file (s &quot;noel.text&quot; 
+                    :direction :output :if-exists :error)
+   (format s &quot;~&amp;Dear Santa,~2
+                Please leave lots of toys.~2
+             ~2
+   (truename s))
+&rArr;  #P&quot;CUPID:/susan/noel.text&quot;
+ (with-open-file (s &quot;noel.text&quot;)
+   (file-write-date s))
+&rArr;  2902600800
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-79"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-79"> &para;</a></span></h4>
+
+<p>The host computer&rsquo;s file system.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-188"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-188"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> is signaled if <i class="i">pathspec</i> is <i class="i">wild</i>.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> is signaled
+if the <i class="i">file system</i> cannot perform the requested operation.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-430"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-430"> &para;</a></span></h4>
+
+<p><a class="ref" href="Universal-Time.html">Universal Time</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/fill.html
@@ -0,0 +1,102 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>fill (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="fill (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="fill (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="make_002dsequence.html" rel="next" title="make-sequence">
+<link href="elt.html" rel="prev" title="elt">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="fill">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dsequence.html" accesskey="n" rel="next">make-sequence                                                    [Function]</a>, Previous: <a href="elt.html" accesskey="p" rel="prev">elt                                                              [Accessor]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="fill-_005bFunction_005d"><span>17.3.4 fill                                                             [Function]<a class="copiable-link" href="#fill-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">fill</code>  <i class="i">sequence item <span class="r">&amp;key</span> start end</i> &rArr;  <i class="i">sequence</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-356"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-356"> &para;</a></span></h4>
+
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">item</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">sequence</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-471"><span>Description::<a class="copiable-link" href="#Description_003a_003a-471"> &para;</a></span></h4>
+
+<p>Replaces the <i class="i">elements</i> of <i class="i">sequence</i> 
+<i class="i">bounded</i> by <i class="i">start</i> and <i class="i">end</i>
+with <i class="i">item</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-338"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-338"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (fill (list 0 1 2 3 4 5) '(444)) &rArr;  ((444) (444) (444) (444) (444) (444))
+ (fill (copy-seq &quot;01234&quot;) #\e :start 3) &rArr;  &quot;012ee&quot;
+ (setq x (vector 'a 'b 'c 'd 'e)) &rArr;  #(A B C D E)
+ (fill x 'z :start 1 :end 3) &rArr;  #(A Z Z D E)
+ x &rArr;  #(A Z Z D E)
+ (fill x 'p) &rArr;  #(P P P P P)
+ x &rArr;  #(P P P P P)
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-51"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-51"> &para;</a></span></h4>
+
+<p><i class="i">Sequence</i> is destructively modified.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-152"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-152"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>. 
+Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">start</i> is not a non-negative <i class="i">integer</i>.
+Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">end</i> is not a non-negative <i class="i">integer</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-383"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-383"> &para;</a></span></h4>
+
+<p><a class="ref" href="replace.html">replace                                                          [Function]</a>
+, <b class="b">nsubstitute</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-258"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-258"> &para;</a></span></h4>
+
+<p><code class="t">(fill <i class="i">sequence</i> <i class="i">item</i>) &equiv; 
+   (nsubstitute-if <i class="i">item</i> (constantly t) <i class="i">sequence</i>)</code>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dsequence.html">make-sequence                                                    [Function]</a>, Previous: <a href="elt.html">elt                                                              [Accessor]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/fill_002dpointer.html
@@ -0,0 +1,88 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>fill-pointer (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="fill-pointer (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="fill-pointer (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="row_002dmajor_002daref.html" rel="next" title="row-major-aref">
+<link href="arrayp.html" rel="prev" title="arrayp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="fill_002dpointer">
+<div class="nav-panel">
+<p>
+Next: <a href="row_002dmajor_002daref.html" accesskey="n" rel="next">row-major-aref                                                   [Accessor]</a>, Previous: <a href="arrayp.html" accesskey="p" rel="prev">arrayp                                                           [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="fill_002dpointer-_005bAccessor_005d"><span>15.2.21 fill-pointer                                                     [Accessor]<a class="copiable-link" href="#fill_002dpointer-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">fill-pointer</code>  <i class="i">vector</i> &rArr;  <i class="i">fill-pointer</i>
+</p>
+<p>(setf (<code class="code">         fill-pointer</code> <i class="i">vector</i>) new-fill-pointer)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-333"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-333"> &para;</a></span></h4>
+
+<p><i class="i">vector</i>&mdash;a <i class="i">vector</i> with a <i class="i">fill pointer</i>.
+</p>
+<p><i class="i">fill-pointer</i>, <i class="i">new-fill-pointer</i>&mdash;a <i class="i">valid fill pointer</i> 
+  for the <i class="i">vector</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-440"><span>Description::<a class="copiable-link" href="#Description_003a_003a-440"> &para;</a></span></h4>
+
+<p><i class="i">Accesses</i> the <i class="i">fill pointer</i> of <i class="i">vector</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-317"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-317"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq a (make-array 8 :fill-pointer 4)) &rArr;  #(NIL NIL NIL NIL)
+ (fill-pointer a) &rArr;  4
+ (dotimes (i (length a)) (setf (aref a i) (* i i))) &rArr;  NIL
+ a &rArr;  #(0 1 4 9)
+ (setf (fill-pointer a) 3) &rArr;  3
+ (fill-pointer a) &rArr;  3
+ a &rArr;  #(0 1 4)
+ (setf (fill-pointer a) 8) &rArr;  8
+ a &rArr;  #(0 1 4 9 NIL NIL NIL NIL)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-146"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-146"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">vector</i> is not a <i class="i">vector</i> with a <i class="i">fill pointer</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-360"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-360"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002darray.html">make-array                                                       [Function]</a>
+, 
+<a class="ref" href="length.html">length                                                           [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-240"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-240"> &para;</a></span></h4>
+
+<p>There is no <i class="i">operator</i> that will remove a <i class="i">vector</i>&rsquo;s <i class="i">fill pointer</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/find.html
@@ -0,0 +1,131 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>find (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="find (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="find (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="position.html" rel="next" title="position">
+<link href="sort.html" rel="prev" title="sort">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="find">
+<div class="nav-panel">
+<p>
+Next: <a href="position.html" accesskey="n" rel="next">position, position-if, position-if-not                           [Function]</a>, Previous: <a href="sort.html" accesskey="p" rel="prev">sort, stable-sort                                                [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="find_002c-find_002dif_002c-find_002dif_002dnot-_005bFunction_005d"><span>17.3.14 find, find-if, find-if-not                                       [Function]<a class="copiable-link" href="#find_002c-find_002dif_002c-find_002dif_002dnot-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">find</code>  <i class="i">item sequence <span class="r">&amp;key</span> from-end test test-not start end key</i> &rArr;  <i class="i">element</i>
+</p>
+<p><code class="code">find-if</code>  <i class="i">predicate sequence <span class="r">&amp;key</span> from-end start end key</i> &rArr;  <i class="i">element</i>
+</p>
+<p><code class="code">find-if-not</code>  <i class="i">predicate sequence <span class="r">&amp;key</span> from-end start end key</i> &rArr;  <i class="i">element</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-366"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-366"> &para;</a></span></h4>
+
+<p><i class="i">item</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">predicate</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one <i class="i">argument</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">from-end</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is <i class="i">false</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">sequence</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">element</i>&mdash;an <i class="i">element</i> of the <i class="i">sequence</i>, or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-481"><span>Description::<a class="copiable-link" href="#Description_003a_003a-481"> &para;</a></span></h4>
+
+<p><b class="b">find</b>, <b class="b">find-if</b>, and <b class="b">find-if-not</b> 
+each search for an <i class="i">element</i> of the <i class="i">sequence</i>
+<i class="i">bounded</i> by <i class="i">start</i> and <i class="i">end</i>
+   that <i class="i">satisfies the predicate</i> <i class="i">predicate</i> 
+or that <i class="i">satisfies the test</i> <i class="i">test</i> or <i class="i">test-not</i>,
+as appropriate.
+</p>
+<p>If <i class="i">from-end</i> is <i class="i">true</i>,
+then the result is the rightmost <i class="i">element</i> that <i class="i">satisfies the test</i>. 
+</p>
+<p>If the <i class="i">sequence</i> contains an <i class="i">element</i> that <i class="i">satisfies the test</i>,
+then the leftmost or rightmost <i class="i">sequence</i> element, 
+depending on <i class="i">from-end</i>,
+is returned;
+otherwise <b class="b">nil</b> is returned.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-348"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-348"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (find #\d &quot;here are some letters that can be looked at&quot; :test #'char&gt;)
+&rArr;  #\Space 
+ (find-if #'oddp '(1 2 3 4 5) :end 3 :from-end t) &rArr;  3
+ (find-if-not #'complexp                                    
+             '#(3.5 2 #C(1.0 0.0) #C(0.0 1.0))
+             :start 2) &rArr;  NIL 
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-162"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-162"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-391"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-391"> &para;</a></span></h4>
+
+<p><a class="ref" href="position.html">position, position-if, position-if-not                           [Function]</a>
+,
+<a class="ref" href="Rules-about-Test-Functions.html">Rules about Test Functions</a>,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-262"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-262"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> <i class="i">argument</i> is deprecated.
+</p>
+<p>The <i class="i">function</i> <b class="b">find-if-not</b> is deprecated.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="position.html">position, position-if, position-if-not                           [Function]</a>, Previous: <a href="sort.html">sort, stable-sort                                                [Function]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/find_002dall_002dsymbols.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>find-all-symbols (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="find-all-symbols (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="find-all-symbols (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="import.html" rel="next" title="import">
+<link href="find_002dpackage.html" rel="prev" title="find-package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="find_002dall_002dsymbols">
+<div class="nav-panel">
+<p>
+Next: <a href="import.html" accesskey="n" rel="next">import                                                           [Function]</a>, Previous: <a href="find_002dpackage.html" accesskey="p" rel="prev">find-package                                                     [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="find_002dall_002dsymbols-_005bFunction_005d"><span>11.2.5 find-all-symbols                                                 [Function]<a class="copiable-link" href="#find_002dall_002dsymbols-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">find-all-symbols</code>  <i class="i">string</i> &rArr;  <i class="i">symbols</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-177"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-177"> &para;</a></span></h4>
+
+<p><i class="i">string</i>&mdash;a <i class="i">string designator</i>.
+</p>
+<p><i class="i">symbols</i>&mdash;a <i class="i">list</i> of <i class="i">symbols</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-241"><span>Description::<a class="copiable-link" href="#Description_003a_003a-241"> &para;</a></span></h4>
+
+<p><b class="b">find-all-symbols</b> searches
+ every <i class="i">registered package</i>
+ for <i class="i">symbols</i> that have a
+<i class="i">name</i> that is the <i class="i">same</i> (under <b class="b">string=</b>) as
+<i class="i">string</i>.  A <i class="i">list</i> of all such <i class="i">symbols</i> is returned.
+Whether or how the <i class="i">list</i> is ordered is
+<i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-160"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-160"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (find-all-symbols 'car)
+&rArr;  (CAR)
+<i class="i">OR</i>&rArr; (CAR VEHICLES:CAR)
+<i class="i">OR</i>&rArr; (VEHICLES:CAR CAR)
+ (intern &quot;CAR&quot; (make-package 'temp :use nil)) &rArr;  TEMP::CAR, NIL
+ (find-all-symbols 'car)
+&rArr;  (TEMP::CAR CAR)
+<i class="i">OR</i>&rArr; (CAR TEMP::CAR)
+<i class="i">OR</i>&rArr; (TEMP::CAR CAR VEHICLES:CAR)
+<i class="i">OR</i>&rArr; (CAR TEMP::CAR VEHICLES:CAR)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-214"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-214"> &para;</a></span></h4>
+
+<p><a class="ref" href="find_002dsymbol.html">find-symbol                                                      [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/find_002dclass.html
@@ -0,0 +1,113 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>find-class (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="find-class (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="find-class (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="next_002dmethod_002dp.html" rel="next" title="next-method-p">
+<link href="defmethod.html" rel="prev" title="defmethod">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="find_002dclass">
+<div class="nav-panel">
+<p>
+Next: <a href="next_002dmethod_002dp.html" accesskey="n" rel="next">next-method-p                                              [Local Function]</a>, Previous: <a href="defmethod.html" accesskey="p" rel="prev">defmethod                                                           [Macro]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="find_002dclass-_005bAccessor_005d"><span>7.7.28 find-class                                                       [Accessor]<a class="copiable-link" href="#find_002dclass-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">find-class</code>  <i class="i">symbol <span class="r">&amp;optional</span> errorp environment</i> &rArr;  <i class="i">class</i>
+</p>
+<p>(setf (<code class="code">         find-class</code> <i class="i">symbol <span class="r">&amp;optional</span> errorp environment</i>) new-class)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-116"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-116"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">errorp</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">true</i>.
+</p>
+<p><i class="i">environment</i> &ndash; same as the <b class="b">&amp;environment</b> argument to
+  macro expansion functions and is used to distinguish between 
+  compile-time and run-time environments.
+</p>
+<p>The <b class="b">&amp;environment</b> argument has 
+  <i class="i">dynamic extent</i>; the consequences are undefined if 
+  the <b class="b">&amp;environment</b> argument is 
+  referred to outside the <i class="i">dynamic extent</i> 
+  of the macro expansion function.
+</p>
+<p><i class="i">class</i>&mdash;a <i class="i">class</i> <i class="i">object</i>, or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-155"><span>Description::<a class="copiable-link" href="#Description_003a_003a-155"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">class</i> <i class="i">object</i> named by the <i class="i">symbol</i>
+in the <i class="i">environment</i>.  If there is no such <i class="i">class</i>,
+<b class="b">nil</b> is returned if <i class="i">errorp</i> is <i class="i">false</i>; otherwise,
+if <i class="i">errorp</i> is <i class="i">true</i>, an error is signaled.
+</p>
+<p>The <i class="i">class</i> associated with a particular <i class="i">symbol</i> can be changed by using
+<b class="b">setf</b> with <b class="b">find-class</b>;
+</p>
+<p>or, if the new <i class="i">class</i> given to <b class="b">setf</b> is <b class="b">nil</b>,
+the <i class="i">class</i> association is removed 
+(but the <i class="i">class</i> <i class="i">object</i> itself is not affected).
+</p>
+<p>The results are undefined if the user attempts to change
+</p>
+<p>or remove
+</p>
+<p>the <i class="i">class</i> associated with a 
+<i class="i">symbol</i> that is defined as a <i class="i">type specifier</i> in this standard.
+See <a class="ref" href="Integrating-Types-and-Classes.html">Integrating Types and Classes</a>.
+</p>
+<p>When using <b class="b">setf</b> of <b class="b">find-class</b>, any <i class="i">errorp</i> argument is <i class="i">evaluated</i>
+for effect, but any <i class="i">values</i> it returns are ignored; the <i class="i">errorp</i>
+<i class="i">parameter</i> is permitted primarily so that the <i class="i">environment</i> <i class="i">parameter</i>
+can be used.
+</p>
+<p>The <i class="i">environment</i> might be used to distinguish between a compile-time and a
+run-time environment.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-40"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-40"> &para;</a></span></h4>
+
+<p>If there is no such <i class="i">class</i> and <i class="i">errorp</i> is <i class="i">true</i>,
+<b class="b">find-class</b> signals an error of <i class="i">type</i> <b class="b">error</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-137"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-137"> &para;</a></span></h4>
+
+<p><a class="ref" href="defmacro.html">defmacro                                                            [Macro]</a>
+,
+<a class="ref" href="Integrating-Types-and-Classes.html">Integrating Types and Classes</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="next_002dmethod_002dp.html">next-method-p                                              [Local Function]</a>, Previous: <a href="defmethod.html">defmethod                                                           [Macro]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/find_002dmethod.html
@@ -0,0 +1,131 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>find-method (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="find-method (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="find-method (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="add_002dmethod.html" rel="next" title="add-method">
+<link href="define_002dmethod_002dcombination.html" rel="prev" title="define-method-combination">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="find_002dmethod">
+<div class="nav-panel">
+<p>
+Next: <a href="add_002dmethod.html" accesskey="n" rel="next">add-method                                      [Standard Generic Function]</a>, Previous: <a href="define_002dmethod_002dcombination.html" accesskey="p" rel="prev">define-method-combination                                           [Macro]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="find_002dmethod-_005bStandard-Generic-Function_005d"><span>7.7.34 find-method                                     [Standard Generic Function]<a class="copiable-link" href="#find_002dmethod-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-31"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-31"> &para;</a></span></h4>
+
+<p><code class="code">find-method</code>  <i class="i">generic-function method-qualifiers specializers <span class="r">&amp;optional</span> errorp</i><br>
+   &rArr;  <i class="i">method</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-17"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-17"> &para;</a></span></h4>
+
+<p><code class="code">find-method</code>  <i class="i"><span class="r">(</span><i class="i">generic-function</i> <b class="b">standard-generic-function</b><span class="r">)</span>
+		method-qualifiers specializers <span class="r">&amp;optional</span> errorp</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-122"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-122"> &para;</a></span></h4>
+
+<p><i class="i">generic-function</i>&mdash;a <i class="i">generic function</i>.
+</p>
+<p><i class="i">method-qualifiers</i>&mdash;a <i class="i">list</i>.
+</p>
+<p><i class="i">specializers</i>&mdash;a <i class="i">list</i>.
+</p>
+<p><i class="i">errorp</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">true</i>.
+</p>
+<p><i class="i">method</i>&mdash;a <i class="i">method</i> <i class="i">object</i>, or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-161"><span>Description::<a class="copiable-link" href="#Description_003a_003a-161"> &para;</a></span></h4>
+
+<p>The <i class="i">generic function</i> <b class="b">find-method</b> takes a <i class="i">generic function</i> 
+and returns the <i class="i">method</i> <i class="i">object</i> that agrees on <i class="i">qualifiers</i> 
+and <i class="i">parameter specializers</i> with the <i class="i">method-qualifiers</i> and 
+<i class="i">specializers</i> arguments of <b class="b">find-method</b>.  
+<i class="i">Method-qualifiers</i>  contains the
+method <i class="i">qualifiers</i> for the <i class="i">method</i>. 
+The order of the method <i class="i">qualifiers</i>
+is significant.                                
+For a definition of agreement in this context,
+see <a class="ref" href="Agreement-on-Parameter-Specializers-and-Qualifiers.html">Agreement on Parameter Specializers and Qualifiers</a>.
+</p>
+<p>The <i class="i">specializers</i> argument contains the parameter
+specializers for the <i class="i">method</i>. It must correspond in length to
+the number of required arguments of the <i class="i">generic function</i>, or
+an error is signaled.  This means that to obtain the
+default <i class="i">method</i> on a given <i class="i">generic-function</i>,
+a <i class="i">list</i> whose elements are the <i class="i">class</i> <b class="b">t</b> must be given.
+</p>
+<p>If there is no such <i class="i">method</i> and <i class="i">errorp</i> is <i class="i">true</i>,
+<b class="b">find-method</b> signals an error.
+If there is no such <i class="i">method</i> and <i class="i">errorp</i> is <i class="i">false</i>,
+<b class="b">find-method</b> returns <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-111"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-111"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defmethod some-operation ((a integer) (b float)) (list a b))
+&rArr;  #&lt;STANDARD-METHOD SOME-OPERATION (INTEGER FLOAT) 26723357&gt;
+ (find-method #'some-operation '() (mapcar #'find-class '(integer float)))
+&rArr;  #&lt;STANDARD-METHOD SOME-OPERATION (INTEGER FLOAT) 26723357&gt;
+ (find-method #'some-operation '() (mapcar #'find-class '(integer integer)))
+<code class="t"> |&gt; </code> Error: No matching method
+ (find-method #'some-operation '() (mapcar #'find-class '(integer integer)) nil)
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-17"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-17"> &para;</a></span></h4>
+
+<p><b class="b">add-method</b>,
+<b class="b">defclass</b>,
+<b class="b">defgeneric</b>,
+<b class="b">defmethod</b>
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-43"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-43"> &para;</a></span></h4>
+
+<p>If the <i class="i">specializers</i> argument does not correspond in length to
+the number of required arguments of the <i class="i">generic-function</i>, an
+an error of <i class="i">type</i> <b class="b">error</b> is signaled.  
+</p>
+<p>If there is no such <i class="i">method</i> and <i class="i">errorp</i> is <i class="i">true</i>, 
+<b class="b">find-method</b> signals an error of <i class="i">type</i> <b class="b">error</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-143"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-143"> &para;</a></span></h4>
+
+<p><a class="ref" href="Agreement-on-Parameter-Specializers-and-Qualifiers.html">Agreement on Parameter Specializers and Qualifiers</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="add_002dmethod.html">add-method                                      [Standard Generic Function]</a>, Previous: <a href="define_002dmethod_002dcombination.html">define-method-combination                                           [Macro]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/find_002dpackage.html
@@ -0,0 +1,86 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>find-package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="find-package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="find-package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="find_002dall_002dsymbols.html" rel="next" title="find-all-symbols">
+<link href="find_002dsymbol.html" rel="prev" title="find-symbol">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="find_002dpackage">
+<div class="nav-panel">
+<p>
+Next: <a href="find_002dall_002dsymbols.html" accesskey="n" rel="next">find-all-symbols                                                 [Function]</a>, Previous: <a href="find_002dsymbol.html" accesskey="p" rel="prev">find-symbol                                                      [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="find_002dpackage-_005bFunction_005d"><span>11.2.4 find-package                                                     [Function]<a class="copiable-link" href="#find_002dpackage-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">find-package</code>  <i class="i">name</i> &rArr;  <i class="i">package</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-176"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-176"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">string designator</i> or a <i class="i">package</i> <i class="i">object</i>.
+</p>
+<p><i class="i">package</i>&mdash;a <i class="i">package</i> <i class="i">object</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-240"><span>Description::<a class="copiable-link" href="#Description_003a_003a-240"> &para;</a></span></h4>
+
+<p>If <i class="i">name</i> is a <i class="i">string designator</i>,
+<b class="b">find-package</b> locates and returns the
+<i class="i">package</i> whose name or nickname is <i class="i">name</i>.
+This
+search is case sensitive.
+If there is no such <i class="i">package</i>,
+<b class="b">find-package</b> returns <b class="b">nil</b>.
+</p>
+<p>If <i class="i">name</i> is a <i class="i">package</i> <i class="i">object</i>,
+that <i class="i">package</i> <i class="i">object</i> is returned.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-159"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-159"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (find-package 'common-lisp) &rArr;  #&lt;PACKAGE &quot;COMMON-LISP&quot;&gt;
+ (find-package &quot;COMMON-LISP-USER&quot;) &rArr;  #&lt;PACKAGE &quot;COMMON-LISP-USER&quot;&gt;
+ (find-package 'not-there) &rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-44"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-44"> &para;</a></span></h4>
+
+<p>The set of <i class="i">packages</i> created by the <i class="i">implementation</i>.
+</p>
+<p><b class="b">defpackage</b>,
+<b class="b">delete-package</b>,
+<b class="b">make-package</b>,
+<b class="b">rename-package</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-213"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-213"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dpackage.html">make-package                                                     [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/find_002drestart.html
@@ -0,0 +1,116 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>find-restart (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="find-restart (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="find-restart (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="invoke_002drestart.html" rel="next" title="invoke-restart">
+<link href="compute_002drestarts.html" rel="prev" title="compute-restarts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="find_002drestart">
+<div class="nav-panel">
+<p>
+Next: <a href="invoke_002drestart.html" accesskey="n" rel="next">invoke-restart                                                   [Function]</a>, Previous: <a href="compute_002drestarts.html" accesskey="p" rel="prev">compute-restarts                                                 [Function]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="find_002drestart-_005bFunction_005d"><span>9.2.33 find-restart                                                     [Function]<a class="copiable-link" href="#find_002drestart-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">find-restart</code>  <i class="i">identifier <span class="r">&amp;optional</span> condition</i>
+ <span class="r">restart</span>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-149"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-149"> &para;</a></span></h4>
+
+<p><i class="i">identifier</i>&mdash;a <i class="i">non-nil</i> <i class="i">symbol</i>, or a <i class="i">restart</i>.
+</p>
+<p><i class="i">condition</i>&mdash;a <i class="i">condition</i> <i class="i">object</i>, or <b class="b">nil</b>.
+</p>
+<p><i class="i">restart</i>&mdash;a <i class="i">restart</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-203"><span>Description::<a class="copiable-link" href="#Description_003a_003a-203"> &para;</a></span></h4>
+
+<p><b class="b">find-restart</b> searches for a particular <i class="i">restart</i> in the 
+current <i class="i">dynamic environment</i>.
+</p>
+<p>When <i class="i">condition</i> is <i class="i">non-nil</i>, only those <i class="i">restarts</i>
+are considered that are either explicitly associated with that <i class="i">condition</i>,
+or not associated with any <i class="i">condition</i>; that is, the excluded <i class="i">restarts</i> 
+are those that are associated with a non-empty set of <i class="i">conditions</i> of 
+which the given <i class="i">condition</i> is not an <i class="i">element</i>.
+If <i class="i">condition</i> is <b class="b">nil</b>, all <i class="i">restarts</i> are considered.
+</p>
+<p>If <i class="i">identifier</i> is a <i class="i">symbol</i>, then the innermost 
+(most recently established) <i class="i">applicable restart</i> with that <i class="i">name</i> is returned.
+<b class="b">nil</b> is returned if no such restart is found.
+</p>
+<p>If <i class="i">identifier</i> is a currently active restart, then it is returned.
+Otherwise, <b class="b">nil</b> is returned.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-131"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-131"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (restart-case
+     (let ((r (find-restart 'my-restart)))
+       (format t &quot;~S is named ~S&quot; r (restart-name r)))
+   (my-restart () nil))
+<code class="t"> |&gt; </code> #&lt;RESTART 32307325&gt; is named MY-RESTART
+&rArr;  NIL
+ (find-restart 'my-restart)
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-31"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-31"> &para;</a></span></h4>
+
+<p>Existing restarts.
+</p>
+<p><b class="b">restart-case</b>, <b class="b">restart-bind</b>, <b class="b">with-condition-restarts</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-177"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-177"> &para;</a></span></h4>
+
+<p><a class="ref" href="compute_002drestarts.html">compute-restarts                                                 [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-107"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-107"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (find-restart <i class="i">identifier</i>)
+ &equiv; (find <i class="i">identifier</i> (compute-restarts) :key :restart-name)
+</pre></div>
+
+<p>Although anonymous restarts have a name of <b class="b">nil</b>,
+the consequences are unspecified if <b class="b">nil</b> is given as an <i class="i">identifier</i>.  
+Occasionally, programmers lament that <b class="b">nil</b> is not permissible as an
+<i class="i">identifier</i> argument.  In most such cases, <b class="b">compute-restarts</b>
+can probably be used to simulate the desired effect.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="invoke_002drestart.html">invoke-restart                                                   [Function]</a>, Previous: <a href="compute_002drestarts.html">compute-restarts                                                 [Function]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/find_002dsymbol.html
@@ -0,0 +1,141 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>find-symbol (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="find-symbol (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="find-symbol (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="find_002dpackage.html" rel="next" title="find-package">
+<link href="export.html" rel="prev" title="export">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="find_002dsymbol">
+<div class="nav-panel">
+<p>
+Next: <a href="find_002dpackage.html" accesskey="n" rel="next">find-package                                                     [Function]</a>, Previous: <a href="export.html" accesskey="p" rel="prev">export                                                           [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="find_002dsymbol-_005bFunction_005d"><span>11.2.3 find-symbol                                                      [Function]<a class="copiable-link" href="#find_002dsymbol-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">find-symbol</code>  <i class="i">string <span class="r">&amp;optional</span> package</i> &rArr;  <i class="i">symbol, status</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-175"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-175"> &para;</a></span></h4>
+
+<p><i class="i">string</i>&mdash;a <i class="i">string</i>.
+</p>
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<p>The default is the <i class="i">current package</i>.
+</p>
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i> accessible in the <i class="i">package</i>, 
+		 or <b class="b">nil</b>.
+</p>
+<p><i class="i">status</i>&mdash;one of <code class="t">:inherited</code>, <code class="t">:external</code>, <code class="t">:internal</code>, or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-239"><span>Description::<a class="copiable-link" href="#Description_003a_003a-239"> &para;</a></span></h4>
+
+<p><b class="b">find-symbol</b> locates a <i class="i">symbol</i> whose <i class="i">name</i> is
+<i class="i">string</i> in a <i class="i">package</i>.
+If a <i class="i">symbol</i> named <i class="i">string</i> is found in <i class="i">package</i>,
+directly or by inheritance, the <i class="i">symbol</i> 
+found is returned as the first
+value; the second value is as follows:
+</p>
+<dl class="table">
+<dt><code class="t">:internal</code></dt>
+<dd><p>If the <i class="i">symbol</i> is <i class="i">present</i> in <i class="i">package</i>
+as an <i class="i">internal symbol</i>.
+</p>
+</dd>
+<dt><code class="t">:external</code></dt>
+<dd><p>If the <i class="i">symbol</i> is <i class="i">present</i> in <i class="i">package</i>
+as an <i class="i">external symbol</i>.
+</p>
+</dd>
+<dt><code class="t">:inherited</code></dt>
+<dd><p>If the <i class="i">symbol</i> is inherited by <i class="i">package</i> 
+through <b class="b">use-package</b>,
+but is not <i class="i">present</i> in <i class="i">package</i>.
+</p>
+</dd>
+</dl>
+
+<p>If no such <i class="i">symbol</i> is <i class="i">accessible</i> in <i class="i">package</i>,
+both values are <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-158"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-158"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (find-symbol &quot;NEVER-BEFORE-USED&quot;) &rArr;  NIL, NIL
+ (find-symbol &quot;NEVER-BEFORE-USED&quot;) &rArr;  NIL, NIL
+ (intern &quot;NEVER-BEFORE-USED&quot;) &rArr;  NEVER-BEFORE-USED, NIL
+ (intern &quot;NEVER-BEFORE-USED&quot;) &rArr;  NEVER-BEFORE-USED, :INTERNAL
+ (find-symbol &quot;NEVER-BEFORE-USED&quot;) &rArr;  NEVER-BEFORE-USED, :INTERNAL
+ (find-symbol &quot;never-before-used&quot;) &rArr;  NIL, NIL
+ (find-symbol &quot;CAR&quot; 'common-lisp-user) &rArr;  CAR, :INHERITED
+ (find-symbol &quot;CAR&quot; 'common-lisp) &rArr;  CAR, :EXTERNAL
+ (find-symbol &quot;NIL&quot; 'common-lisp-user) &rArr;  NIL, :INHERITED
+ (find-symbol &quot;NIL&quot; 'common-lisp) &rArr;  NIL, :EXTERNAL
+ (find-symbol &quot;NIL&quot; (prog1 (make-package &quot;JUST-TESTING&quot; :use '())
+                           (intern &quot;NIL&quot; &quot;JUST-TESTING&quot;)))
+&rArr;  JUST-TESTING::NIL, :INTERNAL
+ (export 'just-testing::nil 'just-testing)
+ (find-symbol &quot;NIL&quot; 'just-testing) &rArr;  JUST-TESTING:NIL, :EXTERNAL
+ (find-symbol &quot;NIL&quot; &quot;KEYWORD&quot;)
+&rArr;  NIL, NIL
+<i class="i">OR</i>&rArr; :NIL, :EXTERNAL
+ (find-symbol (symbol-name :nil) &quot;KEYWORD&quot;) &rArr;  :NIL, :EXTERNAL
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-43"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-43"> &para;</a></span></h4>
+
+<p><b class="b">intern</b>,
+<b class="b">import</b>,
+<b class="b">export</b>,
+<b class="b">use-package</b>,
+<b class="b">unintern</b>,
+<b class="b">unexport</b>,
+<b class="b">unuse-package</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-212"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-212"> &para;</a></span></h4>
+
+<p><a class="ref" href="intern.html">intern                                                           [Function]</a>
+, 
+<a class="ref" href="find_002dall_002dsymbols.html">find-all-symbols                                                 [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-128"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-128"> &para;</a></span></h4>
+
+<p><b class="b">find-symbol</b> is operationally equivalent to <b class="b">intern</b>, 
+except that it never creates a new <i class="i">symbol</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="find_002dpackage.html">find-package                                                     [Function]</a>, Previous: <a href="export.html">export                                                           [Function]</a>, Up: <a href="Packages-Dictionary.html">Packages Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/finish_002doutput.html
@@ -0,0 +1,102 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>finish-output (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="finish-output (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="finish-output (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="y_002dor_002dn_002dp.html" rel="next" title="y-or-n-p">
+<link href="clear_002dinput.html" rel="prev" title="clear-input">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="finish_002doutput">
+<div class="nav-panel">
+<p>
+Next: <a href="y_002dor_002dn_002dp.html" accesskey="n" rel="next">y-or-n-p, yes-or-no-p                                            [Function]</a>, Previous: <a href="clear_002dinput.html" accesskey="p" rel="prev">clear-input                                                      [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="finish_002doutput_002c-force_002doutput_002c-clear_002doutput-_005bFunction_005d"><span>21.2.36 finish-output, force-output, clear-output                        [Function]<a class="copiable-link" href="#finish_002doutput_002c-force_002doutput_002c-clear_002doutput-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">finish-output</code>  <i class="i"><span class="r">&amp;optional</span> output-stream</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<p><code class="code">force-output</code>  <i class="i"><span class="r">&amp;optional</span> output-stream</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<p><code class="code">clear-output</code>  <i class="i"><span class="r">&amp;optional</span> output-stream</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-437"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-437"> &para;</a></span></h4>
+
+<p><i class="i">output-stream</i>&mdash;an <i class="i">output</i> <i class="i">stream designator</i>.
+ The default is <i class="i">standard output</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-567"><span>Description::<a class="copiable-link" href="#Description_003a_003a-567"> &para;</a></span></h4>
+
+<p><b class="b">finish-output</b>, <b class="b">force-output</b>, and <b class="b">clear-output</b>
+exercise control over the internal handling of buffered stream output.  
+</p>
+<p><b class="b">finish-output</b> attempts to ensure that any buffered output
+sent to <i class="i">output-stream</i> has reached its destination, and then returns.
+</p>
+<p><b class="b">force-output</b> initiates the emptying of any
+internal buffers but does not wait for completion
+or acknowledgment to return.
+</p>
+<p><b class="b">clear-output</b> attempts to abort any
+outstanding output operation in progress in order
+to allow as little output as possible
+to continue to the destination.  
+</p>
+<p>If any of these operations does not make sense for <i class="i">output-stream</i>, 
+then it does nothing. 
+The precise actions of these <i class="i">functions</i> are <i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-413"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-413"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted">;; Implementation A
+ (progn (princ &quot;am i seen?&quot;) (clear-output))
+&rArr;  NIL
+
+;; Implementation B
+ (progn (princ &quot;am i seen?&quot;) (clear-output))
+<code class="t"> |&gt; </code> am i seen?
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-95"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-95"> &para;</a></span></h4>
+
+<p><b class="b">*standard-output*</b>
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-210"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-210"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">output-stream</i> is not a <i class="i">stream designator</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-463"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-463"> &para;</a></span></h4>
+
+<p><a class="ref" href="clear_002dinput.html">clear-input                                                      [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/first.html
@@ -0,0 +1,162 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>first (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="first (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="first (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="nth.html" rel="next" title="nth">
+<link href="pop.html" rel="prev" title="pop">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="first">
+<div class="nav-panel">
+<p>
+Next: <a href="nth.html" accesskey="n" rel="next">nth                                                              [Accessor]</a>, Previous: <a href="pop.html" accesskey="p" rel="prev">pop                                                                 [Macro]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="first_002c-second_002c-third_002c-fourth_002c-fifth_002c"><span>14.2.21 first, second, third, fourth, fifth,<a class="copiable-link" href="#first_002c-second_002c-third_002c-fourth_002c-fifth_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="sixth_002c-seventh_002c-eighth_002c-ninth_002c-tenth"><span>sixth, seventh, eighth, ninth, tenth<a class="copiable-link" href="#sixth_002c-seventh_002c-eighth_002c-ninth_002c-tenth"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Accessor]</i>
+</p></div>
+<p><code class="code">first</code>  <i class="i">list</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">first</code> <i class="i">list</i>) new-object)<br>
+</p>
+<p><code class="code">second</code>  <i class="i">list</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">second</code> <i class="i">list</i>) new-object)<br>
+</p>
+<p><code class="code">third</code>  <i class="i">list</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">third</code> <i class="i">list</i>) new-object)<br>
+</p>
+<p><code class="code">fourth</code>  <i class="i">list</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">fourth</code> <i class="i">list</i>) new-object)<br>
+</p>
+<p><code class="code">fifth</code>  <i class="i">list</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">fifth</code> <i class="i">list</i>) new-object)<br>
+</p>
+<p><code class="code">sixth</code>  <i class="i">list</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">sixth</code> <i class="i">list</i>) new-object)<br>
+</p>
+<p><code class="code">seventh</code>  <i class="i">list</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">seventh</code> <i class="i">list</i>) new-object)<br>
+</p>
+<p><code class="code">eighth</code>  <i class="i">list</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">eighth</code> <i class="i">list</i>) new-object)<br>
+</p>
+<p><code class="code">ninth</code>  <i class="i">list</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">ninth</code> <i class="i">list</i>) new-object)<br>
+</p>
+<p><code class="code">tenth</code>  <i class="i">list</i> &rArr;  <i class="i">object</i>
+(setf (<code class="code">tenth</code> <i class="i">list</i>) new-object)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-290"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-290"> &para;</a></span></h4>
+
+<p><i class="i">list</i>&mdash;a <i class="i">list</i>, 
+</p>
+<p>which might be a <i class="i">dotted list</i> or a <i class="i">circular list</i>.
+</p>
+<p><i class="i">object</i>, <i class="i">new-object</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-391"><span>Description::<a class="copiable-link" href="#Description_003a_003a-391"> &para;</a></span></h4>
+
+<p>The functions
+<b class="b">first</b>,
+<b class="b">second</b>,
+<b class="b">third</b>, 
+<b class="b">fourth</b>, 
+<b class="b">fifth</b>,
+<b class="b">sixth</b>,
+<b class="b">seventh</b>,
+<b class="b">eighth</b>, 
+<b class="b">ninth</b>,
+and
+<b class="b">tenth</b>
+<i class="i">access</i> the first, second, third, fourth, fifth, sixth, seventh, eighth,
+ninth, and tenth <i class="i">elements</i> of <i class="i">list</i>, respectively.
+Specifically,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (first <i class="i">list</i>)    &equiv;  (car <i class="i">list</i>)
+ (second <i class="i">list</i>)   &equiv;  (car (cdr <i class="i">list</i>))
+ (third <i class="i">list</i>)    &equiv;  (car (cddr <i class="i">list</i>))
+ (fourth <i class="i">list</i>)   &equiv;  (car (cdddr <i class="i">list</i>))
+ (fifth <i class="i">list</i>)    &equiv;  (car (cddddr <i class="i">list</i>))
+ (sixth <i class="i">list</i>)    &equiv;  (car (cdr (cddddr <i class="i">list</i>)))
+ (seventh <i class="i">list</i>)  &equiv;  (car (cddr (cddddr <i class="i">list</i>)))
+ (eighth <i class="i">list</i>)   &equiv;  (car (cdddr (cddddr <i class="i">list</i>)))
+ (ninth <i class="i">list</i>)    &equiv;  (car (cddddr (cddddr <i class="i">list</i>)))
+ (tenth <i class="i">list</i>)    &equiv;  (car (cdr (cddddr (cddddr <i class="i">list</i>))))
+</pre></div>
+
+<p><b class="b">setf</b> can also be used with any of these functions to change an
+existing component.  The same equivalences apply.  For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setf (fifth <i class="i">list</i>) <i class="i">new-object</i>) &equiv; (setf (car (cddddr <i class="i">list</i>)) <i class="i">new-object</i>)
+</pre></div>
+
+<h4 class="subsubheading" id="Examples_003a_003a-274"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-274"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq lst '(1 2 3 (4 5 6) ((V)) vi 7 8 9 10)) 
+&rArr;  (1 2 3 (4 5 6) ((V)) VI 7 8 9 10)
+ (first lst) &rArr;  1
+ (tenth lst) &rArr;  10
+ (fifth lst) &rArr;  ((V))
+ (second (fourth lst)) &rArr;  5
+ (sixth '(1 2 3)) &rArr;  NIL
+ (setf (fourth lst) &quot;four&quot;) &rArr;  &quot;four&quot;
+ lst &rArr;  (1 2 3 &quot;four&quot; ((V)) VI 7 8 9 10)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-317"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-317"> &para;</a></span></h4>
+
+<p><a class="ref" href="car.html">car,    cdr,</a>
+, 
+<a class="ref" href="nth.html">nth                                                              [Accessor]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-210"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-210"> &para;</a></span></h4>
+
+<p><b class="b">first</b>  is functionally equivalent to <b class="b">car</b>,
+<b class="b">second</b> is functionally equivalent to <b class="b">cadr</b>,
+<b class="b">third</b>  is functionally equivalent to <b class="b">caddr</b>, and 
+<b class="b">fourth</b> is functionally equivalent to <b class="b">cadddr</b>.
+</p>
+<p>The ordinal numbering used here is one-origin,
+as opposed to the zero-origin numbering used by <b class="b">nth</b>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (fifth x) &equiv; (nth 4 x)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="nth.html">nth                                                              [Accessor]</a>, Previous: <a href="pop.html">pop                                                                 [Macro]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/fixnum.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>fixnum (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="fixnum (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="fixnum (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="bignum.html" rel="next" title="bignum">
+<link href="bit-_0028System-Class_0029.html" rel="prev" title="bit (System Class)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="fixnum">
+<div class="nav-panel">
+<p>
+Next: <a href="bignum.html" accesskey="n" rel="next">bignum                                                               [Type]</a>, Previous: <a href="bit-_0028System-Class_0029.html" accesskey="p" rel="prev">bit                                                                  [Type]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="fixnum-_005bType_005d"><span>12.2.13 fixnum                                                               [Type]<a class="copiable-link" href="#fixnum-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-8"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-8"> &para;</a></span></h4>
+
+<p><b class="b">fixnum</b>,
+<b class="b">integer</b>,
+<b class="b">rational</b>,
+</p>
+<p><b class="b">real</b>,
+</p>
+<p><b class="b">number</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-278"><span>Description::<a class="copiable-link" href="#Description_003a_003a-278"> &para;</a></span></h4>
+
+<p>A <i class="i">fixnum</i> is an <i class="i">integer</i> whose value is between 
+<b class="b">most-negative-fixnum</b> and <b class="b">most-positive-fixnum</b> inclusive.
+Exactly which <i class="i">integers</i> are <i class="i">fixnums</i> is 
+<i class="i">implementation-defined</i>.
+</p>
+<p>The <i class="i">type</i> <b class="b">fixnum</b> is required to be a supertype of
+<code class="t">(signed-byte 16)</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/flet.html
@@ -0,0 +1,311 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>flet (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="flet (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="flet (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="funcall.html" rel="next" title="funcall">
+<link href="fmakunbound.html" rel="prev" title="fmakunbound">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="flet">
+<div class="nav-panel">
+<p>
+Next: <a href="funcall.html" accesskey="n" rel="next">funcall                                                          [Function]</a>, Previous: <a href="fmakunbound.html" accesskey="p" rel="prev">fmakunbound                                                      [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="flet_002c-labels_002c-macrolet-_005bSpecial-Operator_005d"><span>5.3.6 flet, labels, macrolet                                   [Special Operator]<a class="copiable-link" href="#flet_002c-labels_002c-macrolet-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">flet</code>  <i class="i"><span class="r">(</span>{<span class="r">(</span><i class="i">function-name</i> 
+				                  <i class="i">lambda-list</i>
+				      		  <span class="r">[[{<i class="i">local-declaration</i>}* 
+				  | <i class="i">local-documentation</i>]]</span>
+				      		  {<i class="i">local-form</i>}*<span class="r">)</span>}*<span class="r">)</span>
+			  {<i class="i">declaration</i>}* {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><code class="code">labels</code>  <i class="i"><span class="r">(</span>{<span class="r">(</span><i class="i">function-name</i> 
+				                  <i class="i">lambda-list</i>
+				      		  <span class="r">[[{<i class="i">local-declaration</i>}* 
+				  | <i class="i">local-documentation</i>]]</span>
+				      		  {<i class="i">local-form</i>}*<span class="r">)</span>}*<span class="r">)</span>
+			  {<i class="i">declaration</i>}* {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><code class="code">macrolet</code>  <i class="i"><span class="r">(</span>{<span class="r">(</span><i class="i">name</i> 
+				                  <i class="i">lambda-list</i>
+				      		  <span class="r">[[{<i class="i">local-declaration</i>}* 
+				  | <i class="i">local-documentation</i>]]</span>
+				      		  {<i class="i">local-form</i>}*<span class="r">)</span>}*<span class="r">)</span>
+			  {<i class="i">declaration</i>}* {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-30"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-30"> &para;</a></span></h4>
+
+<p><i class="i">function-name</i>&mdash;a <i class="i">function name</i>.
+</p>
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">lambda-list</i>&mdash;a <i class="i">lambda list</i>; 
+		      for <b class="b">flet</b> and <b class="b">labels</b>,
+			 it is an <i class="i">ordinary lambda list</i>;
+		      for <b class="b">macrolet</b>,
+			 it is a <i class="i">macro lambda list</i>.
+</p>
+<p><i class="i">local-declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">local-documentation</i>&mdash;a <i class="i">string</i>; not evaluated.
+</p>
+<p><i class="i">local-forms</i>, <i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> of the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-59"><span>Description::<a class="copiable-link" href="#Description_003a_003a-59"> &para;</a></span></h4>
+
+<p><b class="b">flet</b>, <b class="b">labels</b>, and <b class="b">macrolet</b>
+define local <i class="i">functions</i> and <i class="i">macros</i>, and execute
+<i class="i">forms</i> using the local definitions.
+<i class="i">Forms</i> are executed  in order of occurrence.
+</p>
+<p>The body forms (but not the <i class="i">lambda list</i>)
+</p>
+<p>of each <i class="i">function</i> created by <b class="b">flet</b> and <b class="b">labels</b> 
+and each <i class="i">macro</i> created by <b class="b">macrolet</b>
+are enclosed in an <i class="i">implicit block</i> whose name 
+is the <i class="i">function block name</i> of the <i class="i">function-name</i> or <i class="i">name</i>, 
+as appropriate.
+</p>
+<p>The scope of the <i class="i">declarations</i>
+between
+the list of local function/macro definitions and the body <i class="i">forms</i>
+in <b class="b">flet</b> and <b class="b">labels</b> 
+does not include the bodies of the
+locally defined <i class="i">functions</i>, except that for <b class="b">labels</b>,
+any <b class="b">inline</b>, <b class="b">notinline</b>, or <b class="b">ftype</b> declarations
+that refer to the locally defined functions do apply to the local function
+bodies. That is, their <i class="i">scope</i> 
+is the same as the function name that they
+affect.  
+</p>
+<p>The scope of these <i class="i">declarations</i> 
+does not include the bodies of the macro expander
+functions defined by <b class="b">macrolet</b>.  
+</p>
+<dl class="table">
+<dt>flet</dt>
+<dd><p><b class="b">flet</b> defines locally named <i class="i">functions</i> and executes a series of
+<i class="i">forms</i> with these definition <i class="i">bindings</i>.  Any number of
+such local <i class="i">functions</i> can be defined.  
+</p>
+<p>The <i class="i">scope</i> of the name <i class="i">binding</i> encompasses only the body.
+Within the
+body of <b class="b">flet</b>, 
+<i class="i">function-names</i> matching those defined
+by <b class="b">flet</b> 
+refer to the locally defined <i class="i">functions</i> 
+rather than to
+the global function definitions of the same name.
+</p>
+<p>Also, within the scope of <b class="b">flet</b>, 
+global <i class="i">setf expander</i> definitions of the <i class="i">function-name</i>
+defined by <b class="b">flet</b> do not apply. 
+Note that this applies to 
+<code class="t">(defsetf <i class="i">f</i> ...)</code>, not
+<code class="t">(defmethod (setf <i class="i">f</i>) ...)</code>.
+</p>
+<p>The names of <i class="i">functions</i> defined by <b class="b">flet</b> 
+are in the <i class="i">lexical environment</i>; they retain
+their local definitions only within the body of <b class="b">flet</b>.
+The function definition bindings are visible only in
+the body of <b class="b">flet</b>, not the definitions themselves.  Within the
+function definitions, local function names
+that match those being
+defined refer to <i class="i">functions</i> or 
+<i class="i">macros</i> defined outside the <b class="b">flet</b>.
+<b class="b">flet</b> can locally <i class="i">shadow</i> a global function name,
+and the new definition can refer to the global definition.
+</p>
+<p>Any <i class="i">local-documentation</i> is attached to the corresponding local <i class="i">function</i>
+(if one is actually created) as a <i class="i">documentation string</i>.
+</p>
+</dd>
+<dt>labels</dt>
+<dd><p><b class="b">labels</b> is equivalent to <b class="b">flet</b> except that
+the scope of the defined function names for <b class="b">labels</b> 
+encompasses the function definitions themselves as well as the body.
+</p>
+</dd>
+<dt>macrolet</dt>
+<dd><p><b class="b">macrolet</b> 
+establishes local <i class="i">macro</i> definitions,
+using the same format used by <b class="b">defmacro</b>.
+</p>
+<p>Within the body of <b class="b">macrolet</b>, 
+global <i class="i">setf expander</i> definitions of the <i class="i">names</i> defined by the 
+<b class="b">macrolet</b> do not apply; rather, <b class="b">setf</b> expands the
+<i class="i">macro form</i> and recursively process the resulting <i class="i">form</i>.
+</p>
+<p>The macro-expansion functions defined by <b class="b">macrolet</b> 
+are defined in the 
+</p>
+<p><i class="i">lexical environment</i> in which the <b class="b">macrolet</b> form appears.
+Declarations and <b class="b">macrolet</b> and 
+<b class="b">symbol-macrolet</b> definitions
+affect the local macro definitions in a <b class="b">macrolet</b>, but the
+consequences are undefined if the local macro definitions reference
+any local <i class="i">variable</i> or <i class="i">function</i> <i class="i">bindings</i> that are visible in that
+<i class="i">lexical environment</i>.
+</p>
+<p>Any <i class="i">local-documentation</i> is attached to the corresponding local <i class="i">macro function</i>
+as a <i class="i">documentation string</i>.
+</p>
+</dd>
+</dl>
+
+<h4 class="subsubheading" id="Examples_003a_003a-36"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-36"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun foo (x flag)
+   (macrolet ((fudge (z)
+                 ;The parameters x and flag are not accessible
+                 ; at this point; a reference to flag would be to
+                 ; the global variable of that name.
+                 ` (if flag (* ,z ,z) ,z)))
+    ;The parameters x and flag are accessible here.
+     (+ x
+        (fudge x)
+        (fudge (+ x 1)))))
+ &equiv;
+ (defun foo (x flag)
+   (+ x
+      (if flag (* x x) x)
+      (if flag (* (+ x 1) (+ x 1)) (+ x 1))))
+</pre></div>
+
+<p>after macro expansion.  The occurrences of <code class="t">x</code> and <code class="t">flag</code> legitimately
+refer to the parameters of the function <code class="t">foo</code> because those parameters are
+visible at the site of the macro call which produced the expansion.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (flet ((flet1 (n) (+ n n)))
+    (flet ((flet1 (n) (+ 2 (flet1 n))))
+      (flet1 2))) &rArr;  6
+
+ (defun dummy-function () 'top-level) &rArr;  DUMMY-FUNCTION 
+ (funcall #'dummy-function) &rArr;  TOP-LEVEL 
+ (flet ((dummy-function () 'shadow)) 
+      (funcall #'dummy-function)) &rArr;  SHADOW 
+ (eq (funcall #'dummy-function) (funcall 'dummy-function))
+&rArr;  <i class="i">true</i> 
+ (flet ((dummy-function () 'shadow))
+   (eq (funcall #'dummy-function)
+       (funcall 'dummy-function)))
+&rArr;  <i class="i">false</i> 
+
+ (defun recursive-times (k n)
+   (labels ((temp (n) 
+              (if (zerop n) 0 (+ k (temp (1- n))))))
+     (temp n))) &rArr;  RECURSIVE-TIMES
+ (recursive-times 2 3) &rArr;  6
+
+ (defmacro mlets (x &amp;environment env) 
+    (let ((form `(babbit ,x)))
+      (macroexpand form env))) &rArr;  MLETS
+ (macrolet ((babbit (z) `(+ ,z ,z))) (mlets 5)) &rArr;  10
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (flet ((safesqrt (x) (sqrt (abs x))))
+  ;; The safesqrt function is used in two places.
+   (safesqrt (apply #'+ (map 'list #'safesqrt '(1 2 3 4 5 6)))))
+&rArr;  3.291173
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (defun integer-power (n k)     
+   (declare (integer n))         
+   (declare (type (integer 0 *) k))
+   (labels ((expt0 (x k a)
+              (declare (integer x a) (type (integer 0 *) k))
+              (cond ((zerop k) a)
+                    ((evenp k) (expt1 (* x x) (floor k 2) a))
+                    (t (expt0 (* x x) (floor k 2) (* x a)))))
+            (expt1 (x k a)
+              (declare (integer x a) (type (integer 0 *) k))
+              (cond ((evenp k) (expt1 (* x x) (floor k 2) a))
+                    (t (expt0 (* x x) (floor k 2) (* x a))))))
+    (expt0 n k 1))) &rArr;  INTEGER-POWER
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (defun example (y l)
+   (flet ((attach (x)
+            (setq l (append l (list x)))))
+     (declare (inline attach))
+     (dolist (x y)
+       (unless (null (cdr x))
+         (attach x)))
+     l))
+
+ (example '((a apple apricot) (b banana) (c cherry) (d) (e))
+          '((1) (2) (3) (4 2) (5) (6 3 2)))
+&rArr;  ((1) (2) (3) (4 2) (5) (6 3 2) (A APPLE APRICOT) (B BANANA) (C CHERRY))
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-46"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-46"> &para;</a></span></h4>
+
+<p><b class="b">declare</b>,
+<a class="ref" href="defmacro.html">defmacro                                                            [Macro]</a>
+,
+<a class="ref" href="defun.html">defun                                                               [Macro]</a>
+,
+<a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="let.html">let, let*                                                [Special Operator]</a>
+,
+<a class="ref" href="Evaluation.html">Evaluation</a>,
+<a class="ref" href="Syntactic-Interaction-of-Documentation-Strings-and-Declarations.html">Syntactic Interaction of Documentation Strings and Declarations</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-27"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-27"> &para;</a></span></h4>
+
+<p>It is not possible to define recursive <i class="i">functions</i> with <b class="b">flet</b>.
+<b class="b">labels</b> can be used to define mutually recursive <i class="i">functions</i>.
+</p>
+<p>If a <b class="b">macrolet</b> <i class="i">form</i> is a <i class="i">top level form</i>,
+the body <i class="i">forms</i> are also processed as <i class="i">top level forms</i>.
+See <a class="ref" href="File-Compilation.html">File Compilation</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="funcall.html">funcall                                                          [Function]</a>, Previous: <a href="fmakunbound.html">fmakunbound                                                      [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/float-_0028System-Class_0029.html
@@ -0,0 +1,130 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>float (System Class) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="float (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="float (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="short_002dfloat.html" rel="next" title="short-float">
+<link href="real.html" rel="prev" title="real">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="float-_0028System-Class_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="short_002dfloat.html" accesskey="n" rel="next">short-float, single-float, double-float, long-float                  [Type]</a>, Previous: <a href="real.html" accesskey="p" rel="prev">real                                                         [System Class]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="float-_005bSystem-Class_005d"><span>12.2.4 float                                                        [System Class]<a class="copiable-link" href="#float-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-38"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-38"> &para;</a></span></h4>
+<p><b class="b">float</b>,
+</p>
+<p><b class="b">real</b>,
+</p>
+<p><b class="b">number</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-270"><span>Description::<a class="copiable-link" href="#Description_003a_003a-270"> &para;</a></span></h4>
+
+<p>A <i class="i">float</i>
+is a mathematical rational (but <i class="i">not</i> a <span class="r">Common Lisp</span> <i class="i">rational</i>)
+of the form
+s\cdot f\cdot b^<span class="r">e-p</span>,
+where s is +1 or -1, the <i class="i">sign</i>;
+b is an <i class="i">integer</i> 
+greater than~1, the <i class="i">base</i> or <i class="i">radix</i> of the representation;
+p is a positive <i class="i">integer</i>, 
+the <i class="i">precision</i> (in base-b digits) of the <i class="i">float</i>;
+f is a positive <i class="i">integer</i> 
+between b^<span class="r">p-1</span> and
+b^p-1 (inclusive), the significand;
+and e is an <i class="i">integer</i>, the exponent.
+The value of p and the range of~e
+depends on the implementation and on the type of <i class="i">float</i> 
+within that implementation. In addition, there is a floating-point zero;
+depending on the implementation, there can also be a &ldquo;minus zero&rdquo;. If there
+is no minus zero, then 0.0 and~-0.0 are both interpreted as simply a
+floating-point zero.
+<code class="t">(= 0.0 -0.0)</code> is always true.  
+If there is a minus zero, <code class="t">(eql -0.0 0.0)</code> is <i class="i">false</i>,
+otherwise it is <i class="i">true</i>.
+</p>
+<p>[Reviewer Note by Barmar: What about IEEE NaNs and infinities?]
+</p>
+<p>[Reviewer Note by RWK: In the following, what is the &ldquo;ordering&rdquo;?  precision? range?
+	  Can there be additional subtypes of float or does &ldquo;others&rdquo; in the
+	  list of four?]
+</p>
+<p>The <i class="i">types</i> <b class="b">short-float</b>, <b class="b">single-float</b>, <b class="b">double-float</b>, 
+and <b class="b">long-float</b> are <i class="i">subtypes</i> of <i class="i">type</i> <b class="b">float</b>.  Any two of them must be
+either <i class="i">disjoint</i> <i class="i">types</i> or the <i class="i">same</i> <i class="i">type</i>;
+if the <i class="i">same</i> <i class="i">type</i>, then any other <i class="i">types</i> between them in the
+above ordering must also be the <i class="i">same</i> <i class="i">type</i>.  For example, 
+if the <i class="i">type</i> <b class="b">single-float</b> and the <i class="i">type</i> <b class="b">long-float</b> are the <i class="i">same</i> <i class="i">type</i>,
+then the <i class="i">type</i> <b class="b">double-float</b> must be the <i class="i">same</i> <i class="i">type</i> also.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-10"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-10"> &para;</a></span></h4>
+
+<p>Abbreviating.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-10"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-10"> &para;</a></span></h4>
+
+<p>(<code class="code">float</code>{<i class="i"><code class="t">[</code>lower-limit <span class="r">[</span>upper-limit<span class="r">]</span><code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-10"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-10"> &para;</a></span></h4>
+
+<p><i class="i">lower-limit</i>, <i class="i">upper-limit</i>&mdash;<i class="i">interval designators</i> 
+					   for <i class="i">type</i> <b class="b">float</b>.
+ The defaults for each of <i class="i">lower-limit</i> and <i class="i">upper-limit</i> is the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-10"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-10"> &para;</a></span></h4>
+
+<p>This denotes the <i class="i">floats</i> on the interval described by
+<i class="i">lower-limit</i> and <i class="i">upper-limit</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-237"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-237"> &para;</a></span></h4>
+
+<p><i class="i">Figure~2&ndash;9</i>,
+<a class="ref" href="Constructing-Numbers-from-Tokens.html">Constructing Numbers from Tokens</a>,
+<a class="ref" href="Printing-Floats.html">Printing Floats</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-138"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-138"> &para;</a></span></h4>
+
+<p>Note that all mathematical integers are representable not only as
+<span class="r">Common Lisp</span> <i class="i">reals</i>, but also as <i class="i">complex floats</i>.  For example,
+possible representations of the mathematical number 1 
+include the <i class="i">integer</i> <code class="t">1</code>,
+        the <i class="i">float</i> <code class="t">1.0</code>,
+     or the <i class="i">complex</i> <code class="t">#C(1.0 0.0)</code>.  
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="short_002dfloat.html">short-float, single-float, double-float, long-float                  [Type]</a>, Previous: <a href="real.html">real                                                         [System Class]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/float.html
@@ -0,0 +1,88 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>float (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="float (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="float (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="floatp.html" rel="next" title="floatp">
+<link href="decode_002dfloat.html" rel="prev" title="decode-float">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="float">
+<div class="nav-panel">
+<p>
+Next: <a href="floatp.html" accesskey="n" rel="next">floatp                                                           [Function]</a>, Previous: <a href="decode_002dfloat.html" accesskey="p" rel="prev">decode-float, scale-float, float-radix, float-sign,</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="float-_005bFunction_005d"><span>12.2.74 float                                                            [Function]<a class="copiable-link" href="#float-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">float</code>  <i class="i">number <span class="r">&amp;optional</span> prototype</i> &rArr;  <i class="i">float</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-255"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-255"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a <i class="i">real</i>.
+</p>
+<p><i class="i">prototype</i>&mdash;a <i class="i">float</i>.
+</p>
+<p><i class="i">float</i>&mdash;a <i class="i">float</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-339"><span>Description::<a class="copiable-link" href="#Description_003a_003a-339"> &para;</a></span></h4>
+
+<p><b class="b">float</b> converts a 
+</p>
+<p><i class="i">real</i>
+</p>
+<p>number to a <i class="i">float</i>.
+</p>
+<p>If a <i class="i">prototype</i> is supplied,
+a <i class="i">float</i> is returned that is mathematically equal to <i class="i">number</i>
+but has the same format as <i class="i">prototype</i>.
+</p>
+<p>If <i class="i">prototype</i> is not supplied,
+then if the <i class="i">number</i> is already a <i class="i">float</i>, it is returned;
+otherwise, a <i class="i">float</i> is returned that is mathematically equal to <i class="i">number</i>
+but is a <i class="i">single float</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-240"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-240"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (float 0) &rArr;  0.0
+ (float 1 .5) &rArr;  1.0
+ (float 1.0) &rArr;  1.0
+ (float 1/2) &rArr;  0.5
+&rArr;  1.0d0
+<i class="i">OR</i>&rArr; 1.0
+ (eql (float 1.0 1.0d0) 1.0d0) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-279"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-279"> &para;</a></span></h4>
+
+<p><a class="ref" href="coerce.html">coerce                                                           [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/floating_002dpoint_002dinexact.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>floating-point-inexact (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="floating-point-inexact (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="floating-point-inexact (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="floating_002dpoint_002doverflow.html" rel="next" title="floating-point-overflow">
+<link href="floating_002dpoint_002dinvalid_002doperation.html" rel="prev" title="floating-point-invalid-operation">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="floating_002dpoint_002dinexact">
+<div class="nav-panel">
+<p>
+Next: <a href="floating_002dpoint_002doverflow.html" accesskey="n" rel="next">floating-point-overflow                                    [Condition Type]</a>, Previous: <a href="floating_002dpoint_002dinvalid_002doperation.html" accesskey="p" rel="prev">floating-point-invalid-operation                           [Condition Type]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="floating_002dpoint_002dinexact-_005bCondition-Type_005d"><span>12.2.82 floating-point-inexact                                     [Condition Type]<a class="copiable-link" href="#floating_002dpoint_002dinexact-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-46"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-46"> &para;</a></span></h4>
+<p><b class="b">floating-point-inexact</b>,
+<b class="b">arithmetic-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-347"><span>Description::<a class="copiable-link" href="#Description_003a_003a-347"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">floating-point-inexact</b> consists of 
+error conditions that occur because of certain 
+floating point traps.
+</p>
+<p>It is <i class="i">implementation-dependent</i> whether floating point traps
+occur, and whether or how they may be enabled or disabled.  Therefore,
+conforming code may establish handlers for this condition, but must not
+depend on its being <i class="i">signaled</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/floating_002dpoint_002dinvalid_002doperation.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>floating-point-invalid-operation (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="floating-point-invalid-operation (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="floating-point-invalid-operation (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="floating_002dpoint_002dinexact.html" rel="next" title="floating-point-inexact">
+<link href="division_002dby_002dzero.html" rel="prev" title="division-by-zero">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="floating_002dpoint_002dinvalid_002doperation">
+<div class="nav-panel">
+<p>
+Next: <a href="floating_002dpoint_002dinexact.html" accesskey="n" rel="next">floating-point-inexact                                     [Condition Type]</a>, Previous: <a href="division_002dby_002dzero.html" accesskey="p" rel="prev">division-by-zero                                           [Condition Type]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="floating_002dpoint_002dinvalid_002doperation-_005bCondition-Type_005d"><span>12.2.81 floating-point-invalid-operation                           [Condition Type]<a class="copiable-link" href="#floating_002dpoint_002dinvalid_002doperation-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-45"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-45"> &para;</a></span></h4>
+<p><b class="b">floating-point-invalid-operation</b>,
+<b class="b">arithmetic-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-346"><span>Description::<a class="copiable-link" href="#Description_003a_003a-346"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">floating-point-invalid-operation</b> consists of
+error conditions that occur because of certain 
+floating point traps. 
+</p>
+<p>It is <i class="i">implementation-dependent</i> whether floating point traps
+occur, and whether or how they may be enabled or disabled.  Therefore,
+conforming code may establish handlers for this condition, but must not
+depend on its being <i class="i">signaled</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/floating_002dpoint_002doverflow.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>floating-point-overflow (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="floating-point-overflow (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="floating-point-overflow (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="floating_002dpoint_002dunderflow.html" rel="next" title="floating-point-underflow">
+<link href="floating_002dpoint_002dinexact.html" rel="prev" title="floating-point-inexact">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="floating_002dpoint_002doverflow">
+<div class="nav-panel">
+<p>
+Next: <a href="floating_002dpoint_002dunderflow.html" accesskey="n" rel="next">floating-point-underflow                                   [Condition Type]</a>, Previous: <a href="floating_002dpoint_002dinexact.html" accesskey="p" rel="prev">floating-point-inexact                                     [Condition Type]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="floating_002dpoint_002doverflow-_005bCondition-Type_005d"><span>12.2.83 floating-point-overflow                                    [Condition Type]<a class="copiable-link" href="#floating_002dpoint_002doverflow-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-47"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-47"> &para;</a></span></h4>
+<p><b class="b">floating-point-overflow</b>,
+<b class="b">arithmetic-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-348"><span>Description::<a class="copiable-link" href="#Description_003a_003a-348"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">floating-point-overflow</b> consists of error
+conditions that occur because of floating-point overflow.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/floating_002dpoint_002dunderflow.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>floating-point-underflow (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="floating-point-underflow (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="floating-point-underflow (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="floating_002dpoint_002doverflow.html" rel="prev" title="floating-point-overflow">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="floating_002dpoint_002dunderflow">
+<div class="nav-panel">
+<p>
+Previous: <a href="floating_002dpoint_002doverflow.html" accesskey="p" rel="prev">floating-point-overflow                                    [Condition Type]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="floating_002dpoint_002dunderflow-_005bCondition-Type_005d"><span>12.2.84 floating-point-underflow                                   [Condition Type]<a class="copiable-link" href="#floating_002dpoint_002dunderflow-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-48"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-48"> &para;</a></span></h4>
+<p><b class="b">floating-point-underflow</b>,
+<b class="b">arithmetic-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-349"><span>Description::<a class="copiable-link" href="#Description_003a_003a-349"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">floating-point-underflow</b> consists of 
+error conditions that occur because of floating-point underflow.
+</p>
+
+
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/floatp.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>floatp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="floatp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="floatp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="most_002dpositive_002dshort_002dfloat.html" rel="next" title="most-positive-short-float">
+<link href="float.html" rel="prev" title="float">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="floatp">
+<div class="nav-panel">
+<p>
+Next: <a href="most_002dpositive_002dshort_002dfloat.html" accesskey="n" rel="next">most-positive-short-float, least-positive-short-float,</a>, Previous: <a href="float.html" accesskey="p" rel="prev">float                                                            [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="floatp-_005bFunction_005d"><span>12.2.75 floatp                                                           [Function]<a class="copiable-link" href="#floatp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">floatp</code>  <i class="i">object</i>
+ <span class="r">generalized-boolean</span>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-256"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-256"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-340"><span>Description::<a class="copiable-link" href="#Description_003a_003a-340"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">float</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-241"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-241"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (floatp 1.2d2) &rArr;  <i class="i">true</i>
+ (floatp 1.212) &rArr;  <i class="i">true</i>
+ (floatp 1.2s2) &rArr;  <i class="i">true</i>
+ (floatp (expt 2 130)) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-183"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-183"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (floatp <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'float)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/floor.html
@@ -0,0 +1,200 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>floor (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="floor (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="floor (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="sin.html" rel="next" title="sin">
+<link href="zerop.html" rel="prev" title="zerop">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="floor">
+<div class="nav-panel">
+<p>
+Next: <a href="sin.html" accesskey="n" rel="next">sin, cos, tan                                                    [Function]</a>, Previous: <a href="zerop.html" accesskey="p" rel="prev">zerop                                                            [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="floor_002c-ffloor_002c-ceiling_002c-fceiling_002c"><span>12.2.19 floor, ffloor, ceiling, fceiling,<a class="copiable-link" href="#floor_002c-ffloor_002c-ceiling_002c-fceiling_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="truncate_002c-ftruncate_002c-round_002c-fround"><span>truncate, ftruncate, round, fround<a class="copiable-link" href="#truncate_002c-ftruncate_002c-round_002c-fround"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Function]</i>
+</p></div>
+<p><code class="code">floor</code>  <i class="i">number <span class="r">&amp;optional</span> divisor</i> &rArr;  <i class="i">quotient, remainder</i>
+</p>
+<p><code class="code">ffloor</code>  <i class="i">number <span class="r">&amp;optional</span> divisor</i> &rArr;  <i class="i">quotient, remainder</i>
+</p>
+<p><code class="code">ceiling</code>  <i class="i">number <span class="r">&amp;optional</span> divisor</i> &rArr;  <i class="i">quotient, remainder</i>
+</p>
+<p><code class="code">fceiling</code>  <i class="i">number <span class="r">&amp;optional</span> divisor</i> &rArr;  <i class="i">quotient, remainder</i>
+</p>
+<p><code class="code">truncate</code>  <i class="i">number <span class="r">&amp;optional</span> divisor</i> &rArr;  <i class="i">quotient, remainder</i>
+</p>
+<p><code class="code">ftruncate</code>  <i class="i">number <span class="r">&amp;optional</span> divisor</i> &rArr;  <i class="i">quotient, remainder</i>
+</p>
+<p><code class="code">round</code>  <i class="i">number <span class="r">&amp;optional</span> divisor</i> &rArr;  <i class="i">quotient, remainder</i>
+</p>
+<p><code class="code">fround</code>  <i class="i">number <span class="r">&amp;optional</span> divisor</i> &rArr;  <i class="i">quotient, remainder</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-205"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-205"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a <i class="i">real</i>.
+</p>
+<p><i class="i">divisor</i>&mdash;a non-zero <i class="i">real</i>.
+ The default is the <i class="i">integer</i> <code class="t">1</code>.
+</p>
+<p><i class="i">quotient</i>&mdash;for <b class="b">floor</b>, <b class="b">ceiling</b>, 
+		       <b class="b">truncate</b>, and <b class="b">round</b>: an <i class="i">integer</i>;
+		   for <b class="b">ffloor</b>, <b class="b">fceiling</b>, 
+		       <b class="b">ftruncate</b>, and <b class="b">fround</b>: a <i class="i">float</i>.
+</p>
+<p><i class="i">remainder</i>&mdash;a <i class="i">real</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-284"><span>Description::<a class="copiable-link" href="#Description_003a_003a-284"> &para;</a></span></h4>
+
+<p>These functions divide <i class="i">number</i> by <i class="i">divisor</i>, 
+returning a <i class="i">quotient</i> and <i class="i">remainder</i>, such that 
+</p>
+<p><i class="i">quotient</i><span class="r">\cdot</span> <i class="i">divisor</i>+<i class="i">remainder</i>=<i class="i">number</i>
+</p>
+<p>The <i class="i">quotient</i> always represents a mathematical integer.
+When more than one mathematical integer might be possible
+ (<i class="i">i.e.</i>, when the remainder is not zero),
+the kind of rounding or truncation depends on the <i class="i">operator</i>:
+</p>
+<dl class="table">
+<dt><b class="b">floor</b>, <b class="b">ffloor</b></dt>
+<dd><p><b class="b">floor</b> and <b class="b">ffloor</b> produce a <i class="i">quotient</i> 
+that has been truncated toward negative infinity;
+that is, the <i class="i">quotient</i> represents the largest mathematical integer
+that is not larger than the mathematical quotient.
+</p>
+</dd>
+<dt><b class="b">ceiling</b>, <b class="b">fceiling</b></dt>
+<dd><p><b class="b">ceiling</b> and <b class="b">fceiling</b> produce a <i class="i">quotient</i>
+that has been truncated toward positive infinity;
+that is, the <i class="i">quotient</i> represents the smallest mathematical integer
+that is not smaller than the mathematical result.
+</p>
+</dd>
+<dt><b class="b">truncate</b>, <b class="b">ftruncate</b></dt>
+<dd><p><b class="b">truncate</b> and <b class="b">ftruncate</b> produce a <i class="i">quotient</i>
+that has been truncated towards zero;
+that is, the <i class="i">quotient</i> represents the mathematical integer
+of the same sign as the mathematical quotient, and
+that has the greatest integral magnitude not greater than that of the mathematical quotient.
+</p>
+</dd>
+<dt><b class="b">round</b>, <b class="b">fround</b></dt>
+<dd><p><b class="b">round</b> and <b class="b">fround</b> produce a <i class="i">quotient</i>
+that has been rounded to the nearest mathematical integer;
+if the mathematical quotient is exactly halfway between two integers,
+(that is, it has the form <i class="i">integer</i>+1\over2),
+then the <i class="i">quotient</i> has been rounded to the even (divisible by two) integer.
+</p>
+</dd>
+</dl>
+
+<p>All of these functions perform type conversion operations on <i class="i">numbers</i>.
+</p>
+<p>The <i class="i">remainder</i>
+is an <i class="i">integer</i>  if both   <code class="t">x</code> and <code class="t">y</code> are <i class="i">integers</i>,
+is a  <i class="i">rational</i> if both   <code class="t">x</code> and <code class="t">y</code> are <i class="i">rationals</i>, and
+is a  <i class="i">float</i>    if either <code class="t">x</code> or  <code class="t">y</code> is  a <i class="i">float</i>.
+</p>
+<p><b class="b">ffloor</b>, <b class="b">fceiling</b>, <b class="b">ftruncate</b>, and <b class="b">fround</b> 
+handle arguments of different <i class="i">types</i> in the following way:
+If  <i class="i">number</i>  is     a <i class="i">float</i>,
+and <i class="i">divisor</i> is not a <i class="i">float</i> of longer format,
+then the first result is a <i class="i">float</i> of the same <i class="i">type</i> as <i class="i">number</i>.
+Otherwise, the first result is of the <i class="i">type</i> determined by <i class="i">contagion</i> rules;
+see <a class="ref" href="Contagion-in-Numeric-Operations.html">Contagion in Numeric Operations</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-188"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-188"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (floor 3/2) &rArr;  1, 1/2
+ (ceiling 3 2) &rArr;  2, -1
+ (ffloor 3 2) &rArr;  1.0, 1
+ (ffloor -4.7) &rArr;  -5.0, 0.3
+ (ffloor 3.5d0) &rArr;  3.0d0, 0.5d0
+ (fceiling 3/2) &rArr;  2.0, -1/2
+ (truncate 1) &rArr;  1, 0
+ (truncate .5) &rArr;  0, 0.5
+ (round .5) &rArr;  0, 0.5
+ (ftruncate -7 2) &rArr;  -3.0, -1
+ (fround -7 2) &rArr;  -4.0, 1
+ (dolist (n '(2.6 2.5 2.4 0.7 0.3 -0.3 -0.7 -2.4 -2.5 -2.6))
+   (format t &quot;~&amp;~4,1@F ~2,' D ~2,' D ~2,' D ~2,' D&quot;
+           n (floor n) (ceiling n) (truncate n) (round n)))
+<code class="t"> |&gt; </code> +2.6  2  3  2  3
+<code class="t"> |&gt; </code> +2.5  2  3  2  2
+<code class="t"> |&gt; </code> +2.4  2  3  2  2
+<code class="t"> |&gt; </code> +0.7  0  1  0  1
+<code class="t"> |&gt; </code> +0.3  0  1  0  0
+<code class="t"> |&gt; </code> -0.3 -1  0  0  0
+<code class="t"> |&gt; </code> -0.7 -1  0  0 -1
+<code class="t"> |&gt; </code> -2.4 -3 -2 -2 -2
+<code class="t"> |&gt; </code> -2.5 -3 -2 -2 -2
+<code class="t"> |&gt; </code> -2.6 -3 -2 -2 -3
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-143"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-143"> &para;</a></span></h4>
+
+<p>When only <i class="i">number</i> is given, the two results are exact;
+the mathematical sum of the two results is always equal to the
+mathematical value of <i class="i">number</i>.
+</p>
+<p><code class="t">(<i class="i">function</i> <i class="i">number</i> <i class="i">divisor</i>)</code>
+and <code class="t">(<i class="i">function</i> (/ <i class="i">number</i> <i class="i">divisor</i>))</code>
+(where <i class="i">function</i> is any of one
+of <b class="b">floor</b>, <b class="b">ceiling</b>, <b class="b">ffloor</b>, 
+<b class="b">fceiling</b>, <b class="b">truncate</b>, 
+<b class="b">round</b>, <b class="b">ftruncate</b>, and <b class="b">fround</b>)
+return the same first value, but
+they return different remainders as the second value. For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (floor 5 2) &rArr;  2, 1
+ (floor (/ 5 2)) &rArr;  2, 1/2
+</pre></div>
+
+<p>If an effect is desired that is similar to <b class="b">round</b>,
+but that always rounds up or down (rather than toward the nearest even integer) 
+if the mathematical quotient is exactly halfway between two integers, 
+the programmer should consider a construction such as
+    <code class="t">(floor (+ x 1/2))</code>
+ or <code class="t">(ceiling (- x 1/2))</code>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="sin.html">sin, cos, tan                                                    [Function]</a>, Previous: <a href="zerop.html">zerop                                                            [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/fmakunbound.html
@@ -0,0 +1,84 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>fmakunbound (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="fmakunbound (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="fmakunbound (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="flet.html" rel="next" title="flet">
+<link href="fboundp.html" rel="prev" title="fboundp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="fmakunbound">
+<div class="nav-panel">
+<p>
+Next: <a href="flet.html" accesskey="n" rel="next">flet, labels, macrolet                                   [Special Operator]</a>, Previous: <a href="fboundp.html" accesskey="p" rel="prev">fboundp                                                          [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="fmakunbound-_005bFunction_005d"><span>5.3.5 fmakunbound                                                      [Function]<a class="copiable-link" href="#fmakunbound-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">fmakunbound</code>  <i class="i">name</i> &rArr;  <i class="i">name</i>
+</p>
+<h4 class="subsubheading" id="Pronunciation_003a_003a-1"><span>Pronunciation::<a class="copiable-link" href="#Pronunciation_003a_003a-1"> &para;</a></span></h4>
+
+<p>pronounced ,ef &rsquo;mak e n,baund 
+ or pronounced ,ef &rsquo;m\=a k e n,baund 
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-29"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-29"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">function name</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-58"><span>Description::<a class="copiable-link" href="#Description_003a_003a-58"> &para;</a></span></h4>
+
+<p>Removes the <i class="i">function</i> or <i class="i">macro</i> definition, if any, of <i class="i">name</i> 
+in the <i class="i">global environment</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-35"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-35"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">(defun add-some (x) (+ x 19)) &rArr;  ADD-SOME
+ (fboundp 'add-some) &rArr;  <i class="i">true</i>
+ (flet ((add-some (x) (+ x 37)))
+    (fmakunbound 'add-some)
+    (add-some 1)) &rArr;  38
+ (fboundp 'add-some) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-12"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-12"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">name</i> is not a <i class="i">function name</i>.
+</p>
+<p>The consequences are undefined if <i class="i">name</i> is a <i class="i">special operator</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-45"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-45"> &para;</a></span></h4>
+
+<p><a class="ref" href="fboundp.html">fboundp                                                          [Function]</a>
+, 
+<a class="ref" href="makunbound.html">makunbound                                                       [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/format.html
@@ -0,0 +1,115 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>format (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="format (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="format (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="print_002dnot_002dreadable_002dobject.html" rel="prev" title="print-not-readable-object">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="format">
+<div class="nav-panel">
+<p>
+Previous: <a href="print_002dnot_002dreadable_002dobject.html" accesskey="p" rel="prev">print-not-readable-object                                        [Function]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="format-_005bFunction_005d"><span>22.4.31 format                                                           [Function]<a class="copiable-link" href="#format-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">format</code>  <i class="i">destination control-string <span class="r">&amp;rest</span> args</i> &rArr;  <i class="i">result</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-470"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-470"> &para;</a></span></h4>
+
+<p><i class="i">destination</i>&mdash;<b class="b">nil</b>,
+		      <b class="b">t</b>,
+		      a <i class="i">stream</i>,
+		   or a <i class="i">string</i> with a <i class="i">fill pointer</i>.
+</p>
+<p><i class="i">control-string</i>&mdash;a <i class="i">format control</i>.
+</p>
+<p><i class="i">args</i>&mdash;<i class="i">format arguments</i> for <i class="i">control-string</i>.
+</p>
+<p><i class="i">result</i>&mdash;if <i class="i">destination</i> is <i class="i">non-nil</i>, then <b class="b">nil</b>;
+		 otherwise, a <i class="i">string</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-619"><span>Description::<a class="copiable-link" href="#Description_003a_003a-619"> &para;</a></span></h4>
+
+<p><b class="b">format</b> produces formatted output by outputting the characters
+of <i class="i">control-string</i> and observing that a <i class="i">tilde</i>
+introduces a directive.  The character after the tilde, possibly preceded 
+by prefix parameters and modifiers, specifies what kind of formatting 
+is desired.  Most directives use one or more elements of <i class="i">args</i> to
+create their output.
+</p>
+<p>If <i class="i">destination</i> is a <i class="i">string</i>, a <i class="i">stream</i>, or <b class="b">t</b>, 
+then the <i class="i">result</i> is <b class="b">nil</b>.  Otherwise, the <i class="i">result</i> is
+a <i class="i">string</i> containing the &lsquo;output.&rsquo;
+</p>
+<p><b class="b">format</b> is useful for producing nicely formatted text, producing
+good-looking messages, and so on.  <b class="b">format</b> can generate and return
+a <i class="i">string</i> or output to <i class="i">destination</i>.
+</p>
+<p>For details on how the <i class="i">control-string</i> is interpreted,
+see <a class="ref" href="Formatted-Output.html">Formatted Output</a>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-107"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-107"> &para;</a></span></h4>
+
+<p><b class="b">*standard-output*</b>,
+<b class="b">*print-escape*</b>,
+<b class="b">*print-radix*</b>,
+<b class="b">*print-base*</b>,
+<b class="b">*print-circle*</b>,
+<b class="b">*print-pretty*</b>,
+<b class="b">*print-level*</b>,
+<b class="b">*print-length*</b>,
+<b class="b">*print-case*</b>,
+<b class="b">*print-gensym*</b>,
+<b class="b">*print-array*</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-228"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-228"> &para;</a></span></h4>
+
+<p>If <i class="i">destination</i> is a <i class="i">string</i> with a <i class="i">fill pointer</i>,
+the consequences are undefined if destructive modifications are performed
+directly on the <i class="i">string</i> during the <i class="i">dynamic extent</i> of the call.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-502"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-502"> &para;</a></span></h4>
+
+<p><a class="ref" href="write.html">write, prin1, print, pprint, princ                               [Function]</a>
+,
+<a class="ref" href="Documentation-of-Implementation_002dDefined-Scripts.html">Documentation of Implementation-Defined Scripts</a>
+</p>
+
+
+
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="print_002dnot_002dreadable_002dobject.html">print-not-readable-object                                        [Function]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/formatter.html
@@ -0,0 +1,89 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>formatter (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="formatter (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="formatter (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="pprint_002ddispatch.html" rel="next" title="pprint-dispatch">
+<link href="copy_002dpprint_002ddispatch.html" rel="prev" title="copy-pprint-dispatch">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="formatter">
+<div class="nav-panel">
+<p>
+Next: <a href="pprint_002ddispatch.html" accesskey="n" rel="next">pprint-dispatch                                                  [Function]</a>, Previous: <a href="copy_002dpprint_002ddispatch.html" accesskey="p" rel="prev">copy-pprint-dispatch                                             [Function]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="formatter-_005bMacro_005d"><span>22.4.2 formatter                                                           [Macro]<a class="copiable-link" href="#formatter-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">formatter</code>  <i class="i">control-string</i> &rArr;  <i class="i">function</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-456"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-456"> &para;</a></span></h4>
+
+<p><i class="i">control-string</i>&mdash;a <i class="i">format string</i>; not evaluated.
+</p>
+<p><i class="i">function</i>&mdash;a <i class="i">function</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-590"><span>Description::<a class="copiable-link" href="#Description_003a_003a-590"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">function</i> which has behavior equivalent to:
+</p>
+<div class="example">
+<pre class="example-preformatted">  #'(lambda (*standard-output* &amp;rest arguments)
+      (apply #'format t <i class="i">control-string</i> arguments)
+      <i class="i">arguments-tail</i>)
+</pre></div>
+
+<p>where <i class="i">arguments-tail</i> is either the tail of <i class="i">arguments</i> 
+which has as its <i class="i">car</i> the argument that would be processed next 
+if there were more format directives in the <i class="i">control-string</i>, 
+or else <b class="b">nil</b> if no more <i class="i">arguments</i> follow the most recently
+processed argument.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-428"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-428"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">(funcall (formatter &quot;~&amp;~A~A&quot;) *standard-output* 'a 'b 'c)
+<code class="t"> |&gt; </code> AB
+&rArr;  (C)
+
+(format t (formatter &quot;~&amp;~A~A&quot;) 'a 'b 'c)
+<code class="t"> |&gt; </code> AB
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-218"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-218"> &para;</a></span></h4>
+
+<p>Might signal an error (at macro expansion time or at run time) if the argument
+is not a valid <i class="i">format string</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-480"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-480"> &para;</a></span></h4>
+
+<p><a class="ref" href="format.html">format                                                           [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/ftype.html
@@ -0,0 +1,107 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>ftype (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="ftype (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="ftype (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="declaration.html" rel="next" title="declaration">
+<link href="inline.html" rel="prev" title="inline">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="ftype">
+<div class="nav-panel">
+<p>
+Next: <a href="declaration.html" accesskey="n" rel="next">declaration                                                   [Declaration]</a>, Previous: <a href="inline.html" accesskey="p" rel="prev">inline, notinline                                             [Declaration]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="ftype-_005bDeclaration_005d"><span>3.8.23 ftype                                                         [Declaration]<a class="copiable-link" href="#ftype-_005bDeclaration_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-6"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-6"> &para;</a></span></h4>
+
+<p><code class="t">(ftype <i class="i">type</i> {<i class="i">function-name</i>}*)</code>
+</p>
+<h4 class="subsubheading" id="Arguments_003a_003a-6"><span>Arguments::<a class="copiable-link" href="#Arguments_003a_003a-6"> &para;</a></span></h4>
+
+<p><i class="i">function-name</i>&mdash;a <i class="i">function name</i>.
+</p>
+<p><i class="i">type</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<h4 class="subsubheading" id="Valid-Context_003a_003a-4"><span>Valid Context::<a class="copiable-link" href="#Valid-Context_003a_003a-4"> &para;</a></span></h4>
+
+<p><i class="i">declaration</i> or <i class="i">proclamation</i>
+</p>
+<h4 class="subsubheading" id="Binding-Types-Affected_003a_003a-4"><span>Binding Types Affected::<a class="copiable-link" href="#Binding-Types-Affected_003a_003a-4"> &para;</a></span></h4>
+
+<p><i class="i">function</i>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-22"><span>Description::<a class="copiable-link" href="#Description_003a_003a-22"> &para;</a></span></h4>
+
+<p>Specifies that the <i class="i">functions</i> named by <i class="i">function-names</i> are of
+the functional type <i class="i">type</i>.
+For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (declare (ftype (function (integer list) t) ith)
+          (ftype (function (number) float) sine cosine))
+</pre></div>
+
+<p>If one of the <i class="i">functions</i> mentioned has a lexically apparent local definition
+(as made by <b class="b">flet</b> or <b class="b">labels</b>), then the declaration
+applies to that local definition and not to the global function definition.
+<b class="b">ftype</b> declarations never apply to variable <i class="i">bindings</i> (see <code class="t">type</code>). 
+</p>
+<p>The lexically apparent bindings of <i class="i">function-names</i> must not be
+<i class="i">macro</i> definitions.  (This is because <b class="b">ftype</b> declares the
+functional definition of each <i class="i">function name</i> to be of a particular
+subtype of <b class="b">function</b>, and <i class="i">macros</i> do not denote 
+<i class="i">functions</i>.)
+</p>
+<p><b class="b">ftype</b> 
+</p>
+<p>declarations
+can be <i class="i">free declarations</i> or <i class="i">bound declarations</i>.
+<b class="b">ftype</b> declarations of functions that appear before the body of a 
+   <b class="b">flet</b>
+or <b class="b">labels</b>
+</p>
+<p><i class="i">form</i> that defines that function are <i class="i">bound declarations</i>.  
+Such declarations in other contexts are <i class="i">free declarations</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-22"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-22"> &para;</a></span></h4>
+
+<p><b class="b">declare</b>,
+<a class="ref" href="declaim.html">declaim                                                             [Macro]</a>
+,
+<a class="ref" href="proclaim.html">proclaim                                                         [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="declaration.html">declaration                                                   [Declaration]</a>, Previous: <a href="inline.html">inline, notinline                                             [Declaration]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/funcall.html
@@ -0,0 +1,107 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>funcall (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="funcall (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="funcall (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="function-_0028Special-Operator_0029.html" rel="next" title="function (Special Operator)">
+<link href="flet.html" rel="prev" title="flet">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="funcall">
+<div class="nav-panel">
+<p>
+Next: <a href="function-_0028Special-Operator_0029.html" accesskey="n" rel="next">function                                                 [Special Operator]</a>, Previous: <a href="flet.html" accesskey="p" rel="prev">flet, labels, macrolet                                   [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="funcall-_005bFunction_005d"><span>5.3.7 funcall                                                          [Function]<a class="copiable-link" href="#funcall-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">funcall</code>  <i class="i">function <span class="r">&amp;rest</span> args</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-31"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-31"> &para;</a></span></h4>
+
+<p><i class="i">function</i>&mdash;a <i class="i">function designator</i>.
+</p>
+<p><i class="i">args</i>&mdash;<i class="i">arguments</i> to the <i class="i">function</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">function</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-60"><span>Description::<a class="copiable-link" href="#Description_003a_003a-60"> &para;</a></span></h4>
+
+<p><b class="b">funcall</b> applies <i class="i">function</i> to <i class="i">args</i>.
+</p>
+<p>If <i class="i">function</i> is a <i class="i">symbol</i>,
+it is coerced to a <i class="i">function</i> as if by
+finding its <i class="i">functional value</i> in the <i class="i">global environment</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-37"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-37"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (funcall #'+ 1 2 3) &rArr;  6
+ (funcall 'car '(1 2 3)) &rArr;  1
+ (funcall 'position 1 '(1 2 3 2 1) :start 1) &rArr;  4
+ (cons 1 2) &rArr;  (1 . 2)
+ (flet ((cons (x y) `(kons ,x ,y)))
+   (let ((cons (symbol-function '+)))
+     (funcall #'cons
+              (funcall 'cons 1 2)
+              (funcall cons 1 2))))
+&rArr;  (KONS (1 . 2) 3)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-13"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-13"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">undefined-function</b> should be signaled if <i class="i">function</i> 
+is a <i class="i">symbol</i> that does not have a global definition as a <i class="i">function</i>
+or that has a global definition as a <i class="i">macro</i> or a <i class="i">special operator</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-47"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-47"> &para;</a></span></h4>
+
+<p><a class="ref" href="apply.html">apply                                                            [Function]</a>
+, <b class="b">function</b>, <a class="ref" href="Evaluation.html">Evaluation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-28"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-28"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (funcall <i class="i">function</i> <i class="i">arg1</i> <i class="i">arg2</i> ...)
+ &equiv; (apply <i class="i">function</i> <i class="i">arg1</i> <i class="i">arg2</i> ... nil)
+ &equiv; (apply <i class="i">function</i> (list <i class="i">arg1</i> <i class="i">arg2</i> ...))
+</pre></div>
+
+<p>The difference between <b class="b">funcall</b> and an ordinary function call is that
+in the former case the <i class="i">function</i> is obtained by ordinary <i class="i">evaluation</i>
+of a <i class="i">form</i>, and in the latter case it is obtained by the special 
+interpretation of the function position that normally occurs.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="function-_0028Special-Operator_0029.html">function                                                 [Special Operator]</a>, Previous: <a href="flet.html">flet, labels, macrolet                                   [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/function-_0028Special-Operator_0029.html
@@ -0,0 +1,121 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>function (Special Operator) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="function (Special Operator) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="function (Special Operator) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="function_002dlambda_002dexpression.html" rel="next" title="function-lambda-expression">
+<link href="funcall.html" rel="prev" title="funcall">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="function-_0028Special-Operator_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="function_002dlambda_002dexpression.html" accesskey="n" rel="next">function-lambda-expression                                       [Function]</a>, Previous: <a href="funcall.html" accesskey="p" rel="prev">funcall                                                          [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="function-_005bSpecial-Operator_005d"><span>5.3.8 function                                                 [Special Operator]<a class="copiable-link" href="#function-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">function</code>  <i class="i">name</i> &rArr;  <i class="i">function</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-32"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-32"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">function name</i> or <i class="i">lambda expression</i>.
+</p>
+<p><i class="i">function</i>&mdash;a <i class="i">function</i> <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-61"><span>Description::<a class="copiable-link" href="#Description_003a_003a-61"> &para;</a></span></h4>
+
+<p>The <i class="i">value</i> of <b class="b">function</b> is the <i class="i">functional value</i> of <i class="i">name</i>
+in the current <i class="i">lexical environment</i>.
+</p>
+<p>If <i class="i">name</i> is a <i class="i">function name</i>, the functional definition of that name
+is that
+established by the innermost lexically enclosing
+<b class="b">flet</b>, <b class="b">labels</b>, or <b class="b">macrolet</b> <i class="i">form</i>,
+if there is one.  Otherwise the global functional definition of the
+<i class="i">function name</i>
+is returned.
+</p>
+<p>If <i class="i">name</i> is a <i class="i">lambda expression</i>, then a <i class="i">lexical closure</i>
+is returned.  In situations where a <i class="i">closure</i> over the same set of
+<i class="i">bindings</i> might be produced more than once, the various resulting
+<i class="i">closures</i> might or might not be <b class="b">eq</b>.
+</p>
+<p>It is an error to use <b class="b">function</b> on a <i class="i">function name</i> 
+that does not denote a <i class="i">function</i> in the lexical environment in
+which the <b class="b">function</b> form appears. 
+Specifically, it is an error to use <b class="b">function</b> on a <i class="i">symbol</i> 
+that denotes a <i class="i">macro</i> or <i class="i">special form</i>.
+An implementation may choose not to signal this error for
+performance reasons, but implementations are forbidden from
+defining the failure to signal an error as a useful behavior.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-38"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-38"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun adder (x) (function (lambda (y) (+ x y))))
+</pre></div>
+
+<p>The result of <code class="t">(adder 3)</code> is a function that adds <code class="t">3</code> to its argument:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq add3 (adder 3))
+ (funcall add3 5) &rArr;  8
+</pre></div>
+
+<p>This works because <b class="b">function</b> creates a <i class="i">closure</i> of
+the <i class="i">lambda expression</i> that is able to refer to the <i class="i">value</i> <code class="t">3</code>
+of the variable <code class="t">x</code> even after control has returned from the function <code class="t">adder</code>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-48"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-48"> &para;</a></span></h4>
+
+<p><a class="ref" href="defun.html">defun                                                               [Macro]</a>
+,
+<a class="ref" href="fdefinition.html">fdefinition                                                      [Accessor]</a>
+,
+<a class="ref" href="flet.html">flet, labels, macrolet                                   [Special Operator]</a>
+,
+<b class="b">labels</b>,
+<a class="ref" href="symbol_002dfunction.html">symbol-function                                                  [Accessor]</a>
+,
+<a class="ref" href="Symbols-as-Forms.html">Symbols as Forms</a>,
+<a class="ref" href="Sharpsign-Single_002dQuote.html">Sharpsign Single-Quote</a>,
+<a class="ref" href="Printing-Other-Objects.html">Printing Other Objects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-29"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-29"> &para;</a></span></h4>
+
+<p>The notation <code class="t">#'<i class="i">name</i></code> may be used as an abbreviation
+for <code class="t">(function <i class="i">name</i>)</code>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="function_002dlambda_002dexpression.html">function-lambda-expression                                       [Function]</a>, Previous: <a href="funcall.html">funcall                                                          [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/function-_0028System-Class_0029.html
@@ -0,0 +1,211 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>function (System Class) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="function (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="function (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="compiled_002dfunction.html" rel="next" title="compiled-function">
+<link href="boolean.html" rel="prev" title="boolean">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="function-_0028System-Class_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="compiled_002dfunction.html" accesskey="n" rel="next">compiled-function                                                    [Type]</a>, Previous: <a href="boolean.html" accesskey="p" rel="prev">boolean                                                              [Type]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="function-_005bSystem-Class_005d"><span>4.4.3 function                                                     [System Class]<a class="copiable-link" href="#function-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a"> &para;</a></span></h4>
+<p><b class="b">function</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-32"><span>Description::<a class="copiable-link" href="#Description_003a_003a-32"> &para;</a></span></h4>
+
+<p>A <i class="i">function</i> is an <i class="i">object</i> that represents code 
+to be executed when an appropriate number of arguments is supplied.
+A <i class="i">function</i> is produced by 
+ the <b class="b">function</b> <i class="i">special form</i>,
+ the <i class="i">function</i> <b class="b">coerce</b>,
+</p>
+<p>or
+ the <i class="i">function</i> <b class="b">compile</b>.
+A <i class="i">function</i> can be directly invoked by using it as the first argument to
+<b class="b">funcall</b>, <b class="b">apply</b>, or <b class="b">multiple-value-call</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a"> &para;</a></span></h4>
+
+<p>Specializing.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a"> &para;</a></span></h4>
+
+<p>(<code class="code">function</code>{<i class="i"><code class="t">[</code>arg-typespec <span class="r">[</span>value-typespec<span class="r">]</span><code class="t">]</code></i>})
+</p>
+<p><i class="i">arg-typespec</i>&nbsp;::=<span class="r">(</span>{<i class="i">typespec</i>}*&nbsp;<!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;optional</span>&nbsp;{<i class="i">typespec</i>}*<code class="t">]</code>&nbsp;<!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;rest</span>&nbsp;<i class="i">typespec</i><code class="t">]</code>&nbsp;<!-- /@w -->
+&nbsp;<code class="t">[</code><span class="r">&amp;key</span>&nbsp;{<span class="r">(</span>keyword&nbsp;typespec&nbsp;<span class="r">)</span>}*<code class="t">]</code><span class="r">)</span><!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a"> &para;</a></span></h4>
+
+<p><i class="i">typespec</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<p><i class="i">value-typespec</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a"> &para;</a></span></h4>
+
+<p>[Editorial Note by KMP: Isn&rsquo;t there some context info about ftype declarations to be merged here?]
+</p>
+<p>[Editorial Note by KMP: This could still use some cleaning up.]
+</p>
+<p>[Editorial Note by Sandra: Still need clarification about what happens if the
+number of arguments doesn&rsquo;t match the FUNCTION type declaration.]
+</p>
+<p>The list form of the <b class="b">function</b> <i class="i">type-specifier</i>
+can be used only for declaration and not for discrimination.
+Every element of this <i class="i">type</i> is
+a <i class="i">function</i> that accepts arguments of the
+types   
+specified by the  <i class="i">argj-types</i> and returns values that are
+members of the <i class="i">types</i> specified by <i class="i">value-type</i>. The
+<b class="b">&amp;optional</b>, <b class="b">&amp;rest</b>, <b class="b">&amp;key</b>, 
+</p>
+<p>and <b class="b">&amp;allow-other-keys</b> 
+</p>
+<p>markers can appear in the list of argument types. 
+</p>
+<p>The <i class="i">type specifier</i> provided
+with <b class="b">&amp;rest</b> is the <i class="i">type</i> 
+of each actual argument, not the <i class="i">type</i> of the
+corresponding variable.
+</p>
+<p>The <b class="b">&amp;key</b> parameters 
+should be supplied as lists of the form <code class="t">(<i class="i">keyword</i> <i class="i">type</i>)</code>.  
+The <i class="i">keyword</i> must be a valid keyword-name symbol
+as must be supplied in the actual arguments of a
+call.
+</p>
+<p>This is usually a <i class="i">symbol</i> in the <code class="t">KEYWORD</code> <i class="i">package</i> but can be any <i class="i">symbol</i>.
+</p>
+<p>When <b class="b">&amp;key</b> is given in a
+<b class="b">function</b> <i class="i">type specifier</i> <i class="i">lambda list</i>,
+the <i class="i">keyword parameters</i> given
+are exhaustive unless <b class="b">&amp;allow-other-keys</b> is also present. 
+<b class="b">&amp;allow-other-keys</b> is an indication 
+that other keyword arguments might actually be
+supplied and, if supplied, can be used. 
+For example,
+the <i class="i">type</i> of the <i class="i">function</i> <b class="b">make-list</b> could be declared as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (function ((integer 0) &amp;key (:initial-element t)) list)
+</pre></div>
+
+<p>The <i class="i">value-type</i> can be a <b class="b">values</b> 
+<i class="i">type specifier</i> in order to indicate the
+<i class="i">types</i> of <i class="i">multiple values</i>.
+</p>
+<p>Consider a declaration of the following form:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (ftype (function (arg0-type arg1-type ...) val-type) f))
+</pre></div>
+
+<p>Any <i class="i">form</i>
+<code class="t">(f arg0 arg1 ...)</code>
+within the scope of
+that declaration is equivalent to the following:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (the val-type (f (the arg0-type arg0) (the arg1-type arg1) ...))
+</pre></div>
+
+<p>That is, the consequences are undefined if any of the arguments are
+not of the specified <i class="i">types</i> or the result is not of the
+specified <i class="i">type</i>. In particular, if any argument is not of the
+correct <i class="i">type</i>, the result is not guaranteed to be of the
+specified <i class="i">type</i>.
+</p>
+<p>Thus, an <b class="b">ftype</b> declaration for a <i class="i">function</i>
+describes <i class="i">calls</i> to the <i class="i">function</i>, not the actual definition
+of the <i class="i">function</i>.
+</p>
+<p>Consider a declaration of the following form:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (type (function (arg0-type arg1-type ...) val-type) fn-valued-variable)
+</pre></div>
+
+<p>This declaration has the interpretation that, within the scope of the
+declaration, the consequences are unspecified if the value of <code class="t">fn-valued-variable</code> is called with arguments not of the specified
+<i class="i">types</i>; the value resulting from a valid call will be of type
+<code class="t">val-type</code>.
+</p>
+<p>As with variable type declarations, nested declarations
+imply intersections of <i class="i">types</i>, as follows:
+</p><dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>Consider the following two
+declarations of <b class="b">ftype</b>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (ftype (function (arg0-type1 arg1-type1 ...) val-type1) f))
+</pre></div>
+
+<p>and
+</p>
+<div class="example">
+<pre class="example-preformatted"> (ftype (function (arg0-type2 arg1-type2 ...) val-type2) f))
+</pre></div>
+
+<p>If both these declarations are in effect,
+then within the shared scope of the declarations, calls to <code class="t">f</code> can be
+treated as if <code class="t">f</code> were declared as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (ftype (function ((and arg0-type1 arg0-type2) (and arg1-type1 arg1-type2 ...) ...)
+                  (and val-type1 val-type2)) 
+        f))
+</pre></div>
+
+<p>It is permitted to ignore one or all of the <b class="b">ftype</b> declarations in force.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If two (or more) type declarations are in effect for a variable, and
+they are both <code class="t">function</code> declarations, the declarations combine similarly.
+</p></dd>
+</dl>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="compiled_002dfunction.html">compiled-function                                                    [Type]</a>, Previous: <a href="boolean.html">boolean                                                              [Type]</a>, Up: <a href="Types-and-Classes-Dictionary.html">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/function_002dkeywords.html
@@ -0,0 +1,100 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>function-keywords (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="function-keywords (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="function-keywords (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="ensure_002dgeneric_002dfunction.html" rel="next" title="ensure-generic-function">
+<link href="Objects-Dictionary.html" rel="prev" title="Objects Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="function_002dkeywords">
+<div class="nav-panel">
+<p>
+Next: <a href="ensure_002dgeneric_002dfunction.html" accesskey="n" rel="next">ensure-generic-function                                          [Function]</a>, Previous: <a href="Objects-Dictionary.html" accesskey="p" rel="prev">Objects Dictionary</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="function_002dkeywords-_005bStandard-Generic-Function_005d"><span>7.7.1 function-keywords                               [Standard Generic Function]<a class="copiable-link" href="#function_002dkeywords-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-11"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-11"> &para;</a></span></h4>
+
+<p><code class="code">function-keywords</code>  <i class="i">method</i> &rArr;  <i class="i">keys, allow-other-keys-p</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a"> &para;</a></span></h4>
+
+<p><code class="code">function-keywords</code>  <i class="i"><span class="r">(</span><i class="i">method</i> <b class="b">standard-method</b><span class="r">)</span></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-89"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-89"> &para;</a></span></h4>
+
+<p><i class="i">method</i>&mdash;a <i class="i">method</i>.
+</p>
+<p><i class="i">keys</i>&mdash;a <i class="i">list</i>.
+</p>
+<p><i class="i">allow-other-keys-p</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-128"><span>Description::<a class="copiable-link" href="#Description_003a_003a-128"> &para;</a></span></h4>
+
+<p>Returns the keyword parameter specifiers for a <i class="i">method</i>.
+</p>
+<p>Two values are returned: 
+ a <i class="i">list</i> of the explicitly named keywords 
+ and a <i class="i">generalized boolean</i> that states whether <b class="b">&amp;allow-other-keys</b>
+  had been specified in the <i class="i">method</i> definition.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-98"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-98"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defmethod gf1 ((a integer) &amp;optional (b 2)
+                 &amp;key (c 3) ((:dee d) 4) e ((eff f)))
+   (list a b c d e f))
+&rArr;  #&lt;STANDARD-METHOD GF1 (INTEGER) 36324653&gt;
+ (find-method #'gf1 '() (list (find-class 'integer))) 
+&rArr;  #&lt;STANDARD-METHOD GF1 (INTEGER) 36324653&gt;
+ (function-keywords *)
+&rArr;  (:C :DEE :E EFF), <i class="i">false</i>
+ (defmethod gf2 ((a integer))
+   (list a b c d e f))
+&rArr;  #&lt;STANDARD-METHOD GF2 (INTEGER) 42701775&gt;
+ (function-keywords (find-method #'gf1 '() (list (find-class 'integer))))
+&rArr;  (), <i class="i">false</i>
+ (defmethod gf3 ((a integer) &amp;key b c d &amp;allow-other-keys)
+   (list a b c d e f))
+ (function-keywords *)
+&rArr;  (:B :C :D), <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-9"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-9"> &para;</a></span></h4>
+
+<p><b class="b">defmethod</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-110"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-110"> &para;</a></span></h4>
+
+<p><a class="ref" href="defmethod.html">defmethod                                                           [Macro]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/function_002dlambda_002dexpression.html
@@ -0,0 +1,143 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>function-lambda-expression (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="function-lambda-expression (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="function-lambda-expression (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="functionp.html" rel="next" title="functionp">
+<link href="function-_0028Special-Operator_0029.html" rel="prev" title="function (Special Operator)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="function_002dlambda_002dexpression">
+<div class="nav-panel">
+<p>
+Next: <a href="functionp.html" accesskey="n" rel="next">functionp                                                        [Function]</a>, Previous: <a href="function-_0028Special-Operator_0029.html" accesskey="p" rel="prev">function                                                 [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="function_002dlambda_002dexpression-_005bFunction_005d"><span>5.3.9 function-lambda-expression                                       [Function]<a class="copiable-link" href="#function_002dlambda_002dexpression-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">function-lambda-expression</code>  <i class="i">function</i><br>
+   &rArr;  <i class="i">lambda-expression, closure-p, name</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-33"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-33"> &para;</a></span></h4>
+
+<p><i class="i">function</i>&mdash;a <i class="i">function</i>.
+</p>
+<p><i class="i">lambda-expression</i>&mdash;a <i class="i">lambda expression</i> or <b class="b">nil</b>.
+</p>
+<p><i class="i">closure-p</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">name</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-62"><span>Description::<a class="copiable-link" href="#Description_003a_003a-62"> &para;</a></span></h4>
+
+<p>Returns information about <i class="i">function</i> as follows:
+</p>
+<p>The <i class="i">primary value</i>, <i class="i">lambda-expression</i>,
+is <i class="i">function</i>&rsquo;s defining <i class="i">lambda expression</i>, 
+or <b class="b">nil</b> if the information is not available.  The <i class="i">lambda expression</i>
+may have been pre-processed in some ways, but it should remain a suitable 
+argument to <b class="b">compile</b> or <b class="b">function</b>.
+Any <i class="i">implementation</i> may legitimately return <b class="b">nil</b> 
+as the <i class="i">lambda-expression</i> of any <i class="i">function</i>.
+</p>
+<p>The <i class="i">secondary value</i>, <i class="i">closure-p</i>,
+is <b class="b">nil</b> if <i class="i">function</i>&rsquo;s definition was enclosed
+in the <i class="i">null lexical environment</i> or something <i class="i">non-nil</i> if
+<i class="i">function</i>&rsquo;s definition might have been enclosed in some 
+<i class="i">non-null lexical environment</i>.
+Any <i class="i">implementation</i> may legitimately return <i class="i">true</i>
+as the <i class="i">closure-p</i> of any <i class="i">function</i>.
+</p>
+<p>The <i class="i">tertiary value</i>, <i class="i">name</i>,
+is the &ldquo;name&rdquo; of <i class="i">function</i>. 
+The name is intended for debugging only and is not necessarily one that would
+be valid for use as a name in <b class="b">defun</b> or <b class="b">function</b>, for example.
+By convention, <b class="b">nil</b> is used to mean that <i class="i">function</i> has no name.
+Any <i class="i">implementation</i> may legitimately return <b class="b">nil</b> 
+as the <i class="i">name</i> of any <i class="i">function</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-39"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-39"> &para;</a></span></h4>
+
+<p>The following examples illustrate some possible return values, but
+are not intended to be exhaustive:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (function-lambda-expression #'(lambda (x) x))
+&rArr;  NIL, <i class="i">false</i>, NIL
+<i class="i">OR</i>&rArr; NIL, <i class="i">true</i>, NIL
+<i class="i">OR</i>&rArr; (LAMBDA (X) X), <i class="i">true</i>, NIL
+<i class="i">OR</i>&rArr; (LAMBDA (X) X), <i class="i">false</i>, NIL
+
+ (function-lambda-expression
+    (funcall #'(lambda () #'(lambda (x) x))))
+&rArr;  NIL, <i class="i">false</i>, NIL
+<i class="i">OR</i>&rArr; NIL, <i class="i">true</i>, NIL
+<i class="i">OR</i>&rArr; (LAMBDA (X) X), <i class="i">true</i>, NIL
+<i class="i">OR</i>&rArr; (LAMBDA (X) X), <i class="i">false</i>, NIL
+
+ (function-lambda-expression 
+    (funcall #'(lambda (x) #'(lambda () x)) nil))
+&rArr;  NIL, <i class="i">true</i>, NIL
+<i class="i">OR</i>&rArr; (LAMBDA () X), <i class="i">true</i>, NIL
+<i class="i">NOT</i>&rArr; NIL, <i class="i">false</i>, NIL
+<i class="i">NOT</i>&rArr; (LAMBDA () X), <i class="i">false</i>, NIL
+
+ (flet ((foo (x) x))
+   (setf (symbol-function 'bar) #'foo)
+   (function-lambda-expression #'bar))
+&rArr;  NIL, <i class="i">false</i>, NIL
+<i class="i">OR</i>&rArr; NIL, <i class="i">true</i>, NIL
+<i class="i">OR</i>&rArr; (LAMBDA (X) (BLOCK FOO X)), <i class="i">true</i>, NIL
+<i class="i">OR</i>&rArr; (LAMBDA (X) (BLOCK FOO X)), <i class="i">false</i>, FOO
+<i class="i">OR</i>&rArr; (SI::BLOCK-LAMBDA FOO (X) X), <i class="i">false</i>, FOO
+
+ (defun foo ()
+   (flet ((bar (x) x))
+     #'bar))
+ (function-lambda-expression (foo))
+&rArr;  NIL, <i class="i">false</i>, NIL
+<i class="i">OR</i>&rArr; NIL, <i class="i">true</i>, NIL
+<i class="i">OR</i>&rArr; (LAMBDA (X) (BLOCK BAR X)), <i class="i">true</i>, NIL
+<i class="i">OR</i>&rArr; (LAMBDA (X) (BLOCK BAR X)), <i class="i">true</i>, (:INTERNAL FOO 0 BAR)
+<i class="i">OR</i>&rArr; (LAMBDA (X) (BLOCK BAR X)), <i class="i">false</i>, &quot;BAR in FOO&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-30"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-30"> &para;</a></span></h4>
+
+<p>Although <i class="i">implementations</i> are free to return &ldquo;<b class="b">nil</b>, <i class="i">true</i>, <b class="b">nil</b>&rdquo; in all cases, 
+they are encouraged to return a <i class="i">lambda expression</i> as the <i class="i">primary value</i>
+in the case where the argument was created by a call to <b class="b">compile</b> 
+or <b class="b">eval</b> (as opposed to being created by <i class="i">loading</i> a <i class="i">compiled file</i>).
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="functionp.html">functionp                                                        [Function]</a>, Previous: <a href="function-_0028Special-Operator_0029.html">function                                                 [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/functionp.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>functionp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="functionp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="functionp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="compiled_002dfunction_002dp.html" rel="next" title="compiled-function-p">
+<link href="function_002dlambda_002dexpression.html" rel="prev" title="function-lambda-expression">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="functionp">
+<div class="nav-panel">
+<p>
+Next: <a href="compiled_002dfunction_002dp.html" accesskey="n" rel="next">compiled-function-p                                              [Function]</a>, Previous: <a href="function_002dlambda_002dexpression.html" accesskey="p" rel="prev">function-lambda-expression                                       [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="functionp-_005bFunction_005d"><span>5.3.10 functionp                                                        [Function]<a class="copiable-link" href="#functionp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">functionp</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-34"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-34"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-63"><span>Description::<a class="copiable-link" href="#Description_003a_003a-63"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">function</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-40"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-40"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (functionp 'append) &rArr;  <i class="i">false</i>
+ (functionp #'append) &rArr;  <i class="i">true</i>
+ (functionp (symbol-function 'append)) &rArr;  <i class="i">true</i>
+ (flet ((f () 1)) (functionp #'f)) &rArr;  <i class="i">true</i>
+ (functionp (compile nil '(lambda () 259))) &rArr;  <i class="i">true</i>
+ (functionp nil) &rArr;  <i class="i">false</i>
+ (functionp 12) &rArr;  <i class="i">false</i>
+ (functionp '(lambda (x) (* x x))) &rArr;  <i class="i">false</i>
+ (functionp #'(lambda (x) (* x x))) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-31"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-31"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (functionp <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'function)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/gcd.html
@@ -0,0 +1,89 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>gcd (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="gcd (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="gcd (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="incf.html" rel="next" title="incf">
+<link href="exp.html" rel="prev" title="exp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="gcd">
+<div class="nav-panel">
+<p>
+Next: <a href="incf.html" accesskey="n" rel="next">incf, decf                                                          [Macro]</a>, Previous: <a href="exp.html" accesskey="p" rel="prev">exp, expt                                                        [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="gcd-_005bFunction_005d"><span>12.2.32 gcd                                                              [Function]<a class="copiable-link" href="#gcd-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">gcd</code>  <i class="i"><span class="r">&amp;rest</span> integers</i> &rArr;  <i class="i">greatest-common-denominator</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-217"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-217"> &para;</a></span></h4>
+
+<p><i class="i">integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">greatest-common-denominator</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-297"><span>Description::<a class="copiable-link" href="#Description_003a_003a-297"> &para;</a></span></h4>
+
+<p>Returns the greatest common divisor of <i class="i">integers</i>.
+If only one <i class="i">integer</i> is supplied, its absolute value is returned.
+If no <i class="i">integers</i> are given, <b class="b">gcd</b> returns <code class="t">0</code>,
+which is an identity for this operation.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-201"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-201"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (gcd) &rArr;  0
+ (gcd 60 42) &rArr;  6
+ (gcd 3333 -33 101) &rArr;  1
+ (gcd 3333 -33 1002001) &rArr;  11
+ (gcd 91 -49) &rArr;  7
+ (gcd 63 -42 35) &rArr;  7
+ (gcd 5) &rArr;  5
+ (gcd -4) &rArr;  4
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-90"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-90"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if any <i class="i">integer</i> is not an <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-250"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-250"> &para;</a></span></h4>
+
+<p><a class="ref" href="lcm.html">lcm                                                              [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-151"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-151"> &para;</a></span></h4>
+<p>For three or more arguments,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (gcd b c ... z) &equiv; (gcd (gcd a b) c ... z)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/generic_002dfunction.html
@@ -0,0 +1,68 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>generic-function (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="generic-function (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="generic-function (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="standard_002dgeneric_002dfunction.html" rel="next" title="standard-generic-function">
+<link href="compiled_002dfunction.html" rel="prev" title="compiled-function">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="generic_002dfunction">
+<div class="nav-panel">
+<p>
+Next: <a href="standard_002dgeneric_002dfunction.html" accesskey="n" rel="next">standard-generic-function                                    [System Class]</a>, Previous: <a href="compiled_002dfunction.html" accesskey="p" rel="prev">compiled-function                                                    [Type]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="generic_002dfunction-_005bSystem-Class_005d"><span>4.4.5 generic-function                                             [System Class]<a class="copiable-link" href="#generic_002dfunction-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-1"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-1"> &para;</a></span></h4>
+
+<p><b class="b">generic-function</b>,
+<b class="b">function</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-34"><span>Description::<a class="copiable-link" href="#Description_003a_003a-34"> &para;</a></span></h4>
+
+<p>A <i class="i">generic function</i>
+<a class="index-entry-id" id="index-generic-function"></a>
+ is a <i class="i">function</i> whose behavior
+depends on the <i class="i">classes</i> or identities of the <i class="i">arguments</i>
+supplied to it.  A generic function object contains a set of
+<i class="i">methods</i>, a <i class="i">lambda list</i>, a <i class="i">method combination</i> <i class="i">type</i>, 
+and other information.  The <i class="i">methods</i>
+define the class-specific behavior and operations of the <i class="i">generic function</i>;
+a <i class="i">method</i> is said to <i class="i">specialize</i> a <i class="i">generic function</i>.
+When invoked, a <i class="i">generic function</i> executes a subset of its
+<i class="i">methods</i> based on the <i class="i">classes</i> or identities of its <i class="i">arguments</i>.
+</p>
+<p>A <i class="i">generic function</i> can be used in the same ways that an
+ordinary <i class="i">function</i> can be used; specifically, a <i class="i">generic function</i> can
+be used as an argument to <b class="b">funcall</b> and <b class="b">apply</b>,
+and can be given a global or a local name.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/gensym.html
@@ -0,0 +1,124 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>gensym (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="gensym (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="gensym (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="_002agensym_002dcounter_002a.html" rel="next" title="*gensym-counter*">
+<link href="copy_002dsymbol.html" rel="prev" title="copy-symbol">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="gensym">
+<div class="nav-panel">
+<p>
+Next: <a href="_002agensym_002dcounter_002a.html" accesskey="n" rel="next">*gensym-counter*                                                 [Variable]</a>, Previous: <a href="copy_002dsymbol.html" accesskey="p" rel="prev">copy-symbol                                                      [Function]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="gensym-_005bFunction_005d"><span>10.2.7 gensym                                                           [Function]<a class="copiable-link" href="#gensym-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">gensym</code>  <i class="i"><span class="r">&amp;optional</span> x</i> &rArr;  <i class="i">new-symbol</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-162"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-162"> &para;</a></span></h4>
+
+<p><i class="i">x</i>&mdash;a <i class="i">string</i> or a non-negative <i class="i">integer</i>.
+	    Complicated defaulting behavior; see below.
+</p>
+<p><i class="i">new-symbol</i>&mdash;a <i class="i">fresh</i>, <i class="i">uninterned</i> <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-223"><span>Description::<a class="copiable-link" href="#Description_003a_003a-223"> &para;</a></span></h4>
+
+<p>Creates and returns a <i class="i">fresh</i>, <i class="i">uninterned</i> <i class="i">symbol</i>,
+as if by calling <b class="b">make-symbol</b>.  (The only difference between
+<b class="b">gensym</b> and <b class="b">make-symbol</b> is in how the <i class="i">new-symbol</i>&rsquo;s 
+<i class="i">name</i> is determined.)
+</p>
+<p>The <i class="i">name</i> of the <i class="i">new-symbol</i> is the concatenation 
+of a prefix, which defaults to <code class="t">&quot;G&quot;</code>, and
+</p>
+<p>a suffix, which is the decimal representation of a number that
+defaults to the <i class="i">value</i> of <b class="b">*gensym-counter*</b>.
+</p>
+<p>If <i class="i">x</i> is supplied, and is a <i class="i">string</i>, then that <i class="i">string</i> 
+is used as a prefix instead of <code class="t">&quot;G&quot;</code> for this call to <b class="b">gensym</b> only.
+</p>
+<p>If <i class="i">x</i> is supplied, and is an <i class="i">integer</i>, then that <i class="i">integer</i>,
+instead of the <i class="i">value</i> of <b class="b">*gensym-counter*</b>, is used as the suffix
+for this call to <b class="b">gensym</b> only.
+</p>
+<p>If and only if no explicit suffix is supplied,
+<b class="b">*gensym-counter*</b> is incremented after it is used.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-145"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-145"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq sym1 (gensym)) &rArr;  #:G3142
+ (symbol-package sym1) &rArr;  NIL
+ (setq sym2 (gensym 100)) &rArr;  #:G100
+ (setq sym3 (gensym 100)) &rArr;  #:G100
+ (eq sym2 sym3) &rArr;  <i class="i">false</i>
+ (find-symbol &quot;G100&quot;) &rArr;  NIL, NIL
+ (gensym &quot;T&quot;) &rArr;  #:T3143
+ (gensym) &rArr;  #:G3144
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-19"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-19"> &para;</a></span></h4>
+
+<p>Might increment <b class="b">*gensym-counter*</b>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-36"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-36"> &para;</a></span></h4>
+
+<p><b class="b">*gensym-counter*</b>
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-52"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-52"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">x</i> is not a <i class="i">string</i> or a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-197"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-197"> &para;</a></span></h4>
+
+<p><a class="ref" href="gentemp.html">gentemp                                                          [Function]</a>
+,
+<b class="b">*gensym-counter*</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-118"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-118"> &para;</a></span></h4>
+
+<p>The ability to pass a numeric argument to <b class="b">gensym</b> has been deprecated;
+explicitly <i class="i">binding</i> <b class="b">*gensym-counter*</b> is now stylistically preferred.
+(The somewhat baroque conventions for the optional argument are historical
+in nature, and supported primarily for compatibility with older dialects
+of <span class="r">Lisp</span>.   In modern code, it is recommended that the only kind of argument
+used be a string prefix.  In general, though, to obtain more flexible control
+of the <i class="i">new-symbol</i>&rsquo;s <i class="i">name</i>, consider using <b class="b">make-symbol</b> instead.)
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002agensym_002dcounter_002a.html">*gensym-counter*                                                 [Variable]</a>, Previous: <a href="copy_002dsymbol.html">copy-symbol                                                      [Function]</a>, Up: <a href="Symbols-Dictionary.html">Symbols Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/gentemp.html
@@ -0,0 +1,136 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>gentemp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="gentemp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="gentemp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="symbol_002dfunction.html" rel="next" title="symbol-function">
+<link href="_002agensym_002dcounter_002a.html" rel="prev" title="*gensym-counter*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="gentemp">
+<div class="nav-panel">
+<p>
+Next: <a href="symbol_002dfunction.html" accesskey="n" rel="next">symbol-function                                                  [Accessor]</a>, Previous: <a href="_002agensym_002dcounter_002a.html" accesskey="p" rel="prev">*gensym-counter*                                                 [Variable]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="gentemp-_005bFunction_005d"><span>10.2.9 gentemp                                                          [Function]<a class="copiable-link" href="#gentemp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">gentemp</code>  <i class="i"><span class="r">&amp;optional</span> prefix package</i> &rArr;  <i class="i">new-symbol</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-163"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-163"> &para;</a></span></h4>
+
+<p><i class="i">prefix</i>&mdash;a <i class="i">string</i>.
+ The default is <code class="t">&quot;T&quot;</code>.
+</p>
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+ The default is the <i class="i">current package</i>.
+</p>
+<p><i class="i">new-symbol</i>&mdash;a <i class="i">fresh</i>, <i class="i">interned</i> <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-225"><span>Description::<a class="copiable-link" href="#Description_003a_003a-225"> &para;</a></span></h4>
+
+<p><b class="b">gentemp</b> creates and returns a <i class="i">fresh</i> <i class="i">symbol</i>,
+<i class="i">interned</i> in the indicated <i class="i">package</i>.
+The <i class="i">symbol</i> is guaranteed to be one that was not previously
+<i class="i">accessible</i> in <i class="i">package</i>.
+It is neither <i class="i">bound</i> nor <i class="i">fbound</i>, and has a <i class="i">null</i>
+<i class="i">property list</i>.
+</p>
+<p>The <i class="i">name</i> of the <i class="i">new-symbol</i> is the concatenation 
+of the <i class="i">prefix</i> and a suffix, which is taken from an internal
+counter used only by <b class="b">gentemp</b>.  (If a <i class="i">symbol</i> by that name
+is already <i class="i">accessible</i> in <i class="i">package</i>, the counter is incremented as
+many times as is necessary to produce a <i class="i">name</i> that is not already the
+<i class="i">name</i> of a <i class="i">symbol</i> <i class="i">accessible</i> in <i class="i">package</i>.)
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-146"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-146"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (gentemp) &rArr;  T1298
+ (gentemp &quot;FOO&quot;) &rArr;  FOO1299
+ (find-symbol &quot;FOO1300&quot;) &rArr;  NIL, NIL
+ (gentemp &quot;FOO&quot;) &rArr;  FOO1300
+ (find-symbol &quot;FOO1300&quot;) &rArr;  FOO1300, :INTERNAL
+ (intern &quot;FOO1301&quot;) &rArr;  FOO1301, :INTERNAL
+ (gentemp &quot;FOO&quot;) &rArr;  FOO1302
+ (gentemp) &rArr;  T1303
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-20"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-20"> &para;</a></span></h4>
+
+<p>Its internal counter is incremented one or more times.
+</p>
+<p><i class="i">Interns</i> the <i class="i">new-symbol</i> in <i class="i">package</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-38"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-38"> &para;</a></span></h4>
+
+<p>The current state of its internal counter, and
+the current state of the <i class="i">package</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-53"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-53"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">prefix</i> is not a <i class="i">string</i>.
+Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">package</i> is not a <i class="i">package designator</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-199"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-199"> &para;</a></span></h4>
+
+<p><a class="ref" href="gensym.html">gensym                                                           [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-120"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-120"> &para;</a></span></h4>
+
+<p>The function <b class="b">gentemp</b> is deprecated.
+</p>
+<p>If <i class="i">package</i> is the <code class="t">KEYWORD</code> <i class="i">package</i>,
+the result is an <i class="i">external symbol</i> of <i class="i">package</i>.
+Otherwise, the result is an <i class="i">internal symbol</i> of <i class="i">package</i>.
+</p>
+<p>The <b class="b">gentemp</b> internal counter is independent of
+<b class="b">*gensym-counter*</b>, the counter used by <b class="b">gensym</b>.  
+There is no provision for accessing the <b class="b">gentemp</b> internal counter.
+</p>
+<p>Just because <b class="b">gentemp</b> creates a <i class="i">symbol</i> which did not
+previously exist does not mean that such a <i class="i">symbol</i> might not be
+seen in the future (<i class="i">e.g.</i>, in a data file&mdash;perhaps even created by the
+same program in another session).  As such, this symbol is not truly
+unique in the same sense as a <i class="i">gensym</i> would be.  In particular,
+programs which do automatic code generation should be careful not to
+attach global attributes to such generated <i class="i">symbols</i> (<i class="i">e.g.</i>, <b class="b">special</b> <i class="i">declarations</i>) and then write them into a file
+because such global attributes might, in a different session, end up
+applying to other <i class="i">symbols</i> that were automatically generated on
+another day for some other purpose.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="symbol_002dfunction.html">symbol-function                                                  [Accessor]</a>, Previous: <a href="_002agensym_002dcounter_002a.html">*gensym-counter*                                                 [Variable]</a>, Up: <a href="Symbols-Dictionary.html">Symbols Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/get.html
@@ -0,0 +1,155 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>get (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="get (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="get (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="remprop.html" rel="next" title="remprop">
+<link href="symbol_002dvalue.html" rel="prev" title="symbol-value">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="get">
+<div class="nav-panel">
+<p>
+Next: <a href="remprop.html" accesskey="n" rel="next">remprop                                                          [Function]</a>, Previous: <a href="symbol_002dvalue.html" accesskey="p" rel="prev">symbol-value                                                     [Accessor]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="get-_005bAccessor_005d"><span>10.2.15 get                                                              [Accessor]<a class="copiable-link" href="#get-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">get</code>  <i class="i">symbol indicator <span class="r">&amp;optional</span> default</i> &rArr;  <i class="i">value</i>
+</p>
+<p>(setf (<code class="code">         get</code> <i class="i">symbol indicator <span class="r">&amp;optional</span> default</i>) new-value)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-169"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-169"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">indicator</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">default</i>&mdash;an <i class="i">object</i>.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">value</i>&mdash;if the indicated property exists,
+		   the <i class="i">object</i> that is its <i class="i">value</i>;
+		otherwise, the specified <i class="i">default</i>.
+</p>
+<p><i class="i">new-value</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-231"><span>Description::<a class="copiable-link" href="#Description_003a_003a-231"> &para;</a></span></h4>
+
+<p><b class="b">get</b> finds a <i class="i">property</i> 
+on the <i class="i">property list</i>_2 of <i class="i">symbol</i> 
+whose <i class="i">property indicator</i> is <i class="i">identical</i> to <i class="i">indicator</i>,
+and returns its corresponding <i class="i">property value</i>.
+</p>
+<p>If there are multiple <i class="i">properties</i>_1 with that <i class="i">property indicator</i>,
+<b class="b">get</b> uses the first such <i class="i">property</i>.
+</p>
+<p>If there is no <i class="i">property</i> with that <i class="i">property indicator</i>,
+<i class="i">default</i> is returned.
+</p>
+<p><b class="b">setf</b> of <b class="b">get</b> may be used to associate a new <i class="i">object</i>
+with an existing indicator already on the <i class="i">symbol</i>&rsquo;s <i class="i">property list</i>,
+or to create a new assocation if none exists.
+</p>
+<p>If there are multiple <i class="i">properties</i>_1 with that <i class="i">property indicator</i>,
+<b class="b">setf</b> of <b class="b">get</b> associates the <i class="i">new-value</i> 
+with the first such <i class="i">property</i>.
+</p>
+<p>When a <b class="b">get</b> <i class="i">form</i> is used as a <b class="b">setf</b> <i class="i">place</i>,
+any <i class="i">default</i> which is supplied is evaluated according to normal
+left-to-right evaluation rules, but its <i class="i">value</i> is ignored.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-152"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-152"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun make-person (first-name last-name)
+   (let ((person (gensym &quot;PERSON&quot;)))
+     (setf (get person 'first-name) first-name)
+     (setf (get person 'last-name) last-name)
+     person)) &rArr;  MAKE-PERSON
+ (defvar *john* (make-person &quot;John&quot; &quot;Dow&quot;)) &rArr;  *JOHN*
+ *john* &rArr;  #:PERSON4603
+ (defvar *sally* (make-person &quot;Sally&quot; &quot;Jones&quot;)) &rArr;  *SALLY*
+ (get *john* 'first-name) &rArr;  &quot;John&quot;
+ (get *sally* 'last-name) &rArr;  &quot;Jones&quot;
+ (defun marry (man woman married-name)
+   (setf (get man 'wife) woman)
+   (setf (get woman 'husband) man)
+   (setf (get man 'last-name) married-name)
+   (setf (get woman 'last-name) married-name)
+   married-name) &rArr;  MARRY
+ (marry *john* *sally* &quot;Dow-Jones&quot;) &rArr;  &quot;Dow-Jones&quot;
+ (get *john* 'last-name) &rArr;  &quot;Dow-Jones&quot;
+ (get (get *john* 'wife) 'first-name) &rArr;  &quot;Sally&quot;
+ (symbol-plist *john*)
+&rArr;  (WIFE #:PERSON4604 LAST-NAME &quot;Dow-Jones&quot; FIRST-NAME &quot;John&quot;)
+ (defmacro age (person &amp;optional (default ''thirty-something)) 
+   `(get ,person 'age ,default)) &rArr;  AGE
+ (age *john*) &rArr;  THIRTY-SOMETHING
+ (age *john* 20) &rArr;  20
+ (setf (age *john*) 25) &rArr;  25
+ (age *john*) &rArr;  25
+ (age *john* 20) &rArr;  25
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-59"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-59"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">symbol</i> is not a <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-204"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-204"> &para;</a></span></h4>
+
+<p><a class="ref" href="getf.html">getf                                                             [Accessor]</a>
+,
+<a class="ref" href="symbol_002dplist.html">symbol-plist                                                     [Accessor]</a>
+,
+<a class="ref" href="remprop.html">remprop                                                          [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-124"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-124"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (get x y) &equiv; (getf (symbol-plist x) y)
+</pre></div>
+
+<p><i class="i">Numbers</i> and <i class="i">characters</i> are not recommended for use 
+as <i class="i">indicators</i> in portable code since <b class="b">get</b> tests 
+with <b class="b">eq</b> rather than <b class="b">eql</b>, and consequently 
+the effect of using such <i class="i">indicators</i> is 
+<i class="i">implementation-dependent</i>.
+</p>
+<p>There is no way using <b class="b">get</b> to distinguish an absent property from
+one whose value is <i class="i">default</i>.  However, see <b class="b">get-properties</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="remprop.html">remprop                                                          [Function]</a>, Previous: <a href="symbol_002dvalue.html">symbol-value                                                     [Accessor]</a>, Up: <a href="Symbols-Dictionary.html">Symbols Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/get_002dinternal_002dreal_002dtime.html
@@ -0,0 +1,65 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>get-internal-real-time (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="get-internal-real-time (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="get-internal-real-time (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="get_002dinternal_002drun_002dtime.html" rel="next" title="get-internal-run-time">
+<link href="internal_002dtime_002dunits_002dper_002dsecond.html" rel="prev" title="internal-time-units-per-second">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="get_002dinternal_002dreal_002dtime">
+<div class="nav-panel">
+<p>
+Next: <a href="get_002dinternal_002drun_002dtime.html" accesskey="n" rel="next">get-internal-run-time                                            [Function]</a>, Previous: <a href="internal_002dtime_002dunits_002dper_002dsecond.html" accesskey="p" rel="prev">internal-time-units-per-second                          [Constant Variable]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="get_002dinternal_002dreal_002dtime-_005bFunction_005d"><span>25.2.12 get-internal-real-time                                           [Function]<a class="copiable-link" href="#get_002dinternal_002dreal_002dtime-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">get-internal-real-time</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i">internal-time</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-497"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-497"> &para;</a></span></h4>
+
+<p><i class="i">internal-time</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-660"><span>Description::<a class="copiable-link" href="#Description_003a_003a-660"> &para;</a></span></h4>
+
+<p><b class="b">get-internal-real-time</b> returns as an <i class="i">integer</i> the 
+current time in <i class="i">internal time units</i>, relative to an arbitrary 
+time base.  The difference between the values of two calls to this
+function is the amount of elapsed real time (<i class="i">i.e.</i>, clock time) between the two calls. 
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-126"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-126"> &para;</a></span></h4>
+
+<p>Time of day (<i class="i">i.e.</i>, the passage of time).
+The time base affects the result magnitude.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-538"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-538"> &para;</a></span></h4>
+
+<p><a class="ref" href="internal_002dtime_002dunits_002dper_002dsecond.html">internal-time-units-per-second                          [Constant Variable]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/get_002dinternal_002drun_002dtime.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>get-internal-run-time (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="get-internal-run-time (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="get-internal-run-time (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="disassemble.html" rel="next" title="disassemble">
+<link href="get_002dinternal_002dreal_002dtime.html" rel="prev" title="get-internal-real-time">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="get_002dinternal_002drun_002dtime">
+<div class="nav-panel">
+<p>
+Next: <a href="disassemble.html" accesskey="n" rel="next">disassemble                                                      [Function]</a>, Previous: <a href="get_002dinternal_002dreal_002dtime.html" accesskey="p" rel="prev">get-internal-real-time                                           [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="get_002dinternal_002drun_002dtime-_005bFunction_005d"><span>25.2.13 get-internal-run-time                                            [Function]<a class="copiable-link" href="#get_002dinternal_002drun_002dtime-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">get-internal-run-time</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i">internal-time</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-498"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-498"> &para;</a></span></h4>
+
+<p><i class="i">internal-time</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-661"><span>Description::<a class="copiable-link" href="#Description_003a_003a-661"> &para;</a></span></h4>
+
+<p>Returns as an <i class="i">integer</i> the current 
+run time in <i class="i">internal time units</i>.  The precise meaning of this quantity is
+<i class="i">implementation-defined</i>;  it may measure real time, run time, CPU cycles, or some
+other quantity.  The intent is that the difference between the values of two calls
+to this function be the amount of time between the two calls during which 
+computational effort was expended on behalf of the executing program.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-127"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-127"> &para;</a></span></h4>
+
+<p>The <i class="i">implementation</i>,
+the time of day (<i class="i">i.e.</i>, the passage of time).
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-539"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-539"> &para;</a></span></h4>
+
+<p><a class="ref" href="internal_002dtime_002dunits_002dper_002dsecond.html">internal-time-units-per-second                          [Constant Variable]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-331"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-331"> &para;</a></span></h4>
+
+<p>Depending on the <i class="i">implementation</i>, paging time and garbage
+collection time might be included in this measurement.  Also, in a
+multitasking environment, it might not be possible to show the time for
+just the running process, so in some <i class="i">implementations</i>, time taken
+by other processes during the same time interval might be included in
+this measurement as well.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/get_002doutput_002dstream_002dstring.html
@@ -0,0 +1,89 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>get-output-stream-string (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="get-output-stream-string (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="get-output-stream-string (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="make_002dstring_002dinput_002dstream.html" rel="next" title="make-string-input-stream">
+<link href="make_002dconcatenated_002dstream.html" rel="prev" title="make-concatenated-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="get_002doutput_002dstream_002dstring">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dstring_002dinput_002dstream.html" accesskey="n" rel="next">make-string-input-stream                                         [Function]</a>, Previous: <a href="make_002dconcatenated_002dstream.html" accesskey="p" rel="prev">make-concatenated-stream                                         [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="get_002doutput_002dstream_002dstring-_005bFunction_005d"><span>21.2.48 get-output-stream-string                                         [Function]<a class="copiable-link" href="#get_002doutput_002dstream_002dstring-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">get-output-stream-string</code>  <i class="i">string-output-stream</i> &rArr;  <i class="i">string</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-449"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-449"> &para;</a></span></h4>
+
+<p><i class="i">string-output-stream</i>&mdash;a <i class="i">stream</i>.
+</p>
+<p><i class="i">string</i>&mdash;a <i class="i">string</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-579"><span>Description::<a class="copiable-link" href="#Description_003a_003a-579"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">string</i> containing, in order, all the <i class="i">characters</i> 
+that have been output to <i class="i">string-output-stream</i>.
+This operation clears any <i class="i">characters</i> on <i class="i">string-output-stream</i>,
+so the <i class="i">string</i> contains only those <i class="i">characters</i> which have been output
+   since the last call to <b class="b">get-output-stream-string</b>
+or since the creation of the <i class="i">string-output-stream</i>,
+whichever occurred most recently.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-420"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-420"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (setq a-stream (make-string-output-stream)
+        a-string &quot;abcdefghijklm&quot;) &rArr;  &quot;abcdefghijklm&quot;
+ (write-string a-string a-stream) &rArr;  &quot;abcdefghijklm&quot;
+ (get-output-stream-string a-stream) &rArr;  &quot;abcdefghijklm&quot;
+ (get-output-stream-string a-stream) &rArr;  &quot;&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-72"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-72"> &para;</a></span></h4>
+
+<p>The <i class="i">string-output-stream</i> is cleared.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-215"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-215"> &para;</a></span></h4>
+
+<p>The consequences are undefined if <i class="i">stream-output-string</i> is <i class="i">closed</i>.
+</p>
+<p>The consequences are undefined if <i class="i">string-output-stream</i> is a <i class="i">stream</i> that
+was not produced by <b class="b">make-string-output-stream</b>.
+</p>
+<p>The consequences are undefined if <i class="i">string-output-stream</i> was 
+created implicitly by <b class="b">with-output-to-string</b> or <b class="b">format</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-470"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-470"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dstring_002doutput_002dstream.html">make-string-output-stream                                        [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/get_002dproperties.html
@@ -0,0 +1,90 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>get-properties (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="get-properties (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="get-properties (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="getf.html" rel="next" title="getf">
+<link href="rassoc.html" rel="prev" title="rassoc">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="get_002dproperties">
+<div class="nav-panel">
+<p>
+Next: <a href="getf.html" accesskey="n" rel="next">getf                                                             [Accessor]</a>, Previous: <a href="rassoc.html" accesskey="p" rel="prev">rassoc, rassoc-if, rassoc-if-not                                 [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="get_002dproperties-_005bFunction_005d"><span>14.2.40 get-properties                                                   [Function]<a class="copiable-link" href="#get_002dproperties-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">get-properties</code>  <i class="i">plist indicator-list</i> &rArr;  <i class="i">indicator, value, tail</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-309"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-309"> &para;</a></span></h4>
+
+<p><i class="i">plist</i>&mdash;a <i class="i">property list</i>.
+</p>
+<p><i class="i">indicator-list</i>&mdash;a <i class="i">proper list</i> (of <i class="i">indicators</i>).
+</p>
+<p><i class="i">indicator</i>&mdash;an <i class="i">object</i> that is an <i class="i">element</i> of <i class="i">indicator-list</i>.
+</p>
+<p><i class="i">value</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">tail</i>&mdash;a <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-410"><span>Description::<a class="copiable-link" href="#Description_003a_003a-410"> &para;</a></span></h4>
+
+<p><b class="b">get-properties</b> is used to look up any of several
+<i class="i">property list</i> entries all at once.
+</p>
+<p>It searches the <i class="i">plist</i> for the first entry whose <i class="i">indicator</i> 
+is <i class="i">identical</i> to one of the <i class="i">objects</i> in <i class="i">indicator-list</i>.
+If such an entry is found, the <i class="i">indicator</i> and <i class="i">value</i> returned
+are the <i class="i">property indicator</i> and its associated <i class="i">property value</i>,
+and the <i class="i">tail</i> returned is the <i class="i">tail</i> of the <i class="i">plist</i>
+that begins with the found entry (<i class="i">i.e.</i>, whose <i class="i">car</i> is the <i class="i">indicator</i>).
+If no such entry is found, the <i class="i">indicator</i>, <i class="i">value</i>, and <i class="i">tail</i> 
+are all <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-293"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-293"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq x '()) &rArr;  NIL
+ (setq *indicator-list* '(prop1 prop2)) &rArr;  (PROP1 PROP2)
+ (getf x 'prop1) &rArr;  NIL
+ (setf (getf x 'prop1) 'val1) &rArr;  VAL1
+ (eq (getf x 'prop1) 'val1) &rArr;  <i class="i">true</i>
+ (get-properties x *indicator-list*) &rArr;  PROP1, VAL1, (PROP1 VAL1)
+ x &rArr;  (PROP1 VAL1)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-334"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-334"> &para;</a></span></h4>
+
+<p><a class="ref" href="get.html">get                                                              [Accessor]</a>
+, 
+<a class="ref" href="getf.html">getf                                                             [Accessor]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/get_002dsetf_002dexpansion.html
@@ -0,0 +1,106 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>get-setf-expansion (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="get-setf-expansion (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="get-setf-expansion (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="setf.html" rel="next" title="setf">
+<link href="define_002dsetf_002dexpander.html" rel="prev" title="define-setf-expander">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="get_002dsetf_002dexpansion">
+<div class="nav-panel">
+<p>
+Next: <a href="setf.html" accesskey="n" rel="next">setf, psetf                                                         [Macro]</a>, Previous: <a href="define_002dsetf_002dexpander.html" accesskey="p" rel="prev">define-setf-expander                                                [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="get_002dsetf_002dexpansion-_005bFunction_005d"><span>5.3.63 get-setf-expansion                                               [Function]<a class="copiable-link" href="#get_002dsetf_002dexpansion-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">get-setf-expansion</code>  <i class="i">place <span class="r">&amp;optional</span> environment</i><br>
+   &rArr;  <i class="i">vars, vals, store-vars, writer-form, reader-form</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-81"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-81"> &para;</a></span></h4>
+
+<p><i class="i">place</i>&mdash;a <i class="i">place</i>.
+</p>
+<p><i class="i">environment</i>&mdash;an <i class="i">environment</i> <i class="i">object</i>.
+</p>
+<p><i class="i">vars, vals, store-vars, writer-form, reader-form</i>&mdash;a <i class="i">setf expansion</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-116"><span>Description::<a class="copiable-link" href="#Description_003a_003a-116"> &para;</a></span></h4>
+
+<p>Determines
+five values constituting the <i class="i">setf expansion</i> for <i class="i">place</i>
+in <i class="i">environment</i>; see <a class="ref" href="Setf-Expansions.html">Setf Expansions</a>.
+</p>
+<p>If <i class="i">environment</i> is not supplied or <b class="b">nil</b>,
+the environment is the <i class="i">null lexical environment</i>. 
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-89"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-89"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (get-setf-expansion 'x)
+&rArr;  NIL, NIL, (#:G0001), (SETQ X #:G0001), X 
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted">;;; This macro is like POP 
+
+ (defmacro xpop (place &amp;environment env)
+   (multiple-value-bind (dummies vals new setter getter)
+                        (get-setf-expansion place env)
+      `(let* (,@(mapcar #'list dummies vals) (,(car new) ,getter))
+         (if (cdr new) (error &quot;Can't expand this.&quot;))
+         (prog1 (car ,(car new))
+                (setq ,(car new) (cdr ,(car new)))
+                ,setter))))
+
+ (defsetf frob (x) (value) 
+     `(setf (car ,x) ,value)) &rArr;  FROB
+;;; The following is an error; an error might be signaled at macro expansion time
+ (flet ((frob (x) (cdr x)))  ;Invalid
+   (xpop (frob z)))
+
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-100"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-100"> &para;</a></span></h4>
+
+<p><a class="ref" href="defsetf.html">defsetf                                                             [Macro]</a>
+,
+<a class="ref" href="define_002dsetf_002dexpander.html">define-setf-expander                                                [Macro]</a>
+,
+<a class="ref" href="setf.html">setf, psetf                                                         [Macro]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-66"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-66"> &para;</a></span></h4>
+
+<p>Any <i class="i">compound form</i> is a valid <i class="i">place</i>,
+since any <i class="i">compound form</i> whose <i class="i">operator</i> <i class="i">f</i> has no <i class="i">setf expander</i>
+are expanded into a call to <code class="t">(setf <i class="i">f</i>)</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/get_002duniversal_002dtime.html
@@ -0,0 +1,114 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>get-universal-time (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="get-universal-time (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="get-universal-time (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="sleep.html" rel="next" title="sleep">
+<link href="encode_002duniversal_002dtime.html" rel="prev" title="encode-universal-time">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="get_002duniversal_002dtime">
+<div class="nav-panel">
+<p>
+Next: <a href="sleep.html" accesskey="n" rel="next">sleep                                                            [Function]</a>, Previous: <a href="encode_002duniversal_002dtime.html" accesskey="p" rel="prev">encode-universal-time                                            [function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="get_002duniversal_002dtime_002c-get_002ddecoded_002dtime-_005bFunction_005d"><span>25.2.3 get-universal-time, get-decoded-time                             [Function]<a class="copiable-link" href="#get_002duniversal_002dtime_002c-get_002ddecoded_002dtime-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">get-universal-time</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i">universal-time</i>
+</p>
+<p><code class="code">get-decoded-time</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i><br>
+   &rArr;  <i class="i">second, minute, hour, date, month, year, day, daylight-p, zone</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-489"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-489"> &para;</a></span></h4>
+
+<p><i class="i">universal-time</i>&mdash;a <i class="i">universal time</i>.
+</p>
+<p><i class="i">second</i>, <i class="i">minute</i>, <i class="i">hour</i>,
+<i class="i">date</i>, <i class="i">month</i>, <i class="i">year</i>,
+<i class="i">day</i>, <i class="i">daylight-p</i>, <i class="i">zone</i>&mdash;a <i class="i">decoded time</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-651"><span>Description::<a class="copiable-link" href="#Description_003a_003a-651"> &para;</a></span></h4>
+
+<p><b class="b">get-universal-time</b> returns the current time, represented as a <i class="i">universal time</i>.
+</p>
+<p><b class="b">get-decoded-time</b> returns the current time, represented as a <i class="i">decoded time</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-463"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-463"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; At noon on July 4, 1976 in Eastern Daylight Time.
+ (get-decoded-time) &rArr;  0, 0, 12, 4, 7, 1976, 6, <i class="i">true</i>, 5
+;; At exactly the same instant.
+ (get-universal-time) &rArr;  2414332800
+;; Exactly five minutes later.
+ (get-universal-time) &rArr;  2414333100
+;; The difference is 300 seconds (five minutes)
+ (- * **) &rArr;  300
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-120"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-120"> &para;</a></span></h4>
+
+<p>The time of day (<i class="i">i.e.</i>, the passage of time),
+the system clock&rsquo;s ability to keep accurate time,
+and the accuracy of the system clock&rsquo;s initial setting.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-237"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-237"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">error</b> might be signaled if the current time cannot be determined.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-531"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-531"> &para;</a></span></h4>
+
+<p><a class="ref" href="decode_002duniversal_002dtime.html">decode-universal-time                                            [Function]</a>
+,
+<a class="ref" href="encode_002duniversal_002dtime.html">encode-universal-time                                            [function]</a>
+,
+<a class="ref" href="Time.html">Time</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-325"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-325"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (get-decoded-time) &equiv; (decode-universal-time (get-universal-time))
+</pre></div>
+
+<p>No <i class="i">implementation</i> is required to have a way to verify that the
+time returned is correct.  However, if an <i class="i">implementation</i> provides
+a validity check (<i class="i">e.g.</i>, the failure to have properly initialized the system
+clock can be reliably detected) and that validity check fails, 
+the <i class="i">implementation</i> is strongly encouraged (but not required)
+to signal an error of <i class="i">type</i> <b class="b">error</b> (rather than, for example, returning a
+known-to-be-wrong value) that is <i class="i">correctable</i> by allowing the user
+to interactively set the correct time.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="sleep.html">sleep                                                            [Function]</a>, Previous: <a href="encode_002duniversal_002dtime.html">encode-universal-time                                            [function]</a>, Up: <a href="Environment-Dictionary.html">Environment Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/getf.html
@@ -0,0 +1,153 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>getf (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="getf (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="getf (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="remf.html" rel="next" title="remf">
+<link href="get_002dproperties.html" rel="prev" title="get-properties">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="getf">
+<div class="nav-panel">
+<p>
+Next: <a href="remf.html" accesskey="n" rel="next">remf                                                                [Macro]</a>, Previous: <a href="get_002dproperties.html" accesskey="p" rel="prev">get-properties                                                   [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="getf-_005bAccessor_005d"><span>14.2.41 getf                                                             [Accessor]<a class="copiable-link" href="#getf-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">getf</code>  <i class="i">plist indicator <span class="r">&amp;optional</span> default</i> &rArr;  <i class="i">value</i>
+</p>
+<p>(setf (<code class="code">         getf</code> <i class="i">place indicator <span class="r">&amp;optional</span> default</i>) new-value)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-310"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-310"> &para;</a></span></h4>
+
+<p><i class="i">plist</i>&mdash;a <i class="i">property list</i>.
+</p>
+<p><i class="i">place</i>&mdash;a <i class="i">place</i>, the <i class="i">value</i> of which is a <i class="i">property list</i>.
+</p>
+<p><i class="i">indicator</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">default</i>&mdash;an <i class="i">object</i>.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">value</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">new-value</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-411"><span>Description::<a class="copiable-link" href="#Description_003a_003a-411"> &para;</a></span></h4>
+
+<p><b class="b">getf</b> finds a <i class="i">property</i> on the <i class="i">plist</i>
+whose <i class="i">property indicator</i> is <i class="i">identical</i> to <i class="i">indicator</i>,
+and returns its corresponding <i class="i">property value</i>.
+</p>
+<p>If there are multiple <i class="i">properties</i>_1 with that <i class="i">property indicator</i>,
+<b class="b">getf</b> uses the first such <i class="i">property</i>.
+</p>
+<p>If there is no <i class="i">property</i> with that <i class="i">property indicator</i>,
+<i class="i">default</i> is returned.
+</p>
+<p><b class="b">setf</b> of <b class="b">getf</b> may be used to associate a new <i class="i">object</i>
+with an existing indicator in the <i class="i">property list</i> held by <i class="i">place</i>,
+or to create a new assocation if none exists.
+</p>
+<p>If there are multiple <i class="i">properties</i>_1 with that <i class="i">property indicator</i>,
+<b class="b">setf</b> of <b class="b">getf</b> associates the <i class="i">new-value</i> 
+with the first such <i class="i">property</i>.
+</p>
+<p>When a <b class="b">getf</b> <i class="i">form</i> is used as a <b class="b">setf</b> <i class="i">place</i>,
+any <i class="i">default</i> which is supplied is evaluated according to normal
+left-to-right evaluation rules, but its <i class="i">value</i> is ignored.
+</p>
+<p><b class="b">setf</b> of <b class="b">getf</b> is permitted to either
+    <i class="i">write</i> the <i class="i">value</i> of <i class="i">place</i> itself,
+ or modify of any part, <i class="i">car</i> or <i class="i">cdr</i>, 
+     of the <i class="i">list structure</i> held by <i class="i">place</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-294"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-294"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq x '()) &rArr;  NIL
+ (getf x 'prop1) &rArr;  NIL
+ (getf x 'prop1 7) &rArr;  7
+ (getf x 'prop1) &rArr;  NIL
+ (setf (getf x 'prop1) 'val1) &rArr;  VAL1
+ (eq (getf x 'prop1) 'val1) &rArr;  <i class="i">true</i>
+ (getf x 'prop1) &rArr;  VAL1
+ (getf x 'prop1 7) &rArr;  VAL1
+ x &rArr;  (PROP1 VAL1)
+
+;; Examples of implementation variation permitted.
+ (setq foo (list 'a 'b 'c 'd 'e 'f)) &rArr;  (A B C D E F)
+ (setq bar (cddr foo)) &rArr;  (C D E F)
+ (remf foo 'c) &rArr;  <i class="i">true</i>
+ foo &rArr;  (A B E F)
+ bar
+&rArr;  (C D E F)
+<i class="i">OR</i>&rArr; (C)
+<i class="i">OR</i>&rArr; (NIL)
+<i class="i">OR</i>&rArr; (C NIL)
+<i class="i">OR</i>&rArr; (C D)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-335"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-335"> &para;</a></span></h4>
+
+<p><a class="ref" href="get.html">get                                                              [Accessor]</a>
+,
+<a class="ref" href="get_002dproperties.html">get-properties                                                   [Function]</a>
+,
+<a class="ref" href="setf.html">setf, psetf                                                         [Macro]</a>
+,
+<a class="ref" href="Function-Call-Forms-as-Places.html">Function Call Forms as Places</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-222"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-222"> &para;</a></span></h4>
+
+<p>There is no way (using <b class="b">getf</b>) to distinguish an absent property
+from one whose value is <i class="i">default</i>; but see <b class="b">get-properties</b>.
+</p>
+<p>Note that while supplying a <i class="i">default</i> argument to <b class="b">getf</b>
+in a <b class="b">setf</b> situation is sometimes not very interesting,
+it is still important because some macros, such as <b class="b">push</b> and
+<b class="b">incf</b>, require a <i class="i">place</i> argument which data is both <i class="i">read</i>
+from and <i class="i">written</i> to.  In such a context, if a <i class="i">default</i> 
+argument is to be supplied for the <i class="i">read</i> situation, it must be
+syntactically valid for the <i class="i">write</i> situation as well. For example,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((plist '()))
+   (incf (getf plist 'count 0))
+   plist) &rArr;  (COUNT 1)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="remf.html">remf                                                                [Macro]</a>, Previous: <a href="get_002dproperties.html">get-properties                                                   [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/gethash.html
@@ -0,0 +1,116 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>gethash (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="gethash (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="gethash (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Tables-Dictionary.html" rel="up" title="Hash Tables Dictionary">
+<link href="remhash.html" rel="next" title="remhash">
+<link href="hash_002dtable_002dtest.html" rel="prev" title="hash-table-test">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="gethash">
+<div class="nav-panel">
+<p>
+Next: <a href="remhash.html" accesskey="n" rel="next">remhash                                                          [Function]</a>, Previous: <a href="hash_002dtable_002dtest.html" accesskey="p" rel="prev">hash-table-test                                                  [Function]</a>, Up: <a href="Hash-Tables-Dictionary.html" accesskey="u" rel="up">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="gethash-_005bAccessor_005d"><span>18.2.9 gethash                                                          [Accessor]<a class="copiable-link" href="#gethash-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">gethash</code>  <i class="i">key hash-table <span class="r">&amp;optional</span> default</i> &rArr;  <i class="i">value, present-p</i>
+</p>
+<p>(setf (<code class="code">         gethash</code> <i class="i">key hash-table <span class="r">&amp;optional</span> default</i>) new-value)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-383"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-383"> &para;</a></span></h4>
+
+<p><i class="i">key</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">hash-table</i>&mdash;a <i class="i">hash table</i>.
+</p>
+<p><i class="i">default</i>&mdash;an <i class="i">object</i>.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">value</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">present-p</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-499"><span>Description::<a class="copiable-link" href="#Description_003a_003a-499"> &para;</a></span></h4>
+
+<p><i class="i">Value</i> is the <i class="i">object</i> in <i class="i">hash-table</i> whose <i class="i">key</i> 
+is the <i class="i">same</i> as <i class="i">key</i> under the <i class="i">hash-table</i>&rsquo;s equivalence test.
+If there is no such entry, <i class="i">value</i> is the <i class="i">default</i>.
+</p>
+<p><i class="i">Present-p</i> is <i class="i">true</i> if an entry is found; otherwise, it is <i class="i">false</i>.
+</p>
+<p><b class="b">setf</b> may be used with <b class="b">gethash</b> to modify the <i class="i">value</i>
+associated with a given <i class="i">key</i>, or to add a new entry.
+</p>
+<p>When a <b class="b">gethash</b> <i class="i">form</i> is used as a <b class="b">setf</b> <i class="i">place</i>,
+any <i class="i">default</i> which is supplied is evaluated according to normal
+left-to-right evaluation rules, but its <i class="i">value</i> is ignored.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-363"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-363"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq table (make-hash-table)) &rArr;  #&lt;HASH-TABLE EQL 0/120 32206334&gt;
+ (gethash 1 table) &rArr;  NIL, <i class="i">false</i>
+ (gethash 1 table 2) &rArr;  2, <i class="i">false</i>
+ (setf (gethash 1 table) &quot;one&quot;) &rArr;  &quot;one&quot;
+ (setf (gethash 2 table &quot;two&quot;) &quot;two&quot;) &rArr;  &quot;two&quot;
+ (gethash 1 table) &rArr;  &quot;one&quot;, <i class="i">true</i>
+ (gethash 2 table) &rArr;  &quot;two&quot;, <i class="i">true</i>
+ (gethash nil table) &rArr;  NIL, <i class="i">false</i>
+ (setf (gethash nil table) nil) &rArr;  NIL 
+ (gethash nil table) &rArr;  NIL, <i class="i">true</i>
+ (defvar *counters* (make-hash-table)) &rArr;  *COUNTERS*
+ (gethash 'foo *counters*) &rArr;  NIL, <i class="i">false</i>
+ (gethash 'foo *counters* 0) &rArr;  0, <i class="i">false</i>
+ (defmacro how-many (obj) `(values (gethash ,obj *counters* 0))) &rArr;  HOW-MANY
+ (defun count-it (obj) (incf (how-many obj))) &rArr;  COUNT-IT
+ (dolist (x '(bar foo foo bar bar baz)) (count-it x))
+ (how-many 'foo) &rArr;  2
+ (how-many 'bar) &rArr;  3
+ (how-many 'quux) &rArr;  0
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-408"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-408"> &para;</a></span></h4>
+
+<p><a class="ref" href="remhash.html">remhash                                                          [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-273"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-273"> &para;</a></span></h4>
+
+<p>The <i class="i">secondary value</i>, <i class="i">present-p</i>,
+can be used to distinguish the absence of an entry
+from the presence of an entry that has a value of <i class="i">default</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="remhash.html">remhash                                                          [Function]</a>, Previous: <a href="hash_002dtable_002dtest.html">hash-table-test                                                  [Function]</a>, Up: <a href="Hash-Tables-Dictionary.html">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/go.html
@@ -0,0 +1,107 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>go (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="go (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="go (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="return_002dfrom.html" rel="next" title="return-from">
+<link href="catch.html" rel="prev" title="catch">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="go">
+<div class="nav-panel">
+<p>
+Next: <a href="return_002dfrom.html" accesskey="n" rel="next">return-from                                              [Special Operator]</a>, Previous: <a href="catch.html" accesskey="p" rel="prev">catch                                                    [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="go-_005bSpecial-Operator_005d"><span>5.3.24 go                                                       [Special Operator]<a class="copiable-link" href="#go-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">go</code>  <i class="i">tag</i> 
+        &rArr;  #&lt;NoValue&gt;
+</p><h4 class="subsubheading" id="Arguments-and-Values_003a_003a-45"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-45"> &para;</a></span></h4>
+
+<p><i class="i">tag</i>&mdash;a <i class="i">go tag</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-77"><span>Description::<a class="copiable-link" href="#Description_003a_003a-77"> &para;</a></span></h4>
+
+<p><b class="b">go</b> transfers control to the point in the body 
+of an enclosing <b class="b">tagbody</b> form labeled by a
+tag <b class="b">eql</b> to <i class="i">tag</i>.  
+If there is no such <i class="i">tag</i>  in the body, the
+bodies of lexically containing <b class="b">tagbody</b> <i class="i">forms</i>
+(if any) are examined as well.
+If several tags are <b class="b">eql</b> 
+to <i class="i">tag</i>, control is transferred to
+whichever matching <i class="i">tag</i> 
+is contained in the innermost <b class="b">tagbody</b> form that
+contains the <b class="b">go</b>.
+The consequences are undefined
+if there is no matching <i class="i">tag</i> lexically visible
+to the point of the <b class="b">go</b>.
+</p>
+<p>The transfer of control initiated by <b class="b">go</b> is performed
+as described in <a class="ref" href="Transfer-of-Control-to-an-Exit-Point.html">Transfer of Control to an Exit Point</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-51"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-51"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (tagbody
+   (setq val 2)
+   (go lp)
+   (incf val 3)
+   lp (incf val 4)) &rArr;  NIL
+ val &rArr;  6 
+</pre></div>
+
+<p>The following is in error because there is a normal exit 
+of the <b class="b">tagbody</b> before the 
+<b class="b">go</b> is executed.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((a nil)) 
+   (tagbody t (setq a #'(lambda () (go t))))
+   (funcall a))
+</pre></div>
+
+<p>The following is in error because the <b class="b">tagbody</b> is passed over
+before the <b class="b">go</b> <i class="i">form</i> is executed.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (funcall (block nil
+            (tagbody a (return #'(lambda () (go a))))))
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-62"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-62"> &para;</a></span></h4>
+
+<p><a class="ref" href="tagbody.html">tagbody                                                  [Special Operator]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="return_002dfrom.html">return-from                                              [Special Operator]</a>, Previous: <a href="catch.html">catch                                                    [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/graphic_002dchar_002dp.html
@@ -0,0 +1,78 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>graphic-char-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="graphic-char-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="graphic-char-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="standard_002dchar_002dp.html" rel="next" title="standard-char-p">
+<link href="digit_002dchar_002dp.html" rel="prev" title="digit-char-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="graphic_002dchar_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="standard_002dchar_002dp.html" accesskey="n" rel="next">standard-char-p                                                  [Function]</a>, Previous: <a href="digit_002dchar_002dp.html" accesskey="p" rel="prev">digit-char-p                                                     [Function]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="graphic_002dchar_002dp-_005bFunction_005d"><span>13.2.12 graphic-char-p                                                   [Function]<a class="copiable-link" href="#graphic_002dchar_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">graphic-char-p</code>  <i class="i">char</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-265"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-265"> &para;</a></span></h4>
+
+<p><i class="i">char</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-361"><span>Description::<a class="copiable-link" href="#Description_003a_003a-361"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">character</i> is a <i class="i">graphic</i> <i class="i">character</i>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-249"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-249"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (graphic-char-p #\G) &rArr;  <i class="i">true</i>
+ (graphic-char-p #\#) &rArr;  <i class="i">true</i>
+ (graphic-char-p #\Space) &rArr;  <i class="i">true</i>
+ (graphic-char-p #\Newline) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-111"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-111"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">character</i> is not a <i class="i">character</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-291"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-291"> &para;</a></span></h4>
+
+<p><a class="ref" href="read.html">read, read-preserving-whitespace                                 [Function]</a>
+,
+<a class="ref" href="Character-Syntax.html">Character Syntax</a>,
+<a class="ref" href="Documentation-of-Implementation_002dDefined-Scripts.html">Documentation of Implementation-Defined Scripts</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/handler_002dbind.html
@@ -0,0 +1,130 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>handler-bind (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="handler-bind (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="handler-bind (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="handler_002dcase.html" rel="next" title="handler-case">
+<link href="_002abreak_002don_002dsignals_002a.html" rel="prev" title="*break-on-signals*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="handler_002dbind">
+<div class="nav-panel">
+<p>
+Next: <a href="handler_002dcase.html" accesskey="n" rel="next">handler-case                                                        [Macro]</a>, Previous: <a href="_002abreak_002don_002dsignals_002a.html" accesskey="p" rel="prev">*break-on-signals*                                               [Variable]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="handler_002dbind-_005bMacro_005d"><span>9.2.26 handler-bind                                                        [Macro]<a class="copiable-link" href="#handler_002dbind-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">handler-bind</code>  <i class="i"><span class="r">(</span>{!<i class="i">binding</i>}*<span class="r">)</span> 
+		   {<i class="i">form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><i class="i">binding</i>&nbsp;::=<span class="r">(</span>type&nbsp;handler<span class="r">)</span><!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-143"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-143"> &para;</a></span></h4>
+
+<p><i class="i">type</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<p><i class="i">handler</i>&mdash;a <i class="i">form</i>; evaluated to produce a <i class="i">handler-function</i>.
+</p>
+<p><i class="i">handler-function</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one <i class="i">argument</i>.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-196"><span>Description::<a class="copiable-link" href="#Description_003a_003a-196"> &para;</a></span></h4>
+
+<p>Executes <i class="i">forms</i> in a <i class="i">dynamic environment</i> where the indicated
+<i class="i">handler</i> <i class="i">bindings</i> are in effect.
+</p>
+<p>Each <i class="i">handler</i> should evaluate to a <i class="i">handler-function</i>,
+which is used to handle <i class="i">conditions</i> of the given <i class="i">type</i>
+during execution of the <i class="i">forms</i>.  This <i class="i">function</i> should
+take a single argument, the <i class="i">condition</i> being signaled.
+</p>
+<p>If more than one <i class="i">handler</i> <i class="i">binding</i> is supplied, 
+the <i class="i">handler</i> <i class="i">bindings</i> are searched sequentially from 
+top to bottom in search of a match (by visual analogy with <b class="b">typecase</b>).  
+If an appropriate <i class="i">type</i> is found, 
+the associated handler is run in a <i class="i">dynamic environment</i> where none of these
+<i class="i">handler</i> bindings are visible (to avoid recursive errors).  
+If the <i class="i">handler</i> <i class="i">declines</i>, the search continues for another <i class="i">handler</i>.
+</p>
+<p>If no appropriate <i class="i">handler</i> is found, other <i class="i">handlers</i> are sought
+from dynamically enclosing contours.  If no <i class="i">handler</i> is found outside, 
+then <b class="b">signal</b> returns or <b class="b">error</b> enters the debugger. 
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-125"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-125"> &para;</a></span></h4>
+
+<p>In the following code, if an unbound variable error is
+signaled in the body (and not handled by an intervening handler), 
+the first function is called.  
+</p>
+<div class="example">
+<pre class="example-preformatted"> (handler-bind ((unbound-variable #'(lambda ...))
+                (error #'(lambda ...)))
+   ...)
+</pre></div>
+
+<p>If any other kind of error is signaled, the second function is called.
+In either case, neither handler is active while executing the code
+in the associated function.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun trap-error-handler (condition)
+   (format *error-output* &quot;~&amp;~A~&amp;&quot; condition)
+   (throw 'trap-errors nil))
+
+ (defmacro trap-errors (&amp;rest forms)
+   `(catch 'trap-errors
+      (handler-bind ((error #'trap-error-handler))
+        ,@forms)))
+
+ (list (trap-errors (signal &quot;Foo.&quot;) 1)
+       (trap-errors (error  &quot;Bar.&quot;) 2)
+       (+ 1 2))
+<code class="t"> |&gt; </code> Bar.
+&rArr;  (1 NIL 3)
+</pre></div>
+
+<p>Note that &ldquo;Foo.&rdquo; is not printed because the condition made
+by <b class="b">signal</b> is a <i class="i">simple condition</i>, which is not of <i class="i">type</i> <b class="b">error</b>, 
+so it doesn&rsquo;t trigger the handler for <b class="b">error</b> set up by <code class="t">trap-errors</code>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-171"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-171"> &para;</a></span></h4>
+
+<p><a class="ref" href="handler_002dcase.html">handler-case                                                        [Macro]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="handler_002dcase.html">handler-case                                                        [Macro]</a>, Previous: <a href="_002abreak_002don_002dsignals_002a.html">*break-on-signals*                                               [Variable]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/handler_002dcase.html
@@ -0,0 +1,214 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>handler-case (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="handler-case (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="handler-case (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="ignore_002derrors.html" rel="next" title="ignore-errors">
+<link href="handler_002dbind.html" rel="prev" title="handler-bind">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="handler_002dcase">
+<div class="nav-panel">
+<p>
+Next: <a href="ignore_002derrors.html" accesskey="n" rel="next">ignore-errors                                                       [Macro]</a>, Previous: <a href="handler_002dbind.html" accesskey="p" rel="prev">handler-bind                                                        [Macro]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="handler_002dcase-_005bMacro_005d"><span>9.2.27 handler-case                                                        [Macro]<a class="copiable-link" href="#handler_002dcase-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">handler-case</code>  <i class="i"><i class="i">expression</i>
+		   [[{!<i class="i">error-clause</i>}* | !<i class="i">no-error-clause</i>]]</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><i class="i">clause</i>&nbsp;::=!<i class="i">error-clause</i>&nbsp;|&nbsp;!<i class="i">no-error-clause</i><!-- /@w -->
+</p>
+<p><i class="i">error-clause</i>&nbsp;::=<span class="r">(</span>typespec&nbsp;<span class="r">(</span><code class="t">[</code>var<code class="t">]</code><span class="r">)</span>&nbsp;{<i class="i">declaration</i>}*&nbsp;{<i class="i">form</i>}*<span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">no-error-clause</i>&nbsp;::=<span class="r">(</span><code class="t">:no-error</code>&nbsp;<i class="i">lambda-list</i>&nbsp;{<i class="i">declaration</i>}*&nbsp;{<i class="i">form</i>}*<span class="r">)</span><!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-144"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-144"> &para;</a></span></h4>
+
+<p><i class="i">expression</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">typespec</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<p><i class="i">var</i>&mdash;a <i class="i">variable</i> <i class="i">name</i>. 
+</p>
+<p><i class="i">lambda-list</i>&mdash;an <i class="i">ordinary lambda list</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">results</i>&mdash;In the normal situation, the values returned are those that result from
+   the evaluation of <i class="i">expression</i>;
+   in the exceptional situation when control is transferred to a <i class="i">clause</i>,
+   the value of the last <i class="i">form</i> in that <i class="i">clause</i> is returned.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-197"><span>Description::<a class="copiable-link" href="#Description_003a_003a-197"> &para;</a></span></h4>
+
+<p><b class="b">handler-case</b> executes <i class="i">expression</i> in a <i class="i">dynamic environment</i> where
+various handlers are active.  Each <i class="i">error-clause</i> specifies how to 
+handle a <i class="i">condition</i> matching the indicated <i class="i">typespec</i>. 
+A <i class="i">no-error-clause</i> allows the specification of a particular action
+if control returns normally.
+</p>
+<p>If a <i class="i">condition</i> is signaled for which there is an appropriate
+<i class="i">error-clause</i> during the execution of <i class="i">expression</i>
+(<i class="i">i.e.</i>, one for which <code class="t">(typep <i class="i">condition</i> '<i class="i">typespec</i>)</code>
+returns <i class="i">true</i>) and if there is no intervening handler for a 
+<i class="i">condition</i> of that <i class="i">type</i>, then control is transferred to
+the body of the relevant <i class="i">error-clause</i>.  In this case, the 
+dynamic state is unwound appropriately (so that the handlers established
+around the <i class="i">expression</i> are no longer active), and <i class="i">var</i> is bound to
+the <i class="i">condition</i> that had been signaled.
+If more than one case is provided, those cases are made accessible
+in parallel.  That is, in
+</p>
+<div class="example">
+<pre class="example-preformatted">  (handler-case <i class="i">form</i>
+    (<i class="i">typespec1</i> (<i class="i">var1</i>) <i class="i">form1</i>)
+    (<i class="i">typespec2</i> (<i class="i">var2</i>) <i class="i">form2</i>))
+</pre></div>
+
+<p>if the first <i class="i">clause</i> (containing <i class="i">form1</i>) has been selected, 
+the handler for the second is no longer visible (or vice versa).
+</p>
+<p>The <i class="i">clauses</i>
+are searched sequentially from top to bottom. If there is <i class="i">type</i>
+   overlap between <i class="i">typespecs</i>, 
+the earlier of the <i class="i">clauses</i> is selected.
+</p>
+<p>If <i class="i">var</i> 
+is not needed, it can be omitted. That is, a <i class="i">clause</i> such as:
+</p>
+<div class="example">
+<pre class="example-preformatted">  (<i class="i">typespec</i> (<i class="i">var</i>) (declare (ignore <i class="i">var</i>)) <i class="i">form</i>)
+</pre></div>
+
+<p>can be written
+ <code class="t">(<i class="i">typespec</i> () <i class="i">form</i>)</code>.
+</p>
+<p>If there are no <i class="i">forms</i> in a selected <i class="i">clause</i>, the case, and therefore
+   <b class="b">handler-case</b>, returns <b class="b">nil</b>.
+    If execution of <i class="i">expression</i> 
+returns normally and no <i class="i">no-error-clause</i>
+   exists, the values returned by 
+<i class="i">expression</i> are returned by <b class="b">handler-case</b>.
+   If execution of 
+<i class="i">expression</i> returns normally and a <i class="i">no-error-clause</i>
+   does exist, the values returned are used as arguments to the function
+   described by constructing
+ <code class="t">(lambda <i class="i">lambda-list</i> {<i class="i">form</i>}*)</code>
+   from the <i class="i">no-error-clause</i>, and the <i class="i">values</i> of that function call are
+   returned by <b class="b">handler-case</b>.
+The handlers which were established around the <i class="i">expression</i> are no longer active at the time of this call.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-126"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-126"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun assess-condition (condition)
+   (handler-case (signal condition)
+     (warning () &quot;Lots of smoke, but no fire.&quot;)
+     ((or arithmetic-error control-error cell-error stream-error)
+        (condition)
+       (format nil &quot;~S looks especially bad.&quot; condition))
+     (serious-condition (condition)
+       (format nil &quot;~S looks serious.&quot; condition))
+     (condition () &quot;Hardly worth mentioning.&quot;)))
+&rArr;  ASSESS-CONDITION
+ (assess-condition (make-condition 'stream-error :stream *terminal-io*))
+&rArr;  &quot;#&lt;STREAM-ERROR 12352256&gt; looks especially bad.&quot;
+ (define-condition random-condition (condition) () 
+   (:report (lambda (condition stream)
+              (declare (ignore condition))
+              (princ &quot;Yow&quot; stream))))
+&rArr;  RANDOM-CONDITION
+ (assess-condition (make-condition 'random-condition))
+&rArr;  &quot;Hardly worth mentioning.&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-172"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-172"> &para;</a></span></h4>
+
+<p><a class="ref" href="handler_002dbind.html">handler-bind                                                        [Macro]</a>
+,
+<a class="ref" href="ignore_002derrors.html">ignore-errors                                                       [Macro]</a>
+,
+<a class="ref" href="Condition-System-Concepts.html">Condition System Concepts</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-105"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-105"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (handler-case form
+   (<i class="i">type1</i> (<i class="i">var1</i>) . <i class="i">body1</i>)
+   (<i class="i">type2</i> (<i class="i">var2</i>) . <i class="i">body2</i>) ...)
+</pre></div>
+
+<p>is approximately equivalent to:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (block #1=#:g0001
+   (let ((#2=#:g0002 nil))
+     (tagbody
+       (handler-bind ((<i class="i">type1</i> #'(lambda (temp)
+                                       (setq #1# temp)
+                                       (go #3=#:g0003)))
+                      (<i class="i">type2</i> #'(lambda (temp)
+                                       (setq #2# temp)
+                                       (go #4=#:g0004))) ...)
+       (return-from #1# form))
+         #3# (return-from #1# (let ((<i class="i">var1</i> #2#)) . <i class="i">body1</i>))
+         #4# (return-from #1# (let ((<i class="i">var2</i> #2#)) . <i class="i">body2</i>)) ...)))
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (handler-case form
+   (<i class="i">type1</i> <i class="i">(var1)</i> . <i class="i">body1</i>)
+   ...
+   (:no-error (<i class="i">varN-1</i> <i class="i">varN-2</i> ...) . <i class="i">bodyN</i>))
+</pre></div>
+
+<p>is approximately equivalent to:
+</p>
+<div class="example">
+<pre class="example-preformatted">
+
+ (block #1=#:error-return
+  (multiple-value-call #'(lambda (<i class="i">varN-1</i> <i class="i">varN-2</i> ...) . <i class="i">bodyN</i>)
+     (block #2=#:normal-return
+       (return-from #1#
+         (handler-case (return-from #2# form)
+           (<i class="i">type1</i> (<i class="i">var1</i>) . <i class="i">body1</i>) ...)))))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="ignore_002derrors.html">ignore-errors                                                       [Macro]</a>, Previous: <a href="handler_002dbind.html">handler-bind                                                        [Macro]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/hash_002dtable.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>hash-table (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="hash-table (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="hash-table (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Tables-Dictionary.html" rel="up" title="Hash Tables Dictionary">
+<link href="make_002dhash_002dtable.html" rel="next" title="make-hash-table">
+<link href="Hash-Tables-Dictionary.html" rel="prev" title="Hash Tables Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="hash_002dtable">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dhash_002dtable.html" accesskey="n" rel="next">make-hash-table                                                  [Function]</a>, Previous: <a href="Hash-Tables-Dictionary.html" accesskey="p" rel="prev">Hash Tables Dictionary</a>, Up: <a href="Hash-Tables-Dictionary.html" accesskey="u" rel="up">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="hash_002dtable-_005bSystem-Class_005d"><span>18.2.1 hash-table                                                   [System Class]<a class="copiable-link" href="#hash_002dtable-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-58"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-58"> &para;</a></span></h4>
+<p><b class="b">hash-table</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-491"><span>Description::<a class="copiable-link" href="#Description_003a_003a-491"> &para;</a></span></h4>
+
+<p><i class="i">Hash tables</i> provide a way of mapping any <i class="i">object</i> (a <i class="i">key</i>)
+to an associated <i class="i">object</i> (a <i class="i">value</i>).
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-401"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-401"> &para;</a></span></h4>
+
+<p><a class="ref" href="Hash-Table-Concepts.html">Hash Table Concepts</a>,
+<a class="ref" href="Printing-Other-Objects.html">Printing Other Objects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-269"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-269"> &para;</a></span></h4>
+
+<p>The intent is that this mapping be implemented by a hashing mechanism,
+such as that described in Section 6.4 &ldquo;Hashing&rdquo; of <b class="b">The Art of Computer Programming, Volume 3</b>
+(pp506-549).  In spite of this intent, no <i class="i">conforming implementation</i> 
+is required to use any particular technique to implement the mapping.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/hash_002dtable_002dcount.html
@@ -0,0 +1,96 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>hash-table-count (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="hash-table-count (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="hash-table-count (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Tables-Dictionary.html" rel="up" title="Hash Tables Dictionary">
+<link href="hash_002dtable_002drehash_002dsize.html" rel="next" title="hash-table-rehash-size">
+<link href="hash_002dtable_002dp.html" rel="prev" title="hash-table-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="hash_002dtable_002dcount">
+<div class="nav-panel">
+<p>
+Next: <a href="hash_002dtable_002drehash_002dsize.html" accesskey="n" rel="next">hash-table-rehash-size                                           [Function]</a>, Previous: <a href="hash_002dtable_002dp.html" accesskey="p" rel="prev">hash-table-p                                                     [Function]</a>, Up: <a href="Hash-Tables-Dictionary.html" accesskey="u" rel="up">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="hash_002dtable_002dcount-_005bFunction_005d"><span>18.2.4 hash-table-count                                                 [Function]<a class="copiable-link" href="#hash_002dtable_002dcount-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">hash-table-count</code>  <i class="i">hash-table</i> &rArr;  <i class="i">count</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-378"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-378"> &para;</a></span></h4>
+
+<p><i class="i">hash-table</i>&mdash;a <i class="i">hash table</i>.
+</p>
+<p><i class="i">count</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-494"><span>Description::<a class="copiable-link" href="#Description_003a_003a-494"> &para;</a></span></h4>
+
+<p>Returns the number of entries in the <i class="i">hash-table</i>.
+If <i class="i">hash-table</i> has just been created 
+or newly cleared (see <b class="b">clrhash</b>)
+the entry count is <code class="t">0</code>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-360"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-360"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq table (make-hash-table)) &rArr;  #&lt;HASH-TABLE EQL 0/120 32115135&gt;
+ (hash-table-count table) &rArr;  0
+ (setf (gethash 57 table) &quot;fifty-seven&quot;) &rArr;  &quot;fifty-seven&quot;
+ (hash-table-count table) &rArr;  1
+ (dotimes (i 100) (setf (gethash i table) i)) &rArr;  NIL
+ (hash-table-count table) &rArr;  100
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-70"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-70"> &para;</a></span></h4>
+
+<p><b class="b">clrhash</b>,
+<b class="b">remhash</b>,
+<b class="b">setf</b> of <b class="b">gethash</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-403"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-403"> &para;</a></span></h4>
+
+<p><a class="ref" href="hash_002dtable_002dsize.html">hash-table-size                                                  [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-271"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-271"> &para;</a></span></h4>
+
+<p>The following relationships are functionally correct, although in practice
+using <b class="b">hash-table-count</b> is probably much faster:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (hash-table-count <i class="i">table</i>) &equiv;
+ (loop for value being the hash-values of <i class="i">table</i> count t) &equiv;
+ (let ((total 0))
+   (maphash #'(lambda (key value)
+                (declare (ignore key value))
+                (incf total))
+            <i class="i">table</i>)
+   total)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/hash_002dtable_002dp.html
@@ -0,0 +1,72 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>hash-table-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="hash-table-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="hash-table-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Tables-Dictionary.html" rel="up" title="Hash Tables Dictionary">
+<link href="hash_002dtable_002dcount.html" rel="next" title="hash-table-count">
+<link href="make_002dhash_002dtable.html" rel="prev" title="make-hash-table">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="hash_002dtable_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="hash_002dtable_002dcount.html" accesskey="n" rel="next">hash-table-count                                                 [Function]</a>, Previous: <a href="make_002dhash_002dtable.html" accesskey="p" rel="prev">make-hash-table                                                  [Function]</a>, Up: <a href="Hash-Tables-Dictionary.html" accesskey="u" rel="up">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="hash_002dtable_002dp-_005bFunction_005d"><span>18.2.3 hash-table-p                                                     [Function]<a class="copiable-link" href="#hash_002dtable_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">hash-table-p</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-377"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-377"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-493"><span>Description::<a class="copiable-link" href="#Description_003a_003a-493"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">hash-table</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-359"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-359"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq table (make-hash-table)) &rArr;  #&lt;HASH-TABLE EQL 0/120 32511220&gt;
+ (hash-table-p table) &rArr;  <i class="i">true</i>
+ (hash-table-p 37) &rArr;  <i class="i">false</i>
+ (hash-table-p '((a . 1) (b . 2))) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-270"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-270"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (hash-table-p <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'hash-table)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/hash_002dtable_002drehash_002dsize.html
@@ -0,0 +1,92 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>hash-table-rehash-size (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="hash-table-rehash-size (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="hash-table-rehash-size (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Tables-Dictionary.html" rel="up" title="Hash Tables Dictionary">
+<link href="hash_002dtable_002drehash_002dthreshold.html" rel="next" title="hash-table-rehash-threshold">
+<link href="hash_002dtable_002dcount.html" rel="prev" title="hash-table-count">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="hash_002dtable_002drehash_002dsize">
+<div class="nav-panel">
+<p>
+Next: <a href="hash_002dtable_002drehash_002dthreshold.html" accesskey="n" rel="next">hash-table-rehash-threshold                                      [Function]</a>, Previous: <a href="hash_002dtable_002dcount.html" accesskey="p" rel="prev">hash-table-count                                                 [Function]</a>, Up: <a href="Hash-Tables-Dictionary.html" accesskey="u" rel="up">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="hash_002dtable_002drehash_002dsize-_005bFunction_005d"><span>18.2.5 hash-table-rehash-size                                           [Function]<a class="copiable-link" href="#hash_002dtable_002drehash_002dsize-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">hash-table-rehash-size</code>  <i class="i">hash-table</i> &rArr;  <i class="i">rehash-size</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-379"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-379"> &para;</a></span></h4>
+
+<p><i class="i">hash-table</i>&mdash;a <i class="i">hash table</i>.
+</p>
+<p><i class="i">rehash-size</i>&mdash;a <i class="i">real</i> of <i class="i">type</i> <code class="t">(or (integer 1 *) (float (1.0) *))</code>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-495"><span>Description::<a class="copiable-link" href="#Description_003a_003a-495"> &para;</a></span></h4>
+
+<p>Returns the current rehash size of <i class="i">hash-table</i>,
+suitable for use in a call to <b class="b">make-hash-table</b> 
+in order to produce a <i class="i">hash table</i> 
+with state corresponding to the current state of the <i class="i">hash-table</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-361"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-361"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq table (make-hash-table :size 100 :rehash-size 1.4))
+&rArr;  #&lt;HASH-TABLE EQL 0/100 2556371&gt;
+ (hash-table-rehash-size table) &rArr;  1.4
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-169"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-169"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">hash-table</i> is not a <i class="i">hash table</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-404"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-404"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dhash_002dtable.html">make-hash-table                                                  [Function]</a>
+,
+<a class="ref" href="hash_002dtable_002drehash_002dthreshold.html">hash-table-rehash-threshold                                      [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-272"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-272"> &para;</a></span></h4>
+
+<p>If the hash table was created with an <i class="i">integer</i> rehash size,
+the result is an <i class="i">integer</i>,
+indicating that the rate of growth of the <i class="i">hash-table</i> when rehashed
+is intended to be additive;
+otherwise,
+the result is a <i class="i">float</i>, 
+indicating that the rate of growth of the <i class="i">hash-table</i> when rehashed
+is intended to be multiplicative.
+However, this value is only advice to the <i class="i">implementation</i>;
+the actual amount by which the <i class="i">hash-table</i> will grow upon rehash is
+<i class="i">implementation-dependent</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/hash_002dtable_002drehash_002dthreshold.html
@@ -0,0 +1,78 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>hash-table-rehash-threshold (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="hash-table-rehash-threshold (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="hash-table-rehash-threshold (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Tables-Dictionary.html" rel="up" title="Hash Tables Dictionary">
+<link href="hash_002dtable_002dsize.html" rel="next" title="hash-table-size">
+<link href="hash_002dtable_002drehash_002dsize.html" rel="prev" title="hash-table-rehash-size">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="hash_002dtable_002drehash_002dthreshold">
+<div class="nav-panel">
+<p>
+Next: <a href="hash_002dtable_002dsize.html" accesskey="n" rel="next">hash-table-size                                                  [Function]</a>, Previous: <a href="hash_002dtable_002drehash_002dsize.html" accesskey="p" rel="prev">hash-table-rehash-size                                           [Function]</a>, Up: <a href="Hash-Tables-Dictionary.html" accesskey="u" rel="up">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="hash_002dtable_002drehash_002dthreshold-_005bFunction_005d"><span>18.2.6 hash-table-rehash-threshold                                      [Function]<a class="copiable-link" href="#hash_002dtable_002drehash_002dthreshold-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">hash-table-rehash-threshold</code>  <i class="i">hash-table</i> &rArr;  <i class="i">rehash-threshold</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-380"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-380"> &para;</a></span></h4>
+
+<p><i class="i">hash-table</i>&mdash;a <i class="i">hash table</i>.
+</p>
+<p><i class="i">rehash-threshold</i>&mdash;a <i class="i">real</i> of <i class="i">type</i> <code class="t">(real 0 1)</code>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-496"><span>Description::<a class="copiable-link" href="#Description_003a_003a-496"> &para;</a></span></h4>
+
+<p>Returns the current rehash threshold of <i class="i">hash-table</i>, which is
+suitable for use in a call to <b class="b">make-hash-table</b> in order to
+produce a <i class="i">hash table</i> with state corresponding to the current 
+state of the <i class="i">hash-table</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-362"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-362"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq table (make-hash-table :size 100 :rehash-threshold 0.5))
+&rArr;  #&lt;HASH-TABLE EQL 0/100 2562446&gt;
+ (hash-table-rehash-threshold table) &rArr;  0.5
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-170"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-170"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">hash-table</i> is not a <i class="i">hash table</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-405"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-405"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dhash_002dtable.html">make-hash-table                                                  [Function]</a>
+,
+<a class="ref" href="hash_002dtable_002drehash_002dsize.html">hash-table-rehash-size                                           [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/hash_002dtable_002dsize.html
@@ -0,0 +1,68 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>hash-table-size (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="hash-table-size (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="hash-table-size (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Tables-Dictionary.html" rel="up" title="Hash Tables Dictionary">
+<link href="hash_002dtable_002dtest.html" rel="next" title="hash-table-test">
+<link href="hash_002dtable_002drehash_002dthreshold.html" rel="prev" title="hash-table-rehash-threshold">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="hash_002dtable_002dsize">
+<div class="nav-panel">
+<p>
+Next: <a href="hash_002dtable_002dtest.html" accesskey="n" rel="next">hash-table-test                                                  [Function]</a>, Previous: <a href="hash_002dtable_002drehash_002dthreshold.html" accesskey="p" rel="prev">hash-table-rehash-threshold                                      [Function]</a>, Up: <a href="Hash-Tables-Dictionary.html" accesskey="u" rel="up">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="hash_002dtable_002dsize-_005bFunction_005d"><span>18.2.7 hash-table-size                                                  [Function]<a class="copiable-link" href="#hash_002dtable_002dsize-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">hash-table-size</code>  <i class="i">hash-table</i> &rArr;  <i class="i">size</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-381"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-381"> &para;</a></span></h4>
+
+<p><i class="i">hash-table</i>&mdash;a <i class="i">hash table</i>.
+</p>
+<p><i class="i">size</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-497"><span>Description::<a class="copiable-link" href="#Description_003a_003a-497"> &para;</a></span></h4>
+
+<p>Returns the current size of <i class="i">hash-table</i>, which is suitable for use in
+a call to <b class="b">make-hash-table</b> in order to produce a <i class="i">hash table</i> 
+with state corresponding to the current state of the <i class="i">hash-table</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-171"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-171"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">hash-table</i> is not a <i class="i">hash table</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-406"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-406"> &para;</a></span></h4>
+
+<p><a class="ref" href="hash_002dtable_002dcount.html">hash-table-count                                                 [Function]</a>
+,
+<a class="ref" href="make_002dhash_002dtable.html">make-hash-table                                                  [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/hash_002dtable_002dtest.html
@@ -0,0 +1,69 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>hash-table-test (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="hash-table-test (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="hash-table-test (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Tables-Dictionary.html" rel="up" title="Hash Tables Dictionary">
+<link href="gethash.html" rel="next" title="gethash">
+<link href="hash_002dtable_002dsize.html" rel="prev" title="hash-table-size">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="hash_002dtable_002dtest">
+<div class="nav-panel">
+<p>
+Next: <a href="gethash.html" accesskey="n" rel="next">gethash                                                          [Accessor]</a>, Previous: <a href="hash_002dtable_002dsize.html" accesskey="p" rel="prev">hash-table-size                                                  [Function]</a>, Up: <a href="Hash-Tables-Dictionary.html" accesskey="u" rel="up">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="hash_002dtable_002dtest-_005bFunction_005d"><span>18.2.8 hash-table-test                                                  [Function]<a class="copiable-link" href="#hash_002dtable_002dtest-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">hash-table-test</code>  <i class="i">hash-table</i> &rArr;  <i class="i">test</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-382"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-382"> &para;</a></span></h4>
+
+<p><i class="i">hash-table</i>&mdash;a <i class="i">hash table</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">function designator</i>.
+ For the four <i class="i">standardized</i> <i class="i">hash table</i> test <i class="i">functions</i>
+ (see <b class="b">make-hash-table</b>), the <i class="i">test</i> value returned
+ is always a <i class="i">symbol</i>.  If an <i class="i">implementation</i> permits additional 
+ tests, it is <i class="i">implementation-dependent</i> whether such tests are
+ returned as <i class="i">function</i> <i class="i">objects</i> or <i class="i">function names</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-498"><span>Description::<a class="copiable-link" href="#Description_003a_003a-498"> &para;</a></span></h4>
+
+<p>Returns the test used for comparing <i class="i">keys</i> in <i class="i">hash-table</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-172"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-172"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">hash-table</i> is not a <i class="i">hash table</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-407"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-407"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dhash_002dtable.html">make-hash-table                                                  [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/identity.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>identity (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="identity (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="identity (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="complement.html" rel="next" title="complement">
+<link href="equalp.html" rel="prev" title="equalp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="identity">
+<div class="nav-panel">
+<p>
+Next: <a href="complement.html" accesskey="n" rel="next">complement                                                       [Function]</a>, Previous: <a href="equalp.html" accesskey="p" rel="prev">equalp                                                           [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="identity-_005bFunction_005d"><span>5.3.37 identity                                                         [Function]<a class="copiable-link" href="#identity-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">identity</code>  <i class="i">object</i> &rArr;  <i class="i">object</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-56"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-56"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-90"><span>Description::<a class="copiable-link" href="#Description_003a_003a-90"> &para;</a></span></h4>
+
+<p>Returns its argument <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-64"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-64"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (identity 101) &rArr;  101
+ (mapcan #'identity (list (list 1 2 3) '(4 5 6))) &rArr;  (1 2 3 4 5 6)
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-46"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-46"> &para;</a></span></h4>
+
+<p><b class="b">identity</b> is intended for use with functions that require
+a <i class="i">function</i> as an argument.
+</p>
+<p><code class="t">(eql x (identity x))</code> returns <i class="i">true</i> for all possible values of <i class="i">x</i>,
+but <code class="t">(eq x (identity x))</code> might return <i class="i">false</i> when <i class="i">x</i> is a <i class="i">number</i>
+or <i class="i">character</i>.
+</p>
+<p><b class="b">identity</b> could be defined by
+</p>
+<div class="example">
+<pre class="example-preformatted">(defun identity (x) x)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/if.html
@@ -0,0 +1,101 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>if (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="if (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="if (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="or.html" rel="next" title="or">
+<link href="cond.html" rel="prev" title="cond">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="if">
+<div class="nav-panel">
+<p>
+Next: <a href="or.html" accesskey="n" rel="next">or                                                                  [Macro]</a>, Previous: <a href="cond.html" accesskey="p" rel="prev">cond                                                                [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="if-_005bSpecial-Operator_005d"><span>5.3.43 if                                                       [Special Operator]<a class="copiable-link" href="#if-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">if</code>  <i class="i"><i class="i">test-form</i> <i class="i">then-form</i> <span class="r">[</span><i class="i">else-form</i><span class="r">]</span></i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-62"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-62"> &para;</a></span></h4>
+
+<p><i class="i">Test-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">Then-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">Else-form</i>&mdash;a <i class="i">form</i>.
+  The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">results</i>&mdash;if the <i class="i">test-form</i> <i class="i">yielded</i> <i class="i">true</i>,
+  the <i class="i">values</i> returned by the <i class="i">then-form</i>; otherwise,
+  the <i class="i">values</i> returned by the <i class="i">else-form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-96"><span>Description::<a class="copiable-link" href="#Description_003a_003a-96"> &para;</a></span></h4>
+
+<p><b class="b">if</b> allows the execution of a <i class="i">form</i> to be dependent
+on a single <i class="i">test-form</i>.
+</p>
+<p>First <i class="i">test-form</i> is evaluated.
+If the result is <i class="i">true</i>, then <i class="i">then-form</i> is selected;
+otherwise <i class="i">else-form</i> is selected.
+Whichever form is selected is then evaluated.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-70"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-70"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (if t 1) &rArr;  1
+ (if nil 1 2) &rArr;  2 
+ (defun test ()
+   (dolist (truth-value '(t nil 1 (a b c)))
+     (if truth-value (print 'true) (print 'false))
+     (prin1 truth-value))) &rArr;  TEST
+ (test)
+<code class="t"> |&gt; </code> TRUE T
+<code class="t"> |&gt; </code> FALSE NIL
+<code class="t"> |&gt; </code> TRUE 1
+<code class="t"> |&gt; </code> TRUE (A B C)
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-80"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-80"> &para;</a></span></h4>
+
+<p><a class="ref" href="cond.html">cond                                                                [Macro]</a>
+,
+<b class="b">unless</b>,
+<a class="ref" href="when.html">when, unless                                                        [Macro]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-51"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-51"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (if <i class="i">test-form</i> <i class="i">then-form</i> <i class="i">else-form</i>)
+ &equiv; (cond (<i class="i">test-form</i> <i class="i">then-form</i>) (t <i class="i">else-form</i>))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/ignore.html
@@ -0,0 +1,125 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>ignore (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="ignore (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="ignore (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="dynamic_002dextent.html" rel="next" title="dynamic-extent">
+<link href="declare.html" rel="prev" title="declare">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="ignore">
+<div class="nav-panel">
+<p>
+Next: <a href="dynamic_002dextent.html" accesskey="n" rel="next">dynamic-extent                                                [Declaration]</a>, Previous: <a href="declare.html" accesskey="p" rel="prev">declare                                                            [Symbol]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="ignore_002c-ignorable-_005bDeclaration_005d"><span>3.8.19 ignore, ignorable                                             [Declaration]<a class="copiable-link" href="#ignore_002c-ignorable-_005bDeclaration_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-2"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-2"> &para;</a></span></h4>
+
+<p><code class="t"><span class="r">(</span>ignore {<i class="i">var</i> | <span class="r">(</span><b class="b">function</b> <i class="i">fn</i><span class="r">)</span>}*<span class="r">)</span></code>
+</p>
+<p><code class="t"><span class="r">(</span>ignorable {<i class="i">var</i> | <span class="r">(</span><b class="b">function</b> <i class="i">fn</i><span class="r">)</span>}*<span class="r">)</span></code>
+</p>
+<h4 class="subsubheading" id="Arguments_003a_003a-2"><span>Arguments::<a class="copiable-link" href="#Arguments_003a_003a-2"> &para;</a></span></h4>
+
+<p><i class="i">var</i>&mdash;a <i class="i">variable</i> <i class="i">name</i>.
+</p>
+<p><i class="i">fn</i>&mdash;a <i class="i">function</i> <i class="i">name</i>.
+</p>
+<h4 class="subsubheading" id="Valid-Context_003a_003a"><span>Valid Context::<a class="copiable-link" href="#Valid-Context_003a_003a"> &para;</a></span></h4>
+
+<p><i class="i">declaration</i>
+</p>
+<h4 class="subsubheading" id="Binding-Types-Affected_003a_003a"><span>Binding Types Affected::<a class="copiable-link" href="#Binding-Types-Affected_003a_003a"> &para;</a></span></h4>
+
+<p><i class="i">variable</i>, <i class="i">function</i>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-18"><span>Description::<a class="copiable-link" href="#Description_003a_003a-18"> &para;</a></span></h4>
+
+<p>The <b class="b">ignore</b> and <b class="b">ignorable</b> declarations
+refer to <i class="i">for-value</i> <i class="i">references</i> 
+    to <i class="i">variable</i> <i class="i">bindings</i> for the <i class="i">vars</i>
+and to <i class="i">function</i> <i class="i">bindings</i> for the <i class="i">fns</i>.
+</p>
+<p>An <b class="b">ignore</b> <i class="i">declaration</i> specifies that
+<i class="i">for-value</i> <i class="i">references</i> to the indicated <i class="i">bindings</i>
+will not
+occur within the scope of the <i class="i">declaration</i>.
+Within the <i class="i">scope</i> of such a <i class="i">declaration</i>,
+it is desirable
+for a compiler to issue a warning about 
+the presence of
+either a <i class="i">for-value</i> <i class="i">reference</i> to any <i class="i">var</i> or <i class="i">fn</i>,
+    or a <b class="b">special</b> <i class="i">declaration</i> for any <i class="i">var</i>.
+</p>
+<p>An <b class="b">ignorable</b> <i class="i">declaration</i> specifies that 
+<i class="i">for-value</i> <i class="i">references</i> to the indicated <i class="i">bindings</i>
+might or might not
+occur within the scope of the <i class="i">declaration</i>.
+Within the <i class="i">scope</i> of such a <i class="i">declaration</i>,
+it is not desirable
+for a compiler to issue a warning about
+the presence or absence of
+either a <i class="i">for-value</i> <i class="i">reference</i> to any <i class="i">var</i> or <i class="i">fn</i>,
+    or a <b class="b">special</b> <i class="i">declaration</i> for any <i class="i">var</i>.
+</p>
+<p>When not within the <i class="i">scope</i> 
+of a <b class="b">ignore</b> or <b class="b">ignorable</b> <i class="i">declaration</i>,
+it is desirable
+for a compiler to issue a warning about
+any <i class="i">var</i> for which there is 
+neither a <i class="i">for-value</i> <i class="i">reference</i> 
+    nor a <b class="b">special</b> <i class="i">declaration</i>,
+or about
+any <i class="i">fn</i> for which there is 
+     no <i class="i">for-value</i> <i class="i">reference</i>.
+</p>
+<p>Any warning about a &ldquo;used&rdquo; or &ldquo;unused&rdquo; <i class="i">binding</i> must be of <i class="i">type</i> <b class="b">style-warning</b>,
+and may not affect program semantics.
+</p>
+<p>The <i class="i">stream variables</i> established by 
+     <b class="b">with-open-file</b>,
+     <b class="b">with-open-stream</b>,
+     <b class="b">with-input-from-string</b>,
+ and <b class="b">with-output-to-string</b>,
+and all <i class="i">iteration variables</i> are, by definition, always &ldquo;used&rdquo;.
+Using <code class="t">(declare (ignore <i class="i">v</i>))</code>, 
+for such a <i class="i">variable</i> <i class="i">v</i> has unspecified consequences.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-18"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-18"> &para;</a></span></h4>
+
+<p><b class="b">declare</b>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="dynamic_002dextent.html">dynamic-extent                                                [Declaration]</a>, Previous: <a href="declare.html">declare                                                            [Symbol]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/ignore_002derrors.html
@@ -0,0 +1,115 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>ignore-errors (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="ignore-errors (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="ignore-errors (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="define_002dcondition.html" rel="next" title="define-condition">
+<link href="handler_002dcase.html" rel="prev" title="handler-case">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="ignore_002derrors">
+<div class="nav-panel">
+<p>
+Next: <a href="define_002dcondition.html" accesskey="n" rel="next">define-condition                                                    [Macro]</a>, Previous: <a href="handler_002dcase.html" accesskey="p" rel="prev">handler-case                                                        [Macro]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="ignore_002derrors-_005bMacro_005d"><span>9.2.28 ignore-errors                                                       [Macro]<a class="copiable-link" href="#ignore_002derrors-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">ignore-errors</code>  <i class="i">{<i class="i">form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-145"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-145"> &para;</a></span></h4>
+
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;In the normal situation,
+		  the <i class="i">values</i> of the <i class="i">forms</i> are returned;
+		  in the exceptional situation,
+		  two values are returned: <b class="b">nil</b> and the <i class="i">condition</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-198"><span>Description::<a class="copiable-link" href="#Description_003a_003a-198"> &para;</a></span></h4>
+
+<p><b class="b">ignore-errors</b> is used to prevent <i class="i">conditions</i> of <i class="i">type</i> <b class="b">error</b>
+from causing entry into the debugger.
+</p>
+<p>Specifically, <b class="b">ignore-errors</b> <i class="i">executes</i> <i class="i">forms</i>
+in a <i class="i">dynamic environment</i> where a <i class="i">handler</i> for 
+<i class="i">conditions</i> of <i class="i">type</i> <b class="b">error</b> has been established;
+if invoked, it <i class="i">handles</i> such <i class="i">conditions</i> by
+returning two <i class="i">values</i>, <b class="b">nil</b> and the <i class="i">condition</i> that was <i class="i">signaled</i>,
+from the <b class="b">ignore-errors</b> <i class="i">form</i>.
+</p>
+<p>If a <i class="i">normal return</i> from the <i class="i">forms</i> occurs, 
+any <i class="i">values</i> returned are returned by <b class="b">ignore-errors</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-127"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-127"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun load-init-file (program)
+   (let ((win nil))
+     (ignore-errors ;if this fails, don't enter debugger
+       (load (merge-pathnames (make-pathname :name program :type :lisp)
+                              (user-homedir-pathname)))
+       (setq win t))
+     (unless win (format t &quot;~&amp;Init file failed to load.~
+     win))
+
+ (load-init-file &quot;no-such-program&quot;)
+<code class="t"> |&gt; </code> Init file failed to load.
+NIL
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-173"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-173"> &para;</a></span></h4>
+
+<p><a class="ref" href="handler_002dcase.html">handler-case                                                        [Macro]</a>
+, <a class="ref" href="Condition-System-Concepts.html">Condition System Concepts</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-106"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-106"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (ignore-errors . <i class="i">forms</i>)
+</pre></div>
+
+<p>is equivalent to:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (handler-case (progn . <i class="i">forms</i>)
+   (error (condition) (values nil condition)))
+</pre></div>
+
+<p>Because the second return value is a <i class="i">condition</i>
+in the exceptional case, it is common (but not required) to arrange
+for the second return value in the normal case to be missing or <b class="b">nil</b> so
+that the two situations can be distinguished.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="define_002dcondition.html">define-condition                                                    [Macro]</a>, Previous: <a href="handler_002dcase.html">handler-case                                                        [Macro]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/import.html
@@ -0,0 +1,131 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>import (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="import (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="import (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="list_002dall_002dpackages.html" rel="next" title="list-all-packages">
+<link href="find_002dall_002dsymbols.html" rel="prev" title="find-all-symbols">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="import">
+<div class="nav-panel">
+<p>
+Next: <a href="list_002dall_002dpackages.html" accesskey="n" rel="next">list-all-packages                                                [Function]</a>, Previous: <a href="find_002dall_002dsymbols.html" accesskey="p" rel="prev">find-all-symbols                                                 [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="import-_005bFunction_005d"><span>11.2.6 import                                                           [Function]<a class="copiable-link" href="#import-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">import</code>  <i class="i">symbols <span class="r">&amp;optional</span> package</i> &rArr;  <i class="i"><b class="b">t</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-178"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-178"> &para;</a></span></h4>
+
+<p><i class="i">symbols</i>&mdash;a <i class="i">designator</i> for a <i class="i">list</i> of <i class="i">symbols</i>.
+</p>
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<p>The default is the <i class="i">current package</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-242"><span>Description::<a class="copiable-link" href="#Description_003a_003a-242"> &para;</a></span></h4>
+
+<p><b class="b">import</b> adds <i class="i">symbol</i> or
+<i class="i">symbols</i> to the internals of <i class="i">package</i>, checking for name
+conflicts with existing <i class="i">symbols</i> either <i class="i">present</i> in <i class="i">package</i>
+or <i class="i">accessible</i> to it.  Once the <i class="i">symbols</i> have been
+<i class="i">imported</i>, they may be referenced in the <i class="i">importing</i>
+<i class="i">package</i> without the use of a <i class="i">package prefix</i> when using the <i class="i">Lisp reader</i>.
+</p>
+<p>A name conflict in <b class="b">import</b> between the
+<i class="i">symbol</i> being imported and a symbol inherited from some other <i class="i">package</i> can 
+be resolved in favor of the
+<i class="i">symbol</i> being <i class="i">imported</i> 
+by making it a shadowing symbol, or in favor
+of the <i class="i">symbol</i> already <i class="i">accessible</i> by 
+not doing the <b class="b">import</b>.  A
+name conflict in <b class="b">import</b> with a <i class="i">symbol</i> 
+already <i class="i">present</i> in the
+<i class="i">package</i> 
+may be resolved by uninterning that <i class="i">symbol</i>, or by not
+doing the <b class="b">import</b>.
+</p>
+<p>The imported <i class="i">symbol</i> is
+not automatically exported from the <i class="i">current package</i>, but if it is
+already <i class="i">present</i> and external, then the fact that it
+is external is not changed.  
+</p>
+<p>If any <i class="i">symbol</i> to be <i class="i">imported</i> has no home
+package (<i class="i">i.e.</i>, <code class="t">(symbol-package <i class="i">symbol</i>) &rArr;  nil</code>), 
+<b class="b">import</b> sets the <i class="i">home package</i>
+of the <i class="i">symbol</i> to <i class="i">package</i>.
+</p>
+<p>If the <i class="i">symbol</i> is already <i class="i">present</i> in the importing <i class="i">package</i>,
+<b class="b">import</b> has no effect.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-161"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-161"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (import 'common-lisp::car (make-package 'temp :use nil)) &rArr;  T
+ (find-symbol &quot;CAR&quot; 'temp) &rArr;  CAR, :INTERNAL
+ (find-symbol &quot;CDR&quot; 'temp) &rArr;  NIL, NIL 
+</pre></div>
+
+<p>The form <code class="t">(import 'editor:buffer)</code> takes the external symbol named 
+<code class="t">buffer</code> in the <code class="t">EDITOR</code> <i class="i">package</i> (this symbol was located when the form
+was read by the <i class="i">Lisp reader</i>) and adds it to the <i class="i">current package</i>
+as an <i class="i">internal symbol</i>. The symbol <code class="t">buffer</code> is then <i class="i">present</i> in
+the <i class="i">current package</i>.
+</p>
+<h4 class="subsubheading" id="Side-Effects_003a_003a-25"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-25"> &para;</a></span></h4>
+
+<p>The package system is modified.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-45"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-45"> &para;</a></span></h4>
+
+<p>Current state of the package system.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-64"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-64"> &para;</a></span></h4>
+
+<p><b class="b">import</b> signals a <i class="i">correctable</i> error of <i class="i">type</i> <b class="b">package-error</b>
+if any of the <i class="i">symbols</i> to be <i class="i">imported</i> has the <i class="i">same</i> <i class="i">name</i>
+(under <b class="b">string=</b>) as some distinct <i class="i">symbol</i> (under <b class="b">eql</b>)
+already <i class="i">accessible</i> in the <i class="i">package</i>, even if the conflict is
+with a <i class="i">shadowing symbol</i> of the <i class="i">package</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-215"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-215"> &para;</a></span></h4>
+
+<p><a class="ref" href="shadow.html">shadow                                                           [Function]</a>
+, 
+<a class="ref" href="export.html">export                                                           [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="list_002dall_002dpackages.html">list-all-packages                                                [Function]</a>, Previous: <a href="find_002dall_002dsymbols.html">find-all-symbols                                                 [Function]</a>, Up: <a href="Packages-Dictionary.html">Packages Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/in_002dpackage.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>in-package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="in-package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="in-package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="unuse_002dpackage.html" rel="next" title="unuse-package">
+<link href="unintern.html" rel="prev" title="unintern">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="in_002dpackage">
+<div class="nav-panel">
+<p>
+Next: <a href="unuse_002dpackage.html" accesskey="n" rel="next">unuse-package                                                    [Function]</a>, Previous: <a href="unintern.html" accesskey="p" rel="prev">unintern                                                         [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="in_002dpackage-_005bMacro_005d"><span>11.2.16 in-package                                                          [Macro]<a class="copiable-link" href="#in_002dpackage-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">in-package</code>  <i class="i">name</i> &rArr;  <i class="i">package</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-188"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-188"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">string designator</i>; not evaluated.
+</p>
+<p><i class="i">package</i>&mdash;the <i class="i">package</i> named by <i class="i">name</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-252"><span>Description::<a class="copiable-link" href="#Description_003a_003a-252"> &para;</a></span></h4>
+
+<p>Causes the the <i class="i">package</i> named by <i class="i">name</i> 
+to become the <i class="i">current package</i>&mdash;that is, the <i class="i">value</i> of <b class="b">*package*</b>.
+If no such <i class="i">package</i> already exists, an error of <i class="i">type</i> <b class="b">package-error</b> is signaled.
+</p>
+<p>Everything <b class="b">in-package</b> does is also performed at compile time
+if the call appears as a <i class="i">top level form</i>.
+</p>
+<h4 class="subsubheading" id="Side-Effects_003a_003a-30"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-30"> &para;</a></span></h4>
+
+<p>The <i class="i">variable</i> <b class="b">*package*</b> is assigned.
+If the <b class="b">in-package</b> <i class="i">form</i> is a <i class="i">top level form</i>, 
+this assignment also occurs at compile time.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-70"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-70"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">package-error</b> is signaled if the specified <i class="i">package</i> does not exist.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-224"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-224"> &para;</a></span></h4>
+
+<p><a class="ref" href="package.html">package                                                      [System Class]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/incf.html
@@ -0,0 +1,100 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>incf (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="incf (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="incf (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="lcm.html" rel="next" title="lcm">
+<link href="gcd.html" rel="prev" title="gcd">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="incf">
+<div class="nav-panel">
+<p>
+Next: <a href="lcm.html" accesskey="n" rel="next">lcm                                                              [Function]</a>, Previous: <a href="gcd.html" accesskey="p" rel="prev">gcd                                                              [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="incf_002c-decf-_005bMacro_005d"><span>12.2.33 incf, decf                                                          [Macro]<a class="copiable-link" href="#incf_002c-decf-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">incf</code>  <i class="i">place <span class="r">[</span>delta-form<span class="r">]</span></i> &rArr;  <i class="i">new-value</i>
+</p>
+<p><code class="code">decf</code>  <i class="i">place <span class="r">[</span>delta-form<span class="r">]</span></i> &rArr;  <i class="i">new-value</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-218"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-218"> &para;</a></span></h4>
+
+<p><i class="i">place</i>&mdash;a <i class="i">place</i>.
+</p>
+<p><i class="i">delta-form</i>&mdash;a <i class="i">form</i>; evaluated to produce a <i class="i">delta</i>.
+ The default is <code class="t">1</code>.
+</p>
+<p><i class="i">delta</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">new-value</i>&mdash;a <i class="i">number</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-298"><span>Description::<a class="copiable-link" href="#Description_003a_003a-298"> &para;</a></span></h4>
+
+<p><b class="b">incf</b> and <b class="b">decf</b> are used for incrementing and
+decrementing the <i class="i">value</i> of <i class="i">place</i>, respectively.
+</p>
+<p>The <i class="i">delta</i> is 
+    added to        (in the case of <b class="b">incf</b>)
+ or subtracted from (in the case of <b class="b">decf</b>)
+the number in <i class="i">place</i> and the result is stored in <i class="i">place</i>.
+</p>
+<p>Any necessary type conversions are performed automatically.
+</p>
+<p>For information about the <i class="i">evaluation</i> of <i class="i">subforms</i> of <i class="i">places</i>,
+see <a class="ref" href="Evaluation-of-Subforms-to-Places.html">Evaluation of Subforms to Places</a>.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-202"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-202"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (setq n 0)
+ (incf n) &rArr;  1      
+ n &rArr;  1
+ (decf n 3) &rArr;  -2   
+ n &rArr;  -2
+ (decf n -5) &rArr;  3      
+ (decf n) &rArr;  2      
+ (incf n 0.5) &rArr;  2.5
+ (decf n) &rArr;  1.5
+ n &rArr;  1.5
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-33"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-33"> &para;</a></span></h4>
+
+<p><i class="i">Place</i> is modified.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-251"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-251"> &para;</a></span></h4>
+
+<p><b class="b">+</b>, 
+<a class="ref" href="_002d.html">-                                                              [Function]</a>
+, <b class="b">1+</b>, <b class="b">1-</b>, 
+<a class="ref" href="setf.html">setf, psetf                                                         [Macro]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/index.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Top (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="Top (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="Top (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="#Top" rel="start" title="Top">
+<link href="../dir_html/index.html" rel="up" title="(dir)">
+<link href="Introduction-_0028Introduction_0029.html" rel="next" title="Introduction (Introduction)">
+<link href="../dir_html/index.html" rel="prev" title="(dir)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+
+
+
+
+<a class="node-id" id="Top"></a><div class="nav-panel">
+<p>
+Next: <a href="Introduction-_0028Introduction_0029.html" accesskey="n" rel="next">Introduction</a>, Previous: <a href="../dir_html/index.html" accesskey="p" rel="prev">(dir)</a>, Up: <a href="../dir_html/index.html" accesskey="u" rel="up">(dir)</a> &nbsp; </p>
+</div>
+<hr>
+<h1 class="node"><span>Top<a class="copiable-link" href="#Top"> &para;</a></span></h1>
+
+
+
+
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="Introduction-_0028Introduction_0029.html" accesskey="n" rel="next">Introduction</a>, Previous: <a href="../dir_html/index.html" accesskey="p" rel="prev">(dir)</a>, Up: <a href="../dir_html/index.html" accesskey="u" rel="up">(dir)</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/initialize_002dinstance.html
@@ -0,0 +1,98 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>initialize-instance (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="initialize-instance (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="initialize-instance (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="class_002dname.html" rel="next" title="class-name">
+<link href="add_002dmethod.html" rel="prev" title="add-method">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="initialize_002dinstance">
+<div class="nav-panel">
+<p>
+Next: <a href="class_002dname.html" accesskey="n" rel="next">class-name                                      [Standard Generic Function]</a>, Previous: <a href="add_002dmethod.html" accesskey="p" rel="prev">add-method                                      [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="initialize_002dinstance-_005bStandard-Generic-Function_005d"><span>7.7.36 initialize-instance                             [Standard Generic Function]<a class="copiable-link" href="#initialize_002dinstance-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-33"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-33"> &para;</a></span></h4>
+
+<p><code class="code">initialize-instance</code>  <i class="i">instance <span class="r">&amp;rest</span> initargs <span class="r">&amp;key</span> <span class="r">&amp;allow-other-keys</span></i> &rArr;  <i class="i">instance</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-19"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-19"> &para;</a></span></h4>
+
+<p><code class="code">initialize-instance</code>  <i class="i"><span class="r">(</span><i class="i">instance</i> <b class="b">standard-object</b><span class="r">)</span> <span class="r">&amp;rest</span> initargs</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-124"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-124"> &para;</a></span></h4>
+
+<p><i class="i">instance</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">initargs</i>&mdash;a <i class="i">defaulted initialization argument list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-163"><span>Description::<a class="copiable-link" href="#Description_003a_003a-163"> &para;</a></span></h4>
+
+<p>Called by <b class="b">make-instance</b> to initialize a newly created <i class="i">instance</i>.
+The generic function is called with the new <i class="i">instance</i> 
+and the <i class="i">defaulted initialization argument list</i>.
+</p>
+<p>The system-supplied primary <i class="i">method</i> on <b class="b">initialize-instance</b>
+initializes the <i class="i">slots</i> of the <i class="i">instance</i> with values according 
+to the <i class="i">initargs</i> and the <code class="t">:initform</code> forms of the <i class="i">slots</i>.
+It does this by calling the generic function <b class="b">shared-initialize</b>
+with the following arguments: the <i class="i">instance</i>, <b class="b">t</b> (this indicates
+that all <i class="i">slots</i> for which no initialization arguments are provided
+should be initialized according to their <code class="t">:initform</code> forms), and
+the <i class="i">initargs</i>.
+</p>
+<p>Programmers can define <i class="i">methods</i> for <b class="b">initialize-instance</b> to
+specify actions to be taken when an instance is initialized.  If only
+<i class="i">after methods</i> are defined, they will be run after the
+system-supplied primary <i class="i">method</i> for initialization and therefore will
+not interfere with the default behavior of <b class="b">initialize-instance</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-145"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-145"> &para;</a></span></h4>
+
+<p><a class="ref" href="Shared_002dInitialize.html">Shared-Initialize</a>
+,
+<a class="ref" href="make_002dinstance.html">make-instance                                   [Standard Generic Function]</a>
+,
+<a class="ref" href="slot_002dboundp.html">slot-boundp                                                      [Function]</a>
+,
+<a class="ref" href="slot_002dmakunbound.html">slot-makunbound                                                  [Function]</a>
+,
+<a class="ref" href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a>,
+<a class="ref" href="Rules-for-Initialization-Arguments.html">Rules for Initialization Arguments</a>,
+<a class="ref" href="Declaring-the-Validity-of-Initialization-Arguments.html">Declaring the Validity of Initialization Arguments</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="class_002dname.html">class-name                                      [Standard Generic Function]</a>, Previous: <a href="add_002dmethod.html">add-method                                      [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/inline.html
@@ -0,0 +1,165 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>inline (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="inline (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="inline (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="ftype.html" rel="next" title="ftype">
+<link href="type.html" rel="prev" title="type">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="inline">
+<div class="nav-panel">
+<p>
+Next: <a href="ftype.html" accesskey="n" rel="next">ftype                                                         [Declaration]</a>, Previous: <a href="type.html" accesskey="p" rel="prev">type                                                          [Declaration]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="inline_002c-notinline-_005bDeclaration_005d"><span>3.8.22 inline, notinline                                             [Declaration]<a class="copiable-link" href="#inline_002c-notinline-_005bDeclaration_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-5"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-5"> &para;</a></span></h4>
+
+<p><code class="t">(inline {<i class="i">function-name</i>}*)</code>
+</p>
+<p><code class="t">(notinline {<i class="i">function-name</i>}*)</code>
+</p>
+<h4 class="subsubheading" id="Arguments_003a_003a-5"><span>Arguments::<a class="copiable-link" href="#Arguments_003a_003a-5"> &para;</a></span></h4>
+
+<p><i class="i">function-name</i>&mdash;a <i class="i">function name</i>.
+</p>
+<h4 class="subsubheading" id="Valid-Context_003a_003a-3"><span>Valid Context::<a class="copiable-link" href="#Valid-Context_003a_003a-3"> &para;</a></span></h4>
+
+<p><i class="i">declaration</i> or <i class="i">proclamation</i>
+</p>
+<h4 class="subsubheading" id="Binding-Types-Affected_003a_003a-3"><span>Binding Types Affected::<a class="copiable-link" href="#Binding-Types-Affected_003a_003a-3"> &para;</a></span></h4>
+
+<p><i class="i">function</i>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-21"><span>Description::<a class="copiable-link" href="#Description_003a_003a-21"> &para;</a></span></h4>
+
+<p><b class="b">inline</b> specifies that
+it is desirable for the compiler to produce inline calls
+to the <i class="i">functions</i> named by <i class="i">function-names</i>; 
+that is, the code for a specified <i class="i">function-name</i>
+</p>
+<p>should be integrated into the calling routine, appearing &ldquo;in line&rdquo;
+in place of a procedure call.  
+A compiler is free to ignore this declaration.
+<b class="b">inline</b> declarations never apply to variable <i class="i">bindings</i>. 
+</p>
+<p>If one of the <i class="i">functions</i> mentioned has a lexically apparent local definition
+(as made by <b class="b">flet</b> or <b class="b">labels</b>), then the declaration
+applies to that local definition and not to the global function definition.
+</p>
+<p>While no <i class="i">conforming implementation</i> is required to perform inline expansion
+of user-defined functions, those <i class="i">implementations</i> that do attempt
+to recognize the following paradigm:
+</p>
+<p>To define a <i class="i">function</i> <code class="t">f</code> that is not <b class="b">inline</b> by default
+but for which <code class="t">(declare (inline f))</code> will make <i class="i">f</i> be locally inlined,
+the proper definition sequence is:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (declaim (inline f))
+ (defun f ...)
+ (declaim (notinline f))
+</pre></div>
+
+<p>The <b class="b">inline</b> proclamation preceding the <b class="b">defun</b> <i class="i">form</i>
+ensures that the <i class="i">compiler</i> has the opportunity save the information
+necessary for inline expansion, and the <b class="b">notinline</b> proclamation 
+following the <b class="b">defun</b> <i class="i">form</i> prevents <code class="t">f</code> from being expanded
+inline everywhere.  
+</p>
+<p><b class="b">notinline</b> specifies that it is
+</p>
+<p>undesirable to compile the <i class="i">functions</i>
+named by <i class="i">function-names</i> in-line.
+A compiler is not free to ignore this declaration;
+calls to the specified functions must be implemented as out-of-line subroutine calls.
+</p>
+<p>If one of the <i class="i">functions</i>
+mentioned has a lexically apparent local definition
+(as made by <b class="b">flet</b> or <b class="b">labels</b>), then the declaration
+applies to that local definition and not to the global function definition.
+</p>
+<p>In the presence of a <i class="i">compiler macro</i> definition for 
+<i class="i">function-name</i>, a <b class="b">notinline</b> declaration prevents that
+</p>
+<p><i class="i">compiler macro</i> from being used.
+</p>
+<p>An <b class="b">inline</b> declaration may be used to encourage use of 
+<i class="i">compiler macro</i> definitions.  <b class="b">inline</b> and <b class="b">notinline</b>
+declarations otherwise have no effect when the lexically visible definition
+of <i class="i">function-name</i> is a <i class="i">macro</i> definition.
+</p>
+<p><b class="b">inline</b> and <b class="b">notinline</b> declarations can be <i class="i">free declarations</i> or
+<i class="i">bound declarations</i>.                  
+<b class="b">inline</b> and <b class="b">notinline</b> declarations of functions that
+appear before the body of a 
+      <b class="b">flet</b>
+ or  <b class="b">labels</b>
+</p>
+<p><i class="i">form</i> that defines that function are <i class="i">bound declarations</i>.  
+Such declarations in other contexts are <i class="i">free declarations</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-18"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-18"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> ;; The globally defined function DISPATCH should be open-coded,
+ ;; if the implementation supports inlining, unless a NOTINLINE 
+ ;; declaration overrides this effect.
+ (declaim (inline dispatch))
+ (defun dispatch (x) (funcall (get (car x) 'dispatch) x))
+ ;; Here is an example where inlining would be encouraged.
+ (defun top-level-1 () (dispatch (read-command)))
+ ;; Here is an example where inlining would be prohibited.
+ (defun top-level-2 ()
+   (declare (notinline dispatch))
+   (dispatch (read-command)))
+ ;; Here is an example where inlining would be prohibited.
+ (declaim (notinline dispatch))
+ (defun top-level-3 () (dispatch (read-command)))
+ ;; Here is an example where inlining would be encouraged.
+ (defun top-level-4 () 
+   (declare (inline dispatch))
+   (dispatch (read-command)))
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-21"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-21"> &para;</a></span></h4>
+
+<p><b class="b">declare</b>,
+<a class="ref" href="declaim.html">declaim                                                             [Macro]</a>
+,
+<a class="ref" href="proclaim.html">proclaim                                                         [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="ftype.html">ftype                                                         [Declaration]</a>, Previous: <a href="type.html">type                                                          [Declaration]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/input_002dstream_002dp.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>input-stream-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="input-stream-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="input-stream-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="interactive_002dstream_002dp.html" rel="next" title="interactive-stream-p">
+<link href="two_002dway_002dstream.html" rel="prev" title="two-way-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="input_002dstream_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="interactive_002dstream_002dp.html" accesskey="n" rel="next">interactive-stream-p                                             [Function]</a>, Previous: <a href="two_002dway_002dstream.html" accesskey="p" rel="prev">two-way-stream                                               [System Class]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="input_002dstream_002dp_002c-output_002dstream_002dp-_005bFunction_005d"><span>21.2.9 input-stream-p, output-stream-p                                  [Function]<a class="copiable-link" href="#input_002dstream_002dp_002c-output_002dstream_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">input-stream-p</code>  <i class="i">stream</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">output-stream-p</code>  <i class="i">stream</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-412"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-412"> &para;</a></span></h4>
+
+<p><i class="i">stream</i>&mdash;a <i class="i">stream</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-540"><span>Description::<a class="copiable-link" href="#Description_003a_003a-540"> &para;</a></span></h4>
+
+<p><b class="b">input-stream-p</b> returns <i class="i">true</i> if <i class="i">stream</i> is an <i class="i">input</i> <i class="i">stream</i>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<p><b class="b">output-stream-p</b> returns <i class="i">true</i> if <i class="i">stream</i> is an <i class="i">output</i> <i class="i">stream</i>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-387"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-387"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (input-stream-p *standard-input*) &rArr;  <i class="i">true</i>
+ (input-stream-p *terminal-io*) &rArr;  <i class="i">true</i>
+ (input-stream-p (make-string-output-stream)) &rArr;  <i class="i">false</i>
+
+ (output-stream-p *standard-output*) &rArr;  <i class="i">true</i>
+ (output-stream-p *terminal-io*) &rArr;  <i class="i">true</i>
+ (output-stream-p (make-string-input-stream &quot;jr&quot;)) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-192"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-192"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">stream</i> is not a <i class="i">stream</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/inspect.html
@@ -0,0 +1,78 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>inspect (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="inspect (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="inspect (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="dribble.html" rel="next" title="dribble">
+<link href="ed.html" rel="prev" title="ed">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="inspect">
+<div class="nav-panel">
+<p>
+Next: <a href="dribble.html" accesskey="n" rel="next">dribble                                                          [Function]</a>, Previous: <a href="ed.html" accesskey="p" rel="prev">ed                                                               [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="inspect-_005bFunction_005d"><span>25.2.18 inspect                                                          [Function]<a class="copiable-link" href="#inspect-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">inspect</code>  <i class="i">object</i> &rArr;  <i class="i"><i class="i">implementation-dependent</i></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-503"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-503"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-666"><span>Description::<a class="copiable-link" href="#Description_003a_003a-666"> &para;</a></span></h4>
+
+<p><b class="b">inspect</b> is an interactive version of <b class="b">describe</b>.
+The nature of the interaction is <i class="i">implementation-dependent</i>,
+but the purpose of <b class="b">inspect</b> is to make it easy to wander
+through a data structure, examining and modifying parts of it.
+</p>
+<h4 class="subsubheading" id="Side-Effects_003a_003a-86"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-86"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-130"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-130"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-242"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-242"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-541"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-541"> &para;</a></span></h4>
+
+<p><a class="ref" href="describe.html">describe                                                         [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-333"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-333"> &para;</a></span></h4>
+
+<p>Implementations are encouraged to respond to the typing
+of <code class="t">?</code> or a &ldquo;help key&rdquo; by providing help, including a list
+of commands.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/integer.html
@@ -0,0 +1,96 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>integer (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="integer (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="integer (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="signed_002dbyte.html" rel="next" title="signed-byte">
+<link href="ratio.html" rel="prev" title="ratio">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="integer">
+<div class="nav-panel">
+<p>
+Next: <a href="signed_002dbyte.html" accesskey="n" rel="next">signed-byte                                                          [Type]</a>, Previous: <a href="ratio.html" accesskey="p" rel="prev">ratio                                                        [System Class]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="integer-_005bSystem-Class_005d"><span>12.2.8 integer                                                      [System Class]<a class="copiable-link" href="#integer-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-41"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-41"> &para;</a></span></h4>
+<p><b class="b">integer</b>,
+<b class="b">rational</b>,
+</p>
+<p><b class="b">real</b>,
+</p>
+<p><b class="b">number</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-274"><span>Description::<a class="copiable-link" href="#Description_003a_003a-274"> &para;</a></span></h4>
+
+<p>An <i class="i">integer</i> is a mathematical integer. There is no limit on the 
+magnitude of an <i class="i">integer</i>.
+</p>
+<p>The <i class="i">types</i> <b class="b">fixnum</b> and <b class="b">bignum</b> 
+form an <i class="i">exhaustive partition</i> of <i class="i">type</i> <b class="b">integer</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-13"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-13"> &para;</a></span></h4>
+
+<p>Abbreviating.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-13"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-13"> &para;</a></span></h4>
+
+<p>(<code class="code">integer</code>{<i class="i"><code class="t">[</code>lower-limit <span class="r">[</span>upper-limit<span class="r">]</span><code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-13"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-13"> &para;</a></span></h4>
+
+<p><i class="i">lower-limit</i>, <i class="i">upper-limit</i>&mdash;<i class="i">interval designators</i> 
+					   for <i class="i">type</i> <b class="b">integer</b>.
+ The defaults for each of <i class="i">lower-limit</i> and <i class="i">upper-limit</i> is the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-13"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-13"> &para;</a></span></h4>
+
+<p>This denotes the <i class="i">integers</i> on the interval described by
+<i class="i">lower-limit</i> and <i class="i">upper-limit</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-239"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-239"> &para;</a></span></h4>
+
+<p><i class="i">Figure~2&ndash;9</i>,
+<a class="ref" href="Constructing-Numbers-from-Tokens.html">Constructing Numbers from Tokens</a>,
+<a class="ref" href="Printing-Integers.html">Printing Integers</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-139"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-139"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <code class="t">(integer <i class="i">lower</i> <i class="i">upper</i>)</code>,
+where <i class="i">lower</i> and <i class="i">upper</i> 
+are <b class="b">most-negative-fixnum</b> and <b class="b">most-positive-fixnum</b>, respectively,
+is also called <b class="b">fixnum</b>.
+</p>
+<p>The <i class="i">type</i> <code class="t">(integer 0 1)</code> is also called <b class="b">bit</b>.
+The <i class="i">type</i> <code class="t">(integer 0 *)</code> is also called <b class="b">unsigned-byte</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/integer_002dlength.html
@@ -0,0 +1,99 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>integer-length (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="integer-length (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="integer-length (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="integerp.html" rel="next" title="integerp">
+<link href="ash.html" rel="prev" title="ash">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="integer_002dlength">
+<div class="nav-panel">
+<p>
+Next: <a href="integerp.html" accesskey="n" rel="next">integerp                                                         [Function]</a>, Previous: <a href="ash.html" accesskey="p" rel="prev">ash                                                              [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="integer_002dlength-_005bFunction_005d"><span>12.2.57 integer-length                                                   [Function]<a class="copiable-link" href="#integer_002dlength-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">integer-length</code>  <i class="i">integer</i> &rArr;  <i class="i">number-of-bits</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-240"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-240"> &para;</a></span></h4>
+
+<p><i class="i">integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">number-of-bits</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-322"><span>Description::<a class="copiable-link" href="#Description_003a_003a-322"> &para;</a></span></h4>
+
+<p>Returns the number of bits needed to represent <i class="i">integer</i>
+in binary two&rsquo;s-complement format.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-224"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-224"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (integer-length 0) &rArr;  0
+ (integer-length 1) &rArr;  1
+ (integer-length 3) &rArr;  2
+ (integer-length 4) &rArr;  3
+ (integer-length 7) &rArr;  3
+ (integer-length -1) &rArr;  0
+ (integer-length -4) &rArr;  2
+ (integer-length -7) &rArr;  3
+ (integer-length -8) &rArr;  3
+ (integer-length (expt 2 9)) &rArr;  10
+ (integer-length (1- (expt 2 9))) &rArr;  9
+ (integer-length (- (expt 2 9))) &rArr;  9
+ (integer-length (- (1+ (expt 2 9)))) &rArr;  10
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-99"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-99"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">integer</i> is not an <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-169"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-169"> &para;</a></span></h4>
+
+<p>This function could have been defined by:
+</p>
+<div class="example">
+<pre class="example-preformatted">(defun integer-length (integer)
+  (ceiling (log (if (minusp integer)
+                    (- integer)
+                    (1+ integer))
+                2)))
+</pre></div>
+
+<p>If <i class="i">integer</i> is non-negative, then its value can be represented
+in unsigned binary form in a field whose width in bits is
+no smaller than <code class="t">(integer-length <i class="i">integer</i>)</code>.
+Regardless of the sign of <i class="i">integer</i>, its value can be
+represented in signed binary two&rsquo;s-complement form in a field
+whose width in bits is no smaller than <code class="t">(+ (integer-length <i class="i">integer</i>) 1)</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/integerp.html
@@ -0,0 +1,72 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>integerp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="integerp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="integerp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="parse_002dinteger.html" rel="next" title="parse-integer">
+<link href="integer_002dlength.html" rel="prev" title="integer-length">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="integerp">
+<div class="nav-panel">
+<p>
+Next: <a href="parse_002dinteger.html" accesskey="n" rel="next">parse-integer                                                    [Function]</a>, Previous: <a href="integer_002dlength.html" accesskey="p" rel="prev">integer-length                                                   [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="integerp-_005bFunction_005d"><span>12.2.58 integerp                                                         [Function]<a class="copiable-link" href="#integerp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">integerp</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-241"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-241"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-323"><span>Description::<a class="copiable-link" href="#Description_003a_003a-323"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">integer</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-225"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-225"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (integerp 1) &rArr;  <i class="i">true</i>
+ (integerp (expt 2 130)) &rArr;  <i class="i">true</i>
+ (integerp 6/5) &rArr;  <i class="i">false</i>
+ (integerp nil) &rArr;  <i class="i">false</i>
+
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-170"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-170"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (integerp <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'integer)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/interactive_002dstream_002dp.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>interactive-stream-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="interactive-stream-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="interactive-stream-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="open_002dstream_002dp.html" rel="next" title="open-stream-p">
+<link href="input_002dstream_002dp.html" rel="prev" title="input-stream-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="interactive_002dstream_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="open_002dstream_002dp.html" accesskey="n" rel="next">open-stream-p                                                    [Function]</a>, Previous: <a href="input_002dstream_002dp.html" accesskey="p" rel="prev">input-stream-p, output-stream-p                                  [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="interactive_002dstream_002dp-_005bFunction_005d"><span>21.2.10 interactive-stream-p                                             [Function]<a class="copiable-link" href="#interactive_002dstream_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">interactive-stream-p</code>  <i class="i">stream</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-413"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-413"> &para;</a></span></h4>
+
+<p><i class="i">stream</i>&mdash;a <i class="i">stream</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-541"><span>Description::<a class="copiable-link" href="#Description_003a_003a-541"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">stream</i> is an <i class="i">interactive stream</i>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-388"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-388"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (when (&gt; measured limit)
+   (let ((error (round (* (- measured limit) 100)
+                       limit)))
+     (unless (if (interactive-stream-p *query-io*)
+                 (yes-or-no-p &quot;The frammis is out of tolerance by ~D
+                               Is it safe to proceed? &quot; error)
+                 (&lt; error 15))  ;15
+       (error &quot;The frammis is out of tolerance by ~D
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-193"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-193"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">stream</i> is not a <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-443"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-443"> &para;</a></span></h4>
+
+<p><a class="ref" href="Stream-Concepts.html">Stream Concepts</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/intern.html
@@ -0,0 +1,140 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>intern (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="intern (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="intern (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="package_002dname.html" rel="next" title="package-name">
+<link href="do_002dsymbols.html" rel="prev" title="do-symbols">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="intern">
+<div class="nav-panel">
+<p>
+Next: <a href="package_002dname.html" accesskey="n" rel="next">package-name                                                     [Function]</a>, Previous: <a href="do_002dsymbols.html" accesskey="p" rel="prev">do-symbols, do-external-symbols, do-all-symbols                     [Macro]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="intern-_005bFunction_005d"><span>11.2.21 intern                                                           [Function]<a class="copiable-link" href="#intern-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">intern</code>  <i class="i">string <span class="r">&amp;optional</span> package</i> &rArr;  <i class="i">symbol, status</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-193"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-193"> &para;</a></span></h4>
+
+<p><i class="i">string</i>&mdash;a <i class="i">string</i>.
+</p>
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<p>The default is the <i class="i">current package</i>.
+</p>
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">status</i>&mdash;one of <code class="t">:inherited</code>, <code class="t">:external</code>, <code class="t">:internal</code>, or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-257"><span>Description::<a class="copiable-link" href="#Description_003a_003a-257"> &para;</a></span></h4>
+
+<p><b class="b">intern</b> enters a <i class="i">symbol</i> named <i class="i">string</i> into <i class="i">package</i>.
+If a <i class="i">symbol</i> whose name is the same as <i class="i">string</i> 
+is already <i class="i">accessible</i> in <i class="i">package</i>, it is returned.
+If no such <i class="i">symbol</i> is <i class="i">accessible</i> in <i class="i">package</i>, 
+a new <i class="i">symbol</i> with the given name is created 
+and entered into <i class="i">package</i> as an <i class="i">internal symbol</i>,
+or as an <i class="i">external symbol</i> if the <i class="i">package</i> is the <code class="t">KEYWORD</code> <i class="i">package</i>; 
+<i class="i">package</i> becomes the <i class="i">home package</i> of the created <i class="i">symbol</i>.
+</p>
+<p>The first value returned by <b class="b">intern</b>, <i class="i">symbol</i>,
+is the <i class="i">symbol</i> that was found or
+created.  
+The meaning of the <i class="i">secondary value</i>, <i class="i">status</i>, is as follows:
+</p><dl class="table">
+<dt><code class="t">:internal</code></dt>
+<dd><p>The <i class="i">symbol</i> was found 
+and is
+<i class="i">present</i> in <i class="i">package</i> as an <i class="i">internal symbol</i>.
+</p>
+</dd>
+<dt><code class="t">:external</code></dt>
+<dd><p>The <i class="i">symbol</i> was found
+and is
+<i class="i">present</i> as an <i class="i">external symbol</i>.
+</p>
+</dd>
+<dt><code class="t">:inherited</code></dt>
+<dd><p>The <i class="i">symbol</i> was found
+and is inherited via <b class="b">use-package</b> 
+(which implies that the <i class="i">symbol</i> is internal).
+</p>
+</dd>
+<dt><b class="b">nil</b></dt>
+<dd><p>No pre-existing <i class="i">symbol</i> was found,
+so one was created.
+</p>
+<p>It is <i class="i">implementation-dependent</i> whether the <i class="i">string</i> 
+that becomes the new <i class="i">symbol</i>&rsquo;s <i class="i">name</i> is the given
+<i class="i">string</i> or a copy of it.  Once a <i class="i">string</i>
+has been given as the <i class="i">string</i> <i class="i">argument</i> to
+<i class="i">intern</i> in this situation where a new <i class="i">symbol</i> is created,
+the consequences are undefined if a
+subsequent attempt is made to alter that <i class="i">string</i>.
+</p>
+</dd>
+</dl>
+
+<h4 class="subsubheading" id="Examples_003a_003a-175"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-175"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (in-package &quot;COMMON-LISP-USER&quot;) &rArr;  #&lt;PACKAGE &quot;COMMON-LISP-USER&quot;&gt;
+ (intern &quot;Never-Before&quot;) &rArr;  |Never-Before|, NIL
+ (intern &quot;Never-Before&quot;) &rArr;  |Never-Before|, :INTERNAL 
+ (intern &quot;NEVER-BEFORE&quot; &quot;KEYWORD&quot;) &rArr;  :NEVER-BEFORE, NIL
+ (intern &quot;NEVER-BEFORE&quot; &quot;KEYWORD&quot;) &rArr;  :NEVER-BEFORE, :EXTERNAL
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-229"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-229"> &para;</a></span></h4>
+
+<p><a class="ref" href="find_002dsymbol.html">find-symbol                                                      [Function]</a>
+,
+<a class="ref" href="read.html">read, read-preserving-whitespace                                 [Function]</a>
+,
+<b class="b">symbol</b>,
+<a class="ref" href="unintern.html">unintern                                                         [Function]</a>
+,
+<a class="ref" href="Symbols-as-Tokens.html">Symbols as Tokens</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-133"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-133"> &para;</a></span></h4>
+
+<p><b class="b">intern</b> does not need to do any name conflict checking 
+because it never creates a new <i class="i">symbol</i> 
+if there is already an <i class="i">accessible</i> <i class="i">symbol</i> with the name given.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="package_002dname.html">package-name                                                     [Function]</a>, Previous: <a href="do_002dsymbols.html">do-symbols, do-external-symbols, do-all-symbols                     [Macro]</a>, Up: <a href="Packages-Dictionary.html">Packages Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/internal_002dtime_002dunits_002dper_002dsecond.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>internal-time-units-per-second (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="internal-time-units-per-second (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="internal-time-units-per-second (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="get_002dinternal_002dreal_002dtime.html" rel="next" title="get-internal-real-time">
+<link href="time.html" rel="prev" title="time">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="internal_002dtime_002dunits_002dper_002dsecond">
+<div class="nav-panel">
+<p>
+Next: <a href="get_002dinternal_002dreal_002dtime.html" accesskey="n" rel="next">get-internal-real-time                                           [Function]</a>, Previous: <a href="time.html" accesskey="p" rel="prev">time                                                                [Macro]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="internal_002dtime_002dunits_002dper_002dsecond-_005bConstant-Variable_005d"><span>25.2.11 internal-time-units-per-second                          [Constant Variable]<a class="copiable-link" href="#internal_002dtime_002dunits_002dper_002dsecond-_005bConstant-Variable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Constant-Value_003a_003a-14"><span>Constant Value::<a class="copiable-link" href="#Constant-Value_003a_003a-14"> &para;</a></span></h4>
+
+<p>A positive <i class="i">integer</i>, the magnitude of which is <i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-659"><span>Description::<a class="copiable-link" href="#Description_003a_003a-659"> &para;</a></span></h4>
+
+<p>The number of <i class="i">internal time units</i> in one second.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-537"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-537"> &para;</a></span></h4>
+
+<p><a class="ref" href="get_002dinternal_002drun_002dtime.html">get-internal-run-time                                            [Function]</a>
+, 
+<a class="ref" href="get_002dinternal_002dreal_002dtime.html">get-internal-real-time                                           [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-330"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-330"> &para;</a></span></h4>
+
+<p>These units form the basis of the Internal Time format representation.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/intersection.html
@@ -0,0 +1,168 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>intersection (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="intersection (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="intersection (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="adjoin.html" rel="next" title="adjoin">
+<link href="remf.html" rel="prev" title="remf">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="intersection">
+<div class="nav-panel">
+<p>
+Next: <a href="adjoin.html" accesskey="n" rel="next">adjoin                                                           [Function]</a>, Previous: <a href="remf.html" accesskey="p" rel="prev">remf                                                                [Macro]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="intersection_002c-nintersection-_005bFunction_005d"><span>14.2.43 intersection, nintersection                                      [Function]<a class="copiable-link" href="#intersection_002c-nintersection-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">intersection</code>  <i class="i">list-1 list-2 <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">result-list</i>
+</p>
+<p><code class="code">nintersection</code>  <i class="i">list-1 list-2 <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">result-list</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-312"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-312"> &para;</a></span></h4>
+
+<p><i class="i">list-1</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<p><i class="i">list-2</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">result-list</i>&mdash;a <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-413"><span>Description::<a class="copiable-link" href="#Description_003a_003a-413"> &para;</a></span></h4>
+
+<p><b class="b">intersection</b> and <b class="b">nintersection</b> return a <i class="i">list</i>
+that contains every element that occurs in both <i class="i">list-1</i> and <i class="i">list-2</i>.
+</p>
+<p><b class="b">nintersection</b> is the destructive version of <b class="b">intersection</b>.
+It performs the same operation,
+but may destroy <i class="i">list-1</i> using its cells to construct the result.
+</p>
+<p><i class="i">list-2</i> is not destroyed.
+</p>
+<p>The intersection operation is described as follows.
+For all possible ordered pairs consisting of 
+    one <i class="i">element</i> from <i class="i">list-1</i> 
+and one <i class="i">element</i> from <i class="i">list-2</i>,
+<code class="t">:test</code> or <code class="t">:test-not</code> are used 
+to determine whether they <i class="i">satisfy the test</i>.  
+The first argument to the <code class="t">:test</code> or <code class="t">:test-not</code>
+function is an element of <i class="i">list-1</i>; the second argument is an
+element of <i class="i">list-2</i>.
+If <code class="t">:test</code> or <code class="t">:test-not</code> is not supplied, <b class="b">eql</b>
+is used.
+It is an error if <code class="t">:test</code> and <code class="t">:test-not</code> are supplied in
+the same function call.
+</p>
+<p>If <code class="t">:key</code> is supplied (and not <b class="b">nil</b>), it is used to
+extract the part to be tested from the <i class="i">list</i> element. 
+The argument to the <code class="t">:key</code> function
+is an element of either <i class="i">list-1</i> or <i class="i">list-2</i>;
+the <code class="t">:key</code> function typically returns part of the supplied element.
+If <code class="t">:key</code> is not supplied or <b class="b">nil</b>, the <i class="i">list-1</i> and
+<i class="i">list-2</i> elements are used.
+</p>
+<p>For every pair that <i class="i">satifies the test</i>,
+exactly one of the two elements of the pair will be put in the result.
+No element from either <i class="i">list</i> appears in the result that does not 
+<i class="i">satisfy the test</i> for
+an element from the other <i class="i">list</i>.
+If one of the <i class="i">lists</i> contains duplicate
+elements, there may be duplication in the result.
+</p>
+<p>There is no guarantee that the order of elements in the result will
+reflect the ordering of the arguments in any particular way.
+The result <i class="i">list</i> may share cells with, 
+or be <b class="b">eq</b> to, either <i class="i">list-1</i> or <i class="i">list-2</i>
+if appropriate.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-296"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-296"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq list1 (list 1 1 2 3 4 a b c &quot;A&quot; &quot;B&quot; &quot;C&quot; &quot;d&quot;)
+       list2 (list 1 4 5 b c d &quot;a&quot; &quot;B&quot; &quot;c&quot; &quot;D&quot;)) 
+  &rArr;  (1 4 5 B C D &quot;a&quot; &quot;B&quot; &quot;c&quot; &quot;D&quot;)
+ (intersection list1 list2) &rArr;  (C B 4 1 1)
+ (intersection list1 list2 :test 'equal) &rArr;  (&quot;B&quot; C B 4 1 1)
+ (intersection list1 list2 :test #'equalp) &rArr;  (&quot;d&quot; &quot;C&quot; &quot;B&quot; &quot;A&quot; C B 4 1 1) 
+ (nintersection list1 list2) &rArr;  (1 1 4 B C)
+ list1 &rArr;  <i class="i">implementation-dependent</i> ;<i class="i">e.g.</i>, (1 1 4 B C)
+ list2 &rArr;  <i class="i">implementation-dependent</i> ;<i class="i">e.g.</i>, (1 4 5 B C D &quot;a&quot; &quot;B&quot; &quot;c&quot; &quot;D&quot;)
+ (setq list1 (copy-list '((1 . 2) (2 . 3) (3 . 4) (4 . 5))))
+&rArr;  ((1 . 2) (2 . 3) (3 . 4) (4 . 5)) 
+ (setq list2 (copy-list '((1 . 3) (2 . 4) (3 . 6) (4 . 8))))
+&rArr;  ((1 . 3) (2 . 4) (3 . 6) (4 . 8)) 
+ (nintersection list1 list2 :key #'cdr) &rArr;  ((2 . 3) (3 . 4)) 
+ list1 &rArr;  <i class="i">implementation-dependent</i> ;<i class="i">e.g.</i>, ((1 . 2) (2 . 3) (3 . 4)) 
+ list2 &rArr;  <i class="i">implementation-dependent</i> ;<i class="i">e.g.</i>, ((1 . 3) (2 . 4) (3 . 6) (4 . 8)) 
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-44"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-44"> &para;</a></span></h4>
+
+<p><b class="b">nintersection</b> can modify <i class="i">list-1</i>, 
+</p>
+<p>but not <i class="i">list-2</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-132"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-132"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">list-1</i> and <i class="i">list-2</i> are not <i class="i">proper lists</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-337"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-337"> &para;</a></span></h4>
+
+<p><a class="ref" href="union.html">union, nunion                                                    [Function]</a>
+,
+</p>
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-223"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-223"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> parameter is deprecated.
+</p>
+<p>Since the <b class="b">nintersection</b> side effect is not required,
+it should not be used in for-effect-only
+  positions in portable code.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="adjoin.html">adjoin                                                           [Function]</a>, Previous: <a href="remf.html">remf                                                                [Macro]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/invalid_002dmethod_002derror.html
@@ -0,0 +1,87 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>invalid-method-error (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="invalid-method-error (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="invalid-method-error (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="method_002dcombination_002derror.html" rel="next" title="method-combination-error">
+<link href="simple_002derror.html" rel="prev" title="simple-error">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="invalid_002dmethod_002derror">
+<div class="nav-panel">
+<p>
+Next: <a href="method_002dcombination_002derror.html" accesskey="n" rel="next">method-combination-error                                         [Function]</a>, Previous: <a href="simple_002derror.html" accesskey="p" rel="prev">simple-error                                               [Condition Type]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="invalid_002dmethod_002derror-_005bFunction_005d"><span>9.2.15 invalid-method-error                                             [Function]<a class="copiable-link" href="#invalid_002dmethod_002derror-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">invalid-method-error</code>  <i class="i">method format-control <span class="r">&amp;rest</span> args</i> &rArr;  <i class="i"><i class="i">implementation-dependent</i></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-136"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-136"> &para;</a></span></h4>
+
+<p><i class="i">method</i>&mdash;a <i class="i">method</i>.
+</p>
+<p><i class="i">format-control</i>&mdash;a <i class="i">format control</i>.
+</p>
+<p><i class="i">args</i>&mdash;<i class="i">format arguments</i> for the <i class="i">format-control</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-185"><span>Description::<a class="copiable-link" href="#Description_003a_003a-185"> &para;</a></span></h4>
+
+<p>The <i class="i">function</i> <b class="b">invalid-method-error</b> is used to signal an error of <i class="i">type</i> <b class="b">error</b>
+when there is an applicable <i class="i">method</i> whose <i class="i">qualifiers</i> are not valid for
+the method combination type.  The error message is constructed by
+using the <i class="i">format-control</i> suitable for <b class="b">format</b>
+and any <i class="i">args</i> to it.  Because an
+implementation may need to add additional contextual information to
+the error message, <b class="b">invalid-method-error</b> should be called only
+within the dynamic extent of a method combination function.
+</p>
+<p>The <i class="i">function</i> <b class="b">invalid-method-error</b> is called automatically when a
+<i class="i">method</i> fails to satisfy every <i class="i">qualifier</i> pattern and predicate in a
+<b class="b">define-method-combination</b> <i class="i">form</i>.  A method combination function
+that imposes additional restrictions should call 
+<b class="b">invalid-method-error</b> explicitly if it encounters a <i class="i">method</i> 
+it cannot accept.
+</p>
+<p>Whether <b class="b">invalid-method-error</b> returns to its caller or exits via
+<b class="b">throw</b> is <i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Side-Effects_003a_003a-10"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-10"> &para;</a></span></h4>
+
+<p>The debugger might be entered.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-22"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-22"> &para;</a></span></h4>
+
+<p><b class="b">*break-on-signals*</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-162"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-162"> &para;</a></span></h4>
+
+<p><a class="ref" href="define_002dmethod_002dcombination.html">define-method-combination                                           [Macro]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/invoke_002ddebugger.html
@@ -0,0 +1,95 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>invoke-debugger (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="invoke-debugger (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="invoke-debugger (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="break.html" rel="next" title="break">
+<link href="simple_002dwarning.html" rel="prev" title="simple-warning">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="invoke_002ddebugger">
+<div class="nav-panel">
+<p>
+Next: <a href="break.html" accesskey="n" rel="next">break                                                            [Function]</a>, Previous: <a href="simple_002dwarning.html" accesskey="p" rel="prev">simple-warning                                             [Condition Type]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="invoke_002ddebugger-_005bFunction_005d"><span>9.2.22 invoke-debugger                                                  [Function]<a class="copiable-link" href="#invoke_002ddebugger-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">invoke-debugger</code>  <i class="i">condition</i> 
+       &rArr;  #&lt;NoValue&gt;
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-141"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-141"> &para;</a></span></h4>
+
+<p><i class="i">condition</i>&mdash;a <i class="i">condition</i> <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-192"><span>Description::<a class="copiable-link" href="#Description_003a_003a-192"> &para;</a></span></h4>
+
+<p><b class="b">invoke-debugger</b> attempts to enter the debugger with <i class="i">condition</i>.
+</p>
+<p>If <b class="b">*debugger-hook*</b> is not <b class="b">nil</b>, it should be a <i class="i">function</i> 
+(or the name of a <i class="i">function</i>) to be called prior to entry to 
+the standard debugger.  The <i class="i">function</i> is called with
+<b class="b">*debugger-hook*</b> bound to <b class="b">nil</b>, and the <i class="i">function</i> 
+must accept two arguments: the <i class="i">condition</i> 
+and the <i class="i">value</i> of <b class="b">*debugger-hook*</b> prior to binding it to <b class="b">nil</b>. 
+If the <i class="i">function</i> returns normally,
+the standard debugger is entered.
+</p>
+<p>The standard debugger never directly returns.  Return can occur only by a
+non-local transfer of control, such as the use of a restart function.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-121"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-121"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (ignore-errors ;Normally, this would suppress debugger entry
+   (handler-bind ((error #'invoke-debugger)) ;But this forces debugger entry
+     (error &quot;Foo.&quot;)))
+Debug: Foo.
+To continue, type :CONTINUE followed by an option number:
+ 1: Return to Lisp Toplevel.
+Debug&gt;
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-14"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-14"> &para;</a></span></h4>
+
+<p><b class="b">*debugger-hook*</b> is bound to <b class="b">nil</b>,
+program execution is discontinued,
+and the debugger is entered.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-26"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-26"> &para;</a></span></h4>
+
+<p><b class="b">*debug-io*</b> and <b class="b">*debugger-hook*</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-168"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-168"> &para;</a></span></h4>
+
+<p><a class="ref" href="error.html">error                                                            [Function]</a>
+, 
+<a class="ref" href="break.html">break                                                            [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/invoke_002drestart.html
@@ -0,0 +1,112 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>invoke-restart (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="invoke-restart (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="invoke-restart (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="invoke_002drestart_002dinteractively.html" rel="next" title="invoke-restart-interactively">
+<link href="find_002drestart.html" rel="prev" title="find-restart">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="invoke_002drestart">
+<div class="nav-panel">
+<p>
+Next: <a href="invoke_002drestart_002dinteractively.html" accesskey="n" rel="next">invoke-restart-interactively                                     [Function]</a>, Previous: <a href="find_002drestart.html" accesskey="p" rel="prev">find-restart                                                     [Function]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="invoke_002drestart-_005bFunction_005d"><span>9.2.34 invoke-restart                                                   [Function]<a class="copiable-link" href="#invoke_002drestart-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">invoke-restart</code>  <i class="i">restart <span class="r">&amp;rest</span> arguments</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-150"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-150"> &para;</a></span></h4>
+
+<p><i class="i">restart</i>&mdash;a <i class="i">restart designator</i>.
+</p>
+<p><i class="i">argument</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">function</i>
+		   associated with <i class="i">restart</i>, if that <i class="i">function</i> returns.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-204"><span>Description::<a class="copiable-link" href="#Description_003a_003a-204"> &para;</a></span></h4>
+
+<p>Calls the <i class="i">function</i> associated with <i class="i">restart</i>,
+passing <i class="i">arguments</i> to it.  
+<i class="i">Restart</i> must be valid in the current <i class="i">dynamic environment</i>.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-132"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-132"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (defun add3 (x) (check-type x number) (+ x 3))
+
+ (foo 'seven)
+<code class="t"> |&gt; </code> Error: The value SEVEN was not of type NUMBER.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Specify a different value to use.
+<code class="t"> |&gt; </code>  2: Return to Lisp Toplevel.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">(invoke-restart 'store-value 7)</code><b class="b">&lt;&lt;|</b>
+&rArr;  10
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-16"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-16"> &para;</a></span></h4>
+
+<p>A non-local transfer of control might be done by the restart.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-32"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-32"> &para;</a></span></h4>
+
+<p>Existing restarts.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-47"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-47"> &para;</a></span></h4>
+
+<p>If <i class="i">restart</i> is not valid, an error of <i class="i">type</i> <b class="b">control-error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-178"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-178"> &para;</a></span></h4>
+
+<p><a class="ref" href="find_002drestart.html">find-restart                                                     [Function]</a>
+,
+<a class="ref" href="restart_002dbind.html">restart-bind                                                        [Macro]</a>
+,
+<a class="ref" href="restart_002dcase.html">restart-case                                                        [Macro]</a>
+,
+<a class="ref" href="invoke_002drestart_002dinteractively.html">invoke-restart-interactively                                     [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-108"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-108"> &para;</a></span></h4>
+
+<p>The most common use for <b class="b">invoke-restart</b> is in a <i class="i">handler</i>.
+It might be used explicitly, or implicitly through <b class="b">invoke-restart-interactively</b>
+or a <i class="i">restart function</i>.
+</p>
+<p><i class="i">Restart functions</i> call <b class="b">invoke-restart</b>, not vice versa.  That is,
+<i class="i">invoke-restart</i> provides primitive functionality, and <i class="i">restart functions</i>
+are non-essential &ldquo;syntactic sugar.&rdquo;
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="invoke_002drestart_002dinteractively.html">invoke-restart-interactively                                     [Function]</a>, Previous: <a href="find_002drestart.html">find-restart                                                     [Function]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/invoke_002drestart_002dinteractively.html
@@ -0,0 +1,131 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>invoke-restart-interactively (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="invoke-restart-interactively (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="invoke-restart-interactively (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="restart_002dbind.html" rel="next" title="restart-bind">
+<link href="invoke_002drestart.html" rel="prev" title="invoke-restart">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="invoke_002drestart_002dinteractively">
+<div class="nav-panel">
+<p>
+Next: <a href="restart_002dbind.html" accesskey="n" rel="next">restart-bind                                                        [Macro]</a>, Previous: <a href="invoke_002drestart.html" accesskey="p" rel="prev">invoke-restart                                                   [Function]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="invoke_002drestart_002dinteractively-_005bFunction_005d"><span>9.2.35 invoke-restart-interactively                                     [Function]<a class="copiable-link" href="#invoke_002drestart_002dinteractively-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">invoke-restart-interactively</code>  <i class="i">restart</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-151"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-151"> &para;</a></span></h4>
+
+<p><i class="i">restart</i>&mdash;a <i class="i">restart designator</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">function</i> 
+		   associated with <i class="i">restart</i>, if that <i class="i">function</i> returns.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-205"><span>Description::<a class="copiable-link" href="#Description_003a_003a-205"> &para;</a></span></h4>
+
+<p><b class="b">invoke-restart-interactively</b> calls the <i class="i">function</i> associated
+with <i class="i">restart</i>, prompting for any necessary arguments. 
+If <i class="i">restart</i> is a name, it must be valid in the current <i class="i">dynamic environment</i>.  
+</p>
+<p><b class="b">invoke-restart-interactively</b> 
+prompts for arguments by executing
+  the code provided in the <code class="t">:interactive</code> keyword to 
+<b class="b">restart-case</b> or 
+  <code class="t">:interactive-function</code> keyword to <b class="b">restart-bind</b>.
+</p>
+<p>If no such options have been supplied in the corresponding
+<b class="b">restart-bind</b> or <b class="b">restart-case</b>, 
+then the consequences are undefined if the <i class="i">restart</i> takes
+  required arguments.  If the arguments are optional, an argument list of
+  <b class="b">nil</b> is used.
+</p>
+<p>Once the arguments have been determined, 
+<b class="b">invoke-restart-interactively</b>
+  executes the following:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (apply #'invoke-restart <i class="i">restart</i> <i class="i">arguments</i>)
+</pre></div>
+
+<h4 class="subsubheading" id="Examples_003a_003a-133"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-133"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun add3 (x) (check-type x number) (+ x 3))
+
+ (add3 'seven)
+<code class="t"> |&gt; </code> Error: The value SEVEN was not of type NUMBER.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Specify a different value to use.
+<code class="t"> |&gt; </code>  2: Return to Lisp Toplevel.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">(invoke-restart-interactively 'store-value)</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Type a form to evaluate and use: <b class="b">|&gt;&gt;</b><code class="t">7</code><b class="b">&lt;&lt;|</b>
+&rArr;  10
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-17"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-17"> &para;</a></span></h4>
+
+<p>If prompting for arguments is necesary,
+some typeout may occur (on <i class="i">query I/O</i>).
+</p>
+<p>A non-local transfer of control might be done by the restart.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-33"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-33"> &para;</a></span></h4>
+
+<p><b class="b">*query-io*</b>, active <i class="i">restarts</i>
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-48"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-48"> &para;</a></span></h4>
+
+<p>If <i class="i">restart</i> is not valid, an error of <i class="i">type</i> <b class="b">control-error</b>
+is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-179"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-179"> &para;</a></span></h4>
+
+<p><a class="ref" href="find_002drestart.html">find-restart                                                     [Function]</a>
+,
+<a class="ref" href="invoke_002drestart.html">invoke-restart                                                   [Function]</a>
+,
+<a class="ref" href="restart_002dcase.html">restart-case                                                        [Macro]</a>
+,
+<a class="ref" href="restart_002dbind.html">restart-bind                                                        [Macro]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-109"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-109"> &para;</a></span></h4>
+
+<p><b class="b">invoke-restart-interactively</b> is used internally by the debugger
+and may also be useful in implementing other portable, interactive debugging 
+tools.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="restart_002dbind.html">restart-bind                                                        [Macro]</a>, Previous: <a href="invoke_002drestart.html">invoke-restart                                                   [Function]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/keyword.html
@@ -0,0 +1,72 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>keyword (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="keyword (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="keyword (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="symbolp.html" rel="next" title="symbolp">
+<link href="symbol.html" rel="prev" title="symbol">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="keyword">
+<div class="nav-panel">
+<p>
+Next: <a href="symbolp.html" accesskey="n" rel="next">symbolp                                                          [Function]</a>, Previous: <a href="symbol.html" accesskey="p" rel="prev">symbol                                                       [System Class]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="keyword-_005bType_005d"><span>10.2.2 keyword                                                              [Type]<a class="copiable-link" href="#keyword-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-3"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-3"> &para;</a></span></h4>
+
+<p><b class="b">keyword</b>,
+<b class="b">symbol</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-218"><span>Description::<a class="copiable-link" href="#Description_003a_003a-218"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">keyword</b> includes all <i class="i">symbols</i> <i class="i">interned</i> the <code class="t">KEYWORD</code> <i class="i">package</i>.
+</p>
+<p><i class="i">Interning</i> a <i class="i">symbol</i> in the <code class="t">KEYWORD</code> <i class="i">package</i> has three automatic effects:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>It causes the <i class="i">symbol</i> to become <i class="i">bound</i> to itself.
+</p></dd>
+<dt>2.</dt>
+<dd><p>It causes the <i class="i">symbol</i> to become an <i class="i">external symbol</i>
+	  of the <code class="t">KEYWORD</code> <i class="i">package</i>.
+</p></dd>
+<dt>3.</dt>
+<dd><p>It causes the <i class="i">symbol</i> to become a <i class="i">constant variable</i>.
+</p></dd>
+</dl>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-192"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-192"> &para;</a></span></h4>
+
+<p><a class="ref" href="keywordp.html">keywordp                                                         [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/keywordp.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>keywordp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="keywordp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="keywordp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="make_002dsymbol.html" rel="next" title="make-symbol">
+<link href="symbolp.html" rel="prev" title="symbolp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="keywordp">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dsymbol.html" accesskey="n" rel="next">make-symbol                                                      [Function]</a>, Previous: <a href="symbolp.html" accesskey="p" rel="prev">symbolp                                                          [Function]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="keywordp-_005bFunction_005d"><span>10.2.4 keywordp                                                         [Function]<a class="copiable-link" href="#keywordp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">keywordp</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-159"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-159"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-220"><span>Description::<a class="copiable-link" href="#Description_003a_003a-220"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is a <i class="i">keyword</i>_1;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-142"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-142"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (keywordp 'elephant) &rArr;  <i class="i">false</i>
+ (keywordp 12) &rArr;  <i class="i">false</i>
+ (keywordp :test) &rArr;  <i class="i">true</i>
+ (keywordp ':test) &rArr;  <i class="i">true</i>
+ (keywordp nil) &rArr;  <i class="i">false</i>
+ (keywordp :nil) &rArr;  <i class="i">true</i>
+ (keywordp '(:test)) &rArr;  <i class="i">false</i>
+ (keywordp &quot;hello&quot;) &rArr;  <i class="i">false</i>
+ (keywordp &quot;:hello&quot;) &rArr;  <i class="i">false</i>
+ (keywordp '&amp;optional) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-194"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-194"> &para;</a></span></h4>
+
+<p><a class="ref" href="constantp.html">constantp                                                        [Function]</a>
+,
+<a class="ref" href="keyword.html">keyword                                                              [Type]</a>
+,
+<a class="ref" href="symbolp.html">symbolp                                                          [Function]</a>
+,
+<a class="ref" href="symbol_002dpackage.html">symbol-package                                                   [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/lambda-_0028Symbol_0029.html
@@ -0,0 +1,90 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>lambda (Symbol) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="lambda (Symbol) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="lambda (Symbol) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="lambda.html" rel="next" title="lambda">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="prev" title="Evaluation and Compilation Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="lambda-_0028Symbol_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="lambda.html" accesskey="n" rel="next">lambda                                                              [Macro]</a>, Previous: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="p" rel="prev">Evaluation and Compilation Dictionary</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="lambda-_005bSymbol_005d"><span>3.8.1 lambda                                                             [Symbol]<a class="copiable-link" href="#lambda-_005bSymbol_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a"> &para;</a></span></h4>
+
+<p><code class="code">lambda</code>  <i class="i">lambda-list [[{<i class="i">declaration</i>}* | <i class="i">documentation</i>]] {<i class="i">form</i>}*</i> 
+</p><h4 class="subsubheading" id="Arguments_003a_003a"><span>Arguments::<a class="copiable-link" href="#Arguments_003a_003a"> &para;</a></span></h4>
+
+<p><i class="i">lambda-list</i>&mdash;an <i class="i">ordinary lambda list</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">documentation</i>&mdash;a <i class="i">string</i>; not evaluated.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a"><span>Description::<a class="copiable-link" href="#Description_003a_003a"> &para;</a></span></h4>
+
+<p>A <i class="i">lambda expression</i> is a <i class="i">list</i> that can be used in place of a
+<i class="i">function name</i> in certain contexts to denote a <i class="i">function</i> by 
+directly describing its behavior rather than indirectly by referring to the 
+name of an <i class="i">established</i> <i class="i">function</i>.
+</p>
+<p><i class="i">Documentation</i> is attached to the denoted <i class="i">function</i> (if any
+is actually created) as a <i class="i">documentation string</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a"> &para;</a></span></h4>
+
+<p><b class="b">function</b>,
+<a class="ref" href="documentation.html">documentation, (setf documentation)             [Standard Generic Function]</a>
+,
+<a class="ref" href="Lambda-Expressions.html">Lambda Expressions</a>,
+<a class="ref" href="Lambda-Forms.html">Lambda Forms</a>,
+<a class="ref" href="Syntactic-Interaction-of-Documentation-Strings-and-Declarations.html">Syntactic Interaction of Documentation Strings and Declarations</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a"> &para;</a></span></h4>
+
+<p>The <i class="i">lambda form</i>
+</p>
+<div class="example">
+<pre class="example-preformatted"> ((lambda <i class="i">lambda-list</i> . <i class="i">body</i>) . <i class="i">arguments</i>)
+</pre></div>
+
+<p>is semantically equivalent to the <i class="i">function form</i>
+</p>
+<div class="example">
+<pre class="example-preformatted"> (funcall #'(lambda <i class="i">lambda-list</i> . <i class="i">body</i>) . <i class="i">arguments</i>)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/lambda.html
@@ -0,0 +1,89 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>lambda (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="lambda (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="lambda (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="compile.html" rel="next" title="compile">
+<link href="lambda-_0028Symbol_0029.html" rel="prev" title="lambda (Symbol)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="lambda">
+<div class="nav-panel">
+<p>
+Next: <a href="compile.html" accesskey="n" rel="next">compile                                                          [Function]</a>, Previous: <a href="lambda-_0028Symbol_0029.html" accesskey="p" rel="prev">lambda                                                             [Symbol]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="lambda-_005bMacro_005d"><span>3.8.2 lambda                                                              [Macro]<a class="copiable-link" href="#lambda-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">lambda</code>  <i class="i">lambda-list [[{<i class="i">declaration</i>}* | <i class="i">documentation</i>]] {<i class="i">form</i>}*</i> &rArr;  <i class="i"><i class="i">function</i></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a"> &para;</a></span></h4>
+
+<p><i class="i">lambda-list</i>&mdash;an <i class="i">ordinary lambda list</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">documentation</i>&mdash;a <i class="i">string</i>; not evaluated.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">function</i>&mdash;a <i class="i">function</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-1"><span>Description::<a class="copiable-link" href="#Description_003a_003a-1"> &para;</a></span></h4>
+
+<p>Provides a shorthand notation for a <b class="b">function</b> <i class="i">special form</i>
+involving a <i class="i">lambda expression</i> such that:
+</p>
+<div class="example">
+<pre class="example-preformatted">    (lambda <i class="i">lambda-list</i> [[{<i class="i">declaration</i>}* | <i class="i">documentation</i>]] {<i class="i">form</i>}*)
+ &equiv; (function (lambda <i class="i">lambda-list</i> [[{<i class="i">declaration</i>}* | <i class="i">documentation</i>]] {<i class="i">form</i>}*))
+ &equiv; #'(lambda <i class="i">lambda-list</i> [[{<i class="i">declaration</i>}* | <i class="i">documentation</i>]] {<i class="i">form</i>}*)
+</pre></div>
+
+<h4 class="subsubheading" id="Examples_003a_003a"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (funcall (lambda (x) (+ x 3)) 4) &rArr;  7
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-1"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-1"> &para;</a></span></h4>
+
+<p><b class="b">lambda</b> (symbol)
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-1"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-1"> &para;</a></span></h4>
+
+<p>This macro could be implemented by:
+</p>
+<div class="example">
+<pre class="example-preformatted">(defmacro lambda (&amp;whole form &amp;rest bvl-decls-and-body)
+  (declare (ignore bvl-decls-and-body))
+  `#',form)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/lambda_002dlist_002dkeywords.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>lambda-list-keywords (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="lambda-list-keywords (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="lambda-list-keywords (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="lambda_002dparameters_002dlimit.html" rel="next" title="lambda-parameters-limit">
+<link href="call_002darguments_002dlimit.html" rel="prev" title="call-arguments-limit">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="lambda_002dlist_002dkeywords">
+<div class="nav-panel">
+<p>
+Next: <a href="lambda_002dparameters_002dlimit.html" accesskey="n" rel="next">lambda-parameters-limit                                 [Constant Variable]</a>, Previous: <a href="call_002darguments_002dlimit.html" accesskey="p" rel="prev">call-arguments-limit                                    [Constant Variable]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="lambda_002dlist_002dkeywords-_005bConstant-Variable_005d"><span>5.3.13 lambda-list-keywords                                    [Constant Variable]<a class="copiable-link" href="#lambda_002dlist_002dkeywords-_005bConstant-Variable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Constant-Value_003a_003a-1"><span>Constant Value::<a class="copiable-link" href="#Constant-Value_003a_003a-1"> &para;</a></span></h4>
+
+<p>a <i class="i">list</i>, the <i class="i">elements</i> of which are <i class="i">implementation-dependent</i>, 
+but which must contain at least the <i class="i">symbols</i> 
+ <b class="b">&amp;allow-other-keys</b>,
+ <b class="b">&amp;aux</b>,
+ <b class="b">&amp;body</b>,
+ <b class="b">&amp;environment</b>,
+ <b class="b">&amp;key</b>,
+ <b class="b">&amp;optional</b>,
+ <b class="b">&amp;rest</b>,
+and
+ <b class="b">&amp;whole</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-66"><span>Description::<a class="copiable-link" href="#Description_003a_003a-66"> &para;</a></span></h4>
+
+<p>A <i class="i">list</i> of all the <i class="i">lambda list keywords</i> used 
+in the <i class="i">implementation</i>, including the additional ones
+used only by <i class="i">macro</i> definition <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-51"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-51"> &para;</a></span></h4>
+
+<p><a class="ref" href="defun.html">defun                                                               [Macro]</a>
+,
+<a class="ref" href="flet.html">flet, labels, macrolet                                   [Special Operator]</a>
+,
+<a class="ref" href="defmacro.html">defmacro                                                            [Macro]</a>
+,
+<b class="b">macrolet</b>,
+<a class="ref" href="The-Evaluation-Model.html">The Evaluation Model</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/lambda_002dparameters_002dlimit.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>lambda-parameters-limit (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="lambda-parameters-limit (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="lambda-parameters-limit (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="defconstant.html" rel="next" title="defconstant">
+<link href="lambda_002dlist_002dkeywords.html" rel="prev" title="lambda-list-keywords">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="lambda_002dparameters_002dlimit">
+<div class="nav-panel">
+<p>
+Next: <a href="defconstant.html" accesskey="n" rel="next">defconstant                                                         [Macro]</a>, Previous: <a href="lambda_002dlist_002dkeywords.html" accesskey="p" rel="prev">lambda-list-keywords                                    [Constant Variable]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="lambda_002dparameters_002dlimit-_005bConstant-Variable_005d"><span>5.3.14 lambda-parameters-limit                                 [Constant Variable]<a class="copiable-link" href="#lambda_002dparameters_002dlimit-_005bConstant-Variable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Constant-Value_003a_003a-2"><span>Constant Value::<a class="copiable-link" href="#Constant-Value_003a_003a-2"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>, but not smaller than <code class="t">50</code>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-67"><span>Description::<a class="copiable-link" href="#Description_003a_003a-67"> &para;</a></span></h4>
+
+<p>A positive <i class="i">integer</i> that is the upper exclusive bound on 
+the number of <i class="i">parameter</i> <i class="i">names</i> that can appear 
+in a single <i class="i">lambda list</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-52"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-52"> &para;</a></span></h4>
+
+<p><a class="ref" href="call_002darguments_002dlimit.html">call-arguments-limit                                    [Constant Variable]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-33"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-33"> &para;</a></span></h4>
+
+<p>Implementors are encouraged to make the <i class="i">value</i> of
+<b class="b">lambda-parameters-limit</b> as large as possible.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/last.html
@@ -0,0 +1,125 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>last (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="last (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="last (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="ldiff.html" rel="next" title="ldiff">
+<link href="butlast.html" rel="prev" title="butlast">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="last">
+<div class="nav-panel">
+<p>
+Next: <a href="ldiff.html" accesskey="n" rel="next">ldiff, tailp                                                     [Function]</a>, Previous: <a href="butlast.html" accesskey="p" rel="prev">butlast, nbutlast                                                [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="last-_005bFunction_005d"><span>14.2.29 last                                                             [Function]<a class="copiable-link" href="#last-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">last</code>  <i class="i">list <span class="r">&amp;optional</span> n</i> &rArr;  <i class="i">tail</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-298"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-298"> &para;</a></span></h4>
+
+<p><i class="i">list</i>&mdash;a <i class="i">list</i>,
+</p>
+<p>which might be a <i class="i">dotted list</i> but must not be a <i class="i">circular list</i>.
+</p>
+<p><i class="i">n</i>&mdash;a non-negative <i class="i">integer</i>.
+ The default is <code class="t">1</code>.
+</p>
+<p><i class="i">tail</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-399"><span>Description::<a class="copiable-link" href="#Description_003a_003a-399"> &para;</a></span></h4>
+
+<p><b class="b">last</b> returns the last <i class="i">n</i> <i class="i">conses</i> 
+ (not the last <i class="i">n</i> elements) of <i class="i">list</i>).
+If <i class="i">list</i> is <code class="t">()</code>, <b class="b">last</b> returns <code class="t">()</code>.
+</p>
+<p>If <i class="i">n</i> is zero,
+  the atom that terminates <i class="i">list</i> is returned.
+If <i class="i">n</i> is greater than or equal to the number of <i class="i">cons</i> cells in <i class="i">list</i>,
+  the result is <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-282"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-282"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (last nil) &rArr;  NIL
+ (last '(1 2 3)) &rArr;  (3)
+ (last '(1 2 . 3)) &rArr;  (2 . 3)
+ (setq x (list 'a 'b 'c 'd)) &rArr;  (A B C D)
+ (last x) &rArr;  (D)
+ (rplacd (last x) (list 'e 'f)) x &rArr;  (A B C D E F)
+ (last x) &rArr;  (F)
+
+ (last '(a b c))   &rArr;  (C)
+
+ (last '(a b c) 0) &rArr;  ()
+ (last '(a b c) 1) &rArr;  (C)
+ (last '(a b c) 2) &rArr;  (B C)
+ (last '(a b c) 3) &rArr;  (A B C)
+ (last '(a b c) 4) &rArr;  (A B C)
+
+ (last '(a . b) 0) &rArr;  B
+ (last '(a . b) 1) &rArr;  (A . B)
+ (last '(a . b) 2) &rArr;  (A . B)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-125"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-125"> &para;</a></span></h4>
+
+<p>The consequences are undefined if <i class="i">list</i> is a <i class="i">circular list</i>.
+</p>
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">n</i> is not a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-323"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-323"> &para;</a></span></h4>
+
+<p><a class="ref" href="butlast.html">butlast, nbutlast                                                [Function]</a>
+,
+<a class="ref" href="nth.html">nth                                                              [Accessor]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-215"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-215"> &para;</a></span></h4>
+
+<p>The following code could be used to define <b class="b">last</b>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun last (list &amp;optional (n 1))
+   (check-type n (integer 0))
+   (do ((l list (cdr l))
+        (r list)
+        (i 0 (+ i 1)))
+       ((atom l) r)
+     (if (&gt;= i n) (pop r))))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="ldiff.html">ldiff, tailp                                                     [Function]</a>, Previous: <a href="butlast.html">butlast, nbutlast                                                [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/lcm.html
@@ -0,0 +1,98 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>lcm (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="lcm (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="lcm (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="log.html" rel="next" title="log">
+<link href="incf.html" rel="prev" title="incf">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="lcm">
+<div class="nav-panel">
+<p>
+Next: <a href="log.html" accesskey="n" rel="next">log                                                              [Function]</a>, Previous: <a href="incf.html" accesskey="p" rel="prev">incf, decf                                                          [Macro]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="lcm-_005bFunction_005d"><span>12.2.34 lcm                                                              [Function]<a class="copiable-link" href="#lcm-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">lcm</code>  <i class="i"><span class="r">&amp;rest</span> integers</i> &rArr;  <i class="i">least-common-multiple</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-219"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-219"> &para;</a></span></h4>
+
+<p><i class="i">integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">least-common-multiple</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-299"><span>Description::<a class="copiable-link" href="#Description_003a_003a-299"> &para;</a></span></h4>
+
+<p><b class="b">lcm</b> returns the least common multiple of the <i class="i">integers</i>.
+</p>
+<p>If no <i class="i">integer</i> is supplied, the <i class="i">integer</i> <code class="t">1</code> is returned.
+</p>
+<p>If only one <i class="i">integer</i> is supplied, 
+the absolute value of that <i class="i">integer</i> is returned.
+</p>
+<p>For two arguments that are not both zero,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (lcm a b) &equiv; (/ (abs (* a b)) (gcd a b))
+</pre></div>
+
+<p>If one or both arguments are zero,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (lcm a 0) &equiv; (lcm 0 a) &equiv; 0
+</pre></div>
+
+<p>For three or more arguments,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (lcm a b c ... z) &equiv; (lcm (lcm a b) c ... z)
+</pre></div>
+
+<h4 class="subsubheading" id="Examples_003a_003a-203"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-203"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (lcm 10) &rArr;  10
+ (lcm 25 30) &rArr;  150
+ (lcm -24 18 10) &rArr;  360
+ (lcm 14 35) &rArr;  70
+ (lcm 0 5) &rArr;  0
+ (lcm 1 2 3 4 5 6) &rArr;  60
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-91"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-91"> &para;</a></span></h4>
+
+<p>Should signal <b class="b">type-error</b> if any argument is not an <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-252"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-252"> &para;</a></span></h4>
+
+<p><a class="ref" href="gcd.html">gcd                                                              [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/ldb.html
@@ -0,0 +1,128 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>ldb (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="ldb (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="ldb (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="ldb_002dtest.html" rel="next" title="ldb-test">
+<link href="dpb.html" rel="prev" title="dpb">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="ldb">
+<div class="nav-panel">
+<p>
+Next: <a href="ldb_002dtest.html" accesskey="n" rel="next">ldb-test                                                         [Function]</a>, Previous: <a href="dpb.html" accesskey="p" rel="prev">dpb                                                              [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="ldb-_005bAccessor_005d"><span>12.2.69 ldb                                                              [Accessor]<a class="copiable-link" href="#ldb-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">ldb</code>  <i class="i">bytespec integer</i> &rArr;  <i class="i">byte</i>
+</p>
+<p>(setf (<code class="code"> ldb</code> <i class="i">bytespec place</i>) new-byte)<br>
+</p>
+<h4 class="subsubheading" id="Pronunciation_003a_003a-6"><span>Pronunciation::<a class="copiable-link" href="#Pronunciation_003a_003a-6"> &para;</a></span></h4>
+
+<p>pronounced &rsquo;lid ib
+ or pronounced &rsquo;lid e b
+ or pronounced &rsquo;el &rsquo;d\=e &rsquo;b\=e 
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-251"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-251"> &para;</a></span></h4>
+
+<p><i class="i">bytespec</i>&mdash;a <i class="i">byte specifier</i>.
+</p>
+<p><i class="i">integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">byte</i>, <i class="i">new-byte</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-334"><span>Description::<a class="copiable-link" href="#Description_003a_003a-334"> &para;</a></span></h4>
+
+<p><b class="b">ldb</b> extracts and returns the <i class="i">byte</i> of <i class="i">integer</i>
+specified by <i class="i">bytespec</i>.
+</p>
+<p><b class="b">ldb</b> returns an <i class="i">integer</i> in which the bits with weights 
+2^<i class="i">(<i class="i">s</i>-1)</i> through 2^0 are the same as those in 
+<i class="i">integer</i> with weights 2^<i class="i">(<i class="i">p</i>+<i class="i">s</i>-1)</i> 
+through 2^<i class="i">p</i>, and all other bits zero; <i class="i">s</i> is
+<code class="t">(byte-size <i class="i">bytespec</i>)</code> 
+and <i class="i">p</i> is <code class="t">(byte-position <i class="i">bytespec</i>)</code>.
+</p>
+<p><b class="b">setf</b> may be used with <b class="b">ldb</b> to modify
+a byte within the <i class="i">integer</i> that is stored
+in a given <i class="i">place</i>.
+</p>
+<p>The order of evaluation, when an <b class="b">ldb</b> form is supplied
+to <b class="b">setf</b>, is exactly left-to-right.
+</p>
+<a class="index-entry-id" id="index-order-of-evaluation-9"></a>
+
+<a class="index-entry-id" id="index-evaluation-order-9"></a>
+
+<p>The effect is to perform a <b class="b">dpb</b> operation
+and then store the result back into the <i class="i">place</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-236"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-236"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (ldb (byte 2 1) 10) &rArr;  1
+ (setq a (list 8)) &rArr;  (8)
+ (setf (ldb (byte 2 1) (car a)) 1) &rArr;  1
+ a &rArr;  (10)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-276"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-276"> &para;</a></span></h4>
+
+<p><a class="ref" href="byte.html">byte, byte-size, byte-position                                   [Function]</a>
+,
+<b class="b">byte-position</b>,
+<b class="b">byte-size</b>,
+<a class="ref" href="dpb.html">dpb                                                              [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-179"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-179"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (logbitp <i class="i">j</i> (ldb (byte <i class="i">s</i> <i class="i">p</i>) <i class="i">n</i>))
+    &equiv; (and (&lt; <i class="i">j</i> <i class="i">s</i>) (logbitp (+ <i class="i">j</i> <i class="i">p</i>) <i class="i">n</i>))
+</pre></div>
+
+<p>In general,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (ldb (byte 0 <i class="i">x</i>) <i class="i">y</i>) &rArr;  0
+</pre></div>
+
+<p>for all valid values of <i class="i">x</i> and <i class="i">y</i>.
+</p>
+<p>Historically, the name &ldquo;ldb&rdquo; comes from a DEC PDP-10 assembly language
+instruction meaning &ldquo;load byte.&rdquo;
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="ldb_002dtest.html">ldb-test                                                         [Function]</a>, Previous: <a href="dpb.html">dpb                                                              [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/ldb_002dtest.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>ldb-test (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="ldb-test (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="ldb-test (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="mask_002dfield.html" rel="next" title="mask-field">
+<link href="ldb.html" rel="prev" title="ldb">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="ldb_002dtest">
+<div class="nav-panel">
+<p>
+Next: <a href="mask_002dfield.html" accesskey="n" rel="next">mask-field                                                       [Accessor]</a>, Previous: <a href="ldb.html" accesskey="p" rel="prev">ldb                                                              [Accessor]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="ldb_002dtest-_005bFunction_005d"><span>12.2.70 ldb-test                                                         [Function]<a class="copiable-link" href="#ldb_002dtest-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">ldb-test</code>  <i class="i">bytespec integer</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-252"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-252"> &para;</a></span></h4>
+
+<p><i class="i">bytespec</i>&mdash;a <i class="i">byte specifier</i>.
+</p>
+<p><i class="i">integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-335"><span>Description::<a class="copiable-link" href="#Description_003a_003a-335"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if any of the bits of the byte in <i class="i">integer</i>
+specified by <i class="i">bytespec</i> is non-zero; otherwise returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-237"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-237"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (ldb-test (byte 4 1) 16) &rArr;  <i class="i">true</i>
+ (ldb-test (byte 3 1) 16) &rArr;  <i class="i">false</i>
+ (ldb-test (byte 3 2) 16) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-277"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-277"> &para;</a></span></h4>
+
+<p><a class="ref" href="byte.html">byte, byte-size, byte-position                                   [Function]</a>
+, 
+<a class="ref" href="ldb.html">ldb                                                              [Accessor]</a>
+, 
+<a class="ref" href="zerop.html">zerop                                                            [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-180"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-180"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (ldb-test bytespec n) &equiv;
+ (not (zerop (ldb bytespec n))) &equiv;
+ (logtest (ldb bytespec -1) n)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/ldiff.html
@@ -0,0 +1,157 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>ldiff (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="ldiff (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="ldiff (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="nthcdr.html" rel="next" title="nthcdr">
+<link href="last.html" rel="prev" title="last">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="ldiff">
+<div class="nav-panel">
+<p>
+Next: <a href="nthcdr.html" accesskey="n" rel="next">nthcdr                                                           [Function]</a>, Previous: <a href="last.html" accesskey="p" rel="prev">last                                                             [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="ldiff_002c-tailp-_005bFunction_005d"><span>14.2.30 ldiff, tailp                                                     [Function]<a class="copiable-link" href="#ldiff_002c-tailp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">ldiff</code>  <i class="i">list object</i> &rArr;  <i class="i">result-list</i>
+</p>
+<p><code class="code">tailp</code>  <i class="i">object list</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-299"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-299"> &para;</a></span></h4>
+
+<p><i class="i">list</i>&mdash;a <i class="i">list</i>,
+</p>
+<p>which might be a <i class="i">dotted list</i>.
+</p>
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">result-list</i>&mdash;a <i class="i">list</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-400"><span>Description::<a class="copiable-link" href="#Description_003a_003a-400"> &para;</a></span></h4>
+
+<p>If <i class="i">object</i> is the <i class="i">same</i> as some <i class="i">tail</i> of <i class="i">list</i>,
+<b class="b">tailp</b> returns <i class="i">true</i>;
+otherwise, it returns <i class="i">false</i>.
+</p>
+<p>If <i class="i">object</i> is the <i class="i">same</i> as some <i class="i">tail</i> of <i class="i">list</i>,
+<b class="b">ldiff</b> returns a <i class="i">fresh</i> <i class="i">list</i> 
+of the <i class="i">elements</i> of <i class="i">list</i> 
+that precede <b class="b">object</b> in the <i class="i">list structure</i> of <i class="i">list</i>;
+otherwise, it returns a <i class="i">copy</i>_2 of <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-283"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-283"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((lists '#((a b c) (a b c . d))))
+   (dotimes (i (length lists)) ()
+     (let ((list (aref lists i)))
+       (format t &quot;~2&amp;list=~S ~21T(tailp object list)~
+                  ~44T(ldiff list object)~
+         (let ((objects (vector list (cddr list) (copy-list (cddr list))
+                                '(f g h) '() 'd 'x)))
+           (dotimes (j (length objects)) ()
+             (let ((object (aref objects j)))
+               (format t &quot;~&amp; object=~S ~21T~S ~44T~S&quot;
+                       object (tailp object list) (ldiff list object))))))))
+<code class="t"> |&gt; </code> 
+<code class="t"> |&gt; </code> list=(A B C)         (tailp object list)    (ldiff list object)
+<code class="t"> |&gt; </code>  object=(A B C)      T                      NIL
+<code class="t"> |&gt; </code>  object=(C)          T                      (A B)
+<code class="t"> |&gt; </code>  object=(C)          NIL                    (A B C)
+<code class="t"> |&gt; </code>  object=(F G H)      NIL                    (A B C)
+<code class="t"> |&gt; </code>  object=NIL          T                      (A B C)
+<code class="t"> |&gt; </code>  object=D            NIL                    (A B C)
+<code class="t"> |&gt; </code>  object=X            NIL                    (A B C)
+<code class="t"> |&gt; </code> 
+<code class="t"> |&gt; </code> list=(A B C . D)     (tailp object list)    (ldiff list object)
+<code class="t"> |&gt; </code>  object=(A B C . D)  T                      NIL
+<code class="t"> |&gt; </code>  object=(C . D)      T                      (A B)
+<code class="t"> |&gt; </code>  object=(C . D)      NIL                    (A B C . D)
+<code class="t"> |&gt; </code>  object=(F G H)      NIL                    (A B C . D)
+<code class="t"> |&gt; </code>  object=NIL          NIL                    (A B C . D)
+<code class="t"> |&gt; </code>  object=D            T                      (A B C)
+<code class="t"> |&gt; </code>  object=X            NIL                    (A B C . D)
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-42"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-42"> &para;</a></span></h4>
+
+<p>Neither <b class="b">ldiff</b> nor <b class="b">tailp</b> modifies either of its <i class="i">arguments</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-126"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-126"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">list</i> is not a <i class="i">proper list</i> or a <i class="i">dotted list</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-324"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-324"> &para;</a></span></h4>
+
+<p><a class="ref" href="set_002ddifference.html">set-difference, nset-difference                                  [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-216"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-216"> &para;</a></span></h4>
+
+<p>If the <i class="i">list</i> is a <i class="i">circular list</i>,
+<b class="b">tailp</b> will reliably <i class="i">yield</i> a <i class="i">value</i> 
+only if the given <i class="i">object</i> is in fact a <i class="i">tail</i> of <i class="i">list</i>.
+Otherwise, the consequences are unspecified:
+a given <i class="i">implementation</i> which detects the circularity must return <i class="i">false</i>,
+but since an <i class="i">implementation</i> is not obliged to detect such a <i class="i">situation</i>,
+<b class="b">tailp</b> might just loop indefinitely without returning in that case.
+</p>
+<p><b class="b">tailp</b> could be defined as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun tailp (object list)
+   (do ((list list (cdr list)))
+       ((atom list) (eql list object))
+      (if (eql object list)
+          (return t))))
+</pre></div>
+
+<p>and <b class="b">ldiff</b> could be defined by:
+</p>
+<div class="example">
+<pre class="example-preformatted">(defun ldiff (list object)
+  (do ((list list (cdr list))
+       (r '() (cons (car list) r)))
+      ((atom list)
+       (if (eql list object) (nreverse r) (nreconc r list)))
+    (when (eql object list)
+      (return (nreverse r)))))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="nthcdr.html">nthcdr                                                           [Function]</a>, Previous: <a href="last.html">last                                                             [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/length.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>length (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="length (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="length (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="reverse.html" rel="next" title="reverse">
+<link href="count.html" rel="prev" title="count">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="length">
+<div class="nav-panel">
+<p>
+Next: <a href="reverse.html" accesskey="n" rel="next">reverse, nreverse                                                [Function]</a>, Previous: <a href="count.html" accesskey="p" rel="prev">count, count-if, count-if-not                                    [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="length-_005bFunction_005d"><span>17.3.11 length                                                           [Function]<a class="copiable-link" href="#length-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">length</code>  <i class="i">sequence</i> &rArr;  <i class="i">n</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-363"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-363"> &para;</a></span></h4>
+
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">n</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-478"><span>Description::<a class="copiable-link" href="#Description_003a_003a-478"> &para;</a></span></h4>
+
+<p>Returns the number of <i class="i">elements</i> in <i class="i">sequence</i>.
+</p>
+<p>If <i class="i">sequence</i> is a <i class="i">vector</i> with a <i class="i">fill pointer</i>,
+the active length as specified by the <i class="i">fill pointer</i> is returned.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-345"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-345"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (length &quot;abc&quot;) &rArr;  3
+ (setq str (make-array '(3) :element-type 'character 
+                            :initial-contents &quot;abc&quot;
+                            :fill-pointer t)) &rArr;  &quot;abc&quot;
+ (length str) &rArr;  3
+ (setf (fill-pointer str) 2) &rArr;  2
+ (length str) &rArr;  2
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-159"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-159"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-389"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-389"> &para;</a></span></h4>
+
+<p><a class="ref" href="list_002dlength.html">list-length                                                      [Function]</a>
+,
+<b class="b">sequence</b>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/let.html
@@ -0,0 +1,177 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>let (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="let (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="let (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="progv.html" rel="next" title="progv">
+<link href="destructuring_002dbind.html" rel="prev" title="destructuring-bind">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="let">
+<div class="nav-panel">
+<p>
+Next: <a href="progv.html" accesskey="n" rel="next">progv                                                    [Special Operator]</a>, Previous: <a href="destructuring_002dbind.html" accesskey="p" rel="prev">destructuring-bind                                                  [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="let_002c-let_002a-_005bSpecial-Operator_005d"><span>5.3.18 let, let*                                                [Special Operator]<a class="copiable-link" href="#let_002c-let_002a-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">let</code>  <i class="i"><span class="r">(</span>{<i class="i">var</i> | <span class="r">(</span><i class="i">var</i> <span class="r">[</span><i class="i">init-form</i><span class="r">]</span><span class="r">)</span>}*<span class="r">)</span> {<i class="i">declaration</i>}* {<i class="i">form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><code class="code">let*</code>  <i class="i"><span class="r">(</span>{<i class="i">var</i> | <span class="r">(</span><i class="i">var</i> <span class="r">[</span><i class="i">init-form</i><span class="r">]</span><span class="r">)</span>}*<span class="r">)</span> {<i class="i">declaration</i>}* {<i class="i">form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-39"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-39"> &para;</a></span></h4>
+
+<p><i class="i">var</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">init-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-71"><span>Description::<a class="copiable-link" href="#Description_003a_003a-71"> &para;</a></span></h4>
+
+<p><b class="b">let</b> and <b class="b">let*</b>
+create new variable <i class="i">bindings</i> and
+execute a series of <i class="i">forms</i> that use these <i class="i">bindings</i>.
+<b class="b">let</b> performs the <i class="i">bindings</i> in parallel and 
+<b class="b">let*</b> does them sequentially.
+</p>
+<p>The form
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((<i class="i">var1</i> <i class="i">init-form-1</i>)
+       (<i class="i">var2</i> <i class="i">init-form-2</i>)
+       ...
+       (<i class="i">varm</i> <i class="i">init-form-m</i>))
+   <i class="i">declaration1</i>
+   <i class="i">declaration2</i>
+   ...
+   <i class="i">declarationp</i>
+   <i class="i">form1</i>
+   <i class="i">form2</i>
+   ...
+   <i class="i">formn</i>)
+</pre></div>
+
+<p>first evaluates the expressions <i class="i">init-form-1</i>, <i class="i">init-form-2</i>, and so on,
+</p>
+<p>in that order, saving the resulting values.
+Then all of the variables <i class="i">varj</i> are bound to the corresponding
+values; each <i class="i">binding</i> is lexical unless
+there is a <b class="b">special</b> declaration to the contrary.
+The expressions <i class="i">formk</i> are then evaluated
+in order; the values of all but the last are discarded
+(that is, the body of a <b class="b">let</b> 
+is an <i class="i">implicit progn</i>).
+</p>
+<p><b class="b">let*</b>
+is similar to <b class="b">let</b>, but the <i class="i">bindings</i> of variables
+are performed sequentially rather than in parallel.  
+The expression for the <i class="i">init-form</i> of a 
+<i class="i">var</i> can refer to <i class="i">vars</i>
+previously bound in the <b class="b">let*</b>.
+</p>
+<p>The form
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let* ((<i class="i">var1</i> <i class="i">init-form-1</i>)
+        (<i class="i">var2</i> <i class="i">init-form-2</i>)
+        ...
+        (<i class="i">varm</i> <i class="i">init-form-m</i>))
+   <i class="i">declaration1</i>
+   <i class="i">declaration2</i>
+   ...
+   <i class="i">declarationp</i>
+   <i class="i">form1</i>
+   <i class="i">form2</i>
+   ...
+   <i class="i">formn</i>)
+</pre></div>
+
+<p>first evaluates the expression <i class="i">init-form-1</i>, then binds the variable
+<i class="i">var1</i> to that value; then it evaluates <i class="i">init-form-2</i> and binds 
+</p>
+<p><i class="i">var2</i>, and so on.
+The expressions <i class="i">formj</i> are then evaluated
+in order; the values of all but the last are discarded
+(that is, the body of <b class="b">let*</b> is an implicit <b class="b">progn</b>).
+</p>
+<p>For both <b class="b">let</b> and <b class="b">let*</b>,
+if there is not an <i class="i">init-form</i> associated with a <i class="i">var</i>,
+<i class="i">var</i> is initialized to <b class="b">nil</b>.  
+</p>
+<p>The special form <b class="b">let</b> 
+has the property that the <i class="i">scope</i> 
+of the name binding does not include any
+initial value form.
+For <b class="b">let*</b>, a variable&rsquo;s <i class="i">scope</i> also includes the 
+     remaining initial value forms for subsequent variable bindings.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-45"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-45"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq a 'top) &rArr;  TOP
+ (defun dummy-function () a) &rArr;  DUMMY-FUNCTION
+ (let ((a 'inside) (b a))
+    (format nil &quot;~S ~S ~S&quot; a b (dummy-function))) &rArr;  &quot;INSIDE TOP TOP&quot; 
+ (let* ((a 'inside) (b a))
+    (format nil &quot;~S ~S ~S&quot; a b (dummy-function))) &rArr;  &quot;INSIDE INSIDE TOP&quot; 
+ (let ((a 'inside) (b a))
+    (declare (special a))
+    (format nil &quot;~S ~S ~S&quot; a b (dummy-function))) &rArr;  &quot;INSIDE TOP INSIDE&quot;
+</pre></div>
+
+<p>The code
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let (x)
+   (declare (integer x))
+   (setq x (gcd y z))
+   ...)
+</pre></div>
+
+<p>is incorrect; although <code class="t">x</code> is indeed set before it is used,
+and is set to a value of the declared type <i class="i">integer</i>, nevertheless
+<code class="t">x</code> initially takes on the value <b class="b">nil</b> in violation of the type
+declaration.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-56"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-56"> &para;</a></span></h4>
+
+<p><a class="ref" href="progv.html">progv                                                    [Special Operator]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="progv.html">progv                                                    [Special Operator]</a>, Previous: <a href="destructuring_002dbind.html">destructuring-bind                                                  [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/lisp_002dimplementation_002dtype.html
@@ -0,0 +1,85 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>lisp-implementation-type (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="lisp-implementation-type (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="lisp-implementation-type (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="short_002dsite_002dname.html" rel="next" title="short-site-name">
+<link href="_002f-_0028Variable_0029.html" rel="prev" title="/ (Variable)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="lisp_002dimplementation_002dtype">
+<div class="nav-panel">
+<p>
+Next: <a href="short_002dsite_002dname.html" accesskey="n" rel="next">short-site-name, long-site-name                                  [Function]</a>, Previous: <a href="_002f-_0028Variable_0029.html" accesskey="p" rel="prev">/, //, ///                                                       [Variable]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="lisp_002dimplementation_002dtype_002c"><span>25.2.24 lisp-implementation-type,<a class="copiable-link" href="#lisp_002dimplementation_002dtype_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="lisp_002dimplementation_002dversion"><span>lisp-implementation-version<a class="copiable-link" href="#lisp_002dimplementation_002dversion"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Function]</i>
+</p></div>
+<p><code class="code">lisp-implementation-type</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i">description</i>
+</p>
+<p><code class="code">lisp-implementation-version</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i">description</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-505"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-505"> &para;</a></span></h4>
+
+<p><i class="i">description</i>&mdash;a <i class="i">string</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-672"><span>Description::<a class="copiable-link" href="#Description_003a_003a-672"> &para;</a></span></h4>
+
+<p><b class="b">lisp-implementation-type</b> and <b class="b">lisp-implementation-version</b> 
+identify the current implementation of <span class="r">Common Lisp</span>.
+</p>
+<p><b class="b">lisp-implementation-type</b> returns a <i class="i">string</i> 
+that identifies the generic name of
+the particular <span class="r">Common Lisp</span> implementation.
+</p>
+<p><b class="b">lisp-implementation-version</b> 
+returns a <i class="i">string</i> that identifies the version of
+the particular <span class="r">Common Lisp</span> implementation.
+</p>
+<p>If no appropriate
+and relevant result can be produced, <b class="b">nil</b> is returned instead
+of a <i class="i">string</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-472"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-472"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (lisp-implementation-type)
+&rArr;  &quot;ACME Lisp&quot;
+<i class="i">OR</i>&rArr; &quot;Joe's Common Lisp&quot;
+ (lisp-implementation-version)
+&rArr;  &quot;1.3a&quot;
+&rArr;  &quot;V2&quot;
+<i class="i">OR</i>&rArr; &quot;Release 17.3, ECO #6&quot;
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/list-_0028Function_0029.html
@@ -0,0 +1,110 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>list (Function) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="list (Function) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="list (Function) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="list_002dlength.html" rel="next" title="list-length">
+<link href="copy_002dlist.html" rel="prev" title="copy-list">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="list-_0028Function_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="list_002dlength.html" accesskey="n" rel="next">list-length                                                      [Function]</a>, Previous: <a href="copy_002dlist.html" accesskey="p" rel="prev">copy-list                                                        [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="list_002c-list_002a-_005bFunction_005d"><span>14.2.15 list, list*                                                      [Function]<a class="copiable-link" href="#list_002c-list_002a-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">list</code>  <i class="i"><span class="r">&amp;rest</span> objects</i> &rArr;  <i class="i">list</i>
+</p>
+<p><code class="code">list*</code>  <i class="i"><span class="r">&amp;rest</span> objects^+</i> &rArr;  <i class="i">result</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-284"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-284"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">list</i>&mdash;a <i class="i">list</i>.
+</p>
+<p><i class="i">result</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-385"><span>Description::<a class="copiable-link" href="#Description_003a_003a-385"> &para;</a></span></h4>
+
+<p><b class="b">list</b> returns a <i class="i">list</i> containing the supplied <i class="i">objects</i>.  
+</p>
+<p><b class="b">list*</b> is like <b class="b">list</b> except that 
+the last <i class="i">argument</i> to <b class="b">list</b> becomes 
+the <i class="i">car</i> of the last <i class="i">cons</i> constructed, while
+the last <i class="i">argument</i> to <b class="b">list*</b> becomes 
+the <i class="i">cdr</i> of the last <i class="i">cons</i> constructed.
+Hence, any given call to <b class="b">list*</b> always produces one fewer <i class="i">conses</i>
+than a call to <b class="b">list</b> with the same number of arguments.
+</p>
+<p>If the last <i class="i">argument</i> to <b class="b">list*</b> is a <i class="i">list</i>, 
+the effect is to construct a new <i class="i">list</i> which is similar, but
+which has additional elements added to the front corresponding to
+the preceding <i class="i">arguments</i> of <b class="b">list*</b>.
+</p>
+<p>If <b class="b">list*</b> receives only one <i class="i">object</i>,
+that <i class="i">object</i> is returned, regardless of whether or not it is a <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-268"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-268"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (list 1) &rArr;  (1)
+ (list* 1) &rArr;  1
+ (setq a 1) &rArr;  1
+ (list a 2) &rArr;  (1 2)
+ '(a 2) &rArr;  (A 2)
+ (list 'a 2) &rArr;  (A 2)
+ (list* a 2) &rArr;  (1 . 2)
+ (list) &rArr;  NIL ;<i class="i">i.e.</i>, ()
+ (setq a '(1 2)) &rArr;  (1 2)
+ (eq a (list* a)) &rArr;  <i class="i">true</i>
+ (list 3 4 'a (car '(b . c)) (+ 6 -2)) &rArr;  (3 4 A B 4)
+ (list* 'a 'b 'c 'd) &equiv; (cons 'a (cons 'b (cons 'c 'd))) &rArr;  (A B C . D)
+ (list* 'a 'b 'c '(d e f)) &rArr;  (A B C D E F)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-311"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-311"> &para;</a></span></h4>
+
+<p><a class="ref" href="cons.html">cons                                                             [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-205"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-205"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (list* <i class="i">x</i>) &equiv; <i class="i">x</i>
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="list_002dlength.html">list-length                                                      [Function]</a>, Previous: <a href="copy_002dlist.html">copy-list                                                        [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/list-_0028System-Class_0029.html
@@ -0,0 +1,94 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>list (System Class) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="list (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="list (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="null-_0028System-Class_0029.html" rel="next" title="null (System Class)">
+<link href="Conses-Dictionary.html" rel="prev" title="Conses Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="list-_0028System-Class_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="null-_0028System-Class_0029.html" accesskey="n" rel="next">null                                                         [System Class]</a>, Previous: <a href="Conses-Dictionary.html" accesskey="p" rel="prev">Conses Dictionary</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="list-_005bSystem-Class_005d"><span>14.2.1 list                                                         [System Class]<a class="copiable-link" href="#list-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-50"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-50"> &para;</a></span></h4>
+
+<p><b class="b">list</b>,
+<b class="b">sequence</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-371"><span>Description::<a class="copiable-link" href="#Description_003a_003a-371"> &para;</a></span></h4>
+
+<p>A <i class="i">list</i>
+<a class="index-entry-id" id="index-list-1"></a>
+ is a chain of <i class="i">conses</i> in which the <i class="i">car</i> of each
+<i class="i">cons</i> is an <i class="i">element</i> of the <i class="i">list</i>, and the <i class="i">cdr</i> of
+each <i class="i">cons</i> is either the next link in the chain or a terminating
+<i class="i">atom</i>.
+</p>
+<p>A <i class="i">proper list</i>
+<a class="index-entry-id" id="index-proper-list-1"></a>
+ is a chain of <i class="i">conses</i> terminated by 
+the <i class="i">empty list</i>
+<a class="index-entry-id" id="index-empty-list"></a>
+, <code class="t">()</code>, which is  itself a <i class="i">proper list</i>.
+A <i class="i">dotted list</i>
+<a class="index-entry-id" id="index-dotted-list-1"></a>
+ is a <i class="i">list</i> which has a terminating <i class="i">atom</i> 
+that is not the <i class="i">empty list</i>.
+A <i class="i">circular list</i>
+<a class="index-entry-id" id="index-circular-list-1"></a>
+ is a chain of <i class="i">conses</i> that has no termination
+because some <i class="i">cons</i> in the chain is the <i class="i">cdr</i> of a later <i class="i">cons</i>.
+</p>
+<p><i class="i">Dotted lists</i> and <i class="i">circular lists</i> are also <i class="i">lists</i>, but usually
+the unqualified term &ldquo;list&rdquo; within this specification means <i class="i">proper list</i>.
+Nevertheless, the <i class="i">type</i> <b class="b">list</b> unambiguously includes <i class="i">dotted lists</i> 
+and <i class="i">circular lists</i>.
+</p>
+<p>For each <i class="i">element</i> of a <i class="i">list</i> there is a <i class="i">cons</i>.
+The <i class="i">empty list</i> has no <i class="i">elements</i> and is not a <i class="i">cons</i>.
+</p>
+<p>The <i class="i">types</i> <b class="b">cons</b> and <b class="b">null</b> form an <i class="i">exhaustive partition</i> 
+of the <i class="i">type</i> <b class="b">list</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-300"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-300"> &para;</a></span></h4>
+
+<p><a class="ref" href="Left_002dParenthesis.html">Left-Parenthesis</a>,
+<a class="ref" href="Printing-Lists-and-Conses.html">Printing Lists and Conses</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="null-_0028System-Class_0029.html">null                                                         [System Class]</a>, Previous: <a href="Conses-Dictionary.html">Conses Dictionary</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/list_002dall_002dpackages.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>list-all-packages (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="list-all-packages (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="list-all-packages (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="rename_002dpackage.html" rel="next" title="rename-package">
+<link href="import.html" rel="prev" title="import">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="list_002dall_002dpackages">
+<div class="nav-panel">
+<p>
+Next: <a href="rename_002dpackage.html" accesskey="n" rel="next">rename-package                                                   [Function]</a>, Previous: <a href="import.html" accesskey="p" rel="prev">import                                                           [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="list_002dall_002dpackages-_005bFunction_005d"><span>11.2.7 list-all-packages                                                [Function]<a class="copiable-link" href="#list_002dall_002dpackages-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">list-all-packages</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i">packages</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-179"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-179"> &para;</a></span></h4>
+
+<p><i class="i">packages</i>&mdash;a <i class="i">list</i> of <i class="i">package</i> <i class="i">objects</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-243"><span>Description::<a class="copiable-link" href="#Description_003a_003a-243"> &para;</a></span></h4>
+
+<p><b class="b">list-all-packages</b> returns a 
+</p>
+<p><i class="i">fresh</i>
+</p>
+<p><i class="i">list</i> of 
+</p>
+<p>all <i class="i">registered packages</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-162"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-162"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((before (list-all-packages)))
+    (make-package 'temp)
+    (set-difference (list-all-packages) before)) &rArr;  (#&lt;PACKAGE &quot;TEMP&quot;&gt;)
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-46"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-46"> &para;</a></span></h4>
+
+<p><b class="b">defpackage</b>,
+<b class="b">delete-package</b>,
+<b class="b">make-package</b>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/list_002dlength.html
@@ -0,0 +1,109 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>list-length (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="list-length (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="list-length (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="listp.html" rel="next" title="listp">
+<link href="list-_0028Function_0029.html" rel="prev" title="list (Function)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="list_002dlength">
+<div class="nav-panel">
+<p>
+Next: <a href="listp.html" accesskey="n" rel="next">listp                                                            [Function]</a>, Previous: <a href="list-_0028Function_0029.html" accesskey="p" rel="prev">list, list*                                                      [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="list_002dlength-_005bFunction_005d"><span>14.2.16 list-length                                                      [Function]<a class="copiable-link" href="#list_002dlength-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">list-length</code>  <i class="i">list</i> &rArr;  <i class="i">length</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-285"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-285"> &para;</a></span></h4>
+
+<p><i class="i">list</i>&mdash;a <i class="i">proper list</i> or a <i class="i">circular list</i>.
+</p>
+<p><i class="i">length</i>&mdash;a non-negative <i class="i">integer</i>, or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-386"><span>Description::<a class="copiable-link" href="#Description_003a_003a-386"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">length</i> of <i class="i">list</i> if <i class="i">list</i> is a <i class="i">proper list</i>.
+Returns <b class="b">nil</b> if <i class="i">list</i> is a <i class="i">circular list</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-269"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-269"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (list-length '(a b c d)) &rArr;  4
+ (list-length '(a (b c) d)) &rArr;  3
+ (list-length '()) &rArr;  0
+ (list-length nil) &rArr;  0
+ (defun circular-list (&amp;rest elements)
+   (let ((cycle (copy-list elements))) 
+     (nconc cycle cycle)))
+ (list-length (circular-list 'a 'b)) &rArr;  NIL
+ (list-length (circular-list 'a)) &rArr;  NIL
+ (list-length (circular-list)) &rArr;  0
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-121"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-121"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">list</i> is not a <i class="i">proper list</i> or a <i class="i">circular list</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-312"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-312"> &para;</a></span></h4>
+
+<p><a class="ref" href="length.html">length                                                           [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-206"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-206"> &para;</a></span></h4>
+
+<p><b class="b">list-length</b> could be implemented as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun list-length (x)  
+   (do ((n 0 (+ n 2))           ;Counter.
+        (fast x (cddr fast))    ;Fast pointer: leaps by 2.
+        (slow x (cdr slow)))    ;Slow pointer: leaps by 1.
+       (nil)
+     ;; If fast pointer hits the end, return the count.
+     (when (endp fast) (return n))
+     (when (endp (cdr fast)) (return (+ n 1)))
+     ;; If fast pointer eventually equals slow pointer,
+     ;;  then we must be stuck in a circular list.
+     ;; (A deeper property is the converse: if we are
+     ;;  stuck in a circular list, then eventually the
+     ;;  fast pointer will equal the slow pointer.
+     ;;  That fact justifies this implementation.)
+     (when (and (eq fast slow) (&gt; n 0)) (return nil))))
+
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="listp.html">listp                                                            [Function]</a>, Previous: <a href="list-_0028Function_0029.html">list, list*                                                      [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/listen.html
@@ -0,0 +1,86 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>listen (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="listen (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="listen (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="clear_002dinput.html" rel="next" title="clear-input">
+<link href="with_002dopen_002dstream.html" rel="prev" title="with-open-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="listen">
+<div class="nav-panel">
+<p>
+Next: <a href="clear_002dinput.html" accesskey="n" rel="next">clear-input                                                      [Function]</a>, Previous: <a href="with_002dopen_002dstream.html" accesskey="p" rel="prev">with-open-stream                                                    [Macro]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="listen-_005bFunction_005d"><span>21.2.34 listen                                                           [Function]<a class="copiable-link" href="#listen-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">listen</code>  <i class="i"><span class="r">&amp;optional</span> input-stream</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-435"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-435"> &para;</a></span></h4>
+
+<p><i class="i">input-stream</i>&mdash;an <i class="i">input</i> <i class="i">stream designator</i>.
+ The default is <i class="i">standard input</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-565"><span>Description::<a class="copiable-link" href="#Description_003a_003a-565"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if 
+there is a character immediately available from <i class="i">input-stream</i>;
+otherwise, returns <i class="i">false</i>.
+On a non-interactive <i class="i">input-stream</i>,
+<b class="b">listen</b> returns <i class="i">true</i> except when at <i class="i">end of file</i>_1.
+If an <i class="i">end of file</i> is encountered, <b class="b">listen</b> returns <i class="i">false</i>.
+<b class="b">listen</b> is intended to be used 
+when <i class="i">input-stream</i> obtains characters
+from an interactive device such as a keyboard.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-411"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-411"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (progn (unread-char (read-char)) (list (listen) (read-char)))
+<code class="t"> |&gt; </code> <b class="b">|&gt;&gt;</b><code class="t">1</code><b class="b">&lt;&lt;|</b>
+&rArr;  (T #\1)
+ (progn (clear-input) (listen))
+&rArr;  NIL ;Unless you're a very fast typist!
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-93"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-93"> &para;</a></span></h4>
+
+<p><b class="b">*standard-input*</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-461"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-461"> &para;</a></span></h4>
+
+<p><a class="ref" href="interactive_002dstream_002dp.html">interactive-stream-p                                             [Function]</a>
+,
+<a class="ref" href="read_002dchar_002dno_002dhang.html">read-char-no-hang                                                [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/listp.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>listp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="listp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="listp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="make_002dlist.html" rel="next" title="make-list">
+<link href="list_002dlength.html" rel="prev" title="list-length">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="listp">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dlist.html" accesskey="n" rel="next">make-list                                                        [Function]</a>, Previous: <a href="list_002dlength.html" accesskey="p" rel="prev">list-length                                                      [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="listp-_005bFunction_005d"><span>14.2.17 listp                                                            [Function]<a class="copiable-link" href="#listp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">listp</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-286"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-286"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-387"><span>Description::<a class="copiable-link" href="#Description_003a_003a-387"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">list</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-270"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-270"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (listp nil) &rArr;  <i class="i">true</i>
+ (listp (cons 1 2)) &rArr;  <i class="i">true</i>
+ (listp (make-array 6)) &rArr;  <i class="i">false</i>
+ (listp t) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-313"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-313"> &para;</a></span></h4>
+
+<p><a class="ref" href="consp.html">consp                                                            [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-207"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-207"> &para;</a></span></h4>
+
+<p>If <i class="i">object</i> is a <i class="i">cons</i>,
+<b class="b">listp</b> does not check whether <i class="i">object</i> is a <i class="i">proper list</i>;
+it returns <i class="i">true</i> for any kind of <i class="i">list</i>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (listp <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'list) &equiv; (typep <i class="i">object</i> '(or cons null))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/load.html
@@ -0,0 +1,225 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>load (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="load (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="load (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="System-Construction-Dictionary.html" rel="up" title="System Construction Dictionary">
+<link href="with_002dcompilation_002dunit.html" rel="next" title="with-compilation-unit">
+<link href="compile_002dfile_002dpathname.html" rel="prev" title="compile-file-pathname">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="load">
+<div class="nav-panel">
+<p>
+Next: <a href="with_002dcompilation_002dunit.html" accesskey="n" rel="next">with-compilation-unit                                               [Macro]</a>, Previous: <a href="compile_002dfile_002dpathname.html" accesskey="p" rel="prev">compile-file-pathname                                            [Function]</a>, Up: <a href="System-Construction-Dictionary.html" accesskey="u" rel="up">System Construction Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="load-_005bFunction_005d"><span>24.2.3 load                                                             [Function]<a class="copiable-link" href="#load-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">load</code>  <i class="i">filespec <span class="r">&amp;key</span> verbose print
+					       if-does-not-exist external-format</i><br>
+   &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-484"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-484"> &para;</a></span></h4>
+
+<p><i class="i">filespec</i>&mdash;a <i class="i">stream</i>, or a <i class="i">pathname designator</i>.
+ The default is taken from <b class="b">*default-pathname-defaults*</b>.
+</p>
+<p><i class="i">verbose</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is the <i class="i">value</i> of <b class="b">*load-verbose*</b>.
+</p>
+<p><i class="i">print</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is the <i class="i">value</i> of <b class="b">*load-print*</b>.
+</p>
+<p><i class="i">if-does-not-exist</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is <i class="i">true</i>.
+</p>
+<p><i class="i">external-format</i>&mdash;an <i class="i">external file format designator</i>.
+  The default is <code class="t">:default</code>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-640"><span>Description::<a class="copiable-link" href="#Description_003a_003a-640"> &para;</a></span></h4>
+
+<p><b class="b">load</b> <i class="i">loads</i> the <i class="i">file</i> named by <i class="i">filespec</i>
+into the <span class="r">Lisp</span> environment.
+</p>
+<p>The manner in which a <i class="i">source file</i>
+is distinguished from a <i class="i">compiled file</i> is <i class="i">implementation-dependent</i>.
+If the file specification is not complete and both a <i class="i">source file</i> and a 
+<i class="i">compiled file</i> exist which might match,
+then which of those files <b class="b">load</b> selects is <i class="i">implementation-dependent</i>.
+</p>
+<p>If <i class="i">filespec</i> is a <i class="i">stream</i>,
+<b class="b">load</b> determines what kind of <i class="i">stream</i> it is 
+and loads directly from the <i class="i">stream</i>.
+</p>
+<p>If <i class="i">filespec</i> is a <i class="i">logical pathname</i>,
+it is translated into a <i class="i">physical pathname</i>
+as if by calling <b class="b">translate-logical-pathname</b>.
+</p>
+<p><b class="b">load</b> sequentially executes each <i class="i">form</i> it encounters
+in the <i class="i">file</i> named by <i class="i">filespec</i>.
+If the <i class="i">file</i> is a <i class="i">source file</i>
+and the <i class="i">implementation</i> chooses to perform <i class="i">implicit compilation</i>,
+<b class="b">load</b> must recognize <i class="i">top level forms</i> 
+as described in <a class="ref" href="Processing-of-Top-Level-Forms.html">Processing of Top Level Forms</a>
+and arrange for each <i class="i">top level form</i> to be executed 
+before beginning <i class="i">implicit compilation</i> of the next.
+(Note, however, that processing of <b class="b">eval-when</b> <i class="i">forms</i>
+by <b class="b">load</b> is controlled by the <code class="t">:execute</code> situation.)
+</p>
+<p>If <i class="i">verbose</i> is <i class="i">true</i>,
+<b class="b">load</b> prints a message in the form of a comment
+(<i class="i">i.e.</i>, with a leading <i class="i">semicolon</i>)
+to <i class="i">standard output</i> indicating what <i class="i">file</i> is being <i class="i">loaded</i>
+and other useful information.
+</p>
+<p>If <i class="i">verbose</i> is <i class="i">false</i>, 
+<b class="b">load</b> does not print this information.
+</p>
+<p>If <i class="i">print</i> is <i class="i">true</i>,
+<b class="b">load</b> incrementally prints information to <i class="i">standard output</i>
+showing the progress of the <i class="i">loading</i> process.
+For a <i class="i">source file</i>,
+this information might mean printing the <i class="i">values</i> 
+<i class="i">yielded</i> by each <i class="i">form</i> in the <i class="i">file</i>
+as soon as those <i class="i">values</i> are returned.
+For a <i class="i">compiled file</i>, 
+what is printed might not reflect precisely the contents of the <i class="i">source file</i>,
+but some information is generally printed.
+If <i class="i">print</i> is <i class="i">false</i>,
+<b class="b">load</b> does not print this information.
+</p>
+<p>If the file named by <i class="i">filespec</i> is successfully loaded,
+<b class="b">load</b> returns <i class="i">true</i>.
+</p>
+<p>[Reviewer Note by Loosemore: What happens if the file cannot be loaded for some reason other
+than that it doesn&rsquo;t exist?] 
+[Editorial Note by KMP: i.e., can it return NIL? must it?]
+</p>
+<p>If the file does not exist, 
+the specific action taken depends on <i class="i">if-does-not-exist</i>:
+if it is <b class="b">nil</b>, <b class="b">load</b> returns <b class="b">nil</b>;
+otherwise, <b class="b">load</b> signals an error.
+</p>
+<p>The <i class="i">external-format</i> specifies the <i class="i">external file format</i> 
+to be used when opening the <i class="i">file</i> (see the <i class="i">function</i> <b class="b">open</b>),
+except that when the <i class="i">file</i> named by <i class="i">filespec</i> is a <i class="i">compiled file</i>,
+the <i class="i">external-format</i> is ignored.
+<b class="b">compile-file</b> and <b class="b">load</b> cooperate 
+in an <i class="i">implementation-dependent</i> way to assure 
+the preservation of the <i class="i">similarity</i> of <i class="i">characters</i> 
+referred to in the <i class="i">source file</i> 
+at the time the <i class="i">source file</i> was processed by the <i class="i">file compiler</i> 
+under a given <i class="i">external file format</i>,
+regardless of the value of <i class="i">external-format</i> 
+at the time the <i class="i">compiled file</i> is <i class="i">loaded</i>.
+</p>
+<p><b class="b">load</b> binds <b class="b">*readtable*</b> and <b class="b">*package*</b>
+to the values they held before <i class="i">loading</i> the file.
+</p>
+<p><b class="b">*load-truename*</b> is <i class="i">bound</i> by <b class="b">load</b> to hold 
+the <i class="i">truename</i> of the <i class="i">pathname</i> of the file being <i class="i">loaded</i>.
+</p>
+<p><b class="b">*load-pathname*</b> is <i class="i">bound</i> by <b class="b">load</b> to hold 
+a <i class="i">pathname</i> that represents <i class="i">filespec</i> merged against the defaults.
+That is, <code class="t">(pathname (merge-pathnames <i class="i">filespec</i>))</code>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-458"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-458"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;Establish a data file...
+ (with-open-file (str &quot;data.in&quot; :direction :output :if-exists :error)
+   (print 1 str) (print '(setq a 888) str) t)
+&rArr;  T
+ (load &quot;data.in&quot;) &rArr;  <i class="i">true</i>
+ a &rArr;  888
+ (load (setq p (merge-pathnames &quot;data.in&quot;)) :verbose t)
+; Loading contents of file /fred/data.in
+; Finished loading /fred/data.in
+&rArr;  <i class="i">true</i>
+ (load p :print t) 
+; Loading contents of file /fred/data.in
+;  1
+;  888
+; Finished loading /fred/data.in
+&rArr;  <i class="i">true</i>
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> ;----[Begin file SETUP]----
+ (in-package &quot;MY-STUFF&quot;)
+ (defmacro compile-truename () `',*compile-file-truename*)
+ (defvar *my-compile-truename* (compile-truename) &quot;Just for debugging.&quot;)
+ (defvar *my-load-pathname* *load-pathname*)
+ (defun load-my-system ()
+   (dolist (module-name '(&quot;FOO&quot; &quot;BAR&quot; &quot;BAZ&quot;))
+     (load (merge-pathnames module-name *my-load-pathname*))))
+ ;----[End of file SETUP]----
+
+ (load &quot;SETUP&quot;)
+ (load-my-system)
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-114"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-114"> &para;</a></span></h4>
+
+<p>The implementation, and the host computer&rsquo;s file system.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-235"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-235"> &para;</a></span></h4>
+
+<p>If <code class="t">:if-does-not-exist</code> is supplied and is <i class="i">true</i>, or is not supplied,
+<b class="b">load</b> signals an error of <i class="i">type</i> <b class="b">file-error</b> if the file named by
+<i class="i">filespec</i> does not exist,
+</p>
+<p>or if the <i class="i">file system</i> cannot perform the requested operation.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> might be signaled if
+<code class="t">(wild-pathname-p <i class="i">filespec</i>)</code> returns <i class="i">true</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-520"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-520"> &para;</a></span></h4>
+
+<p><a class="ref" href="error.html">error                                                            [Function]</a>
+,
+<a class="ref" href="merge_002dpathnames.html">merge-pathnames                                                  [Function]</a>
+,
+<b class="b">*load-verbose*</b>,
+<b class="b">*default-pathname-defaults*</b>,
+<b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="with_002dcompilation_002dunit.html">with-compilation-unit                                               [Macro]</a>, Previous: <a href="compile_002dfile_002dpathname.html">compile-file-pathname                                            [Function]</a>, Up: <a href="System-Construction-Dictionary.html">System Construction Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/load_002dlogical_002dpathname_002dtranslations.html
@@ -0,0 +1,98 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>load-logical-pathname-translations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="load-logical-pathname-translations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="load-logical-pathname-translations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="logical_002dpathname_002dtranslations.html" rel="next" title="logical-pathname-translations">
+<link href="pathname_002dhost.html" rel="prev" title="pathname-host">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="load_002dlogical_002dpathname_002dtranslations">
+<div class="nav-panel">
+<p>
+Next: <a href="logical_002dpathname_002dtranslations.html" accesskey="n" rel="next">logical-pathname-translations                                    [Accessor]</a>, Previous: <a href="pathname_002dhost.html" accesskey="p" rel="prev">pathname-host, pathname-device, pathname-directory,</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="load_002dlogical_002dpathname_002dtranslations-_005bFunction_005d"><span>19.4.7 load-logical-pathname-translations                               [Function]<a class="copiable-link" href="#load_002dlogical_002dpathname_002dtranslations-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">load-logical-pathname-translations</code>  <i class="i">host</i> &rArr;  <i class="i">just-loaded</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-393"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-393"> &para;</a></span></h4>
+
+<p><i class="i">host</i>&mdash;a <i class="i">string</i>.
+</p>
+<p><i class="i">just-loaded</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-511"><span>Description::<a class="copiable-link" href="#Description_003a_003a-511"> &para;</a></span></h4>
+
+<p>Searches for and loads the definition of a <i class="i">logical host</i> named <i class="i">host</i>,
+if it is not already defined.
+The specific nature of the search is <i class="i">implementation-defined</i>.
+</p>
+<p>If the <i class="i">host</i> is already defined, 
+no attempt to find or load a definition is attempted,
+and <i class="i">false</i> is returned.
+If the <i class="i">host</i> is not already defined,
+but a definition is successfully found and loaded,
+<i class="i">true</i> is returned.
+Otherwise, an error is signaled.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-373"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-373"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (translate-logical-pathname &quot;hacks:weather;barometer.lisp.newest&quot;)
+<code class="t"> |&gt; </code> Error: The logical host HACKS is not defined.
+ (load-logical-pathname-translations &quot;HACKS&quot;)
+<code class="t"> |&gt; </code> ;; Loading SYS:SITE;HACKS.TRANSLATIONS
+<code class="t"> |&gt; </code> ;; Loading done.
+&rArr;  <i class="i">true</i>
+ (translate-logical-pathname &quot;hacks:weather;barometer.lisp.newest&quot;)
+&rArr;  #P&quot;HELIUM:[SHARED.HACKS.WEATHER]BAROMETER.LSP;0&quot;
+ (load-logical-pathname-translations &quot;HACKS&quot;)
+&rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-175"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-175"> &para;</a></span></h4>
+
+<p>If no definition is found, an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-415"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-415"> &para;</a></span></h4>
+
+<p><b class="b">logical-pathname</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-277"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-277"> &para;</a></span></h4>
+
+<p><i class="i">Logical pathname</i> definitions will be created not just by 
+<i class="i">implementors</i> but also by <i class="i">programmers</i>.  As such,
+it is important that the search strategy be documented.
+For example, an <i class="i">implementation</i> might define that the
+definition of a <i class="i">host</i> is to be found in a file called
+&ldquo;<i class="i">host</i>.translations&rdquo; in some specifically named directory.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/load_002dtime_002dvalue.html
@@ -0,0 +1,191 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>load-time-value (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="load-time-value (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="load-time-value (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="quote.html" rel="next" title="quote">
+<link href="eval_002dwhen.html" rel="prev" title="eval-when">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="load_002dtime_002dvalue">
+<div class="nav-panel">
+<p>
+Next: <a href="quote.html" accesskey="n" rel="next">quote                                                    [Special Operator]</a>, Previous: <a href="eval_002dwhen.html" accesskey="p" rel="prev">eval-when                                                [Special Operator]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="load_002dtime_002dvalue-_005bSpecial-Operator_005d"><span>3.8.6 load-time-value                                          [Special Operator]<a class="copiable-link" href="#load_002dtime_002dvalue-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">load-time-value</code>  <i class="i">form <span class="r">&amp;optional</span> read-only-p</i> &rArr;  <i class="i">object</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-4"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-4"> &para;</a></span></h4>
+
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>; evaluated as described below.
+</p>
+<p><i class="i">read-only-p</i>&mdash;a <i class="i">boolean</i>; not evaluated.
+</p>
+<p><i class="i">object</i>&mdash;the <i class="i">primary value</i> resulting from evaluating <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-5"><span>Description::<a class="copiable-link" href="#Description_003a_003a-5"> &para;</a></span></h4>
+
+<p><b class="b">load-time-value</b> provides a mechanism for delaying evaluation of <i class="i">form</i>
+until the expression is in the run-time environment; see <a class="ref" href="Compilation.html">Compilation</a>.
+</p>
+<p><i class="i">Read-only-p</i> designates whether the result can be considered a
+<i class="i">constant object</i>.
+If <b class="b">t</b>,
+   the result is a read-only quantity that can, 
+   if appropriate to the <i class="i">implementation</i>, 
+   be copied into read-only space and/or <i class="i">coalesced</i> with <i class="i">similar</i>
+   <i class="i">constant objects</i> from other <i class="i">programs</i>.
+If <b class="b">nil</b> (the default),
+   the result must be neither copied nor coalesced;
+   it must be considered to be potentially modifiable data.
+</p>
+<p>If a <b class="b">load-time-value</b> expression is processed by <b class="b">compile-file</b>,
+the compiler performs its normal semantic processing (such as macro expansion 
+and translation into machine code) on <i class="i">form</i>, but arranges for the
+execution of <i class="i">form</i> to occur at load time in a <i class="i">null lexical environment</i>, 
+with the result of this <i class="i">evaluation</i> then being treated as 
+a <i class="i">literal object</i>
+at run time.  It is guaranteed that the evaluation of <i class="i">form</i> 
+will take place only once when the <i class="i">file</i> is <i class="i">loaded</i>, but 
+the order of evaluation with respect to the evaluation of
+<i class="i">top level forms</i> in the file is <i class="i">implementation-dependent</i>.
+</p>
+<a class="index-entry-id" id="index-order-of-evaluation"></a>
+
+<a class="index-entry-id" id="index-evaluation-order"></a>
+
+<p>If a <b class="b">load-time-value</b> expression appears within a function compiled
+with <b class="b">compile</b>, the <i class="i">form</i> is evaluated at compile time in a
+<i class="i">null lexical environment</i>.  The result of this compile-time evaluation 
+is treated as
+a <i class="i">literal object</i>
+in the compiled code.  
+</p>
+<p>If a <b class="b">load-time-value</b> expression is processed by <b class="b">eval</b>,
+<i class="i">form</i> is evaluated in a <i class="i">null lexical environment</i>, 
+and one value is returned.  Implementations that implicitly compile
+(or partially compile) expressions processed by <b class="b">eval</b> 
+might evaluate <i class="i">form</i> only once, at the time this compilation is performed.  
+</p>
+<p>If the <i class="i">same</i> <i class="i">list</i> <code class="t">(load-time-value <i class="i">form</i>)</code> is
+evaluated or compiled more than once, it is <i class="i">implementation-dependent</i>
+whether <i class="i">form</i> is evaluated only once or is evaluated more than once.
+This can happen both when an expression being evaluated or compiled shares
+substructure, and when the <i class="i">same</i> <i class="i">form</i> is processed by <b class="b">eval</b> or 
+<b class="b">compile</b> multiple times.                               
+Since a <b class="b">load-time-value</b> expression can be
+  referenced in more than one place and can be evaluated multiple times
+  by <b class="b">eval</b>, it is 
+<i class="i">implementation-dependent</i> whether each execution returns
+  a fresh <i class="i">object</i> 
+or returns the same <i class="i">object</i> as some other execution.
+  Users must use caution when destructively modifying the resulting
+  <i class="i">object</i>.
+</p>
+<p>If two lists <code class="t">(load-time-value <i class="i">form</i>)</code> 
+that are the <i class="i">same</i> under <b class="b">equal</b> but are not <i class="i">identical</i>
+are evaluated or compiled,
+their values always come from distinct evaluations of <i class="i">form</i>.
+Their <i class="i">values</i> may not be coalesced
+unless <i class="i">read-only-p</i> is <b class="b">t</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-4"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-4"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;;; The function INCR1 always returns the same value, even in different images.
+;;; The function INCR2 always returns the same value in a given image, 
+;;; but the value it returns might vary from image to image.
+(defun incr1 (x) (+ x #.(random 17)))
+(defun incr2 (x) (+ x (load-time-value (random 17))))
+
+;;; The function FOO1-REF references the nth element of the first of 
+;;; the *FOO-ARRAYS* that is available at load time.  It is permissible for
+;;; that array to be modified (e.g., by SET-FOO1-REF); FOO1-REF will see the
+;;; updated values.
+(defvar *foo-arrays* (list (make-array 7) (make-array 8)))
+(defun foo1-ref (n) (aref (load-time-value (first *my-arrays*) nil) n))
+(defun set-foo1-ref (n val) 
+  (setf (aref (load-time-value (first *my-arrays*) nil) n) val))
+
+;;; The function BAR1-REF references the nth element of the first of 
+;;; the *BAR-ARRAYS* that is available at load time.  The programmer has
+;;; promised that the array will be treated as read-only, so the system 
+;;; can copy or coalesce the array.
+(defvar *bar-arrays* (list (make-array 7) (make-array 8)))
+(defun bar1-ref (n) (aref (load-time-value (first *my-arrays*) t) n))
+
+;;; This use of LOAD-TIME-VALUE permits the indicated vector to be coalesced
+;;; even though NIL was specified, because the object was already read-only
+;;; when it was written as a literal vector rather than created by a constructor.
+;;; User programs must treat the vector v as read-only.
+(defun baz-ref (n)
+  (let ((v (load-time-value #(A B C) nil)))
+    (values (svref v n) v)))
+
+;;; This use of LOAD-TIME-VALUE permits the indicated vector to be coalesced
+;;; even though NIL was specified in the outer situation because T was specified
+;;; in the inner situation.  User programs must treat the vector v as read-only.
+(defun baz-ref (n)
+  (let ((v (load-time-value (load-time-value (vector 1 2 3) t) nil)))
+    (values (svref v n) v)))
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-5"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-5"> &para;</a></span></h4>
+
+<p><a class="ref" href="compile_002dfile.html">compile-file                                                     [Function]</a>
+,
+<a class="ref" href="compile.html">compile                                                          [Function]</a>
+,
+<a class="ref" href="eval.html">eval                                                             [Function]</a>
+,
+<a class="ref" href="Minimal-Compilation.html">Minimal Compilation</a>,
+<a class="ref" href="Compilation.html">Compilation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-4"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-4"> &para;</a></span></h4>
+
+<p><b class="b">load-time-value</b> must appear outside of quoted structure in a
+&ldquo;for <i class="i">evaluation</i>&rdquo; position.  In situations which would appear to call
+for use of <b class="b">load-time-value</b> within a quoted structure, 
+the <i class="i">backquote</i> <i class="i">reader macro</i> is probably called for;
+see <a class="ref" href="Backquote.html">Backquote</a>.
+</p>
+<p>Specifying <b class="b">nil</b> for <i class="i">read-only-p</i> is not a way to force an object
+to become modifiable if it has already been made read-only.  It is only a way
+to say that, for an object that is modifiable, this operation is not intended
+to make that object read-only.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="quote.html">quote                                                    [Special Operator]</a>, Previous: <a href="eval_002dwhen.html">eval-when                                                [Special Operator]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/locally.html
@@ -0,0 +1,113 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>locally (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="locally (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="locally (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="the.html" rel="next" title="the">
+<link href="special.html" rel="prev" title="special">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="locally">
+<div class="nav-panel">
+<p>
+Next: <a href="the.html" accesskey="n" rel="next">the                                                      [Special Operator]</a>, Previous: <a href="special.html" accesskey="p" rel="prev">special                                                       [Declaration]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="locally-_005bSpecial-Operator_005d"><span>3.8.27 locally                                                  [Special Operator]<a class="copiable-link" href="#locally-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">locally</code>  <i class="i">{<i class="i">declaration</i>}* {<i class="i">form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-15"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-15"> &para;</a></span></h4>
+
+<p><i class="i">Declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> of the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-26"><span>Description::<a class="copiable-link" href="#Description_003a_003a-26"> &para;</a></span></h4>
+
+<p>Sequentially evaluates a body of <i class="i">forms</i>
+in a <i class="i">lexical environment</i> where the given <i class="i">declarations</i> have effect.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-22"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-22"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun sample-function (y)  ;this y is regarded as special
+   (declare (special y))                                
+   (let ((y t))              ;this y is regarded as lexical
+     (list y
+           (locally (declare (special y))
+             ;; this next y is regarded as special
+             y))))
+&rArr;  SAMPLE-FUNCTION
+ (sample-function nil) &rArr;  (T NIL) 
+ (setq x '(1 2 3) y '(4 . 5)) &rArr;  (4 . 5)
+
+;;; The following declarations are not notably useful in specific.
+;;; They just offer a sample of valid declaration syntax using LOCALLY.
+ (locally (declare (inline floor) (notinline car cdr))
+          (declare (optimize space))
+    (floor (car x) (cdr y))) &rArr;  0, 1
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted">;;; This example shows a definition of a function that has a particular set
+;;; of OPTIMIZE settings made locally to that definition.
+ (locally (declare (optimize (safety 3) (space 3) (speed 0)))
+   (defun frob (w x y &amp;optional (z (foo x y)))
+     (mumble x y z w)))
+&rArr;  FROB
+
+;;; This is like the previous example, except that the optimize settings
+;;; remain in effect for subsequent definitions in the same compilation unit.
+ (declaim (optimize (safety 3) (space 3) (speed 0)))
+ (defun frob (w x y &amp;optional (z (foo x y)))
+   (mumble x y z w))
+&rArr;  FROB
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-26"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-26"> &para;</a></span></h4>
+
+<p><b class="b">declare</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-15"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-15"> &para;</a></span></h4>
+
+<p>The <b class="b">special</b> declaration may be used with <b class="b">locally</b>
+to affect references to, rather than <i class="i">bindings</i> of, <i class="i">variables</i>.
+</p>
+<p>If a <b class="b">locally</b> <i class="i">form</i> is a <i class="i">top level form</i>, the body <i class="i">forms</i>
+are also processed as <i class="i">top level forms</i>.  See <a class="ref" href="File-Compilation.html">File Compilation</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="the.html">the                                                      [Special Operator]</a>, Previous: <a href="special.html">special                                                       [Declaration]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/log.html
@@ -0,0 +1,140 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>log (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="log (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="log (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="mod-_0028Function_0029.html" rel="next" title="mod (Function)">
+<link href="lcm.html" rel="prev" title="lcm">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="log">
+<div class="nav-panel">
+<p>
+Next: <a href="mod-_0028Function_0029.html" accesskey="n" rel="next">mod, rem                                                         [Function]</a>, Previous: <a href="lcm.html" accesskey="p" rel="prev">lcm                                                              [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="log-_005bFunction_005d"><span>12.2.35 log                                                              [Function]<a class="copiable-link" href="#log-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">log</code>  <i class="i">number <span class="r">&amp;optional</span> base</i> &rArr;  <i class="i">logarithm</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-220"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-220"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a non-zero <i class="i">number</i>.
+</p>
+<p><i class="i">base</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">logarithm</i>&mdash;a <i class="i">number</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-300"><span>Description::<a class="copiable-link" href="#Description_003a_003a-300"> &para;</a></span></h4>
+
+<p><b class="b">log</b> returns the logarithm of <i class="i">number</i> in base <i class="i">base</i>.
+If <i class="i">base</i> is not supplied its value is <i class="i">e</i>, 
+the base of the natural logarithms.
+</p>
+<p><b class="b">log</b> may return a <i class="i">complex</i> when given a 
+</p>
+<p><i class="i">real</i>
+</p>
+<p>negative <i class="i">number</i>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (log -1.0) &equiv; (complex 0.0 (float pi 0.0))
+</pre></div>
+
+<p>If <i class="i">base</i> is zero,
+<b class="b">log</b> returns zero.
+</p>
+<p>The result of <code class="t">(log 8 2)</code> may be either <code class="t">3</code> or <code class="t">3.0</code>, depending on the
+implementation. An implementation can use floating-point calculations
+even if an exact integer result is possible.
+</p>
+<p>The branch cut for the logarithm function of one argument (natural
+logarithm) lies along the negative real axis, continuous with quadrant II.
+The domain excludes the origin.
+</p>
+<p>The mathematical definition of a complex logarithm 
+is as follows, whether or not minus zero is supported by the
+implementation:
+</p>
+<div class="example">
+<pre class="example-preformatted">(log <i class="i">x</i>) &equiv; (complex (log (abs <i class="i">x</i>)) (phase <i class="i">x</i>))
+</pre></div>
+
+<p>Therefore the range of the one-argument logarithm function is that strip
+of the complex plane containing numbers with imaginary parts between
+</p>
+<p>-\pi (exclusive) and~\pi (inclusive) if minus zero is not supported,
+or -\pi (inclusive) and~\pi (inclusive) if minus zero is supported.
+</p>
+<p>The two-argument logarithm function is defined as 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (log <i class="i">base</i> <i class="i">number</i>)
+ &equiv; (/ (log <i class="i">number</i>) (log <i class="i">base</i>))
+</pre></div>
+
+<p>This defines the <i class="i">principal</i> <i class="i">values</i> precisely.  
+The range of the two-argument logarithm function is the entire complex plane.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-204"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-204"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (log 100 10)
+&rArr;  2.0
+&rArr;  2
+ (log 100.0 10) &rArr;  2.0
+ (log #c(0 1) #c(0 -1))
+&rArr;  #C(-1.0 0.0)
+<i class="i">OR</i>&rArr; #C(-1 0)
+ (log 8.0 2) &rArr;  3.0
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (log #c(-16 16) #c(2 2)) &rArr;  3 or approximately #c(3.0 0.0)
+                               or approximately 3.0 (unlikely)
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-55"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-55"> &para;</a></span></h4>
+
+<p>The implementation.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-253"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-253"> &para;</a></span></h4>
+
+<p><a class="ref" href="exp.html">exp, expt                                                        [Function]</a>
+,
+<b class="b">expt</b>,
+<a class="ref" href="Rule-of-Float-Substitutability.html">Rule of Float Substitutability</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="mod-_0028Function_0029.html">mod, rem                                                         [Function]</a>, Previous: <a href="lcm.html">lcm                                                              [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/logand.html
@@ -0,0 +1,193 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>logand (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="logand (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="logand (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="logbitp.html" rel="next" title="logbitp">
+<link href="boole_002d1.html" rel="prev" title="boole-1">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="logand">
+<div class="nav-panel">
+<p>
+Next: <a href="logbitp.html" accesskey="n" rel="next">logbitp                                                          [Function]</a>, Previous: <a href="boole_002d1.html" accesskey="p" rel="prev">boole-1,    boole-2,   boole-and,  boole-andc1, boole-andc2,</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="logand_002c-logandc1_002c-logandc2_002c-logeqv_002c-logior_002c"><span>12.2.62 logand,  logandc1, logandc2, logeqv,  logior,<a class="copiable-link" href="#logand_002c-logandc1_002c-logandc2_002c-logeqv_002c-logior_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="lognand_002c-lognor_002c-lognot_002c-logorc1_002c-logorc2_002c"><span>lognand, lognor,   lognot,   logorc1, logorc2,<a class="copiable-link" href="#lognand_002c-lognor_002c-lognot_002c-logorc1_002c-logorc2_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="logxor"><span>logxor<a class="copiable-link" href="#logxor"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Function]</i>
+</p></div>
+<p><code class="code">logand</code>  <i class="i"><span class="r">&amp;rest</span> integers</i> &rArr;  <i class="i">result-integer</i>
+</p>
+<p><code class="code">logandc</code>  <i class="i">1</i> &rArr;  <i class="i">integer-1 integer-2</i>
+ <span class="r">result-integer</span>
+<code class="code">logandc</code>  <i class="i">2</i> &rArr;  <i class="i">integer-1 integer-2</i>
+ <span class="r">result-integer</span>
+<code class="code">logeqv</code>  <i class="i"><span class="r">&amp;rest</span> integers</i> &rArr;  <i class="i">result-integer</i>
+</p>
+<p><code class="code">logior</code>  <i class="i"><span class="r">&amp;rest</span> integers</i> &rArr;  <i class="i">result-integer</i>
+</p>
+<p><code class="code">lognand</code>  <i class="i">integer-1 integer-2</i> &rArr;  <i class="i">result-integer</i>
+</p>
+<p><code class="code">lognor</code>  <i class="i">integer-1 integer-2</i> &rArr;  <i class="i">result-integer</i>
+</p>
+<p><code class="code">lognot</code>  <i class="i">integer</i> &rArr;  <i class="i">result-integer</i>
+</p>
+<p><code class="code">logorc</code>  <i class="i">1</i> &rArr;  <i class="i">integer-1 integer-2</i>
+ <span class="r">result-integer</span>
+<code class="code">logorc</code>  <i class="i">2</i> &rArr;  <i class="i">integer-1 integer-2</i>
+ <span class="r">result-integer</span>
+<code class="code">logxor</code>  <i class="i"><span class="r">&amp;rest</span> integers</i> &rArr;  <i class="i">result-integer</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-244"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-244"> &para;</a></span></h4>
+
+<p><i class="i">integers</i>&mdash;<i class="i">integers</i>.
+</p>
+<p><i class="i">integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">integer-1</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">integer-2</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">result-integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-327"><span>Description::<a class="copiable-link" href="#Description_003a_003a-327"> &para;</a></span></h4>
+
+<p>The <i class="i">functions</i>
+       <b class="b">logandc1</b>,
+       <b class="b">logandc2</b>,
+       <b class="b">logand</b>,
+       <b class="b">logeqv</b>,
+       <b class="b">logior</b>,
+       <b class="b">lognand</b>,
+       <b class="b">lognor</b>, 
+       <b class="b">lognot</b>,
+       <b class="b">logorc1</b>, 
+       <b class="b">logorc2</b>,
+   and <b class="b">logxor</b>
+perform bit-wise logical operations on their <i class="i">arguments</i>,
+that are treated as if they were binary.
+</p>
+<p>Figure 12&ndash;17 lists the meaning of each of the <i class="i">functions</i>.
+Where an &lsquo;identity&rsquo; is shown, it indicates the <i class="i">value</i> <i class="i">yielded</i>
+by the <i class="i">function</i> when no <i class="i">arguments</i> are supplied.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Function  Identity  Operation performed                         <!-- /@w -->
+  <b class="b">logandc1</b>  &mdash;       and complement of <i class="i">integer-1</i> with <i class="i">integer-2</i>  <!-- /@w -->
+  <b class="b">logandc2</b>  &mdash;       and <i class="i">integer-1</i> with complement of <i class="i">integer-2</i>  <!-- /@w -->
+  <b class="b">logand</b>    <code class="t">-1</code>        and                                         <!-- /@w -->
+  <b class="b">logeqv</b>    <code class="t">-1</code>        equivalence (exclusive nor)                 <!-- /@w -->
+  <b class="b">logior</b>    <code class="t">0</code>         inclusive or                                <!-- /@w -->
+  <b class="b">lognand</b>   &mdash;       complement of <i class="i">integer-1</i> and <i class="i">integer-2</i>       <!-- /@w -->
+  <b class="b">lognor</b>    &mdash;       complement of <i class="i">integer-1</i> or <i class="i">integer-2</i>        <!-- /@w -->
+  <b class="b">lognot</b>    &mdash;       complement                                  <!-- /@w -->
+  <b class="b">logorc1</b>   &mdash;       or complement of <i class="i">integer-1</i> with <i class="i">integer-2</i>   <!-- /@w -->
+  <b class="b">logorc2</b>   &mdash;       or <i class="i">integer-1</i> with complement of <i class="i">integer-2</i>   <!-- /@w -->
+  <b class="b">logxor</b>    <code class="t">0</code>         exclusive or                                <!-- /@w -->
+
+       Figure 12&ndash;17: Bit-wise Logical Operations on Integers     <!-- /@w -->
+
+</pre></div></div>
+
+<p>Negative <i class="i">integers</i> are treated as if they were in two&rsquo;s-complement notation.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-229"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-229"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (logior 1 2 4 8) &rArr;  15
+ (logxor 1 3 7 15) &rArr;  10
+ (logeqv) &rArr;  -1
+ (logand 16 31) &rArr;  16
+ (lognot 0) &rArr;  -1
+ (lognot 1) &rArr;  -2
+ (lognot -1) &rArr;  0
+ (lognot (1+ (lognot 1000))) &rArr;  999
+
+;;; In the following example, m is a mask.  For each bit in
+;;; the mask that is a 1, the corresponding bits in x and y are
+;;; exchanged.  For each bit in the mask that is a 0, the 
+;;; corresponding bits of x and y are left unchanged.
+ (flet ((show (m x y)
+          (format t &quot;~
+                  m x y)))
+   (let ((m #o007750)
+         (x #o452576)
+         (y #o317407))
+     (show m x y)
+     (let ((z (logand (logxor x y) m)))
+       (setq x (logxor z x))
+       (setq y (logxor z y))
+       (show m x y))))
+<code class="t"> |&gt; </code> m = #o007750
+<code class="t"> |&gt; </code> x = #o452576
+<code class="t"> |&gt; </code> y = #o317407
+<code class="t"> |&gt; </code> 
+<code class="t"> |&gt; </code> m = #o007750
+<code class="t"> |&gt; </code> x = #o457426
+<code class="t"> |&gt; </code> y = #o312557
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-102"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-102"> &para;</a></span></h4>
+
+<p>Should signal <b class="b">type-error</b> if any argument is not an <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-272"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-272"> &para;</a></span></h4>
+
+<p><a class="ref" href="boole.html">boole                                                            [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-172"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-172"> &para;</a></span></h4>
+
+<p><code class="t">(logbitp <i class="i">k</i> -1)</code> returns <i class="i">true</i> for all values of <i class="i">k</i>.
+</p>
+<p>Because the following functions are not associative,
+they take exactly two arguments rather than any number
+of arguments.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (lognand <i class="i">n1</i> <i class="i">n2</i>) &equiv; (lognot (logand <i class="i">n1</i> <i class="i">n2</i>))
+ (lognor <i class="i">n1</i> <i class="i">n2</i>) &equiv; (lognot (logior <i class="i">n1</i> <i class="i">n2</i>))
+ (logandc1 <i class="i">n1</i> <i class="i">n2</i>) &equiv; (logand (lognot <i class="i">n1</i>) <i class="i">n2</i>)
+ (logandc2 <i class="i">n1</i> <i class="i">n2</i>) &equiv; (logand <i class="i">n1</i> (lognot <i class="i">n2</i>))
+ (logiorc1 <i class="i">n1</i> <i class="i">n2</i>) &equiv; (logior (lognot <i class="i">n1</i>) <i class="i">n2</i>)
+ (logiorc2 <i class="i">n1</i> <i class="i">n2</i>) &equiv; (logior <i class="i">n1</i> (lognot <i class="i">n2</i>))
+ (logbitp <i class="i">j</i> (lognot <i class="i">x</i>)) &equiv; (not (logbitp <i class="i">j</i> <i class="i">x</i>))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="logbitp.html">logbitp                                                          [Function]</a>, Previous: <a href="boole_002d1.html">boole-1,    boole-2,   boole-and,  boole-andc1, boole-andc2,</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/logbitp.html
@@ -0,0 +1,88 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>logbitp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="logbitp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="logbitp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="logcount.html" rel="next" title="logcount">
+<link href="logand.html" rel="prev" title="logand">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="logbitp">
+<div class="nav-panel">
+<p>
+Next: <a href="logcount.html" accesskey="n" rel="next">logcount                                                         [Function]</a>, Previous: <a href="logand.html" accesskey="p" rel="prev">logand,  logandc1, logandc2, logeqv,  logior,</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="logbitp-_005bFunction_005d"><span>12.2.63 logbitp                                                          [Function]<a class="copiable-link" href="#logbitp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">logbitp</code>  <i class="i">index integer</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-245"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-245"> &para;</a></span></h4>
+
+<p><i class="i">index</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<p><i class="i">integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-328"><span>Description::<a class="copiable-link" href="#Description_003a_003a-328"> &para;</a></span></h4>
+
+<p><b class="b">logbitp</b> is used to test the value of a particular bit 
+in <i class="i">integer</i>, that is treated as if it were binary.
+The value of <b class="b">logbitp</b> is <i class="i">true</i> if the bit in <i class="i">integer</i> 
+whose index is <i class="i">index</i> (that is, its weight is 2^<i class="i">index</i>) 
+is a one-bit; otherwise it is <i class="i">false</i>.
+</p>
+<p>Negative <i class="i">integers</i> are treated as if they were in 
+two&rsquo;s-complement notation.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-230"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-230"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (logbitp 1 1) &rArr;  <i class="i">false</i>
+ (logbitp 0 1) &rArr;  <i class="i">true</i>
+ (logbitp 3 10) &rArr;  <i class="i">true</i>
+ (logbitp 1000000 -1) &rArr;  <i class="i">true</i>
+ (logbitp 2 6) &rArr;  <i class="i">true</i>
+ (logbitp 0 6) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-103"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-103"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">index</i> is not a non-negative <i class="i">integer</i>.
+Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">integer</i> is not an <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-173"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-173"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (logbitp <i class="i">k</i> <i class="i">n</i>) &equiv; (ldb-test (byte 1 <i class="i">k</i>) <i class="i">n</i>)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/logcount.html
@@ -0,0 +1,92 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>logcount (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="logcount (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="logcount (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="logtest.html" rel="next" title="logtest">
+<link href="logbitp.html" rel="prev" title="logbitp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="logcount">
+<div class="nav-panel">
+<p>
+Next: <a href="logtest.html" accesskey="n" rel="next">logtest                                                          [Function]</a>, Previous: <a href="logbitp.html" accesskey="p" rel="prev">logbitp                                                          [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="logcount-_005bFunction_005d"><span>12.2.64 logcount                                                         [Function]<a class="copiable-link" href="#logcount-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">logcount</code>  <i class="i">integer</i> &rArr;  <i class="i">number-of-on-bits</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-246"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-246"> &para;</a></span></h4>
+
+<p><i class="i">integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">number-of-on-bits</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-329"><span>Description::<a class="copiable-link" href="#Description_003a_003a-329"> &para;</a></span></h4>
+
+<p>Computes and returns the number of bits 
+in the two&rsquo;s-complement binary representation of <i class="i">integer</i>
+that are &lsquo;on&rsquo; or &lsquo;set&rsquo;.
+If <i class="i">integer</i> is negative, the <code class="t">0</code> bits are counted;
+otherwise, the <code class="t">1</code> bits are counted.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-231"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-231"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (logcount 0) &rArr;  0
+ (logcount -1) &rArr;  0
+ (logcount 7) &rArr;  3
+ (logcount  13) &rArr;  3 ;Two's-complement binary: ...0001101
+ (logcount -13) &rArr;  2 ;Two's-complement binary: ...1110011
+ (logcount  30) &rArr;  4 ;Two's-complement binary: ...0011110
+ (logcount -30) &rArr;  4 ;Two's-complement binary: ...1100010
+ (logcount (expt 2 100)) &rArr;  1
+ (logcount (- (expt 2 100))) &rArr;  100
+ (logcount (- (1+ (expt 2 100)))) &rArr;  1
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-104"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-104"> &para;</a></span></h4>
+
+<p>Should signal <b class="b">type-error</b> if its argument is not an <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-174"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-174"> &para;</a></span></h4>
+
+<p>Even if the <i class="i">implementation</i> does not represent <i class="i">integers</i> internally
+in two&rsquo;s complement binary, <b class="b">logcount</b> behaves as if it did.
+</p>
+<p>The following identity always holds:
+</p>
+<div class="example">
+<pre class="example-preformatted">    (logcount <i class="i">x</i>)
+ &equiv; (logcount (- (+ <i class="i">x</i> 1)))
+ &equiv; (logcount (lognot <i class="i">x</i>))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/logical_002dpathname-_0028System-Class_0029.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>logical-pathname (System Class) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="logical-pathname (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="logical-pathname (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="pathname.html" rel="next" title="pathname">
+<link href="pathname-_0028System-Class_0029.html" rel="prev" title="pathname (System Class)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="logical_002dpathname-_0028System-Class_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="pathname.html" accesskey="n" rel="next">pathname                                                         [Function]</a>, Previous: <a href="pathname-_0028System-Class_0029.html" accesskey="p" rel="prev">pathname                                                     [System Class]</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="logical_002dpathname-_005bSystem-Class_005d"><span>19.4.2 logical-pathname                                             [System Class]<a class="copiable-link" href="#logical_002dpathname-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-60"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-60"> &para;</a></span></h4>
+
+<p><b class="b">logical-pathname</b>,
+<b class="b">pathname</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-506"><span>Description::<a class="copiable-link" href="#Description_003a_003a-506"> &para;</a></span></h4>
+
+<p>A <i class="i">pathname</i> that uses a <i class="i">namestring</i> syntax that is 
+<i class="i">implementation-independent</i>, 
+and that has component values that are <i class="i">implementation-independent</i>.
+<i class="i">Logical pathnames</i> do not refer directly to <i class="i">filenames</i>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-411"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-411"> &para;</a></span></h4>
+
+<p><a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+<a class="ref" href="Sharpsign-P.html">Sharpsign P</a>,
+<a class="ref" href="Printing-Pathnames.html">Printing Pathnames</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/logical_002dpathname.html
@@ -0,0 +1,87 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>logical-pathname (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="logical-pathname (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="logical-pathname (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="_002adefault_002dpathname_002ddefaults_002a.html" rel="next" title="*default-pathname-defaults*">
+<link href="logical_002dpathname_002dtranslations.html" rel="prev" title="logical-pathname-translations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="logical_002dpathname">
+<div class="nav-panel">
+<p>
+Next: <a href="_002adefault_002dpathname_002ddefaults_002a.html" accesskey="n" rel="next">*default-pathname-defaults*                                      [Variable]</a>, Previous: <a href="logical_002dpathname_002dtranslations.html" accesskey="p" rel="prev">logical-pathname-translations                                    [Accessor]</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="logical_002dpathname-_005bFunction_005d"><span>19.4.9 logical-pathname                                                 [Function]<a class="copiable-link" href="#logical_002dpathname-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">logical-pathname</code>  <i class="i">pathspec</i> &rArr;  <i class="i">logical-pathname</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-395"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-395"> &para;</a></span></h4>
+
+<p><i class="i">pathspec</i>&mdash;a <i class="i">logical pathname</i>, 
+		   a <i class="i">logical pathname</i> <i class="i">namestring</i>,
+		or a <i class="i">stream</i>.
+</p>
+<p><i class="i">logical-pathname</i>&mdash;a <i class="i">logical pathname</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-513"><span>Description::<a class="copiable-link" href="#Description_003a_003a-513"> &para;</a></span></h4>
+
+<p><b class="b">logical-pathname</b> converts <i class="i">pathspec</i> to a
+<i class="i">logical pathname</i> and returns the new <i class="i">logical pathname</i>.
+If <i class="i">pathspec</i> is a <i class="i">logical pathname</i> <i class="i">namestring</i>,
+it should contain a host component and its following <i class="i">colon</i>.
+If <i class="i">pathspec</i> is a <i class="i">stream</i>, it should be one
+for which <b class="b">pathname</b> returns a <i class="i">logical pathname</i>.  
+</p>
+<p>If <i class="i">pathspec</i> is a <i class="i">stream</i>, the <i class="i">stream</i> can be either open or closed.
+<b class="b">logical-pathname</b> returns the same <i class="i">logical pathname</i> after a
+file is closed as it did when the file was open.
+</p>
+<p>It is an error if <i class="i">pathspec</i> is a <i class="i">stream</i> that is 
+created with
+  <b class="b">make-two-way-stream</b>, 
+  <b class="b">make-echo-stream</b>,             
+  <b class="b">make-broadcast-stream</b>, 
+  <b class="b">make-concatenated-stream</b>,
+  <b class="b">make-string-input-stream</b>,
+or
+  <b class="b">make-string-output-stream</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-177"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-177"> &para;</a></span></h4>
+
+<p>Signals an error of <i class="i">type</i> <b class="b">type-error</b> if <i class="i">pathspec</i> isn&rsquo;t supplied correctly.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-417"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-417"> &para;</a></span></h4>
+
+<p><b class="b">logical-pathname</b>,
+<a class="ref" href="translate_002dlogical_002dpathname.html">translate-logical-pathname                                       [Function]</a>
+,
+<a class="ref" href="Logical-Pathnames.html">Logical Pathnames</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/logical_002dpathname_002dtranslations.html
@@ -0,0 +1,235 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>logical-pathname-translations (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="logical-pathname-translations (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="logical-pathname-translations (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="logical_002dpathname.html" rel="next" title="logical-pathname">
+<link href="load_002dlogical_002dpathname_002dtranslations.html" rel="prev" title="load-logical-pathname-translations">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="logical_002dpathname_002dtranslations">
+<div class="nav-panel">
+<p>
+Next: <a href="logical_002dpathname.html" accesskey="n" rel="next">logical-pathname                                                 [Function]</a>, Previous: <a href="load_002dlogical_002dpathname_002dtranslations.html" accesskey="p" rel="prev">load-logical-pathname-translations                               [Function]</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="logical_002dpathname_002dtranslations-_005bAccessor_005d"><span>19.4.8 logical-pathname-translations                                    [Accessor]<a class="copiable-link" href="#logical_002dpathname_002dtranslations-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">logical-pathname-translations</code>  <i class="i">host</i> &rArr;  <i class="i">translations</i>
+</p>
+<p>(setf (<code class="code">         logical-pathname-translations</code> <i class="i">host</i>) new-translations)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-394"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-394"> &para;</a></span></h4>
+
+<p><i class="i">host</i>&ndash;a <i class="i">logical host designator</i>.
+</p>
+<p><i class="i">translations</i>, <i class="i">new-translations</i>&mdash;a <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-512"><span>Description::<a class="copiable-link" href="#Description_003a_003a-512"> &para;</a></span></h4>
+
+<p>Returns the host&rsquo;s <i class="i">list</i> of translations.
+Each translation is a <i class="i">list</i> of at least two elements: 
+<i class="i">from-wildcard</i> and <i class="i">to-wildcard</i>.  Any
+    additional elements are <i class="i">implementation-defined</i>.  
+<i class="i">From-wildcard</i> is a
+    <i class="i">logical pathname</i> whose host is <i class="i">host</i>.  
+<i class="i">To-wildcard</i> is a <i class="i">pathname</i>.    
+</p>
+<p>[Reviewer Note by Laddaga: Can this be a logical pathname?]
+</p>
+<p><code class="t">(setf (logical-pathname-translations <i class="i">host</i>) <i class="i">translations</i>)</code> sets a 
+<i class="i">logical pathname</i> host&rsquo;s
+<i class="i">list</i> of <i class="i">translations</i>.  If <i class="i">host</i> 
+is a <i class="i">string</i> that has
+    not been previously used as 
+a <i class="i">logical pathname</i> host, a new 
+<i class="i">logical pathname</i> host is defined; 
+otherwise an existing host&rsquo;s translations are
+    replaced.  <i class="i">logical pathname</i> host names are compared with <b class="b">string-equal</b>.
+</p>
+<p>When setting the translations list, each <i class="i">from-wildcard</i> 
+can be a <i class="i">logical pathname</i> whose
+host is <i class="i">host</i> or a <i class="i">logical pathname</i> namestring
+    parseable by <code class="t">(parse-namestring <i class="i">string</i> <i class="i">host</i>)</code>, 
+where <i class="i">host</i>
+    represents the appropriate <i class="i">object</i> as defined 
+by <b class="b">parse-namestring</b>. Each
+    <i class="i">to-wildcard</i> can be anything coercible to a 
+<i class="i">pathname</i> by
+    <code class="t">(pathname <i class="i">to-wildcard</i>)</code>.  
+If <i class="i">to-wildcard</i> coerces to a <i class="i">logical pathname</i>,
+<b class="b">translate-logical-pathname</b> 
+will perform repeated translation steps when
+    it uses it.
+</p>
+<p><i class="i">host</i> is either the host component of a 
+<i class="i">logical pathname</i> or a
+    <i class="i">string</i> that has been defined 
+as a <i class="i">logical pathname</i> host name by <b class="b">setf</b> of
+<b class="b">logical-pathname-translations</b>. 
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-374"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-374"> &para;</a></span></h4>
+
+<p>[Reviewer Note by Laddaga: Shouldn&rsquo;t there be some <code class="t">*.*</code>&rsquo;s in the list
+		   of translations for <code class="t">PROG</code> below?]
+</p>
+<div class="example">
+<pre class="example-preformatted"> ;;;A very simple example of setting up a logical pathname host.  No
+ ;;;translations are necessary to get around file system restrictions, so
+ ;;;all that is necessary is to specify the root of the physical directory
+ ;;;tree that contains the logical file system.
+ ;;;The namestring syntax on the right-hand side is implementation-dependent.
+ (setf (logical-pathname-translations &quot;foo&quot;)
+       '((&quot;**;*.*.*&quot;              &quot;MY-LISPM:&gt;library&gt;foo&gt;**&gt;&quot;)))
+
+ ;;;Sample use of that logical pathname.  The return value
+ ;;;is implementation-dependent.          
+ (translate-logical-pathname &quot;foo:bar;baz;mum.quux.3&quot;)
+&rArr;  #P&quot;MY-LISPM:&gt;library&gt;foo&gt;bar&gt;baz&gt;mum.quux.3&quot;
+
+ ;;;A more complex example, dividing the files among two file servers
+ ;;;and several different directories.  This Unix doesn't support
+ ;;;:WILD-INFERIORS in the directory, so each directory level must
+ ;;;be translated individually.  No file name or type translations
+ ;;;are required except for .MAIL to .MBX.
+ ;;;The namestring syntax on the right-hand side is implementation-dependent.
+ (setf (logical-pathname-translations &quot;prog&quot;)
+       '((&quot;RELEASED;*.*.*&quot;        &quot;MY-UNIX:/sys/bin/my-prog/&quot;)
+         (&quot;RELEASED;*;*.*.*&quot;      &quot;MY-UNIX:/sys/bin/my-prog/*/&quot;)
+         (&quot;EXPERIMENTAL;*.*.*&quot;    &quot;MY-UNIX:/usr/Joe/development/prog/&quot;)
+         (&quot;EXPERIMENTAL;DOCUMENTATION;*.*.*&quot;
+                                  &quot;MY-VAX:SYS$DISK:[JOE.DOC]&quot;)
+         (&quot;EXPERIMENTAL;*;*.*.*&quot;  &quot;MY-UNIX:/usr/Joe/development/prog/*/&quot;)
+         (&quot;MAIL;**;*.MAIL&quot;        &quot;MY-VAX:SYS$DISK:[JOE.MAIL.PROG...]*.MBX&quot;)))
+
+ ;;;Sample use of that logical pathname.  The return value
+ ;;;is implementation-dependent.          
+ (translate-logical-pathname &quot;prog:mail;save;ideas.mail.3&quot;)
+&rArr;  #P&quot;MY-VAX:SYS$DISK:[JOE.MAIL.PROG.SAVE]IDEAS.MBX.3&quot;
+
+ ;;;Example translations for a program that uses three files main.lisp,
+ ;;;auxiliary.lisp, and documentation.lisp.  These translations might be
+ ;;;supplied by a software supplier as examples.
+
+ ;;;For Unix with long file names
+ (setf (logical-pathname-translations &quot;prog&quot;)
+       '((&quot;CODE;*.*.*&quot;             &quot;/lib/prog/&quot;)))
+
+ ;;;Sample use of that logical pathname.  The return value
+ ;;;is implementation-dependent.          
+ (translate-logical-pathname &quot;prog:code;documentation.lisp&quot;)
+&rArr;  #P&quot;/lib/prog/documentation.lisp&quot;
+
+ ;;;For Unix with 14-character file names, using .lisp as the type
+ (setf (logical-pathname-translations &quot;prog&quot;)
+       '((&quot;CODE;DOCUMENTATION.*.*&quot; &quot;/lib/prog/docum.*&quot;)
+         (&quot;CODE;*.*.*&quot;             &quot;/lib/prog/&quot;)))
+
+ ;;;Sample use of that logical pathname.  The return value
+ ;;;is implementation-dependent.          
+ (translate-logical-pathname &quot;prog:code;documentation.lisp&quot;)
+&rArr;  #P&quot;/lib/prog/docum.lisp&quot;
+
+ ;;;For Unix with 14-character file names, using .l as the type
+ ;;;The second translation shortens the compiled file type to .b
+ (setf (logical-pathname-translations &quot;prog&quot;)
+       `((&quot;**;*.LISP.*&quot;            ,(logical-pathname &quot;PROG:**;*.L.*&quot;))
+         (,(compile-file-pathname (logical-pathname &quot;PROG:**;*.LISP.*&quot;))
+                                   ,(logical-pathname &quot;PROG:**;*.B.*&quot;))
+         (&quot;CODE;DOCUMENTATION.*.*&quot; &quot;/lib/prog/documentatio.*&quot;)
+         (&quot;CODE;*.*.*&quot;             &quot;/lib/prog/&quot;)))
+
+ ;;;Sample use of that logical pathname.  The return value
+ ;;;is implementation-dependent.          
+ (translate-logical-pathname &quot;prog:code;documentation.lisp&quot;)
+&rArr;  #P&quot;/lib/prog/documentatio.l&quot;
+
+ ;;;For a Cray with 6 character names and no directories, types, or versions.
+ (setf (logical-pathname-translations &quot;prog&quot;)
+       (let ((l '((&quot;MAIN&quot; &quot;PGMN&quot;)
+                  (&quot;AUXILIARY&quot; &quot;PGAUX&quot;)
+                  (&quot;DOCUMENTATION&quot; &quot;PGDOC&quot;)))
+             (logpath (logical-pathname &quot;prog:code;&quot;))
+             (phypath (pathname &quot;XXX&quot;)))
+         (append
+           ;; Translations for source files
+           (mapcar #'(lambda (x)
+                       (let ((log (first x))
+                             (phy (second x)))
+                         (list (make-pathname :name log
+                                              :type &quot;LISP&quot;
+                                              :version :wild
+                                              :defaults logpath)
+                               (make-pathname :name phy
+                                              :defaults phypath))))
+                   l)
+           ;; Translations for compiled files
+           (mapcar #'(lambda (x)
+                       (let* ((log (first x))
+                              (phy (second x))
+                              (com (compile-file-pathname
+                                     (make-pathname :name log
+                                                    :type &quot;LISP&quot;
+                                                    :version :wild
+                                                    :defaults logpath))))
+                         (setq phy (concatenate 'string phy &quot;B&quot;))
+                         (list com
+                               (make-pathname :name phy
+                                              :defaults phypath))))
+                   l))))
+
+ ;;;Sample use of that logical pathname.  The return value
+ ;;;is implementation-dependent.          
+ (translate-logical-pathname &quot;prog:code;documentation.lisp&quot;)
+&rArr;  #P&quot;PGDOC&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-176"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-176"> &para;</a></span></h4>
+
+<p>If <i class="i">host</i> is incorrectly supplied, 
+an error of <i class="i">type</i> <b class="b">type-error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-416"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-416"> &para;</a></span></h4>
+
+<p><b class="b">logical-pathname</b>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-278"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-278"> &para;</a></span></h4>
+
+<p>Implementations can define additional <i class="i">functions</i>
+that operate on <i class="i">logical pathname</i> hosts,
+for example to specify additional translation rules or options.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="logical_002dpathname.html">logical-pathname                                                 [Function]</a>, Previous: <a href="load_002dlogical_002dpathname_002dtranslations.html">load-logical-pathname-translations                               [Function]</a>, Up: <a href="Filenames-Dictionary.html">Filenames Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/logtest.html
@@ -0,0 +1,86 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>logtest (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="logtest (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="logtest (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="byte.html" rel="next" title="byte">
+<link href="logcount.html" rel="prev" title="logcount">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="logtest">
+<div class="nav-panel">
+<p>
+Next: <a href="byte.html" accesskey="n" rel="next">byte, byte-size, byte-position                                   [Function]</a>, Previous: <a href="logcount.html" accesskey="p" rel="prev">logcount                                                         [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="logtest-_005bFunction_005d"><span>12.2.65 logtest                                                          [Function]<a class="copiable-link" href="#logtest-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">logtest</code>  <i class="i">integer-1 integer-2</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-247"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-247"> &para;</a></span></h4>
+
+<p><i class="i">integer-1</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">integer-2</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-330"><span>Description::<a class="copiable-link" href="#Description_003a_003a-330"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if any of the bits designated by the 1&rsquo;s 
+in <i class="i">integer-1</i> is 1 in <i class="i">integer-2</i>;
+otherwise it is <i class="i">false</i>.
+<i class="i">integer-1</i> and <i class="i">integer-2</i> are treated as if they were binary.
+</p>
+<p>Negative <i class="i">integer-1</i> and <i class="i">integer-2</i> are treated as if
+they were represented in two&rsquo;s-complement binary.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-232"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-232"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (logtest 1 7) &rArr;  <i class="i">true</i>
+ (logtest 1 2) &rArr;  <i class="i">false</i>
+ (logtest -2 -1) &rArr;  <i class="i">true</i>
+ (logtest 0 -1) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-105"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-105"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">integer-1</i> is not an <i class="i">integer</i>.
+Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">integer-2</i> is not an <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-175"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-175"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (logtest <i class="i">x</i> <i class="i">y</i>) &equiv; (not (zerop (logand <i class="i">x</i> <i class="i">y</i>)))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/loop.html
@@ -0,0 +1,236 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>loop (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="loop (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="loop (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Iteration-Dictionary.html" rel="up" title="Iteration Dictionary">
+<link href="loop_002dfinish.html" rel="next" title="loop-finish">
+<link href="dolist.html" rel="prev" title="dolist">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="loop">
+<div class="nav-panel">
+<p>
+Next: <a href="loop_002dfinish.html" accesskey="n" rel="next">loop-finish                                                   [Local Macro]</a>, Previous: <a href="dolist.html" accesskey="p" rel="prev">dolist                                                              [Macro]</a>, Up: <a href="Iteration-Dictionary.html" accesskey="u" rel="up">Iteration Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="loop-_005bMacro_005d"><span>6.2.4 loop                                                                [Macro]<a class="copiable-link" href="#loop-_005bMacro_005d"> &para;</a></span></h4>
+
+<p>The &ldquo;simple&rdquo; <b class="b">loop</b> <i class="i">form</i>:
+</p>
+<p><code class="code">loop</code>  <i class="i">{<i class="i">compound-form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p>The &ldquo;extended&rdquo; <b class="b">loop</b> <i class="i">form</i>:
+</p>
+<p><code class="code">loop</code>  <i class="i"><span class="r">[</span>!<i class="i">name-clause</i><span class="r">]</span>
+			{!<i class="i">variable-clause</i>}*
+		        {!<i class="i">main-clause</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><i class="i">name-clause</i>&nbsp;::=<code class="t">named</code>&nbsp;<i class="i">name</i><!-- /@w -->
+</p>
+<p><i class="i">variable-clause</i>&nbsp;::=!<i class="i">with-clause</i>&nbsp;|&nbsp;!<i class="i">initial-final</i>&nbsp;|&nbsp;!<i class="i">for-as-clause</i><!-- /@w -->
+</p>
+<p><i class="i">with-clause</i>&nbsp;::=<code class="t">with</code>&nbsp;<i class="i">var1</i>&nbsp;<span class="r">[</span><i class="i">type-spec</i><span class="r">]</span>&nbsp;<span class="r">[</span>=&nbsp;<i class="i">form1</i><span class="r">]</span>&nbsp;{<code class="t">and</code>&nbsp;<i class="i">var2</i>&nbsp;<span class="r">[</span><i class="i">type-spec</i><span class="r">]</span>&nbsp;<span class="r">[</span>=&nbsp;<i class="i">form2</i><span class="r">]</span>}*<!-- /@w -->
+</p>
+<p><i class="i">main-clause</i>&nbsp;::=!<i class="i">unconditional</i>&nbsp;|&nbsp;!<i class="i">accumulation</i>&nbsp;|&nbsp;!<i class="i">conditional</i>&nbsp;|&nbsp;!<i class="i">termination-test</i>&nbsp;|&nbsp;!<i class="i">initial-final</i><!-- /@w -->
+</p>
+<p><i class="i">initial-final</i>&nbsp;::=<code class="t">initially</code>&nbsp;{<i class="i">compound-form</i>}^+&nbsp;|&nbsp;<code class="t">finally</code>&nbsp;{<i class="i">compound-form</i>}^+<!-- /@w -->
+</p>
+<p><i class="i">unconditional</i>&nbsp;::={<code class="t">do</code>&nbsp;|&nbsp;<code class="t">doing</code>}&nbsp;{<i class="i">compound-form</i>}^+&nbsp;|&nbsp;<code class="t">return</code>&nbsp;{<i class="i">form</i>&nbsp;|&nbsp;<code class="t">it</code>}<!-- /@w -->
+</p>
+<p><i class="i">accumulation</i>&nbsp;::=!<i class="i">list-accumulation</i>&nbsp;|&nbsp;!<i class="i">numeric-accumulation</i><!-- /@w -->
+</p>
+<p><i class="i">list-accumulation</i>&nbsp;::={<code class="t">collect</code>&nbsp;|&nbsp;<code class="t">collecting</code>&nbsp;|&nbsp;<code class="t">append</code>&nbsp;|&nbsp;<code class="t">appending</code>&nbsp;|&nbsp;<code class="t">nconc</code>&nbsp;|&nbsp;<code class="t">nconcing</code>}&nbsp;{<i class="i">form</i>&nbsp;|&nbsp;<code class="t">it</code>}&nbsp;<!-- /@w -->
+&nbsp;<span class="r">[</span><code class="t">into</code>&nbsp;<i class="i">simple-var</i><span class="r">]</span><!-- /@w -->
+</p>
+<p><i class="i">numeric-accumulation</i>&nbsp;::={<code class="t">count</code>&nbsp;|&nbsp;<code class="t">counting</code>&nbsp;|&nbsp;<code class="t">sum</code>&nbsp;|&nbsp;<code class="t">summing</code>&nbsp;|&nbsp;}&nbsp;&nbsp;<code class="t">maximize</code>&nbsp;|&nbsp;<code class="t">maximizing</code>&nbsp;|&nbsp;<code class="t">minimize</code>&nbsp;|&nbsp;<code class="t">minimizing</code><!-- /@w -->&nbsp;{<i class="i">form</i>&nbsp;|&nbsp;<code class="t">it</code>}&nbsp;<!-- /@w -->
+&nbsp;<span class="r">[</span><code class="t">into</code>&nbsp;<i class="i">simple-var</i><span class="r">]</span>&nbsp;<span class="r">[</span><i class="i">type-spec</i><span class="r">]</span><!-- /@w -->
+</p>
+<p><i class="i">conditional</i>&nbsp;::={<code class="t">if</code>&nbsp;|&nbsp;<code class="t">when</code>&nbsp;|&nbsp;<code class="t">unless</code>}&nbsp;<i class="i">form</i>&nbsp;!<i class="i">selectable-clause</i>&nbsp;{<code class="t">and</code>&nbsp;!<i class="i">selectable-clause</i>}*&nbsp;<!-- /@w -->
+&nbsp;<span class="r">[</span><code class="t">else</code>&nbsp;!<i class="i">selectable-clause</i>&nbsp;{<code class="t">and</code>&nbsp;!<i class="i">selectable-clause</i>}*<span class="r">]</span>&nbsp;<!-- /@w -->
+&nbsp;<span class="r">[</span><code class="t">end</code><span class="r">]</span><!-- /@w -->
+</p>
+<p><i class="i">selectable-clause</i>&nbsp;::=!<i class="i">unconditional</i>&nbsp;|&nbsp;!<i class="i">accumulation</i>&nbsp;|&nbsp;!<i class="i">conditional</i><!-- /@w -->
+</p>
+<p><i class="i">termination-test</i>&nbsp;::=<code class="t">while</code>&nbsp;<i class="i">form</i>&nbsp;|&nbsp;<code class="t">until</code>&nbsp;<i class="i">form</i>&nbsp;|&nbsp;<code class="t">repeat</code>&nbsp;<i class="i">form</i>&nbsp;|&nbsp;<code class="t">always</code>&nbsp;<i class="i">form</i>&nbsp;|&nbsp;<code class="t">never</code>&nbsp;<i class="i">form</i>&nbsp;|&nbsp;<code class="t">thereis</code>&nbsp;<i class="i">form</i><!-- /@w -->
+</p>
+<p><i class="i">for-as-clause</i>&nbsp;::={<code class="t">for</code>&nbsp;|&nbsp;<code class="t">as</code>}&nbsp;!<i class="i">for-as-subclause</i>&nbsp;{<code class="t">and</code>&nbsp;!<i class="i">for-as-subclause</i>}*<!-- /@w -->
+</p>
+<p><i class="i">for-as-subclause</i>&nbsp;::=!<i class="i">for-as-arithmetic</i>&nbsp;|&nbsp;!<i class="i">for-as-in-list</i>&nbsp;|&nbsp;!<i class="i">for-as-on-list</i>&nbsp;|&nbsp;!<i class="i">for-as-equals-then</i>&nbsp;|<!-- /@w -->
+&nbsp;!<i class="i">for-as-across</i>&nbsp;|&nbsp;!<i class="i">for-as-hash</i>&nbsp;|&nbsp;!<i class="i">for-as-package</i><!-- /@w -->
+</p>
+<p><i class="i">for-as-arithmetic</i>&nbsp;::=<i class="i">var</i>&nbsp;<span class="r">[</span><i class="i">type-spec</i><span class="r">]</span>&nbsp;!<i class="i">for-as-arithmetic-subclause</i><!-- /@w -->
+</p>
+<p><i class="i">for-as-arithmetic-subclause</i>&nbsp;::=!<i class="i">arithmetic-up</i>&nbsp;|&nbsp;!<i class="i">arithmetic-downto</i>&nbsp;|&nbsp;!<i class="i">arithmetic-downfrom</i><!-- /@w -->
+</p>
+<p><i class="i">arithmetic-up</i>&nbsp;::=[[{<code class="t">from</code>&nbsp;|&nbsp;<code class="t">upfrom</code>}&nbsp;<i class="i">form1</i>&nbsp;|&nbsp;{<code class="t">to</code>&nbsp;|&nbsp;<code class="t">upto</code>&nbsp;|&nbsp;<code class="t">below</code>}&nbsp;<i class="i">form2</i>&nbsp;|&nbsp;<code class="t">by</code>&nbsp;<i class="i">form3</i>]]^+<!-- /@w -->
+</p>
+<p><i class="i">arithmetic-downto</i>&nbsp;::=[[{<code class="t">from</code>&nbsp;<i class="i">form1</i>}^1&nbsp;|&nbsp;{{<code class="t">downto</code>&nbsp;|&nbsp;<code class="t">above</code>}&nbsp;<i class="i">form2</i>}^1&nbsp;|&nbsp;<code class="t">by</code>&nbsp;<i class="i">form3</i>]]<!-- /@w -->
+</p>
+<p><i class="i">arithmetic-downfrom</i>&nbsp;::=[[{<code class="t">downfrom</code>&nbsp;<i class="i">form1</i>}^1&nbsp;|&nbsp;{<code class="t">to</code>&nbsp;|&nbsp;<code class="t">downto</code>&nbsp;|&nbsp;<code class="t">above</code>}&nbsp;<i class="i">form2</i>&nbsp;|&nbsp;<code class="t">by</code>&nbsp;<i class="i">form3</i>]]<!-- /@w -->
+</p>
+<p><i class="i">for-as-in-list</i>&nbsp;::=<i class="i">var</i>&nbsp;<span class="r">[</span><i class="i">type-spec</i><span class="r">]</span>&nbsp;<code class="t">in</code>&nbsp;<i class="i">form1</i>&nbsp;<span class="r">[</span><code class="t">by</code>&nbsp;<i class="i">step-fun</i><span class="r">]</span><!-- /@w -->
+</p>
+<p><i class="i">for-as-on-list</i>&nbsp;::=<i class="i">var</i>&nbsp;<span class="r">[</span><i class="i">type-spec</i><span class="r">]</span>&nbsp;<code class="t">on</code>&nbsp;<i class="i">form1</i>&nbsp;<span class="r">[</span><code class="t">by</code>&nbsp;<i class="i">step-fun</i><span class="r">]</span><!-- /@w -->
+</p>
+<p><i class="i">for-as-equals-then</i>&nbsp;::=<i class="i">var</i>&nbsp;<span class="r">[</span><i class="i">type-spec</i><span class="r">]</span>&nbsp;=&nbsp;<i class="i">form1</i>&nbsp;<span class="r">[</span><code class="t">then</code>&nbsp;<i class="i">form2</i><span class="r">]</span><!-- /@w -->
+</p>
+<p><i class="i">for-as-across</i>&nbsp;::=<i class="i">var</i>&nbsp;<span class="r">[</span><i class="i">type-spec</i><span class="r">]</span>&nbsp;<code class="t">across</code>&nbsp;<i class="i">vector</i><!-- /@w -->
+</p>
+<p><i class="i">for-as-hash</i>&nbsp;::=<i class="i">var</i>&nbsp;<span class="r">[</span><i class="i">type-spec</i><span class="r">]</span>&nbsp;<code class="t">being</code>&nbsp;{<code class="t">each</code>&nbsp;|&nbsp;<code class="t">the</code>}&nbsp;<!-- /@w -->
+&nbsp;{{<code class="t">hash-key</code>&nbsp;|&nbsp;<code class="t">hash-keys</code>}&nbsp;{<code class="t">in</code>&nbsp;|&nbsp;<code class="t">of</code>}&nbsp;<i class="i">hash-table</i>&nbsp;<!-- /@w -->
+&nbsp;<span class="r">[</span><code class="t">using</code>&nbsp;<span class="r">(</span><code class="t">hash-value</code>&nbsp;<i class="i">other-var</i><span class="r">)</span><span class="r">]</span>&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;{<code class="t">hash-value</code>&nbsp;|&nbsp;<code class="t">hash-values</code>}&nbsp;{<code class="t">in</code>&nbsp;|&nbsp;<code class="t">of</code>}&nbsp;<i class="i">hash-table</i>&nbsp;<!-- /@w -->
+&nbsp;<span class="r">[</span><code class="t">using</code>&nbsp;<span class="r">(</span><code class="t">hash-key</code>&nbsp;<i class="i">other-var</i><span class="r">)</span><span class="r">]</span>}<!-- /@w -->
+</p>
+<p><i class="i">for-as-package</i>&nbsp;::=<i class="i">var</i>&nbsp;<span class="r">[</span><i class="i">type-spec</i><span class="r">]</span>&nbsp;<code class="t">being</code>&nbsp;{<code class="t">each</code>&nbsp;|&nbsp;<code class="t">the</code>}&nbsp;<!-- /@w -->
+&nbsp;{<code class="t">symbol</code>&nbsp;|&nbsp;<code class="t">symbols</code>&nbsp;|<!-- /@w -->
+&nbsp;<code class="t">present-symbol</code>&nbsp;|&nbsp;<code class="t">present-symbols</code>&nbsp;|<!-- /@w -->
+&nbsp;<code class="t">external-symbol</code>&nbsp;|&nbsp;<code class="t">external-symbols</code>}&nbsp;<!-- /@w -->
+&nbsp;<span class="r">[</span>{<code class="t">in</code>&nbsp;|&nbsp;<code class="t">of</code>}&nbsp;<i class="i">package</i><span class="r">]</span><!-- /@w -->
+</p>
+<p><i class="i">type-spec</i>&nbsp;::=!<i class="i">simple-type-spec</i>&nbsp;|&nbsp;!<i class="i">destructured-type-spec</i><!-- /@w -->
+</p>
+<p><i class="i">simple-type-spec</i>&nbsp;::=<b class="b">fixnum</b>&nbsp;|&nbsp;<b class="b">float</b>&nbsp;|&nbsp;<b class="b">t</b>&nbsp;|&nbsp;<b class="b">nil</b><!-- /@w -->
+</p>
+<p><i class="i">destructured-type-spec</i>&nbsp;::=<code class="t">of-type</code>&nbsp;<i class="i">d-type-spec</i><!-- /@w -->
+</p>
+<p><i class="i">d-type-spec</i>&nbsp;::=<i class="i">type-specifier</i>&nbsp;|&nbsp;<code class="t">(<i class="i">d-type-spec</i>&nbsp;.&nbsp;<i class="i">d-type-spec</i>)</code><!-- /@w -->
+</p>
+<p><i class="i">var</i>&nbsp;::=!<i class="i">d-var-spec</i><!-- /@w -->
+</p>
+<p><i class="i">var1</i>&nbsp;::=!<i class="i">d-var-spec</i><!-- /@w -->
+</p>
+<p><i class="i">var2</i>&nbsp;::=!<i class="i">d-var-spec</i><!-- /@w -->
+</p>
+<p><i class="i">other-var</i>&nbsp;::=!<i class="i">d-var-spec</i><!-- /@w -->
+</p>
+<p><i class="i">d-var-spec</i>&nbsp;::=<i class="i">simple-var</i>&nbsp;|&nbsp;<b class="b">nil</b>&nbsp;|&nbsp;<span class="r">(</span>!<i class="i">d-var-spec</i>&nbsp;<code class="t">.</code>&nbsp;!<i class="i">d-var-spec</i><span class="r">)</span><!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-88"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-88"> &para;</a></span></h4>
+
+<p><i class="i">compound-form</i>&mdash;a <i class="i">compound form</i>.
+</p>
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">simple-var</i>&mdash;a <i class="i">symbol</i> (a <i class="i">variable</i> name).
+</p>
+<p><i class="i">form</i>, <i class="i">form1</i>, <i class="i">form2</i>, <i class="i">form3</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">step-fun</i>&mdash;a <i class="i">form</i> that evaluates to a <i class="i">function</i> of one <i class="i">argument</i>.
+</p>
+<p><i class="i">vector</i>&mdash;a <i class="i">form</i> that evaluates to a <i class="i">vector</i>.
+</p>
+<p><i class="i">hash-table</i>&mdash;a <i class="i">form</i> that evaluates to a <i class="i">hash table</i>.
+</p>
+<p><i class="i">package</i>&mdash;a <i class="i">form</i> that evaluates to a <i class="i">package designator</i>.
+</p>
+<p><i class="i">type-specifier</i>&mdash;a <i class="i">type specifier</i>.
+  This might be either an <i class="i">atomic type specifier</i> or a <i class="i">compound type specifier</i>,
+  which introduces some additional complications to proper parsing in the face of 
+  destructuring; for further information, see <a class="ref" href="Destructuring.html">Destructuring</a>.
+</p>
+<p><i class="i">result</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-126"><span>Description::<a class="copiable-link" href="#Description_003a_003a-126"> &para;</a></span></h4>
+
+<p>For details, see <a class="ref" href="The-LOOP-Facility.html">The LOOP Facility</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-96"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-96"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; An example of the simple form of LOOP.
+ (defun sqrt-advisor ()
+   (loop (format t &quot;~&amp;Number: &quot;)
+         (let ((n (parse-integer (read-line) :junk-allowed t)))
+           (when (not n) (return))
+           (format t &quot;~&amp;The square root of ~D is ~D.~%&quot; n (sqrt n)))))
+&rArr;  SQRT-ADVISOR
+ (sqrt-advisor)
+<code class="t"> |&gt; </code> Number: <b class="b">|&gt;&gt;</b><code class="t">5 <code class="t"><i class="i">[&lt;--</i>~]</code></code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> The square root of 5 is 2.236068.
+<code class="t"> |&gt; </code> Number: <b class="b">|&gt;&gt;</b><code class="t">4 <code class="t"><i class="i">[&lt;--</i>~]</code></code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> The square root of 4 is 2.
+<code class="t"> |&gt; </code> Number: <b class="b">|&gt;&gt;</b><code class="t">done <code class="t"><i class="i">[&lt;--</i>~]</code></code><b class="b">&lt;&lt;|</b>
+&rArr;  NIL
+
+;; An example of the extended form of LOOP.
+ (defun square-advisor ()
+   (loop as n = (progn (format t &quot;~&amp;Number: &quot;)
+                       (parse-integer (read-line) :junk-allowed t))
+         while n
+         do (format t &quot;~&amp;The square of ~D is ~D.~
+&rArr;  SQUARE-ADVISOR
+ (square-advisor)
+<code class="t"> |&gt; </code> Number: <b class="b">|&gt;&gt;</b><code class="t">4 <code class="t"><i class="i">[&lt;--</i>~]</code></code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> The square of 4 is 16.
+<code class="t"> |&gt; </code> Number: <b class="b">|&gt;&gt;</b><code class="t">23 <code class="t"><i class="i">[&lt;--</i>~]</code></code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> The square of 23 is 529.
+<code class="t"> |&gt; </code> Number: <b class="b">|&gt;&gt;</b><code class="t">done <code class="t"><i class="i">[&lt;--</i>~]</code></code><b class="b">&lt;&lt;|</b>
+&rArr;  NIL
+
+;; Another example of the extended form of LOOP.
+ (loop for n from 1 to 10
+       when (oddp n)
+         collect n)
+&rArr;  (1 3 5 7 9)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-108"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-108"> &para;</a></span></h4>
+
+<p><a class="ref" href="do.html">do, do*                                                             [Macro]</a>
+, 
+<a class="ref" href="dolist.html">dolist                                                              [Macro]</a>
+, 
+<a class="ref" href="dotimes.html">dotimes                                                             [Macro]</a>
+, 
+<a class="ref" href="return.html">return                                                              [Macro]</a>
+, 
+<a class="ref" href="go.html">go                                                       [Special Operator]</a>
+, 
+<a class="ref" href="throw.html">throw                                                    [Special Operator]</a>
+,
+<a class="ref" href="Destructuring.html">Destructuring</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-72"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-72"> &para;</a></span></h4>
+
+<p>Except that <b class="b">loop-finish</b> cannot be used within a simple <b class="b">loop</b> <i class="i">form</i>,
+a simple <b class="b">loop</b> <i class="i">form</i> is related to an extended <b class="b">loop</b> <i class="i">form</i> 
+in the following way:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (loop {<i class="i">compound-form</i>}*) &equiv; (loop do {<i class="i">compound-form</i>}*)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="loop_002dfinish.html">loop-finish                                                   [Local Macro]</a>, Previous: <a href="dolist.html">dolist                                                              [Macro]</a>, Up: <a href="Iteration-Dictionary.html">Iteration Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/loop_002dfinish.html
@@ -0,0 +1,137 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>loop-finish (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="loop-finish (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="loop-finish (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Iteration-Dictionary.html" rel="up" title="Iteration Dictionary">
+<link href="loop.html" rel="prev" title="loop">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="loop_002dfinish">
+<div class="nav-panel">
+<p>
+Previous: <a href="loop.html" accesskey="p" rel="prev">loop                                                                [Macro]</a>, Up: <a href="Iteration-Dictionary.html" accesskey="u" rel="up">Iteration Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="loop_002dfinish-_005bLocal-Macro_005d"><span>6.2.5 loop-finish                                                   [Local Macro]<a class="copiable-link" href="#loop_002dfinish-_005bLocal-Macro_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-10"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-10"> &para;</a></span></h4>
+
+<p><code class="code">loop-finish</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  #&lt;NoValue&gt;
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-127"><span>Description::<a class="copiable-link" href="#Description_003a_003a-127"> &para;</a></span></h4>
+
+<p>The <b class="b">loop-finish</b> <i class="i">macro</i> can be used lexically within 
+an extended
+<b class="b">loop</b> <i class="i">form</i> 
+to terminate that <i class="i">form</i> &ldquo;normally.&rdquo;
+That is, it transfers control to the loop epilogue
+of the lexically innermost extended <b class="b">loop</b> <i class="i">form</i>.
+This permits execution of any <b class="b">finally</b> clause (for effect)
+and
+the return of
+any accumulated result.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-97"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-97"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; Terminate the loop, but return the accumulated count.
+ (loop for i in '(1 2 3 stop-here 4 5 6)
+       when (symbolp i) do (loop-finish)
+       count i)
+&rArr;  3
+
+;; The preceding loop is equivalent to:
+ (loop for i in '(1 2 3 stop-here 4 5 6)
+       until (symbolp i)
+       count i)
+&rArr;  3
+
+;; While LOOP-FINISH can be used can be used in a variety of 
+;; situations it is really most needed in a situation where a need
+;; to exit is detected at other than the loop's `top level'
+;; (where UNTIL or WHEN often work just as well), or where some 
+;; computation must occur between the point where a need to exit is
+;; detected and the point where the exit actually occurs.  For example:
+ (defun tokenize-sentence (string)
+   (macrolet ((add-word (wvar svar)
+                `(when ,wvar
+                   (push (coerce (nreverse ,wvar) 'string) ,svar)
+                   (setq ,wvar nil))))
+     (loop with word = '() and sentence = '() and endpos = nil
+           for i below (length string)
+           do (let ((char (aref string i)))
+                (case char
+                  (#\Space (add-word word sentence))
+                  (#\. (setq endpos (1+ i)) (loop-finish))
+                  (otherwise (push char word))))
+           finally (add-word word sentence)
+                   (return (values (nreverse sentence) endpos)))))
+&rArr;  TOKENIZE-SENTENCE
+
+ (tokenize-sentence &quot;this is a sentence. this is another sentence.&quot;)
+&rArr;  (&quot;this&quot; &quot;is&quot; &quot;a&quot; &quot;sentence&quot;), 19
+
+ (tokenize-sentence &quot;this is a sentence&quot;)
+&rArr;  (&quot;this&quot; &quot;is&quot; &quot;a&quot; &quot;sentence&quot;), NIL
+
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-5"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-5"> &para;</a></span></h4>
+
+<p>Transfers control.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-21"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-21"> &para;</a></span></h4>
+
+<p>Whether or not <b class="b">loop-finish</b> is <i class="i">fbound</i> in the
+<i class="i">global environment</i> is <i class="i">implementation-dependent</i>;
+however, the restrictions on redefinition and <i class="i">shadowing</i> of
+<b class="b">loop-finish</b> are the same as for <i class="i">symbols</i> in the <code class="t">COMMON-LISP</code> <i class="i">package</i>
+which are <i class="i">fbound</i> in the <i class="i">global environment</i>.
+The consequences of attempting to use <b class="b">loop-finish</b> outside
+of <b class="b">loop</b> are undefined.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-109"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-109"> &para;</a></span></h4>
+
+<p><a class="ref" href="loop.html">loop                                                                [Macro]</a>
+,
+<a class="ref" href="The-LOOP-Facility.html">The LOOP Facility</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-73"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-73"> &para;</a></span></h4>
+
+
+
+
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="loop.html">loop                                                                [Macro]</a>, Up: <a href="Iteration-Dictionary.html">Iteration Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/machine_002dinstance.html
@@ -0,0 +1,78 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>machine-instance (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="machine-instance (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="machine-instance (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="machine_002dtype.html" rel="next" title="machine-type">
+<link href="short_002dsite_002dname.html" rel="prev" title="short-site-name">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="machine_002dinstance">
+<div class="nav-panel">
+<p>
+Next: <a href="machine_002dtype.html" accesskey="n" rel="next">machine-type                                                     [Function]</a>, Previous: <a href="short_002dsite_002dname.html" accesskey="p" rel="prev">short-site-name, long-site-name                                  [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="machine_002dinstance-_005bFunction_005d"><span>25.2.26 machine-instance                                                 [Function]<a class="copiable-link" href="#machine_002dinstance-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">machine-instance</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i">description</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-507"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-507"> &para;</a></span></h4>
+
+<p><i class="i">description</i>&mdash;a <i class="i">string</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-674"><span>Description::<a class="copiable-link" href="#Description_003a_003a-674"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">string</i> that identifies the particular instance of
+the computer hardware on which <span class="r">Common Lisp</span> is running, 
+or <b class="b">nil</b> if no such <i class="i">string</i> can be computed.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-474"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-474"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (machine-instance)
+&rArr;  &quot;ACME.COM&quot;
+<i class="i">OR</i>&rArr; &quot;S/N 123231&quot;
+<i class="i">OR</i>&rArr; &quot;18.26.0.179&quot;
+<i class="i">OR</i>&rArr; &quot;AA-00-04-00-A7-A4&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-137"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-137"> &para;</a></span></h4>
+
+<p>The machine instance,
+and the <i class="i">implementation</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-547"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-547"> &para;</a></span></h4>
+
+<p><a class="ref" href="machine_002dtype.html">machine-type                                                     [Function]</a>
+, 
+<a class="ref" href="machine_002dversion.html">machine-version                                                  [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/machine_002dtype.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>machine-type (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="machine-type (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="machine-type (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="machine_002dversion.html" rel="next" title="machine-version">
+<link href="machine_002dinstance.html" rel="prev" title="machine-instance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="machine_002dtype">
+<div class="nav-panel">
+<p>
+Next: <a href="machine_002dversion.html" accesskey="n" rel="next">machine-version                                                  [Function]</a>, Previous: <a href="machine_002dinstance.html" accesskey="p" rel="prev">machine-instance                                                 [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="machine_002dtype-_005bFunction_005d"><span>25.2.27 machine-type                                                     [Function]<a class="copiable-link" href="#machine_002dtype-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">machine-type</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i">description</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-508"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-508"> &para;</a></span></h4>
+
+<p><i class="i">description</i>&mdash;a <i class="i">string</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-675"><span>Description::<a class="copiable-link" href="#Description_003a_003a-675"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">string</i> that identifies the generic name of
+the computer hardware on which <span class="r">Common Lisp</span> is running.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-475"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-475"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (machine-type)
+&rArr;  &quot;DEC PDP-10&quot;
+<i class="i">OR</i>&rArr; &quot;Symbolics LM-2&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-138"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-138"> &para;</a></span></h4>
+
+<p>The machine type.
+The implementation.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-548"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-548"> &para;</a></span></h4>
+
+<p><a class="ref" href="machine_002dversion.html">machine-version                                                  [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/machine_002dversion.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>machine-version (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="machine-version (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="machine-version (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="software_002dtype.html" rel="next" title="software-type">
+<link href="machine_002dtype.html" rel="prev" title="machine-type">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="machine_002dversion">
+<div class="nav-panel">
+<p>
+Next: <a href="software_002dtype.html" accesskey="n" rel="next">software-type, software-version                                  [Function]</a>, Previous: <a href="machine_002dtype.html" accesskey="p" rel="prev">machine-type                                                     [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="machine_002dversion-_005bFunction_005d"><span>25.2.28 machine-version                                                  [Function]<a class="copiable-link" href="#machine_002dversion-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">machine-version</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i">description</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-509"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-509"> &para;</a></span></h4>
+
+<p><i class="i">description</i>&mdash;a <i class="i">string</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-676"><span>Description::<a class="copiable-link" href="#Description_003a_003a-676"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">string</i> that identifies the version of the computer hardware
+on which <span class="r">Common Lisp</span> is running, or <b class="b">nil</b> if no such value can be computed.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-476"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-476"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (machine-version) &rArr;  &quot;KL-10, microcode 9&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-139"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-139"> &para;</a></span></h4>
+
+<p>The machine version, 
+and the <i class="i">implementation</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-549"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-549"> &para;</a></span></h4>
+
+<p><a class="ref" href="machine_002dtype.html">machine-type                                                     [Function]</a>
+, 
+<a class="ref" href="machine_002dinstance.html">machine-instance                                                 [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/macro_002dfunction.html
@@ -0,0 +1,130 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>macro-function (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="macro-function (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="macro-function (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="macroexpand.html" rel="next" title="macroexpand">
+<link href="defmacro.html" rel="prev" title="defmacro">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="macro_002dfunction">
+<div class="nav-panel">
+<p>
+Next: <a href="macroexpand.html" accesskey="n" rel="next">macroexpand, macroexpand-1                                       [Function]</a>, Previous: <a href="defmacro.html" accesskey="p" rel="prev">defmacro                                                            [Macro]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="macro_002dfunction-_005bAccessor_005d"><span>3.8.11 macro-function                                                   [Accessor]<a class="copiable-link" href="#macro_002dfunction-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">macro-function</code>  <i class="i">symbol <span class="r">&amp;optional</span> environment</i> &rArr;  <i class="i">function</i>
+</p>
+<p>(setf (<code class="code">         macro-function</code> <i class="i">symbol <span class="r">&amp;optional</span> environment</i>) new-function)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-9"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-9"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">environment</i>&mdash;an <i class="i">environment</i> <i class="i">object</i>.
+</p>
+<p><i class="i">function</i>&mdash;a <i class="i">macro function</i> or <b class="b">nil</b>.
+</p>
+<p><i class="i">new-function</i>&mdash;a <i class="i">macro function</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-10"><span>Description::<a class="copiable-link" href="#Description_003a_003a-10"> &para;</a></span></h4>
+
+<p>Determines whether <i class="i">symbol</i> has a function definition 
+as a macro in the specified <i class="i">environment</i>.
+</p>
+<p>If so, the macro expansion function, a function of two arguments,
+is returned.  If <i class="i">symbol</i> has no function definition
+in the lexical environment <i class="i">environment</i>, or its definition
+is not a <i class="i">macro</i>, <b class="b">macro-function</b> returns <b class="b">nil</b>.
+</p>
+<p>It is possible for both <b class="b">macro-function</b> and 
+</p>
+<p><b class="b">special-operator-p</b>
+</p>
+<p>to return <i class="i">true</i> of <i class="i">symbol</i>.  The <i class="i">macro</i> definition must
+be available for use by programs that understand only the standard 
+<span class="r">Common Lisp</span> <i class="i">special forms</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-8"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-8"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (defmacro macfun (x) '(macro-function 'macfun)) &rArr;  MACFUN 
+ (not (macro-function 'macfun)) &rArr;  <i class="i">false</i> 
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (macrolet ((foo (&amp;environment env)
+               (if (macro-function 'bar env)
+                  ''yes
+                  ''no)))
+    (list (foo)
+          (macrolet ((bar () :beep))
+             (foo))))
+
+&rArr;  (NO YES)
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-1"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-1"> &para;</a></span></h4>
+<p><code class="t">(setf macro-function)</code>, <b class="b">defmacro</b>, and <b class="b">macrolet</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-2"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-2"> &para;</a></span></h4>
+
+<p>The consequences are undefined if <i class="i">environment</i> is <i class="i">non-nil</i>
+in a use of <b class="b">setf</b> of <b class="b">macro-function</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-10"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-10"> &para;</a></span></h4>
+
+<p><a class="ref" href="defmacro.html">defmacro                                                            [Macro]</a>
+, <a class="ref" href="Evaluation.html">Evaluation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-7"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-7"> &para;</a></span></h4>
+
+<p><b class="b">setf</b> can be used with <b class="b">macro-function</b> to install
+a <i class="i">macro</i> as a symbol&rsquo;s global function definition:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setf (macro-function symbol) fn)
+</pre></div>
+
+<p>The value installed must be a <i class="i">function</i> that accepts two arguments,
+the entire macro call and an <i class="i">environment</i>, 
+and computes the expansion for that call.
+Performing this operation causes <i class="i">symbol</i> to have only that
+macro definition as its global function definition; any previous
+definition, whether as a <i class="i">macro</i> or as a 
+<i class="i">function</i>, is lost.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="macroexpand.html">macroexpand, macroexpand-1                                       [Function]</a>, Previous: <a href="defmacro.html">defmacro                                                            [Macro]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/macroexpand.html
@@ -0,0 +1,205 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>macroexpand (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="macroexpand (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="macroexpand (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="define_002dsymbol_002dmacro.html" rel="next" title="define-symbol-macro">
+<link href="macro_002dfunction.html" rel="prev" title="macro-function">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="macroexpand">
+<div class="nav-panel">
+<p>
+Next: <a href="define_002dsymbol_002dmacro.html" accesskey="n" rel="next">define-symbol-macro                                                 [Macro]</a>, Previous: <a href="macro_002dfunction.html" accesskey="p" rel="prev">macro-function                                                   [Accessor]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="macroexpand_002c-macroexpand_002d1-_005bFunction_005d"><span>3.8.12 macroexpand, macroexpand-1                                       [Function]<a class="copiable-link" href="#macroexpand_002c-macroexpand_002d1-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">macroexpand</code>  <i class="i">form <span class="r">&amp;optional</span> env</i> &rArr;  <i class="i">expansion, expanded-p</i>
+</p>
+<p><code class="code">macroexpand-</code>  <i class="i">1</i> &rArr;  <i class="i">form <span class="r">&amp;optional</span> env</i>
+ <span class="r">expansion, expanded-p</span>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-10"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-10"> &para;</a></span></h4>
+
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">env</i>&mdash;an <i class="i">environment</i> <i class="i">object</i>.
+  The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">expansion</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">expanded-p</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-11"><span>Description::<a class="copiable-link" href="#Description_003a_003a-11"> &para;</a></span></h4>
+
+<p><b class="b">macroexpand</b> and <b class="b">macroexpand-1</b> expand <i class="i">macros</i>.
+</p>
+<p>If <i class="i">form</i> is a <i class="i">macro form</i>,
+then <b class="b">macroexpand-1</b> expands the <i class="i">macro form</i> call once.
+</p>
+<p><b class="b">macroexpand</b> 
+repeatedly expands <i class="i">form</i> until it is no longer a <i class="i">macro form</i>.
+In effect, <b class="b">macroexpand</b> calls <b class="b">macroexpand-1</b> repeatedly
+until the <i class="i">secondary value</i> it returns is <b class="b">nil</b>.
+</p>
+<p>If <i class="i">form</i> is a <i class="i">macro form</i>,
+then the <i class="i">expansion</i> is a <i class="i">macro expansion</i>
+ and <i class="i">expanded-p</i> is <i class="i">true</i>.
+Otherwise,
+ the <i class="i">expansion</i> is the given <i class="i">form</i>
+ and <i class="i">expanded-p</i> is <i class="i">false</i>.
+</p>
+<p>Macro expansion is carried out as follows.  
+Once <b class="b">macroexpand-1</b> has
+determined that the <i class="i">form</i> is a <i class="i">macro form</i>,
+it obtains an appropriate expansion <i class="i">function</i> for the
+<i class="i">macro</i> or <i class="i">symbol macro</i>.
+The value of 
+<b class="b">*macroexpand-hook*</b> is 
+</p>
+<p>coerced to a <i class="i">function</i> and
+</p>
+<p>then called as a <i class="i">function</i> of three arguments:
+      the expansion <i class="i">function</i>,
+      the <i class="i">form</i>,
+  and the <i class="i">env</i>.
+The <i class="i">value</i> returned from this call is taken to be the expansion
+of the <i class="i">form</i>.
+</p>
+<p>In addition to <i class="i">macro</i> definitions in the global environment,
+any local macro definitions established within <i class="i">env</i> by <b class="b">macrolet</b> 
+or <b class="b">symbol-macrolet</b> are considered.
+If only <i class="i">form</i> is supplied as an argument,
+then the environment is effectively null, and only global macro definitions
+as established by <b class="b">defmacro</b> are considered.
+<i class="i">Macro</i> definitions are shadowed by local <i class="i">function</i> definitions.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-9"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-9"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defmacro alpha (x y) `(beta ,x ,y)) &rArr;  ALPHA
+ (defmacro beta (x y) `(gamma ,x ,y)) &rArr;  BETA
+ (defmacro delta (x y) `(gamma ,x ,y)) &rArr;  EPSILON
+ (defmacro expand (form &amp;environment env)
+   (multiple-value-bind (expansion expanded-p)
+       (macroexpand form env)
+     `(values ',expansion ',expanded-p))) &rArr;  EXPAND
+ (defmacro expand-1 (form &amp;environment env)
+   (multiple-value-bind (expansion expanded-p)
+       (macroexpand-1 form env)
+     `(values ',expansion ',expanded-p))) &rArr;  EXPAND-1
+
+;; Simple examples involving just the global environment
+ (macroexpand-1 '(alpha a b)) &rArr;  (BETA A B), <i class="i">true</i>
+ (expand-1 (alpha a b)) &rArr;  (BETA A B), <i class="i">true</i>
+ (macroexpand '(alpha a b)) &rArr;  (GAMMA A B), <i class="i">true</i>
+ (expand (alpha a b)) &rArr;  (GAMMA A B), <i class="i">true</i>
+ (macroexpand-1 'not-a-macro) &rArr;  NOT-A-MACRO, <i class="i">false</i>
+ (expand-1 not-a-macro) &rArr;  NOT-A-MACRO, <i class="i">false</i>
+ (macroexpand '(not-a-macro a b)) &rArr;  (NOT-A-MACRO A B), <i class="i">false</i>
+ (expand (not-a-macro a b)) &rArr;  (NOT-A-MACRO A B), <i class="i">false</i>
+
+;; Examples involving lexical environments
+ (macrolet ((alpha (x y) `(delta ,x ,y)))
+   (macroexpand-1 '(alpha a b))) &rArr;  (BETA A B), <i class="i">true</i>
+ (macrolet ((alpha (x y) `(delta ,x ,y)))
+   (expand-1 (alpha a b))) &rArr;  (DELTA A B), <i class="i">true</i>
+ (macrolet ((alpha (x y) `(delta ,x ,y)))
+   (macroexpand '(alpha a b))) &rArr;  (GAMMA A B), <i class="i">true</i>
+ (macrolet ((alpha (x y) `(delta ,x ,y)))
+   (expand (alpha a b))) &rArr;  (GAMMA A B), <i class="i">true</i>
+ (macrolet ((beta (x y) `(epsilon ,x ,y)))
+   (expand (alpha a b))) &rArr;  (EPSILON A B), <i class="i">true</i>
+ (let ((x (list 1 2 3)))
+   (symbol-macrolet ((a (first x)))
+     (expand a))) &rArr;  (FIRST X), <i class="i">true</i>
+ (let ((x (list 1 2 3)))
+   (symbol-macrolet ((a (first x)))
+     (macroexpand 'a))) &rArr;  A, <i class="i">false</i>
+ (symbol-macrolet ((b (alpha x y)))
+   (expand-1 b)) &rArr;  (ALPHA X Y), <i class="i">true</i>
+ (symbol-macrolet ((b (alpha x y)))
+   (expand b)) &rArr;  (GAMMA X Y), <i class="i">true</i>
+ (symbol-macrolet ((b (alpha x y))
+                   (a b))
+   (expand-1 a)) &rArr;  B, <i class="i">true</i>
+ (symbol-macrolet ((b (alpha x y))
+                   (a b))
+   (expand a)) &rArr;  (GAMMA X Y), <i class="i">true</i>
+
+;; Examples of shadowing behavior
+ (flet ((beta (x y) (+ x y)))
+   (expand (alpha a b))) &rArr;  (BETA A B), <i class="i">true</i>
+ (macrolet ((alpha (x y) `(delta ,x ,y)))
+   (flet ((alpha (x y) (+ x y)))
+     (expand (alpha a b)))) &rArr;  (ALPHA A B), <i class="i">false</i>
+ (let ((x (list 1 2 3)))
+   (symbol-macrolet ((a (first x)))
+     (let ((a x))
+       (expand a)))) &rArr;  A, <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-2"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-2"> &para;</a></span></h4>
+
+<p><b class="b">defmacro</b>,
+<b class="b">setf</b> of <b class="b">macro-function</b>,
+<b class="b">macrolet</b>,
+<b class="b">symbol-macrolet</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-11"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-11"> &para;</a></span></h4>
+
+<p><b class="b">*macroexpand-hook*</b>,
+<a class="ref" href="defmacro.html">defmacro                                                            [Macro]</a>
+,
+<a class="ref" href="setf.html">setf, psetf                                                         [Macro]</a>
+ of 
+<a class="ref" href="macro_002dfunction.html">macro-function                                                   [Accessor]</a>
+,
+<b class="b">macrolet</b>,
+<a class="ref" href="symbol_002dmacrolet.html">symbol-macrolet                                          [Special Operator]</a>
+,
+<a class="ref" href="Evaluation.html">Evaluation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-8"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-8"> &para;</a></span></h4>
+
+<p>Neither <b class="b">macroexpand</b> nor <b class="b">macroexpand-1</b> 
+makes any explicit attempt to expand <i class="i">macro forms</i> that are
+either <i class="i">subforms</i> of the <i class="i">form</i> 
+    or <i class="i">subforms</i> of the <i class="i">expansion</i>.
+Such expansion might occur implicitly, however,
+due to the semantics or implementation of the <i class="i">macro function</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="define_002dsymbol_002dmacro.html">define-symbol-macro                                                 [Macro]</a>, Previous: <a href="macro_002dfunction.html">macro-function                                                   [Accessor]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002darray.html
@@ -0,0 +1,310 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-array (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-array (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-array (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="adjust_002darray.html" rel="next" title="adjust-array">
+<link href="simple_002dbit_002dvector.html" rel="prev" title="simple-bit-vector">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002darray">
+<div class="nav-panel">
+<p>
+Next: <a href="adjust_002darray.html" accesskey="n" rel="next">adjust-array                                                     [Function]</a>, Previous: <a href="simple_002dbit_002dvector.html" accesskey="p" rel="prev">simple-bit-vector                                                    [Type]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002darray-_005bFunction_005d"><span>15.2.7 make-array                                                       [Function]<a class="copiable-link" href="#make_002darray-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-array</code>  <i class="i">dimensions <span class="r">&amp;key</span> element-type
+                                                 initial-element
+                                                 initial-contents
+                                                 adjustable
+                                                 fill-pointer
+                                                 displaced-to
+                                                 displaced-index-offset</i><br>
+   &rArr;  <i class="i">new-array</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-319"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-319"> &para;</a></span></h4>
+
+<p><i class="i">dimensions</i>&mdash;a <i class="i">designator</i> for a <i class="i">list</i> of <i class="i">valid array dimensions</i>.
+</p>
+<p><i class="i">element-type</i>&mdash;a <i class="i">type specifier</i>. 
+ The default is <b class="b">t</b>.
+</p>
+<p><i class="i">initial-element</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">initial-contents</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">adjustable</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">fill-pointer</i>&mdash;a <i class="i">valid fill pointer</i> for the <i class="i">array</i> to be created,
+		       or <b class="b">t</b> or <b class="b">nil</b>.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">displaced-to</i>&mdash;an <i class="i">array</i> or <b class="b">nil</b>.
+ The default is <b class="b">nil</b>.
+ This option must not be supplied if either <i class="i">initial-element</i>
+ or <i class="i">initial-contents</i> is supplied.
+</p>
+<p><i class="i">displaced-index-offset</i>&mdash;a <i class="i">valid array row-major index</i> 
+ for <i class="i">displaced-to</i>. The default is <code class="t">0</code>.
+ This option must not be supplied unless a <i class="i">non-nil</i> <i class="i">displaced-to</i> is supplied.
+</p>
+<p><i class="i">new-array</i>&mdash;an <i class="i">array</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-426"><span>Description::<a class="copiable-link" href="#Description_003a_003a-426"> &para;</a></span></h4>
+
+<p>Creates and returns an <i class="i">array</i> constructed of the most <i class="i">specialized</i>
+<i class="i">type</i> that can accommodate elements of <i class="i">type</i> given by <i class="i">element-type</i>.
+If <i class="i">dimensions</i> is <b class="b">nil</b> then a zero-dimensional <i class="i">array</i> is created.
+</p>
+<p><i class="i">Dimensions</i> represents the dimensionality of the new <i class="i">array</i>.
+</p>
+<p><i class="i">element-type</i> indicates the <i class="i">type</i> of the elements intended to be stored
+in the <i class="i">new-array</i>.  The <i class="i">new-array</i> can actually store any <i class="i">objects</i>
+of the <i class="i">type</i> which results from <i class="i">upgrading</i> <i class="i">element-type</i>;
+see <a class="ref" href="Array-Upgrading.html">Array Upgrading</a>.
+</p>
+<p>If <i class="i">initial-element</i> is supplied, 
+it is used to initialize each <i class="i">element</i> of <i class="i">new-array</i>. 
+If <i class="i">initial-element</i> is supplied,
+it must be of the <i class="i">type</i> given by <i class="i">element-type</i>.
+<i class="i">initial-element</i> cannot be supplied if either the <code class="t">:initial-contents</code> option
+is supplied or <i class="i">displaced-to</i> is <i class="i">non-nil</i>.
+If <i class="i">initial-element</i> is not supplied,
+</p>
+<p>the consequences of later reading an uninitialized <i class="i">element</i> of <i class="i">new-array</i>
+are undefined
+</p>
+<p>unless either <i class="i">initial-contents</i> is supplied 
+or <i class="i">displaced-to</i> is <i class="i">non-nil</i>.
+</p>
+<p><i class="i">initial-contents</i> is used to initialize the contents of <i class="i">array</i>.
+For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (make-array '(4 2 3) :initial-contents
+             '(((a b c) (1 2 3))
+              ((d e f) (3 1 2))
+              ((g h i) (2 3 1))
+              ((j k l) (0 0 0))))
+</pre></div>
+
+<p><i class="i">initial-contents</i> is composed of a nested structure of <i class="i">sequences</i>. 
+The numbers of levels in the structure must equal the rank of <i class="i">array</i>.
+Each leaf of the nested structure must be of the <i class="i">type</i> given by <i class="i">element-type</i>. 
+If <i class="i">array</i> is zero-dimensional, then <i class="i">initial-contents</i> specifies the single
+<i class="i">element</i>.  Otherwise, <i class="i">initial-contents</i> must be a <i class="i">sequence</i>
+whose length is equal to the first dimension; each element must be a nested 
+structure for an <i class="i">array</i> whose dimensions are the remaining dimensions, 
+and so on.
+<i class="i">Initial-contents</i> cannot be supplied if either 
+<i class="i">initial-element</i> is supplied
+or <i class="i">displaced-to</i> is <i class="i">non-nil</i>.
+If <i class="i">initial-contents</i> is not supplied,
+</p>
+<p>the consequences of later reading an uninitialized <i class="i">element</i> of <i class="i">new-array</i>
+are undefined
+</p>
+<p>unless either <i class="i">initial-element</i> is supplied
+or <i class="i">displaced-to</i> is <i class="i">non-nil</i>.
+</p>
+<p>If <i class="i">adjustable</i> is <i class="i">non-nil</i>,
+the array is <i class="i">expressly adjustable</i> 
+	      (and so <i class="i">actually adjustable</i>);
+otherwise, the array is not <i class="i">expressly adjustable</i> 
+       (and it is <i class="i">implementation-dependent</i> whether 
+	    the array is <i class="i">actually adjustable</i>).
+</p>
+<p>If <i class="i">fill-pointer</i> is <i class="i">non-nil</i>,
+the <i class="i">array</i> must be one-dimensional;
+that is, the <i class="i">array</i> must be a <i class="i">vector</i>.
+If <i class="i">fill-pointer</i> is <b class="b">t</b>,
+the length of the <i class="i">vector</i> is used to initialize the <i class="i">fill pointer</i>.
+If <i class="i">fill-pointer</i> is an <i class="i">integer</i>,
+it becomes the initial <i class="i">fill pointer</i> for the <i class="i">vector</i>.
+</p>
+<p>If <i class="i">displaced-to</i> is <i class="i">non-nil</i>,
+<b class="b">make-array</b> will create a <i class="i">displaced array</i> 
+and <i class="i">displaced-to</i> is the <i class="i">target</i> of that <i class="i">displaced array</i>. 
+In that case, the consequences are undefined if the <i class="i">actual array element type</i> of 
+<i class="i">displaced-to</i> is not <i class="i">type equivalent</i> to the <i class="i">actual array element type</i>
+of the <i class="i">array</i> being created.
+If <i class="i">displaced-to</i> is <b class="b">nil</b>, the <i class="i">array</i> is not a <i class="i">displaced array</i>.
+</p>
+<p>The <i class="i">displaced-index-offset</i> is made to be the index offset of the <i class="i">array</i>.
+When an array A is given as
+the <code class="t">:displaced-to</code> <i class="i">argument</i> to <b class="b">make-array</b> 
+when creating array B,
+then array B is said to be displaced to array A.  The
+total number of elements in an <i class="i">array</i>, 
+called the total size of the <i class="i">array</i>,
+is calculated as the product of all the dimensions.
+It is required that the total size of A be no smaller than the sum
+of the total size of B plus the offset <code class="t">n</code> supplied by
+the <i class="i">displaced-index-offset</i>.
+The effect of displacing is that array B does not have any
+elements of its own, but instead maps <i class="i">accesses</i> to itself into
+<i class="i">accesses</i> to array A.  The mapping treats both <i class="i">arrays</i> as if they
+were one-dimensional by taking the elements in row-major order,
+and then maps an <i class="i">access</i> to element <code class="t">k</code> of array B to an <i class="i">access</i> to element
+<code class="t">k</code>+<code class="t">n</code> of array A.
+</p>
+<p>If <b class="b">make-array</b> is called with <i class="i">adjustable</i>, <i class="i">fill-pointer</i>,
+and <i class="i">displaced-to</i> each <b class="b">nil</b>, 
+then the result is a <i class="i">simple array</i>.
+</p>
+<p>If <b class="b">make-array</b> is called with one or more of <i class="i">adjustable</i>,
+<i class="i">fill-pointer</i>, or <i class="i">displaced-to</i> being <i class="i">true</i>, whether the
+resulting <i class="i">array</i> is a <i class="i">simple array</i> is <i class="i">implementation-dependent</i>.
+</p>
+<p>When an array A is given as the <code class="t">:displaced-to</code> <i class="i">argument</i> to
+  <b class="b">make-array</b> when creating array B, then array B is said to
+  be displaced to array A.  The total number of elements in an <i class="i">array</i>, 
+  called the total size of the <i class="i">array</i>, is calculated as the product
+  of all the dimensions.
+The consequences are unspecified if
+the total size of A is smaller than the sum
+of the total size of B plus the offset <code class="t">n</code> supplied by
+the <i class="i">displaced-index-offset</i>.
+The effect of displacing is that array B does not have any
+elements of its own, but instead maps <i class="i">accesses</i> to itself into
+<i class="i">accesses</i> to array A.  The mapping treats both <i class="i">arrays</i> as if they
+were one-dimensional by taking the elements in row-major order,
+and then maps an <i class="i">access</i> to element <code class="t">k</code> of array B to an <i class="i">access</i> 
+to <i class="i">element</i> <code class="t">k</code>+<code class="t">n</code> of array A.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-303"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-303"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted">
+
+ (make-array 5) ;; Creates a one-dimensional array of five elements.
+ (make-array '(3 4) :element-type '(mod 16)) ;; Creates a 
+                ;;two-dimensional array, 3 by 4, with four-bit elements.
+ (make-array 5 :element-type 'single-float) ;; Creates an array of single-floats.
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (make-array nil :initial-element nil) &rArr;  #0ANIL
+ (make-array 4 :initial-element nil) &rArr;  #(NIL NIL NIL NIL)
+ (make-array '(2 4) 
+              :element-type '(unsigned-byte 2) 
+              :initial-contents '((0 1 2 3) (3 2 1 0)))
+&rArr;  #2A((0 1 2 3) (3 2 1 0))
+ (make-array 6
+              :element-type 'character 
+              :initial-element #\a 
+              :fill-pointer 3) &rArr;  &quot;aaa&quot;
+</pre></div>
+
+<p>The following is an example of making a <i class="i">displaced array</i>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq a (make-array '(4 3))) 
+&rArr;  #&lt;ARRAY 4x3 simple 32546632&gt;
+ (dotimes (i 4)
+   (dotimes (j 3)
+     (setf (aref a i j) (list i 'x j '= (* i j)))))
+&rArr;  NIL
+ (setq b (make-array 8 :displaced-to a
+                       :displaced-index-offset 2))
+&rArr;  #&lt;ARRAY 8 indirect 32550757&gt;
+ (dotimes (i 8)
+   (print (list i (aref b i))))
+<code class="t"> |&gt; </code> (0 (0 X 2 = 0)) 
+<code class="t"> |&gt; </code> (1 (1 X 0 = 0)) 
+<code class="t"> |&gt; </code> (2 (1 X 1 = 1)) 
+<code class="t"> |&gt; </code> (3 (1 X 2 = 2)) 
+<code class="t"> |&gt; </code> (4 (2 X 0 = 0)) 
+<code class="t"> |&gt; </code> (5 (2 X 1 = 2)) 
+<code class="t"> |&gt; </code> (6 (2 X 2 = 4)) 
+<code class="t"> |&gt; </code> (7 (3 X 0 = 0)) 
+&rArr;  NIL
+</pre></div>
+
+<p>The last example depends on the fact that <i class="i">arrays</i> are, in effect,
+stored in row-major order. 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq a1 (make-array 50))
+&rArr;  #&lt;ARRAY 50 simple 32562043&gt;
+ (setq b1 (make-array 20 :displaced-to a1 :displaced-index-offset 10))
+&rArr;  #&lt;ARRAY 20 indirect 32563346&gt;
+ (length b1) &rArr;  20
+
+ (setq a2 (make-array 50 :fill-pointer 10))
+&rArr;  #&lt;ARRAY 50 fill-pointer 10 46100216&gt;
+ (setq b2 (make-array 20 :displaced-to a2 :displaced-index-offset 10))
+&rArr;  #&lt;ARRAY 20 indirect 46104010&gt;
+ (length a2) &rArr;  10
+ (length b2) &rArr;  20
+
+ (setq a3 (make-array 50 :fill-pointer 10))
+&rArr;  #&lt;ARRAY 50 fill-pointer 10 46105663&gt;
+ (setq b3 (make-array 20 :displaced-to a3 :displaced-index-offset 10
+                         :fill-pointer 5))
+&rArr;  #&lt;ARRAY 20 indirect, fill-pointer 5 46107432&gt;
+ (length a3) &rArr;  10
+ (length b3) &rArr;  5
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-347"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-347"> &para;</a></span></h4>
+
+<p><a class="ref" href="adjustable_002darray_002dp.html">adjustable-array-p                                               [Function]</a>
+,
+<a class="ref" href="aref.html">aref                                                             [Accessor]</a>
+,
+<a class="ref" href="arrayp.html">arrayp                                                           [Function]</a>
+,
+<a class="ref" href="array_002delement_002dtype.html">array-element-type                                               [Function]</a>
+,
+<a class="ref" href="array_002drank_002dlimit.html">array-rank-limit                                        [Constant Variable]</a>
+,
+<a class="ref" href="array_002ddimension_002dlimit.html">array-dimension-limit                                   [Constant Variable]</a>
+,
+<a class="ref" href="fill_002dpointer.html">fill-pointer                                                     [Accessor]</a>
+,
+<a class="ref" href="upgraded_002darray_002delement_002dtype.html">upgraded-array-element-type                                      [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-233"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-233"> &para;</a></span></h4>
+
+<p>There is no specified way to create an <i class="i">array</i> 
+for which <b class="b">adjustable-array-p</b> definitely
+returns <i class="i">false</i>.
+There is no specified way to create an <i class="i">array</i> 
+that is not a <i class="i">simple array</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="adjust_002darray.html">adjust-array                                                     [Function]</a>, Previous: <a href="simple_002dbit_002dvector.html">simple-bit-vector                                                    [Type]</a>, Up: <a href="Arrays-Dictionary.html">Arrays Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dbroadcast_002dstream.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-broadcast-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-broadcast-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-broadcast-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="make_002dtwo_002dway_002dstream.html" rel="next" title="make-two-way-stream">
+<link href="broadcast_002dstream_002dstreams.html" rel="prev" title="broadcast-stream-streams">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dbroadcast_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dtwo_002dway_002dstream.html" accesskey="n" rel="next">make-two-way-stream                                              [Function]</a>, Previous: <a href="broadcast_002dstream_002dstreams.html" accesskey="p" rel="prev">broadcast-stream-streams                                         [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dbroadcast_002dstream-_005bFunction_005d"><span>21.2.41 make-broadcast-stream                                            [Function]<a class="copiable-link" href="#make_002dbroadcast_002dstream-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-broadcast-stream</code>  <i class="i"><span class="r">&amp;rest</span> streams</i> &rArr;  <i class="i">broadcast-stream</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-442"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-442"> &para;</a></span></h4>
+
+<p><i class="i">stream</i>&mdash;an <i class="i">output</i> <i class="i">stream</i>.
+</p>
+<p><i class="i">broadcast-stream</i>&mdash;a <i class="i">broadcast stream</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-572"><span>Description::<a class="copiable-link" href="#Description_003a_003a-572"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">broadcast stream</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-416"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-416"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq a-stream (make-string-output-stream)
+        b-stream (make-string-output-stream)) &rArr;  #&lt;String Output Stream&gt;
+ (format (make-broadcast-stream a-stream b-stream)
+          &quot;this will go to both streams&quot;) &rArr;  NIL
+ (get-output-stream-string a-stream) &rArr;  &quot;this will go to both streams&quot;
+ (get-output-stream-string b-stream) &rArr;  &quot;this will go to both streams&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-212"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-212"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if any <i class="i">stream</i> is not an <i class="i">output</i> <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-467"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-467"> &para;</a></span></h4>
+
+<p><a class="ref" href="broadcast_002dstream_002dstreams.html">broadcast-stream-streams                                         [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dconcatenated_002dstream.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-concatenated-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-concatenated-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-concatenated-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="get_002doutput_002dstream_002dstring.html" rel="next" title="get-output-stream-string">
+<link href="concatenated_002dstream_002dstreams.html" rel="prev" title="concatenated-stream-streams">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dconcatenated_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="get_002doutput_002dstream_002dstring.html" accesskey="n" rel="next">get-output-stream-string                                         [Function]</a>, Previous: <a href="concatenated_002dstream_002dstreams.html" accesskey="p" rel="prev">concatenated-stream-streams                                      [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dconcatenated_002dstream-_005bFunction_005d"><span>21.2.47 make-concatenated-stream                                         [Function]<a class="copiable-link" href="#make_002dconcatenated_002dstream-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-concatenated-stream</code>  <i class="i"><span class="r">&amp;rest</span> input-streams</i> &rArr;  <i class="i">concatenated-stream</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-448"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-448"> &para;</a></span></h4>
+
+<p><i class="i">input-stream</i>&mdash;an <i class="i">input</i> <i class="i">stream</i>.
+</p>
+<p><i class="i">concatenated-stream</i>&mdash;a <i class="i">concatenated stream</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-578"><span>Description::<a class="copiable-link" href="#Description_003a_003a-578"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">concatenated stream</i> that has the indicated <i class="i">input-streams</i>
+initially associated with it.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-419"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-419"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (read (make-concatenated-stream
+         (make-string-input-stream &quot;1&quot;)
+         (make-string-input-stream &quot;2&quot;))) &rArr;  12
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-214"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-214"> &para;</a></span></h4>
+
+<p>Should signal <b class="b">type-error</b> if any argument is not an <i class="i">input</i> <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-469"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-469"> &para;</a></span></h4>
+
+<p><a class="ref" href="concatenated_002dstream_002dstreams.html">concatenated-stream-streams                                      [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dcondition.html
@@ -0,0 +1,91 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-condition (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-condition (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-condition (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="restart.html" rel="next" title="restart">
+<link href="define_002dcondition.html" rel="prev" title="define-condition">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dcondition">
+<div class="nav-panel">
+<p>
+Next: <a href="restart.html" accesskey="n" rel="next">restart                                                      [System Class]</a>, Previous: <a href="define_002dcondition.html" accesskey="p" rel="prev">define-condition                                                    [Macro]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dcondition-_005bFunction_005d"><span>9.2.30 make-condition                                                   [Function]<a class="copiable-link" href="#make_002dcondition-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-condition</code>  <i class="i">type <span class="r">&amp;rest</span> slot-initializations</i> &rArr;  <i class="i">condition</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-147"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-147"> &para;</a></span></h4>
+
+<p><i class="i">type</i>&mdash;a <i class="i">type specifier</i> (for a <i class="i">subtype</i> of <b class="b">condition</b>).
+</p>
+<p><i class="i">slot-initializations</i>&mdash;an <i class="i">initialization argument list</i>.
+</p>
+<p><i class="i">condition</i>&mdash;a <i class="i">condition</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-200"><span>Description::<a class="copiable-link" href="#Description_003a_003a-200"> &para;</a></span></h4>
+
+<p>Constructs and returns a <i class="i">condition</i> of type <i class="i">type</i> 
+using <i class="i">slot-initializations</i> for the initial values of the slots.  
+The newly created <i class="i">condition</i> is returned.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-129"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-129"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defvar *oops-count* 0)
+
+ (setq a (make-condition 'simple-error
+                         :format-control &quot;This is your ~:R error.&quot;
+                         :format-arguments (list (incf *oops-count*))))
+&rArr;  #&lt;SIMPLE-ERROR 32245104&gt;
+
+ (format t &quot;~&amp;~A~
+<code class="t"> |&gt; </code> This is your first error.
+&rArr;  NIL
+
+ (error a)
+<code class="t"> |&gt; </code> Error: This is your first error.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Return to Lisp Toplevel.
+<code class="t"> |&gt; </code> Debug&gt; 
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-29"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-29"> &para;</a></span></h4>
+
+<p>The set of defined <i class="i">condition</i> <i class="i">types</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-175"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-175"> &para;</a></span></h4>
+
+<p><a class="ref" href="define_002dcondition.html">define-condition                                                    [Macro]</a>
+, <a class="ref" href="Condition-System-Concepts.html">Condition System Concepts</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002ddispatch_002dmacro_002dcharacter.html
@@ -0,0 +1,89 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-dispatch-macro-character (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-dispatch-macro-character (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-dispatch-macro-character (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="read.html" rel="next" title="read">
+<link href="copy_002dreadtable.html" rel="prev" title="copy-readtable">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002ddispatch_002dmacro_002dcharacter">
+<div class="nav-panel">
+<p>
+Next: <a href="read.html" accesskey="n" rel="next">read, read-preserving-whitespace                                 [Function]</a>, Previous: <a href="copy_002dreadtable.html" accesskey="p" rel="prev">copy-readtable                                                   [Function]</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002ddispatch_002dmacro_002dcharacter-_005bFunction_005d"><span>23.2.3 make-dispatch-macro-character                                    [Function]<a class="copiable-link" href="#make_002ddispatch_002dmacro_002dcharacter-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-dispatch-macro-character</code>  <i class="i">char <span class="r">&amp;optional</span> non-terminating-p readtable</i> &rArr;  <i class="i"><b class="b">t</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-472"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-472"> &para;</a></span></h4>
+
+<p><i class="i">char</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">non-terminating-p</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">false</i>.
+</p>
+<p><i class="i">readtable</i>&mdash;a <i class="i">readtable</i>.
+ The default is the <i class="i">current readtable</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-622"><span>Description::<a class="copiable-link" href="#Description_003a_003a-622"> &para;</a></span></h4>
+
+<p><b class="b">make-dispatch-macro-character</b> makes <i class="i">char</i> 
+be a <i class="i">dispatching macro character</i> in <i class="i">readtable</i>.
+</p>
+<p>Initially, every <i class="i">character</i> in the dispatch table
+associated with the <i class="i">char</i> has an associated function 
+that signals an error of <i class="i">type</i> <b class="b">reader-error</b>.
+</p>
+<p>If <i class="i">non-terminating-p</i> is <i class="i">true</i>, 
+the <i class="i">dispatching macro character</i> 
+is made a <i class="i">non-terminating</i> <i class="i">macro character</i>;
+if <i class="i">non-terminating-p</i> is <i class="i">false</i>,
+the <i class="i">dispatching macro character</i> 
+is made a <i class="i">terminating</i> <i class="i">macro character</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-443"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-443"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (get-macro-character #\{) &rArr;  NIL, <i class="i">false</i>
+ (make-dispatch-macro-character #\{) &rArr;  T
+ (not (get-macro-character #\{)) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<p>The <i class="i">readtable</i> is altered.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-505"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-505"> &para;</a></span></h4>
+
+<p><a class="ref" href="readtable.html">readtable                                                    [System Class]</a>
+, 
+<a class="ref" href="set_002ddispatch_002dmacro_002dcharacter.html">set-dispatch-macro-character, get-dispatch-macro-character</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002decho_002dstream.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-echo-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-echo-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-echo-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="concatenated_002dstream_002dstreams.html" rel="next" title="concatenated-stream-streams">
+<link href="echo_002dstream_002dinput_002dstream.html" rel="prev" title="echo-stream-input-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002decho_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="concatenated_002dstream_002dstreams.html" accesskey="n" rel="next">concatenated-stream-streams                                      [Function]</a>, Previous: <a href="echo_002dstream_002dinput_002dstream.html" accesskey="p" rel="prev">echo-stream-input-stream, echo-stream-output-stream              [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002decho_002dstream-_005bFunction_005d"><span>21.2.45 make-echo-stream                                                 [Function]<a class="copiable-link" href="#make_002decho_002dstream-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-echo-stream</code>  <i class="i">input-stream output-stream</i> &rArr;  <i class="i">echo-stream</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-446"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-446"> &para;</a></span></h4>
+
+<p><i class="i">input-stream</i>&mdash;an <i class="i">input</i> <i class="i">stream</i>.
+</p>
+<p><i class="i">output-stream</i>&mdash;an <i class="i">output</i> <i class="i">stream</i>.
+</p>
+<p><i class="i">echo-stream</i>&mdash;an <i class="i">echo stream</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-576"><span>Description::<a class="copiable-link" href="#Description_003a_003a-576"> &para;</a></span></h4>
+
+<p>Creates and returns an <i class="i">echo stream</i> 
+that takes input  from <i class="i">input-stream</i>
+and  sends output to   <i class="i">output-stream</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-418"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-418"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (let ((out (make-string-output-stream)))
+    (with-open-stream 
+        (s (make-echo-stream
+            (make-string-input-stream &quot;this-is-read-and-echoed&quot;)
+            out))
+      (read s)
+      (format s &quot; * this-is-direct-output&quot;)
+      (get-output-stream-string out)))
+&rArr;  &quot;this-is-read-and-echoed * this-is-direct-output&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-468"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-468"> &para;</a></span></h4>
+
+<p><a class="ref" href="echo_002dstream_002dinput_002dstream.html">echo-stream-input-stream, echo-stream-output-stream              [Function]</a>
+,
+<b class="b">echo-stream-output-stream</b>,
+<a class="ref" href="make_002dtwo_002dway_002dstream.html">make-two-way-stream                                              [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dhash_002dtable.html
@@ -0,0 +1,139 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-hash-table (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-hash-table (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-hash-table (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Tables-Dictionary.html" rel="up" title="Hash Tables Dictionary">
+<link href="hash_002dtable_002dp.html" rel="next" title="hash-table-p">
+<link href="hash_002dtable.html" rel="prev" title="hash-table">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dhash_002dtable">
+<div class="nav-panel">
+<p>
+Next: <a href="hash_002dtable_002dp.html" accesskey="n" rel="next">hash-table-p                                                     [Function]</a>, Previous: <a href="hash_002dtable.html" accesskey="p" rel="prev">hash-table                                                   [System Class]</a>, Up: <a href="Hash-Tables-Dictionary.html" accesskey="u" rel="up">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dhash_002dtable-_005bFunction_005d"><span>18.2.2 make-hash-table                                                  [Function]<a class="copiable-link" href="#make_002dhash_002dtable-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-hash-table</code>  <i class="i"><span class="r">&amp;key</span> test size rehash-size rehash-threshold</i> &rArr;  <i class="i">hash-table</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-376"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-376"> &para;</a></span></h4>
+
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for one of the <i class="i">functions</i>
+	       <b class="b">eq</b>,
+	       <b class="b">eql</b>,
+	       <b class="b">equal</b>, or
+</p>
+<p><b class="b">equalp</b>.
+</p>
+<p>The default is <b class="b">eql</b>.
+</p>
+<p><i class="i">size</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<p>The default is <i class="i">implementation-dependent</i>.
+</p>
+<p><i class="i">rehash-size</i>&mdash;a <i class="i">real</i> of <i class="i">type</i> <code class="t">(or (integer 1 *) (float (1.0) *))</code>.
+  The default is <i class="i">implementation-dependent</i>.
+</p>
+<p><i class="i">rehash-threshold</i>&mdash;a <i class="i">real</i> of <i class="i">type</i> <code class="t">(real 0 1)</code>.
+  The default is <i class="i">implementation-dependent</i>.
+</p>
+<p><i class="i">hash-table</i>&mdash;a <i class="i">hash table</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-492"><span>Description::<a class="copiable-link" href="#Description_003a_003a-492"> &para;</a></span></h4>
+
+<p>Creates and returns a new <i class="i">hash table</i>.
+</p>
+<p><i class="i">test</i> determines how <i class="i">keys</i> are compared.
+An <i class="i">object</i> is said to be present in the <i class="i">hash-table</i>
+if that <i class="i">object</i> is the <i class="i">same</i> under the <i class="i">test</i> 
+as the <i class="i">key</i> for some entry in the <i class="i">hash-table</i>.
+</p>
+<p><i class="i">size</i> is a hint to the <i class="i">implementation</i> about how much initial space
+to allocate in the <i class="i">hash-table</i>.
+</p>
+<p>This information, taken together with the <i class="i">rehash-threshold</i>, controls
+the approximate number of entries which it should be possible
+to insert before the table has to grow.
+</p>
+<p>The actual size might be rounded up from <i class="i">size</i> to the next &lsquo;good&rsquo; size;
+for example, some <i class="i">implementations</i> might round to the next prime number.
+</p>
+<p><i class="i">rehash-size</i> specifies a minimum amount to increase the size of the 
+<i class="i">hash-table</i> when it becomes full
+enough to require rehashing; 
+see <i class="i">rehash-theshold</i> below.
+</p>
+<p>If <i class="i">rehash-size</i> is an <i class="i">integer</i>,
+the expected growth rate for the table is additive and
+the <i class="i">integer</i> is the number of entries to add;
+if it is a <i class="i">float</i>,
+the expected growth rate for the table is multiplicative and
+the <i class="i">float</i> is the ratio of the new size to the old size.
+</p>
+<p>As with <i class="i">size</i>, the actual size of the increase might be rounded up.
+</p>
+<p><i class="i">rehash-threshold</i> specifies how full the <i class="i">hash-table</i> can get 
+before it must grow.
+</p>
+<p>It specifies the maximum desired hash-table occupancy level.
+</p>
+<p>The <i class="i">values</i> of <i class="i">rehash-size</i> and <i class="i">rehash-threshold</i> do not constrain the
+<i class="i">implementation</i> to use any particular method for computing when and by how much
+the size of <i class="i">hash-table</i> should be enlarged.  Such decisions are   
+<i class="i">implementation-dependent</i>, and these <i class="i">values</i> only hints
+from the <i class="i">programmer</i> to the <i class="i">implementation</i>, and the <i class="i">implementation</i>
+is permitted to ignore them.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-358"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-358"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq table (make-hash-table)) &rArr;  #&lt;HASH-TABLE EQL 0/120 46142754&gt;
+ (setf (gethash &quot;one&quot; table) 1) &rArr;  1
+ (gethash &quot;one&quot; table) &rArr;  NIL, <i class="i">false</i>
+ (setq table (make-hash-table :test 'equal)) &rArr;  #&lt;HASH-TABLE EQUAL 0/139 46145547&gt;
+ (setf (gethash &quot;one&quot; table) 1) &rArr;  1
+ (gethash &quot;one&quot; table) &rArr;  1, T
+ (make-hash-table :rehash-size 1.5 :rehash-threshold 0.7) 
+&rArr;  #&lt;HASH-TABLE EQL 0/120 46156620&gt;
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-402"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-402"> &para;</a></span></h4>
+
+<p><a class="ref" href="gethash.html">gethash                                                          [Accessor]</a>
+,
+<b class="b">hash-table</b>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="hash_002dtable_002dp.html">hash-table-p                                                     [Function]</a>, Previous: <a href="hash_002dtable.html">hash-table                                                   [System Class]</a>, Up: <a href="Hash-Tables-Dictionary.html">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dinstance.html
@@ -0,0 +1,94 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-instance (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-instance (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-instance (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="make_002dinstances_002dobsolete.html" rel="next" title="make-instances-obsolete">
+<link href="remove_002dmethod.html" rel="prev" title="remove-method">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dinstance">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dinstances_002dobsolete.html" accesskey="n" rel="next">make-instances-obsolete                         [Standard Generic Function]</a>, Previous: <a href="remove_002dmethod.html" accesskey="p" rel="prev">remove-method                                   [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dinstance-_005bStandard-Generic-Function_005d"><span>7.7.19 make-instance                                   [Standard Generic Function]<a class="copiable-link" href="#make_002dinstance-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-24"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-24"> &para;</a></span></h4>
+
+<p><code class="code">make-instance</code>  <i class="i">class <span class="r">&amp;rest</span> initargs <span class="r">&amp;key</span> <span class="r">&amp;allow-other-keys</span></i> &rArr;  <i class="i">instance</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-13"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-13"> &para;</a></span></h4>
+
+<p><code class="code">make-instance</code>  <i class="i"><span class="r">(</span><i class="i">class</i> <b class="b">standard-class</b><span class="r">)</span> <span class="r">&amp;rest</span> initargs</i>
+</p>
+<p><code class="code">make-instance</code>  <i class="i"><span class="r">(</span><i class="i">class</i> <b class="b">symbol</b><span class="r">)</span> <span class="r">&amp;rest</span> initargs</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-107"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-107"> &para;</a></span></h4>
+
+<p><i class="i">class</i>&mdash;a <i class="i">class</i>,
+	     or a <i class="i">symbol</i> that names a <i class="i">class</i>.
+</p>
+<p><i class="i">initargs</i>&mdash;an <i class="i">initialization argument list</i>.
+</p>
+<p><i class="i">instance</i>&mdash;a <i class="i">fresh</i> <i class="i">instance</i> of <i class="i">class</i> <i class="i">class</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-146"><span>Description::<a class="copiable-link" href="#Description_003a_003a-146"> &para;</a></span></h4>
+
+<p>The <i class="i">generic function</i> <b class="b">make-instance</b> 
+creates and returns a new <i class="i">instance</i> of the given <i class="i">class</i>.
+</p>
+<p>If the second of the above <i class="i">methods</i> is selected, 
+that <i class="i">method</i> invokes <b class="b">make-instance</b> on the arguments
+<code class="t">(find-class <i class="i">class</i>)</code> and <i class="i">initargs</i>.
+</p>
+<p>The initialization arguments are checked within <b class="b">make-instance</b>.
+</p>
+<p>The <i class="i">generic function</i> <b class="b">make-instance</b> 
+may be used as described in <a class="ref" href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-33"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-33"> &para;</a></span></h4>
+
+<p>If any of the initialization arguments has not
+been declared as valid, an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-128"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-128"> &para;</a></span></h4>
+
+<p><a class="ref" href="defclass.html">defclass                                                            [Macro]</a>
+,
+<a class="ref" href="class_002dof.html">class-of                                                         [Function]</a>
+,
+<a class="ref" href="allocate_002dinstance.html">allocate-instance                               [Standard Generic Function]</a>
+,
+<a class="ref" href="Initialize_002dInstance.html">Initialize-Instance</a>
+,
+<a class="ref" href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dinstances_002dobsolete.html
@@ -0,0 +1,84 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-instances-obsolete (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-instances-obsolete (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-instances-obsolete (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="make_002dload_002dform.html" rel="next" title="make-load-form">
+<link href="make_002dinstance.html" rel="prev" title="make-instance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dinstances_002dobsolete">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dload_002dform.html" accesskey="n" rel="next">make-load-form                                  [Standard Generic Function]</a>, Previous: <a href="make_002dinstance.html" accesskey="p" rel="prev">make-instance                                   [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dinstances_002dobsolete-_005bStandard-Generic-Function_005d"><span>7.7.20 make-instances-obsolete                         [Standard Generic Function]<a class="copiable-link" href="#make_002dinstances_002dobsolete-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-25"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-25"> &para;</a></span></h4>
+
+<p><code class="code">make-instances-obsolete</code>  <i class="i">class</i> &rArr;  <i class="i">class</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-14"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-14"> &para;</a></span></h4>
+
+<p><code class="code">make-instances-obsolete</code>  <i class="i"><span class="r">(</span><i class="i">class</i> <b class="b">standard-class</b><span class="r">)</span></i>
+</p>
+<p><code class="code">make-instances-obsolete</code>  <i class="i"><span class="r">(</span><i class="i">class</i> <b class="b">symbol</b><span class="r">)</span></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-108"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-108"> &para;</a></span></h4>
+
+<p><i class="i">class</i>&mdash;a <i class="i">class designator</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-147"><span>Description::<a class="copiable-link" href="#Description_003a_003a-147"> &para;</a></span></h4>
+
+<p>The <i class="i">function</i> <b class="b">make-instances-obsolete</b> has the effect of
+initiating the process of updating the instances of the
+<i class="i">class</i>. During updating, the generic function
+<b class="b">update-instance-for-redefined-class</b> will be invoked.
+</p>
+<p>The generic function <b class="b">make-instances-obsolete</b> is invoked
+automatically by the system when <b class="b">defclass</b> has been used to
+redefine an existing standard class and the set of local 
+<i class="i">slots</i> <i class="i">accessible</i> in an
+instance is changed or the order of <i class="i">slots</i> in storage is changed.  It
+can also be explicitly invoked by the user.
+</p>
+<p>If the second of the above <i class="i">methods</i> is selected, that 
+<i class="i">method</i> invokes
+<b class="b">make-instances-obsolete</b> on <code class="t">(find-class <i class="i">class</i>)</code>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-104"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-104"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-129"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-129"> &para;</a></span></h4>
+
+<p><a class="ref" href="update_002dinstance_002dfor_002dredefined_002dclass.html">update-instance-for-redefined-class             [Standard Generic Function]</a>
+,
+<a class="ref" href="Redefining-Classes.html">Redefining Classes</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dlist.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-list (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-list (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-list (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="push.html" rel="next" title="push">
+<link href="listp.html" rel="prev" title="listp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dlist">
+<div class="nav-panel">
+<p>
+Next: <a href="push.html" accesskey="n" rel="next">push                                                                [Macro]</a>, Previous: <a href="listp.html" accesskey="p" rel="prev">listp                                                            [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dlist-_005bFunction_005d"><span>14.2.18 make-list                                                        [Function]<a class="copiable-link" href="#make_002dlist-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-list</code>  <i class="i">size <span class="r">&amp;key</span> initial-element</i> &rArr;  <i class="i">list</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-287"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-287"> &para;</a></span></h4>
+
+<p><i class="i">size</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<p><i class="i">initial-element</i>&mdash;an <i class="i">object</i>.
+  The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">list</i>&mdash;a <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-388"><span>Description::<a class="copiable-link" href="#Description_003a_003a-388"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">list</i> of <i class="i">length</i> given by <i class="i">size</i>,
+each of the <i class="i">elements</i> of which is <i class="i">initial-element</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-271"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-271"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (make-list 5) &rArr;  (NIL NIL NIL NIL NIL)
+ (make-list 3 :initial-element 'rah) &rArr;  (RAH RAH RAH)
+ (make-list 2 :initial-element '(1 2 3)) &rArr;  ((1 2 3) (1 2 3))
+ (make-list 0) &rArr;  NIL ;<i class="i">i.e.</i>, ()
+ (make-list 0 :initial-element 'new-element) &rArr;  NIL 
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-122"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-122"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">size</i> is not a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-314"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-314"> &para;</a></span></h4>
+
+<p><a class="ref" href="cons.html">cons                                                             [Function]</a>
+,
+<a class="ref" href="list-_0028Function_0029.html">list, list*                                                      [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dload_002dform.html
@@ -0,0 +1,333 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-load-form (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-load-form (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-load-form (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="make_002dload_002dform_002dsaving_002dslots.html" rel="next" title="make-load-form-saving-slots">
+<link href="make_002dinstances_002dobsolete.html" rel="prev" title="make-instances-obsolete">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dload_002dform">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dload_002dform_002dsaving_002dslots.html" accesskey="n" rel="next">make-load-form-saving-slots                                      [Function]</a>, Previous: <a href="make_002dinstances_002dobsolete.html" accesskey="p" rel="prev">make-instances-obsolete                         [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dload_002dform-_005bStandard-Generic-Function_005d"><span>7.7.21 make-load-form                                  [Standard Generic Function]<a class="copiable-link" href="#make_002dload_002dform-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-26"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-26"> &para;</a></span></h4>
+
+<p><code class="code">make-load-form</code>  <i class="i">object <span class="r">&amp;optional</span> environment</i> &rArr;  <i class="i">creation-form <span class="r">[</span>, initialization-form <span class="r">]</span></i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-15"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-15"> &para;</a></span></h4>
+
+<p><code class="code">make-load-form</code>  <i class="i"><span class="r">(</span><i class="i">object</i> <b class="b">standard-object</b><span class="r">)</span>  <span class="r">&amp;optional</span> environment</i>
+</p>
+<p><code class="code">make-load-form</code>  <i class="i"><span class="r">(</span><i class="i">object</i> <b class="b">structure-object</b><span class="r">)</span> <span class="r">&amp;optional</span> environment</i>
+</p>
+<p><code class="code">make-load-form</code>  <i class="i"><span class="r">(</span><i class="i">object</i> <b class="b">condition</b><span class="r">)</span>        <span class="r">&amp;optional</span> environment</i>
+</p>
+<p><code class="code">make-load-form</code>  <i class="i"><span class="r">(</span><i class="i">object</i> <b class="b">class</b><span class="r">)</span>            <span class="r">&amp;optional</span> environment</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-109"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-109"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">environment</i>&mdash;an <i class="i">environment object</i>.
+</p>
+<p><i class="i">creation-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">initialization-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-148"><span>Description::<a class="copiable-link" href="#Description_003a_003a-148"> &para;</a></span></h4>
+
+<p>The <i class="i">generic function</i> <b class="b">make-load-form</b> creates and returns 
+one or two <i class="i">forms</i>,
+     a <i class="i">creation-form</i>
+ and an <i class="i">initialization-form</i>,
+that enable <b class="b">load</b> to construct an <i class="i">object</i>
+equivalent to <i class="i">object</i>.
+<i class="i">Environment</i> is an <i class="i">environment object</i> 
+corresponding to the <i class="i">lexical environment</i> 
+in which the <i class="i">forms</i> will be processed.
+</p>
+<p>The <i class="i">file compiler</i> calls <b class="b">make-load-form</b> to process certain
+<i class="i">classes</i> of <i class="i">literal objects</i>; see <a class="ref" href="Additional-Constraints-on-Externalizable-Objects.html">Additional Constraints on Externalizable Objects</a>.
+</p>
+<p><i class="i">Conforming programs</i> may call <b class="b">make-load-form</b> directly,
+providing <i class="i">object</i> is a <i class="i">generalized instance</i> of
+<b class="b">standard-object</b>, <b class="b">structure-object</b>, 
+or <b class="b">condition</b>.
+</p>
+<p>The creation form is a <i class="i">form</i> that, when evaluated at
+<b class="b">load</b> time, should return an <i class="i">object</i> that 
+is equivalent to <i class="i">object</i>.  The exact meaning of
+equivalent depends on the <i class="i">type</i> of <i class="i">object</i> 
+and is up to the programmer who defines a <i class="i">method</i> for
+<b class="b">make-load-form</b>;
+see <a class="ref" href="Literal-Objects-in-Compiled-Files.html">Literal Objects in Compiled Files</a>.
+</p>
+<p>The initialization form is a <i class="i">form</i> that, when evaluated at <b class="b">load</b> time, 
+should perform further initialization of the <i class="i">object</i>.  
+The value returned by the initialization form is ignored.
+If <b class="b">make-load-form</b>
+returns only one value, 
+the initialization form is <b class="b">nil</b>, which has no effect.
+If <i class="i">object</i> appears as a constant in the initialization form,
+at <b class="b">load</b> time it will be replaced by the equivalent <i class="i">object</i> 
+constructed by the creation form;
+this is how the further initialization gains access to the <i class="i">object</i>.
+</p>
+<p>Both the <i class="i">creation-form</i> and the <i class="i">initialization-form</i> may contain references
+to any <i class="i">externalizable object</i>.
+However, there must not be any circular dependencies in creation forms.
+An example of a circular dependency is when the creation form for the
+object <code class="t">X</code> contains a reference to the object <code class="t">Y</code>,
+and the creation form for the object <code class="t">Y</code> contains a reference to the object <code class="t">X</code>.  
+Initialization forms are not subject to any restriction against circular dependencies, 
+which is the reason that initialization forms exist; 
+see the example of circular data structures below.
+</p>
+<p>The creation form for an <i class="i">object</i> is always <i class="i">evaluated</i> before the
+initialization form for that <i class="i">object</i>.  When either the creation form or
+the initialization form references other <i class="i">objects</i> that have not been
+referenced earlier in the <i class="i">file</i> being <i class="i">compiled</i>, the <i class="i">compiler</i> ensures
+that all of the referenced <i class="i">objects</i> have been created before <i class="i">evaluating</i>
+the referencing <i class="i">form</i>.  When the referenced <i class="i">object</i> is of a <i class="i">type</i> which
+the <i class="i">file compiler</i> processes using <b class="b">make-load-form</b>,
+this involves <i class="i">evaluating</i>
+the creation form returned for it.  (This is the reason for the
+prohibition against circular references among creation forms).
+</p>
+<p>Each initialization form is <i class="i">evaluated</i> as soon as possible after its
+associated creation form, as determined by data flow.  If the
+initialization form for an <i class="i">object</i> does not reference any other <i class="i">objects</i>
+not referenced earlier in the <i class="i">file</i> and processed by 
+the <i class="i">file compiler</i>
+using
+<b class="b">make-load-form</b>, the initialization form is evaluated immediately after
+the creation form.  If a creation or initialization form F does contain
+references to such <i class="i">objects</i>, the creation forms for those other objects
+are evaluated before F, and the initialization forms for those other
+<i class="i">objects</i> are also evaluated before F whenever they do not depend on the
+<i class="i">object</i> created or initialized by F.  Where these rules do not uniquely
+determine an order of <i class="i">evaluation</i> between two creation/initialization
+forms, the order of <i class="i">evaluation</i> is unspecified.
+</p>
+<p>While these creation and initialization forms are being evaluated, the
+  <i class="i">objects</i> are possibly in an uninitialized state, 
+analogous to the state
+  of an <i class="i">object</i> 
+between the time it has been created by <b class="b">allocate-instance</b>
+  and it has been processed fully by 
+<b class="b">initialize-instance</b>.  Programmers
+  writing <i class="i">methods</i> for 
+<b class="b">make-load-form</b> must take care in manipulating
+  <i class="i">objects</i> not to depend on 
+<i class="i">slots</i> that have not yet been initialized.
+</p>
+<p>It is <i class="i">implementation-dependent</i>
+whether <b class="b">load</b> calls <b class="b">eval</b> on the 
+<i class="i">forms</i> or does some
+  other operation that has an equivalent effect.  For example, the
+  <i class="i">forms</i> might be translated into different but equivalent 
+<i class="i">forms</i> and
+  then evaluated, they might be compiled and the resulting functions
+  called by <b class="b">load</b>, 
+or they might be interpreted by a special-purpose
+function different from <b class="b">eval</b>.  
+All that is required is that the
+  effect be equivalent to evaluating the <i class="i">forms</i>.
+</p>
+<p>The <i class="i">method</i> <i class="i">specialized</i> on <b class="b">class</b> returns a creation
+<i class="i">form</i> using the <i class="i">name</i> of the <i class="i">class</i> if the <i class="i">class</i> has
+a <i class="i">proper name</i> in <i class="i">environment</i>, signaling an error of <i class="i">type</i> <b class="b">error</b>
+if it does not have a <i class="i">proper name</i>.  <i class="i">Evaluation</i> of the creation
+<i class="i">form</i> uses the <i class="i">name</i> to find the <i class="i">class</i> with that
+<i class="i">name</i>, as if by <i class="i">calling</i> <b class="b">find-class</b>.  If a <i class="i">class</i>
+with that <i class="i">name</i> has not been defined, then a <i class="i">class</i> may be
+computed in an <i class="i">implementation-defined</i> manner.  If a <i class="i">class</i>
+cannot be returned as the result of <i class="i">evaluating</i> the creation
+<i class="i">form</i>, then an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<p>Both <i class="i">conforming implementations</i> and <i class="i">conforming programs</i> may
+further <i class="i">specialize</i> <b class="b">make-load-form</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-105"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-105"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defclass obj ()
+    ((x :initarg :x :reader obj-x)
+     (y :initarg :y :reader obj-y)
+     (dist :accessor obj-dist)))
+&rArr;  #&lt;STANDARD-CLASS OBJ 250020030&gt;
+ (defmethod shared-initialize :after ((self obj) slot-names &amp;rest keys)
+   (declare (ignore slot-names keys))
+   (unless (slot-boundp self 'dist)
+     (setf (obj-dist self)
+           (sqrt (+ (expt (obj-x self) 2) (expt (obj-y self) 2))))))
+&rArr;  #&lt;STANDARD-METHOD SHARED-INITIALIZE (:AFTER) (OBJ T) 26266714&gt;
+ (defmethod make-load-form ((self obj) &amp;optional environment)
+   (declare (ignore environment))
+   ;; Note that this definition only works because X and Y do not
+   ;; contain information which refers back to the object itself.
+   ;; For a more general solution to this problem, see revised example below.
+   `(make-instance ',(class-of self)
+                   :x ',(obj-x self) :y ',(obj-y self)))
+&rArr;  #&lt;STANDARD-METHOD MAKE-LOAD-FORM (OBJ) 26267532&gt;
+ (setq obj1 (make-instance 'obj :x 3.0 :y 4.0)) &rArr;  #&lt;OBJ 26274136&gt;
+ (obj-dist obj1) &rArr;  5.0
+ (make-load-form obj1) &rArr;  (MAKE-INSTANCE 'OBJ :X '3.0 :Y '4.0)
+</pre></div>
+
+<p>In the above example, an equivalent <i class="i">instance</i> of <code class="t">obj</code> is
+reconstructed by using the values of two of its <i class="i">slots</i>.  
+The value of the third <i class="i">slot</i> is derived from those two values.
+</p>
+<p>Another way to write the <b class="b">make-load-form</b> <i class="i">method</i>
+in that example is to use <b class="b">make-load-form-saving-slots</b>.
+The code it generates might yield a slightly different result 
+from the <b class="b">make-load-form</b> <i class="i">method</i> shown above,
+but the operational effect will be the same.  For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> ;; Redefine method defined above.
+ (defmethod make-load-form ((self obj) &amp;optional environment)
+    (make-load-form-saving-slots self
+                                 :slot-names '(x y)
+                                 :environment environment))
+&rArr;  #&lt;STANDARD-METHOD MAKE-LOAD-FORM (OBJ) 42755655&gt;
+ ;; Try MAKE-LOAD-FORM on object created above.
+ (make-load-form obj1)
+&rArr;  (ALLOCATE-INSTANCE '#&lt;STANDARD-CLASS OBJ 250020030&gt;),
+    (PROGN
+      (SETF (SLOT-VALUE '#&lt;OBJ 26274136&gt; 'X) '3.0)
+      (SETF (SLOT-VALUE '#&lt;OBJ 26274136&gt; 'Y) '4.0)
+      (INITIALIZE-INSTANCE '#&lt;OBJ 26274136&gt;))
+</pre></div>
+
+<p>In the following example, <i class="i">instances</i> of <code class="t">my-frob</code> are &ldquo;interned&rdquo; 
+in some way.  An equivalent <i class="i">instance</i> is reconstructed by using the 
+value of the name slot as a key for searching existing <i class="i">objects</i>.
+In this case the programmer has chosen to create a new <i class="i">object</i> 
+if no existing <i class="i">object</i> is found; alternatively an error could 
+have been signaled in that case.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defclass my-frob ()
+    ((name :initarg :name :reader my-name)))
+ (defmethod make-load-form ((self my-frob) &amp;optional environment)
+   (declare (ignore environment))
+   `(find-my-frob ',(my-name self) :if-does-not-exist :create))
+</pre></div>
+
+<p>In the following example, the data structure to be dumped is circular, 
+because each parent has a list of its children and each child has a reference
+back to its parent.  If <b class="b">make-load-form</b> is called on one   
+<i class="i">object</i> in such a structure,  the creation form creates an equivalent 
+<i class="i">object</i> and fills in the children slot, which forces creation of equivalent
+<i class="i">objects</i> for all of its children, grandchildren, etc.  At this point
+none of the parent <i class="i">slots</i> have been filled in.  
+The initialization form fills in the parent <i class="i">slot</i>, which forces creation 
+of an equivalent <i class="i">object</i> for the parent if it was not already created.
+Thus the entire tree is recreated at <b class="b">load</b> time.  
+At compile time, <b class="b">make-load-form</b> is called once for each <i class="i">object</i> 
+in the tree.  
+All of the creation forms are evaluated,
+in <i class="i">implementation-dependent</i> order,
+and then all of the initialization forms are evaluated, 
+also in <i class="i">implementation-dependent</i> order.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defclass tree-with-parent () ((parent :accessor tree-parent)
+                                (children :initarg :children)))
+ (defmethod make-load-form ((x tree-with-parent) &amp;optional environment)
+   (declare (ignore environment))
+   (values
+     ;; creation form
+     `(make-instance ',(class-of x) :children ',(slot-value x 'children))
+     ;; initialization form
+     `(setf (tree-parent ',x) ',(slot-value x 'parent))))
+</pre></div>
+
+<p>In the following example, the data structure to be dumped has no special
+properties and an equivalent structure can be reconstructed
+simply by reconstructing the <i class="i">slots</i>&rsquo; contents.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defstruct my-struct a b c)
+ (defmethod make-load-form ((s my-struct) &amp;optional environment)
+    (make-load-form-saving-slots s :environment environment))
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-34"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-34"> &para;</a></span></h4>
+
+<p>The <i class="i">methods</i> <i class="i">specialized</i> on 
+     <b class="b">standard-object</b>,
+     <b class="b">structure-object</b>,
+ and <b class="b">condition</b>
+all signal an error of <i class="i">type</i> <b class="b">error</b>.
+</p>
+<p>It is <i class="i">implementation-dependent</i> whether <i class="i">calling</i>
+<b class="b">make-load-form</b> on a <i class="i">generalized instance</i> of a
+<i class="i">system class</i> signals an error or returns creation and
+initialization <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-130"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-130"> &para;</a></span></h4>
+
+<p><a class="ref" href="compile_002dfile.html">compile-file                                                     [Function]</a>
+, 
+<a class="ref" href="make_002dload_002dform_002dsaving_002dslots.html">make-load-form-saving-slots                                      [Function]</a>
+,
+<a class="ref" href="Additional-Constraints-on-Externalizable-Objects.html">Additional Constraints on Externalizable Objects</a>
+<a class="ref" href="Evaluation.html">Evaluation</a>,
+<a class="ref" href="Compilation.html">Compilation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-86"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-86"> &para;</a></span></h4>
+
+<p>The <i class="i">file compiler</i>
+calls <b class="b">make-load-form</b> in specific circumstances
+detailed in <a class="ref" href="Additional-Constraints-on-Externalizable-Objects.html">Additional Constraints on Externalizable Objects</a>.
+</p>
+<p>Some <i class="i">implementations</i> may provide facilities for defining new
+<i class="i">subclasses</i> of <i class="i">classes</i> which are specified as
+<i class="i">system classes</i>.  (Some likely candidates include
+<b class="b">generic-function</b>, <b class="b">method</b>, and <b class="b">stream</b>).  Such
+<i class="i">implementations</i> should document how the <i class="i">file compiler</i> processes
+<i class="i">instances</i> of such <i class="i">classes</i> when encountered as
+<i class="i">literal objects</i>, and should document any relevant <i class="i">methods</i>
+for <b class="b">make-load-form</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dload_002dform_002dsaving_002dslots.html">make-load-form-saving-slots                                      [Function]</a>, Previous: <a href="make_002dinstances_002dobsolete.html">make-instances-obsolete                         [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dload_002dform_002dsaving_002dslots.html
@@ -0,0 +1,111 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-load-form-saving-slots (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-load-form-saving-slots (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-load-form-saving-slots (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="with_002daccessors.html" rel="next" title="with-accessors">
+<link href="make_002dload_002dform.html" rel="prev" title="make-load-form">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dload_002dform_002dsaving_002dslots">
+<div class="nav-panel">
+<p>
+Next: <a href="with_002daccessors.html" accesskey="n" rel="next">with-accessors                                                      [Macro]</a>, Previous: <a href="make_002dload_002dform.html" accesskey="p" rel="prev">make-load-form                                  [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dload_002dform_002dsaving_002dslots-_005bFunction_005d"><span>7.7.22 make-load-form-saving-slots                                      [Function]<a class="copiable-link" href="#make_002dload_002dform_002dsaving_002dslots-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-load-form-saving-slots</code>  <i class="i">object <span class="r">&amp;key</span> slot-names environment</i><br>
+   &rArr;  <i class="i">creation-form, initialization-form</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-110"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-110"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">slot-names</i>&mdash;a <i class="i">list</i>.
+</p>
+<p><i class="i">environment</i>&mdash;an <i class="i">environment object</i>.
+</p>
+<p><i class="i">creation-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">initialization-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-149"><span>Description::<a class="copiable-link" href="#Description_003a_003a-149"> &para;</a></span></h4>
+
+<p>Returns <i class="i">forms</i> that, when <i class="i">evaluated</i>, will construct an
+<i class="i">object</i> equivalent to <i class="i">object</i>, without <i class="i">executing</i>
+<i class="i">initialization forms</i>.  The <i class="i">slots</i> in the new <i class="i">object</i>
+that correspond to initialized <i class="i">slots</i> in <i class="i">object</i> are
+initialized using the values from <i class="i">object</i>.  Uninitialized <i class="i">slots</i>
+in <i class="i">object</i> are not initialized in the new <i class="i">object</i>.
+<b class="b">make-load-form-saving-slots</b> works for any <i class="i">instance</i> of
+<b class="b">standard-object</b> or <b class="b">structure-object</b>.
+</p>
+<p><i class="i">Slot-names</i> is a <i class="i">list</i> of the names of the 
+<i class="i">slots</i> to preserve. If <i class="i">slot-names</i> is not
+supplied, its value is all of the <i class="i">local slots</i>.  
+</p>
+<p><b class="b">make-load-form-saving-slots</b> returns two values,
+thus it can deal with circular structures.
+Whether the result is useful in an application depends on
+whether the <i class="i">object</i>&rsquo;s <i class="i">type</i> and slot contents
+fully capture the application&rsquo;s idea of the <i class="i">object</i>&rsquo;s state.
+</p>
+<p><i class="i">Environment</i> is the environment in which the forms will be processed.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-131"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-131"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dload_002dform.html">make-load-form                                  [Standard Generic Function]</a>
+,
+<a class="ref" href="make_002dinstance.html">make-instance                                   [Standard Generic Function]</a>
+,
+<a class="ref" href="setf.html">setf, psetf                                                         [Macro]</a>
+,
+<a class="ref" href="slot_002dvalue.html">slot-value                                                       [Function]</a>
+,
+<a class="ref" href="slot_002dmakunbound.html">slot-makunbound                                                  [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-87"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-87"> &para;</a></span></h4>
+
+<p><b class="b">make-load-form-saving-slots</b> can be useful in user-written
+<b class="b">make-load-form</b> methods.
+</p>
+<p>When the <i class="i">object</i> is an <i class="i">instance</i> of <b class="b">standard-object</b>,
+<b class="b">make-load-form-saving-slots</b> could return a creation form that
+<i class="i">calls</i> <b class="b">allocate-instance</b> and an initialization form that
+contains <i class="i">calls</i> to <b class="b">setf</b> of <b class="b">slot-value</b> and
+<b class="b">slot-makunbound</b>, though other <i class="i">functions</i> of similar effect
+might actually be used.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="with_002daccessors.html">with-accessors                                                      [Macro]</a>, Previous: <a href="make_002dload_002dform.html">make-load-form                                  [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dpackage.html
@@ -0,0 +1,116 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="with_002dpackage_002diterator.html" rel="next" title="with-package-iterator">
+<link href="delete_002dpackage.html" rel="prev" title="delete-package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dpackage">
+<div class="nav-panel">
+<p>
+Next: <a href="with_002dpackage_002diterator.html" accesskey="n" rel="next">with-package-iterator                                               [Macro]</a>, Previous: <a href="delete_002dpackage.html" accesskey="p" rel="prev">delete-package                                                   [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dpackage-_005bFunction_005d"><span>11.2.12 make-package                                                     [Function]<a class="copiable-link" href="#make_002dpackage-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-package</code>  <i class="i">package-name <span class="r">&amp;key</span> nicknames use</i> &rArr;  <i class="i">package</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-184"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-184"> &para;</a></span></h4>
+
+<p><i class="i">package-name</i>&mdash;a <i class="i">string designator</i>.
+</p>
+<p><i class="i">nicknames</i>&mdash;a <i class="i">list</i> of <i class="i">string designators</i>.
+  The default is the <i class="i">empty list</i>.
+</p>
+<p><i class="i">use</i>&mdash;
+a <i class="i">list</i> of <i class="i">package designators</i>.
+</p>
+<p>The default is <i class="i">implementation-defined</i>.
+</p>
+<p><i class="i">package</i>&mdash;a <i class="i">package</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-248"><span>Description::<a class="copiable-link" href="#Description_003a_003a-248"> &para;</a></span></h4>
+
+<p>Creates a new <i class="i">package</i> with the name <i class="i">package-name</i>.  
+</p>
+<p><i class="i">Nicknames</i> are additional <i class="i">names</i> which may be used
+to refer to the new <i class="i">package</i>.
+</p>
+<p><i class="i">use</i> specifies zero or more <i class="i">packages</i> 
+the <i class="i">external symbols</i> of which are to be inherited by
+the new <i class="i">package</i>.  See the <i class="i">function</i> <b class="b">use-package</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-167"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-167"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (make-package 'temporary :nicknames '(&quot;TEMP&quot; &quot;temp&quot;)) &rArr;  #&lt;PACKAGE &quot;TEMPORARY&quot;&gt;
+ (make-package &quot;OWNER&quot; :use '(&quot;temp&quot;)) &rArr;  #&lt;PACKAGE &quot;OWNER&quot;&gt;
+ (package-used-by-list 'temp) &rArr;  (#&lt;PACKAGE &quot;OWNER&quot;&gt;)
+ (package-use-list 'owner) &rArr;  (#&lt;PACKAGE &quot;TEMPORARY&quot;&gt;)
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-49"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-49"> &para;</a></span></h4>
+
+<p>The existence of other <i class="i">packages</i> in the system.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-66"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-66"> &para;</a></span></h4>
+
+<p>The consequences are unspecified if <i class="i">packages</i> denoted by <i class="i">use</i>
+do not exist.
+</p>
+<p>A <i class="i">correctable</i> error is signaled if the <i class="i">package-name</i> 
+or any of the <i class="i">nicknames</i> is already 
+the <i class="i">name</i> or <i class="i">nickname</i> of an existing <i class="i">package</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-220"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-220"> &para;</a></span></h4>
+
+<p><a class="ref" href="defpackage.html">defpackage                                                          [Macro]</a>
+,
+<a class="ref" href="use_002dpackage.html">use-package                                                      [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-130"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-130"> &para;</a></span></h4>
+
+<p>In situations where the <i class="i">packages</i> to be used contain symbols which would conflict,
+it is necessary to first create the package with <code class="t">:use '()</code>,
+then to use <b class="b">shadow</b> or <b class="b">shadowing-import</b> to address the conflicts,
+and then after that to use <b class="b">use-package</b> once the conflicts have been addressed.
+</p>
+<p>When packages are being created as part of the static definition of a program
+rather than dynamically by the program, it is generally considered more stylistically
+appropriate to use <b class="b">defpackage</b> rather than <b class="b">make-package</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="with_002dpackage_002diterator.html">with-package-iterator                                               [Macro]</a>, Previous: <a href="delete_002dpackage.html">delete-package                                                   [Function]</a>, Up: <a href="Packages-Dictionary.html">Packages Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dpathname.html
@@ -0,0 +1,184 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-pathname (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-pathname (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-pathname (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="pathnamep.html" rel="next" title="pathnamep">
+<link href="pathname.html" rel="prev" title="pathname">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dpathname">
+<div class="nav-panel">
+<p>
+Next: <a href="pathnamep.html" accesskey="n" rel="next">pathnamep                                                        [Function]</a>, Previous: <a href="pathname.html" accesskey="p" rel="prev">pathname                                                         [Function]</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dpathname-_005bFunction_005d"><span>19.4.4 make-pathname                                                    [Function]<a class="copiable-link" href="#make_002dpathname-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-pathname</code>  <i class="i"><span class="r">&amp;key</span> host device directory name type version defaults case</i><br>
+   &rArr;  <i class="i">pathname</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-390"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-390"> &para;</a></span></h4>
+
+<p><i class="i">host</i>&mdash;a <i class="i">valid physical pathname host</i>.
+ Complicated defaulting behavior; see below.
+</p>
+<p><i class="i">device</i>&mdash;a <i class="i">valid pathname device</i>.
+ Complicated defaulting behavior; see below.
+</p>
+<p><i class="i">directory</i>&mdash;a <i class="i">valid pathname directory</i>.
+ Complicated defaulting behavior; see below.
+</p>
+<p><i class="i">name</i>&mdash;a <i class="i">valid pathname name</i>.
+ Complicated defaulting behavior; see below.
+</p>
+<p><i class="i">type</i>&mdash;a <i class="i">valid pathname type</i>.
+ Complicated defaulting behavior; see below.
+</p>
+<p><i class="i">version</i>&mdash;a <i class="i">valid pathname version</i>.
+ Complicated defaulting behavior; see below.
+</p>
+<p><i class="i">defaults</i>&mdash;a <i class="i">pathname designator</i>.
+ The default is a <i class="i">pathname</i> whose host component is the same as the
+          host component of the <i class="i">value</i> of <b class="b">*default-pathname-defaults*</b>,
+	  and whose other components are all <b class="b">nil</b>.
+</p>
+<p><i class="i">case</i>&mdash;one of <code class="t">:common</code> or <code class="t">:local</code>.
+ The default is <code class="t">:local</code>.
+</p>
+<p><i class="i">pathname</i>&mdash;a <i class="i">pathname</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-508"><span>Description::<a class="copiable-link" href="#Description_003a_003a-508"> &para;</a></span></h4>
+
+<p>Constructs and returns a <i class="i">pathname</i> from the supplied keyword arguments.
+</p>
+<p>After the components supplied explicitly by
+       <i class="i">host</i>,
+       <i class="i">device</i>, 
+       <i class="i">directory</i>,
+       <i class="i">name</i>,
+       <i class="i">type</i>,
+   and <i class="i">version</i> 
+are filled in, 
+the merging rules used by <b class="b">merge-pathnames</b> 
+are used to fill in any 
+unsupplied
+components
+from the defaults supplied by <i class="i">defaults</i>.
+</p>
+<p>Whenever a <i class="i">pathname</i> is constructed the components may be 
+canonicalized if appropriate.
+For the explanation of the arguments that can be supplied for each component,
+see <a class="ref" href="Pathname-Components.html">Pathname Components</a>.
+</p>
+<p>If <i class="i">case</i> is supplied,
+it is treated as described in <a class="ref" href="Case-in-Pathname-Components.html">Case in Pathname Components</a>.
+</p>
+<p>The resulting <i class="i">pathname</i> is a <i class="i">logical pathname</i> 
+if and only its host component 
+is
+a <i class="i">logical host</i> 
+or a <i class="i">string</i> that names a defined <i class="i">logical host</i>.
+</p>
+<p>If the <i class="i">directory</i> is a <i class="i">string</i>,
+it should be the name of a top level directory,
+and should not contain any punctuation characters; that is,
+specifying a <i class="i">string</i>, <i class="i">str</i>, is
+equivalent to specifying the list <code class="t">(:absolute <i class="i">str</i>)</code>.
+Specifying the symbol <code class="t">:wild</code> is equivalent to specifying the list 
+<code class="t">(:absolute :wild-inferiors)</code>, or <code class="t">(:absolute :wild)</code> 
+in a file system that does not support <code class="t">:wild-inferiors</code>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-370"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-370"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> ;; Implementation A -- an implementation with access to a single
+ ;;  Unix file system.  This implementation happens to never display
+ ;;  the `host' information in a namestring, since there is only one host. 
+ (make-pathname :directory '(:absolute &quot;public&quot; &quot;games&quot;)
+                :name &quot;chess&quot; :type &quot;db&quot;)
+&rArr;  #P&quot;/public/games/chess.db&quot; 
+
+ ;; Implementation B -- an implementation with access to one or more
+ ;;  VMS file systems.  This implementation displays `host' information
+ ;;  in the namestring only when the host is not the local host.
+ ;;  It uses a double colon to separate a host name from the host's local
+ ;;  file name.
+ (make-pathname :directory '(:absolute &quot;PUBLIC&quot; &quot;GAMES&quot;)
+                :name &quot;CHESS&quot; :type &quot;DB&quot;)
+&rArr;  #P&quot;SYS$DISK:[PUBLIC.GAMES]CHESS.DB&quot; 
+ (make-pathname :host &quot;BOBBY&quot;
+                :directory '(:absolute &quot;PUBLIC&quot; &quot;GAMES&quot;)
+                :name &quot;CHESS&quot; :type &quot;DB&quot;)
+&rArr;  #P&quot;BOBBY::SYS$DISK:[PUBLIC.GAMES]CHESS.DB&quot; 
+
+ ;; Implementation C -- an implementation with simultaneous access to
+ ;;  multiple file systems from the same Lisp image.  In this 
+ ;;  implementation, there is a convention that any text preceding the
+ ;;  first colon in a pathname namestring is a host name.
+ (dolist (case '(:common :local))
+   (dolist (host '(&quot;MY-LISPM&quot; &quot;MY-VAX&quot; &quot;MY-UNIX&quot;))
+     (print (make-pathname :host host :case case
+                           :directory '(:absolute &quot;PUBLIC&quot; &quot;GAMES&quot;)
+                           :name &quot;CHESS&quot; :type &quot;DB&quot;))))
+<code class="t"> |&gt; </code> #P&quot;MY-LISPM:&gt;public&gt;games&gt;chess.db&quot;
+<code class="t"> |&gt; </code> #P&quot;MY-VAX:SYS$DISK:[PUBLIC.GAMES]CHESS.DB&quot;
+<code class="t"> |&gt; </code> #P&quot;MY-UNIX:/public/games/chess.db&quot;
+<code class="t"> |&gt; </code> #P&quot;MY-LISPM:&gt;public&gt;games&gt;chess.db&quot; 
+<code class="t"> |&gt; </code> #P&quot;MY-VAX:SYS$DISK:[PUBLIC.GAMES]CHESS.DB&quot; 
+<code class="t"> |&gt; </code> #P&quot;MY-UNIX:/PUBLIC/GAMES/CHESS.DB&quot; 
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-72"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-72"> &para;</a></span></h4>
+
+<p>The <i class="i">file system</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-413"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-413"> &para;</a></span></h4>
+
+<p><a class="ref" href="merge_002dpathnames.html">merge-pathnames                                                  [Function]</a>
+,
+<b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-275"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-275"> &para;</a></span></h4>
+
+<p>Portable programs should not supply <code class="t">:unspecific</code> for any component.
+See <a class="ref" href="_002d_003eUNSPECIFIC-as-a-Component-Value.html">:UNSPECIFIC as a Component Value</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="pathnamep.html">pathnamep                                                        [Function]</a>, Previous: <a href="pathname.html">pathname                                                         [Function]</a>, Up: <a href="Filenames-Dictionary.html">Filenames Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002drandom_002dstate.html
@@ -0,0 +1,111 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-random-state (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-random-state (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-random-state (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="random.html" rel="next" title="random">
+<link href="random_002dstate.html" rel="prev" title="random-state">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002drandom_002dstate">
+<div class="nav-panel">
+<p>
+Next: <a href="random.html" accesskey="n" rel="next">random                                                           [Function]</a>, Previous: <a href="random_002dstate.html" accesskey="p" rel="prev">random-state                                                 [System Class]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002drandom_002dstate-_005bFunction_005d"><span>12.2.40 make-random-state                                                [Function]<a class="copiable-link" href="#make_002drandom_002dstate-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-random-state</code>  <i class="i"><span class="r">&amp;optional</span> state</i> &rArr;  <i class="i">new-state</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-224"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-224"> &para;</a></span></h4>
+
+<p><i class="i">state</i>&mdash;a <i class="i">random state</i>, or <b class="b">nil</b>, or <b class="b">t</b>.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">new-state</i>&mdash;a <i class="i">random state</i> <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-305"><span>Description::<a class="copiable-link" href="#Description_003a_003a-305"> &para;</a></span></h4>
+
+<p>Creates a <i class="i">fresh</i> <i class="i">object</i> of <i class="i">type</i> <b class="b">random-state</b> suitable
+for use as the <i class="i">value</i> of <b class="b">*random-state*</b>.
+</p>
+<p>If <i class="i">state</i> is a <i class="i">random state</i> <i class="i">object</i>,
+the <i class="i">new-state</i> is a <i class="i">copy</i>_5 of that <i class="i">object</i>.
+If <i class="i">state</i> is <b class="b">nil</b>,
+the <i class="i">new-state</i> is a <i class="i">copy</i>_5 of the <i class="i">current random state</i>.
+If <i class="i">state</i> is <b class="b">t</b>,
+the <i class="i">new-state</i> is a <i class="i">fresh</i> <i class="i">random state</i> <i class="i">object</i>
+that has been randomly initialized by some means.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-208"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-208"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let* ((rs1 (make-random-state nil))
+        (rs2 (make-random-state t))
+        (rs3 (make-random-state rs2))
+        (rs4 nil))
+   (list (loop for i from 1 to 10 
+               collect (random 100)
+               when (= i 5)
+                do (setq rs4 (make-random-state)))
+         (loop for i from 1 to 10 collect (random 100 rs1))
+         (loop for i from 1 to 10 collect (random 100 rs2))
+         (loop for i from 1 to 10 collect (random 100 rs3))
+         (loop for i from 1 to 10 collect (random 100 rs4))))
+&rArr;  ((29 25 72 57 55 68 24 35 54 65)
+    (29 25 72 57 55 68 24 35 54 65)
+    (93 85 53 99 58 62 2 23 23 59)
+    (93 85 53 99 58 62 2 23 23 59)
+    (68 24 35 54 65 54 55 50 59 49))
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-93"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-93"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">state</i> is not a <i class="i">random state</i>, or <b class="b">nil</b>, or <b class="b">t</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-258"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-258"> &para;</a></span></h4>
+
+<p><a class="ref" href="random.html">random                                                           [Function]</a>
+, 
+<a class="ref" href="random_002dstate.html">random-state                                                 [System Class]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-155"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-155"> &para;</a></span></h4>
+
+<p>One important use of <b class="b">make-random-state</b> is to allow the same
+series of pseudo-random <i class="i">numbers</i> to be generated many times within a 
+single program.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="random.html">random                                                           [Function]</a>, Previous: <a href="random_002dstate.html">random-state                                                 [System Class]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dsequence.html
@@ -0,0 +1,123 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-sequence (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-sequence (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-sequence (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="subseq.html" rel="next" title="subseq">
+<link href="fill.html" rel="prev" title="fill">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dsequence">
+<div class="nav-panel">
+<p>
+Next: <a href="subseq.html" accesskey="n" rel="next">subseq                                                           [Accessor]</a>, Previous: <a href="fill.html" accesskey="p" rel="prev">fill                                                             [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dsequence-_005bFunction_005d"><span>17.3.5 make-sequence                                                    [Function]<a class="copiable-link" href="#make_002dsequence-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-sequence</code>  <i class="i">result-type size <span class="r">&amp;key</span> initial-element</i> &rArr;  <i class="i">sequence</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-357"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-357"> &para;</a></span></h4>
+
+<p><i class="i">result-type</i>&mdash;a <b class="b">sequence</b> <i class="i">type specifier</i>.
+</p>
+<p><i class="i">size</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<p><i class="i">initial-element</i>&mdash;an <i class="i">object</i>.
+ The default is <i class="i">implementation-dependent</i>.
+</p>
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-472"><span>Description::<a class="copiable-link" href="#Description_003a_003a-472"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">sequence</i> of the type <i class="i">result-type</i> and of length <i class="i">size</i>,
+each of the <i class="i">elements</i> of which has been initialized to <i class="i">initial-element</i>.
+</p>
+<p>If the <i class="i">result-type</i> is a <i class="i">subtype</i> of <b class="b">list</b>,
+the result will be a <i class="i">list</i>.
+</p>
+<p>If the <i class="i">result-type</i> is a <i class="i">subtype</i> of <b class="b">vector</b>,
+then if the implementation can determine the element type specified
+for the <i class="i">result-type</i>, the element type of the resulting array 
+is the result of <i class="i">upgrading</i> that element type; or, if the
+implementation can determine that the element type is unspecified (or <code class="t">*</code>),
+the element type of the resulting array is <b class="b">t</b>;
+otherwise, an error is signaled.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-339"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-339"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (make-sequence 'list 0) &rArr;  ()
+ (make-sequence 'string 26 :initial-element #\.) 
+&rArr;  &quot;..........................&quot;
+ (make-sequence '(vector double-float) 2
+                :initial-element 1d0)
+&rArr;  #(1.0d0 1.0d0)
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (make-sequence '(vector * 2) 3) should signal an error
+ (make-sequence '(vector * 4) 3) should signal an error
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-69"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-69"> &para;</a></span></h4>
+
+<p>The <i class="i">implementation</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-153"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-153"> &para;</a></span></h4>
+
+<p>The consequences are unspecified if <i class="i">initial-element</i> 
+is not an <i class="i">object</i> which can be stored in the resulting <i class="i">sequence</i>.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">type-error</b> must be signaled if the <i class="i">result-type</i> is neither
+     a <i class="i">recognizable subtype</i> of <b class="b">list</b>,
+ nor a <i class="i">recognizable subtype</i> of <b class="b">vector</b>.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">type-error</b> should be signaled if <i class="i">result-type</i> specifies 
+the number of elements and <i class="i">size</i> is different from that number.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-384"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-384"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002darray.html">make-array                                                       [Function]</a>
+, 
+<a class="ref" href="make_002dlist.html">make-list                                                        [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-259"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-259"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (make-sequence 'string 5) &equiv; (make-string 5)               
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="subseq.html">subseq                                                           [Accessor]</a>, Previous: <a href="fill.html">fill                                                             [Function]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dstring.html
@@ -0,0 +1,84 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-string (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-string (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-string (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Strings-Dictionary.html" rel="up" title="Strings Dictionary">
+<link href="stringp.html" rel="prev" title="stringp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dstring">
+<div class="nav-panel">
+<p>
+Previous: <a href="stringp.html" accesskey="p" rel="prev">stringp                                                          [Function]</a>, Up: <a href="Strings-Dictionary.html" accesskey="u" rel="up">Strings Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dstring-_005bFunction_005d"><span>16.2.12 make-string                                                      [Function]<a class="copiable-link" href="#make_002dstring-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-string</code>  <i class="i">size <span class="r">&amp;key</span> initial-element element-type</i> &rArr;  <i class="i">string</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-353"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-353"> &para;</a></span></h4>
+
+<p><i class="i">size</i>&mdash;a <i class="i">valid array dimension</i>.
+</p>
+<p><i class="i">initial-element</i>&mdash;a <i class="i">character</i>.
+</p>
+<p>The default is <i class="i">implementation-dependent</i>.
+</p>
+<p><i class="i">element-type</i>&mdash;a <i class="i">type specifier</i>.
+ The default is <b class="b">character</b>.
+</p>
+<p><i class="i">string</i>&mdash;a <i class="i">simple string</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-467"><span>Description::<a class="copiable-link" href="#Description_003a_003a-467"> &para;</a></span></h4>
+
+<p><b class="b">make-string</b> returns a <i class="i">simple string</i> of length <i class="i">size</i>
+whose elements have been initialized to <i class="i">initial-element</i>.
+</p>
+<p>The <i class="i">element-type</i> names the <i class="i">type</i> of the <i class="i">elements</i> of the <i class="i">string</i>;
+a <i class="i">string</i> is constructed of the most <i class="i">specialized</i>
+<i class="i">type</i> that can accommodate <i class="i">elements</i> of the given <i class="i">type</i>.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-335"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-335"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (make-string 10 :initial-element #\5) &rArr;  &quot;5555555555&quot;
+ (length (make-string 10)) &rArr;  10
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-68"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-68"> &para;</a></span></h4>
+
+<p>The <i class="i">implementation</i>.
+</p>
+
+
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dstring_002dinput_002dstream.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-string-input-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-string-input-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-string-input-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="make_002dstring_002doutput_002dstream.html" rel="next" title="make-string-output-stream">
+<link href="get_002doutput_002dstream_002dstring.html" rel="prev" title="get-output-stream-string">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dstring_002dinput_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dstring_002doutput_002dstream.html" accesskey="n" rel="next">make-string-output-stream                                        [Function]</a>, Previous: <a href="get_002doutput_002dstream_002dstring.html" accesskey="p" rel="prev">get-output-stream-string                                         [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dstring_002dinput_002dstream-_005bFunction_005d"><span>21.2.49 make-string-input-stream                                         [Function]<a class="copiable-link" href="#make_002dstring_002dinput_002dstream-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-string-input-stream</code>  <i class="i">string <span class="r">&amp;optional</span> start end</i> &rArr;  <i class="i">string-stream</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-450"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-450"> &para;</a></span></h4>
+
+<p><i class="i">string</i>&mdash;a <i class="i">string</i>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">string</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">string-stream</i>&mdash;an <i class="i">input</i> <i class="i">string stream</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-580"><span>Description::<a class="copiable-link" href="#Description_003a_003a-580"> &para;</a></span></h4>
+
+<p>Returns an <i class="i">input</i> <i class="i">string stream</i>.  
+This <i class="i">stream</i> will supply, in order, the <i class="i">characters</i> in the substring
+of <i class="i">string</i> <i class="i">bounded</i> by <i class="i">start</i> and <i class="i">end</i>.
+After the last <i class="i">character</i> has been supplied, 
+the <i class="i">string stream</i> will then be at <i class="i">end of file</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-421"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-421"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((string-stream (make-string-input-stream &quot;1 one &quot;)))
+   (list (read string-stream nil nil)
+         (read string-stream nil nil)
+         (read string-stream nil nil)))
+&rArr;  (1 ONE NIL)
+
+ (read (make-string-input-stream &quot;prefixtargetsuffix&quot; 6 12)) &rArr;  TARGET
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-471"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-471"> &para;</a></span></h4>
+
+<p><a class="ref" href="with_002dinput_002dfrom_002dstring.html">with-input-from-string                                              [Macro]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dstring_002doutput_002dstream.html
@@ -0,0 +1,84 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-string-output-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-string-output-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-string-output-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="with_002dinput_002dfrom_002dstring.html" rel="next" title="with-input-from-string">
+<link href="make_002dstring_002dinput_002dstream.html" rel="prev" title="make-string-input-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dstring_002doutput_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="with_002dinput_002dfrom_002dstring.html" accesskey="n" rel="next">with-input-from-string                                              [Macro]</a>, Previous: <a href="make_002dstring_002dinput_002dstream.html" accesskey="p" rel="prev">make-string-input-stream                                         [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dstring_002doutput_002dstream-_005bFunction_005d"><span>21.2.50 make-string-output-stream                                        [Function]<a class="copiable-link" href="#make_002dstring_002doutput_002dstream-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-string-output-stream</code>  <i class="i"><span class="r">&amp;key</span> element-type</i> &rArr;  <i class="i">string-stream</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-451"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-451"> &para;</a></span></h4>
+
+<p><i class="i">element-type</i>&mdash;a <i class="i">type specifier</i>.
+  The default is <b class="b">character</b>.
+</p>
+<p><i class="i">string-stream</i>&mdash;an <i class="i">output</i> <i class="i">string stream</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-581"><span>Description::<a class="copiable-link" href="#Description_003a_003a-581"> &para;</a></span></h4>
+
+<p>Returns
+</p>
+<p>an <i class="i">output</i> <i class="i">string stream</i> that accepts <i class="i">characters</i>
+and makes available (via <b class="b">get-output-stream-string</b>)
+a <i class="i">string</i> that contains the <i class="i">characters</i> that were actually output.
+</p>
+<p>The <i class="i">element-type</i> names the <i class="i">type</i> of the <i class="i">elements</i>
+of the <i class="i">string</i>; a <i class="i">string</i> is constructed of the most specialized
+<i class="i">type</i> that can accommodate <i class="i">elements</i> of that <i class="i">element-type</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-422"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-422"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((s (make-string-output-stream)))
+   (write-string &quot;testing... &quot; s)
+   (prin1 1234 s)
+   (get-output-stream-string s))
+&rArr;  &quot;testing... 1234&quot;
+</pre></div>
+
+<p>None..
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-472"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-472"> &para;</a></span></h4>
+
+<p><a class="ref" href="get_002doutput_002dstream_002dstring.html">get-output-stream-string                                         [Function]</a>
+, 
+<a class="ref" href="with_002doutput_002dto_002dstring.html">with-output-to-string                                               [Macro]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dsymbol.html
@@ -0,0 +1,99 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-symbol (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-symbol (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-symbol (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="copy_002dsymbol.html" rel="next" title="copy-symbol">
+<link href="keywordp.html" rel="prev" title="keywordp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dsymbol">
+<div class="nav-panel">
+<p>
+Next: <a href="copy_002dsymbol.html" accesskey="n" rel="next">copy-symbol                                                      [Function]</a>, Previous: <a href="keywordp.html" accesskey="p" rel="prev">keywordp                                                         [Function]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dsymbol-_005bFunction_005d"><span>10.2.5 make-symbol                                                      [Function]<a class="copiable-link" href="#make_002dsymbol-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-symbol</code>  <i class="i">name</i> &rArr;  <i class="i">new-symbol</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-160"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-160"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">string</i>.
+</p>
+<p><i class="i">new-symbol</i>&mdash;a <i class="i">fresh</i>, <i class="i">uninterned</i> <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-221"><span>Description::<a class="copiable-link" href="#Description_003a_003a-221"> &para;</a></span></h4>
+
+<p><b class="b">make-symbol</b> creates and returns a <i class="i">fresh</i>, <i class="i">uninterned</i>
+<i class="i">symbol</i> whose <i class="i">name</i> is the given <i class="i">name</i>.
+The <i class="i">new-symbol</i> is neither <i class="i">bound</i> nor <i class="i">fbound</i> 
+and has a <i class="i">null</i> <i class="i">property list</i>.
+</p>
+<p>It is <i class="i">implementation-dependent</i> whether the <i class="i">string</i> 
+that becomes the <i class="i">new-symbol</i>&rsquo;s <i class="i">name</i> is the given
+<i class="i">name</i> or a copy of it.  Once a <i class="i">string</i>
+has been given as the <i class="i">name</i> <i class="i">argument</i> to
+<i class="i">make-symbol</i>, the consequences are undefined if a
+subsequent attempt is made to alter that <i class="i">string</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-143"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-143"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq temp-string &quot;temp&quot;) &rArr;  &quot;temp&quot;
+ (setq temp-symbol (make-symbol temp-string)) &rArr;  #:|temp|
+ (symbol-name temp-symbol) &rArr;  &quot;temp&quot;
+ (eq (symbol-name temp-symbol) temp-string) &rArr;  <i class="i">implementation-dependent</i>
+ (find-symbol &quot;temp&quot;) &rArr;  NIL, NIL
+ (eq (make-symbol temp-string) (make-symbol temp-string)) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-50"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-50"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">name</i> is not a <i class="i">string</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-195"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-195"> &para;</a></span></h4>
+
+<p><a class="ref" href="copy_002dsymbol.html">copy-symbol                                                      [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-116"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-116"> &para;</a></span></h4>
+
+<p>No attempt is made by <b class="b">make-symbol</b> to convert the case
+of the <i class="i">name</i> to uppercase.  The only case conversion which ever 
+occurs for <i class="i">symbols</i> is done by the <i class="i">Lisp reader</i>.
+The program interface to <i class="i">symbol</i> creation retains case,
+and the program interface to interning symbols is case-sensitive.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="copy_002dsymbol.html">copy-symbol                                                      [Function]</a>, Previous: <a href="keywordp.html">keywordp                                                         [Function]</a>, Up: <a href="Symbols-Dictionary.html">Symbols Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dsynonym_002dstream.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-synonym-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-synonym-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-synonym-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="synonym_002dstream_002dsymbol.html" rel="next" title="synonym-stream-symbol">
+<link href="y_002dor_002dn_002dp.html" rel="prev" title="y-or-n-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dsynonym_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="synonym_002dstream_002dsymbol.html" accesskey="n" rel="next">synonym-stream-symbol                                            [Function]</a>, Previous: <a href="y_002dor_002dn_002dp.html" accesskey="p" rel="prev">y-or-n-p, yes-or-no-p                                            [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dsynonym_002dstream-_005bFunction_005d"><span>21.2.38 make-synonym-stream                                              [Function]<a class="copiable-link" href="#make_002dsynonym_002dstream-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-synonym-stream</code>  <i class="i">symbol</i> &rArr;  <i class="i">synonym-stream</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-439"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-439"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i> that names a <i class="i">dynamic variable</i>.
+</p>
+<p><i class="i">synonym-stream</i>&mdash;a <i class="i">synonym stream</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-569"><span>Description::<a class="copiable-link" href="#Description_003a_003a-569"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">synonym stream</i> whose <i class="i">synonym stream symbol</i> is <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-415"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-415"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq a-stream (make-string-input-stream &quot;a-stream&quot;)
+        b-stream (make-string-input-stream &quot;b-stream&quot;))
+&rArr;  #&lt;String Input Stream&gt; 
+ (setq s-stream (make-synonym-stream 'c-stream))
+&rArr;  #&lt;SYNONYM-STREAM for C-STREAM&gt; 
+ (setq c-stream a-stream)
+&rArr;  #&lt;String Input Stream&gt; 
+ (read s-stream) &rArr;  A-STREAM
+ (setq c-stream b-stream)
+&rArr;  #&lt;String Input Stream&gt; 
+ (read s-stream) &rArr;  B-STREAM
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-211"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-211"> &para;</a></span></h4>
+
+<p>Should signal <b class="b">type-error</b> if its argument is not a <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-465"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-465"> &para;</a></span></h4>
+
+<p><a class="ref" href="Stream-Concepts.html">Stream Concepts</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/make_002dtwo_002dway_002dstream.html
@@ -0,0 +1,78 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>make-two-way-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="make-two-way-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="make-two-way-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="two_002dway_002dstream_002dinput_002dstream.html" rel="next" title="two-way-stream-input-stream">
+<link href="make_002dbroadcast_002dstream.html" rel="prev" title="make-broadcast-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="make_002dtwo_002dway_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="two_002dway_002dstream_002dinput_002dstream.html" accesskey="n" rel="next">two-way-stream-input-stream, two-way-stream-output-stream</a>, Previous: <a href="make_002dbroadcast_002dstream.html" accesskey="p" rel="prev">make-broadcast-stream                                            [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="make_002dtwo_002dway_002dstream-_005bFunction_005d"><span>21.2.42 make-two-way-stream                                              [Function]<a class="copiable-link" href="#make_002dtwo_002dway_002dstream-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">make-two-way-stream</code>  <i class="i">input-stream output-stream</i> &rArr;  <i class="i">two-way-stream</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-443"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-443"> &para;</a></span></h4>
+
+<p><i class="i">input-stream</i>&mdash;a <i class="i">stream</i>.
+</p>
+<p><i class="i">output-stream</i>&mdash;a <i class="i">stream</i>.
+</p>
+<p><i class="i">two-way-stream</i>&mdash;a <i class="i">two-way stream</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-573"><span>Description::<a class="copiable-link" href="#Description_003a_003a-573"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">two-way stream</i> 
+that gets  its input  from <i class="i">input-stream</i>
+and  sends its output to   <i class="i">output-stream</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-417"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-417"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (with-output-to-string (out)
+    (with-input-from-string (in &quot;input...&quot;)
+      (let ((two (make-two-way-stream in out)))
+        (format two &quot;output...&quot;)
+        (setq what-is-read (read two))))) &rArr;  &quot;output...&quot;
+ what-is-read &rArr;  INPUT... 
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-213"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-213"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">input-stream</i> is not an <i class="i">input</i> <i class="i">stream</i>.
+Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">output-stream</i> is not an <i class="i">output</i> <i class="i">stream</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/makunbound.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>makunbound (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="makunbound (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="makunbound (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="set.html" rel="next" title="set">
+<link href="boundp.html" rel="prev" title="boundp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="makunbound">
+<div class="nav-panel">
+<p>
+Next: <a href="set.html" accesskey="n" rel="next">set                                                              [Function]</a>, Previous: <a href="boundp.html" accesskey="p" rel="prev">boundp                                                           [Function]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="makunbound-_005bFunction_005d"><span>10.2.18 makunbound                                                       [Function]<a class="copiable-link" href="#makunbound-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">makunbound</code>  <i class="i">symbol</i> &rArr;  <i class="i">symbol</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-172"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-172"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-234"><span>Description::<a class="copiable-link" href="#Description_003a_003a-234"> &para;</a></span></h4>
+
+<p>Makes the <i class="i">symbol</i> be <i class="i">unbound</i>,
+regardless of whether it was previously <i class="i">bound</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-155"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-155"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setf (symbol-value 'a) 1)
+ (boundp 'a) &rArr;  <i class="i">true</i>
+ a &rArr;  1
+ (makunbound 'a) &rArr;  A
+ (boundp 'a) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-22"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-22"> &para;</a></span></h4>
+
+<p>The <i class="i">value cell</i> of <i class="i">symbol</i> is modified.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-62"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-62"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">symbol</i> is not a <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-207"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-207"> &para;</a></span></h4>
+
+<p><a class="ref" href="boundp.html">boundp                                                           [Function]</a>
+, 
+<a class="ref" href="fmakunbound.html">fmakunbound                                                      [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/map.html
@@ -0,0 +1,135 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>map (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="map (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="map (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="map_002dinto.html" rel="next" title="map-into">
+<link href="subseq.html" rel="prev" title="subseq">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="map">
+<div class="nav-panel">
+<p>
+Next: <a href="map_002dinto.html" accesskey="n" rel="next">map-into                                                         [Function]</a>, Previous: <a href="subseq.html" accesskey="p" rel="prev">subseq                                                           [Accessor]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="map-_005bFunction_005d"><span>17.3.7 map                                                              [Function]<a class="copiable-link" href="#map-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">map</code>  <i class="i">result-type function <span class="r">&amp;rest</span> sequences^+</i> &rArr;  <i class="i">result</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-359"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-359"> &para;</a></span></h4>
+
+<p><i class="i">result-type</i> &ndash; a <b class="b">sequence</b> <i class="i">type specifier</i>, or <b class="b">nil</b>.
+</p>
+<p><i class="i">function</i>&mdash;a <i class="i">function designator</i>.
+  <i class="i">function</i> must take as many arguments as 
+  there are <i class="i">sequences</i>.
+</p>
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">result</i>&mdash;if <i class="i">result-type</i> is a <i class="i">type specifier</i> other than <b class="b">nil</b>, 
+		 then a <i class="i">sequence</i> of the <i class="i">type</i> it denotes;
+		 otherwise (if the <i class="i">result-type</i> is <b class="b">nil</b>), <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-474"><span>Description::<a class="copiable-link" href="#Description_003a_003a-474"> &para;</a></span></h4>
+
+<p>Applies <i class="i">function</i> to successive sets of arguments in which
+one argument is obtained from each <i class="i">sequence</i>.
+The <i class="i">function</i> is called first on all the elements with index <code class="t">0</code>,
+then on all those with index <code class="t">1</code>, and so on.
+The <i class="i">result-type</i> specifies the <i class="i">type</i> of the resulting <i class="i">sequence</i>.
+</p>
+<p><b class="b">map</b> returns <b class="b">nil</b> if <i class="i">result-type</i> is <b class="b">nil</b>.      
+Otherwise, <b class="b">map</b> returns
+a <i class="i">sequence</i> such that element <code class="t">j</code> is the result
+of applying <i class="i">function</i> to element <code class="t">j</code> of each of the 
+<i class="i">sequences</i>.  The result <i class="i">sequence</i> 
+is as long as the shortest of the
+<i class="i">sequences</i>.
+The consequences are undefined if the result of applying <i class="i">function</i> 
+to the successive elements of the <i class="i">sequences</i> cannot
+be contained in a <i class="i">sequence</i> of the <i class="i">type</i> given by <i class="i">result-type</i>.
+</p>
+<p>If the <i class="i">result-type</i> is a <i class="i">subtype</i> of <b class="b">list</b>,
+the result will be a <i class="i">list</i>.
+</p>
+<p>If the <i class="i">result-type</i> is a <i class="i">subtype</i> of <b class="b">vector</b>,
+then if the implementation can determine the element type specified
+for the <i class="i">result-type</i>, the element type of the resulting array 
+is the result of <i class="i">upgrading</i> that element type; or, if the
+implementation can determine that the element type is unspecified (or <code class="t">*</code>),
+the element type of the resulting array is <b class="b">t</b>;
+otherwise, an error is signaled.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-341"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-341"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (map 'string #'(lambda (x y)
+                  (char &quot;01234567890ABCDEF&quot; (mod (+ x y) 16)))
+       '(1 2 3 4)
+       '(10 9 8 7)) &rArr;  &quot;AAAA&quot;
+ (setq seq '(&quot;lower&quot; &quot;UPPER&quot; &quot;&quot; &quot;123&quot;)) &rArr;  (&quot;lower&quot; &quot;UPPER&quot; &quot;&quot; &quot;123&quot;)
+ (map nil #'nstring-upcase seq) &rArr;  NIL
+ seq &rArr;  (&quot;LOWER&quot; &quot;UPPER&quot; &quot;&quot; &quot;123&quot;)
+ (map 'list #'- '(1 2 3 4)) &rArr;  (-1 -2 -3 -4)
+ (map 'string
+      #'(lambda (x) (if (oddp x) #\1 #\0))
+      '(1 2 3 4)) &rArr;  &quot;1010&quot;
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (map '(vector * 4) #'cons &quot;abc&quot; &quot;de&quot;) should signal an error
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-155"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-155"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">type-error</b> must be signaled if the <i class="i">result-type</i> is 
+     not a <i class="i">recognizable subtype</i> of <b class="b">list</b>,
+     not a <i class="i">recognizable subtype</i> of <b class="b">vector</b>,
+ and not <b class="b">nil</b>.
+</p>
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			    if any <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">type-error</b> should be signaled
+if <i class="i">result-type</i> specifies the
+number of elements and the minimum length of the <i class="i">sequences</i> 
+is different from that number.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-386"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-386"> &para;</a></span></h4>
+
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="map_002dinto.html">map-into                                                         [Function]</a>, Previous: <a href="subseq.html">subseq                                                           [Accessor]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/map_002dinto.html
@@ -0,0 +1,127 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>map-into (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="map-into (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="map-into (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="reduce.html" rel="next" title="reduce">
+<link href="map.html" rel="prev" title="map">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="map_002dinto">
+<div class="nav-panel">
+<p>
+Next: <a href="reduce.html" accesskey="n" rel="next">reduce                                                           [Function]</a>, Previous: <a href="map.html" accesskey="p" rel="prev">map                                                              [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="map_002dinto-_005bFunction_005d"><span>17.3.8 map-into                                                         [Function]<a class="copiable-link" href="#map_002dinto-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">map-into</code>  <i class="i">result-sequence function <span class="r">&amp;rest</span> sequences</i> &rArr;  <i class="i">result-sequence</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-360"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-360"> &para;</a></span></h4>
+
+<p><i class="i">result-sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">function</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i>
+		   of as many <i class="i">arguments</i> as there are <i class="i">sequences</i>.
+</p>
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-475"><span>Description::<a class="copiable-link" href="#Description_003a_003a-475"> &para;</a></span></h4>
+
+<p>Destructively modifies <i class="i">result-sequence</i> to contain the results of
+applying <i class="i">function</i> to each element in the argument <i class="i">sequences</i> 
+in turn.
+</p>
+<p><i class="i">result-sequence</i> and each element of <i class="i">sequences</i> can each be
+either a <i class="i">list</i> or a <i class="i">vector</i>. 
+If <i class="i">result-sequence</i> and each element of <i class="i">sequences</i> are not all
+the same length, the iteration terminates when the shortest <i class="i">sequence</i>
+(of any of the <i class="i">sequences</i> or the <i class="i">result-sequence</i>)
+is exhausted.
+If <i class="i">result-sequence</i> is a <i class="i">vector</i> with a 
+<i class="i">fill pointer</i>, the <i class="i">fill pointer</i> is ignored when deciding how
+many iterations to perform, and afterwards the <i class="i">fill pointer</i> is set to
+the number of times <i class="i">function</i> was applied.
+If <i class="i">result-sequence</i> is longer than the shortest element of <i class="i">sequences</i>,
+extra elements at the end of <i class="i">result-sequence</i> are left unchanged.
+If <i class="i">result-sequence</i> is <b class="b">nil</b>, <b class="b">map-into</b> immediately returns
+<b class="b">nil</b>, since <b class="b">nil</b> is a <i class="i">sequence</i> of length zero.
+</p>
+<p>If <i class="i">function</i> has side effects, it can count on being called
+first on all of the elements with index 0, then on all of those 
+numbered 1, and so on.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-342"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-342"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq a (list 1 2 3 4) b (list 10 10 10 10)) &rArr;  (10 10 10 10)
+ (map-into a #'+ a b) &rArr;  (11 12 13 14)
+ a &rArr;  (11 12 13 14)
+ b &rArr;  (10 10 10 10)
+ (setq k '(one two three)) &rArr;  (ONE TWO THREE)
+ (map-into a #'cons k a) &rArr;  ((ONE . 11) (TWO . 12) (THREE . 13) 14)
+ (map-into a #'gensym) &rArr;  (#:G9090 #:G9091 #:G9092 #:G9093)
+ a &rArr;  (#:G9090 #:G9091 #:G9092 #:G9093)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-156"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-156"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">result-sequence</i> is not a <i class="i">proper sequence</i>.
+Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-260"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-260"> &para;</a></span></h4>
+
+<p><b class="b">map-into</b> differs from <b class="b">map</b> in that it modifies an
+existing <i class="i">sequence</i> rather than creating a new one.
+In addition, <b class="b">map-into</b> can be called with only two 
+arguments, while <b class="b">map</b> requires at least three arguments.
+</p>
+<p><b class="b">map-into</b> could be defined by:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun map-into (result-sequence function &amp;rest sequences)
+   (loop for index below (apply #'min 
+                                (length result-sequence)
+                                (mapcar #'length sequences))
+         do (setf (elt result-sequence index)
+                  (apply function
+                         (mapcar #'(lambda (seq) (elt seq index))
+                                 sequences))))
+   result-sequence)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="reduce.html">reduce                                                           [Function]</a>, Previous: <a href="map.html">map                                                              [Function]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/mapc.html
@@ -0,0 +1,190 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>mapc (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="mapc (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="mapc (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="acons.html" rel="next" title="acons">
+<link href="member-_0028Function_0029.html" rel="prev" title="member (Function)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="mapc">
+<div class="nav-panel">
+<p>
+Next: <a href="acons.html" accesskey="n" rel="next">acons                                                            [Function]</a>, Previous: <a href="member-_0028Function_0029.html" accesskey="p" rel="prev">member, member-if, member-if-not                                 [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="mapc_002c-mapcar_002c-mapcan_002c-mapl_002c-maplist_002c-mapcon-_005bFunction_005d"><span>14.2.34 mapc, mapcar, mapcan, mapl, maplist, mapcon                      [Function]<a class="copiable-link" href="#mapc_002c-mapcar_002c-mapcan_002c-mapl_002c-maplist_002c-mapcon-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">mapc</code>  <i class="i">function <span class="r">&amp;rest</span> lists^+</i> &rArr;  <i class="i">list-1</i>
+</p>
+<p><code class="code">mapcar</code>  <i class="i">function <span class="r">&amp;rest</span> lists^+</i> &rArr;  <i class="i">result-list</i>
+</p>
+<p><code class="code">mapcan</code>  <i class="i">function <span class="r">&amp;rest</span> lists^+</i> &rArr;  <i class="i">concatenated-results</i>
+</p>
+<p><code class="code">mapl</code>  <i class="i">function <span class="r">&amp;rest</span> lists^+</i> &rArr;  <i class="i">list-1</i>
+</p>
+<p><code class="code">maplist</code>  <i class="i">function <span class="r">&amp;rest</span> lists^+</i> &rArr;  <i class="i">result-list</i>
+</p>
+<p><code class="code">mapcon</code>  <i class="i">function <span class="r">&amp;rest</span> lists^+</i> &rArr;  <i class="i">concatenated-results</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-303"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-303"> &para;</a></span></h4>
+
+<p><i class="i">function</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> 
+  that must take as many <i class="i">arguments</i> as there are <i class="i">lists</i>.
+</p>
+<p><i class="i">list</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<p><i class="i">list-1</i>&mdash;the first <i class="i">list</i> (which must be a <i class="i">proper list</i>).
+</p>
+<p><i class="i">result-list</i>&mdash;a <i class="i">list</i>.
+</p>
+<p><i class="i">concatenated-results</i>&mdash;a <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-404"><span>Description::<a class="copiable-link" href="#Description_003a_003a-404"> &para;</a></span></h4>
+
+<p>The mapping operation involves applying <i class="i">function</i> to
+successive sets of arguments in which
+one argument is obtained from each <i class="i">sequence</i>.
+Except for <b class="b">mapc</b> and <b class="b">mapl</b>,
+the result contains the results returned by <i class="i">function</i>.
+In the cases of <b class="b">mapc</b> and <b class="b">mapl</b>,
+the resulting <i class="i">sequence</i> is <i class="i">list</i>.
+</p>
+<p><i class="i">function</i> is called
+first on all the elements with index <code class="t">0</code>, then on all those
+with index <code class="t">1</code>, and so on.
+<i class="i">result-type</i> specifies the <i class="i">type</i> of
+the 
+resulting <i class="i">sequence</i>.
+</p>
+<p>If <i class="i">function</i> is a <i class="i">symbol</i>, it is <b class="b">coerce</b>d
+to a <i class="i">function</i> as if by <b class="b">symbol-function</b>.
+</p>
+<p><b class="b">mapcar</b> operates on successive <i class="i">elements</i> of the <i class="i">lists</i>.
+<i class="i">function</i> is applied to the first <i class="i">element</i> of each <i class="i">list</i>,
+then to the second <i class="i">element</i> of each <i class="i">list</i>, and so on.
+The iteration terminates when the shortest <i class="i">list</i> runs out,
+and excess elements in other lists are ignored.
+The value returned by <b class="b">mapcar</b> is a <i class="i">list</i>
+of the results of successive calls to <i class="i">function</i>.
+</p>
+<p><b class="b">mapc</b> is like <b class="b">mapcar</b> except that the results of 
+applying <i class="i">function</i> are not accumulated.
+The <i class="i">list</i> argument is returned.
+</p>
+<p><b class="b">maplist</b> is like <b class="b">mapcar</b> except that
+<i class="i">function</i> is applied to successive sublists of the <i class="i">lists</i>.
+<i class="i">function</i> 
+is first applied to the <i class="i">lists</i> themselves, 
+and then to the <i class="i">cdr</i> of each
+<i class="i">list</i>, and then to the <i class="i">cdr</i> of the <i class="i">cdr</i>
+of each <i class="i">list</i>, and so on.  
+</p>
+<p><b class="b">mapl</b> is like <b class="b">maplist</b> except that the results of 
+applying <i class="i">function</i> are not accumulated;
+<i class="i">list-1</i> is returned.
+</p>
+<p><b class="b">mapcan</b> and <b class="b">mapcon</b> are like <b class="b">mapcar</b> and
+<b class="b">maplist</b> respectively, except that the results of
+applying <i class="i">function</i> are combined 
+into a <i class="i">list</i> by the use of <b class="b">nconc</b>
+rather than <b class="b">list</b>.
+That is,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (mapcon f x1 ... xn)
+   &equiv; (apply #'nconc (maplist f x1 ... xn))
+</pre></div>
+
+<p>and similarly for the relationship between <b class="b">mapcan</b> 
+and <b class="b">mapcar</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-287"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-287"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (mapcar #'car '((1 a) (2 b) (3 c))) &rArr;  (1 2 3) 
+ (mapcar #'abs '(3 -4 2 -5 -6)) &rArr;  (3 4 2 5 6)
+ (mapcar #'cons '(a b c) '(1 2 3)) &rArr;  ((A . 1) (B . 2) (C . 3))
+
+ (maplist #'append '(1 2 3 4) '(1 2) '(1 2 3)) 
+&rArr;  ((1 2 3 4 1 2 1 2 3) (2 3 4 2 2 3)) 
+ (maplist #'(lambda (x) (cons 'foo x)) '(a b c d))
+&rArr;  ((FOO A B C D) (FOO B C D) (FOO C D) (FOO D))
+ (maplist #'(lambda (x) (if (member (car x) (cdr x)) 0 1)) '(a b a c d b c))
+&rArr;  (0 0 1 0 1 1 1)
+;An entry is 1 if the corresponding element of the input
+;  list was the last instance of that element in the input list.
+
+ (setq dummy nil) &rArr;  NIL 
+ (mapc #'(lambda (&amp;rest x) (setq dummy (append dummy x)))
+        '(1 2 3 4)
+        '(a b c d e)
+        '(x y z)) &rArr;  (1 2 3 4) 
+ dummy &rArr;  (1 A X 2 B Y 3 C Z)                   
+
+ (setq dummy nil) &rArr;  NIL 
+ (mapl #'(lambda (x) (push x dummy)) '(1 2 3 4)) &rArr;  (1 2 3 4) 
+ dummy &rArr;  ((4) (3 4) (2 3 4) (1 2 3 4)) 
+
+ (mapcan #'(lambda (x y) (if (null x) nil (list x y)))
+          '(nil nil nil d e)
+          '(1 2 3 4 5 6)) &rArr;  (D 4 E 5) 
+ (mapcan #'(lambda (x) (and (numberp x) (list x)))
+          '(a 1 b c 3 4 d 5))
+&rArr;  (1 3 4 5)
+</pre></div>
+
+<p>In this case the function serves as a filter; 
+this is a standard <span class="r">Lisp</span> idiom using <b class="b">mapcan</b>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (mapcon #'list '(1 2 3 4)) &rArr;  ((1 2 3 4) (2 3 4) (3 4) (4)) 
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-129"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-129"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			    if any <i class="i">list</i> is not a <i class="i">proper list</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-328"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-328"> &para;</a></span></h4>
+
+<p><a class="ref" href="dolist.html">dolist                                                              [Macro]</a>
+,
+<a class="ref" href="map.html">map                                                              [Function]</a>
+,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="acons.html">acons                                                            [Function]</a>, Previous: <a href="member-_0028Function_0029.html">member, member-if, member-if-not                                 [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/maphash.html
@@ -0,0 +1,110 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>maphash (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="maphash (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="maphash (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Tables-Dictionary.html" rel="up" title="Hash Tables Dictionary">
+<link href="with_002dhash_002dtable_002diterator.html" rel="next" title="with-hash-table-iterator">
+<link href="remhash.html" rel="prev" title="remhash">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="maphash">
+<div class="nav-panel">
+<p>
+Next: <a href="with_002dhash_002dtable_002diterator.html" accesskey="n" rel="next">with-hash-table-iterator                                            [Macro]</a>, Previous: <a href="remhash.html" accesskey="p" rel="prev">remhash                                                          [Function]</a>, Up: <a href="Hash-Tables-Dictionary.html" accesskey="u" rel="up">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="maphash-_005bFunction_005d"><span>18.2.11 maphash                                                          [Function]<a class="copiable-link" href="#maphash-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">maphash</code>  <i class="i">function hash-table</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-385"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-385"> &para;</a></span></h4>
+
+<p><i class="i">function</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>,
+		     the <i class="i">key</i> and the <i class="i">value</i>.
+</p>
+<p><i class="i">hash-table</i>&mdash;a <i class="i">hash table</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-501"><span>Description::<a class="copiable-link" href="#Description_003a_003a-501"> &para;</a></span></h4>
+
+<p>Iterates over all entries in the <i class="i">hash-table</i>.  For each entry,
+the <i class="i">function</i> is called with two <i class="i">arguments</i>&ndash;the <i class="i">key</i> 
+and the <i class="i">value</i> of that entry.
+</p>
+<p>The consequences are unspecified if any attempt is made to add or remove
+an entry from the <i class="i">hash-table</i> while a <b class="b">maphash</b> is in progress,
+with two exceptions:
+   the <i class="i">function</i> can use can use <b class="b">setf</b> of <b class="b">gethash</b>
+   to change the <i class="i">value</i> part of the entry currently being processed, 
+or it can use <b class="b">remhash</b> to remove that entry.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-365"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-365"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq table (make-hash-table)) &rArr;  #&lt;HASH-TABLE EQL 0/120 32304110&gt;
+ (dotimes (i 10) (setf (gethash i table) i)) &rArr;  NIL
+ (let ((sum-of-squares 0))
+    (maphash #'(lambda (key val) 
+                 (let ((square (* val val)))
+                   (incf sum-of-squares square)
+                   (setf (gethash key table) square)))
+             table)
+    sum-of-squares) &rArr;  285
+ (hash-table-count table) &rArr;  10
+ (maphash #'(lambda (key val)
+               (when (oddp val) (remhash key table)))
+           table) &rArr;  NIL
+ (hash-table-count table) &rArr;  5
+ (maphash #'(lambda (k v) (print (list k v))) table)
+(0 0) 
+(8 64) 
+(2 4) 
+(6 36) 
+(4 16) 
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-58"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-58"> &para;</a></span></h4>
+
+<p>None, other than any which might be done by the <i class="i">function</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-409"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-409"> &para;</a></span></h4>
+
+<p><a class="ref" href="loop.html">loop                                                                [Macro]</a>
+,
+<a class="ref" href="with_002dhash_002dtable_002diterator.html">with-hash-table-iterator                                            [Macro]</a>
+,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="with_002dhash_002dtable_002diterator.html">with-hash-table-iterator                                            [Macro]</a>, Previous: <a href="remhash.html">remhash                                                          [Function]</a>, Up: <a href="Hash-Tables-Dictionary.html">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/mask_002dfield.html
@@ -0,0 +1,99 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>mask-field (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="mask-field (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="mask-field (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="most_002dpositive_002dfixnum.html" rel="next" title="most-positive-fixnum">
+<link href="ldb_002dtest.html" rel="prev" title="ldb-test">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="mask_002dfield">
+<div class="nav-panel">
+<p>
+Next: <a href="most_002dpositive_002dfixnum.html" accesskey="n" rel="next">most-positive-fixnum, most-negative-fixnum              [Constant Variable]</a>, Previous: <a href="ldb_002dtest.html" accesskey="p" rel="prev">ldb-test                                                         [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="mask_002dfield-_005bAccessor_005d"><span>12.2.71 mask-field                                                       [Accessor]<a class="copiable-link" href="#mask_002dfield-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">mask-field</code>  <i class="i">bytespec integer</i> &rArr;  <i class="i">masked-integer</i>
+</p>
+<p>(setf (<code class="code">         mask-field</code> <i class="i">bytespec place</i>) new-masked-integer)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-253"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-253"> &para;</a></span></h4>
+
+<p><i class="i">bytespec</i>&mdash;a <i class="i">byte specifier</i>.
+</p>
+<p><i class="i">integer</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">masked-integer</i>, <i class="i">new-masked-integer</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-336"><span>Description::<a class="copiable-link" href="#Description_003a_003a-336"> &para;</a></span></h4>
+
+<p><b class="b">mask-field</b> performs a &ldquo;mask&rdquo; operation on <i class="i">integer</i>.
+It returns an <i class="i">integer</i> that has the same bits as <i class="i">integer</i> in 
+the <i class="i">byte</i> specified by <i class="i">bytespec</i>, but that has zero-bits everywhere else.
+</p>
+<p><b class="b">setf</b> may be used with <b class="b">mask-field</b>
+to modify a byte within the <i class="i">integer</i> that is stored
+in a given <i class="i">place</i>.
+The effect is to perform a <b class="b">deposit-field</b> operation
+and then store the result back into the <i class="i">place</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-238"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-238"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (mask-field (byte 1 5) -1) &rArr;  32
+ (setq a 15) &rArr;  15
+ (mask-field (byte 2 0) a) &rArr;  3
+ a &rArr;  15
+ (setf (mask-field (byte 2 0) a) 1) &rArr;  1
+ a &rArr;  13
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-278"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-278"> &para;</a></span></h4>
+
+<p><a class="ref" href="byte.html">byte, byte-size, byte-position                                   [Function]</a>
+,
+<a class="ref" href="ldb.html">ldb                                                              [Accessor]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-181"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-181"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (ldb <i class="i">bs</i> (mask-field <i class="i">bs</i> <i class="i">n</i>)) &equiv; (ldb <i class="i">bs</i> <i class="i">n</i>)
+ (logbitp <i class="i">j</i> (mask-field (byte <i class="i">s</i> <i class="i">p</i>) <i class="i">n</i>))
+   &equiv; (and (&gt;= <i class="i">j</i> <i class="i">p</i>) (&lt; <i class="i">j</i> <i class="i">s</i>) (logbitp <i class="i">j</i> <i class="i">n</i>))
+ (mask-field <i class="i">bs</i> <i class="i">n</i>) &equiv; (logand <i class="i">n</i> (dpb -1 <i class="i">bs</i> 0))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="most_002dpositive_002dfixnum.html">most-positive-fixnum, most-negative-fixnum              [Constant Variable]</a>, Previous: <a href="ldb_002dtest.html">ldb-test                                                         [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/max.html
@@ -0,0 +1,125 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>max (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="max (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="max (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="minusp.html" rel="next" title="minusp">
+<link href="_003d.html" rel="prev" title="=">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="max">
+<div class="nav-panel">
+<p>
+Next: <a href="minusp.html" accesskey="n" rel="next">minusp, plusp                                                    [Function]</a>, Previous: <a href="_003d.html" accesskey="p" rel="prev">=, /=, &lt;, &gt;, &lt;=, &gt;=                                              [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="max_002c-min-_005bFunction_005d"><span>12.2.16 max, min                                                         [Function]<a class="copiable-link" href="#max_002c-min-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">max</code>  <i class="i"><span class="r">&amp;rest</span> reals^+</i> &rArr;  <i class="i">max-real</i>
+</p>
+<p><code class="code">min</code>  <i class="i"><span class="r">&amp;rest</span> reals^+</i> &rArr;  <i class="i">min-real</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-202"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-202"> &para;</a></span></h4>
+
+<p><i class="i">real</i>&mdash;a <i class="i">real</i>.
+</p>
+<p><i class="i">max-real</i>, <i class="i">min-real</i>&mdash;a <i class="i">real</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-281"><span>Description::<a class="copiable-link" href="#Description_003a_003a-281"> &para;</a></span></h4>
+
+<p><b class="b">max</b> returns the <i class="i">real</i> that is greatest (closest to positive infinity).
+<b class="b">min</b> returns the <i class="i">real</i> that is least (closest to negative infinity).
+</p>
+<p>For <b class="b">max</b>,
+the implementation has the choice of returning the largest
+argument as is or applying the rules of floating-point <i class="i">contagion</i>,
+taking all the arguments into consideration for <i class="i">contagion</i> purposes.
+Also, if one or more of the arguments are <b class="b">=</b>, then any one
+of them may be chosen as the value to return.
+For example, if the <i class="i">reals</i> are a mixture of <i class="i">rationals</i> and <i class="i">floats</i>,
+and the largest argument is a <i class="i">rational</i>,
+then the implementation is free to
+produce either that <i class="i">rational</i> 
+or its <i class="i">float</i> approximation;
+if the largest argument is a 
+<i class="i">float</i> of a smaller format
+than the largest format of any <i class="i">float</i> argument,
+then the implementation is free to
+return the argument in its given format or expanded to the larger format.
+Similar remarks apply to <b class="b">min</b> 
+(replacing &ldquo;largest argument&rdquo; by &ldquo;smallest argument&rdquo;).
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-185"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-185"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (max 3) &rArr;  3 
+ (min 3) &rArr;  3
+ (max 6 12) &rArr;  12 
+ (min 6 12) &rArr;  6
+ (max -6 -12) &rArr;  -6 
+ (min -6 -12) &rArr;  -12
+ (max 1 3 2 -7) &rArr;  3 
+ (min 1 3 2 -7) &rArr;  -7
+ (max -2 3 0 7) &rArr;  7 
+ (min -2 3 0 7) &rArr;  -2
+ (max 5.0 2) &rArr;  5.0 
+ (min 5.0 2)
+&rArr;  2
+<i class="i">OR</i>&rArr; 2.0
+ (max 3.0 7 1)
+&rArr;  7
+<i class="i">OR</i>&rArr; 7.0 
+ (min 3.0 7 1)
+&rArr;  1
+<i class="i">OR</i>&rArr; 1.0
+ (max 1.0s0 7.0d0) &rArr;  7.0d0
+ (min 1.0s0 7.0d0)
+&rArr;  1.0s0
+<i class="i">OR</i>&rArr; 1.0d0
+ (max 3 1 1.0s0 1.0d0)
+&rArr;  3
+<i class="i">OR</i>&rArr; 3.0d0
+ (min 3 1 1.0s0 1.0d0)
+&rArr;  1
+<i class="i">OR</i>&rArr; 1.0s0 
+<i class="i">OR</i>&rArr; 1.0d0
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-78"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-78"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if any <i class="i">number</i> is not a <i class="i">real</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="minusp.html">minusp, plusp                                                    [Function]</a>, Previous: <a href="_003d.html">=, /=, &lt;, &gt;, &lt;=, &gt;=                                              [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/member-_0028Function_0029.html
@@ -0,0 +1,139 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>member (Function) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="member (Function) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="member (Function) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="mapc.html" rel="next" title="mapc">
+<link href="rest.html" rel="prev" title="rest">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="member-_0028Function_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="mapc.html" accesskey="n" rel="next">mapc, mapcar, mapcan, mapl, maplist, mapcon                      [Function]</a>, Previous: <a href="rest.html" accesskey="p" rel="prev">rest                                                             [Accessor]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="member_002c-member_002dif_002c-member_002dif_002dnot-_005bFunction_005d"><span>14.2.33 member, member-if, member-if-not                                 [Function]<a class="copiable-link" href="#member_002c-member_002dif_002c-member_002dif_002dnot-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">member</code>  <i class="i">item      list <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">tail</i>
+</p>
+<p><code class="code">member-if</code>  <i class="i">predicate list <span class="r">&amp;key</span> key</i> &rArr;  <i class="i">tail</i>
+</p>
+<p><code class="code">member-if-not</code>  <i class="i">predicate list <span class="r">&amp;key</span> key</i> &rArr;  <i class="i">tail</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-302"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-302"> &para;</a></span></h4>
+
+<p><i class="i">item</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">list</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<p><i class="i">predicate</i>&mdash;a <i class="i">designator</i> for 
+		    a <i class="i">function</i> of one <i class="i">argument</i>
+		    that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">tail</i>&mdash;a <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-403"><span>Description::<a class="copiable-link" href="#Description_003a_003a-403"> &para;</a></span></h4>
+
+<p><b class="b">member</b>, <b class="b">member-if</b>, and <b class="b">member-if-not</b> each
+search <i class="i">list</i> for <i class="i">item</i> or for a top-level element that 
+<i class="i">satisfies the test</i>.  The argument to the <i class="i">predicate</i> function 
+is an element of <i class="i">list</i>.
+</p>
+<p>If some element <i class="i">satisfies the test</i>,
+the tail of <i class="i">list</i> beginning
+with this element is returned; otherwise <b class="b">nil</b> is returned.
+</p>
+<p><i class="i">list</i> is searched on the top level only. 
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-286"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-286"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (member 2 '(1 2 3)) &rArr;  (2 3)                                 
+ (member 2 '((1 . 2) (3 . 4)) :test-not #'= :key #'cdr) &rArr;  ((3 . 4))
+ (member 'e '(a b c d)) &rArr;  NIL
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (member-if #'listp '(a b nil c d)) &rArr;  (NIL C D)
+ (member-if #'numberp '(a #\Space 5/3 foo)) &rArr;  (5/3 FOO)
+ (member-if-not #'zerop 
+                 '(3 6 9 11 . 12)
+                 :key #'(lambda (x) (mod x 3))) &rArr;  (11 . 12)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-128"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-128"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">list</i> is not a <i class="i">proper list</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-327"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-327"> &para;</a></span></h4>
+
+<p><a class="ref" href="find.html">find, find-if, find-if-not                                       [Function]</a>
+,
+<a class="ref" href="position.html">position, position-if, position-if-not                           [Function]</a>
+,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-218"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-218"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> parameter is deprecated.
+</p>
+<p>The <i class="i">function</i> <b class="b">member-if-not</b> is deprecated.
+</p>
+<p>In the following
+</p>
+<div class="example">
+<pre class="example-preformatted"> (member 'a '(g (a y) c a d e a f)) &rArr;  (A D E A F)
+</pre></div>
+
+<p>the value returned by <b class="b">member</b> is <i class="i">identical</i> to the portion
+of the <i class="i">list</i> beginning with <code class="t">a</code>.  Thus <b class="b">rplaca</b> on the
+result of <b class="b">member</b> can be used to alter the part of the <i class="i">list</i>
+where <code class="t">a</code> was found (assuming a check has been made that <b class="b">member</b>
+did not return <b class="b">nil</b>).
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="mapc.html">mapc, mapcar, mapcan, mapl, maplist, mapcon                      [Function]</a>, Previous: <a href="rest.html">rest                                                             [Accessor]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/member-_0028Type-Specifier_0029.html
@@ -0,0 +1,72 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>member (Type Specifier) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="member (Type Specifier) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="member (Type Specifier) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="not-_0028Type-Specifier_0029.html" rel="next" title="not (Type Specifier)">
+<link href="satisfies.html" rel="prev" title="satisfies">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="member-_0028Type-Specifier_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="not-_0028Type-Specifier_0029.html" accesskey="n" rel="next">not                                                        [Type Specifier]</a>, Previous: <a href="satisfies.html" accesskey="p" rel="prev">satisfies                                                  [Type Specifier]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="member-_005bType-Specifier_005d"><span>4.4.18 member                                                     [Type Specifier]<a class="copiable-link" href="#member-_005bType-Specifier_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-2"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-2"> &para;</a></span></h4>
+
+<p>Combining.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-2"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-2"> &para;</a></span></h4>
+
+<p>(<code class="code">member</code>{<i class="i">{<i class="i">object</i>}*</i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-2"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-2"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-2"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-2"> &para;</a></span></h4>
+
+<p>This denotes the set containing the named <i class="i">objects</i>. An
+<i class="i">object</i> is of this <i class="i">type</i> if and only if it is <b class="b">eql</b>
+to one of the specified <i class="i">objects</i>.
+</p>
+<p>The <i class="i">type specifiers</i> <code class="t">(member)</code> and <b class="b">nil</b> are equivalent.
+<b class="b">*</b> can be among the <i class="i">objects</i>,
+but if so it denotes itself (the symbol <b class="b">*</b>) 
+and does not represent an unspecified value.
+The symbol <b class="b">member</b> is not valid as a <i class="i">type specifier</i>;
+and, specifically, it is not an abbreviation for either <code class="t">(member)</code> or <code class="t">(member *)</code>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-32"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-32"> &para;</a></span></h4>
+
+<p>the <i class="i">type</i> <b class="b">eql</b>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/merge.html
@@ -0,0 +1,166 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>merge (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="merge (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="merge (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="remove.html" rel="next" title="remove">
+<link href="concatenate.html" rel="prev" title="concatenate">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="merge">
+<div class="nav-panel">
+<p>
+Next: <a href="remove.html" accesskey="n" rel="next">remove, remove-if, remove-if-not,</a>, Previous: <a href="concatenate.html" accesskey="p" rel="prev">concatenate                                                      [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="merge-_005bFunction_005d"><span>17.3.21 merge                                                            [Function]<a class="copiable-link" href="#merge-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">merge</code>  <i class="i">result-type sequence-1 sequence-2 predicate <span class="r">&amp;key</span> key</i> &rArr;  <i class="i">result-sequence</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-373"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-373"> &para;</a></span></h4>
+
+<p><i class="i">result-type</i>&mdash;a <b class="b">sequence</b> <i class="i">type specifier</i>.
+</p>
+<p><i class="i">sequence-1</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<p><i class="i">sequence-2</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<p><i class="i">predicate</i>&mdash;a <i class="i">designator</i> for
+  a <i class="i">function</i> of two arguments that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">result-sequence</i>&mdash;a <i class="i">proper sequence</i> of <i class="i">type</i> <i class="i">result-type</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-488"><span>Description::<a class="copiable-link" href="#Description_003a_003a-488"> &para;</a></span></h4>
+
+<p>Destructively merges <i class="i">sequence-1</i> with <i class="i">sequence-2</i> according
+to an order determined by the <i class="i">predicate</i>.  <b class="b">merge</b> determines
+the relationship between two elements by giving keys extracted from the
+sequence elements to the <i class="i">predicate</i>.
+</p>
+<p>The first argument to the <i class="i">predicate</i> function is an element of
+<i class="i">sequence-1</i> as returned by the <i class="i">key</i> (if supplied); 
+the second argument is an element of <i class="i">sequence-2</i> as returned by 
+the <i class="i">key</i> (if supplied). 
+<i class="i">Predicate</i> should return <i class="i">true</i> if and only if its first 
+argument is strictly less than the second (in some appropriate sense). 
+If the first argument is greater than or equal to the second
+(in the appropriate sense), then <i class="i">predicate</i> should return <i class="i">false</i>.
+<b class="b">merge</b>
+considers two elements <code class="t">x</code> and <code class="t">y</code> to be equal if
+<code class="t">(funcall predicate x y)</code> and
+<code class="t">(funcall predicate y x)</code> both <i class="i">yield</i> <i class="i">false</i>.
+</p>
+<p>The argument to the <i class="i">key</i> is the <i class="i">sequence</i> element.
+Typically, the return value of the <i class="i">key</i> 
+becomes the argument to <i class="i">predicate</i>.
+If <i class="i">key</i> is not supplied or <b class="b">nil</b>, the sequence element itself is used.
+The <i class="i">key</i> may be executed more than once for each <i class="i">sequence</i> <i class="i">element</i>,
+and its side effects may occur in any order.
+</p>
+<p>If <i class="i">key</i> and <i class="i">predicate</i> return, then the merging operation 
+will terminate.  The result of merging two <i class="i">sequences</i> <code class="t">x</code> and <code class="t">y</code>
+is a new <i class="i">sequence</i> of type <i class="i">result-type</i> <code class="t">z</code>, 
+such that the length of <code class="t">z</code> is the sum of the lengths of <code class="t">x</code>
+and <code class="t">y</code>, and <code class="t">z</code> contains all the elements of <code class="t">x</code> and <code class="t">y</code>.
+If <code class="t">x1</code> and <code class="t">x2</code> are two elements of <code class="t">x</code>, and <code class="t">x1</code> precedes
+<code class="t">x2</code> in <code class="t">x</code>, then <code class="t">x1</code> precedes <code class="t">x2</code> in <code class="t">z</code>, and similarly for
+elements of <code class="t">y</code>.  In short, <code class="t">z</code> is an interleaving of <code class="t">x</code> and <code class="t">y</code>.
+</p>
+<p>If <code class="t">x</code> and <code class="t">y</code> were correctly sorted according to the
+<i class="i">predicate</i>, then <code class="t">z</code> will also be correctly sorted.
+If <code class="t">x</code> or <code class="t">y</code> is not so sorted, then <code class="t">z</code> will not be sorted,
+but will nevertheless be an interleaving of <code class="t">x</code> and <code class="t">y</code>.
+</p>
+<p>The merging operation is guaranteed stable;
+if two or more elements are considered equal by the <i class="i">predicate</i>, 
+then the elements from <i class="i">sequence-1</i> will
+precede those from <i class="i">sequence-2</i> in the result.
+</p>
+<p><i class="i">sequence-1</i> and/or <i class="i">sequence-2</i> may be destroyed.
+</p>
+<p>If the <i class="i">result-type</i> is a <i class="i">subtype</i> of <b class="b">list</b>,
+the result will be a <i class="i">list</i>.
+</p>
+<p>If the <i class="i">result-type</i> is a <i class="i">subtype</i> of <b class="b">vector</b>,
+then if the implementation can determine the element type specified
+for the <i class="i">result-type</i>, the element type of the resulting array 
+is the result of <i class="i">upgrading</i> that element type; or, if the
+implementation can determine that the element type is unspecified (or <code class="t">*</code>),
+the element type of the resulting array is <b class="b">t</b>;
+otherwise, an error is signaled.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-355"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-355"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (setq test1 (list 1 3 4 6 7))
+ (setq test2 (list 2 5 8))
+ (merge 'list test1 test2 #'&lt;) &rArr;  (1 2 3 4 5 6 7 8)
+ (setq test1 (copy-seq &quot;BOY&quot;))
+ (setq test2 (copy-seq :nosy&quot;))
+ (merge 'string test1 test2 #'char-lessp) &rArr;  &quot;BnOosYy&quot;
+ (setq test1 (vector ((red . 1) (blue . 4))))
+ (setq test2 (vector ((yellow . 2) (green . 7))))
+ (merge 'vector test1 test2 #'&lt; :key #'cdr) 
+&rArr;  #((RED . 1) (YELLOW . 2) (BLUE . 4) (GREEN . 7)) 
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (merge '(vector * 4) '(1 5) '(2 4 6) #'&lt;) should signal an error
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-166"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-166"> &para;</a></span></h4>
+
+<p>An error must be signaled if the <i class="i">result-type</i> is neither
+     a <i class="i">recognizable subtype</i> of <b class="b">list</b>,
+ nor a <i class="i">recognizable subtype</i> of <b class="b">vector</b>.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">type-error</b> should be signaled
+if <i class="i">result-type</i> specifies the number of elements 
+and the sum of the lengths of <i class="i">sequence-1</i> and <i class="i">sequence-2</i> 
+is different from that number.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-398"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-398"> &para;</a></span></h4>
+
+<p><a class="ref" href="sort.html">sort, stable-sort                                                [Function]</a>
+,
+<b class="b">stable-sort</b>,
+</p>
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="remove.html">remove, remove-if, remove-if-not,</a>, Previous: <a href="concatenate.html">concatenate                                                      [Function]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/merge_002dpathnames.html
@@ -0,0 +1,180 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>merge-pathnames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="merge-pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="merge-pathnames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="translate_002dpathname.html" rel="prev" title="translate-pathname">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="merge_002dpathnames">
+<div class="nav-panel">
+<p>
+Previous: <a href="translate_002dpathname.html" accesskey="p" rel="prev">translate-pathname                                               [Function]</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="merge_002dpathnames-_005bFunction_005d"><span>19.4.17 merge-pathnames                                                  [Function]<a class="copiable-link" href="#merge_002dpathnames-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">merge-pathnames</code>  <i class="i">pathname <span class="r">&amp;optional</span> default-pathname default-version</i><br>
+   &rArr;  <i class="i">merged-pathname</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-402"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-402"> &para;</a></span></h4>
+
+<p><i class="i">pathname</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">default-pathname</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p>The default is the <i class="i">value</i> of <b class="b">*default-pathname-defaults*</b>.
+</p>
+<p><i class="i">default-version</i>&mdash;a <i class="i">valid pathname version</i>.
+</p>
+<p>The default is <code class="t">:newest</code>.
+</p>
+<p><i class="i">merged-pathname</i>&mdash;a <i class="i">pathname</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-521"><span>Description::<a class="copiable-link" href="#Description_003a_003a-521"> &para;</a></span></h4>
+
+<p>Constructs a <i class="i">pathname</i> from <i class="i">pathname</i> 
+by filling in any unsupplied components with the corresponding values
+from <i class="i">default-pathname</i> and <i class="i">default-version</i>. 
+</p>
+<p>Defaulting of pathname components 
+is done by filling in components taken from another <i class="i">pathname</i>.
+</p>
+<p>This is especially useful for cases such as 
+a program that has an input file and an output file.
+Unspecified components of the output pathname will come from the input pathname,
+except that the type should not default
+to the type of the input pathname
+but rather to the appropriate default type for output from the program;
+for example, see the <i class="i">function</i> <b class="b">compile-file-pathname</b>.
+</p>
+<p>If no version is supplied, <i class="i">default-version</i> is used.
+If <i class="i">default-version</i> is <b class="b">nil</b>, the version component will remain unchanged.
+</p>
+<p>If <i class="i">pathname</i> explicitly specifies a host and not a device, and 
+if the host component of <i class="i">default-pathname</i> matches the host component
+of <i class="i">pathname</i>, then the device is taken from the <i class="i">default-pathname</i>;
+otherwise the device will be the default file device for that host.  If
+<i class="i">pathname</i> does not specify a host, device, directory, name,
+or type, each such component is copied from <i class="i">default-pathname</i>.
+If <i class="i">pathname</i> does not specify a name, then the version, if not provided, will
+come from <i class="i">default-pathname</i>, just like the other components.  If
+<i class="i">pathname</i> does specify a name, then the version is not affected
+by <i class="i">default-pathname</i>. If this process leaves the
+version missing, the <i class="i">default-version</i> is used.
+If the host&rsquo;s file name syntax provides a way
+to input a version without a name or type, the user can let the name
+and type default but supply a version different from the one in <i class="i">default-pathname</i>.
+</p>
+<p>If <i class="i">pathname</i> is a <i class="i">stream</i>, <i class="i">pathname</i> effectively
+becomes <code class="t">(pathname <i class="i">pathname</i>)</code>. <b class="b">merge-pathnames</b>
+can be used on either an open or a closed <i class="i">stream</i>.
+</p>
+<p>If <i class="i">pathname</i> is a <i class="i">pathname</i>
+it represents the name used to open the file. This may be, but is
+not required to be, the actual name of the file. 
+</p>
+<p><b class="b">merge-pathnames</b> recognizes a <i class="i">logical pathname</i> <i class="i">namestring</i>
+   when <i class="i">default-pathname</i> is a <i class="i">logical pathname</i>,
+</p>
+<p>or when the <i class="i">namestring</i> begins with 
+    the name of a defined <i class="i">logical host</i> followed by a <i class="i">colon</i>.
+In the first of these two cases,
+</p>
+<p>the host portion of the <i class="i">logical pathname</i> <i class="i">namestring</i>
+and its following <i class="i">colon</i> are optional.
+</p>
+<p><b class="b">merge-pathnames</b> returns a 
+<i class="i">logical pathname</i> if and only if
+   its first argument is a <i class="i">logical pathname</i>,
+</p>
+<p>or its first argument is a <i class="i">logical pathname</i> <i class="i">namestring</i> with an explicit host,
+or its first argument does not specify a host 
+    and the <i class="i">default-pathname</i> is a <i class="i">logical pathname</i>.
+</p>
+<p><i class="i">Pathname</i> merging treats a relative directory specially.  
+If <code class="t">(pathname-directory <i class="i">pathname</i>)</code> is a <i class="i">list</i> whose
+<i class="i">car</i> is <code class="t">:relative</code>, and 
+<code class="t">(pathname-directory <i class="i">default-pathname</i>)</code> is a <i class="i">list</i>, then
+the merged directory is the value of
+</p>
+<div class="example">
+<pre class="example-preformatted"> (append (pathname-directory <i class="i">default-pathname</i>)
+         (cdr  ;remove :relative from the front
+           (pathname-directory <i class="i">pathname</i>)))
+</pre></div>
+
+<p>except that if the resulting <i class="i">list</i> contains a <i class="i">string</i> or <code class="t">:wild</code>
+immediately followed by <code class="t">:back</code>, both of them are removed.  This removal of 
+redundant <code class="t">:back</code> <i class="i">keywords</i> is repeated as many times as possible.
+If <code class="t">(pathname-directory <i class="i">default-pathname</i>)</code> is not a <i class="i">list</i> or
+<code class="t">(pathname-directory <i class="i">pathname</i>)</code> is not a <i class="i">list</i> 
+whose <i class="i">car</i> is <code class="t">:relative</code>, the merged directory is
+<code class="t">(or (pathname-directory <i class="i">pathname</i>) (pathname-directory <i class="i">default-pathname</i>))</code>
+</p>
+<p><b class="b">merge-pathnames</b> maps customary case in <i class="i">pathname</i> 
+into customary case in the output <i class="i">pathname</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-381"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-381"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (merge-pathnames &quot;CMUC::FORMAT&quot;
+                  &quot;CMUC::PS:&lt;LISPIO&gt;.FASL&quot;)
+&rArr;  #P&quot;CMUC::PS:&lt;LISPIO&gt;FORMAT.FASL.0&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-424"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-424"> &para;</a></span></h4>
+
+<p><b class="b">*default-pathname-defaults*</b>,
+<b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-281"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-281"> &para;</a></span></h4>
+
+<p>The net effect 
+is that if just a name is supplied, 
+the host, device, directory, and type will come from <i class="i">default-pathname</i>, 
+but the version will come from <i class="i">default-version</i>.
+If nothing or just a directory is supplied,
+the name, type, and version will come from <i class="i">default-pathname</i> together.
+</p>
+
+
+
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="translate_002dpathname.html">translate-pathname                                               [Function]</a>, Up: <a href="Filenames-Dictionary.html">Filenames Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/method.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>method (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="method (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="method (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="standard_002dmethod.html" rel="next" title="standard-method">
+<link href="standard_002dclass.html" rel="prev" title="standard-class">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="method">
+<div class="nav-panel">
+<p>
+Next: <a href="standard_002dmethod.html" accesskey="n" rel="next">standard-method                                              [System Class]</a>, Previous: <a href="standard_002dclass.html" accesskey="p" rel="prev">standard-class                                               [System Class]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="method-_005bSystem-Class_005d"><span>4.4.11 method                                                       [System Class]<a class="copiable-link" href="#method-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-7"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-7"> &para;</a></span></h4>
+<p><b class="b">method</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-40"><span>Description::<a class="copiable-link" href="#Description_003a_003a-40"> &para;</a></span></h4>
+
+<p>A <i class="i">method</i> is an <i class="i">object</i> that represents a modular part of the behavior
+of a <i class="i">generic function</i>.
+</p>
+<p>A <i class="i">method</i> contains <i class="i">code</i> to implement the <i class="i">method</i>&rsquo;s
+behavior, a sequence of <i class="i">parameter specializers</i> that specify when the
+given <i class="i">method</i> is applicable, and a sequence of <i class="i">qualifiers</i>
+that is used by the method combination facility to distinguish among
+<i class="i">methods</i>.  Each required parameter of each 
+<i class="i">method</i> has an associated <i class="i">parameter specializer</i>, and the 
+<i class="i">method</i> will be invoked only on arguments that satisfy its 
+<i class="i">parameter specializers</i>.
+</p>
+<p>The method combination facility controls the selection of 
+<i class="i">methods</i>, the order in which they are run, and the values that are
+returned by the generic function.  The object system offers a default method
+combination type and provides a facility for declaring new types of
+method combination.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-30"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-30"> &para;</a></span></h4>
+
+<p><a class="ref" href="Generic-Functions-and-Methods.html">Generic Functions and Methods</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/method_002dcombination.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>method-combination (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="method-combination (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="method-combination (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="t-_0028System-Class_0029.html" rel="next" title="t (System Class)">
+<link href="standard_002dobject.html" rel="prev" title="standard-object">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="method_002dcombination">
+<div class="nav-panel">
+<p>
+Next: <a href="t-_0028System-Class_0029.html" accesskey="n" rel="next">t                                                            [System Class]</a>, Previous: <a href="standard_002dobject.html" accesskey="p" rel="prev">standard-object                                                     [Class]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="method_002dcombination-_005bSystem-Class_005d"><span>4.4.15 method-combination                                           [System Class]<a class="copiable-link" href="#method_002dcombination-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-11"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-11"> &para;</a></span></h4>
+<p><b class="b">method-combination</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-44"><span>Description::<a class="copiable-link" href="#Description_003a_003a-44"> &para;</a></span></h4>
+
+<p>Every <i class="i">method combination</i> <i class="i">object</i> is an 
+<i class="i">indirect instance</i> of the <i class="i">class</i> <b class="b">method-combination</b>.
+A <i class="i">method combination</i> <i class="i">object</i> represents the information about
+the <i class="i">method combination</i> being used by a <i class="i">generic function</i>.
+A <i class="i">method combination</i> <i class="i">object</i> contains information about
+both the type of <i class="i">method combination</i> and the arguments being used
+with that <i class="i">type</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/method_002dcombination_002derror.html
@@ -0,0 +1,78 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>method-combination-error (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="method-combination-error (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="method-combination-error (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="signal.html" rel="next" title="signal">
+<link href="invalid_002dmethod_002derror.html" rel="prev" title="invalid-method-error">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="method_002dcombination_002derror">
+<div class="nav-panel">
+<p>
+Next: <a href="signal.html" accesskey="n" rel="next">signal                                                           [Function]</a>, Previous: <a href="invalid_002dmethod_002derror.html" accesskey="p" rel="prev">invalid-method-error                                             [Function]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="method_002dcombination_002derror-_005bFunction_005d"><span>9.2.16 method-combination-error                                         [Function]<a class="copiable-link" href="#method_002dcombination_002derror-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">method-combination-error</code>  <i class="i">format-control <span class="r">&amp;rest</span> args</i> &rArr;  <i class="i"><i class="i">implementation-dependent</i></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-137"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-137"> &para;</a></span></h4>
+
+<p><i class="i">format-control</i>&mdash;a <i class="i">format control</i>.
+</p>
+<p><i class="i">args</i>&mdash;<i class="i">format arguments</i> for <i class="i">format-control</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-186"><span>Description::<a class="copiable-link" href="#Description_003a_003a-186"> &para;</a></span></h4>
+
+<p>The <i class="i">function</i> <b class="b">method-combination-error</b> is used to signal an error
+in method combination.  
+</p>
+<p>The error message is constructed by using a <i class="i">format-control</i> suitable
+for <b class="b">format</b> and any <i class="i">args</i> to it.  Because an implementation may
+need to add additional contextual information to the error message,
+<b class="b">method-combination-error</b> should be called only within the
+dynamic extent of a method combination function.
+</p>
+<p>Whether <b class="b">method-combination-error</b> returns to its caller or exits
+via <b class="b">throw</b> is <i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Side-Effects_003a_003a-11"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-11"> &para;</a></span></h4>
+
+<p>The debugger might be entered.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-23"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-23"> &para;</a></span></h4>
+
+<p><b class="b">*break-on-signals*</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-163"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-163"> &para;</a></span></h4>
+
+<p><a class="ref" href="define_002dmethod_002dcombination.html">define-method-combination                                           [Macro]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/method_002dqualifiers.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>method-qualifiers (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="method-qualifiers (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="method-qualifiers (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="no_002dapplicable_002dmethod.html" rel="next" title="no-applicable-method">
+<link href="slot_002dvalue.html" rel="prev" title="slot-value">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="method_002dqualifiers">
+<div class="nav-panel">
+<p>
+Next: <a href="no_002dapplicable_002dmethod.html" accesskey="n" rel="next">no-applicable-method                            [Standard Generic Function]</a>, Previous: <a href="slot_002dvalue.html" accesskey="p" rel="prev">slot-value                                                       [Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="method_002dqualifiers-_005bStandard-Generic-Function_005d"><span>7.7.15 method-qualifiers                               [Standard Generic Function]<a class="copiable-link" href="#method_002dqualifiers-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-20"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-20"> &para;</a></span></h4>
+
+<p><code class="code">method-qualifiers</code>  <i class="i">method</i> &rArr;  <i class="i">qualifiers</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-9"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-9"> &para;</a></span></h4>
+
+<p><code class="code">method-qualifiers</code>  <i class="i"><span class="r">(</span><i class="i">method</i> <b class="b">standard-method</b><span class="r">)</span></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-103"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-103"> &para;</a></span></h4>
+
+<p><i class="i">method</i>&mdash;a <i class="i">method</i>.
+</p>
+<p><i class="i">qualifiers</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-142"><span>Description::<a class="copiable-link" href="#Description_003a_003a-142"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">list</i> of the <i class="i">qualifiers</i> of the <i class="i">method</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-103"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-103"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defmethod some-gf :before ((a integer)) a)
+&rArr;  #&lt;STANDARD-METHOD SOME-GF (:BEFORE) (INTEGER) 42736540&gt;
+ (method-qualifiers *) &rArr;  (:BEFORE)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-124"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-124"> &para;</a></span></h4>
+
+<p><a class="ref" href="define_002dmethod_002dcombination.html">define-method-combination                                           [Macro]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/minusp.html
@@ -0,0 +1,78 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>minusp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="minusp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="minusp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="zerop.html" rel="next" title="zerop">
+<link href="max.html" rel="prev" title="max">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="minusp">
+<div class="nav-panel">
+<p>
+Next: <a href="zerop.html" accesskey="n" rel="next">zerop                                                            [Function]</a>, Previous: <a href="max.html" accesskey="p" rel="prev">max, min                                                         [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="minusp_002c-plusp-_005bFunction_005d"><span>12.2.17 minusp, plusp                                                    [Function]<a class="copiable-link" href="#minusp_002c-plusp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">minusp</code>  <i class="i">real</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">plusp</code>  <i class="i">real</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-203"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-203"> &para;</a></span></h4>
+
+<p><i class="i">real</i>&mdash;a <i class="i">real</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-282"><span>Description::<a class="copiable-link" href="#Description_003a_003a-282"> &para;</a></span></h4>
+
+<p><b class="b">minusp</b> returns <i class="i">true</i> if <i class="i">real</i> is less than zero;
+otherwise, returns <i class="i">false</i>.
+</p>
+<p><b class="b">plusp</b> returns <i class="i">true</i> if <i class="i">real</i> is greater than zero;
+otherwise, returns <i class="i">false</i>.
+</p>
+<p>Regardless of whether an <i class="i">implementation</i> provides distinct
+representations for positive and negative <i class="i">float</i> zeros,
+<code class="t">(minusp -0.0)</code> always returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-186"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-186"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (minusp -1) &rArr;  <i class="i">true</i>
+ (plusp 0) &rArr;  <i class="i">false</i>
+ (plusp least-positive-single-float) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-79"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-79"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">real</i> is not a <i class="i">real</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/mismatch.html
@@ -0,0 +1,124 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>mismatch (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="mismatch (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="mismatch (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="replace.html" rel="next" title="replace">
+<link href="search.html" rel="prev" title="search">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="mismatch">
+<div class="nav-panel">
+<p>
+Next: <a href="replace.html" accesskey="n" rel="next">replace                                                          [Function]</a>, Previous: <a href="search.html" accesskey="p" rel="prev">search                                                           [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="mismatch-_005bFunction_005d"><span>17.3.17 mismatch                                                         [Function]<a class="copiable-link" href="#mismatch-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">mismatch</code>  <i class="i">sequence-1 sequence-2 
+			 <span class="r">&amp;key</span> from-end test test-not key start1 start2 end1 end2</i><br>
+   &rArr;  <i class="i">position</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-369"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-369"> &para;</a></span></h4>
+
+<p><i class="i">Sequence-1</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<p><i class="i">Sequence-2</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<p><i class="i">from-end</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is <i class="i">false</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">start1</i>, <i class="i">end1</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">sequence-1</i>.
+ The defaults for <i class="i">start1</i> and <i class="i">end1</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">start2</i>, <i class="i">end2</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">sequence-2</i>.
+ The defaults for <i class="i">start2</i> and <i class="i">end2</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">position</i>&mdash;a <i class="i">bounding index</i> of <i class="i">sequence-1</i>,
+		   or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-484"><span>Description::<a class="copiable-link" href="#Description_003a_003a-484"> &para;</a></span></h4>
+
+<p>The specified subsequences of         
+<i class="i">sequence-1</i> and <i class="i">sequence-2</i> are compared element-wise.
+</p>
+<p>The <i class="i">key</i> argument is used for both the <i class="i">sequence-1</i> and the <i class="i">sequence-2</i>.
+</p>
+<p>If <i class="i">sequence-1</i> and <i class="i">sequence-2</i> 
+are of equal length and match in every element, the result is
+<i class="i">false</i>.  Otherwise, the result is a non-negative <i class="i">integer</i>,
+the index within
+<i class="i">sequence-1</i> of the leftmost or rightmost position, depending
+on <i class="i">from-end</i>, at which the two
+subsequences fail to match.
+If one subsequence 
+is shorter than and a matching prefix of the other,
+the result is the index
+relative to <i class="i">sequence-1</i> beyond the last position tested.
+</p>
+<p>If <i class="i">from-end</i> is <i class="i">true</i>, then one plus the index of the rightmost
+position in which the <i class="i">sequences</i>
+differ is returned.  In effect, the subsequences
+are aligned at their right-hand ends; then, the last elements are compared,
+the penultimate elements, and so on.  The index returned is 
+an index relative to <i class="i">sequence-1</i>.                  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-351"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-351"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (mismatch &quot;abcd&quot; &quot;ABCDE&quot; :test #'char-equal) &rArr;  4
+ (mismatch '(3 2 1 1 2 3) '(1 2 3) :from-end t) &rArr;  3
+ (mismatch '(1 2 3) '(2 3 4) :test-not #'eq :key #'oddp) &rArr;  NIL
+ (mismatch '(1 2 3 4 5 6) '(3 4 5 6 7) :start1 2 :end2 4) &rArr;  NIL 
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-394"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-394"> &para;</a></span></h4>
+
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-265"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-265"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> <i class="i">argument</i> is deprecated.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="replace.html">replace                                                          [Function]</a>, Previous: <a href="search.html">search                                                           [Function]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/mod-_0028Function_0029.html
@@ -0,0 +1,104 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>mod (Function) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="mod (Function) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="mod (Function) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="signum.html" rel="next" title="signum">
+<link href="log.html" rel="prev" title="log">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="mod-_0028Function_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="signum.html" accesskey="n" rel="next">signum                                                           [Function]</a>, Previous: <a href="log.html" accesskey="p" rel="prev">log                                                              [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="mod_002c-rem-_005bFunction_005d"><span>12.2.36 mod, rem                                                         [Function]<a class="copiable-link" href="#mod_002c-rem-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">mod</code>  <i class="i">number divisor</i> &rArr;  <i class="i">modulus</i>
+</p>
+<p><code class="code">rem</code>  <i class="i">number divisor</i> &rArr;  <i class="i">remainder</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-221"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-221"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a <i class="i">real</i>.
+</p>
+<p><i class="i">divisor</i>&mdash;a <i class="i">real</i>.
+</p>
+<p><i class="i">modulus</i>, <i class="i">remainder</i>&mdash;a <i class="i">real</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-301"><span>Description::<a class="copiable-link" href="#Description_003a_003a-301"> &para;</a></span></h4>
+
+<p><b class="b">mod</b> and <b class="b">rem</b> are generalizations of the modulus
+and remainder functions respectively.
+</p>
+<p><b class="b">mod</b> performs the operation <b class="b">floor</b> 
+on <i class="i">number</i> and <i class="i">divisor</i> 
+and returns the remainder of the <b class="b">floor</b> operation.
+</p>
+<p><b class="b">rem</b> performs the operation <b class="b">truncate</b> 
+on <i class="i">number</i> and <i class="i">divisor</i>
+and returns the remainder of the <b class="b">truncate</b> operation.
+</p>
+<p><b class="b">mod</b> and <b class="b">rem</b> are 
+the modulus and remainder functions 
+when <i class="i">number</i> and <i class="i">divisor</i> are <i class="i">integers</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-205"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-205"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (rem -1 5) &rArr;  -1
+ (mod -1 5) &rArr;  4
+ (mod 13 4) &rArr;  1
+ (rem 13 4) &rArr;  1
+ (mod -13 4) &rArr;  3
+ (rem -13 4) &rArr;  -1
+ (mod 13 -4) &rArr;  -3
+ (rem 13 -4) &rArr;  1
+ (mod -13 -4) &rArr;  -1
+ (rem -13 -4) &rArr;  -1
+ (mod 13.4 1) &rArr;  0.4
+ (rem 13.4 1) &rArr;  0.4
+ (mod -13.4 1) &rArr;  0.6
+ (rem -13.4 1) &rArr;  -0.4
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-254"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-254"> &para;</a></span></h4>
+
+<p><a class="ref" href="floor.html">floor, ffloor, ceiling, fceiling,</a>
+, <b class="b">truncate</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-152"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-152"> &para;</a></span></h4>
+
+<p>The result of <b class="b">mod</b> is either zero or a 
+</p>
+<p><i class="i">real</i>
+</p>
+<p>with the same sign as <i class="i">divisor</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/mod-_0028System-Class_0029.html
@@ -0,0 +1,68 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>mod (System Class) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="mod (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="mod (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="bit-_0028System-Class_0029.html" rel="next" title="bit (System Class)">
+<link href="unsigned_002dbyte.html" rel="prev" title="unsigned-byte">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="mod-_0028System-Class_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="bit-_0028System-Class_0029.html" accesskey="n" rel="next">bit                                                                  [Type]</a>, Previous: <a href="unsigned_002dbyte.html" accesskey="p" rel="prev">unsigned-byte                                                        [Type]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="mod-_005bType-Specifier_005d"><span>12.2.11 mod                                                        [Type Specifier]<a class="copiable-link" href="#mod-_005bType-Specifier_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-16"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-16"> &para;</a></span></h4>
+
+<p>Abbreviating.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-16"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-16"> &para;</a></span></h4>
+
+<p>(<code class="code">mod</code>{<i class="i">n</i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-16"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-16"> &para;</a></span></h4>
+
+<p><i class="i">n</i>&mdash;a positive <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-16"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-16"> &para;</a></span></h4>
+
+<p>This denotes the set of non-negative <i class="i">integers</i> less than <i class="i">n</i>.
+This is equivalent to 
+  <code class="t">(integer 0 (<i class="i">n</i>))</code>
+or to
+  <code class="t">(integer 0 <i class="i">m</i>)</code>,
+where <i class="i">m</i>=<i class="i">n</i>-1.
+</p>
+<p>The argument is required, and cannot be <b class="b">*</b>.
+</p>
+<p>The symbol <b class="b">mod</b> is not valid as a <i class="i">type specifier</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/most_002dpositive_002dfixnum.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>most-positive-fixnum (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="most-positive-fixnum (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="most-positive-fixnum (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="decode_002dfloat.html" rel="next" title="decode-float">
+<link href="mask_002dfield.html" rel="prev" title="mask-field">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="most_002dpositive_002dfixnum">
+<div class="nav-panel">
+<p>
+Next: <a href="decode_002dfloat.html" accesskey="n" rel="next">decode-float, scale-float, float-radix, float-sign,</a>, Previous: <a href="mask_002dfield.html" accesskey="p" rel="prev">mask-field                                                       [Accessor]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="most_002dpositive_002dfixnum_002c-most_002dnegative_002dfixnum-_005bConstant-Variable_005d"><span>12.2.72 most-positive-fixnum, most-negative-fixnum              [Constant Variable]<a class="copiable-link" href="#most_002dpositive_002dfixnum_002c-most_002dnegative_002dfixnum-_005bConstant-Variable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Constant-Value_003a_003a-7"><span>Constant Value::<a class="copiable-link" href="#Constant-Value_003a_003a-7"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-337"><span>Description::<a class="copiable-link" href="#Description_003a_003a-337"> &para;</a></span></h4>
+
+<p><b class="b">most-positive-fixnum</b> is that <i class="i">fixnum</i> closest in value 
+to positive infinity provided by the implementation,
+</p>
+<p>and greater than or equal to both 2^<span class="r">15</span> - 1 and 
+<b class="b">array-dimension-limit</b>.
+</p>
+<p><b class="b">most-negative-fixnum</b> is that <i class="i">fixnum</i> closest in value
+to negative infinity provided by the implementation,
+</p>
+<p>and less than or equal to -2^<span class="r">15</span>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/most_002dpositive_002dshort_002dfloat.html
@@ -0,0 +1,152 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>most-positive-short-float (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="most-positive-short-float (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="most-positive-short-float (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="short_002dfloat_002depsilon.html" rel="next" title="short-float-epsilon">
+<link href="floatp.html" rel="prev" title="floatp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+p.flushright-paragraph {text-align:right}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="most_002dpositive_002dshort_002dfloat">
+<div class="nav-panel">
+<p>
+Next: <a href="short_002dfloat_002depsilon.html" accesskey="n" rel="next">short-float-epsilon, short-float-negative-epsilon,</a>, Previous: <a href="floatp.html" accesskey="p" rel="prev">floatp                                                           [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="most_002dpositive_002dshort_002dfloat_002c-least_002dpositive_002dshort_002dfloat_002c"><span>12.2.76 most-positive-short-float, least-positive-short-float,<a class="copiable-link" href="#most_002dpositive_002dshort_002dfloat_002c-least_002dpositive_002dshort_002dfloat_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="least_002dpositive_002dnormalized_002dshort_002dfloat_002c"><span>least-positive-normalized-short-float,<a class="copiable-link" href="#least_002dpositive_002dnormalized_002dshort_002dfloat_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="most_002dpositive_002ddouble_002dfloat_002c-least_002dpositive_002ddouble_002dfloat_002c"><span>most-positive-double-float, least-positive-double-float,<a class="copiable-link" href="#most_002dpositive_002ddouble_002dfloat_002c-least_002dpositive_002ddouble_002dfloat_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="least_002dpositive_002dnormalized_002ddouble_002dfloat_002c"><span>least-positive-normalized-double-float,<a class="copiable-link" href="#least_002dpositive_002dnormalized_002ddouble_002dfloat_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="most_002dpositive_002dlong_002dfloat_002c-least_002dpositive_002dlong_002dfloat_002c"><span>most-positive-long-float, least-positive-long-float,<a class="copiable-link" href="#most_002dpositive_002dlong_002dfloat_002c-least_002dpositive_002dlong_002dfloat_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="least_002dpositive_002dnormalized_002dlong_002dfloat_002c"><span>least-positive-normalized-long-float,<a class="copiable-link" href="#least_002dpositive_002dnormalized_002dlong_002dfloat_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="most_002dpositive_002dsingle_002dfloat_002c-least_002dpositive_002dsingle_002dfloat_002c"><span>most-positive-single-float, least-positive-single-float,<a class="copiable-link" href="#most_002dpositive_002dsingle_002dfloat_002c-least_002dpositive_002dsingle_002dfloat_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="least_002dpositive_002dnormalized_002dsingle_002dfloat_002c"><span>least-positive-normalized-single-float,<a class="copiable-link" href="#least_002dpositive_002dnormalized_002dsingle_002dfloat_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="most_002dnegative_002dshort_002dfloat_002c-least_002dnegative_002dshort_002dfloat_002c"><span>most-negative-short-float, least-negative-short-float,<a class="copiable-link" href="#most_002dnegative_002dshort_002dfloat_002c-least_002dnegative_002dshort_002dfloat_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="least_002dnegative_002dnormalized_002dshort_002dfloat_002c"><span>least-negative-normalized-short-float,<a class="copiable-link" href="#least_002dnegative_002dnormalized_002dshort_002dfloat_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="most_002dnegative_002dsingle_002dfloat_002c-least_002dnegative_002dsingle_002dfloat_002c"><span>most-negative-single-float, least-negative-single-float,<a class="copiable-link" href="#most_002dnegative_002dsingle_002dfloat_002c-least_002dnegative_002dsingle_002dfloat_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="least_002dnegative_002dnormalized_002dsingle_002dfloat_002c"><span>least-negative-normalized-single-float,<a class="copiable-link" href="#least_002dnegative_002dnormalized_002dsingle_002dfloat_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="most_002dnegative_002ddouble_002dfloat_002c-least_002dnegative_002ddouble_002dfloat_002c"><span>most-negative-double-float, least-negative-double-float,<a class="copiable-link" href="#most_002dnegative_002ddouble_002dfloat_002c-least_002dnegative_002ddouble_002dfloat_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="least_002dnegative_002dnormalized_002ddouble_002dfloat_002c"><span>least-negative-normalized-double-float,<a class="copiable-link" href="#least_002dnegative_002dnormalized_002ddouble_002dfloat_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="most_002dnegative_002dlong_002dfloat_002c-least_002dnegative_002dlong_002dfloat_002c"><span>most-negative-long-float, least-negative-long-float,<a class="copiable-link" href="#most_002dnegative_002dlong_002dfloat_002c-least_002dnegative_002dlong_002dfloat_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="least_002dnegative_002dnormalized_002dlong_002dfloat"><span>least-negative-normalized-long-float<a class="copiable-link" href="#least_002dnegative_002dnormalized_002dlong_002dfloat"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Constant Variable]</i>
+</p></div>
+<h4 class="subsubheading" id="Constant-Value_003a_003a-8"><span>Constant Value::<a class="copiable-link" href="#Constant-Value_003a_003a-8"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-341"><span>Description::<a class="copiable-link" href="#Description_003a_003a-341"> &para;</a></span></h4>
+
+<p>These <i class="i">constant variables</i> provide a way for programs to examine
+the <i class="i">implementation-defined</i> limits for the various float formats.
+</p>
+<p>Of these <i class="i">variables</i>,
+ each which has &ldquo;<code class="t">-normalized</code>&rdquo; in its <i class="i">name</i>
+  must have a <i class="i">value</i> which is a <i class="i">normalized</i> <i class="i">float</i>, and
+ each which does not have &ldquo;<code class="t">-normalized</code>&rdquo; in its name
+  may have a <i class="i">value</i> which is either a <i class="i">normalized</i> <i class="i">float</i> 
+  or a <i class="i">denormalized</i> <i class="i">float</i>, as appropriate.
+</p>
+<p>Of these <i class="i">variables</i>,
+ each which has &ldquo;<code class="t">short-float</code>&rdquo; in its name
+  must have a <i class="i">value</i> which is a <i class="i">short float</i>,
+ each which has &ldquo;<code class="t">single-float</code>&rdquo; in its name
+  must have a <i class="i">value</i> which is a <i class="i">single float</i>,
+ each which has &ldquo;<code class="t">double-float</code>&rdquo; in its name
+  must have a <i class="i">value</i> which is a <i class="i">double float</i>, and
+ each which has &ldquo;<code class="t">long-float</code>&rdquo; in its name
+  must have a <i class="i">value</i> which is a <i class="i">long float</i>.
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">most-positive-short-float</b>,
+              <b class="b">most-positive-single-float</b>,
+        <b class="b">most-positive-double-float</b>,
+	      <b class="b">most-positive-long-float</b>
+</p>
+<p>Each of these <i class="i">constant variables</i> has as its <i class="i">value</i> 
+  the positive <i class="i">float</i> of the largest magnitude 
+  (closest in value to, but not equal to, positive infinity)
+  for the float format implied by its name.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">least-positive-short-float</b>,
+	      <b class="b">least-positive-normalized-short-float</b>,
+	<b class="b">least-positive-single-float</b>,
+	      <b class="b">least-positive-normalized-single-float</b>,
+	<b class="b">least-positive-double-float</b>,
+	      <b class="b">least-positive-normalized-double-float</b>,
+	<b class="b">least-positive-long-float</b>,
+	      <b class="b">least-positive-normalized-long-float</b>
+</p>
+<p>Each of these <i class="i">constant variables</i> has as its <i class="i">value</i>
+  the smallest positive (nonzero) <i class="i">float</i>
+  for the float format implied by its name.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">least-negative-short-float</b>,
+	      <b class="b">least-negative-normalized-short-float</b>,
+        <b class="b">least-negative-single-float</b>,
+	      <b class="b">least-negative-normalized-single-float</b>,
+        <b class="b">least-negative-double-float</b>,
+	      <b class="b">least-negative-normalized-double-float</b>,
+        <b class="b">least-negative-long-float</b>,
+	      <b class="b">least-negative-normalized-long-float</b>
+</p>
+<p>Each of these <i class="i">constant variables</i> has as its <i class="i">value</i>
+  the negative (nonzero) <i class="i">float</i> of the smallest magnitude
+  for the float format implied by its name.
+  (If an implementation supports minus zero as a <i class="i">different</i> 
+   <i class="i">object</i> from positive zero, this value must not be minus zero.)
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p><b class="b">most-negative-short-float</b>,
+	      <b class="b">most-negative-single-float</b>,
+	<b class="b">most-negative-double-float</b>,
+	      <b class="b">most-negative-long-float</b>
+</p>
+<p>Each of these <i class="i">constant variables</i> has as its <i class="i">value</i>
+  the negative <i class="i">float</i> of the largest magnitude 
+  (closest in value to, but not equal to, negative infinity)
+  for the float format implied by its name.
+</p>
+</dd>
+</dl>
+
+<h4 class="subsubheading" id="Notes_003a_003a-184"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-184"> &para;</a></span></h4>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="short_002dfloat_002depsilon.html">short-float-epsilon, short-float-negative-epsilon,</a>, Previous: <a href="floatp.html">floatp                                                           [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/muffle_002dwarning.html
@@ -0,0 +1,97 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>muffle-warning (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="muffle-warning (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="muffle-warning (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="store_002dvalue.html" rel="next" title="store-value">
+<link href="continue.html" rel="prev" title="continue">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="muffle_002dwarning">
+<div class="nav-panel">
+<p>
+Next: <a href="store_002dvalue.html" accesskey="n" rel="next">store-value                                                       [Restart]</a>, Previous: <a href="continue.html" accesskey="p" rel="prev">continue                                                          [Restart]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="muffle_002dwarning-_005bRestart_005d"><span>9.2.43 muffle-warning                                                    [Restart]<a class="copiable-link" href="#muffle_002dwarning-_005bRestart_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Data-Arguments-Required_003a_003a-2"><span>Data Arguments Required::<a class="copiable-link" href="#Data-Arguments-Required_003a_003a-2"> &para;</a></span></h4>
+
+<p>None.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-213"><span>Description::<a class="copiable-link" href="#Description_003a_003a-213"> &para;</a></span></h4>
+
+<p>This <i class="i">restart</i> is established by <b class="b">warn</b> so that <i class="i">handlers</i>
+of <b class="b">warning</b> <i class="i">conditions</i> have a way to tell <b class="b">warn</b> 
+that a warning has already been dealt with and that no further action is warranted.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-138"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-138"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defvar *all-quiet* nil) &rArr;  *ALL-QUIET*
+ (defvar *saved-warnings* '()) &rArr;  *SAVED-WARNINGS*
+ (defun quiet-warning-handler (c)
+   (when *all-quiet*
+     (let ((r (find-restart 'muffle-warning c)))
+       (when r 
+         (push c *saved-warnings*)
+         (invoke-restart r)))))
+&rArr;  CUSTOM-WARNING-HANDLER
+ (defmacro with-quiet-warnings (&amp;body forms)
+   `(let ((*all-quiet* t)
+          (*saved-warnings* '()))
+      (handler-bind ((warning #'quiet-warning-handler))
+        ,@forms
+        *saved-warnings*)))
+&rArr;  WITH-QUIET-WARNINGS
+ (setq saved
+   (with-quiet-warnings
+     (warn &quot;Situation #1.&quot;)
+     (let ((*all-quiet* nil))
+       (warn &quot;Situation #2.&quot;))
+     (warn &quot;Situation #3.&quot;)))
+<code class="t"> |&gt; </code> Warning: Situation #2.
+&rArr;  (#&lt;SIMPLE-WARNING 42744421&gt; #&lt;SIMPLE-WARNING 42744365&gt;)
+ (dolist (s saved) (format t &quot;~&amp;~A~
+<code class="t"> |&gt; </code> Situation #3.
+<code class="t"> |&gt; </code> Situation #1.
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-187"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-187"> &para;</a></span></h4>
+
+<p><a class="ref" href="Restarts.html">Restarts</a>,
+<a class="ref" href="Interfaces-to-Restarts.html">Interfaces to Restarts</a>,
+<a class="ref" href="invoke_002drestart.html">invoke-restart                                                   [Function]</a>
+,
+<a class="ref" href="#muffle_002dwarning">muffle-warning                                                    [Restart]</a>
+ (<i class="i">function</i>),
+<a class="ref" href="warn.html">warn                                                             [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/multiple_002dvalue_002dbind.html
@@ -0,0 +1,115 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>multiple-value-bind (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="multiple-value-bind (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="multiple-value-bind (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="multiple_002dvalue_002dcall.html" rel="next" title="multiple-value-call">
+<link href="typecase.html" rel="prev" title="typecase">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="multiple_002dvalue_002dbind">
+<div class="nav-panel">
+<p>
+Next: <a href="multiple_002dvalue_002dcall.html" accesskey="n" rel="next">multiple-value-call                                      [Special Operator]</a>, Previous: <a href="typecase.html" accesskey="p" rel="prev">typecase, ctypecase, etypecase                                      [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="multiple_002dvalue_002dbind-_005bMacro_005d"><span>5.3.48 multiple-value-bind                                                 [Macro]<a class="copiable-link" href="#multiple_002dvalue_002dbind-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">multiple-value-bind</code>  <i class="i"><span class="r">(</span>{<i class="i">var</i>}*<span class="r">)</span>
+ 		   <i class="i">values-form</i>
+ 		   {<i class="i">declaration</i>}*
+ 		   {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-67"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-67"> &para;</a></span></h4>
+
+<p><i class="i">var</i>&mdash;a <i class="i">symbol</i> naming a variable; not evaluated.
+</p>
+<p><i class="i">values-form</i>&mdash;a <i class="i">form</i>; evaluated.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-101"><span>Description::<a class="copiable-link" href="#Description_003a_003a-101"> &para;</a></span></h4>
+
+<p>Creates new variable <i class="i">bindings</i> for the <i class="i">vars</i> and
+executes a series of <i class="i">forms</i> that use these <i class="i">bindings</i>.
+</p>
+<p>The variable <i class="i">bindings</i> created are lexical unless
+<b class="b">special</b> declarations are specified.  
+</p>
+<p><i class="i">Values-form</i> is evaluated, and each of the <i class="i">vars</i> is
+bound to the respective value returned by that <i class="i">form</i>.  If there are more
+<i class="i">vars</i> than values returned, extra values of <b class="b">nil</b> are given to the
+remaining <i class="i">vars</i>. If there are more values than 
+<i class="i">vars</i>, the excess
+values are discarded.  The <i class="i">vars</i> are bound to the values over
+the execution of the <i class="i">forms</i>, which make up an implicit <b class="b">progn</b>.
+The consequences are unspecified if a type <i class="i">declaration</i> is specified 
+for a <i class="i">var</i>, but the value to which
+that <i class="i">var</i> is bound  is not consistent with 
+the type <i class="i">declaration</i>.
+</p>
+<p>The <i class="i">scopes</i> of the name binding and <i class="i">declarations</i>
+do not include the <i class="i">values-form</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-75"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-75"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (multiple-value-bind (f r) 
+     (floor 130 11)
+   (list f r)) &rArr;  (11 9)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-85"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-85"> &para;</a></span></h4>
+
+<p><a class="ref" href="let.html">let, let*                                                [Special Operator]</a>
+,
+<a class="ref" href="multiple_002dvalue_002dcall.html">multiple-value-call                                      [Special Operator]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-55"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-55"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (multiple-value-bind ({<i class="i">var</i>}*) <i class="i">values-form</i> {<i class="i">form</i>}*)
+ &equiv; (multiple-value-call #'(lambda (&amp;optional {<i class="i">var</i>}* &amp;rest #1=#:ignore)
+                             (declare (ignore #1#))
+                             {<i class="i">form</i>}*)
+                         <i class="i">values-form</i>)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="multiple_002dvalue_002dcall.html">multiple-value-call                                      [Special Operator]</a>, Previous: <a href="typecase.html">typecase, ctypecase, etypecase                                      [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/multiple_002dvalue_002dcall.html
@@ -0,0 +1,85 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>multiple-value-call (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="multiple-value-call (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="multiple-value-call (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="multiple_002dvalue_002dlist.html" rel="next" title="multiple-value-list">
+<link href="multiple_002dvalue_002dbind.html" rel="prev" title="multiple-value-bind">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="multiple_002dvalue_002dcall">
+<div class="nav-panel">
+<p>
+Next: <a href="multiple_002dvalue_002dlist.html" accesskey="n" rel="next">multiple-value-list                                                 [Macro]</a>, Previous: <a href="multiple_002dvalue_002dbind.html" accesskey="p" rel="prev">multiple-value-bind                                                 [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="multiple_002dvalue_002dcall-_005bSpecial-Operator_005d"><span>5.3.49 multiple-value-call                                      [Special Operator]<a class="copiable-link" href="#multiple_002dvalue_002dcall-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">multiple-value-call</code>  <i class="i"><i class="i">function-form</i> <i class="i">form</i><span class="r">*</span></i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-68"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-68"> &para;</a></span></h4>
+
+<p><i class="i">function-form</i>&mdash;a <i class="i">form</i>; evaluated to produce <i class="i">function</i>.
+</p>
+<p><i class="i">function</i>&mdash;a <i class="i">function designator</i> 
+		   resulting from the evaluation of <i class="i">function-form</i>.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">function</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-102"><span>Description::<a class="copiable-link" href="#Description_003a_003a-102"> &para;</a></span></h4>
+
+<p>Applies <i class="i">function</i> to a <i class="i">list</i> of the <i class="i">objects</i> collected from groups of 
+<i class="i">multiple values</i>_2.
+</p>
+<p><b class="b">multiple-value-call</b> first evaluates the <i class="i">function-form</i>
+to obtain <i class="i">function</i>, and then evaluates each <i class="i">form</i>.
+All the values
+of each <i class="i">form</i> are gathered together (not just one value from each)
+and given as arguments to the <i class="i">function</i>.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-76"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-76"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (multiple-value-call #'list 1 '/ (values 2 3) '/ (values) '/ (floor 2.5))
+&rArr;  (1 / 2 3 / / 2 0.5)
+ (+ (floor 5 3) (floor 19 4)) &equiv; (+ 1 4)
+&rArr;  5
+ (multiple-value-call #'+ (floor 5 3) (floor 19 4)) &equiv; (+ 1 2 4 3)
+&rArr;  10
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-86"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-86"> &para;</a></span></h4>
+
+<p><a class="ref" href="multiple_002dvalue_002dlist.html">multiple-value-list                                                 [Macro]</a>
+, 
+<a class="ref" href="multiple_002dvalue_002dbind.html">multiple-value-bind                                                 [Macro]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/multiple_002dvalue_002dlist.html
@@ -0,0 +1,78 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>multiple-value-list (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="multiple-value-list (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="multiple-value-list (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="multiple_002dvalue_002dprog1.html" rel="next" title="multiple-value-prog1">
+<link href="multiple_002dvalue_002dcall.html" rel="prev" title="multiple-value-call">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="multiple_002dvalue_002dlist">
+<div class="nav-panel">
+<p>
+Next: <a href="multiple_002dvalue_002dprog1.html" accesskey="n" rel="next">multiple-value-prog1                                     [Special Operator]</a>, Previous: <a href="multiple_002dvalue_002dcall.html" accesskey="p" rel="prev">multiple-value-call                                      [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="multiple_002dvalue_002dlist-_005bMacro_005d"><span>5.3.50 multiple-value-list                                                 [Macro]<a class="copiable-link" href="#multiple_002dvalue_002dlist-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">multiple-value-list</code>  <i class="i">form</i> &rArr;  <i class="i">list</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-69"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-69"> &para;</a></span></h4>
+
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>; evaluated as described below.
+</p>
+<p><i class="i">list</i>&mdash;a <i class="i">list</i> of the <i class="i">values</i> returned by <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-103"><span>Description::<a class="copiable-link" href="#Description_003a_003a-103"> &para;</a></span></h4>
+
+<p><b class="b">multiple-value-list</b> evaluates <i class="i">form</i> 
+and creates a <i class="i">list</i> of the <i class="i">multiple values</i>_2 it returns.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-77"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-77"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (multiple-value-list (floor -3 4)) &rArr;  (-1 1)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-87"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-87"> &para;</a></span></h4>
+
+<p><a class="ref" href="values_002dlist.html">values-list                                                      [Function]</a>
+,
+<a class="ref" href="multiple_002dvalue_002dcall.html">multiple-value-call                                      [Special Operator]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-56"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-56"> &para;</a></span></h4>
+
+<p><b class="b">multiple-value-list</b> and <b class="b">values-list</b> are inverses
+of each other.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (multiple-value-list form) &equiv; (multiple-value-call #'list form)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/multiple_002dvalue_002dprog1.html
@@ -0,0 +1,78 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>multiple-value-prog1 (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="multiple-value-prog1 (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="multiple-value-prog1 (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="multiple_002dvalue_002dsetq.html" rel="next" title="multiple-value-setq">
+<link href="multiple_002dvalue_002dlist.html" rel="prev" title="multiple-value-list">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="multiple_002dvalue_002dprog1">
+<div class="nav-panel">
+<p>
+Next: <a href="multiple_002dvalue_002dsetq.html" accesskey="n" rel="next">multiple-value-setq                                                 [Macro]</a>, Previous: <a href="multiple_002dvalue_002dlist.html" accesskey="p" rel="prev">multiple-value-list                                                 [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="multiple_002dvalue_002dprog1-_005bSpecial-Operator_005d"><span>5.3.51 multiple-value-prog1                                     [Special Operator]<a class="copiable-link" href="#multiple_002dvalue_002dprog1-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">multiple-value-prog</code>  <i class="i">1</i> &rArr;  <i class="i">first-form {<i class="i">form</i>}*</i>
+</p>
+<p><span class="r">first-form-results</span>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-70"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-70"> &para;</a></span></h4>
+
+<p><i class="i">first-form</i>&mdash;a <i class="i">form</i>; evaluated as described below.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>; evaluated as described below.
+</p>
+<p><i class="i">first-form-results</i>&mdash;the <i class="i">values</i> resulting from
+			     the <i class="i">evaluation</i> of <i class="i">first-form</i>.      
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-104"><span>Description::<a class="copiable-link" href="#Description_003a_003a-104"> &para;</a></span></h4>
+
+<p><b class="b">multiple-value-prog1</b> evaluates <i class="i">first-form</i> and saves
+all the values produced by that <i class="i">form</i>. It then evaluates each 
+<i class="i">form</i> from left to right, discarding their values.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-78"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-78"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq temp '(1 2 3)) &rArr;  (1 2 3)
+ (multiple-value-prog1
+    (values-list temp)
+    (setq temp nil)
+    (values-list temp)) &rArr;  1, 2, 3
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-88"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-88"> &para;</a></span></h4>
+
+<p><a class="ref" href="prog1.html">prog1, prog2                                                        [Macro]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/multiple_002dvalue_002dsetq.html
@@ -0,0 +1,115 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>multiple-value-setq (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="multiple-value-setq (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="multiple-value-setq (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="values.html" rel="next" title="values">
+<link href="multiple_002dvalue_002dprog1.html" rel="prev" title="multiple-value-prog1">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="multiple_002dvalue_002dsetq">
+<div class="nav-panel">
+<p>
+Next: <a href="values.html" accesskey="n" rel="next">values                                                           [Accessor]</a>, Previous: <a href="multiple_002dvalue_002dprog1.html" accesskey="p" rel="prev">multiple-value-prog1                                     [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="multiple_002dvalue_002dsetq-_005bMacro_005d"><span>5.3.52 multiple-value-setq                                                 [Macro]<a class="copiable-link" href="#multiple_002dvalue_002dsetq-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">multiple-value-setq</code>  <i class="i">vars form</i> &rArr;  <i class="i">result</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-71"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-71"> &para;</a></span></h4>
+
+<p><i class="i">vars</i>&mdash;a <i class="i">list</i> of <i class="i">symbols</i>
+	       that are either <i class="i">variable</i> <i class="i">names</i>
+	       or <i class="i">names</i> of <i class="i">symbol macros</i>.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">result</i>&mdash;The <i class="i">primary value</i> returned by the <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-105"><span>Description::<a class="copiable-link" href="#Description_003a_003a-105"> &para;</a></span></h4>
+
+<p><b class="b">multiple-value-setq</b> assigns values to <i class="i">vars</i>.
+</p>
+<p>The <i class="i">form</i> is evaluated,
+and each <i class="i">var</i> is <i class="i">assigned</i> 
+to the corresponding <i class="i">value</i> returned by that <i class="i">form</i>. 
+If there are more <i class="i">vars</i> than <i class="i">values</i> returned,
+<b class="b">nil</b> is <i class="i">assigned</i> to the extra <i class="i">vars</i>.
+If there are more <i class="i">values</i> than <i class="i">vars</i>,
+the extra <i class="i">values</i> are discarded.
+</p>
+<p>If any <i class="i">var</i> is the <i class="i">name</i> of a <i class="i">symbol macro</i>,
+then it is <i class="i">assigned</i> as if by <b class="b">setf</b>.  Specifically,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (multiple-value-setq (<i class="i">symbol</i>_1 ... <i class="i">symbol</i>_n) <i class="i">value-producing-form</i>)
+</pre></div>
+
+<p>is defined to always behave in the same way as
+</p>
+<div class="example">
+<pre class="example-preformatted"> (values (setf (values <i class="i">symbol</i>_1 ... <i class="i">symbol</i>_n) <i class="i">value-producing-form</i>))
+</pre></div>
+
+<p>in order that the rules for order of evaluation and side-effects be consistent
+with those used by <b class="b">setf</b>.
+<a class="index-entry-id" id="index-order-of-evaluation-4"></a>
+</p>
+<a class="index-entry-id" id="index-evaluation-order-4"></a>
+
+<p>See <a class="ref" href="VALUES-Forms-as-Places.html">VALUES Forms as Places</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-79"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-79"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (multiple-value-setq (quotient remainder) (truncate 3.2 2)) &rArr;  1
+ quotient &rArr;  1
+ remainder &rArr;  1.2
+ (multiple-value-setq (a b c) (values 1 2)) &rArr;  1
+ a &rArr;  1
+ b &rArr;  2
+ c &rArr;  NIL
+ (multiple-value-setq (a b) (values 4 5 6)) &rArr;  4
+ a &rArr;  4
+ b &rArr;  5
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-89"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-89"> &para;</a></span></h4>
+
+<p><a class="ref" href="setq.html">setq                                                         [Special Form]</a>
+,
+<a class="ref" href="symbol_002dmacrolet.html">symbol-macrolet                                          [Special Operator]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="values.html">values                                                           [Accessor]</a>, Previous: <a href="multiple_002dvalue_002dprog1.html">multiple-value-prog1                                     [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/multiple_002dvalues_002dlimit.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>multiple-values-limit (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="multiple-values-limit (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="multiple-values-limit (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="nth_002dvalue.html" rel="next" title="nth-value">
+<link href="values_002dlist.html" rel="prev" title="values-list">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="multiple_002dvalues_002dlimit">
+<div class="nav-panel">
+<p>
+Next: <a href="nth_002dvalue.html" accesskey="n" rel="next">nth-value                                                           [Macro]</a>, Previous: <a href="values_002dlist.html" accesskey="p" rel="prev">values-list                                                      [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="multiple_002dvalues_002dlimit-_005bConstant-Variable_005d"><span>5.3.55 multiple-values-limit                                   [Constant Variable]<a class="copiable-link" href="#multiple_002dvalues_002dlimit-_005bConstant-Variable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Constant-Value_003a_003a-5"><span>Constant Value::<a class="copiable-link" href="#Constant-Value_003a_003a-5"> &para;</a></span></h4>
+
+<p>An <i class="i">integer</i> not smaller than <code class="t">20</code>, 
+the exact magnitude of which is <i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-108"><span>Description::<a class="copiable-link" href="#Description_003a_003a-108"> &para;</a></span></h4>
+
+<p>The upper exclusive bound on the number of <i class="i">values</i> that may be
+    returned from a <i class="i">function</i>,
+</p>
+<p>bound or assigned by <b class="b">multiple-value-bind</b> or <b class="b">multiple-value-setq</b>,
+ or passed as a first argument to <b class="b">nth-value</b>.
+(If these individual limits might differ, the minimum value is used.)
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-92"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-92"> &para;</a></span></h4>
+
+<p><a class="ref" href="lambda_002dparameters_002dlimit.html">lambda-parameters-limit                                 [Constant Variable]</a>
+, 
+<a class="ref" href="call_002darguments_002dlimit.html">call-arguments-limit                                    [Constant Variable]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-59"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-59"> &para;</a></span></h4>
+
+<p>Implementors are encouraged to make this limit as large as possible.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/name_002dchar.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>name-char (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="name-char (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="name-char (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="char_002dname.html" rel="prev" title="char-name">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="name_002dchar">
+<div class="nav-panel">
+<p>
+Previous: <a href="char_002dname.html" accesskey="p" rel="prev">char-name                                                        [Function]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="name_002dchar-_005bFunction_005d"><span>13.2.21 name-char                                                        [Function]<a class="copiable-link" href="#name_002dchar-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">name-char</code>  <i class="i">name</i> &rArr;  <i class="i">char-p</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-273"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-273"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">string designator</i>.
+</p>
+<p><i class="i">char-p</i>&mdash;a <i class="i">character</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-370"><span>Description::<a class="copiable-link" href="#Description_003a_003a-370"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">character</i> <i class="i">object</i> whose <i class="i">name</i> is
+<i class="i">name</i> (as determined by <b class="b">string-equal</b>&mdash;<i class="i">i.e.</i>, lookup is not case sensitive).
+If such a <i class="i">character</i> does not exist, <b class="b">nil</b> is returned.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-257"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-257"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">(name-char 'space) &rArr;  #\Space
+(name-char &quot;space&quot;) &rArr;  #\Space
+(name-char &quot;Space&quot;) &rArr;  #\Space
+(let ((x (char-name #\a)))
+  (or (not x) (eql (name-char x) #\a))) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-117"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-117"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">name</i> is not a <i class="i">string designator</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-299"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-299"> &para;</a></span></h4>
+
+<p><a class="ref" href="char_002dname.html">char-name                                                        [Function]</a>
+</p>
+
+
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/namestring.html
@@ -0,0 +1,163 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>namestring (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="namestring (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="namestring (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="parse_002dnamestring.html" rel="next" title="parse-namestring">
+<link href="_002adefault_002dpathname_002ddefaults_002a.html" rel="prev" title="*default-pathname-defaults*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="namestring">
+<div class="nav-panel">
+<p>
+Next: <a href="parse_002dnamestring.html" accesskey="n" rel="next">parse-namestring                                                 [Function]</a>, Previous: <a href="_002adefault_002dpathname_002ddefaults_002a.html" accesskey="p" rel="prev">*default-pathname-defaults*                                      [Variable]</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="namestring_002c-file_002dnamestring_002c-directory_002dnamestring_002c"><span>19.4.11 namestring, file-namestring, directory-namestring,<a class="copiable-link" href="#namestring_002c-file_002dnamestring_002c-directory_002dnamestring_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="host_002dnamestring_002c-enough_002dnamestring"><span>host-namestring, enough-namestring<a class="copiable-link" href="#host_002dnamestring_002c-enough_002dnamestring"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Function]</i>
+</p></div>
+<p><code class="code">namestring</code>  <i class="i">pathname</i> &rArr;  <i class="i">namestring</i>
+</p>
+<p><code class="code">file-namestring</code>  <i class="i">pathname</i> &rArr;  <i class="i">namestring</i>
+</p>
+<p><code class="code">directory-namestring</code>  <i class="i">pathname</i> &rArr;  <i class="i">namestring</i>
+</p>
+<p><code class="code">host-namestring</code>  <i class="i">pathname</i> &rArr;  <i class="i">namestring</i>
+</p>
+<p><code class="code">enough-namestring</code>  <i class="i">pathname <span class="r">&amp;optional</span> defaults</i> &rArr;  <i class="i">namestring</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-396"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-396"> &para;</a></span></h4>
+
+<p><i class="i">pathname</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">defaults</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p>The default is the <i class="i">value</i> of <b class="b">*default-pathname-defaults*</b>.
+</p>
+<p><i class="i">namestring</i>&mdash;a <i class="i">string</i> or <b class="b">nil</b>.
+</p>
+<p>[Editorial Note by KMP: Under what circumstances can NIL be returned??]
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-515"><span>Description::<a class="copiable-link" href="#Description_003a_003a-515"> &para;</a></span></h4>
+
+<p>These functions convert <i class="i">pathname</i> into a namestring.
+The name represented by <i class="i">pathname</i> is returned as a <i class="i">namestring</i>
+in an <i class="i">implementation-dependent</i> canonical form.
+</p>
+<p><b class="b">namestring</b> returns the full form of <i class="i">pathname</i>.
+</p>
+<p><b class="b">file-namestring</b> returns just the name, type, and version
+ components of <i class="i">pathname</i>.
+</p>
+<p><b class="b">directory-namestring</b> returns the directory name portion.
+</p>
+<p><b class="b">host-namestring</b> returns the host name. 
+</p>
+<p><b class="b">enough-namestring</b> returns an abbreviated namestring 
+ that is just sufficient to identify the file named by <i class="i">pathname</i>
+ when considered relative to the <i class="i">defaults</i>.
+ It is required that
+</p>
+<div class="example">
+<pre class="example-preformatted"> (merge-pathnames (enough-namestring pathname defaults) defaults)
+&equiv; (merge-pathnames (parse-namestring pathname nil defaults) defaults)
+</pre></div>
+
+<p>in all cases, and the result of <b class="b">enough-namestring</b> is
+the shortest reasonable <i class="i">string</i> that will satisfy this criterion.
+</p>
+<p>It is not necessarily possible to construct a valid <i class="i">namestring</i> 
+by concatenating some of the three shorter <i class="i">namestrings</i> in some order.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-376"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-376"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (namestring &quot;getty&quot;)            
+&rArr;  &quot;getty&quot;
+ (setq q (make-pathname :host &quot;kathy&quot; 
+                         :directory 
+                           (pathname-directory *default-pathname-defaults*)
+                         :name &quot;getty&quot;)) 
+&rArr;  #S(PATHNAME :HOST &quot;kathy&quot; :DEVICE NIL :DIRECTORY <i class="i">directory-name</i> 
+       :NAME &quot;getty&quot; :TYPE NIL :VERSION NIL)
+ (file-namestring q) &rArr;  &quot;getty&quot;
+ (directory-namestring q) &rArr;  <i class="i">directory-name</i>
+ (host-namestring q) &rArr;  &quot;kathy&quot; 
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> ;;;Using Unix syntax and the wildcard conventions used by the
+ ;;;particular version of Unix on which this example was created:
+ (namestring
+   (translate-pathname &quot;/usr/dmr/hacks/frob.l&quot;
+                       &quot;/usr/d*/hacks/*.l&quot;
+                       &quot;/usr/d*/backup/hacks/backup-*.*&quot;))
+&rArr;  &quot;/usr/dmr/backup/hacks/backup-frob.l&quot;
+ (namestring
+   (translate-pathname &quot;/usr/dmr/hacks/frob.l&quot;
+                       &quot;/usr/d*/hacks/fr*.l&quot;
+                       &quot;/usr/d*/backup/hacks/backup-*.*&quot;))
+&rArr;  &quot;/usr/dmr/backup/hacks/backup-ob.l&quot;
+
+ ;;;This is similar to the above example but uses two different hosts,
+ ;;;U: which is a Unix and V: which is a VMS.  Note the translation
+ ;;;of file type and alphabetic case conventions.
+ (namestring
+   (translate-pathname &quot;U:/usr/dmr/hacks/frob.l&quot;
+                       &quot;U:/usr/d*/hacks/*.l&quot;
+                       &quot;V:SYS$DISK:[D*.BACKUP.HACKS]BACKUP-*.*&quot;))
+&rArr;  &quot;V:SYS$DISK:[DMR.BACKUP.HACKS]BACKUP-FROB.LSP&quot;
+ (namestring
+   (translate-pathname &quot;U:/usr/dmr/hacks/frob.l&quot;
+                       &quot;U:/usr/d*/hacks/fr*.l&quot;
+                       &quot;V:SYS$DISK:[D*.BACKUP.HACKS]BACKUP-*.*&quot;))
+&rArr;  &quot;V:SYS$DISK:[DMR.BACKUP.HACKS]BACKUP-OB.LSP&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-418"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-418"> &para;</a></span></h4>
+
+<p><a class="ref" href="truename.html">truename                                                         [Function]</a>
+,
+<a class="ref" href="merge_002dpathnames.html">merge-pathnames                                                  [Function]</a>
+,
+<b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="parse_002dnamestring.html">parse-namestring                                                 [Function]</a>, Previous: <a href="_002adefault_002dpathname_002ddefaults_002a.html">*default-pathname-defaults*                                      [Variable]</a>, Up: <a href="Filenames-Dictionary.html">Filenames Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/nconc.html
@@ -0,0 +1,123 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>nconc (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="nconc (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="nconc (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="append.html" rel="next" title="append">
+<link href="null.html" rel="prev" title="null">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="nconc">
+<div class="nav-panel">
+<p>
+Next: <a href="append.html" accesskey="n" rel="next">append                                                           [Function]</a>, Previous: <a href="null.html" accesskey="p" rel="prev">null                                                             [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="nconc-_005bFunction_005d"><span>14.2.25 nconc                                                            [Function]<a class="copiable-link" href="#nconc-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">nconc</code>  <i class="i"><span class="r">&amp;rest</span> lists</i> &rArr;  <i class="i">concatenated-list</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-294"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-294"> &para;</a></span></h4>
+
+<p><i class="i">list</i>&mdash;each but the last must be a <i class="i">list</i> 
+	(which might be a <i class="i">dotted list</i> but must not be a <i class="i">circular list</i>);
+        the last <i class="i">list</i> may be any <i class="i">object</i>.
+</p>
+<p><i class="i">concatenated-list</i>&mdash;a <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-395"><span>Description::<a class="copiable-link" href="#Description_003a_003a-395"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">list</i> that is the concatenation of <i class="i">lists</i>.
+If no <i class="i">lists</i> are supplied, <code class="t">(nconc)</code> returns <b class="b">nil</b>.
+</p>
+<p><b class="b">nconc</b> is defined using the following recursive relationship:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (nconc) &rArr;  ()
+ (nconc nil . <i class="i">lists</i>) &equiv; (nconc . <i class="i">lists</i>)
+ (nconc <i class="i">list</i>) &rArr;  <i class="i">list</i>
+ (nconc <i class="i">list-1</i> <i class="i">list-2</i>) &equiv; (progn (rplacd (last <i class="i">list-1</i>) <i class="i">list-2</i>) <i class="i">list-1</i>)
+ (nconc <i class="i">list-1</i> <i class="i">list-2</i> . <i class="i">lists</i>) &equiv; (nconc (nconc <i class="i">list-1</i> <i class="i">list-2</i>) . <i class="i">lists</i>)
+</pre></div>
+
+<h4 class="subsubheading" id="Examples_003a_003a-278"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-278"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (nconc) &rArr;  NIL
+ (setq x '(a b c)) &rArr;  (A B C)
+ (setq y '(d e f)) &rArr;  (D E F)
+ (nconc x y) &rArr;  (A B C D E F)
+ x &rArr;  (A B C D E F)
+</pre></div>
+
+<p>Note, in the example, that the value of <code class="t">x</code> is now different,
+since its last <i class="i">cons</i> 
+has been <b class="b">rplacd</b>&rsquo;d to the value of <code class="t">y</code>.
+If <code class="t">(nconc x y)</code> were evaluated again,
+it would yield a piece of a <i class="i">circular list</i>,
+whose printed representation would be
+<code class="t">(A B C D E F D E F D E F ...)</code>, repeating forever;
+if the <b class="b">*print-circle*</b> switch were <i class="i">non-nil</i>,
+it would be printed as <code class="t">(A B C . #1=(D E F . #1#))</code>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq foo (list 'a 'b 'c 'd 'e)
+       bar (list 'f 'g 'h 'i 'j)
+       baz (list 'k 'l 'm)) &rArr;  (K L M)
+ (setq foo (nconc foo bar baz)) &rArr;  (A B C D E F G H I J K L M)
+ foo &rArr;  (A B C D E F G H I J K L M)
+ bar &rArr;  (F G H I J K L M)
+ baz &rArr;  (K L M)
+
+ (setq foo (list 'a 'b 'c 'd 'e)
+       bar (list 'f 'g 'h 'i 'j)
+       baz (list 'k 'l 'm)) &rArr;  (K L M)
+ (setq foo (nconc nil foo bar nil baz)) &rArr;  (A B C D E F G H I J K L M) 
+ foo &rArr;  (A B C D E F G H I J K L M)
+ bar &rArr;  (F G H I J K L M)
+ baz &rArr;  (K L M)
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-40"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-40"> &para;</a></span></h4>
+
+<p>The <i class="i">lists</i> are modified rather than copied.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-320"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-320"> &para;</a></span></h4>
+
+<p><a class="ref" href="append.html">append                                                           [Function]</a>
+, 
+<a class="ref" href="concatenate.html">concatenate                                                      [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="append.html">append                                                           [Function]</a>, Previous: <a href="null.html">null                                                             [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/next_002dmethod_002dp.html
@@ -0,0 +1,78 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>next-method-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="next-method-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="next-method-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="call_002dmethod.html" rel="next" title="call-method">
+<link href="find_002dclass.html" rel="prev" title="find-class">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="next_002dmethod_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="call_002dmethod.html" accesskey="n" rel="next">call-method, make-method                                      [Local Macro]</a>, Previous: <a href="find_002dclass.html" accesskey="p" rel="prev">find-class                                                       [Accessor]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="next_002dmethod_002dp-_005bLocal-Function_005d"><span>7.7.29 next-method-p                                              [Local Function]<a class="copiable-link" href="#next_002dmethod_002dp-_005bLocal-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-27"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-27"> &para;</a></span></h4>
+
+<p><code class="code">next-method-p</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-117"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-117"> &para;</a></span></h4>
+
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>. 
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-156"><span>Description::<a class="copiable-link" href="#Description_003a_003a-156"> &para;</a></span></h4>
+
+<p>The locally defined function <b class="b">next-method-p</b> can be used 
+</p>
+<p>within the body <i class="i">forms</i> (but not the <i class="i">lambda list</i>)
+</p>
+<p>defined by a <i class="i">method-defining form</i> to determine
+whether a next <i class="i">method</i> exists.
+</p>
+<p>The <i class="i">function</i> <b class="b">next-method-p</b> has <i class="i">lexical scope</i> and <i class="i">indefinite extent</i>.
+</p>
+<p>Whether or not <b class="b">next-method-p</b> is <i class="i">fbound</i> in the
+<i class="i">global environment</i> is <i class="i">implementation-dependent</i>;
+however, the restrictions on redefinition and <i class="i">shadowing</i> of
+<b class="b">next-method-p</b> are the same as for <i class="i">symbols</i> in the <code class="t">COMMON-LISP</code> <i class="i">package</i>
+which are <i class="i">fbound</i> in the <i class="i">global environment</i>.
+The consequences of attempting to use <b class="b">next-method-p</b> outside
+of a <i class="i">method-defining form</i> are undefined.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-138"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-138"> &para;</a></span></h4>
+
+<p><a class="ref" href="call_002dnext_002dmethod.html">call-next-method                                           [Local Function]</a>
+,
+<a class="ref" href="defmethod.html">defmethod                                                           [Macro]</a>
+,
+<a class="ref" href="call_002dmethod.html">call-method, make-method                                      [Local Macro]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/nil-_0028Type_0029.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>nil (Type) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="nil (Type) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="nil (Type) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="boolean.html" rel="next" title="boolean">
+<link href="Types-and-Classes-Dictionary.html" rel="prev" title="Types and Classes Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="nil-_0028Type_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="boolean.html" accesskey="n" rel="next">boolean                                                              [Type]</a>, Previous: <a href="Types-and-Classes-Dictionary.html" accesskey="p" rel="prev">Types and Classes Dictionary</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="nil-_005bType_005d"><span>4.4.1 nil                                                                  [Type]<a class="copiable-link" href="#nil-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a"> &para;</a></span></h4>
+<p>all <i class="i">types</i>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-30"><span>Description::<a class="copiable-link" href="#Description_003a_003a-30"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">nil</b> contains no <i class="i">objects</i> and so is also
+called the <i class="i">empty type</i>.
+The <i class="i">type</i> <b class="b">nil</b> is a <i class="i">subtype</i> of every <i class="i">type</i>.
+No <i class="i">object</i> is of <i class="i">type</i> <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-18"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-18"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> containing the <i class="i">object</i> <b class="b">nil</b> is the <i class="i">type</i> <b class="b">null</b>,
+not the <i class="i">type</i> <b class="b">nil</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/nil.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>nil (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="nil (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="nil (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="not.html" rel="next" title="not">
+<link href="unwind_002dprotect.html" rel="prev" title="unwind-protect">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="nil">
+<div class="nav-panel">
+<p>
+Next: <a href="not.html" accesskey="n" rel="next">not                                                              [Function]</a>, Previous: <a href="unwind_002dprotect.html" accesskey="p" rel="prev">unwind-protect                                           [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="nil-_005bConstant-Variable_005d"><span>5.3.30 nil                                                     [Constant Variable]<a class="copiable-link" href="#nil-_005bConstant-Variable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Constant-Value_003a_003a-3"><span>Constant Value::<a class="copiable-link" href="#Constant-Value_003a_003a-3"> &para;</a></span></h4>
+
+<p><b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-83"><span>Description::<a class="copiable-link" href="#Description_003a_003a-83"> &para;</a></span></h4>
+
+<p><b class="b">nil</b> represents both <i class="i">boolean</i> (and <i class="i">generalized boolean</i>) <i class="i">false</i>
+and the <i class="i">empty list</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-57"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-57"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> nil &rArr;  NIL 
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-68"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-68"> &para;</a></span></h4>
+
+<p><a class="ref" href="t.html">t                                                       [Constant Variable]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/no_002dapplicable_002dmethod.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>no-applicable-method (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="no-applicable-method (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="no-applicable-method (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="no_002dnext_002dmethod.html" rel="next" title="no-next-method">
+<link href="method_002dqualifiers.html" rel="prev" title="method-qualifiers">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="no_002dapplicable_002dmethod">
+<div class="nav-panel">
+<p>
+Next: <a href="no_002dnext_002dmethod.html" accesskey="n" rel="next">no-next-method                                  [Standard Generic Function]</a>, Previous: <a href="method_002dqualifiers.html" accesskey="p" rel="prev">method-qualifiers                               [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="no_002dapplicable_002dmethod-_005bStandard-Generic-Function_005d"><span>7.7.16 no-applicable-method                            [Standard Generic Function]<a class="copiable-link" href="#no_002dapplicable_002dmethod-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-21"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-21"> &para;</a></span></h4>
+
+<p><code class="code">no-applicable-method</code>  <i class="i">generic-function <span class="r">&amp;rest</span> function-arguments</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-10"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-10"> &para;</a></span></h4>
+
+<p><code class="code">no-applicable-method</code>  <i class="i"><span class="r">(</span><i class="i">generic-function</i> <b class="b">t</b><span class="r">)</span>
+				     <span class="r">&amp;rest</span> function-arguments</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-104"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-104"> &para;</a></span></h4>
+
+<p><i class="i">generic-function</i>&mdash;a <i class="i">generic function</i> 
+			   on which no <i class="i">applicable method</i> was found.  
+</p>
+<p><i class="i">function-arguments</i>&mdash;<i class="i">arguments</i> to the <i class="i">generic-function</i>.
+</p>
+<p><i class="i">result</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-143"><span>Description::<a class="copiable-link" href="#Description_003a_003a-143"> &para;</a></span></h4>
+
+<p>The generic function <b class="b">no-applicable-method</b> is called when a
+<i class="i">generic function</i> 
+is invoked
+and no <i class="i">method</i> on that <i class="i">generic function</i> is applicable.
+The <i class="i">default method</i> signals an error.
+</p>
+<p>The generic function <b class="b">no-applicable-method</b> is not intended
+to be called by programmers.  Programmers may write <i class="i">methods</i> for it.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-31"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-31"> &para;</a></span></h4>
+
+<p>The default <i class="i">method</i> signals an error of <i class="i">type</i> <b class="b">error</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-125"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-125"> &para;</a></span></h4>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/no_002dnext_002dmethod.html
@@ -0,0 +1,83 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>no-next-method (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="no-next-method (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="no-next-method (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="remove_002dmethod.html" rel="next" title="remove-method">
+<link href="no_002dapplicable_002dmethod.html" rel="prev" title="no-applicable-method">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="no_002dnext_002dmethod">
+<div class="nav-panel">
+<p>
+Next: <a href="remove_002dmethod.html" accesskey="n" rel="next">remove-method                                   [Standard Generic Function]</a>, Previous: <a href="no_002dapplicable_002dmethod.html" accesskey="p" rel="prev">no-applicable-method                            [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="no_002dnext_002dmethod-_005bStandard-Generic-Function_005d"><span>7.7.17 no-next-method                                  [Standard Generic Function]<a class="copiable-link" href="#no_002dnext_002dmethod-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-22"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-22"> &para;</a></span></h4>
+
+<p><code class="code">no-next-method</code>  <i class="i">generic-function method <span class="r">&amp;rest</span> args</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-11"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-11"> &para;</a></span></h4>
+
+<p><code class="code">no-next-method</code>  <i class="i"><span class="r">(</span><i class="i">generic-function</i> <b class="b">standard-generic-function</b><span class="r">)</span>
+			       <span class="r">(</span><i class="i">method</i> <b class="b">standard-method</b><span class="r">)</span>
+			       <span class="r">&amp;rest</span> args</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-105"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-105"> &para;</a></span></h4>
+
+<p><i class="i">generic-function</i> &ndash; <i class="i">generic function</i> to which <i class="i">method</i> belongs.
+</p>
+<p><i class="i">method</i> &ndash; <i class="i">method</i> that contained the call to
+		  <b class="b">call-next-method</b> for which there is no next <i class="i">method</i>.
+</p>
+<p><i class="i">args</i> &ndash; arguments to <b class="b">call-next-method</b>.
+</p>
+<p><i class="i">result</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-144"><span>Description::<a class="copiable-link" href="#Description_003a_003a-144"> &para;</a></span></h4>
+
+<p>The <i class="i">generic function</i> <b class="b">no-next-method</b> is called by <b class="b">call-next-method</b> 
+when there is no <i class="i">next method</i>.
+</p>
+<p>The <i class="i">generic function</i> <b class="b">no-next-method</b> is not intended to be called by programmers.
+Programmers may write <i class="i">methods</i> for it.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-32"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-32"> &para;</a></span></h4>
+
+<p>The system-supplied <i class="i">method</i> on <b class="b">no-next-method</b> 
+signals an error of <i class="i">type</i> <b class="b">error</b>. 
+[Editorial Note by KMP: perhaps control-error??]
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-126"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-126"> &para;</a></span></h4>
+
+<p><a class="ref" href="call_002dnext_002dmethod.html">call-next-method                                           [Local Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/not-_0028Type-Specifier_0029.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>not (Type Specifier) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="not (Type Specifier) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="not (Type Specifier) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="and-_0028Type-Specifier_0029.html" rel="next" title="and (Type Specifier)">
+<link href="member-_0028Type-Specifier_0029.html" rel="prev" title="member (Type Specifier)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="not-_0028Type-Specifier_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="and-_0028Type-Specifier_0029.html" accesskey="n" rel="next">and                                                        [Type Specifier]</a>, Previous: <a href="member-_0028Type-Specifier_0029.html" accesskey="p" rel="prev">member                                                     [Type Specifier]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="not-_005bType-Specifier_005d"><span>4.4.19 not                                                        [Type Specifier]<a class="copiable-link" href="#not-_005bType-Specifier_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-3"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-3"> &para;</a></span></h4>
+
+<p>Combining.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-3"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-3"> &para;</a></span></h4>
+
+<p>(<code class="code">not</code>{<i class="i">typespec</i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-3"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-3"> &para;</a></span></h4>
+
+<p><i class="i">typespec</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-3"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-3"> &para;</a></span></h4>
+
+<p>This denotes the set of all <i class="i">objects</i> that are not of the <i class="i">type</i> <i class="i">typespec</i>.
+</p>
+<p>The argument is required, and cannot be <b class="b">*</b>.
+</p>
+<p>The symbol <b class="b">not</b> is not valid as a <i class="i">type specifier</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/not.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>not (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="not (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="not (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="t.html" rel="next" title="t">
+<link href="nil.html" rel="prev" title="nil">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="not">
+<div class="nav-panel">
+<p>
+Next: <a href="t.html" accesskey="n" rel="next">t                                                       [Constant Variable]</a>, Previous: <a href="nil.html" accesskey="p" rel="prev">nil                                                     [Constant Variable]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="not-_005bFunction_005d"><span>5.3.31 not                                                              [Function]<a class="copiable-link" href="#not-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">not</code>  <i class="i">x</i> &rArr;  <i class="i">boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-51"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-51"> &para;</a></span></h4>
+
+<p><i class="i">x</i>&mdash;a <i class="i">generalized boolean</i> (<i class="i">i.e.</i>, any <i class="i">object</i>).
+</p>
+<p><i class="i">boolean</i>&mdash;a <i class="i">boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-84"><span>Description::<a class="copiable-link" href="#Description_003a_003a-84"> &para;</a></span></h4>
+
+<p>Returns <b class="b">t</b> if <i class="i">x</i> is <i class="i">false</i>;
+otherwise, returns <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-58"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-58"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (not nil) &rArr;  T
+ (not '()) &rArr;  T
+ (not (integerp 'sss)) &rArr;  T
+ (not (integerp 1)) &rArr;  NIL
+ (not 3.7) &rArr;  NIL
+ (not 'apple) &rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-69"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-69"> &para;</a></span></h4>
+
+<p><a class="ref" href="null.html">null                                                             [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-41"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-41"> &para;</a></span></h4>
+
+<p><b class="b">not</b> is intended to be used to invert the &lsquo;truth value&rsquo; of a <i class="i">boolean</i>
+(or <i class="i">generalized boolean</i>)
+whereas <b class="b">null</b> is intended to be used to test for the <i class="i">empty list</i>.
+Operationally, <b class="b">not</b> and <b class="b">null</b> compute the same result;
+which to use is a matter of style.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/nth.html
@@ -0,0 +1,98 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>nth (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="nth (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="nth (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="endp.html" rel="next" title="endp">
+<link href="first.html" rel="prev" title="first">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="nth">
+<div class="nav-panel">
+<p>
+Next: <a href="endp.html" accesskey="n" rel="next">endp                                                             [Function]</a>, Previous: <a href="first.html" accesskey="p" rel="prev">first, second, third, fourth, fifth,</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="nth-_005bAccessor_005d"><span>14.2.22 nth                                                              [Accessor]<a class="copiable-link" href="#nth-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">nth</code>  <i class="i">n list</i> &rArr;  <i class="i">object</i>
+</p>
+<p>(setf (<code class="code">         nth</code> <i class="i">n list</i>) new-object)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-291"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-291"> &para;</a></span></h4>
+
+<p><i class="i">n</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<p><i class="i">list</i>&mdash;a <i class="i">list</i>,
+</p>
+<p>which might be a <i class="i">dotted list</i> or a <i class="i">circular list</i>.
+</p>
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">new-object</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-392"><span>Description::<a class="copiable-link" href="#Description_003a_003a-392"> &para;</a></span></h4>
+
+<p><b class="b">nth</b> locates the <i class="i">n</i>th element of <i class="i">list</i>,
+where the <i class="i">car</i> of the <i class="i">list</i> is the &ldquo;zeroth&rdquo; element.
+</p>
+<p>Specifically,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (nth <i class="i">n</i> <i class="i">list</i>) &equiv; (car (nthcdr <i class="i">n</i> <i class="i">list</i>))
+</pre></div>
+
+<p><b class="b">nth</b> may be used to specify a <i class="i">place</i> to <b class="b">setf</b>.
+</p>
+<p>Specifically,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setf (nth <i class="i">n</i> <i class="i">list</i>) <i class="i">new-object</i>) &equiv; (setf (car (nthcdr <i class="i">n</i> <i class="i">list</i>)) <i class="i">new-object</i>)
+</pre></div>
+
+<h4 class="subsubheading" id="Examples_003a_003a-275"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-275"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (nth 0 '(foo bar baz)) &rArr;  FOO
+ (nth 1 '(foo bar baz)) &rArr;  BAR
+ (nth 3 '(foo bar baz)) &rArr;  NIL
+ (setq 0-to-3 (list 0 1 2 3)) &rArr;  (0 1 2 3)
+ (setf (nth 2 0-to-3) &quot;two&quot;) &rArr;  &quot;two&quot;
+ 0-to-3 &rArr;  (0 1 &quot;two&quot; 3)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-318"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-318"> &para;</a></span></h4>
+
+<p><a class="ref" href="elt.html">elt                                                              [Accessor]</a>
+,
+<a class="ref" href="first.html">first, second, third, fourth, fifth,</a>
+,
+<a class="ref" href="nthcdr.html">nthcdr                                                           [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/nth_002dvalue.html
@@ -0,0 +1,91 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>nth-value (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="nth-value (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="nth-value (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="prog.html" rel="next" title="prog">
+<link href="multiple_002dvalues_002dlimit.html" rel="prev" title="multiple-values-limit">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="nth_002dvalue">
+<div class="nav-panel">
+<p>
+Next: <a href="prog.html" accesskey="n" rel="next">prog, prog*                                                         [Macro]</a>, Previous: <a href="multiple_002dvalues_002dlimit.html" accesskey="p" rel="prev">multiple-values-limit                                   [Constant Variable]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="nth_002dvalue-_005bMacro_005d"><span>5.3.56 nth-value                                                           [Macro]<a class="copiable-link" href="#nth_002dvalue-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">nth-value</code>  <i class="i">n form</i> &rArr;  <i class="i">object</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-74"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-74"> &para;</a></span></h4>
+
+<p><i class="i">n</i>&mdash;a non-negative <i class="i">integer</i>; evaluated.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>; evaluated as described below.
+</p>
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-109"><span>Description::<a class="copiable-link" href="#Description_003a_003a-109"> &para;</a></span></h4>
+
+<p>Evaluates <i class="i">n</i> and then <i class="i">form</i>,
+returning as its only value the <i class="i">n</i>th value <i class="i">yielded</i> by <i class="i">form</i>,
+or <b class="b">nil</b> if <i class="i">n</i> is greater than or equal to the number of <i class="i">values</i>
+returned by <i class="i">form</i>.  (The first returned value is numbered <code class="t">0</code>.)
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-82"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-82"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (nth-value 0 (values 'a 'b)) &rArr;  A
+ (nth-value 1 (values 'a 'b)) &rArr;  B
+ (nth-value 2 (values 'a 'b)) &rArr;  NIL
+ (let* ((x 83927472397238947423879243432432432)
+        (y 32423489732)
+        (a (nth-value 1 (floor x y)))
+        (b (mod x y)))
+   (values a b (= a b)))
+&rArr;  3332987528, 3332987528, <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-93"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-93"> &para;</a></span></h4>
+
+<p><a class="ref" href="multiple_002dvalue_002dlist.html">multiple-value-list                                                 [Macro]</a>
+,
+<a class="ref" href="nth.html">nth                                                              [Accessor]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-60"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-60"> &para;</a></span></h4>
+
+<p>Operationally, the following relationship is true, although <b class="b">nth-value</b> 
+might be more efficient in some <i class="i">implementations</i> 
+because, for example, some <i class="i">consing</i> might be avoided.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (nth-value <i class="i">n</i> <i class="i">form</i>) &equiv; (nth <i class="i">n</i> (multiple-value-list <i class="i">form</i>))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/nthcdr.html
@@ -0,0 +1,93 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>nthcdr (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="nthcdr (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="nthcdr (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="rest.html" rel="next" title="rest">
+<link href="ldiff.html" rel="prev" title="ldiff">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="nthcdr">
+<div class="nav-panel">
+<p>
+Next: <a href="rest.html" accesskey="n" rel="next">rest                                                             [Accessor]</a>, Previous: <a href="ldiff.html" accesskey="p" rel="prev">ldiff, tailp                                                     [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="nthcdr-_005bFunction_005d"><span>14.2.31 nthcdr                                                           [Function]<a class="copiable-link" href="#nthcdr-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">nthcdr</code>  <i class="i">n list</i> &rArr;  <i class="i">tail</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-300"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-300"> &para;</a></span></h4>
+
+<p><i class="i">n</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<p><i class="i">list</i>&mdash;a <i class="i">list</i>,
+</p>
+<p>which might be a <i class="i">dotted list</i> or a <i class="i">circular list</i>.
+</p>
+<p><i class="i">tail</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-401"><span>Description::<a class="copiable-link" href="#Description_003a_003a-401"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">tail</i> of <i class="i">list</i> that would be obtained by calling <b class="b">cdr</b>
+<i class="i">n</i> times in succession.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-284"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-284"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (nthcdr 0 '()) &rArr;  NIL
+ (nthcdr 3 '()) &rArr;  NIL
+ (nthcdr 0 '(a b c)) &rArr;  (A B C)
+ (nthcdr 2 '(a b c)) &rArr;  (C)
+ (nthcdr 4 '(a b c)) &rArr;  ()
+ (nthcdr 1 '(0 . 1)) &rArr;  1
+
+ (locally (declare (optimize (safety 3)))
+   (nthcdr 3 '(0 . 1)))
+ Error: Attempted to take CDR of 1.
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-127"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-127"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">n</i> is not a non-negative <i class="i">integer</i>.
+</p>
+<p>For <i class="i">n</i> being an integer greater than <code class="t">1</code>,
+the error checking done by <code class="t">(nthcdr <i class="i">n</i> <i class="i">list</i>)</code>
+is the same as for <code class="t">(nthcdr (- <i class="i">n</i> 1) (cdr <i class="i">list</i>))</code>;
+see the <i class="i">function</i> <b class="b">cdr</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-325"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-325"> &para;</a></span></h4>
+
+<p><b class="b">cdr</b>,
+<a class="ref" href="nth.html">nth                                                              [Accessor]</a>
+,
+<a class="ref" href="rest.html">rest                                                             [Accessor]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/null-_0028System-Class_0029.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>null (System Class) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="null (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="null (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="cons-_0028System-Class_0029.html" rel="next" title="cons (System Class)">
+<link href="list-_0028System-Class_0029.html" rel="prev" title="list (System Class)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="null-_0028System-Class_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="cons-_0028System-Class_0029.html" accesskey="n" rel="next">cons                                                         [System Class]</a>, Previous: <a href="list-_0028System-Class_0029.html" accesskey="p" rel="prev">list                                                         [System Class]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="null-_005bSystem-Class_005d"><span>14.2.2 null                                                         [System Class]<a class="copiable-link" href="#null-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-51"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-51"> &para;</a></span></h4>
+<p><b class="b">null</b>,
+<b class="b">symbol</b>,
+<b class="b">list</b>,
+<b class="b">sequence</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-372"><span>Description::<a class="copiable-link" href="#Description_003a_003a-372"> &para;</a></span></h4>
+
+<p>The only <i class="i">object</i> of <i class="i">type</i> <b class="b">null</b> is <b class="b">nil</b>, 
+which represents the <i class="i">empty list</i> and can also be notated <code class="t">()</code>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-301"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-301"> &para;</a></span></h4>
+
+<p><a class="ref" href="Symbols-as-Tokens.html">Symbols as Tokens</a>,
+<a class="ref" href="Left_002dParenthesis.html">Left-Parenthesis</a>,
+<a class="ref" href="Printing-Symbols.html">Printing Symbols</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/null.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>null (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="null (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="null (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="nconc.html" rel="next" title="nconc">
+<link href="endp.html" rel="prev" title="endp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="null">
+<div class="nav-panel">
+<p>
+Next: <a href="nconc.html" accesskey="n" rel="next">nconc                                                            [Function]</a>, Previous: <a href="endp.html" accesskey="p" rel="prev">endp                                                             [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="null-_005bFunction_005d"><span>14.2.24 null                                                             [Function]<a class="copiable-link" href="#null-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">null</code>  <i class="i">object</i> &rArr;  <i class="i">boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-293"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-293"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">boolean</i>&mdash;a <i class="i">boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-394"><span>Description::<a class="copiable-link" href="#Description_003a_003a-394"> &para;</a></span></h4>
+
+<p>Returns <b class="b">t</b> if <i class="i">object</i> is the <i class="i">empty list</i>;
+otherwise, returns <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-277"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-277"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (null '()) &rArr;  T
+ (null nil) &rArr;  T
+ (null t) &rArr;  NIL
+ (null 1) &rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-319"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-319"> &para;</a></span></h4>
+
+<p><a class="ref" href="not.html">not                                                              [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-212"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-212"> &para;</a></span></h4>
+
+<p><b class="b">null</b> is intended to be used to test for the <i class="i">empty list</i>
+whereas <b class="b">not</b> is intended to be used to invert a <i class="i">boolean</i>
+(or <i class="i">generalized boolean</i>).
+Operationally, <b class="b">null</b> and <b class="b">not</b> compute the same result;
+which to use is a matter of style.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (null <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'null) &equiv; (eq <i class="i">object</i> '<code class="t">()</code>)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/number.html
@@ -0,0 +1,72 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>number (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="number (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="number (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="complex-_0028System-Class_0029.html" rel="next" title="complex (System Class)">
+<link href="Numbers-Dictionary.html" rel="prev" title="Numbers Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="number">
+<div class="nav-panel">
+<p>
+Next: <a href="complex-_0028System-Class_0029.html" accesskey="n" rel="next">complex                                                      [System Class]</a>, Previous: <a href="Numbers-Dictionary.html" accesskey="p" rel="prev">Numbers Dictionary</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="number-_005bSystem-Class_005d"><span>12.2.1 number                                                       [System Class]<a class="copiable-link" href="#number-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-35"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-35"> &para;</a></span></h4>
+<p><b class="b">number</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-267"><span>Description::<a class="copiable-link" href="#Description_003a_003a-267"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">number</b> contains <i class="i">objects</i> which represent
+mathematical numbers.
+</p>
+<p>The <i class="i">types</i> <b class="b">real</b> and <b class="b">complex</b> are <i class="i">disjoint</i> 
+<i class="i">subtypes</i> of <b class="b">number</b>.
+</p>
+<p>The <i class="i">function</i> <b class="b">=</b> tests for numerical equality.
+The <i class="i">function</i> <b class="b">eql</b>, when its arguments are both <i class="i">numbers</i>, 
+tests that they have both the same <i class="i">type</i> and numerical value.
+Two <i class="i">numbers</i> that are the <i class="i">same</i> under <b class="b">eql</b> or <b class="b">=</b>
+are not necessarily the <i class="i">same</i> under <b class="b">eq</b>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-136"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-136"> &para;</a></span></h4>
+
+<p><span class="r">Common Lisp</span> differs from mathematics on some naming issues.  In mathematics,
+the set of real numbers is traditionally described as a subset of the
+complex numbers, but in <span class="r">Common Lisp</span>, the <i class="i">type</i> <b class="b">real</b> and the <i class="i">type</i> <b class="b">complex</b> are
+disjoint.  The <span class="r">Common Lisp</span> type which includes all mathematical complex
+numbers is called <b class="b">number</b>.  The reasons for these differences
+include historical precedent, compatibility with most other popular
+computer languages, and various issues of time and space efficiency.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/numberp.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>numberp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="numberp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="numberp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="cis.html" rel="next" title="cis">
+<link href="_002arandom_002dstate_002a.html" rel="prev" title="*random-state*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="numberp">
+<div class="nav-panel">
+<p>
+Next: <a href="cis.html" accesskey="n" rel="next">cis                                                              [Function]</a>, Previous: <a href="_002arandom_002dstate_002a.html" accesskey="p" rel="prev">*random-state*                                                   [Variable]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="numberp-_005bFunction_005d"><span>12.2.44 numberp                                                          [Function]<a class="copiable-link" href="#numberp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">numberp</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-227"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-227"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-309"><span>Description::<a class="copiable-link" href="#Description_003a_003a-309"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">number</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-212"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-212"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (numberp 12) &rArr;  <i class="i">true</i>
+ (numberp (expt 2 130)) &rArr;  <i class="i">true</i>
+ (numberp #c(5/3 7.2)) &rArr;  <i class="i">true</i>
+ (numberp nil) &rArr;  <i class="i">false</i>
+ (numberp (cons 1 2)) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-159"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-159"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (numberp <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'number)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/numerator.html
@@ -0,0 +1,87 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>numerator (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="numerator (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="numerator (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="rational-_0028Function_0029.html" rel="next" title="rational (Function)">
+<link href="realp.html" rel="prev" title="realp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="numerator">
+<div class="nav-panel">
+<p>
+Next: <a href="rational-_0028Function_0029.html" accesskey="n" rel="next">rational, rationalize                                            [Function]</a>, Previous: <a href="realp.html" accesskey="p" rel="prev">realp                                                            [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="numerator_002c-denominator-_005bFunction_005d"><span>12.2.53 numerator, denominator                                           [Function]<a class="copiable-link" href="#numerator_002c-denominator-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">numerator</code>  <i class="i">rational</i> &rArr;  <i class="i">numerator</i>
+</p>
+<p><code class="code">denominator</code>  <i class="i">rational</i> &rArr;  <i class="i">denominator</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-236"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-236"> &para;</a></span></h4>
+
+<p><i class="i">rational</i>&mdash;a <i class="i">rational</i>.
+</p>
+<p><i class="i">numerator</i>&mdash;an <i class="i">integer</i>.
+</p>
+<p><i class="i">denominator</i>&mdash;a positive <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-318"><span>Description::<a class="copiable-link" href="#Description_003a_003a-318"> &para;</a></span></h4>
+
+<p><b class="b">numerator</b> and <b class="b">denominator</b> reduce <i class="i">rational</i>
+to canonical form and compute the numerator or denominator of that number.
+</p>
+<p><b class="b">numerator</b> and <b class="b">denominator</b> return the numerator 
+or denominator of the canonical form of <i class="i">rational</i>.
+</p>
+<p>If <i class="i">rational</i> is an <i class="i">integer</i>, 
+<b class="b">numerator</b> returns <i class="i">rational</i>
+and <b class="b">denominator</b> returns 1.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-220"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-220"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (numerator 1/2) &rArr;  1
+ (denominator 12/36) &rArr;  3
+ (numerator -1) &rArr;  -1
+ (denominator (/ -33)) &rArr;  33
+ (numerator (/ 8 -6)) &rArr;  -4
+ (denominator (/ 8 -6)) &rArr;  3
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-268"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-268"> &para;</a></span></h4>
+
+<p><a class="ref" href="_002f.html">/                                                                [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-165"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-165"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (gcd (numerator x) (denominator x)) &rArr;  1
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/open.html
@@ -0,0 +1,350 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>open (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="open (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="open (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="stream_002dexternal_002dformat.html" rel="next" title="stream-external-format">
+<link href="file_002dstring_002dlength.html" rel="prev" title="file-string-length">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="open">
+<div class="nav-panel">
+<p>
+Next: <a href="stream_002dexternal_002dformat.html" accesskey="n" rel="next">stream-external-format                                           [Function]</a>, Previous: <a href="file_002dstring_002dlength.html" accesskey="p" rel="prev">file-string-length                                               [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="open-_005bFunction_005d"><span>21.2.29 open                                                             [Function]<a class="copiable-link" href="#open-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">open</code>  <i class="i">filespec <span class="r">&amp;key</span> direction element-type
+				               if-exists if-does-not-exist
+						     external-format</i><br>
+   &rArr;  <i class="i">stream</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-430"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-430"> &para;</a></span></h4>
+
+<p><i class="i">filespec</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">direction</i>&mdash;one of <code class="t">:input</code>, <code class="t">:output</code>, <code class="t">:io</code>, or <code class="t">:probe</code>.
+ The default is <code class="t">:input</code>.
+</p>
+<p><i class="i">element-type</i>&mdash;a <i class="i">type specifier</i> 
+		       for <i class="i">recognizable subtype</i> of <b class="b">character</b>;
+		    or a <i class="i">type specifier</i> 
+		       for a <i class="i">finite</i> <i class="i">recognizable subtype</i> of <i class="i">integer</i>;
+		    or one of the <i class="i">symbols</i> 
+                          <b class="b">signed-byte</b>,
+                          <b class="b">unsigned-byte</b>,
+		       or <code class="t">:default</code>.
+ The default is <b class="b">character</b>.
+</p>
+<p><i class="i">if-exists</i>&mdash;one of <code class="t">:error</code>, <code class="t">:new-version</code>, <code class="t">:rename</code>,
+		  <code class="t">:rename-and-delete</code>, <code class="t">:overwrite</code>, <code class="t">:append</code>,
+		  <code class="t">:supersede</code>, or <b class="b">nil</b>.
+ The default is <code class="t">:new-version</code> if the version component of <i class="i">filespec</i> is <code class="t">:newest</code>,
+          or <code class="t">:error</code> otherwise.
+</p>
+<p><i class="i">if-does-not-exist</i>&mdash;one of <code class="t">:error</code>, <code class="t">:create</code>, or <b class="b">nil</b>.
+ The default is <code class="t">:error</code> if <i class="i">direction</i> is <code class="t">:input</code> 
+		      or <i class="i">if-exists</i> is <code class="t">:overwrite</code> or <code class="t">:append</code>;
+	  <code class="t">:create</code> if <i class="i">direction</i> is <code class="t">:output</code> or <code class="t">:io</code>,
+		      and <i class="i">if-exists</i> is neither <code class="t">:overwrite</code> nor <code class="t">:append</code>;
+       or <b class="b">nil</b> when <i class="i">direction</i> is <code class="t">:probe</code>.
+</p>
+<p><i class="i">external-format</i>&mdash;an <i class="i">external file format designator</i>.
+  The default is <code class="t">:default</code>.
+</p>
+<p><i class="i">stream</i>&mdash;a <i class="i">file stream</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-560"><span>Description::<a class="copiable-link" href="#Description_003a_003a-560"> &para;</a></span></h4>
+
+<p><b class="b">open</b> creates, opens, and returns a <i class="i">file stream</i> 
+that is connected to the file specified by <i class="i">filespec</i>.
+<i class="i">Filespec</i> is the name of the file to be opened.  
+If the <i class="i">filespec</i> <i class="i">designator</i> is a <i class="i">stream</i>,
+that <i class="i">stream</i> is not closed first or otherwise affected.
+</p>
+<p>The keyword arguments to <b class="b">open</b> specify the characteristics 
+of the <i class="i">file stream</i> that is returned, and how to handle errors.
+</p>
+<p>If <i class="i">direction</i> is <code class="t">:input</code>
+or <code class="t">:probe</code>,
+or if <i class="i">if-exists</i> is not <code class="t">:new-version</code>
+and the version component of the <i class="i">filespec</i> is <code class="t">:newest</code>,
+then the file opened is that file already existing in the file system
+that has a version greater than that of any other file in the file system
+whose other pathname components are the same as those of <i class="i">filespec</i>.
+</p>
+<p>An implementation is required to recognize all of 
+the <b class="b">open</b> keyword options 
+and to do something reasonable in the context of the host operating
+system.  
+For example, if a file system does not support distinct file
+versions and does not distinguish the notions of deletion and expunging,
+<code class="t">:new-version</code> might be treated the same as
+<code class="t">:rename</code> or <code class="t">:supersede</code>, and <code class="t">:rename-and-delete</code> might
+be treated the same as <code class="t">:supersede</code>.
+</p>
+<dl class="table">
+<dt><code class="t">:direction</code></dt>
+<dd><p>These are the possible values for <i class="i">direction</i>, 
+and how they affect the nature of the <i class="i">stream</i> that is created:
+</p>
+<dl class="table">
+<dt><code class="t">:input</code></dt>
+<dd><p>Causes the creation of an <i class="i">input</i> <i class="i">file stream</i>.
+</p>
+</dd>
+<dt><code class="t">:output</code></dt>
+<dd><p>Causes the creation of an <i class="i">output</i> <i class="i">file stream</i>.
+</p>
+</dd>
+<dt><code class="t">:io</code></dt>
+<dd><p>Causes the creation of a <i class="i">bidirectional</i> <i class="i">file stream</i>.
+</p>
+</dd>
+<dt><code class="t">:probe</code></dt>
+<dd><p>Causes the creation of a &ldquo;no-directional&rdquo; <i class="i">file stream</i>; 
+in effect, the <i class="i">file stream</i> is created 
+and then closed prior to being returned by <b class="b">open</b>.
+</p>
+</dd>
+</dl>
+
+</dd>
+<dt><code class="t">:element-type</code></dt>
+<dd><p>The <i class="i">element-type</i> specifies the unit of transaction for the <i class="i">file stream</i>.
+If it is <code class="t">:default</code>,
+the unit is determined by <i class="i">file system</i>,
+possibly based on the <i class="i">file</i>.
+</p>
+</dd>
+<dt><code class="t">:if-exists</code></dt>
+<dd><p><i class="i">if-exists</i> specifies the action to be taken if <i class="i">direction</i> is
+<code class="t">:output</code> or <code class="t">:io</code> and a file of the name <i class="i">filespec</i> 
+already exists.
+If <i class="i">direction</i> is <code class="t">:input</code>, not supplied, or <code class="t">:probe</code>, 
+<i class="i">if-exists</i> is ignored.
+These are the results of <b class="b">open</b> as modified by <i class="i">if-exists</i>:
+</p>
+<dl class="table">
+<dt><code class="t">:error</code></dt>
+<dd><p>An error of <i class="i">type</i> <b class="b">file-error</b> is signaled.
+</p>
+</dd>
+<dt><code class="t">:new-version</code></dt>
+<dd><p>A new file is created with a larger version number.
+</p>
+</dd>
+<dt><code class="t">:rename</code></dt>
+<dd><p>The existing file is renamed to some other name and then a new file is created.
+</p>
+</dd>
+<dt><code class="t">:rename-and-delete</code></dt>
+<dd><p>The existing file is renamed to some other name,
+then it is deleted but not expunged, and then a new file is created.
+</p>
+</dd>
+<dt><code class="t">:overwrite</code></dt>
+<dd><p>Output operations on the <i class="i">stream</i> destructively modify the existing file.
+If <i class="i">direction</i> is <code class="t">:io</code> the file is opened in a bidirectional mode
+that allows both reading and writing.  The file pointer is initially 
+positioned at the beginning of the file; however, the file is not truncated
+back to length zero when it is opened.
+</p>
+</dd>
+<dt><code class="t">:append</code></dt>
+<dd><p>Output operations on the <i class="i">stream</i> destructively modify the existing file.
+The file pointer is initially positioned at the end of the file.
+</p>
+<p>If <i class="i">direction</i> is <code class="t">:io</code>,
+the file is opened in a bidirectional mode that allows both reading and writing.
+</p>
+</dd>
+<dt><code class="t">:supersede</code></dt>
+<dd><p>The existing file is superseded;
+that is, a new file with the same name as the old one is created.
+If possible, the implementation should not destroy the old file until the new
+<i class="i">stream</i> is closed.
+</p>
+</dd>
+<dt><b class="b">nil</b></dt>
+<dd><p>No file or <i class="i">stream</i> is created;
+instead, <b class="b">nil</b> is returned to indicate failure.
+</p>
+</dd>
+</dl>
+
+</dd>
+<dt><code class="t">:if-does-not-exist</code></dt>
+<dd><p><i class="i">if-does-not-exist</i>
+specifies the action to be taken if
+a file of name <i class="i">filespec</i> does not already exist.
+These are the results of <b class="b">open</b> as modified by <i class="i">if-does-not-exist</i>:
+</p>
+<dl class="table">
+<dt><code class="t">:error</code></dt>
+<dd><p>An error of <i class="i">type</i> <b class="b">file-error</b> is signaled.
+</p>
+</dd>
+<dt><code class="t">:create</code></dt>
+<dd><p>An empty file is created.
+Processing continues  as if the file 
+had already existed but no processing as 
+directed by <i class="i">if-exists</i> is performed.
+</p>
+</dd>
+<dt><b class="b">nil</b></dt>
+<dd><p>No file or <i class="i">stream</i> is created;
+instead, <b class="b">nil</b> is returned to indicate failure.
+</p>
+</dd>
+</dl>
+
+</dd>
+<dt><code class="t">:external-format</code></dt>
+<dd><p>This option selects an <i class="i">external file format</i> for the <i class="i">file</i>:
+The only <i class="i">standardized</i> value for this option is <code class="t">:default</code>,
+although <i class="i">implementations</i> are permitted to define additional 
+<i class="i">external file formats</i> and <i class="i">implementation-dependent</i> values 
+returned by <b class="b">stream-external-format</b> can also be used by <i class="i">conforming programs</i>.
+</p>
+<p>The <i class="i">external-format</i> is meaningful for
+any kind of <i class="i">file stream</i> whose <i class="i">element type</i>
+is a <i class="i">subtype</i> of <i class="i">character</i>.
+This option is ignored for <i class="i">streams</i> for which it is not meaningful;
+however, <i class="i">implementations</i> may define other <i class="i">element types</i> 
+for which it is meaningful.
+The consequences are unspecified if a <i class="i">character</i> is written 
+that cannot be represented by the given <i class="i">external file format</i>.
+</p>
+</dd>
+</dl>
+
+<p>When a file is opened, a <i class="i">file stream</i> is constructed to serve
+as the file system&rsquo;s ambassador to the <span class="r">Lisp</span> environment;
+operations on the <i class="i">file stream</i> are reflected by operations on the file
+in the file system.  
+</p>
+<p>A file can be deleted, renamed, or destructively modified by <b class="b">open</b>.
+</p>
+<p>For information about opening relative pathnames,
+see <a class="ref" href="Merging-Pathnames.html">Merging Pathnames</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-406"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-406"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (open <i class="i">filespec</i> :direction :probe)  &rArr;  #&lt;Closed Probe File Stream...&gt;
+ (setq q (merge-pathnames (user-homedir-pathname) &quot;test&quot;))
+&rArr;  #&lt;PATHNAME :HOST NIL :DEVICE <i class="i">device-name</i> :DIRECTORY <i class="i">directory-name</i>
+    :NAME &quot;test&quot; :TYPE NIL :VERSION :NEWEST&gt;
+ (open <i class="i">filespec</i> :if-does-not-exist :create) &rArr;  #&lt;Input File Stream...&gt;
+ (setq s (open <i class="i">filespec</i> :direction :probe)) &rArr;  #&lt;Closed Probe File Stream...&gt;
+ (truename s) &rArr;  #&lt;PATHNAME :HOST NIL :DEVICE <i class="i">device-name</i> :DIRECTORY
+    <i class="i">directory-name</i> :NAME <i class="i">filespec</i> :TYPE <i class="i">extension</i> :VERSION 1&gt;
+ (open s :direction :output :if-exists nil) &rArr;  NIL 
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-91"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-91"> &para;</a></span></h4>
+
+<p>The nature and state of the host computer&rsquo;s <i class="i">file system</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-207"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-207"> &para;</a></span></h4>
+
+<p>If <i class="i">if-exists</i> is <code class="t">:error</code>, (subject to the
+constraints on the meaning of <i class="i">if-exists</i> listed above),
+an error of <i class="i">type</i> <b class="b">file-error</b> is signaled.                        
+</p>
+<p>If <i class="i">if-does-not-exist</i> is <code class="t">:error</code> (subject to the
+constraints on the meaning of <i class="i">if-does-not-exist</i> listed above),
+an error of <i class="i">type</i> <b class="b">file-error</b> is signaled.
+</p>
+<p>If it is impossible for an implementation to handle some option
+in a manner close to what is specified here,
+an error of <i class="i">type</i> <b class="b">error</b> might be signaled.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> is signaled if
+<code class="t">(wild-pathname-p <i class="i">filespec</i>)</code> returns true.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">error</b> is signaled if the <i class="i">external-format</i> 
+is not understood by the <i class="i">implementation</i>.
+</p>
+<p>The various <i class="i">file systems</i> in existence today have widely differing capabilities,
+and some aspects of the <i class="i">file system</i> are beyond the scope of this specification
+to define.  A given <i class="i">implementation</i> might not be able to support all of these options 
+in exactly the manner stated.  An <i class="i">implementation</i> is required to recognize all of 
+these option keywords and to try to do something &ldquo;reasonable&rdquo; in the context of the 
+host <i class="i">file system</i>.  Where necessary to accomodate the <i class="i">file system</i>,
+an <i class="i">implementation</i> deviate slightly from the semantics specified here without 
+being disqualified for consideration as a <i class="i">conforming implementation</i>.
+If it is utterly impossible for an <i class="i">implementation</i> to handle some option
+in a manner similar to what is specified here, it may simply signal an error.
+</p>
+<p>With regard to the <code class="t">:element-type</code> option, if a <i class="i">type</i> is
+requested that is not supported by the <i class="i">file system</i>, a substitution of types 
+such as that which goes on in <i class="i">upgrading</i> is permissible.  As a minimum 
+requirement, it should be the case that opening an <i class="i">output</i> <i class="i">stream</i>
+to a <i class="i">file</i> in a given <i class="i">element type</i> and later opening 
+an <i class="i">input</i> <i class="i">stream</i> to the same <i class="i">file</i> in the same <i class="i">element type</i>
+should work compatibly.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-456"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-456"> &para;</a></span></h4>
+
+<p><a class="ref" href="with_002dopen_002dfile.html">with-open-file                                                      [macro]</a>
+,
+<a class="ref" href="close.html">close                                                            [Function]</a>
+,
+<b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+</p>
+<p><a class="ref" href="Merging-Pathnames.html">Merging Pathnames</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-294"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-294"> &para;</a></span></h4>
+
+<p><b class="b">open</b> does not automatically close the file when an abnormal
+exit occurs.
+</p>
+<p>When <i class="i">element-type</i> is a <i class="i">subtype</i> of <b class="b">character</b>,
+<b class="b">read-char</b> and/or <b class="b">write-char</b> can be
+used on the resulting <i class="i">file stream</i>. 
+</p>
+<p>When <i class="i">element-type</i> is a <i class="i">subtype</i> of <i class="i">integer</i>,
+<b class="b">read-byte</b> and/or <b class="b">write-byte</b> can be used on the resulting <i class="i">file stream</i>.
+</p>
+<p>When <i class="i">element-type</i> is <code class="t">:default</code>,
+the <i class="i">type</i> can be determined by using <b class="b">stream-element-type</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="stream_002dexternal_002dformat.html">stream-external-format                                           [Function]</a>, Previous: <a href="file_002dstring_002dlength.html">file-string-length                                               [Function]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/open_002dstream_002dp.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>open-stream-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="open-stream-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="open-stream-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="stream_002delement_002dtype.html" rel="next" title="stream-element-type">
+<link href="interactive_002dstream_002dp.html" rel="prev" title="interactive-stream-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="open_002dstream_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="stream_002delement_002dtype.html" accesskey="n" rel="next">stream-element-type                                              [Function]</a>, Previous: <a href="interactive_002dstream_002dp.html" accesskey="p" rel="prev">interactive-stream-p                                             [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="open_002dstream_002dp-_005bFunction_005d"><span>21.2.11 open-stream-p                                                    [Function]<a class="copiable-link" href="#open_002dstream_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">open-stream-p</code>  <i class="i">stream</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-414"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-414"> &para;</a></span></h4>
+
+<p><i class="i">stream</i>&mdash;a <i class="i">stream</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-542"><span>Description::<a class="copiable-link" href="#Description_003a_003a-542"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">stream</i> is an <i class="i">open</i> <i class="i">stream</i>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<p><i class="i">Streams</i> are open until they have been explicitly closed with <b class="b">close</b>,
+or until they are implicitly closed due to exit from a
+  <b class="b">with-output-to-string</b>, 
+  <b class="b">with-open-file</b>,
+  <b class="b">with-input-from-string</b>,  or 
+  <b class="b">with-open-stream</b> <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-389"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-389"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (open-stream-p *standard-input*) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-80"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-80"> &para;</a></span></h4>
+
+<p><b class="b">close</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-194"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-194"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">stream</i> is not a <i class="i">stream</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/optimize.html
@@ -0,0 +1,140 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>optimize (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="optimize (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="optimize (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="special.html" rel="next" title="special">
+<link href="declaration.html" rel="prev" title="declaration">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="optimize">
+<div class="nav-panel">
+<p>
+Next: <a href="special.html" accesskey="n" rel="next">special                                                       [Declaration]</a>, Previous: <a href="declaration.html" accesskey="p" rel="prev">declaration                                                   [Declaration]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="optimize-_005bDeclaration_005d"><span>3.8.25 optimize                                                      [Declaration]<a class="copiable-link" href="#optimize-_005bDeclaration_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-8"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-8"> &para;</a></span></h4>
+
+<p><code class="t">(optimize {<i class="i">quality</i> | (<i class="i">quality</i> <i class="i">value</i>)}*)</code>
+</p>
+<a class="index-entry-id" id="index-compilation_002dspeed"></a>
+
+<a class="index-entry-id" id="index-debug"></a>
+
+<a class="index-entry-id" id="index-safety-1"></a>
+
+<a class="index-entry-id" id="index-space-1"></a>
+
+<a class="index-entry-id" id="index-speed"></a>
+
+<h4 class="subsubheading" id="Arguments_003a_003a-8"><span>Arguments::<a class="copiable-link" href="#Arguments_003a_003a-8"> &para;</a></span></h4>
+
+<p><i class="i">quality</i>&mdash;an <i class="i">optimize quality</i>.
+</p>
+<p><i class="i">value</i>&mdash;one of the <i class="i">integers</i> <code class="t">0</code>, <code class="t">1</code>, <code class="t">2</code>, or <code class="t">3</code>.
+</p>
+<h4 class="subsubheading" id="Valid-Context_003a_003a-6"><span>Valid Context::<a class="copiable-link" href="#Valid-Context_003a_003a-6"> &para;</a></span></h4>
+
+<p><i class="i">declaration</i> or <i class="i">proclamation</i>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-24"><span>Description::<a class="copiable-link" href="#Description_003a_003a-24"> &para;</a></span></h4>
+
+<p>Advises the compiler that each <i class="i">quality</i> should be given attention
+according to the specified corresponding <i class="i">value</i>.
+Each <i class="i">quality</i> must be a <i class="i">symbol</i> naming an <i class="i">optimize quality</i>; 
+the names and meanings of the standard <i class="i">optimize qualities</i> are shown in 
+Figure 3&ndash;25.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Name               Meaning                            <!-- /@w -->
+  <b class="b">compilation-speed</b>  speed of the compilation process   <!-- /@w -->
+  <b class="b">debug</b>              ease of debugging                  <!-- /@w -->
+  <b class="b">safety</b>             run-time error checking            <!-- /@w -->
+  <b class="b">space</b>              both code size and run-time space  <!-- /@w -->
+  <b class="b">speed</b>              speed of the object code           <!-- /@w -->
+
+             Figure 3&ndash;25: Optimize qualities           <!-- /@w -->
+
+</pre></div></div>
+
+<p>There may be other, <i class="i">implementation-defined</i> <i class="i">optimize qualities</i>.
+</p>
+<p>A <i class="i">value</i> <code class="t">0</code> means that the corresponding <i class="i">quality</i> is totally
+unimportant, and <code class="t">3</code> that the <i class="i">quality</i> is extremely important;
+<code class="t">1</code> and <code class="t">2</code> are intermediate values, with <code class="t">1</code> the 
+neutral value.
+<code class="t">(<i class="i">quality</i> 3)</code> can be abbreviated to <i class="i">quality</i>.
+</p>
+<p>Note that <i class="i">code</i> which has the optimization <code class="t">(safety 3)</code>,
+or just <b class="b">safety</b>,
+is called <i class="i">safe</i> <i class="i">code</i>.
+</p>
+<p>The consequences are unspecified if a <i class="i">quality</i> appears more than once
+with <i class="i">different</i> <i class="i">values</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-20"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-20"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun often-used-subroutine (x y)
+   (declare (optimize (safety 2)))
+   (error-check x y)
+   (hairy-setup x)
+   (do ((i 0 (+ i 1))
+        (z x (cdr z)))
+       ((null z))
+     ;; This inner loop really needs to burn.
+     (declare (optimize speed))
+     (declare (fixnum i))
+     ))
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-24"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-24"> &para;</a></span></h4>
+
+<p><b class="b">declare</b>,
+<a class="ref" href="declaim.html">declaim                                                             [Macro]</a>
+,
+<a class="ref" href="proclaim.html">proclaim                                                         [Function]</a>
+,
+<a class="ref" href="Declaration-Scope.html">Declaration Scope</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-14"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-14"> &para;</a></span></h4>
+
+<p>An <b class="b">optimize</b> declaration never applies to either a <i class="i">variable</i> or
+a <i class="i">function</i> <i class="i">binding</i>.  An <b class="b">optimize</b> declaration can only
+be a <i class="i">free declaration</i>.  For more information, see <a class="ref" href="Declaration-Scope.html">Declaration Scope</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="special.html">special                                                       [Declaration]</a>, Previous: <a href="declaration.html">declaration                                                   [Declaration]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/or-_0028Type-Specifier_0029.html
@@ -0,0 +1,69 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>or (Type Specifier) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="or (Type Specifier) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="or (Type Specifier) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="values-_0028Type-Specifier_0029.html" rel="next" title="values (Type Specifier)">
+<link href="and-_0028Type-Specifier_0029.html" rel="prev" title="and (Type Specifier)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="or-_0028Type-Specifier_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="values-_0028Type-Specifier_0029.html" accesskey="n" rel="next">values                                                     [Type Specifier]</a>, Previous: <a href="and-_0028Type-Specifier_0029.html" accesskey="p" rel="prev">and                                                        [Type Specifier]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="or-_005bType-Specifier_005d"><span>4.4.21 or                                                         [Type Specifier]<a class="copiable-link" href="#or-_005bType-Specifier_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-5"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-5"> &para;</a></span></h4>
+
+<p>Combining.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-5"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-5"> &para;</a></span></h4>
+
+<p>(<code class="code">or</code>{<i class="i">{<i class="i">typespec</i>}*</i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-5"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-5"> &para;</a></span></h4>
+
+<p><i class="i">typespec</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-5"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-5"> &para;</a></span></h4>
+
+<p>This denotes the set of all <i class="i">objects</i> of the
+<i class="i">type</i> determined by the union of the <i class="i">typespecs</i>.
+For example, the <i class="i">type</i> <b class="b">list</b> by definition is the same as <code class="t">(or null cons)</code>.
+Also, the value returned by <b class="b">position</b> is an <i class="i">object</i> of <i class="i">type</i> <code class="t">(or null (integer 0 *))</code>;
+<i class="i">i.e.</i>, either <b class="b">nil</b> or a non-negative <i class="i">integer</i>.
+</p>
+<p><b class="b">*</b> is not permitted as an argument.
+</p>
+<p>The <i class="i">type specifiers</i> <code class="t">(or)</code> and <b class="b">nil</b> are equivalent.
+The symbol <b class="b">or</b> is not valid as a <i class="i">type specifier</i>;
+and, specifically, it is not an abbreviation for <code class="t">(or)</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/or.html
@@ -0,0 +1,97 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>or (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="or (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="or (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="when.html" rel="next" title="when">
+<link href="if.html" rel="prev" title="if">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="or">
+<div class="nav-panel">
+<p>
+Next: <a href="when.html" accesskey="n" rel="next">when, unless                                                        [Macro]</a>, Previous: <a href="if.html" accesskey="p" rel="prev">if                                                       [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="or-_005bMacro_005d"><span>5.3.44 or                                                                  [Macro]<a class="copiable-link" href="#or-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">or</code>  <i class="i">{<i class="i">form</i>}*</i> &rArr;  <i class="i">{<i class="i">results</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-63"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-63"> &para;</a></span></h4>
+
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> or <i class="i">primary value</i> (see below)
+		  resulting from the evaluation of
+		  the last <i class="i">form</i> executed or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-97"><span>Description::<a class="copiable-link" href="#Description_003a_003a-97"> &para;</a></span></h4>
+
+<p><b class="b">or</b> evaluates each <i class="i">form</i>, one at a time, from left to right.  
+The evaluation of all <i class="i">forms</i> terminates when a <i class="i">form</i> evaluates
+to <i class="i">true</i> (<i class="i">i.e.</i>, something other than <b class="b">nil</b>).
+</p>
+<p>If the <i class="i">evaluation</i> of any <i class="i">form</i> other than the last returns a
+<i class="i">primary value</i> that is <i class="i">true</i>, <b class="b">or</b> immediately returns
+that <i class="i">value</i> (but no additional <i class="i">values</i>) without evaluating the
+remaining <i class="i">forms</i>.
+If every <i class="i">form</i> but the last returns <i class="i">false</i> as its <i class="i">primary value</i>,
+<b class="b">or</b> returns all <i class="i">values</i> returned by the last <i class="i">form</i>.
+If no <i class="i">forms</i> are supplied, <b class="b">or</b> returns <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-71"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-71"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (or) &rArr;  NIL 
+ (setq temp0 nil temp1 10 temp2 20 temp3 30) &rArr;  30
+ (or temp0 temp1 (setq temp2 37)) &rArr;  10
+ temp2 &rArr;  20
+ (or (incf temp1) (incf temp2) (incf temp3)) &rArr;  11
+ temp1 &rArr;  11
+ temp2 &rArr;  20
+ temp3 &rArr;  30
+ (or (values) temp1) &rArr;  11
+ (or (values temp1 temp2) temp3) &rArr;  11
+ (or temp0 (values temp1 temp2)) &rArr;  11, 20
+ (or (values temp0 temp1) (values temp2 temp3)) &rArr;  20, 30
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-81"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-81"> &para;</a></span></h4>
+
+<p><a class="ref" href="and.html">and                                                                 [Macro]</a>
+,
+<b class="b">some</b>,
+<b class="b">unless</b>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="when.html">when, unless                                                        [Macro]</a>, Previous: <a href="if.html">if                                                       [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/package.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="export.html" rel="next" title="export">
+<link href="Packages-Dictionary.html" rel="prev" title="Packages Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="package">
+<div class="nav-panel">
+<p>
+Next: <a href="export.html" accesskey="n" rel="next">export                                                           [Function]</a>, Previous: <a href="Packages-Dictionary.html" accesskey="p" rel="prev">Packages Dictionary</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="package-_005bSystem-Class_005d"><span>11.2.1 package                                                      [System Class]<a class="copiable-link" href="#package-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-33"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-33"> &para;</a></span></h4>
+<p><b class="b">package</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-237"><span>Description::<a class="copiable-link" href="#Description_003a_003a-237"> &para;</a></span></h4>
+
+<p>A <i class="i">package</i> is a <i class="i">namespace</i> that maps <i class="i">symbol</i> <i class="i">names</i>
+to <i class="i">symbols</i>; see <a class="ref" href="Package-Concepts.html">Package Concepts</a>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-210"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-210"> &para;</a></span></h4>
+
+<p><a class="ref" href="Package-Concepts.html">Package Concepts</a>,
+<a class="ref" href="Printing-Other-Objects.html">Printing Other Objects</a>,
+<a class="ref" href="Symbols-as-Tokens.html">Symbols as Tokens</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/package_002derror.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>package-error (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="package-error (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="package-error (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="package_002derror_002dpackage.html" rel="next" title="package-error-package">
+<link href="_002apackage_002a.html" rel="prev" title="*package*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="package_002derror">
+<div class="nav-panel">
+<p>
+Next: <a href="package_002derror_002dpackage.html" accesskey="n" rel="next">package-error-package                                            [Function]</a>, Previous: <a href="_002apackage_002a.html" accesskey="p" rel="prev">*package*                                                        [Variable]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="package_002derror-_005bCondition-Type_005d"><span>11.2.29 package-error                                              [Condition Type]<a class="copiable-link" href="#package_002derror-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-34"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-34"> &para;</a></span></h4>
+<p><b class="b">package-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-265"><span>Description::<a class="copiable-link" href="#Description_003a_003a-265"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">package-error</b> consists of <i class="i">error</i> <i class="i">conditions</i>
+related to operations on <i class="i">packages</i>.
+The offending <i class="i">package</i> (or <i class="i">package</i> <i class="i">name</i>)
+is initialized by the <code class="t">:package</code> initialization argument to <b class="b">make-condition</b>, 
+and is <i class="i">accessed</i> by the <i class="i">function</i> <b class="b">package-error-package</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-234"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-234"> &para;</a></span></h4>
+
+<p><a class="ref" href="package_002derror_002dpackage.html">package-error-package                                            [Function]</a>
+,
+<a class="ref" href="Conditions.html">Conditions</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/package_002derror_002dpackage.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>package-error-package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="package-error-package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="package-error-package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="package_002derror.html" rel="prev" title="package-error">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="package_002derror_002dpackage">
+<div class="nav-panel">
+<p>
+Previous: <a href="package_002derror.html" accesskey="p" rel="prev">package-error                                              [Condition Type]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="package_002derror_002dpackage-_005bFunction_005d"><span>11.2.30 package-error-package                                            [Function]<a class="copiable-link" href="#package_002derror_002dpackage-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">package-error-package</code>  <i class="i">condition</i> &rArr;  <i class="i">package</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-200"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-200"> &para;</a></span></h4>
+
+<p><i class="i">condition</i>&mdash;a <i class="i">condition</i> of <i class="i">type</i> <b class="b">package-error</b>.
+</p>
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-266"><span>Description::<a class="copiable-link" href="#Description_003a_003a-266"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">designator</i> for the offending <i class="i">package</i>
+in the <i class="i">situation</i> represented by the <i class="i">condition</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-183"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-183"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (package-error-package 
+   (make-condition 'package-error
+     :package (find-package &quot;COMMON-LISP&quot;)))
+&rArr;  #&lt;Package &quot;COMMON-LISP&quot;&gt;
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-235"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-235"> &para;</a></span></h4>
+
+<p><b class="b">package-error</b>
+</p>
+
+
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/package_002dname.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>package-name (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="package-name (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="package-name (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="package_002dnicknames.html" rel="next" title="package-nicknames">
+<link href="intern.html" rel="prev" title="intern">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="package_002dname">
+<div class="nav-panel">
+<p>
+Next: <a href="package_002dnicknames.html" accesskey="n" rel="next">package-nicknames                                                [Function]</a>, Previous: <a href="intern.html" accesskey="p" rel="prev">intern                                                           [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="package_002dname-_005bFunction_005d"><span>11.2.22 package-name                                                     [Function]<a class="copiable-link" href="#package_002dname-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">package-name</code>  <i class="i">package</i> &rArr;  <i class="i">name</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-194"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-194"> &para;</a></span></h4>
+
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<p><i class="i">name</i>&mdash;a <i class="i">string</i> 
+</p>
+<p>or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-258"><span>Description::<a class="copiable-link" href="#Description_003a_003a-258"> &para;</a></span></h4>
+
+<p><b class="b">package-name</b> returns the <i class="i">string</i> that names <i class="i">package</i>,
+</p>
+<p>or <b class="b">nil</b> if the <i class="i">package</i> <i class="i">designator</i>
+is a <i class="i">package</i> <i class="i">object</i> that has no name (see the <i class="i">function</i> <b class="b">delete-package</b>).
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-176"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-176"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (in-package &quot;COMMON-LISP-USER&quot;) &rArr;  #&lt;PACKAGE &quot;COMMON-LISP-USER&quot;&gt;
+ (package-name *package*) &rArr;  &quot;COMMON-LISP-USER&quot;
+ (package-name (symbol-package :test)) &rArr;  &quot;KEYWORD&quot;
+ (package-name (find-package 'common-lisp)) &rArr;  &quot;COMMON-LISP&quot;
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (defvar *foo-package* (make-package &quot;FOO&quot;))
+ (rename-package &quot;FOO&quot; &quot;FOO0&quot;)
+ (package-name *foo-package*) &rArr;  &quot;FOO0&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-72"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-72"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">package</i> is not a <i class="i">package designator</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/package_002dnicknames.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>package-nicknames (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="package-nicknames (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="package-nicknames (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="package_002dshadowing_002dsymbols.html" rel="next" title="package-shadowing-symbols">
+<link href="package_002dname.html" rel="prev" title="package-name">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="package_002dnicknames">
+<div class="nav-panel">
+<p>
+Next: <a href="package_002dshadowing_002dsymbols.html" accesskey="n" rel="next">package-shadowing-symbols                                        [Function]</a>, Previous: <a href="package_002dname.html" accesskey="p" rel="prev">package-name                                                     [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="package_002dnicknames-_005bFunction_005d"><span>11.2.23 package-nicknames                                                [Function]<a class="copiable-link" href="#package_002dnicknames-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">package-nicknames</code>  <i class="i">package</i> &rArr;  <i class="i">nicknames</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-195"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-195"> &para;</a></span></h4>
+
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<p><i class="i">nicknames</i>&mdash;a <i class="i">list</i> of <i class="i">strings</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-259"><span>Description::<a class="copiable-link" href="#Description_003a_003a-259"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">list</i> of nickname <i class="i">strings</i>
+for <i class="i">package</i>, not including the name of <i class="i">package</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-177"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-177"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (package-nicknames (make-package 'temporary
+                                   :nicknames '(&quot;TEMP&quot; &quot;temp&quot;)))
+&rArr;  (&quot;temp&quot; &quot;TEMP&quot;) 
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-73"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-73"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">package</i> is not a <i class="i">package designator</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/package_002dshadowing_002dsymbols.html
@@ -0,0 +1,85 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>package-shadowing-symbols (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="package-shadowing-symbols (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="package-shadowing-symbols (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="package_002duse_002dlist.html" rel="next" title="package-use-list">
+<link href="package_002dnicknames.html" rel="prev" title="package-nicknames">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="package_002dshadowing_002dsymbols">
+<div class="nav-panel">
+<p>
+Next: <a href="package_002duse_002dlist.html" accesskey="n" rel="next">package-use-list                                                 [Function]</a>, Previous: <a href="package_002dnicknames.html" accesskey="p" rel="prev">package-nicknames                                                [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="package_002dshadowing_002dsymbols-_005bFunction_005d"><span>11.2.24 package-shadowing-symbols                                        [Function]<a class="copiable-link" href="#package_002dshadowing_002dsymbols-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">package-shadowing-symbols</code>  <i class="i">package</i> &rArr;  <i class="i">symbols</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-196"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-196"> &para;</a></span></h4>
+
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<p><i class="i">symbols</i>&mdash;a <i class="i">list</i> of <i class="i">symbols</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-260"><span>Description::<a class="copiable-link" href="#Description_003a_003a-260"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">list</i> of <i class="i">symbols</i> that have been declared 
+as <i class="i">shadowing symbols</i> in <i class="i">package</i> by <b class="b">shadow</b> 
+or <b class="b">shadowing-import</b> (or the equivalent <b class="b">defpackage</b> options).
+All <i class="i">symbols</i> on this <i class="i">list</i> are <i class="i">present</i> in <i class="i">package</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-178"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-178"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (package-shadowing-symbols (make-package 'temp)) &rArr;  ()
+ (shadow 'cdr 'temp) &rArr;  T
+ (package-shadowing-symbols 'temp) &rArr;  (TEMP::CDR)
+ (intern &quot;PILL&quot; 'temp) &rArr;  TEMP::PILL, NIL
+ (shadowing-import 'pill 'temp) &rArr;  T
+ (package-shadowing-symbols 'temp) &rArr;  (PILL TEMP::CDR)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-74"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-74"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">package</i> is not a <i class="i">package designator</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-230"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-230"> &para;</a></span></h4>
+
+<p><a class="ref" href="shadow.html">shadow                                                           [Function]</a>
+,
+<a class="ref" href="shadowing_002dimport.html">shadowing-import                                                 [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-134"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-134"> &para;</a></span></h4>
+
+<p>Whether the list of <i class="i">symbols</i> is <i class="i">fresh</i> is <i class="i">implementation-dependent</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/package_002duse_002dlist.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>package-use-list (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="package-use-list (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="package-use-list (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="package_002dused_002dby_002dlist.html" rel="next" title="package-used-by-list">
+<link href="package_002dshadowing_002dsymbols.html" rel="prev" title="package-shadowing-symbols">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="package_002duse_002dlist">
+<div class="nav-panel">
+<p>
+Next: <a href="package_002dused_002dby_002dlist.html" accesskey="n" rel="next">package-used-by-list                                             [Function]</a>, Previous: <a href="package_002dshadowing_002dsymbols.html" accesskey="p" rel="prev">package-shadowing-symbols                                        [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="package_002duse_002dlist-_005bFunction_005d"><span>11.2.25 package-use-list                                                 [Function]<a class="copiable-link" href="#package_002duse_002dlist-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">package-use-list</code>  <i class="i">package</i> &rArr;  <i class="i">use-list</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-197"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-197"> &para;</a></span></h4>
+
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<p><i class="i">use-list</i>&mdash;a <i class="i">list</i> of <i class="i">package</i> <i class="i">objects</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-261"><span>Description::<a class="copiable-link" href="#Description_003a_003a-261"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">list</i> of other <i class="i">packages</i> used by <i class="i">package</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-179"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-179"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (package-use-list (make-package 'temp)) &rArr;  (#&lt;PACKAGE &quot;COMMON-LISP&quot;&gt;)
+ (use-package 'common-lisp-user 'temp) &rArr;  T
+ (package-use-list 'temp) &rArr;  (#&lt;PACKAGE &quot;COMMON-LISP&quot;&gt; #&lt;PACKAGE &quot;COMMON-LISP-USER&quot;&gt;)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-75"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-75"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">package</i> is not a <i class="i">package designator</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-231"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-231"> &para;</a></span></h4>
+
+<p><a class="ref" href="use_002dpackage.html">use-package                                                      [Function]</a>
+,
+<a class="ref" href="unuse_002dpackage.html">unuse-package                                                    [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/package_002dused_002dby_002dlist.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>package-used-by-list (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="package-used-by-list (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="package-used-by-list (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="packagep.html" rel="next" title="packagep">
+<link href="package_002duse_002dlist.html" rel="prev" title="package-use-list">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="package_002dused_002dby_002dlist">
+<div class="nav-panel">
+<p>
+Next: <a href="packagep.html" accesskey="n" rel="next">packagep                                                         [Function]</a>, Previous: <a href="package_002duse_002dlist.html" accesskey="p" rel="prev">package-use-list                                                 [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="package_002dused_002dby_002dlist-_005bFunction_005d"><span>11.2.26 package-used-by-list                                             [Function]<a class="copiable-link" href="#package_002dused_002dby_002dlist-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">package-used-by-list</code>  <i class="i">package</i> &rArr;  <i class="i">used-by-list</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-198"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-198"> &para;</a></span></h4>
+
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<p><i class="i">used-by-list</i>&mdash;a <i class="i">list</i> of <i class="i">package</i> <i class="i">objects</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-262"><span>Description::<a class="copiable-link" href="#Description_003a_003a-262"> &para;</a></span></h4>
+
+<p><b class="b">package-used-by-list</b> returns a <i class="i">list</i> 
+of other <i class="i">packages</i> that use <i class="i">package</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-180"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-180"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (package-used-by-list (make-package 'temp)) &rArr;  ()
+ (make-package 'trash :use '(temp)) &rArr;  #&lt;PACKAGE &quot;TRASH&quot;&gt;
+ (package-used-by-list 'temp) &rArr;  (#&lt;PACKAGE &quot;TRASH&quot;&gt;)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-76"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-76"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">package</i> is not a <i class="i">package</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-232"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-232"> &para;</a></span></h4>
+
+<p><a class="ref" href="use_002dpackage.html">use-package                                                      [Function]</a>
+,
+<a class="ref" href="unuse_002dpackage.html">unuse-package                                                    [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/packagep.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>packagep (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="packagep (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="packagep (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="_002apackage_002a.html" rel="next" title="*package*">
+<link href="package_002dused_002dby_002dlist.html" rel="prev" title="package-used-by-list">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="packagep">
+<div class="nav-panel">
+<p>
+Next: <a href="_002apackage_002a.html" accesskey="n" rel="next">*package*                                                        [Variable]</a>, Previous: <a href="package_002dused_002dby_002dlist.html" accesskey="p" rel="prev">package-used-by-list                                             [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="packagep-_005bFunction_005d"><span>11.2.27 packagep                                                         [Function]<a class="copiable-link" href="#packagep-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">packagep</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-199"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-199"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-263"><span>Description::<a class="copiable-link" href="#Description_003a_003a-263"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">package</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-181"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-181"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (packagep *package*) &rArr;  <i class="i">true</i> 
+ (packagep 'common-lisp) &rArr;  <i class="i">false</i> 
+ (packagep (find-package 'common-lisp)) &rArr;  <i class="i">true</i> 
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-135"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-135"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (packagep <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'package)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pairlis.html
@@ -0,0 +1,113 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pairlis (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pairlis (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pairlis (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="rassoc.html" rel="next" title="rassoc">
+<link href="copy_002dalist.html" rel="prev" title="copy-alist">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pairlis">
+<div class="nav-panel">
+<p>
+Next: <a href="rassoc.html" accesskey="n" rel="next">rassoc, rassoc-if, rassoc-if-not                                 [Function]</a>, Previous: <a href="copy_002dalist.html" accesskey="p" rel="prev">copy-alist                                                       [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pairlis-_005bFunction_005d"><span>14.2.38 pairlis                                                          [Function]<a class="copiable-link" href="#pairlis-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">pairlis</code>  <i class="i">keys data <span class="r">&amp;optional</span> alist</i> &rArr;  <i class="i">new-alist</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-307"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-307"> &para;</a></span></h4>
+
+<p><i class="i">keys</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<p><i class="i">data</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<p><i class="i">alist</i>&mdash;an <i class="i">association list</i>.
+  The default is the <i class="i">empty list</i>.
+</p>
+<p><i class="i">new-alist</i>&mdash;an <i class="i">association list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-408"><span>Description::<a class="copiable-link" href="#Description_003a_003a-408"> &para;</a></span></h4>
+
+<p>Returns an <i class="i">association list</i> that associates
+elements of <i class="i">keys</i> to corresponding elements of <i class="i">data</i>.
+The consequences are undefined if <i class="i">keys</i> and <i class="i">data</i> are 
+not of the same <i class="i">length</i>.  
+</p>
+<p>If <i class="i">alist</i> is supplied, <b class="b">pairlis</b> returns
+a modified <i class="i">alist</i> with the
+new pairs prepended to it.
+The new pairs may appear in the resulting <i class="i">association list</i> in 
+either forward or backward order.
+The result of 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (pairlis '(one two) '(1 2) '((three . 3) (four . 19)))
+</pre></div>
+
+<p>might be
+</p>
+<div class="example">
+<pre class="example-preformatted"> ((one . 1) (two . 2) (three . 3) (four . 19))
+</pre></div>
+
+<p>or
+</p>
+<div class="example">
+<pre class="example-preformatted"> ((two . 2) (one . 1) (three . 3) (four . 19))
+</pre></div>
+
+<h4 class="subsubheading" id="Examples_003a_003a-291"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-291"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (setq keys '(1 2 3)
+        data '(&quot;one&quot; &quot;two&quot; &quot;three&quot;)
+        alist '((4 . &quot;four&quot;))) &rArr;  ((4 . &quot;four&quot;))
+ (pairlis keys data) &rArr;  ((3 . &quot;three&quot;) (2 . &quot;two&quot;) (1 . &quot;one&quot;))
+ (pairlis keys data alist)
+&rArr;  ((3 . &quot;three&quot;) (2 . &quot;two&quot;) (1 . &quot;one&quot;) (4 . &quot;four&quot;))
+ alist &rArr;  ((4 . &quot;four&quot;))
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-131"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-131"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">keys</i> and <i class="i">data</i> are not <i class="i">proper lists</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-332"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-332"> &para;</a></span></h4>
+
+<p><a class="ref" href="acons.html">acons                                                            [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="rassoc.html">rassoc, rassoc-if, rassoc-if-not                                 [Function]</a>, Previous: <a href="copy_002dalist.html">copy-alist                                                       [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/parse_002derror.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>parse-error (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="parse-error (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="parse-error (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="storage_002dcondition.html" rel="next" title="storage-condition">
+<link href="cell_002derror_002dname.html" rel="prev" title="cell-error-name">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="parse_002derror">
+<div class="nav-panel">
+<p>
+Next: <a href="storage_002dcondition.html" accesskey="n" rel="next">storage-condition                                          [Condition Type]</a>, Previous: <a href="cell_002derror_002dname.html" accesskey="p" rel="prev">cell-error-name                                                  [Function]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="parse_002derror-_005bCondition-Type_005d"><span>9.2.8 parse-error                                                [Condition Type]<a class="copiable-link" href="#parse_002derror-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-25"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-25"> &para;</a></span></h4>
+
+<p><b class="b">parse-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-178"><span>Description::<a class="copiable-link" href="#Description_003a_003a-178"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">parse-error</b> consists of 
+error conditions that are related to parsing.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-157"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-157"> &para;</a></span></h4>
+
+<p><a class="ref" href="parse_002dnamestring.html">parse-namestring                                                 [Function]</a>
+,
+<a class="ref" href="reader_002derror.html">reader-error                                               [Condition Type]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/parse_002dinteger.html
@@ -0,0 +1,113 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>parse-integer (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="parse-integer (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="parse-integer (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="boole.html" rel="next" title="boole">
+<link href="integerp.html" rel="prev" title="integerp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="parse_002dinteger">
+<div class="nav-panel">
+<p>
+Next: <a href="boole.html" accesskey="n" rel="next">boole                                                            [Function]</a>, Previous: <a href="integerp.html" accesskey="p" rel="prev">integerp                                                         [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="parse_002dinteger-_005bFunction_005d"><span>12.2.59 parse-integer                                                    [Function]<a class="copiable-link" href="#parse_002dinteger-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">parse-integer</code>  <i class="i">string <span class="r">&amp;key</span> start end radix junk-allowed</i> &rArr;  <i class="i">integer, pos</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-242"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-242"> &para;</a></span></h4>
+
+<p><i class="i">string</i>&mdash;a <i class="i">string</i>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">string</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">radix</i>&mdash;a <i class="i">radix</i>.
+ The default is <code class="t">10</code>.
+</p>
+<p><i class="i">junk-allowed</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">false</i>.
+</p>
+<p><i class="i">integer</i>&mdash;an <i class="i">integer</i> or <i class="i">false</i>.
+</p>
+<p><i class="i">pos</i>&mdash;a <i class="i">bounding index</i> of <i class="i">string</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-324"><span>Description::<a class="copiable-link" href="#Description_003a_003a-324"> &para;</a></span></h4>
+
+<p><b class="b">parse-integer</b> parses an <i class="i">integer</i> in the specified <i class="i">radix</i>
+from the substring of <i class="i">string</i> delimited by <i class="i">start</i> and <i class="i">end</i>.
+</p>
+<p><b class="b">parse-integer</b> expects an optional sign (<code class="t">+</code> or <code class="t">-</code>) followed by
+a a non-empty sequence of digits to be interpreted in the specified <i class="i">radix</i>.
+Optional leading and trailing <i class="i">whitespace</i>_1 is ignored.
+</p>
+<p><b class="b">parse-integer</b> does not recognize the syntactic radix-specifier
+prefixes <code class="t">#O</code>, <code class="t">#B</code>, <code class="t">#X</code>, and <code class="t">#<i class="i">n</i>R</code>, 
+nor does it recognize a trailing decimal point.
+</p>
+<p>If <i class="i">junk-allowed</i> is <i class="i">false</i>, an error of <i class="i">type</i> <b class="b">parse-error</b> is 
+signaled if substring does not consist entirely of the representation of a 
+signed <i class="i">integer</i>, possibly surrounded on either side by <i class="i">whitespace</i>_1 
+<i class="i">characters</i>.
+</p>
+<p>The first <i class="i">value</i> returned is either
+    the <i class="i">integer</i> that was parsed,
+ or else <b class="b">nil</b> if no syntactically correct <i class="i">integer</i> 
+    was seen but <i class="i">junk-allowed</i> was <i class="i">true</i>.
+</p>
+<p>The second <i class="i">value</i> is either 
+    the index into the <i class="i">string</i> of the delimiter that terminated the parse,
+ or the upper <i class="i">bounding index</i> of the substring if the parse terminated at
+    the end of the substring (as is always the case if <i class="i">junk-allowed</i> 
+    is <i class="i">false</i>).
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-226"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-226"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (parse-integer &quot;123&quot;) &rArr;  123, 3
+ (parse-integer &quot;123&quot; :start 1 :radix 5) &rArr;  13, 3
+ (parse-integer &quot;no-integer&quot; :junk-allowed t) &rArr;  NIL, 0
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-100"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-100"> &para;</a></span></h4>
+
+<p>If <i class="i">junk-allowed</i> is <i class="i">false</i>, 
+an error is signaled if substring does not consist entirely of
+the representation of an <i class="i">integer</i>, 
+possibly surrounded on either side by
+<i class="i">whitespace</i>_1 characters.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="boole.html">boole                                                            [Function]</a>, Previous: <a href="integerp.html">integerp                                                         [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/parse_002dnamestring.html
@@ -0,0 +1,204 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>parse-namestring (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="parse-namestring (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="parse-namestring (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="wild_002dpathname_002dp.html" rel="next" title="wild-pathname-p">
+<link href="namestring.html" rel="prev" title="namestring">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="parse_002dnamestring">
+<div class="nav-panel">
+<p>
+Next: <a href="wild_002dpathname_002dp.html" accesskey="n" rel="next">wild-pathname-p                                                  [Function]</a>, Previous: <a href="namestring.html" accesskey="p" rel="prev">namestring, file-namestring, directory-namestring,</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="parse_002dnamestring-_005bFunction_005d"><span>19.4.12 parse-namestring                                                 [Function]<a class="copiable-link" href="#parse_002dnamestring-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">parse-namestring</code>  <i class="i">thing <span class="r">&amp;optional</span> host default-pathname <span class="r">&amp;key</span> start end junk-allowed</i><br>
+   &rArr;  <i class="i">pathname, position</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-397"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-397"> &para;</a></span></h4>
+
+<p><i class="i">thing</i>&mdash;a <i class="i">string</i>,
+	        a <i class="i">pathname</i>,
+	     or a <i class="i">stream associated with a file</i>.
+</p>
+<p><i class="i">host</i>&mdash;a <i class="i">valid pathname host</i>, a <i class="i">logical host</i>, or <b class="b">nil</b>.
+</p>
+<p><i class="i">default-pathname</i>&mdash;a <i class="i">pathname designator</i>.
+ The default is the <i class="i">value</i> of <b class="b">*default-pathname-defaults*</b>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">thing</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">junk-allowed</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is <i class="i">false</i>.
+</p>
+<p><i class="i">pathname</i>&mdash;a <i class="i">pathname</i>, or <b class="b">nil</b>.
+</p>
+<p><i class="i">position</i>&mdash;a <i class="i">bounding index designator</i> for <i class="i">thing</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-516"><span>Description::<a class="copiable-link" href="#Description_003a_003a-516"> &para;</a></span></h4>
+
+<p>Converts <i class="i">thing</i> into a <i class="i">pathname</i>.
+</p>
+<p>The <i class="i">host</i> supplies a host name with respect to which the parsing occurs.
+</p>
+<p>If <i class="i">thing</i> is a <i class="i">stream associated with a file</i>,
+processing proceeds as if the <i class="i">pathname</i> used to open that <i class="i">file</i>
+had been supplied instead.
+</p>
+<p>If <i class="i">thing</i> is a <i class="i">pathname</i>,
+the <i class="i">host</i> and the host component of <i class="i">thing</i> are compared.
+If they match, 
+two values are immediately returned: <i class="i">thing</i> and <i class="i">start</i>;
+otherwise (if they do not match), an error is signaled.
+</p>
+<p>Otherwise (if <i class="i">thing</i> is a <i class="i">string</i>),
+<b class="b">parse-namestring</b> parses the name of a <i class="i">file</i> within
+the substring of <i class="i">thing</i> bounded by <i class="i">start</i> and <i class="i">end</i>.
+</p>
+<p>If <i class="i">thing</i> is a <i class="i">string</i> then 
+the substring of <i class="i">thing</i> <i class="i">bounded</i> by <i class="i">start</i> and <i class="i">end</i>
+is parsed into a <i class="i">pathname</i> 
+as follows:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>If <i class="i">host</i> is a <i class="i">logical host</i> then <i class="i">thing</i> is parsed
+  as a <i class="i">logical pathname</i> <i class="i">namestring</i> 
+  on the <i class="i">host</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If <i class="i">host</i> is <b class="b">nil</b> and <i class="i">thing</i> is a syntactically valid 
+  <i class="i">logical pathname</i> <i class="i">namestring</i> containing an explicit host,
+  then it is parsed as a <i class="i">logical pathname</i> <i class="i">namestring</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If  <i class="i">host</i> is <b class="b">nil</b>,
+      <i class="i">default-pathname</i> is a <i class="i">logical pathname</i>,
+  and <i class="i">thing</i> is a syntactically valid <i class="i">logical pathname</i> <i class="i">namestring</i>
+       without an explicit host,
+  then it is parsed as a <i class="i">logical pathname</i> <i class="i">namestring</i>
+        on the host that is the host component of <i class="i">default-pathname</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Otherwise, the parsing of <i class="i">thing</i> is <i class="i">implementation-defined</i>.
+</p>
+</dd>
+</dl>
+
+<p>In the first 
+of these
+cases,
+the host portion of the <i class="i">logical pathname</i> namestring
+and its following <i class="i">colon</i> are optional.
+</p>
+<p>If the host portion of the namestring and <i class="i">host</i> 
+are both present and do not match,
+an error is signaled.               
+</p>
+<p>If <i class="i">junk-allowed</i> is <i class="i">true</i>,
+then the <i class="i">primary value</i> is the <i class="i">pathname</i> parsed 
+or, if no syntactically correct <i class="i">pathname</i> was seen, <b class="b">nil</b>.
+If <i class="i">junk-allowed</i> is <i class="i">false</i>,
+then the entire substring is scanned, 
+and the <i class="i">primary value</i> is the <i class="i">pathname</i> parsed.
+</p>
+<p>In either case, the <i class="i">secondary value</i>
+is the index into <i class="i">thing</i> of the delimiter that terminated the parse,
+or the index beyond the substring if the parse terminated at the end of the substring
+  (as will always be the case if <i class="i">junk-allowed</i> is <i class="i">false</i>).
+</p>
+<p>Parsing a <i class="i">null</i> <i class="i">string</i> always succeeds,
+producing a <i class="i">pathname</i> with all components (except the host) equal to <b class="b">nil</b>.
+</p>
+<p>If <i class="i">thing</i> contains an explicit host name and no explicit device name,
+then it is <i class="i">implementation-defined</i> whether <b class="b">parse-namestring</b>
+will supply the standard default device for that host as the device component
+of the resulting <i class="i">pathname</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-377"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-377"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq q (parse-namestring &quot;test&quot;))  
+&rArr;  #S(PATHNAME :HOST NIL :DEVICE NIL :DIRECTORY NIL :NAME &quot;test&quot; 
+       :TYPE NIL :VERSION NIL)
+ (pathnamep q) &rArr;  <i class="i">true</i>
+ (parse-namestring &quot;test&quot;) 
+&rArr;  #S(PATHNAME :HOST NIL :DEVICE NIL :DIRECTORY NIL :NAME &quot;test&quot;
+       :TYPE NIL :VERSION NIL), 4
+ (setq s (open <i class="i">xxx</i>)) &rArr;  #&lt;Input File Stream...&gt;
+ (parse-namestring s) 
+&rArr;  #S(PATHNAME :HOST NIL :DEVICE NIL :DIRECTORY NIL :NAME <i class="i">xxx</i> 
+       :TYPE NIL :VERSION NIL), 0
+ (parse-namestring &quot;test&quot; nil nil :start 2 :end 4 )
+ &rArr;  #S(PATHNAME ...), 15
+ (parse-namestring &quot;foo.lisp&quot;)
+&rArr;  #P&quot;foo.lisp&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-178"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-178"> &para;</a></span></h4>
+
+<p>If <i class="i">junk-allowed</i> is <i class="i">false</i>,
+an error of <i class="i">type</i> <b class="b">parse-error</b> is signaled if <i class="i">thing</i> 
+does not consist entirely of the representation of a <i class="i">pathname</i>, 
+possibly surrounded on either side by <i class="i">whitespace</i>_1 characters if that is
+appropriate to the cultural conventions of the implementation.
+</p>
+<p>If <i class="i">host</i> is supplied and not <b class="b">nil</b>,
+and <i class="i">thing</i> contains a manifest host name, 
+an error of <i class="i">type</i> <b class="b">error</b> is signaled if the hosts do not match.
+</p>
+<p>If <i class="i">thing</i> is a <i class="i">logical pathname</i> namestring
+and if the host portion of the namestring and <i class="i">host</i> 
+are both present and do not match,
+an error of <i class="i">type</i> <b class="b">error</b> is signaled.               
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-419"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-419"> &para;</a></span></h4>
+
+<p><b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="_002d_003eUNSPECIFIC-as-a-Component-Value.html">:UNSPECIFIC as a Component Value</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="wild_002dpathname_002dp.html">wild-pathname-p                                                  [Function]</a>, Previous: <a href="namestring.html">namestring, file-namestring, directory-namestring,</a>, Up: <a href="Filenames-Dictionary.html">Filenames Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pathname-_0028System-Class_0029.html
@@ -0,0 +1,54 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pathname (System Class) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pathname (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pathname (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="logical_002dpathname-_0028System-Class_0029.html" rel="next" title="logical-pathname (System Class)">
+<link href="Filenames-Dictionary.html" rel="prev" title="Filenames Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pathname-_0028System-Class_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="logical_002dpathname-_0028System-Class_0029.html" accesskey="n" rel="next">logical-pathname                                             [System Class]</a>, Previous: <a href="Filenames-Dictionary.html" accesskey="p" rel="prev">Filenames Dictionary</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pathname-_005bSystem-Class_005d"><span>19.4.1 pathname                                                     [System Class]<a class="copiable-link" href="#pathname-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-59"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-59"> &para;</a></span></h4>
+<p><b class="b">pathname</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-505"><span>Description::<a class="copiable-link" href="#Description_003a_003a-505"> &para;</a></span></h4>
+
+<p>A <i class="i">pathname</i> is a structured <i class="i">object</i> which represents a <i class="i">filename</i>.
+</p>
+<p>There are two kinds of <i class="i">pathnames</i>&mdash;<i class="i">physical pathnames</i> and
+<i class="i">logical pathnames</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pathname.html
@@ -0,0 +1,119 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pathname (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pathname (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pathname (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="make_002dpathname.html" rel="next" title="make-pathname">
+<link href="logical_002dpathname-_0028System-Class_0029.html" rel="prev" title="logical-pathname (System Class)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pathname">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dpathname.html" accesskey="n" rel="next">make-pathname                                                    [Function]</a>, Previous: <a href="logical_002dpathname-_0028System-Class_0029.html" accesskey="p" rel="prev">logical-pathname                                             [System Class]</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pathname-_005bFunction_005d"><span>19.4.3 pathname                                                         [Function]<a class="copiable-link" href="#pathname-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">pathname</code>  <i class="i">pathspec</i> &rArr;  <i class="i">pathname</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-389"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-389"> &para;</a></span></h4>
+
+<p><i class="i">pathspec</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">pathname</i>&mdash;a <i class="i">pathname</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-507"><span>Description::<a class="copiable-link" href="#Description_003a_003a-507"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">pathname</i> denoted by <i class="i">pathspec</i>.
+</p>
+<p>If the <i class="i">pathspec</i> <i class="i">designator</i> is a <i class="i">stream</i>,
+the <i class="i">stream</i> can be either open or closed;
+in both cases, the <b class="b">pathname</b> returned 
+corresponds to the <i class="i">filename</i> used to open the <i class="i">file</i>.
+<b class="b">pathname</b> returns the same <i class="i">pathname</i> for a <i class="i">file stream</i>
+after it is closed as it did when it was open.
+</p>
+<p>If the <i class="i">pathspec</i> <i class="i">designator</i> is
+a <i class="i">file stream</i> created by opening a <i class="i">logical pathname</i>,
+a <i class="i">logical pathname</i> is returned.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-369"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-369"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> ;; There is a great degree of variability permitted here.  The next
+ ;; several examples are intended to illustrate just a few of the many
+ ;; possibilities.  Whether the name is canonicalized to a particular
+ ;; case (either upper or lower) depends on both the file system and the
+ ;; implementation since two different implementations using the same
+ ;; file system might differ on many issues.  How information is stored
+ ;; internally (and possibly presented in #S notation) might vary,
+ ;; possibly requiring `accessors' such as PATHNAME-NAME to perform case
+ ;; conversion upon access.  The format of a namestring is dependent both
+ ;; on the file system and the implementation since, for example, one
+ ;; implementation might include the host name in a namestring, and
+ ;; another might not.  #S notation would generally only be used in a
+ ;; situation where no appropriate namestring could be constructed for use
+ ;; with #P.
+ (setq p1 (pathname &quot;test&quot;))
+&rArr;  #P&quot;CHOCOLATE:TEST&quot; ; with case canonicalization (e.g., VMS)
+<i class="i">OR</i>&rArr; #P&quot;VANILLA:test&quot;   ; without case canonicalization (e.g., Unix)
+<i class="i">OR</i>&rArr; #P&quot;test&quot;
+<i class="i">OR</i>&rArr; #S(PATHNAME :HOST &quot;STRAWBERRY&quot; :NAME &quot;TEST&quot;)
+<i class="i">OR</i>&rArr; #S(PATHNAME :HOST &quot;BELGIAN-CHOCOLATE&quot; :NAME &quot;test&quot;)
+ (setq p2 (pathname &quot;test&quot;))
+&rArr;  #P&quot;CHOCOLATE:TEST&quot;
+<i class="i">OR</i>&rArr; #P&quot;VANILLA:test&quot;
+<i class="i">OR</i>&rArr; #P&quot;test&quot;
+<i class="i">OR</i>&rArr; #S(PATHNAME :HOST &quot;STRAWBERRY&quot; :NAME &quot;TEST&quot;)
+<i class="i">OR</i>&rArr; #S(PATHNAME :HOST &quot;BELGIAN-CHOCOLATE&quot; :NAME &quot;test&quot;)
+ (pathnamep p1) &rArr;  <i class="i">true</i>
+ (eq p1 (pathname p1)) &rArr;  <i class="i">true</i>
+ (eq p1 p2)
+&rArr;  <i class="i">true</i>
+<i class="i">OR</i>&rArr; <i class="i">false</i>
+ (with-open-file (stream &quot;test&quot; :direction :output)
+   (pathname stream))
+&rArr;  #P&quot;ORANGE-CHOCOLATE:&gt;Gus&gt;test.lisp.newest&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-412"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-412"> &para;</a></span></h4>
+
+<p><b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dpathname.html">make-pathname                                                    [Function]</a>, Previous: <a href="logical_002dpathname-_0028System-Class_0029.html">logical-pathname                                             [System Class]</a>, Up: <a href="Filenames-Dictionary.html">Filenames Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pathname_002dhost.html
@@ -0,0 +1,176 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pathname-host (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pathname-host (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pathname-host (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="load_002dlogical_002dpathname_002dtranslations.html" rel="next" title="load-logical-pathname-translations">
+<link href="pathnamep.html" rel="prev" title="pathnamep">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pathname_002dhost">
+<div class="nav-panel">
+<p>
+Next: <a href="load_002dlogical_002dpathname_002dtranslations.html" accesskey="n" rel="next">load-logical-pathname-translations                               [Function]</a>, Previous: <a href="pathnamep.html" accesskey="p" rel="prev">pathnamep                                                        [Function]</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pathname_002dhost_002c-pathname_002ddevice_002c-pathname_002ddirectory_002c"><span>19.4.6 pathname-host, pathname-device, pathname-directory,<a class="copiable-link" href="#pathname_002dhost_002c-pathname_002ddevice_002c-pathname_002ddirectory_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="pathname_002dname_002c-pathname_002dtype_002c-pathname_002dversion"><span>pathname-name, pathname-type,   pathname-version<a class="copiable-link" href="#pathname_002dname_002c-pathname_002dtype_002c-pathname_002dversion"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Function]</i>
+</p></div>
+<p><code class="code">pathname-host</code>  <i class="i">pathname <span class="r">&amp;key</span> case</i> &rArr;  <i class="i">host</i>
+</p>
+<p><code class="code">pathname-device</code>  <i class="i">pathname <span class="r">&amp;key</span> case</i> &rArr;  <i class="i">device</i>
+</p>
+<p><code class="code">pathname-directory</code>  <i class="i">pathname <span class="r">&amp;key</span> case</i> &rArr;  <i class="i">directory</i>
+</p>
+<p><code class="code">pathname-name</code>  <i class="i">pathname <span class="r">&amp;key</span> case</i> &rArr;  <i class="i">name</i>
+</p>
+<p><code class="code">pathname-type</code>  <i class="i">pathname <span class="r">&amp;key</span> case</i> &rArr;  <i class="i">type</i>
+</p>
+<p><code class="code">pathname-version</code>  <i class="i">pathname</i> &rArr;  <i class="i">version</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-392"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-392"> &para;</a></span></h4>
+
+<p><i class="i">pathname</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">case</i>&mdash;one of <code class="t">:local</code> or <code class="t">:common</code>.
+ The default is <code class="t">:local</code>.
+</p>
+<p><i class="i">host</i>&mdash;a <i class="i">valid pathname host</i>.
+</p>
+<p><i class="i">device</i>&mdash;a <i class="i">valid pathname device</i>.
+</p>
+<p><i class="i">directory</i>&mdash;a <i class="i">valid pathname directory</i>.
+</p>
+<p><i class="i">name</i>&mdash;a <i class="i">valid pathname name</i>.
+</p>
+<p><i class="i">type</i>&mdash;a <i class="i">valid pathname type</i>.
+</p>
+<p><i class="i">version</i>&mdash;a <i class="i">valid pathname version</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-510"><span>Description::<a class="copiable-link" href="#Description_003a_003a-510"> &para;</a></span></h4>
+
+<p>These functions return the components of <i class="i">pathname</i>.
+</p>
+<p>If the <i class="i">pathname</i> <i class="i">designator</i> is a <i class="i">pathname</i>,
+it represents the name used to open the file. This may be, but is
+not required to be, the actual name of the file. 
+</p>
+<p>If <i class="i">case</i> is supplied,
+it is treated as described in <a class="ref" href="Case-in-Pathname-Components.html">Case in Pathname Components</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-372"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-372"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq q (make-pathname :host &quot;KATHY&quot;
+                        :directory &quot;CHAPMAN&quot; 
+                        :name &quot;LOGIN&quot; :type &quot;COM&quot;))
+&rArr;  #P&quot;KATHY::[CHAPMAN]LOGIN.COM&quot;
+ (pathname-host q) &rArr;  &quot;KATHY&quot;
+ (pathname-name q) &rArr;  &quot;LOGIN&quot;
+ (pathname-type q) &rArr;  &quot;COM&quot;
+
+ ;; Because namestrings are used, the results shown in the remaining
+ ;; examples are not necessarily the only possible results.  Mappings
+ ;; from namestring representation to pathname representation are 
+ ;; dependent both on the file system involved and on the implementation
+ ;; (since there may be several implementations which can manipulate the
+ ;; the same file system, and those implementations are not constrained
+ ;; to agree on all details). Consult the documentation for each
+ ;; implementation for specific information on how namestrings are treated
+ ;; that implementation.
+
+ ;; VMS
+ (pathname-directory (parse-namestring &quot;[FOO.*.BAR]BAZ.LSP&quot;))
+&rArr;  (:ABSOLUTE &quot;FOO&quot; &quot;BAR&quot;)
+ (pathname-directory (parse-namestring &quot;[FOO.*.BAR]BAZ.LSP&quot;) :case :common)
+&rArr;  (:ABSOLUTE &quot;FOO&quot; &quot;BAR&quot;)
+
+ ;; Unix
+ (pathname-directory &quot;foo.l&quot;) &rArr;  NIL
+ (pathname-device &quot;foo.l&quot;) &rArr;  :UNSPECIFIC
+ (pathname-name &quot;foo.l&quot;) &rArr;  &quot;foo&quot;
+ (pathname-name &quot;foo.l&quot; :case :local) &rArr;  &quot;foo&quot;
+ (pathname-name &quot;foo.l&quot; :case :common) &rArr;  &quot;FOO&quot;
+ (pathname-type &quot;foo.l&quot;) &rArr;  &quot;l&quot;
+ (pathname-type &quot;foo.l&quot; :case :local) &rArr;  &quot;l&quot;
+ (pathname-type &quot;foo.l&quot; :case :common) &rArr;  &quot;L&quot;
+ (pathname-type &quot;foo&quot;) &rArr;  :UNSPECIFIC
+ (pathname-type &quot;foo&quot; :case :common) &rArr;  :UNSPECIFIC
+ (pathname-type &quot;foo.&quot;) &rArr;  &quot;&quot;
+ (pathname-type &quot;foo.&quot; :case :common) &rArr;  &quot;&quot;
+ (pathname-directory (parse-namestring &quot;/foo/bar/baz.lisp&quot;) :case :local)
+&rArr;  (:ABSOLUTE &quot;foo&quot; &quot;bar&quot;)
+ (pathname-directory (parse-namestring &quot;/foo/bar/baz.lisp&quot;) :case :local)
+&rArr;  (:ABSOLUTE &quot;FOO&quot; &quot;BAR&quot;)
+ (pathname-directory (parse-namestring &quot;../baz.lisp&quot;))
+&rArr;  (:RELATIVE :UP)
+ (PATHNAME-DIRECTORY (PARSE-NAMESTRING &quot;/foo/BAR/../Mum/baz&quot;))
+&rArr;  (:ABSOLUTE &quot;foo&quot; &quot;BAR&quot; :UP &quot;Mum&quot;)
+ (PATHNAME-DIRECTORY (PARSE-NAMESTRING &quot;/foo/BAR/../Mum/baz&quot;) :case :common)
+&rArr;  (:ABSOLUTE &quot;FOO&quot; &quot;bar&quot; :UP &quot;Mum&quot;)
+ (PATHNAME-DIRECTORY (PARSE-NAMESTRING &quot;/foo/*/bar/baz.l&quot;))
+&rArr;  (:ABSOLUTE &quot;foo&quot; :WILD &quot;bar&quot;)
+ (PATHNAME-DIRECTORY (PARSE-NAMESTRING &quot;/foo/*/bar/baz.l&quot;) :case :common)
+&rArr;  (:ABSOLUTE &quot;FOO&quot; :WILD &quot;BAR&quot;)
+
+ ;; Symbolics LMFS
+ (pathname-directory (parse-namestring &quot;&gt;foo&gt;**&gt;bar&gt;baz.lisp&quot;))
+&rArr;  (:ABSOLUTE &quot;foo&quot; :WILD-INFERIORS &quot;bar&quot;)
+ (pathname-directory (parse-namestring &quot;&gt;foo&gt;*&gt;bar&gt;baz.lisp&quot;))
+&rArr;  (:ABSOLUTE &quot;foo&quot; :WILD &quot;bar&quot;)
+ (pathname-directory (parse-namestring &quot;&gt;foo&gt;*&gt;bar&gt;baz.lisp&quot;) :case :common)
+&rArr;  (:ABSOLUTE &quot;FOO&quot; :WILD &quot;BAR&quot;)
+ (pathname-device (parse-namestring &quot;&gt;foo&gt;baz.lisp&quot;)) &rArr;  :UNSPECIFIC
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-73"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-73"> &para;</a></span></h4>
+
+<p>The <i class="i">implementation</i> and the host <i class="i">file system</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-174"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-174"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b> if its first argument is not a <i class="i">pathname</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-414"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-414"> &para;</a></span></h4>
+
+<p><b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="load_002dlogical_002dpathname_002dtranslations.html">load-logical-pathname-translations                               [Function]</a>, Previous: <a href="pathnamep.html">pathnamep                                                        [Function]</a>, Up: <a href="Filenames-Dictionary.html">Filenames Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pathname_002dmatch_002dp.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pathname-match-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pathname-match-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pathname-match-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="translate_002dlogical_002dpathname.html" rel="next" title="translate-logical-pathname">
+<link href="wild_002dpathname_002dp.html" rel="prev" title="wild-pathname-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pathname_002dmatch_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="translate_002dlogical_002dpathname.html" accesskey="n" rel="next">translate-logical-pathname                                       [Function]</a>, Previous: <a href="wild_002dpathname_002dp.html" accesskey="p" rel="prev">wild-pathname-p                                                  [Function]</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pathname_002dmatch_002dp-_005bFunction_005d"><span>19.4.14 pathname-match-p                                                 [Function]<a class="copiable-link" href="#pathname_002dmatch_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">pathname-match-p</code>  <i class="i">pathname wildcard</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-399"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-399"> &para;</a></span></h4>
+
+<p><i class="i">pathname</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">wildcard</i>&mdash;a <i class="i">designator</i> for a <i class="i">wild</i> <i class="i">pathname</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-518"><span>Description::<a class="copiable-link" href="#Description_003a_003a-518"> &para;</a></span></h4>
+
+<p><b class="b">pathname-match-p</b> returns true if 
+<i class="i">pathname</i> matches <i class="i">wildcard</i>, otherwise <b class="b">nil</b>.  The 
+matching rules are <i class="i">implementation-defined</i> but should be consistent with 
+<b class="b">directory</b>. Missing components of <i class="i">wildcard</i> default to <code class="t">:wild</code>.
+</p>
+<p>It is valid for <i class="i">pathname</i> to be a wild <i class="i">pathname</i>; 
+a wildcard field in <i class="i">pathname</i> only matches a
+wildcard field in <i class="i">wildcard</i> (<i class="i">i.e.</i>, <b class="b">pathname-match-p</b> is not commutative).
+It is valid for <i class="i">wildcard</i> to be a non-wild <i class="i">pathname</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-180"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-180"> &para;</a></span></h4>
+
+<p>If <i class="i">pathname</i> or <i class="i">wildcard</i> is not a <i class="i">pathname</i>, <i class="i">string</i>, 
+or <i class="i">stream associated with a file</i> an error of <i class="i">type</i> <b class="b">type-error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-421"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-421"> &para;</a></span></h4>
+
+<p><a class="ref" href="directory.html">directory                                                        [Function]</a>
+,
+<b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pathnamep.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pathnamep (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pathnamep (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pathnamep (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="pathname_002dhost.html" rel="next" title="pathname-host">
+<link href="make_002dpathname.html" rel="prev" title="make-pathname">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pathnamep">
+<div class="nav-panel">
+<p>
+Next: <a href="pathname_002dhost.html" accesskey="n" rel="next">pathname-host, pathname-device, pathname-directory,</a>, Previous: <a href="make_002dpathname.html" accesskey="p" rel="prev">make-pathname                                                    [Function]</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pathnamep-_005bFunction_005d"><span>19.4.5 pathnamep                                                        [Function]<a class="copiable-link" href="#pathnamep-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">pathnamep</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-391"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-391"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-509"><span>Description::<a class="copiable-link" href="#Description_003a_003a-509"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">pathname</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-371"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-371"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq q &quot;test&quot;)  &rArr;  &quot;test&quot;
+ (pathnamep q) &rArr;  <i class="i">false</i>
+ (setq q (pathname &quot;test&quot;))
+&rArr;  #S(PATHNAME :HOST NIL :DEVICE NIL :DIRECTORY NIL :NAME &quot;test&quot; :TYPE NIL
+       :VERSION NIL)
+ (pathnamep q) &rArr;  <i class="i">true</i> 
+ (setq q (logical-pathname &quot;SYS:SITE;FOO.SYSTEM&quot;))
+&rArr;  #P&quot;SYS:SITE;FOO.SYSTEM&quot;
+ (pathnamep q) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-276"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-276"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (pathnamep <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'pathname)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/peek_002dchar.html
@@ -0,0 +1,144 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>peek-char (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="peek-char (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="peek-char (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="read_002dchar.html" rel="next" title="read-char">
+<link href="write_002dbyte.html" rel="prev" title="write-byte">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="peek_002dchar">
+<div class="nav-panel">
+<p>
+Next: <a href="read_002dchar.html" accesskey="n" rel="next">read-char                                                        [Function]</a>, Previous: <a href="write_002dbyte.html" accesskey="p" rel="prev">write-byte                                                       [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="peek_002dchar-_005bFunction_005d"><span>21.2.16 peek-char                                                        [Function]<a class="copiable-link" href="#peek_002dchar-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">peek-char</code>  <i class="i"><span class="r">&amp;optional</span> peek-type input-stream eof-error-p
+			       eof-value recursive-p</i> &rArr;  <i class="i">char</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-419"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-419"> &para;</a></span></h4>
+
+<p><i class="i">peek-type</i>&mdash;a <i class="i">character</i> or <b class="b">t</b> or <b class="b">nil</b>.
+</p>
+<p><i class="i">input-stream</i>&mdash;<i class="i">input</i> <i class="i">stream designator</i>.
+  The default is <i class="i">standard input</i>.
+</p>
+<p><i class="i">eof-error-p</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">true</i>.
+</p>
+<p><i class="i">eof-value</i>&mdash;an <i class="i">object</i>.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">recursive-p</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">false</i>.
+</p>
+<p><i class="i">char</i>&mdash;a <i class="i">character</i> or the <i class="i">eof-value</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-547"><span>Description::<a class="copiable-link" href="#Description_003a_003a-547"> &para;</a></span></h4>
+
+<p><b class="b">peek-char</b> obtains the next character in <i class="i">input-stream</i>
+without actually reading it, thus leaving the character
+to be read at a later time.  It can
+also be used to skip over and discard intervening
+characters in the <i class="i">input-stream</i> 
+until a particular character is found.
+</p>
+<p>If <i class="i">peek-type</i> is not supplied or <b class="b">nil</b>,
+<b class="b">peek-char</b> returns the next character to be read from 
+<i class="i">input-stream</i>, without actually removing it from 
+<i class="i">input-stream</i>.
+The next time input is done from <i class="i">input-stream</i>, the character will still
+be there.  
+If <i class="i">peek-type</i> is <b class="b">t</b>,
+then <b class="b">peek-char</b> skips over <i class="i">whitespace</i>_2 <i class="i">characters</i>,
+but not comments,
+and then performs the peeking operation on the next
+character.
+The last character examined, the one that starts an <i class="i">object</i>,
+is not removed from <i class="i">input-stream</i>.
+If <i class="i">peek-type</i> is a <i class="i">character</i>,
+then <b class="b">peek-char</b> skips
+over input characters until a character that
+is <b class="b">char=</b> to that <i class="i">character</i> is found;          
+that character is left in <i class="i">input-stream</i>.
+</p>
+<p>If an <i class="i">end of file</i>_2 occurs and <i class="i">eof-error-p</i> is <i class="i">false</i>,
+<i class="i">eof-value</i> is returned.  
+</p>
+<p>If <i class="i">recursive-p</i> is <i class="i">true</i>,
+this call is expected to be embedded in a higher-level call to <b class="b">read</b> 
+or a similar <i class="i">function</i> used by the <i class="i">Lisp reader</i>.
+</p>
+<p>When <i class="i">input-stream</i> is an <i class="i">echo stream</i>,
+characters that are only peeked at are not echoed. In the
+case that <i class="i">peek-type</i> is not <b class="b">nil</b>,
+the characters that are passed by <b class="b">peek-char</b> 
+are treated as if by <b class="b">read-char</b>,
+and so are echoed unless they have been marked otherwise by <b class="b">unread-char</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-394"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-394"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (with-input-from-string (input-stream &quot;    1 2 3 4 5&quot;)
+    (format t &quot;~S ~S ~S&quot; 
+            (peek-char t input-stream)
+            (peek-char #\4 input-stream)
+            (peek-char nil input-stream)))
+<code class="t"> |&gt; </code> #\1 #\4 #\4
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-82"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-82"> &para;</a></span></h4>
+
+<p><b class="b">*readtable*</b>,
+<b class="b">*standard-input*</b>,
+<b class="b">*terminal-io*</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-198"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-198"> &para;</a></span></h4>
+
+<p>If <i class="i">eof-error-p</i> is <i class="i">true</i> and an <i class="i">end of file</i>_2 occurs
+an error of <i class="i">type</i> <b class="b">end-of-file</b> is signaled.
+</p>
+<p>If     <i class="i">peek-type</i> is a <i class="i">character</i>,
+       an <i class="i">end of file</i>_2 occurs,
+   and <i class="i">eof-error-p</i> is <i class="i">true</i>,
+an error of <i class="i">type</i> <b class="b">end-of-file</b> is signaled.
+</p>
+<p>If <i class="i">recursive-p</i> is <i class="i">true</i>
+and an <i class="i">end of file</i>_2 occurs,
+an error of <i class="i">type</i> <b class="b">end-of-file</b> is signaled.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="read_002dchar.html">read-char                                                        [Function]</a>, Previous: <a href="write_002dbyte.html">write-byte                                                       [Function]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/phase.html
@@ -0,0 +1,113 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>phase (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="phase (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="phase (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="realpart.html" rel="next" title="realpart">
+<link href="conjugate.html" rel="prev" title="conjugate">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="phase">
+<div class="nav-panel">
+<p>
+Next: <a href="realpart.html" accesskey="n" rel="next">realpart, imagpart                                               [Function]</a>, Previous: <a href="conjugate.html" accesskey="p" rel="prev">conjugate                                                        [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="phase-_005bFunction_005d"><span>12.2.49 phase                                                            [Function]<a class="copiable-link" href="#phase-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">phase</code>  <i class="i">number</i> &rArr;  <i class="i">phase</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-232"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-232"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">phase</i>&mdash;a <i class="i">number</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-314"><span>Description::<a class="copiable-link" href="#Description_003a_003a-314"> &para;</a></span></h4>
+
+<p><b class="b">phase</b> 
+returns the phase 
+of <i class="i">number</i> (the angle part of its polar representation)
+in radians, in the range 
+</p>
+<p>-\pi (exclusive) if minus zero is not supported, or 
+-\pi (inclusive) if minus zero is supported, 
+</p>
+<p>to \pi (inclusive).  The phase of a positive 
+</p>
+<p><i class="i">real</i>
+</p>
+<p>number
+is zero; that of a negative 
+</p>
+<p><i class="i">real</i>
+</p>
+<p>number is \pi.
+The phase of zero is defined to be zero.
+</p>
+<p>If <i class="i">number</i> is a <i class="i">complex float</i>,  
+the result is a <i class="i">float</i> of the same <i class="i">type</i> 
+as the components of <i class="i">number</i>.
+If <i class="i">number</i> is a <i class="i">float</i>, the result is a
+<i class="i">float</i> of the same <i class="i">type</i>.
+If <i class="i">number</i> is a <i class="i">rational</i> or a <i class="i">complex rational</i>,
+the result is a <i class="i">single float</i>.  
+</p>
+<p>The branch cut for <b class="b">phase</b> lies along the negative real
+axis, continuous with quadrant II.  The range consists of that portion of
+the real axis between -\pi (exclusive) and~\pi (inclusive).
+</p>
+<p>The mathematical definition of <b class="b">phase</b> is as follows:
+</p>
+<p><code class="t">(phase <i class="i">x</i>) = (atan (imagpart <i class="i">x</i>) (realpart <i class="i">x</i>))</code>
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-217"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-217"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (phase 1) &rArr;  0.0s0
+ (phase 0) &rArr;  0.0s0
+ (phase (cis 30)) &rArr;  -1.4159266
+ (phase #c(0 1)) &rArr;  1.5707964
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-95"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-95"> &para;</a></span></h4>
+
+<p>Should signal <b class="b">type-error</b> if its argument is not a <i class="i">number</i>.
+Might signal <b class="b">arithmetic-error</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-265"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-265"> &para;</a></span></h4>
+
+<p><a class="ref" href="Rule-of-Float-Substitutability.html">Rule of Float Substitutability</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="realpart.html">realpart, imagpart                                               [Function]</a>, Previous: <a href="conjugate.html">conjugate                                                        [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pi.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pi (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pi (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pi (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="sinh.html" rel="next" title="sinh">
+<link href="asin.html" rel="prev" title="asin">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pi">
+<div class="nav-panel">
+<p>
+Next: <a href="sinh.html" accesskey="n" rel="next">sinh, cosh, tanh, asinh, acosh, atanh                            [Function]</a>, Previous: <a href="asin.html" accesskey="p" rel="prev">asin, acos, atan                                                 [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pi-_005bConstant-Variable_005d"><span>12.2.22 pi                                                      [Constant Variable]<a class="copiable-link" href="#pi-_005bConstant-Variable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Value_003a_003a"><span>Value::<a class="copiable-link" href="#Value_003a_003a"> &para;</a></span></h4>
+
+<p>an <i class="i">implementation-dependent</i> <i class="i">long float</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-287"><span>Description::<a class="copiable-link" href="#Description_003a_003a-287"> &para;</a></span></h4>
+
+<p>The best <i class="i">long float</i> approximation to the mathematical constant \pi.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-191"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-191"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> ;; In each of the following computations, the precision depends 
+ ;; on the implementation.  Also, if `long float' is treated by 
+ ;; the implementation as equivalent to some other float format 
+ ;; (e.g., `double float') the exponent marker might be the marker
+ ;; for that equivalent (e.g., `D' instead of `L').
+ pi &rArr;  3.141592653589793L0
+ (cos pi) &rArr;  -1.0L0
+
+ (defun sin-of-degrees (degrees)
+   (let ((x (if (floatp degrees) degrees (float degrees pi))))
+     (sin (* x (/ (float pi x) 180)))))
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-145"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-145"> &para;</a></span></h4>
+
+<p>An approximation to \pi in some other precision can be obtained
+by writing <code class="t">(float pi x)</code>, where <code class="t">x</code> is a <i class="i">float</i> of the
+desired precision, or by writing <code class="t">(coerce pi <i class="i">type</i>)</code>, 
+where <i class="i">type</i> is the desired type, such as <b class="b">short-float</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pop.html
@@ -0,0 +1,102 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pop (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pop (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pop (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="first.html" rel="next" title="first">
+<link href="push.html" rel="prev" title="push">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pop">
+<div class="nav-panel">
+<p>
+Next: <a href="first.html" accesskey="n" rel="next">first, second, third, fourth, fifth,</a>, Previous: <a href="push.html" accesskey="p" rel="prev">push                                                                [Macro]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pop-_005bMacro_005d"><span>14.2.20 pop                                                                 [Macro]<a class="copiable-link" href="#pop-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">pop</code>  <i class="i">place</i> &rArr;  <i class="i">element</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-289"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-289"> &para;</a></span></h4>
+
+<p><i class="i">place</i>&mdash;a <i class="i">place</i>, the <i class="i">value</i> of which is a <i class="i">list</i>
+   (possibly, but necessarily, a <i class="i">dotted list</i> or <i class="i">circular list</i>).
+</p>
+<p><i class="i">element</i>&mdash;an <i class="i">object</i> (the <i class="i">car</i> of the contents of <i class="i">place</i>).
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-390"><span>Description::<a class="copiable-link" href="#Description_003a_003a-390"> &para;</a></span></h4>
+
+<p><b class="b">pop</b> <i class="i">reads</i> the <i class="i">value</i> of <i class="i">place</i>,
+remembers the <i class="i">car</i> of the <i class="i">list</i> which was retrieved,
+<i class="i">writes</i> the <i class="i">cdr</i> of the <i class="i">list</i> back into the <i class="i">place</i>,
+and finally <i class="i">yields</i> the <i class="i">car</i> of the originally retrieved <i class="i">list</i>.
+</p>
+<p>For information about the <i class="i">evaluation</i> of <i class="i">subforms</i> of <i class="i">place</i>,
+see <a class="ref" href="Evaluation-of-Subforms-to-Places.html">Evaluation of Subforms to Places</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-273"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-273"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq stack '(a b c)) &rArr;  (A B C)
+ (pop stack) &rArr;  A  
+ stack &rArr;  (B C)
+ (setq llst '((1 2 3 4))) &rArr;  ((1 2 3 4))
+ (pop (car llst)) &rArr;  1
+ llst &rArr;  ((2 3 4))
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-39"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-39"> &para;</a></span></h4>
+
+<p>The contents of <i class="i">place</i> are modified.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-316"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-316"> &para;</a></span></h4>
+
+<p><a class="ref" href="push.html">push                                                                [Macro]</a>
+,
+<a class="ref" href="pushnew.html">pushnew                                                             [Macro]</a>
+,
+<a class="ref" href="Generalized-Reference.html">Generalized Reference</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-209"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-209"> &para;</a></span></h4>
+
+<p>The effect of <code class="t">(pop <i class="i">place</i>)</code> is roughly equivalent to
+</p>
+<div class="example">
+<pre class="example-preformatted"> (prog1 (car <i class="i">place</i>) (setf <i class="i">place</i> (cdr <i class="i">place</i>)))
+</pre></div>
+
+<p>except that the latter would evaluate any <i class="i">subforms</i> of <i class="i">place</i>
+three times, while <b class="b">pop</b> evaluates them only once.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="first.html">first, second, third, fourth, fifth,</a>, Previous: <a href="push.html">push                                                                [Macro]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/position.html
@@ -0,0 +1,123 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>position (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="position (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="position (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="search.html" rel="next" title="search">
+<link href="find.html" rel="prev" title="find">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="position">
+<div class="nav-panel">
+<p>
+Next: <a href="search.html" accesskey="n" rel="next">search                                                           [Function]</a>, Previous: <a href="find.html" accesskey="p" rel="prev">find, find-if, find-if-not                                       [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="position_002c-position_002dif_002c-position_002dif_002dnot-_005bFunction_005d"><span>17.3.15 position, position-if, position-if-not                           [Function]<a class="copiable-link" href="#position_002c-position_002dif_002c-position_002dif_002dnot-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">position</code>  <i class="i">item sequence <span class="r">&amp;key</span> from-end test test-not start end key</i> &rArr;  <i class="i">position</i>
+</p>
+<p><code class="code">position-if</code>  <i class="i">predicate sequence <span class="r">&amp;key</span> from-end start end key</i> &rArr;  <i class="i">position</i>
+</p>
+<p><code class="code">position-if-not</code>  <i class="i">predicate sequence <span class="r">&amp;key</span> from-end start end key</i> &rArr;  <i class="i">position</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-367"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-367"> &para;</a></span></h4>
+
+<p><i class="i">item</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">predicate</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument 
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">from-end</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is <i class="i">false</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">sequence</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">position</i>&mdash;a <i class="i">bounding index</i> of <i class="i">sequence</i>, or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-482"><span>Description::<a class="copiable-link" href="#Description_003a_003a-482"> &para;</a></span></h4>
+
+<p><b class="b">position</b>, <b class="b">position-if</b>, and <b class="b">position-if-not</b> 
+each search <i class="i">sequence</i> for an <i class="i">element</i> that <i class="i">satisfies the test</i>.
+</p>
+<p>The <i class="i">position</i> returned is the index within <i class="i">sequence</i>
+    of the leftmost  (if <i class="i">from-end</i> is <i class="i">true</i>)
+ or of the rightmost (if <i class="i">from-end</i> is <i class="i">false</i>)
+<i class="i">element</i> that <i class="i">satisfies the test</i>;
+otherwise <b class="b">nil</b> is returned.
+The index returned is relative to the left-hand end of the entire <i class="i">sequence</i>,
+regardless of the value of <i class="i">start</i>, <i class="i">end</i>, or <i class="i">from-end</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-349"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-349"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (position #\a &quot;baobab&quot; :from-end t) &rArr;  4
+ (position-if #'oddp '((1) (2) (3) (4)) :start 1 :key #'car) &rArr;  2
+ (position 595 '()) &rArr;  NIL
+ (position-if-not #'integerp '(1 2 3 4 5.0)) &rArr;  4 
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-163"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-163"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-392"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-392"> &para;</a></span></h4>
+
+<p><a class="ref" href="find.html">find, find-if, find-if-not                                       [Function]</a>
+,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-263"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-263"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> <i class="i">argument</i> is deprecated.
+</p>
+<p>The <i class="i">function</i> <b class="b">position-if-not</b> is deprecated.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="search.html">search                                                           [Function]</a>, Previous: <a href="find.html">find, find-if, find-if-not                                       [Function]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pprint_002ddispatch.html
@@ -0,0 +1,95 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pprint-dispatch (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pprint-dispatch (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pprint-dispatch (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="pprint_002dexit_002dif_002dlist_002dexhausted.html" rel="next" title="pprint-exit-if-list-exhausted">
+<link href="formatter.html" rel="prev" title="formatter">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pprint_002ddispatch">
+<div class="nav-panel">
+<p>
+Next: <a href="pprint_002dexit_002dif_002dlist_002dexhausted.html" accesskey="n" rel="next">pprint-exit-if-list-exhausted                                 [Local Macro]</a>, Previous: <a href="formatter.html" accesskey="p" rel="prev">formatter                                                           [Macro]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pprint_002ddispatch-_005bFunction_005d"><span>22.4.3 pprint-dispatch                                                  [Function]<a class="copiable-link" href="#pprint_002ddispatch-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">pprint-dispatch</code>  <i class="i">object <span class="r">&amp;optional</span> table</i> &rArr;  <i class="i">function, found-p</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-457"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-457"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">table</i>&mdash;a <i class="i">pprint dispatch table</i>, or <b class="b">nil</b>.
+ The default is the <i class="i">value</i> of <b class="b">*print-pprint-dispatch*</b>.
+</p>
+<p><i class="i">function</i>&mdash;a <i class="i">function designator</i>.
+</p>
+<p><i class="i">found-p</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-591"><span>Description::<a class="copiable-link" href="#Description_003a_003a-591"> &para;</a></span></h4>
+
+<p>Retrieves the highest priority function in <i class="i">table</i> that is
+associated with a <i class="i">type specifier</i> that matches <i class="i">object</i>.
+The function is chosen by finding all of the <i class="i">type specifiers</i> in <i class="i">table</i>
+that match the <i class="i">object</i> and 
+selecting the highest priority function associated with any of these
+<i class="i">type specifiers</i>.  If there is more than one highest priority function,
+an arbitrary choice is made.  If no <i class="i">type specifiers</i> match the 
+<i class="i">object</i>, a function is returned that prints <i class="i">object</i> 
+</p>
+<p>using <b class="b">print-object</b>.
+</p>
+<p>The <i class="i">secondary value</i>, <i class="i">found-p</i>, is <i class="i">true</i> if a matching
+<i class="i">type specifier</i> was found in <i class="i">table</i>, or <i class="i">false</i> otherwise.
+</p>
+<p>If <i class="i">table</i> is <b class="b">nil</b>,
+retrieval is done in the
+<i class="i">initial pprint dispatch table</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-97"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-97"> &para;</a></span></h4>
+
+<p>The state of the <i class="i">table</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-219"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-219"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b> if <i class="i">table</i> is neither a
+<i class="i">pprint-dispatch-table</i> nor <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-298"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-298"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">(let ((*print-pretty* t))
+  (write object :stream s))
+&equiv; (funcall (pprint-dispatch object) s object)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pprint_002dexit_002dif_002dlist_002dexhausted.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pprint-exit-if-list-exhausted (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pprint-exit-if-list-exhausted (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pprint-exit-if-list-exhausted (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="pprint_002dfill.html" rel="next" title="pprint-fill">
+<link href="pprint_002ddispatch.html" rel="prev" title="pprint-dispatch">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pprint_002dexit_002dif_002dlist_002dexhausted">
+<div class="nav-panel">
+<p>
+Next: <a href="pprint_002dfill.html" accesskey="n" rel="next">pprint-fill, pprint-linear, pprint-tabular                       [Function]</a>, Previous: <a href="pprint_002ddispatch.html" accesskey="p" rel="prev">pprint-dispatch                                                  [Function]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pprint_002dexit_002dif_002dlist_002dexhausted-_005bLocal-Macro_005d"><span>22.4.4 pprint-exit-if-list-exhausted                                 [Local Macro]<a class="copiable-link" href="#pprint_002dexit_002dif_002dlist_002dexhausted-_005bLocal-Macro_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-37"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-37"> &para;</a></span></h4>
+
+<p><code class="code">pprint-exit-if-list-exhausted</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-592"><span>Description::<a class="copiable-link" href="#Description_003a_003a-592"> &para;</a></span></h4>
+
+<p>Tests whether or not the <i class="i">list</i> passed to 
+the <i class="i">lexically current logical block</i>
+has been exhausted; see <a class="ref" href="Dynamic-Control-of-the-Arrangement-of-Output.html">Dynamic Control of the Arrangement of Output</a>.
+If this <i class="i">list</i> has been
+reduced to <b class="b">nil</b>, <b class="b">pprint-exit-if-list-exhausted</b> terminates the execution
+of the <i class="i">lexically current logical block</i> except for the printing
+of the suffix.  Otherwise <b class="b">pprint-exit-if-list-exhausted</b> returns <b class="b">nil</b>. 
+</p>
+<p>Whether or not <b class="b">pprint-exit-if-list-exhausted</b> is <i class="i">fbound</i> in the
+<i class="i">global environment</i> is <i class="i">implementation-dependent</i>;
+however, the restrictions on redefinition and <i class="i">shadowing</i> of
+<b class="b">pprint-exit-if-list-exhausted</b> are the same as for <i class="i">symbols</i> in the <code class="t">COMMON-LISP</code> <i class="i">package</i>
+which are <i class="i">fbound</i> in the <i class="i">global environment</i>.
+The consequences of attempting to use <b class="b">pprint-exit-if-list-exhausted</b> outside
+of <b class="b">pprint-logical-block</b> are undefined.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-220"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-220"> &para;</a></span></h4>
+
+<p>An error is signaled (at macro expansion time or at run time) if
+<b class="b">pprint-exit-if-list-exhausted</b> is used anywhere other than
+lexically within a call on <b class="b">pprint-logical-block</b>.  
+Also, the consequences of executing <b class="b">pprint-if-list-exhausted</b> outside
+of the dynamic extent of the <b class="b">pprint-logical-block</b> which lexically
+contains it are undefined.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-481"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-481"> &para;</a></span></h4>
+
+<p><a class="ref" href="pprint_002dlogical_002dblock.html">pprint-logical-block                                                [Macro]</a>
+, 
+<a class="ref" href="pprint_002dpop.html">pprint-pop                                                    [Local Macro]</a>
+.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pprint_002dfill.html
@@ -0,0 +1,155 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pprint-fill (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pprint-fill (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pprint-fill (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="pprint_002dindent.html" rel="next" title="pprint-indent">
+<link href="pprint_002dexit_002dif_002dlist_002dexhausted.html" rel="prev" title="pprint-exit-if-list-exhausted">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pprint_002dfill">
+<div class="nav-panel">
+<p>
+Next: <a href="pprint_002dindent.html" accesskey="n" rel="next">pprint-indent                                                    [Function]</a>, Previous: <a href="pprint_002dexit_002dif_002dlist_002dexhausted.html" accesskey="p" rel="prev">pprint-exit-if-list-exhausted                                 [Local Macro]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pprint_002dfill_002c-pprint_002dlinear_002c-pprint_002dtabular-_005bFunction_005d"><span>22.4.5 pprint-fill, pprint-linear, pprint-tabular                       [Function]<a class="copiable-link" href="#pprint_002dfill_002c-pprint_002dlinear_002c-pprint_002dtabular-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">pprint-fill</code>  <i class="i">stream object <span class="r">&amp;optional</span> colon-p at-sign-p</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<p><code class="code">pprint-linear</code>  <i class="i">stream object <span class="r">&amp;optional</span> colon-p at-sign-p</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<p><code class="code">pprint-tabular</code>  <i class="i">stream object <span class="r">&amp;optional</span> colon-p at-sign-p tabsize</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-458"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-458"> &para;</a></span></h4>
+
+<p><i class="i">stream</i>&mdash;an <i class="i">output</i> <i class="i">stream designator</i>.
+</p>
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">colon-p</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is <i class="i">true</i>.
+</p>
+<p><i class="i">at-sign-p</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is <i class="i">implementation-dependent</i>.
+</p>
+<p><i class="i">tabsize</i>&mdash;a non-negative <i class="i">integer</i>.
+  The default is <code class="t">16</code>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-593"><span>Description::<a class="copiable-link" href="#Description_003a_003a-593"> &para;</a></span></h4>
+
+<p>The functions <b class="b">pprint-fill</b>, <b class="b">pprint-linear</b>, and
+<b class="b">pprint-tabular</b> specify particular ways of <i class="i">pretty printing</i>
+a <i class="i">list</i> to <i class="i">stream</i>. 
+Each function prints parentheses around the output if and only
+if <i class="i">colon-p</i> is <i class="i">true</i>.
+Each function ignores its <i class="i">at-sign-p</i> argument.
+(Both arguments are included even though only one is needed
+so that these functions can be used via <code class="t">~/.../</code>
+and as <b class="b">set-pprint-dispatch</b> functions, as well as directly.)
+Each function handles abbreviation and the detection of circularity
+and sharing correctly, and uses <b class="b">write</b> to print <i class="i">object</i>
+when it is a <i class="i">non-list</i>.
+</p>
+<p>If <i class="i">object</i> is a <i class="i">list</i> and 
+if the <i class="i">value</i> of <b class="b">*print-pretty*</b> is <i class="i">false</i>,
+each of these functions prints <i class="i">object</i>
+using a minimum of <i class="i">whitespace</i>,
+as described in <a class="ref" href="Printing-Lists-and-Conses.html">Printing Lists and Conses</a>.
+Otherwise (if <i class="i">object</i> is a <i class="i">list</i> and 
+	   if the <i class="i">value</i> of <b class="b">*print-pretty*</b> is <i class="i">true</i>):
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>The <i class="i">function</i> <b class="b">pprint-linear</b> prints a <i class="i">list</i> either all on one line, 
+or with each <i class="i">element</i> on a separate line.  
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <i class="i">function</i> <b class="b">pprint-fill</b> prints a <i class="i">list</i> with as many <i class="i">elements</i>
+as possible on each line.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The <i class="i">function</i> <b class="b">pprint-tabular</b> is the same as <b class="b">pprint-fill</b>
+except that it prints the <i class="i">elements</i> so that they line up in columns.
+The <i class="i">tabsize</i> specifies the column spacing in <i class="i">ems</i>,
+which is the total spacing from the leading edge of one column to
+the leading edge of the next.
+</p></dd>
+</dl>
+
+<h4 class="subsubheading" id="Examples_003a_003a-429"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-429"> &para;</a></span></h4>
+
+<p>Evaluating the following with a line length of <code class="t">25</code> produces the output shown.
+</p>
+<div class="example">
+<pre class="example-preformatted">(progn (princ &quot;Roads &quot;) 
+       (pprint-tabular *standard-output* '(elm main maple center) nil nil 8))
+Roads ELM     MAIN
+      MAPLE   CENTER
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-75"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-75"> &para;</a></span></h4>
+
+<p>Performs output to the indicated <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-98"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-98"> &para;</a></span></h4>
+
+<p>The cursor position on the indicated <i class="i">stream</i>, if it can be determined.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-299"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-299"> &para;</a></span></h4>
+
+<p>The <i class="i">function</i> <b class="b">pprint-tabular</b> could be defined as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted">(defun pprint-tabular (s list &amp;optional (colon-p t) at-sign-p (tabsize nil))
+  (declare (ignore at-sign-p))
+  (when (null tabsize) (setq tabsize 16))
+  (pprint-logical-block (s list :prefix (if colon-p &quot;(&quot; &quot;&quot;)
+                                :suffix (if colon-p &quot;)&quot; &quot;&quot;))
+    (pprint-exit-if-list-exhausted)
+    (loop (write (pprint-pop) :stream s)
+          (pprint-exit-if-list-exhausted)
+          (write-char #\Space s)
+          (pprint-tab :section-relative 0 tabsize s)
+          (pprint-newline :fill s))))
+</pre></div>
+
+<p>Note that it would have been inconvenient to specify this function
+using <b class="b">format</b>, because of the need to pass its <i class="i">tabsize</i> argument
+through to a <code class="t">~:T</code> format directive nested within an iteration over a list.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="pprint_002dindent.html">pprint-indent                                                    [Function]</a>, Previous: <a href="pprint_002dexit_002dif_002dlist_002dexhausted.html">pprint-exit-if-list-exhausted                                 [Local Macro]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pprint_002dindent.html
@@ -0,0 +1,99 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pprint-indent (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pprint-indent (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pprint-indent (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="pprint_002dlogical_002dblock.html" rel="next" title="pprint-logical-block">
+<link href="pprint_002dfill.html" rel="prev" title="pprint-fill">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pprint_002dindent">
+<div class="nav-panel">
+<p>
+Next: <a href="pprint_002dlogical_002dblock.html" accesskey="n" rel="next">pprint-logical-block                                                [Macro]</a>, Previous: <a href="pprint_002dfill.html" accesskey="p" rel="prev">pprint-fill, pprint-linear, pprint-tabular                       [Function]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pprint_002dindent-_005bFunction_005d"><span>22.4.6 pprint-indent                                                    [Function]<a class="copiable-link" href="#pprint_002dindent-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">pprint-indent</code>  <i class="i">relative-to n <span class="r">&amp;optional</span> stream</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-459"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-459"> &para;</a></span></h4>
+
+<p><i class="i">relative-to</i>&mdash;either <code class="t">:block</code> or <code class="t">:current</code>.
+</p>
+<p><i class="i">n</i>&mdash;a <i class="i">real</i>.
+</p>
+<p><i class="i">stream</i>&mdash;an <i class="i">output</i> <i class="i">stream designator</i>.
+  The default is <i class="i">standard output</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-594"><span>Description::<a class="copiable-link" href="#Description_003a_003a-594"> &para;</a></span></h4>
+
+<p><b class="b">pprint-indent</b> specifies the indentation to use in a logical block on <i class="i">stream</i>.
+</p>
+<p>If <i class="i">stream</i> is a <i class="i">pretty printing stream</i>
+   and the <i class="i">value</i> of <b class="b">*print-pretty*</b> is <i class="i">true</i>,
+<b class="b">pprint-indent</b> sets the indentation in the innermost 
+dynamically enclosing logical block;
+otherwise, <b class="b">pprint-indent</b> has no effect.
+</p>
+<p><i class="i">N</i> specifies the indentation in
+<i class="i">ems</i>.  If <i class="i">relative-to</i> is <code class="t">:block</code>, the indentation is set
+to the horizontal position of the first character in the <i class="i">dynamically current logical block</i> plus <i class="i">n</i> 
+<i class="i">ems</i>. If <i class="i">relative-to</i> is <code class="t">:current</code>, the indentation is set
+to the current output position plus <i class="i">n</i> <i class="i">ems</i>. (For robustness
+in the face of variable-width fonts, it is advisable to use <code class="t">:current</code>
+with an <i class="i">n</i> of zero whenever possible.)
+</p>
+<p><i class="i">N</i> can be negative;
+however, the total indentation cannot be moved 
+left of the beginning of the line 
+or left of the end of the rightmost per-line prefix&mdash;an attempt to move beyond
+one of these limits is treated
+the same as an attempt to move to that limit.
+Changes in indentation caused by <i class="i">pprint-indent</i>
+do not take effect until after the next line break.  In addition, in 
+miser mode all calls to <b class="b">pprint-indent</b> are ignored, forcing the lines 
+corresponding to the logical block to line up under the first character in
+the block.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-221"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-221"> &para;</a></span></h4>
+
+<p>An error is signaled if <i class="i">relative-to</i> is any <i class="i">object</i> other
+than <code class="t">:block</code> or <code class="t">:current</code>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-482"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-482"> &para;</a></span></h4>
+
+<p><a class="ref" href="Tilde-I_002d_003e-Indent.html">Tilde I: Indent</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="pprint_002dlogical_002dblock.html">pprint-logical-block                                                [Macro]</a>, Previous: <a href="pprint_002dfill.html">pprint-fill, pprint-linear, pprint-tabular                       [Function]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pprint_002dlogical_002dblock.html
@@ -0,0 +1,189 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pprint-logical-block (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pprint-logical-block (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pprint-logical-block (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="pprint_002dnewline.html" rel="next" title="pprint-newline">
+<link href="pprint_002dindent.html" rel="prev" title="pprint-indent">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pprint_002dlogical_002dblock">
+<div class="nav-panel">
+<p>
+Next: <a href="pprint_002dnewline.html" accesskey="n" rel="next">pprint-newline                                                   [Function]</a>, Previous: <a href="pprint_002dindent.html" accesskey="p" rel="prev">pprint-indent                                                    [Function]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pprint_002dlogical_002dblock-_005bMacro_005d"><span>22.4.7 pprint-logical-block                                                [Macro]<a class="copiable-link" href="#pprint_002dlogical_002dblock-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">pprint-logical-block</code>  <i class="i"><span class="r">(</span>stream-symbol object 
+					     <span class="r">&amp;key</span> prefix per-line-prefix suffix<span class="r">)</span>
+				{<i class="i">declaration</i>}* {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-460"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-460"> &para;</a></span></h4>
+
+<p><i class="i">stream-symbol</i>&mdash;a <i class="i">stream variable designator</i>.
+</p>
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>; evaluated.
+</p>
+<p><code class="t">:prefix</code>&mdash;a <i class="i">string</i>; evaluated.
+	       Complicated defaulting behavior; see below.
+</p>
+<p><code class="t">:per-line-prefix</code>&mdash;a <i class="i">string</i>; evaluated.
+		        Complicated defaulting behavior; see below.
+</p>
+<p><code class="t">:suffix</code>&mdash;a <i class="i">string</i>; evaluated.
+	       The default is the <i class="i">null</i> <i class="i">string</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-595"><span>Description::<a class="copiable-link" href="#Description_003a_003a-595"> &para;</a></span></h4>
+
+<p>Causes printing to be grouped into a logical block.
+</p>
+<p>The logical block is printed to the <i class="i">stream</i> that is the <i class="i">value</i>
+of the <i class="i">variable</i> denoted by <i class="i">stream-symbol</i>.
+During the execution of the <i class="i">forms</i>,
+that <i class="i">variable</i> is <i class="i">bound</i> to a <i class="i">pretty printing stream</i>
+that supports decisions about the arrangement of output
+and then forwards the output to the destination stream.
+</p>
+<p>All the standard printing functions 
+  (<i class="i">e.g.</i>, <b class="b">write</b>,
+       <b class="b">princ</b>,
+   and <b class="b">terpri</b>)
+can be used to print output to the <i class="i">pretty printing stream</i>.
+All and only the output sent to this <i class="i">pretty printing stream</i>
+is treated as being in the logical block.
+</p>
+<p>The <i class="i">prefix</i> specifies a prefix to be printed before the beginning of
+the logical block.
+The <i class="i">per-line-prefix</i> specifies a prefix that is printed before the block
+and at the beginning of each new line in the block.
+The <code class="t">:prefix</code> and <code class="t">:pre-line-prefix</code> <i class="i">arguments</i> are mutually exclusive.
+If neither <code class="t">:prefix</code> nor <code class="t">:per-line-prefix</code> is specified,
+a <i class="i">prefix</i> of the <i class="i">null</i> <i class="i">string</i> is assumed.
+</p>
+<p>The <i class="i">suffix</i> specifies a suffix that is printed just after the logical block.
+</p>
+<p>The <i class="i">object</i> is 
+normally 
+a <i class="i">list</i> that the body <i class="i">forms</i> are responsible for printing.
+If <i class="i">object</i> is not a <i class="i">list</i>,
+it is printed using <b class="b">write</b>.
+(This makes it easier to write printing functions that are robust
+ in the face of malformed arguments.)
+If <b class="b">*print-circle*</b>
+is <i class="i">non-nil</i> and <i class="i">object</i> is a circular (or shared) reference to a <i class="i">cons</i>,
+then an appropriate &ldquo;<code class="t">#<i class="i">n</i>#</code>&rdquo; marker is printed.  (This
+makes it easy to write printing functions that provide full support
+for circularity and sharing abbreviation.)  If <b class="b">*print-level*</b> is not
+<b class="b">nil</b> and the logical block is at a dynamic nesting depth of greater
+than <b class="b">*print-level*</b> in logical blocks, &ldquo;<code class="t">#</code>&rdquo; is printed.
+(This makes easy to write printing functions that provide full support for depth
+abbreviation.)
+</p>
+<p>If either of the three conditions above occurs, the indicated output is
+printed on <i class="i">stream-symbol</i> and the body <i class="i">forms</i> are skipped 
+along with the printing of the <code class="t">:prefix</code> and <code class="t">:suffix</code>.
+(If the body <i class="i">forms</i> are not to be responsible for printing a list,
+then the first two tests above can be turned off by supplying <b class="b">nil</b> for
+the <i class="i">object</i> argument.)
+</p>
+<p>In addition to the <i class="i">object</i> argument of <b class="b">pprint-logical-block</b>,
+the arguments of the standard printing functions (such as <b class="b">write</b>, 
+<b class="b">print</b>, <b class="b">prin1</b>, and <b class="b">pprint</b>, as well as the arguments
+of the standard <i class="i">format directives</i> such as <code class="t">~A</code>, <code class="t">~S</code>,
+(and <code class="t">~W</code>) are all checked (when necessary) for circularity and sharing.
+However, such checking is not applied to the arguments of the
+functions <b class="b">write-line</b>, <b class="b">write-string</b>, and <b class="b">write-char</b>
+or to the literal text output by <b class="b">format</b>.  A consequence of this is
+that you must use one of the latter functions if you want to print some 
+literal text in the output that is not supposed to be checked for circularity
+or sharing.
+</p>
+<p>The body <i class="i">forms</i> of a <b class="b">pprint-logical-block</b> <i class="i">form</i>
+must not perform any side-effects on the surrounding environment; for 
+example, no <i class="i">variables</i> must be assigned which have not been
+<i class="i">bound</i> within its scope.  
+</p>
+<p>The <b class="b">pprint-logical-block</b> <i class="i">macro</i> may be used regardless of the <i class="i">value</i> of <b class="b">*print-pretty*</b>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-99"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-99"> &para;</a></span></h4>
+
+<p><b class="b">*print-circle*</b>, <b class="b">*print-level*</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-222"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-222"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">type-error</b> is signaled if any of the <code class="t">:suffix</code>, 
+<code class="t">:prefix</code>, or <code class="t">:per-line-prefix</code> is supplied but does not evaluate 
+to a <i class="i">string</i>.
+</p>
+<p>An error is signaled if <code class="t">:prefix</code> and <code class="t">:pre-line-prefix</code> are both used.
+</p>
+<p><b class="b">pprint-logical-block</b> and the <i class="i">pretty printing stream</i> it creates 
+have <i class="i">dynamic extent</i>.  The consequences are undefined if, outside
+of this extent, output is attempted to the <i class="i">pretty printing stream</i> it creates.
+</p>
+<p>It is also unspecified what happens if, within this extent, any output is 
+sent directly to the underlying destination stream.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-483"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-483"> &para;</a></span></h4>
+
+<p><a class="ref" href="pprint_002dpop.html">pprint-pop                                                    [Local Macro]</a>
+,
+<a class="ref" href="pprint_002dexit_002dif_002dlist_002dexhausted.html">pprint-exit-if-list-exhausted                                 [Local Macro]</a>
+,
+<a class="ref" href="Tilde-Less_002dThan_002dSign_002d_003e-Logical-Block.html">Tilde Less-Than-Sign: Logical Block</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-300"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-300"> &para;</a></span></h4>
+
+<p>One reason for using the <b class="b">pprint-logical-block</b> <i class="i">macro</i> when the <i class="i">value</i> of <b class="b">*print-pretty*</b>
+is <b class="b">nil</b> would be to allow it to perform checking for <i class="i">dotted lists</i>, 
+as well as (in conjunction with <b class="b">pprint-pop</b>) 
+checking for <b class="b">*print-level*</b> or <b class="b">*print-length*</b> being exceeded.
+</p>
+<p>Detection of circularity and sharing is supported by the <i class="i">pretty printer</i>
+by in essence performing requested output twice.  On the first pass,
+circularities and sharing are detected and the actual outputting of characters
+is suppressed.  On the second pass, the appropriate &ldquo;<code class="t">#<i class="i">n</i>=</code>&rdquo; 
+and &ldquo;<code class="t">#<i class="i">n</i>#</code>&rdquo; markers are inserted and characters are output.
+This is why the restriction on side-effects is necessary.
+Obeying this restriction is facilitated by using <b class="b">pprint-pop</b>,
+instead of an ordinary <b class="b">pop</b> when traversing a list being printed by 
+the body <i class="i">forms</i> of the <b class="b">pprint-logical-block</b> <i class="i">form</i>.)
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="pprint_002dnewline.html">pprint-newline                                                   [Function]</a>, Previous: <a href="pprint_002dindent.html">pprint-indent                                                    [Function]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pprint_002dnewline.html
@@ -0,0 +1,177 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pprint-newline (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pprint-newline (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pprint-newline (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="pprint_002dpop.html" rel="next" title="pprint-pop">
+<link href="pprint_002dlogical_002dblock.html" rel="prev" title="pprint-logical-block">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pprint_002dnewline">
+<div class="nav-panel">
+<p>
+Next: <a href="pprint_002dpop.html" accesskey="n" rel="next">pprint-pop                                                    [Local Macro]</a>, Previous: <a href="pprint_002dlogical_002dblock.html" accesskey="p" rel="prev">pprint-logical-block                                                [Macro]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pprint_002dnewline-_005bFunction_005d"><span>22.4.8 pprint-newline                                                   [Function]<a class="copiable-link" href="#pprint_002dnewline-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">pprint-newline</code>  <i class="i">kind <span class="r">&amp;optional</span> stream</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-461"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-461"> &para;</a></span></h4>
+
+<p><i class="i">kind</i>&mdash;one of <code class="t">:linear</code>, <code class="t">:fill</code>, <code class="t">:miser</code>, or <code class="t">:mandatory</code>.
+</p>
+<p><i class="i">stream</i>&mdash;a <i class="i">stream designator</i>.
+ The default is <i class="i">standard output</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-596"><span>Description::<a class="copiable-link" href="#Description_003a_003a-596"> &para;</a></span></h4>
+
+<p>If <i class="i">stream</i> is a <i class="i">pretty printing stream</i>
+   and the <i class="i">value</i> of <b class="b">*print-pretty*</b> is <i class="i">true</i>,
+a line break is inserted in the output 
+when the appropriate condition below is satisfied;
+otherwise, <b class="b">pprint-newline</b> has no effect.
+</p>
+<p><i class="i">Kind</i> specifies the style of conditional newline.
+This <i class="i">parameter</i> is treated as follows:
+</p>
+<dl class="table">
+<dt><code class="t">:linear</code></dt>
+<dd><p>This specifies a
+&ldquo;linear-style&rdquo; <i class="i">conditional newline</i>.
+<a class="index-entry-id" id="index-linear_002dstyle-conditional-newline-1"></a>
+</p>
+<p>A line break is inserted 
+if and only if the immediately containing <i class="i">section</i>
+cannot be printed on one line.
+The effect of this is that line breaks are
+either inserted at every linear-style conditional newline in a logical block
+or at none of them.
+</p>
+</dd>
+<dt><code class="t">:miser</code></dt>
+<dd><p>This specifies a 
+&ldquo;miser-style&rdquo; <i class="i">conditional newline</i>.
+<a class="index-entry-id" id="index-miser_002dstyle-conditional-newline-1"></a>
+</p>
+<p>A line break is inserted
+if and only if the immediately containing <i class="i">section</i>
+cannot be printed on one line
+and miser style is in effect in the immediately containing logical block.
+The effect of this is that miser-style conditional newlines
+act like linear-style conditional newlines,
+but only when miser style is in effect.
+Miser style is in effect for a logical block if and only if 
+the starting position of the logical block
+is less than or equal to
+<b class="b">*print-miser-width*</b> <i class="i">ems</i> from the right margin.
+</p>
+</dd>
+<dt><code class="t">:fill</code></dt>
+<dd><p>This specifies a
+&ldquo;fill-style&rdquo; <i class="i">conditional newline</i>.
+<a class="index-entry-id" id="index-fill_002dstyle-conditional-newline-1"></a>
+</p>
+<p>A line break is inserted if and only if
+either (a) the following <i class="i">section</i> cannot be printed 
+	   on the end of the current line,
+       (b) the preceding <i class="i">section</i> was not printed on a single line,
+    or (c) the immediately containing <i class="i">section</i> cannot
+	   be printed on one line and miser style is in effect
+	   in the immediately containing logical block.
+If a logical block is broken up into a number of subsections
+by fill-style conditional newlines,
+the basic effect is that the logical block
+is printed with as many subsections as possible on each line.
+However, if miser style is in effect,
+fill-style conditional newlines act like linear-style conditional newlines.
+</p>
+</dd>
+<dt><code class="t">:mandatory</code></dt>
+<dd><p>This specifies a
+&ldquo;mandatory-style&rdquo; <i class="i">conditional newline</i>.
+<a class="index-entry-id" id="index-mandatory_002dstyle-conditional-newline"></a>
+</p>
+<p>A line break is always inserted.
+This implies that  none of the containing <i class="i">sections</i>
+can be printed on a single line and 
+will therefore trigger the insertion of line breaks 
+at linear-style conditional newlines in these <i class="i">sections</i>.
+</p>
+</dd>
+</dl>
+
+<p>When a line break is inserted by any type of conditional newline, 
+any blanks that immediately precede the conditional newline are omitted 
+from the output and indentation is introduced at the beginning of the next line.
+By default, the indentation causes the following line to begin 
+in the same horizontal position 
+as the first character in the immediately containing logical block.
+(The indentation can be changed via <b class="b">pprint-indent</b>.)
+</p>
+<p>There are a variety of ways unconditional newlines can be introduced into
+the output (<i class="i">i.e.</i>, via <b class="b">terpri</b> or by printing a string containing a newline
+character).  As with mandatory conditional newlines, this prevents any of
+the containing <i class="i">sections</i> from being printed on one line.  In general, when
+an unconditional newline is encountered, it is printed out without
+suppression of the preceding blanks and without any indentation following
+it.  However, if a per-line prefix has been specified (see
+<b class="b">pprint-logical-block</b>), this prefix will always be printed no matter 
+how a newline originates.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-430"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-430"> &para;</a></span></h4>
+
+<p>See <a class="ref" href="Examples-of-using-the-Pretty-Printer.html">Examples of using the Pretty Printer</a>.
+</p>
+<h4 class="subsubheading" id="Side-Effects_003a_003a-76"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-76"> &para;</a></span></h4>
+
+<p>Output to <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-100"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-100"> &para;</a></span></h4>
+
+<p><b class="b">*print-pretty*</b>, <b class="b">*print-miser*</b>.
+The presence of containing logical blocks.
+The placement of newlines and conditional newlines.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-223"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-223"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">type-error</b> is signaled if <i class="i">kind</i> 
+is not one of <code class="t">:linear</code>, <code class="t">:fill</code>, <code class="t">:miser</code>, or <code class="t">:mandatory</code>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-484"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-484"> &para;</a></span></h4>
+
+<p><a class="ref" href="Tilde-Underscore_002d_003e-Conditional-Newline.html">Tilde Underscore: Conditional Newline</a>,
+<a class="ref" href="Examples-of-using-the-Pretty-Printer.html">Examples of using the Pretty Printer</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="pprint_002dpop.html">pprint-pop                                                    [Local Macro]</a>, Previous: <a href="pprint_002dlogical_002dblock.html">pprint-logical-block                                                [Macro]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pprint_002dpop.html
@@ -0,0 +1,144 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pprint-pop (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pprint-pop (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pprint-pop (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="pprint_002dtab.html" rel="next" title="pprint-tab">
+<link href="pprint_002dnewline.html" rel="prev" title="pprint-newline">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pprint_002dpop">
+<div class="nav-panel">
+<p>
+Next: <a href="pprint_002dtab.html" accesskey="n" rel="next">pprint-tab                                                       [Function]</a>, Previous: <a href="pprint_002dnewline.html" accesskey="p" rel="prev">pprint-newline                                                   [Function]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pprint_002dpop-_005bLocal-Macro_005d"><span>22.4.9 pprint-pop                                                    [Local Macro]<a class="copiable-link" href="#pprint_002dpop-_005bLocal-Macro_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-38"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-38"> &para;</a></span></h4>
+
+<p><code class="code">pprint-pop</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i">object</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-462"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-462"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">element</i> of the <i class="i">list</i> 
+		 being printed in the <i class="i">lexically current logical block</i>,
+		 or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-597"><span>Description::<a class="copiable-link" href="#Description_003a_003a-597"> &para;</a></span></h4>
+
+<p>Pops one <i class="i">element</i> from the <i class="i">list</i> being printed
+in the <i class="i">lexically current logical block</i>, obeying <b class="b">*print-length*</b>
+and <b class="b">*print-circle*</b> as described below.
+</p>
+<p>Each time <b class="b">pprint-pop</b> is called, it pops the next value off the
+<i class="i">list</i> passed to the <i class="i">lexically current logical block</i> and returns it.
+However, before doing this, it performs three tests:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>If the remaining &lsquo;list&rsquo; is not a <i class="i">list</i>, 
+    &ldquo;<code class="t">. </code>&rdquo; is printed followed by the remaining &lsquo;list.&rsquo; 
+    (This makes it easier to write printing functions that 
+    are robust in the face of malformed arguments.)
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If <b class="b">*print-length*</b> is <i class="i">non-nil</i>,
+    and <b class="b">pprint-pop</b> has already been called <b class="b">*print-length*</b> times 
+    within the immediately containing logical block,
+    &ldquo;<code class="t">...</code>&rdquo; is printed.
+    (This makes it easy to write printing functions that properly handle
+    <b class="b">*print-length*</b>.)
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If <b class="b">*print-circle*</b> is
+    <i class="i">non-nil</i>, and the remaining list is a circular (or shared) reference,
+    then &ldquo;<code class="t">. </code>&rdquo; is printed followed by an appropriate
+    &ldquo;<code class="t">#<i class="i">n</i>#</code>&rdquo; marker.
+    (This catches instances of <i class="i">cdr</i> circularity and sharing in lists.)
+</p></dd>
+</dl>
+
+<p>If either of the three conditions above occurs, the indicated output is
+printed on the <i class="i">pretty printing stream</i> created by the immediately containing
+<b class="b">pprint-logical-block</b> and the execution of the immediately containing
+<b class="b">pprint-logical-block</b> is terminated except for the printing of the suffix.
+</p>
+<p>If <b class="b">pprint-logical-block</b> is given a &lsquo;list&rsquo; argument of <b class="b">nil</b>&mdash;because
+it is not processing a list&mdash;<b class="b">pprint-pop</b> can still be used to obtain 
+support for <b class="b">*print-length*</b>.  
+In this situation, the first and third tests above are disabled and
+<b class="b">pprint-pop</b> always returns <b class="b">nil</b>.
+See <a class="ref" href="Examples-of-using-the-Pretty-Printer.html">Examples of using the Pretty Printer</a>&mdash;specifically, the <b class="b">pprint-vector</b> example.
+</p>
+<p>Whether or not <b class="b">pprint-pop</b> is <i class="i">fbound</i> in the
+<i class="i">global environment</i> is <i class="i">implementation-dependent</i>;
+however, the restrictions on redefinition and <i class="i">shadowing</i> of
+<b class="b">pprint-pop</b> are the same as for <i class="i">symbols</i> in the <code class="t">COMMON-LISP</code> <i class="i">package</i>
+which are <i class="i">fbound</i> in the <i class="i">global environment</i>.
+The consequences of attempting to use <b class="b">pprint-pop</b> outside
+of <b class="b">pprint-logical-block</b> are undefined.
+</p>
+<h4 class="subsubheading" id="Side-Effects_003a_003a-77"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-77"> &para;</a></span></h4>
+
+<p>Might cause output
+to the <i class="i">pretty printing stream</i> associated with the lexically current logical block.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-101"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-101"> &para;</a></span></h4>
+
+<p><b class="b">*print-length*</b>, <b class="b">*print-circle*</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-224"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-224"> &para;</a></span></h4>
+
+<p>An error is signaled (either at macro expansion time or at run time)
+if a usage of <b class="b">pprint-pop</b> occurs where there is no lexically
+containing <b class="b">pprint-logical-block</b> <i class="i">form</i>.
+</p>
+<p>The consequences are undefined if <b class="b">pprint-pop</b> is executed outside
+of the <i class="i">dynamic extent</i> of this <b class="b">pprint-logical-block</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-485"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-485"> &para;</a></span></h4>
+
+<p><a class="ref" href="pprint_002dexit_002dif_002dlist_002dexhausted.html">pprint-exit-if-list-exhausted                                 [Local Macro]</a>
+, 
+<a class="ref" href="pprint_002dlogical_002dblock.html">pprint-logical-block                                                [Macro]</a>
+.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-301"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-301"> &para;</a></span></h4>
+
+<p>It is frequently a good idea to call <b class="b">pprint-exit-if-list-exhausted</b> 
+before calling <b class="b">pprint-pop</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="pprint_002dtab.html">pprint-tab                                                       [Function]</a>, Previous: <a href="pprint_002dnewline.html">pprint-newline                                                   [Function]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pprint_002dtab.html
@@ -0,0 +1,88 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pprint-tab (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pprint-tab (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pprint-tab (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="print_002dobject.html" rel="next" title="print-object">
+<link href="pprint_002dpop.html" rel="prev" title="pprint-pop">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pprint_002dtab">
+<div class="nav-panel">
+<p>
+Next: <a href="print_002dobject.html" accesskey="n" rel="next">print-object                                    [Standard Generic Function]</a>, Previous: <a href="pprint_002dpop.html" accesskey="p" rel="prev">pprint-pop                                                    [Local Macro]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pprint_002dtab-_005bFunction_005d"><span>22.4.10 pprint-tab                                                       [Function]<a class="copiable-link" href="#pprint_002dtab-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">pprint-tab</code>  <i class="i">kind colnum colinc <span class="r">&amp;optional</span> stream</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-463"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-463"> &para;</a></span></h4>
+
+<p><i class="i">kind</i>&mdash;one of <code class="t">:line</code>, <code class="t">:section</code>, <code class="t">:line-relative</code>,
+	       or <code class="t">:section-relative</code>.
+</p>
+<p><i class="i">colnum</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<p><i class="i">colinc</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<p><i class="i">stream</i>&mdash;an <i class="i">output</i> <i class="i">stream designator</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-598"><span>Description::<a class="copiable-link" href="#Description_003a_003a-598"> &para;</a></span></h4>
+
+<p>Specifies tabbing to <i class="i">stream</i> as performed by the standard <code class="t">~T</code> format directive.
+</p>
+<p>If <i class="i">stream</i> is a <i class="i">pretty printing stream</i> and
+   the <i class="i">value</i> of <b class="b">*print-pretty*</b> is <i class="i">true</i>,
+</p>
+<p>tabbing is performed;
+otherwise, <b class="b">pprint-tab</b> has no effect.
+</p>
+<p>The arguments <i class="i">colnum</i> and <i class="i">colinc</i> correspond to the two 
+<i class="i">parameters</i> to <code class="t">~T</code> and are in terms of <i class="i">ems</i>.
+The <i class="i">kind</i> argument specifies the style of tabbing.  It must be one of
+  <code class="t">:line</code> (tab as by <code class="t">~T</code>),
+  <code class="t">:section</code> (tab as by <code class="t">~:T</code>, 
+		 but measuring horizontal positions relative to 
+		 the start of the dynamically enclosing section),
+  <code class="t">:line-relative</code> (tab as by <code class="t">~@T</code>), or
+  <code class="t">:section-relative</code> (tab as by <code class="t">~:@T</code>, 
+			  but measuring horizontal positions relative to
+			  the start of the dynamically enclosing section).
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-225"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-225"> &para;</a></span></h4>
+
+<p>An error is signaled if <i class="i">kind</i> is not one of <code class="t">:line</code>,
+<code class="t">:section</code>, <code class="t">:line-relative</code>, or <code class="t">:section-relative</code>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-486"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-486"> &para;</a></span></h4>
+
+<p><a class="ref" href="pprint_002dlogical_002dblock.html">pprint-logical-block                                                [Macro]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/print_002dnot_002dreadable.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>print-not-readable (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="print-not-readable (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="print-not-readable (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="print_002dnot_002dreadable_002dobject.html" rel="next" title="print-not-readable-object">
+<link href="_002aprint_002dright_002dmargin_002a.html" rel="prev" title="*print-right-margin*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="print_002dnot_002dreadable">
+<div class="nav-panel">
+<p>
+Next: <a href="print_002dnot_002dreadable_002dobject.html" accesskey="n" rel="next">print-not-readable-object                                        [Function]</a>, Previous: <a href="_002aprint_002dright_002dmargin_002a.html" accesskey="p" rel="prev">*print-right-margin*                                             [Variable]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="print_002dnot_002dreadable-_005bCondition-Type_005d"><span>22.4.29 print-not-readable                                         [Condition Type]<a class="copiable-link" href="#print_002dnot_002dreadable-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-72"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-72"> &para;</a></span></h4>
+<p><b class="b">print-not-readable</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-617"><span>Description::<a class="copiable-link" href="#Description_003a_003a-617"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">print-not-readable</b> consists of error conditions that occur during
+output while <b class="b">*print-readably*</b> is <i class="i">true</i>, as a result of attempting
+to write a printed representation with the <i class="i">Lisp printer</i>
+that would not be correctly read back with the <i class="i">Lisp reader</i>.
+The object which could not be printed is initialized by 
+the <code class="t">:object</code> initialization argument to <b class="b">make-condition</b>, and is <i class="i">accessed</i> by 
+the <i class="i">function</i> <b class="b">print-not-readable-object</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-500"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-500"> &para;</a></span></h4>
+
+<p><a class="ref" href="print_002dnot_002dreadable_002dobject.html">print-not-readable-object                                        [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/print_002dnot_002dreadable_002dobject.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>print-not-readable-object (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="print-not-readable-object (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="print-not-readable-object (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="format.html" rel="next" title="format">
+<link href="print_002dnot_002dreadable.html" rel="prev" title="print-not-readable">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="print_002dnot_002dreadable_002dobject">
+<div class="nav-panel">
+<p>
+Next: <a href="format.html" accesskey="n" rel="next">format                                                           [Function]</a>, Previous: <a href="print_002dnot_002dreadable.html" accesskey="p" rel="prev">print-not-readable                                         [Condition Type]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="print_002dnot_002dreadable_002dobject-_005bFunction_005d"><span>22.4.30 print-not-readable-object                                        [Function]<a class="copiable-link" href="#print_002dnot_002dreadable_002dobject-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">print-not-readable-object</code>  <i class="i">condition</i> &rArr;  <i class="i">object</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-469"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-469"> &para;</a></span></h4>
+
+<p><i class="i">condition</i>&mdash;a <i class="i">condition</i> of <i class="i">type</i> <b class="b">print-not-readable</b>.
+</p>
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-618"><span>Description::<a class="copiable-link" href="#Description_003a_003a-618"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">object</i> that could not be printed readably 
+in the situation represented by <i class="i">condition</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-501"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-501"> &para;</a></span></h4>
+
+<p><b class="b">print-not-readable</b>,
+<a class="ref" href="Conditions.html">Conditions</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/print_002dobject.html
@@ -0,0 +1,203 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>print-object (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="print-object (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="print-object (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="print_002dunreadable_002dobject.html" rel="next" title="print-unreadable-object">
+<link href="pprint_002dtab.html" rel="prev" title="pprint-tab">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="print_002dobject">
+<div class="nav-panel">
+<p>
+Next: <a href="print_002dunreadable_002dobject.html" accesskey="n" rel="next">print-unreadable-object                                             [Macro]</a>, Previous: <a href="pprint_002dtab.html" accesskey="p" rel="prev">pprint-tab                                                       [Function]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="print_002dobject-_005bStandard-Generic-Function_005d"><span>22.4.11 print-object                                    [Standard Generic Function]<a class="copiable-link" href="#print_002dobject-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-39"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-39"> &para;</a></span></h4>
+
+<p><code class="code">print-object</code>  <i class="i">object stream</i> &rArr;  <i class="i">object</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-22"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-22"> &para;</a></span></h4>
+
+<p><code class="code">print-object</code>  <i class="i"><span class="r">(</span><i class="i">object</i> standard-object<span class="r">)</span> <i class="i">stream</i></i>
+</p>
+<p><code class="code">print-object</code>  <i class="i"><span class="r">(</span><i class="i">object</i> structure-object<span class="r">)</span> <i class="i">stream</i></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-464"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-464"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">stream</i>&mdash;a <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-599"><span>Description::<a class="copiable-link" href="#Description_003a_003a-599"> &para;</a></span></h4>
+
+<p>The <i class="i">generic function</i> <b class="b">print-object</b> writes the printed representation of <i class="i">object</i>
+to <i class="i">stream</i>.
+The <i class="i">function</i> <b class="b">print-object</b> is called by the <i class="i">Lisp printer</i>; 
+it should not be called by the user.
+</p>
+<p>Each implementation is required to provide a <i class="i">method</i> on
+the <i class="i">class</i> <b class="b">standard-object</b> and on the <i class="i">class</i> <b class="b">structure-object</b>.
+In addition, each <i class="i">implementation</i> must provide 
+<i class="i">methods</i> on enough other <i class="i">classes</i> 
+so as to ensure that there is always an applicable <i class="i">method</i>.
+Implementations are free to add <i class="i">methods</i> for other <i class="i">classes</i>.
+Users may write <i class="i">methods</i> for <b class="b">print-object</b> for their own
+<i class="i">classes</i> if they do not wish to inherit an 
+<i class="i">implementation-dependent</i> <i class="i">method</i>.
+</p>
+<p>The <i class="i">method</i> on the <i class="i">class</i> <b class="b">structure-object</b> prints the object in the
+default <code class="t">#S</code> notation; see <a class="ref" href="Printing-Structures.html">Printing Structures</a>.
+</p>
+<p><i class="i">Methods</i> on <b class="b">print-object</b> are responsible for implementing
+their part of the semantics of the <i class="i">printer control variables</i>, as follows:
+</p>
+<dl class="table">
+<dt><b class="b">*print-readably*</b></dt>
+<dd><p>All methods for <b class="b">print-object</b> must obey <b class="b">*print-readably*</b>.
+This includes both user-defined methods and <i class="i">implementation-defined</i> methods.
+Readable printing of <i class="i">structures</i> and <i class="i">standard objects</i> 
+is controlled by their <b class="b">print-object</b> method, 
+not by their <b class="b">make-load-form</b> <i class="i">method</i>.
+<i class="i">Similarity</i> for these <i class="i">objects</i> is application dependent
+and hence is defined to be whatever these <i class="i">methods</i> do; 
+see <a class="ref" href="Similarity-of-Literal-Objects.html">Similarity of Literal Objects</a>.
+</p>
+</dd>
+<dt><b class="b">*print-escape*</b></dt>
+<dd><p>Each <i class="i">method</i> must implement <b class="b">*print-escape*</b>. 
+</p>
+</dd>
+<dt><b class="b">*print-pretty*</b></dt>
+<dd>
+<p>The <i class="i">method</i> may wish to perform specialized line breaking
+or other output conditional on the <i class="i">value</i> of <b class="b">*print-pretty*</b>.
+For further information,
+see (for example) the <i class="i">macro</i> <b class="b">pprint-fill</b>.
+See also <a class="ref" href="Pretty-Print-Dispatch-Tables.html">Pretty Print Dispatch Tables</a> and <a class="ref" href="Examples-of-using-the-Pretty-Printer.html">Examples of using the Pretty Printer</a>.
+</p>
+</dd>
+<dt><b class="b">*print-length*</b></dt>
+<dd><p><i class="i">Methods</i> that produce output of indefinite length must obey
+<b class="b">*print-length*</b>.
+</p>
+<p>For further information,
+see (for example) the <i class="i">macros</i> <b class="b">pprint-logical-block</b>
+and <b class="b">pprint-pop</b>.
+See also <a class="ref" href="Pretty-Print-Dispatch-Tables.html">Pretty Print Dispatch Tables</a> and <a class="ref" href="Examples-of-using-the-Pretty-Printer.html">Examples of using the Pretty Printer</a>.
+</p>
+</dd>
+<dt><b class="b">*print-level*</b></dt>
+<dd><p>The printer takes care of <b class="b">*print-level*</b> automatically,
+provided that each <i class="i">method</i> handles exactly one level of structure and
+calls <b class="b">write</b> (or an equivalent <i class="i">function</i>) recursively if
+there are more structural levels.  The printer&rsquo;s decision of whether an
+<i class="i">object</i> has components (and therefore should not be printed when the
+printing depth is not less than <b class="b">*print-level*</b>) is
+<i class="i">implementation-dependent</i>.  In some implementations its 
+<b class="b">print-object</b> <i class="i">method</i> is not called; 
+in others the <i class="i">method</i> is called, 
+and the determination that the <i class="i">object</i> has components is based on what
+it tries to write to the <i class="i">stream</i>.
+</p>
+</dd>
+<dt><b class="b">*print-circle*</b></dt>
+<dd>
+<p>When the <i class="i">value</i> of <b class="b">*print-circle*</b> is <i class="i">true</i>,
+a user-defined 
+</p>
+<p><b class="b">print-object</b> <i class="i">method</i>
+</p>
+<p>can print <i class="i">objects</i> to the supplied <i class="i">stream</i> 
+using <b class="b">write</b>,
+      <b class="b">prin1</b>,
+      <b class="b">princ</b>,
+   or <b class="b">format</b>
+and expect circularities to be detected 
+and printed using the <code class="t">#<i class="i">n</i>#</code> syntax.
+If a user-defined
+</p>
+<p><b class="b">print-object</b> <i class="i">method</i>
+</p>
+<p>prints to a <i class="i">stream</i> other than the one
+that was supplied, then circularity detection starts over for that
+<i class="i">stream</i>.  See <b class="b">*print-circle*</b>.
+</p>
+</dd>
+<dt><b class="b">*print-base*</b>,</dt>
+<dd><p><b class="b">*print-radix*</b>,
+      <b class="b">*print-case*</b>, 
+      <b class="b">*print-gensym*</b>,
+  and <b class="b">*print-array*</b>  
+These <i class="i">printer control variables</i> apply to specific types of <i class="i">objects</i>
+and are handled by the <i class="i">methods</i> for those <i class="i">objects</i>.
+</p>
+</dd>
+</dl>
+
+<p>If these rules are not obeyed, the results are undefined.
+</p>
+<p>In general, the printer and the <b class="b">print-object</b> methods should not
+rebind the print control variables as they operate recursively through the
+structure, but this is <i class="i">implementation-dependent</i>.
+</p>
+<p>In some implementations the <i class="i">stream</i> argument passed to a 
+<b class="b">print-object</b> <i class="i">method</i> is not the original <i class="i">stream</i>, 
+but is an intermediate <i class="i">stream</i> that implements part of the printer.
+<i class="i">methods</i> should therefore not depend on the identity of this <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-487"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-487"> &para;</a></span></h4>
+
+<p><a class="ref" href="pprint_002dfill.html">pprint-fill, pprint-linear, pprint-tabular                       [Function]</a>
+,
+<a class="ref" href="pprint_002dlogical_002dblock.html">pprint-logical-block                                                [Macro]</a>
+,
+<a class="ref" href="pprint_002dpop.html">pprint-pop                                                    [Local Macro]</a>
+,
+<a class="ref" href="write.html">write, prin1, print, pprint, princ                               [Function]</a>
+,
+<b class="b">*print-readably*</b>,
+<b class="b">*print-escape*</b>,
+<b class="b">*print-pretty*</b>,
+<b class="b">*print-length*</b>,
+<a class="ref" href="Default-Print_002dObject-Methods.html">Default Print-Object Methods</a>,
+</p>
+<p><a class="ref" href="Printing-Structures.html">Printing Structures</a>,
+</p>
+<p><a class="ref" href="Pretty-Print-Dispatch-Tables.html">Pretty Print Dispatch Tables</a>,
+<a class="ref" href="Examples-of-using-the-Pretty-Printer.html">Examples of using the Pretty Printer</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="print_002dunreadable_002dobject.html">print-unreadable-object                                             [Macro]</a>, Previous: <a href="pprint_002dtab.html">pprint-tab                                                       [Function]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/print_002dunreadable_002dobject.html
@@ -0,0 +1,105 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>print-unreadable-object (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="print-unreadable-object (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="print-unreadable-object (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="set_002dpprint_002ddispatch.html" rel="next" title="set-pprint-dispatch">
+<link href="print_002dobject.html" rel="prev" title="print-object">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="print_002dunreadable_002dobject">
+<div class="nav-panel">
+<p>
+Next: <a href="set_002dpprint_002ddispatch.html" accesskey="n" rel="next">set-pprint-dispatch                                              [Function]</a>, Previous: <a href="print_002dobject.html" accesskey="p" rel="prev">print-object                                    [Standard Generic Function]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="print_002dunreadable_002dobject-_005bMacro_005d"><span>22.4.12 print-unreadable-object                                             [Macro]<a class="copiable-link" href="#print_002dunreadable_002dobject-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">print-unreadable-object</code>  <i class="i"><span class="r">(</span>object stream <span class="r">&amp;key</span> type identity<span class="r">)</span> {<i class="i">form</i>}*</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-465"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-465"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>; evaluated.
+</p>
+<p><i class="i">stream</i>&mdash;
+a <i class="i">stream designator</i>; evaluated.
+</p>
+<p><i class="i">type</i>&mdash;a <i class="i">generalized boolean</i>; evaluated.
+</p>
+<p><i class="i">identity</i>&mdash;a <i class="i">generalized boolean</i>; evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-600"><span>Description::<a class="copiable-link" href="#Description_003a_003a-600"> &para;</a></span></h4>
+
+<p>Outputs a printed representation of <i class="i">object</i> on <i class="i">stream</i>,
+beginning with &ldquo;<code class="t">#&lt;</code>&rdquo; and ending with &ldquo;<code class="t">&gt;</code>&rdquo;.  
+Everything output to <i class="i">stream</i> by the body <i class="i">forms</i>
+is enclosed in the the angle brackets.
+If <i class="i">type</i> is <i class="i">true</i>, the output from <i class="i">forms</i>
+is preceded by a brief description of the <i class="i">object</i>&rsquo;s
+<i class="i">type</i> and a space character.
+If <i class="i">identity</i> is <i class="i">true</i>,
+the output from <i class="i">forms</i> is followed by a space character
+and a representation of the <i class="i">object</i>&rsquo;s identity, 
+typically a storage address.
+</p>
+<p>If either <i class="i">type</i> or <i class="i">identity</i> is not supplied, 
+its value is <i class="i">false</i>.  It is valid to omit the body <i class="i">forms</i>.  
+If <i class="i">type</i> and <i class="i">identity</i> are both true and there are no
+body <i class="i">forms</i>, only one space character separates the type 
+and the identity.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-431"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-431"> &para;</a></span></h4>
+
+<p>;; Note that in this example, the precise form of the output
+;; is <i class="i">implementation-dependent</i>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmethod print-object ((obj airplane) stream)
+   (print-unreadable-object (obj stream :type t :identity t)
+     (princ (tail-number obj) stream)))
+
+ (prin1-to-string my-airplane)
+&rArr;  &quot;#&lt;Airplane NW0773 36000123135&gt;&quot;
+<i class="i">OR</i>&rArr; &quot;#&lt;FAA:AIRPLANE NW0773 17&gt;&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-226"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-226"> &para;</a></span></h4>
+
+<p>If <b class="b">*print-readably*</b> is <i class="i">true</i>, <b class="b">print-unreadable-object</b>
+signals an error of <i class="i">type</i> <b class="b">print-not-readable</b> without printing anything.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="set_002dpprint_002ddispatch.html">set-pprint-dispatch                                              [Function]</a>, Previous: <a href="print_002dobject.html">print-object                                    [Standard Generic Function]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/probe_002dfile.html
@@ -0,0 +1,92 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>probe-file (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="probe-file (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="probe-file (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Files-Dictionary.html" rel="up" title="Files Dictionary">
+<link href="ensure_002ddirectories_002dexist.html" rel="next" title="ensure-directories-exist">
+<link href="directory.html" rel="prev" title="directory">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="probe_002dfile">
+<div class="nav-panel">
+<p>
+Next: <a href="ensure_002ddirectories_002dexist.html" accesskey="n" rel="next">ensure-directories-exist                                         [Function]</a>, Previous: <a href="directory.html" accesskey="p" rel="prev">directory                                                        [Function]</a>, Up: <a href="Files-Dictionary.html" accesskey="u" rel="up">Files Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="probe_002dfile-_005bFunction_005d"><span>20.2.2 probe-file                                                       [Function]<a class="copiable-link" href="#probe_002dfile-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">probe-file</code>  <i class="i">pathspec</i> &rArr;  <i class="i">truename</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-404"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-404"> &para;</a></span></h4>
+
+<p><i class="i">pathspec</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">truename</i>&mdash;a <i class="i">physical pathname</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-523"><span>Description::<a class="copiable-link" href="#Description_003a_003a-523"> &para;</a></span></h4>
+
+<p><b class="b">probe-file</b> tests whether a file exists.
+</p>
+<p><b class="b">probe-file</b> returns <i class="i">false</i> if there is no file named <i class="i">pathspec</i>,
+and otherwise returns the <i class="i">truename</i> of <i class="i">pathspec</i>.
+</p>
+<p>If the <i class="i">pathspec</i> <i class="i">designator</i> is an open <i class="i">stream</i>,
+then <b class="b">probe-file</b> produces the <i class="i">truename</i> of its associated <i class="i">file</i>.
+</p>
+<p>If <i class="i">pathspec</i> is a <i class="i">stream</i>, whether open or closed,
+it is coerced to a <i class="i">pathname</i> as if by the <i class="i">function</i> <b class="b">pathname</b>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-76"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-76"> &para;</a></span></h4>
+
+<p>The host computer&rsquo;s file system.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-184"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-184"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> is signaled if <i class="i">pathspec</i> is <i class="i">wild</i>.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> is signaled
+if the <i class="i">file system</i> cannot perform the requested operation.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-426"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-426"> &para;</a></span></h4>
+
+<p><a class="ref" href="truename.html">truename                                                         [Function]</a>
+,
+<a class="ref" href="open.html">open                                                             [Function]</a>
+,
+<a class="ref" href="ensure_002ddirectories_002dexist.html">ensure-directories-exist                                         [Function]</a>
+,
+<b class="b">pathname</b>,
+</p>
+<p><b class="b">logical-pathname</b>,
+</p>
+<p><a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+<a class="ref" href="File-Operations-on-Open-and-Closed-Streams.html">File Operations on Open and Closed Streams</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/proclaim.html
@@ -0,0 +1,128 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>proclaim (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="proclaim (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="proclaim (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="declaim.html" rel="next" title="declaim">
+<link href="_002amacroexpand_002dhook_002a.html" rel="prev" title="*macroexpand-hook*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="proclaim">
+<div class="nav-panel">
+<p>
+Next: <a href="declaim.html" accesskey="n" rel="next">declaim                                                             [Macro]</a>, Previous: <a href="_002amacroexpand_002dhook_002a.html" accesskey="p" rel="prev">*macroexpand-hook*                                               [Variable]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="proclaim-_005bFunction_005d"><span>3.8.16 proclaim                                                         [Function]<a class="copiable-link" href="#proclaim-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">proclaim</code>  <i class="i">declaration-specifier</i> &rArr;  <i class="i"><i class="i">implementation-dependent</i></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-13"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-13"> &para;</a></span></h4>
+
+<p><i class="i">declaration-specifier</i>&mdash;a <i class="i">declaration specifier</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-15"><span>Description::<a class="copiable-link" href="#Description_003a_003a-15"> &para;</a></span></h4>
+
+<p><i class="i">Establishes</i> the <i class="i">declaration</i> specified by <i class="i">declaration-specifier</i>
+in the <i class="i">global environment</i>.
+</p>
+<p>Such a <i class="i">declaration</i>, sometimes called a <i class="i">global declaration</i> 
+or a <i class="i">proclamation</i>, is always in force unless locally <i class="i">shadowed</i>.
+</p>
+<p><i class="i">Names</i> of <i class="i">variables</i> and <i class="i">functions</i> within 
+<i class="i">declaration-specifier</i> refer to <i class="i">dynamic variables</i> 
+and global <i class="i">function</i> definitions, respectively.
+</p>
+<p>Figure 3&ndash;22 shows a list of <i class="i">declaration identifiers</i> 
+that can be used with <b class="b">proclaim</b>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  declaration  inline     optimize  type  <!-- /@w -->
+  ftype        notinline  special         <!-- /@w -->
+
+  Figure 3&ndash;22: Global Declaration Specifiers<!-- /@w -->
+
+</pre></div></div>
+
+<p>An implementation is free to support other (<i class="i">implementation-defined</i>)
+<i class="i">declaration identifiers</i> as well.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-13"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-13"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun declare-variable-types-globally (type vars)
+   (proclaim `(type ,type ,@vars))
+   type)
+
+ ;; Once this form is executed, the dynamic variable *TOLERANCE*
+ ;; must always contain a float.
+ (declare-variable-types-globally 'float '(*tolerance*))
+&rArr;  FLOAT
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-15"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-15"> &para;</a></span></h4>
+
+<p><a class="ref" href="declaim.html">declaim                                                             [Macro]</a>
+,
+<b class="b">declare</b>,
+<a class="ref" href="Compilation.html">Compilation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-11"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-11"> &para;</a></span></h4>
+
+<p>Although the <i class="i">execution</i> of a <b class="b">proclaim</b> <i class="i">form</i> 
+has effects that might affect compilation, the compiler does not make
+any attempt to recognize and specially process <b class="b">proclaim</b> <i class="i">forms</i>.
+A <i class="i">proclamation</i> such as the following, even if a <i class="i">top level form</i>,
+does not have any effect until it is executed:
+</p>
+<div class="example">
+<pre class="example-preformatted">(proclaim '(special *x*))
+</pre></div>
+
+<p>If compile time side effects are desired, <b class="b">eval-when</b> may be useful.
+For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (eval-when (:execute :compile-toplevel :load-toplevel)
+   (proclaim '(special *x*)))
+</pre></div>
+
+<p>In most such cases, however, it is preferrable to use <b class="b">declaim</b> for
+this purpose.
+</p>
+<p>Since <b class="b">proclaim</b> <i class="i">forms</i> are ordinary <i class="i">function forms</i>,
+<i class="i">macro forms</i> can expand into them.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="declaim.html">declaim                                                             [Macro]</a>, Previous: <a href="_002amacroexpand_002dhook_002a.html">*macroexpand-hook*                                               [Variable]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/prog.html
@@ -0,0 +1,196 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>prog (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="prog (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="prog (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="prog1.html" rel="next" title="prog1">
+<link href="nth_002dvalue.html" rel="prev" title="nth-value">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="prog">
+<div class="nav-panel">
+<p>
+Next: <a href="prog1.html" accesskey="n" rel="next">prog1, prog2                                                        [Macro]</a>, Previous: <a href="nth_002dvalue.html" accesskey="p" rel="prev">nth-value                                                           [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="prog_002c-prog_002a-_005bMacro_005d"><span>5.3.57 prog, prog*                                                         [Macro]<a class="copiable-link" href="#prog_002c-prog_002a-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">prog</code>  <i class="i"><span class="r">(</span>{<i class="i">var</i> | 
+			  	       <span class="r">(</span><i class="i">var</i> <span class="r">[</span><i class="i">init-form</i><span class="r">]</span><span class="r">)</span>}*<span class="r">)</span>
+	      	   {<i class="i">declaration</i>}*
+	      	   {<i class="i">tag</i> | <i class="i">statement</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><code class="code">prog*</code>  <i class="i"><span class="r">(</span>{<i class="i">var</i> | 
+				       <span class="r">(</span><i class="i">var</i> <span class="r">[</span><i class="i">init-form</i><span class="r">]</span><span class="r">)</span>}*<span class="r">)</span>
+		   {<i class="i">declaration</i>}* 
+		   {<i class="i">tag</i> | <i class="i">statement</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-75"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-75"> &para;</a></span></h4>
+
+<p><i class="i">var</i>&mdash;variable name.
+</p>
+<p><i class="i">init-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">tag</i>&mdash;a <i class="i">go tag</i>; not evaluated.
+</p>
+<p><i class="i">statement</i>&mdash;a <i class="i">compound form</i>; evaluated as described below.
+</p>
+<p><i class="i">results</i>&mdash;<b class="b">nil</b> if a <i class="i">normal return</i> occurs,
+   or else, if an <i class="i">explicit return</i> occurs, the <i class="i">values</i> that were transferred.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-110"><span>Description::<a class="copiable-link" href="#Description_003a_003a-110"> &para;</a></span></h4>
+
+<p>Three distinct operations are performed by <b class="b">prog</b> and 
+<b class="b">prog*</b>:  
+they bind local variables,
+they permit use of the <b class="b">return</b> 
+statement, and they permit use of the <b class="b">go</b>
+statement.
+A typical <b class="b">prog</b> looks like this:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (prog (var1 var2 (var3 init-form-3) var4 (var5 init-form-5))
+       {<i class="i">declaration</i>}*
+       statement1
+  tag1
+       statement2
+       statement3
+       statement4
+  tag2
+       statement5
+       ...
+       )
+</pre></div>
+
+<p>For <b class="b">prog</b>,
+<i class="i">init-forms</i> are evaluated first, in the order in which they are
+supplied. The <i class="i">vars</i> are then bound to the corresponding values in
+parallel.  If no <i class="i">init-form</i> 
+is supplied for a given <i class="i">var</i>, 
+that <i class="i">var</i> is  bound to <b class="b">nil</b>.
+</p>
+<p>The body of <b class="b">prog</b> is executed as if it were a <b class="b">tagbody</b> <i class="i">form</i>;
+the <b class="b">go</b> statement can be used to transfer control
+to a <i class="i">tag</i>.
+<i class="i">Tags</i> label <i class="i">statements</i>.
+</p>
+<p><b class="b">prog</b> implicitly establishes a <b class="b">block</b> named <b class="b">nil</b> around
+the entire <b class="b">prog</b> <i class="i">form</i>, so that <b class="b">return</b> can be used
+at any time to exit from the <b class="b">prog</b> <i class="i">form</i>.
+</p>
+<p>The difference between <b class="b">prog*</b> and <b class="b">prog</b> is that
+in <b class="b">prog*</b> the <i class="i">binding</i> and initialization of the <i class="i">vars</i> 
+is done <i class="i">sequentially</i>, so that the <i class="i">init-form</i> for each
+one can use the values of previous ones.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-83"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-83"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted">(prog* ((y z) (x (car y)))
+       (return x))
+</pre></div>
+
+<p>returns the <i class="i">car</i> of the value of <code class="t">z</code>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq a 1) &rArr;  1
+ (prog ((a 2) (b a)) (return (if (= a b) '= '/=))) &rArr;  /=
+ (prog* ((a 2) (b a)) (return (if (= a b) '= '/=))) &rArr;  =
+ (prog () 'no-return-value) &rArr;  NIL
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (defun king-of-confusion (w)
+   &quot;Take a cons of two lists and make a list of conses.
+    Think of this function as being like a zipper.&quot;
+   (prog (x y z)          ;Initialize x, y, z to NIL
+        (setq y (car w) z (cdr w))
+    loop
+        (cond ((null y) (return x))
+              ((null z) (go err)))
+    rejoin
+        (setq x (cons (cons (car y) (car z)) x))
+        (setq y (cdr y) z (cdr z))
+        (go loop)
+    err
+        (cerror &quot;Will self-pair extraneous items&quot;
+                &quot;Mismatch - gleep!  ~S&quot; y)
+        (setq z y)
+        (go rejoin))) &rArr;  KING-OF-CONFUSION 
+</pre></div>
+
+<p>This can be accomplished more perspicuously as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun prince-of-clarity (w)
+   &quot;Take a cons of two lists and make a list of conses.
+    Think of this function as being like a zipper.&quot;
+   (do ((y (car w) (cdr y))
+        (z (cdr w) (cdr z))
+        (x '<code class="t">()</code> (cons (cons (car y) (car z)) x)))
+       ((null y) x)
+     (when (null z)
+       (cerror &quot;Will self-pair extraneous items&quot;
+              &quot;Mismatch - gleep!  ~S&quot; y)
+       (setq z y)))) &rArr;  PRINCE-OF-CLARITY 
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-94"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-94"> &para;</a></span></h4>
+
+<p><a class="ref" href="block.html">block                                                    [Special Operator]</a>
+, 
+<a class="ref" href="let.html">let, let*                                                [Special Operator]</a>
+, 
+<a class="ref" href="tagbody.html">tagbody                                                  [Special Operator]</a>
+, 
+<a class="ref" href="go.html">go                                                       [Special Operator]</a>
+, 
+<a class="ref" href="return.html">return                                                              [Macro]</a>
+, <a class="ref" href="Evaluation.html">Evaluation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-61"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-61"> &para;</a></span></h4>
+<p><b class="b">prog</b> can be explained in terms of 
+<b class="b">block</b>, <b class="b">let</b>, and <b class="b">tagbody</b> as
+follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (prog <i class="i">variable-list</i> <i class="i">declaration</i> . <i class="i">body</i>)
+    &equiv; (block nil (let <i class="i">variable-list</i> <i class="i">declaration</i> (tagbody . <i class="i">body</i>)))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="prog1.html">prog1, prog2                                                        [Macro]</a>, Previous: <a href="nth_002dvalue.html">nth-value                                                           [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/prog1.html
@@ -0,0 +1,128 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>prog1 (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="prog1 (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="prog1 (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="progn.html" rel="next" title="progn">
+<link href="prog.html" rel="prev" title="prog">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="prog1">
+<div class="nav-panel">
+<p>
+Next: <a href="progn.html" accesskey="n" rel="next">progn                                                    [Special Operator]</a>, Previous: <a href="prog.html" accesskey="p" rel="prev">prog, prog*                                                         [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="prog1_002c-prog2-_005bMacro_005d"><span>5.3.58 prog1, prog2                                                        [Macro]<a class="copiable-link" href="#prog1_002c-prog2-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">prog</code>  <i class="i">1</i> &rArr;  <i class="i">first-form             {<i class="i">form</i>}*</i>
+ <span class="r">result-1</span>
+<code class="code">prog</code>  <i class="i">2</i> &rArr;  <i class="i">first-form second-form {<i class="i">form</i>}*</i>
+ <span class="r">result-2</span>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-76"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-76"> &para;</a></span></h4>
+
+<p><i class="i">first-form</i>&mdash;a <i class="i">form</i>; evaluated as described below.
+</p>
+<p><i class="i">second-form</i>&mdash;a <i class="i">form</i>; evaluated as described below.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>; evaluated as described below.
+</p>
+<p><i class="i">result-1</i>&mdash;the <i class="i">primary value</i> resulting from 
+		   the <i class="i">evaluation</i> of <i class="i">first-form</i>.
+</p>
+<p><i class="i">result-2</i>&mdash;the <i class="i">primary value</i> resulting from 
+		   the <i class="i">evaluation</i> of <i class="i">second-form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-111"><span>Description::<a class="copiable-link" href="#Description_003a_003a-111"> &para;</a></span></h4>
+
+<p><b class="b">prog1</b> <i class="i">evaluates</i> <i class="i">first-form</i> 
+ and then <i class="i">forms</i>,
+<i class="i">yielding</i> as its only <i class="i">value</i>
+the <i class="i">primary value</i> <i class="i">yielded</i> by <i class="i">first-form</i>.
+</p>
+<p><b class="b">prog2</b> <i class="i">evaluates</i> <i class="i">first-form</i>,
+     then <i class="i">second-form</i>,
+ and then <i class="i">forms</i>,
+<i class="i">yielding</i> as its only <i class="i">value</i>
+the <i class="i">primary value</i> <i class="i">yielded</i> by <i class="i">first-form</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-84"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-84"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq temp 1) &rArr;  1
+ (prog1 temp (print temp) (incf temp) (print temp))
+<code class="t"> |&gt; </code> 1
+<code class="t"> |&gt; </code> 2
+&rArr;  1
+ (prog1 temp (setq temp nil)) &rArr;  2
+ temp &rArr;  NIL
+ (prog1 (values 1 2 3) 4) &rArr;  1 
+ (setq temp (list 'a 'b 'c))
+ (prog1 (car temp) (setf (car temp) 'alpha)) &rArr;  A
+ temp &rArr;  (ALPHA B C)
+ (flet ((swap-symbol-values (x y)
+          (setf (symbol-value x) 
+                (prog1 (symbol-value y)
+                       (setf (symbol-value y) (symbol-value x))))))
+   (let ((*foo* 1) (*bar* 2))
+     (declare (special *foo* *bar*))
+     (swap-symbol-values '*foo* '*bar*)
+     (values *foo* *bar*)))
+&rArr;  2, 1
+ (setq temp 1) &rArr;  1
+ (prog2 (incf temp) (incf temp) (incf temp)) &rArr;  3
+ temp &rArr;  4
+ (prog2 1 (values 2 3 4) 5) &rArr;  2
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-95"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-95"> &para;</a></span></h4>
+
+<p><a class="ref" href="multiple_002dvalue_002dprog1.html">multiple-value-prog1                                     [Special Operator]</a>
+,
+<a class="ref" href="progn.html">progn                                                    [Special Operator]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-62"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-62"> &para;</a></span></h4>
+
+<p><b class="b">prog1</b> and <b class="b">prog2</b> are typically used to <i class="i">evaluate</i> 
+one or more <i class="i">forms</i> with side effects and return a <i class="i">value</i> that
+must be computed before some or all of the side effects happen.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (prog1 {<i class="i">form</i>}*) &equiv; (values (multiple-value-prog1 {<i class="i">form</i>}*))
+ (prog2 <i class="i">form1</i> {<i class="i">form</i>}*) &equiv; (let () <i class="i">form1</i> (prog1 {<i class="i">form</i>}*))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="progn.html">progn                                                    [Special Operator]</a>, Previous: <a href="prog.html">prog, prog*                                                         [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/progn.html
@@ -0,0 +1,97 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>progn (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="progn (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="progn (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="define_002dmodify_002dmacro.html" rel="next" title="define-modify-macro">
+<link href="prog1.html" rel="prev" title="prog1">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="progn">
+<div class="nav-panel">
+<p>
+Next: <a href="define_002dmodify_002dmacro.html" accesskey="n" rel="next">define-modify-macro                                                 [Macro]</a>, Previous: <a href="prog1.html" accesskey="p" rel="prev">prog1, prog2                                                        [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="progn-_005bSpecial-Operator_005d"><span>5.3.59 progn                                                    [Special Operator]<a class="copiable-link" href="#progn-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">progn</code>  <i class="i">{<i class="i">form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-77"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-77"> &para;</a></span></h4>
+
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> of the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-112"><span>Description::<a class="copiable-link" href="#Description_003a_003a-112"> &para;</a></span></h4>
+
+<p><b class="b">progn</b> evaluates <i class="i">forms</i>,
+in the order in which they are given.
+</p>
+<p>The values of each <i class="i">form</i> but the last are discarded.
+</p>
+<p>If <b class="b">progn</b> appears as a <i class="i">top level form</i>, then all <i class="i">forms</i>
+within that <b class="b">progn</b> are considered by the compiler to be 
+<i class="i">top level forms</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-85"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-85"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (progn) &rArr;  NIL
+ (progn 1 2 3) &rArr;  3
+ (progn (values 1 2 3)) &rArr;  1, 2, 3
+ (setq a 1) &rArr;  1
+ (if a
+      (progn (setq a nil) 'here)
+      (progn (setq a t) 'there)) &rArr;  HERE
+ a &rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-96"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-96"> &para;</a></span></h4>
+
+<p><a class="ref" href="prog1.html">prog1, prog2                                                        [Macro]</a>
+, <b class="b">prog2</b>, <a class="ref" href="Evaluation.html">Evaluation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-63"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-63"> &para;</a></span></h4>
+
+<p>Many places in <span class="r">Common Lisp</span> involve syntax that uses <i class="i">implicit progns</i>.
+That is, part of their syntax allows many <i class="i">forms</i> to be written
+that are to be evaluated sequentially, discarding the results
+of all <i class="i">forms</i> but the last and returning the results of the last <i class="i">form</i>.
+Such places include, but are not limited to, the following:
+     the body of a <i class="i">lambda expression</i>;
+     the bodies of various control and conditional <i class="i">forms</i>
+    (<i class="i">e.g.</i>, <b class="b">case</b>, <b class="b">catch</b>, <b class="b">progn</b>, and <b class="b">when</b>).
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="define_002dmodify_002dmacro.html">define-modify-macro                                                 [Macro]</a>, Previous: <a href="prog1.html">prog1, prog2                                                        [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/program_002derror.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>program-error (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="program-error (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="program-error (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="undefined_002dfunction.html" rel="next" title="undefined-function">
+<link href="control_002derror.html" rel="prev" title="control-error">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="program_002derror">
+<div class="nav-panel">
+<p>
+Next: <a href="undefined_002dfunction.html" accesskey="n" rel="next">undefined-function                                         [Condition Type]</a>, Previous: <a href="control_002derror.html" accesskey="p" rel="prev">control-error                                              [Condition Type]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="program_002derror-_005bCondition-Type_005d"><span>5.3.68 program-error                                              [Condition Type]<a class="copiable-link" href="#program_002derror-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-16"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-16"> &para;</a></span></h4>
+<p><b class="b">program-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-121"><span>Description::<a class="copiable-link" href="#Description_003a_003a-121"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">program-error</b>
+consists of error conditions related to incorrect program syntax.  The
+errors that result from naming a <i class="i">go tag</i> or a <i class="i">block tag</i>
+that is not lexically apparent are of <i class="i">type</i> <b class="b">program-error</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/progv.html
@@ -0,0 +1,104 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>progv (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="progv (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="progv (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="setq.html" rel="next" title="setq">
+<link href="let.html" rel="prev" title="let">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="progv">
+<div class="nav-panel">
+<p>
+Next: <a href="setq.html" accesskey="n" rel="next">setq                                                         [Special Form]</a>, Previous: <a href="let.html" accesskey="p" rel="prev">let, let*                                                [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="progv-_005bSpecial-Operator_005d"><span>5.3.19 progv                                                    [Special Operator]<a class="copiable-link" href="#progv-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">progv</code>  <i class="i"><i class="i">symbols</i> <i class="i">values</i> {<i class="i">form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-40"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-40"> &para;</a></span></h4>
+
+<p><i class="i">symbols</i>&mdash;a <i class="i">list</i> of <i class="i">symbols</i>; evaluated.
+</p>
+<p><i class="i">values</i>&mdash;a <i class="i">list</i> of <i class="i">objects</i>; evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-72"><span>Description::<a class="copiable-link" href="#Description_003a_003a-72"> &para;</a></span></h4>
+
+<p><b class="b">progv</b> creates new dynamic variable <i class="i">bindings</i> and
+executes each <i class="i">form</i> using those <i class="i">bindings</i>.
+Each <i class="i">form</i> is evaluated in  order.
+</p>
+<p><b class="b">progv</b> allows <i class="i">binding</i> one or more dynamic
+variables whose names may be determined at run time.  
+Each <i class="i">form</i> is evaluated in order 
+with the dynamic variables whose names are in 
+<i class="i">symbols</i> bound to corresponding <i class="i">values</i>.
+If too few <i class="i">values</i> 
+are supplied, the remaining <i class="i">symbols</i> are bound and then
+made to have no value. If too many <i class="i">values</i> are
+supplied, the excess values are ignored.
+The <i class="i">bindings</i> of the dynamic variables are undone on
+exit from <b class="b">progv</b>. 
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-46"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-46"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (setq *x* 1) &rArr;  1
+ (progv '(*x*) '(2) *x*) &rArr;  2
+ *x* &rArr;  1
+
+Assuming *x* is not globally special,
+
+ (let ((*x* 3)) 
+    (progv '(*x*) '(4) 
+      (list *x* (symbol-value '*x*)))) &rArr;  (3 4)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-57"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-57"> &para;</a></span></h4>
+
+<p><a class="ref" href="let.html">let, let*                                                [Special Operator]</a>
+, <a class="ref" href="Evaluation.html">Evaluation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-35"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-35"> &para;</a></span></h4>
+
+<p>Among other things, <b class="b">progv</b> is useful when writing 
+interpreters for languages embedded in <span class="r">Lisp</span>; it provides a handle
+on the mechanism for <i class="i">binding</i> <i class="i">dynamic variables</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="setq.html">setq                                                         [Special Form]</a>, Previous: <a href="let.html">let, let*                                                [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/provide.html
@@ -0,0 +1,145 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>provide (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="provide (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="provide (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="System-Construction-Dictionary.html" rel="up" title="System Construction Dictionary">
+<link href="_002amodules_002a.html" rel="prev" title="*modules*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="provide">
+<div class="nav-panel">
+<p>
+Previous: <a href="_002amodules_002a.html" accesskey="p" rel="prev">*modules*                                                        [Variable]</a>, Up: <a href="System-Construction-Dictionary.html" accesskey="u" rel="up">System Construction Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="provide_002c-require-_005bFunction_005d"><span>24.2.11 provide, require                                                 [Function]<a class="copiable-link" href="#provide_002c-require-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">provide</code>  <i class="i">module-name</i> &rArr;  <i class="i"><i class="i">implementation-dependent</i></i>
+</p>
+<p><code class="code">require</code>  <i class="i">module-name <span class="r">&amp;optional</span> pathname-list</i> &rArr;  <i class="i"><i class="i">implementation-dependent</i></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-486"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-486"> &para;</a></span></h4>
+
+<p><i class="i">module-name</i>&mdash;a <i class="i">string designator</i>.
+</p>
+<p><i class="i">pathname-list</i>&mdash;<b class="b">nil</b>, or
+			a <i class="i">designator</i> 
+			  for a <i class="i">non-empty</i> <i class="i">list</i> of <i class="i">pathname designators</i>.
+ The default is <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-648"><span>Description::<a class="copiable-link" href="#Description_003a_003a-648"> &para;</a></span></h4>
+
+<p><b class="b">provide</b> adds the <i class="i">module-name</i> to the <i class="i">list</i> held by
+<b class="b">*modules*</b>, if such a name is not already present.
+</p>
+<p><b class="b">require</b> tests for the presence of the <i class="i">module-name</i> in the
+<i class="i">list</i> held by <b class="b">*modules*</b>.
+If it is present, <b class="b">require</b> immediately returns.
+</p>
+<p>Otherwise, an attempt is made to load an appropriate set of <i class="i">files</i> as follows:
+The <i class="i">pathname-list</i> argument, if <i class="i">non-nil</i>, 
+ specifies a list of <i class="i">pathnames</i> to be loaded in order, from left to right.
+If the <i class="i">pathname-list</i> is <b class="b">nil</b>,
+an <i class="i">implementation-dependent</i> mechanism will be invoked in an attempt
+to load the module named <i class="i">module-name</i>;
+if no such module can be loaded, an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<p>Both functions use <b class="b">string=</b> to test for the presence of a <i class="i">module-name</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-460"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-460"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;;; This illustrates a nonportable use of REQUIRE, because it
+;;; depends on the implementation-dependent file-loading mechanism.
+
+(require &quot;CALCULUS&quot;)
+
+;;; This use of REQUIRE is nonportable because of the literal 
+;;; physical pathname.  
+
+(require &quot;CALCULUS&quot; &quot;/usr/lib/lisp/calculus&quot;)
+
+;;; One form of portable usage involves supplying a logical pathname,
+;;; with appropriate translations defined elsewhere.
+
+(require &quot;CALCULUS&quot; &quot;lib:calculus&quot;)
+
+;;; Another form of portable usage involves using a variable or
+;;; table lookup function to determine the pathname, which again
+;;; must be initialized elsewhere.
+
+(require &quot;CALCULUS&quot; *calculus-module-pathname*)
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-81"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-81"> &para;</a></span></h4>
+
+<p><b class="b">provide</b> modifies <b class="b">*modules*</b>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-118"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-118"> &para;</a></span></h4>
+
+<p>The specific action taken by <b class="b">require</b> is affected by calls to <b class="b">provide</b>
+(or, in general, any changes to the <i class="i">value</i> of <b class="b">*modules*</b>).
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-236"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-236"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">module-name</i> is not a <i class="i">string designator</i>.
+</p>
+<p>If <b class="b">require</b> fails to perform the requested operation 
+due to a problem while interacting with the <i class="i">file system</i>,
+an error of <i class="i">type</i> <b class="b">file-error</b> is signaled.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> might be signaled if any <i class="i">pathname</i> 
+in <i class="i">pathname-list</i> is a <i class="i">designator</i> for a <i class="i">wild</i> <i class="i">pathname</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-528"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-528"> &para;</a></span></h4>
+
+<p><b class="b">*modules*</b>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-324"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-324"> &para;</a></span></h4>
+
+<p>The functions <b class="b">provide</b> and <b class="b">require</b> are deprecated.
+</p>
+<p>If a module consists of a single <i class="i">package</i>,
+it is customary for the package and module names to be the same.
+</p>
+
+
+
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="_002amodules_002a.html">*modules*                                                        [Variable]</a>, Up: <a href="System-Construction-Dictionary.html">System Construction Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/psetq.html
@@ -0,0 +1,121 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>psetq (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="psetq (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="psetq (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="block.html" rel="next" title="block">
+<link href="setq.html" rel="prev" title="setq">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="psetq">
+<div class="nav-panel">
+<p>
+Next: <a href="block.html" accesskey="n" rel="next">block                                                    [Special Operator]</a>, Previous: <a href="setq.html" accesskey="p" rel="prev">setq                                                         [Special Form]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="psetq-_005bMacro_005d"><span>5.3.21 psetq                                                               [Macro]<a class="copiable-link" href="#psetq-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">psetq</code>  <i class="i">{!<i class="i">pair</i>}*</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<p><i class="i">pair</i>&nbsp;::=var&nbsp;form<!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Pronunciation_003a_003a-3"><span>Pronunciation::<a class="copiable-link" href="#Pronunciation_003a_003a-3"> &para;</a></span></h4>
+
+<p><b class="b">psetq</b>: pronounced
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-42"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-42"> &para;</a></span></h4>
+
+<p><i class="i">var</i>&mdash;a <i class="i">symbol</i> naming a <i class="i">variable</i> other than a <i class="i">constant variable</i>.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-74"><span>Description::<a class="copiable-link" href="#Description_003a_003a-74"> &para;</a></span></h4>
+
+<p>Assigns values to <i class="i">variables</i>.
+</p>
+<p>This is just like <b class="b">setq</b>, except that the assignments 
+happen &ldquo;in parallel.&rdquo;  That is, first all of the forms are
+evaluated, and only then are the variables set to the resulting values.
+In this way, the assignment to one variable does not affect the value
+computation of another in the way that would occur with <b class="b">setq</b>&rsquo;s 
+sequential assignment.
+</p>
+<p>If any <i class="i">var</i> refers to a <i class="i">binding</i> 
+made by <b class="b">symbol-macrolet</b>,
+then that <i class="i">var</i> is treated as if <b class="b">psetf</b> (not <b class="b">psetq</b>)
+had been used.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-48"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-48"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> ;; A simple use of PSETQ to establish values for variables.
+ ;; As a matter of style, many programmers would prefer SETQ 
+ ;; in a simple situation like this where parallel assignment
+ ;; is not needed, but the two have equivalent effect.
+ (psetq a 1 b 2 c 3) &rArr;  NIL
+ a &rArr;  1
+ b &rArr;  2
+ c &rArr;  3
+
+ ;; Use of PSETQ to update values by parallel assignment.
+ ;; The effect here is very different than if SETQ had been used.
+ (psetq a (1+ b) b (1+ a) c (+ a b)) &rArr;  NIL
+ a &rArr;  3
+ b &rArr;  2
+ c &rArr;  3
+
+ ;; Use of PSETQ on a symbol macro.
+ (let ((x (list 10 20 30)))
+   (symbol-macrolet ((y (car x)) (z (cadr x)))
+     (psetq y (1+ z) z (1+ y))
+     (list x y z)))
+&rArr;  ((21 11 30) 21 11)
+
+ ;; Use of parallel assignment to swap values of A and B.
+ (let ((a 1) (b 2))
+   (psetq a b  b a)
+   (values a b))
+&rArr;  2, 1
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-2"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-2"> &para;</a></span></h4>
+
+<p>The values of <i class="i">forms</i> are assigned to <i class="i">vars</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-59"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-59"> &para;</a></span></h4>
+
+<p><b class="b">psetf</b>,
+<a class="ref" href="setq.html">setq                                                         [Special Form]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="block.html">block                                                    [Special Operator]</a>, Previous: <a href="setq.html">setq                                                         [Special Form]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/push.html
@@ -0,0 +1,99 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>push (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="push (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="push (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="pop.html" rel="next" title="pop">
+<link href="make_002dlist.html" rel="prev" title="make-list">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="push">
+<div class="nav-panel">
+<p>
+Next: <a href="pop.html" accesskey="n" rel="next">pop                                                                 [Macro]</a>, Previous: <a href="make_002dlist.html" accesskey="p" rel="prev">make-list                                                        [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="push-_005bMacro_005d"><span>14.2.19 push                                                                [Macro]<a class="copiable-link" href="#push-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">push</code>  <i class="i">item place</i> &rArr;  <i class="i">new-place-value</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-288"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-288"> &para;</a></span></h4>
+
+<p><i class="i">item</i>&mdash;an <i class="i">object</i>. 
+</p>
+<p><i class="i">place</i>&mdash;a <i class="i">place</i>, the <i class="i">value</i> of which may be any <i class="i">object</i>.  
+</p>
+<p><i class="i">new-place-value</i>&mdash;a <i class="i">list</i> (the new <i class="i">value</i> of <i class="i">place</i>).
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-389"><span>Description::<a class="copiable-link" href="#Description_003a_003a-389"> &para;</a></span></h4>
+
+<p><b class="b">push</b> prepends <i class="i">item</i> to the <i class="i">list</i> that is stored
+in <i class="i">place</i>, stores the resulting <i class="i">list</i> in <i class="i">place</i>, 
+and returns the <i class="i">list</i>.
+</p>
+<p>For information about the <i class="i">evaluation</i> of <i class="i">subforms</i> of <i class="i">place</i>,
+see <a class="ref" href="Evaluation-of-Subforms-to-Places.html">Evaluation of Subforms to Places</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-272"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-272"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (setq llst '(nil)) &rArr;  (NIL)
+ (push 1 (car llst)) &rArr;  (1)
+ llst &rArr;  ((1))
+ (push 1 (car llst)) &rArr;  (1 1)
+ llst &rArr;  ((1 1))
+ (setq x '(a (b c) d)) &rArr;  (A (B C) D)
+ (push 5 (cadr x)) &rArr;  (5 B C)  
+ x &rArr;  (A (5 B C) D)
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-38"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-38"> &para;</a></span></h4>
+
+<p>The contents of <i class="i">place</i> are modified.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-315"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-315"> &para;</a></span></h4>
+
+<p><a class="ref" href="pop.html">pop                                                                 [Macro]</a>
+,
+<a class="ref" href="pushnew.html">pushnew                                                             [Macro]</a>
+,
+<a class="ref" href="Generalized-Reference.html">Generalized Reference</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-208"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-208"> &para;</a></span></h4>
+<p>The effect of <code class="t">(push <i class="i">item</i> <i class="i">place</i>)</code>
+is equivalent to
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setf place (cons <i class="i">item</i> <i class="i">place</i>))
+</pre></div>
+
+<p>except that the <i class="i">subforms</i> of <i class="i">place</i> 
+are evaluated only once, and <i class="i">item</i> is evaluated
+before <i class="i">place</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/pushnew.html
@@ -0,0 +1,147 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>pushnew (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="pushnew (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="pushnew (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="set_002ddifference.html" rel="next" title="set-difference">
+<link href="adjoin.html" rel="prev" title="adjoin">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="pushnew">
+<div class="nav-panel">
+<p>
+Next: <a href="set_002ddifference.html" accesskey="n" rel="next">set-difference, nset-difference                                  [Function]</a>, Previous: <a href="adjoin.html" accesskey="p" rel="prev">adjoin                                                           [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="pushnew-_005bMacro_005d"><span>14.2.45 pushnew                                                             [Macro]<a class="copiable-link" href="#pushnew-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">pushnew</code>  <i class="i">item place <span class="r">&amp;key</span> key test test-not</i><br>
+   &rArr;  <i class="i">new-place-value</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-314"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-314"> &para;</a></span></h4>
+
+<p><i class="i">item</i>&mdash;an <i class="i">object</i>.  
+</p>
+<p><i class="i">place</i>&mdash;a <i class="i">place</i>, the <i class="i">value</i> of which is a <i class="i">proper list</i>. 
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">new-place-value</i>&mdash;a <i class="i">list</i> (the new <i class="i">value</i> of <i class="i">place</i>).
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-415"><span>Description::<a class="copiable-link" href="#Description_003a_003a-415"> &para;</a></span></h4>
+
+<p><b class="b">pushnew</b> tests whether  <i class="i">item</i> is the same as any existing
+element of the <i class="i">list</i> stored in <i class="i">place</i>.  If <i class="i">item</i> is not,
+it is prepended to the <i class="i">list</i>, and the new <i class="i">list</i> is stored in
+<i class="i">place</i>.
+</p>
+<p><b class="b">pushnew</b> returns the new <i class="i">list</i> that is stored in <i class="i">place</i>.
+</p>
+<p>Whether or not <i class="i">item</i> is already a member of the <i class="i">list</i> that is
+in <i class="i">place</i> is determined by comparisons using <code class="t">:test</code> or <code class="t">:test-not</code>.
+The first argument to the <code class="t">:test</code> or <code class="t">:test-not</code>
+function is <i class="i">item</i>; the second argument is
+an element of the <i class="i">list</i> in <i class="i">place</i> as returned by
+the <code class="t">:key</code> function (if supplied).
+</p>
+<p>If <code class="t">:key</code> is supplied, it is used to extract the part to be tested from
+both <i class="i">item</i> and the <i class="i">list</i> element,
+as for <b class="b">adjoin</b>.
+</p>
+<p>The argument to the <code class="t">:key</code> function 
+is an element of the <i class="i">list</i> stored in 
+<i class="i">place</i>. The <code class="t">:key</code> function typically returns part
+part of the element of the <i class="i">list</i>.
+If <code class="t">:key</code> is not supplied or <b class="b">nil</b>, the <i class="i">list</i> 
+element is used.
+</p>
+<p>For information about the <i class="i">evaluation</i> of <i class="i">subforms</i> of <i class="i">place</i>,
+see <a class="ref" href="Evaluation-of-Subforms-to-Places.html">Evaluation of Subforms to Places</a>.
+</p>
+<p>It is <i class="i">implementation-dependent</i> whether or not <b class="b">pushnew</b> 
+actually executes the storing form for its <i class="i">place</i> in the
+situation where the <i class="i">item</i> is already a member of the <i class="i">list</i>
+held by <i class="i">place</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-298"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-298"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (setq x '(a (b c) d)) &rArr;  (A (B C) D)
+ (pushnew 5 (cadr x)) &rArr;  (5 B C)   
+ x &rArr;  (A (5 B C) D)
+ (pushnew 'b (cadr x)) &rArr;  (5 B C)  
+ x &rArr;  (A (5 B C) D)
+ (setq lst '((1) (1 2) (1 2 3))) &rArr;  ((1) (1 2) (1 2 3))
+ (pushnew '(2) lst) &rArr;  ((2) (1) (1 2) (1 2 3))
+ (pushnew '(1) lst) &rArr;  ((1) (2) (1) (1 2) (1 2 3))
+ (pushnew '(1) lst :test 'equal) &rArr;  ((1) (2) (1) (1 2) (1 2 3))
+ (pushnew '(1) lst :key #'car) &rArr;  ((1) (2) (1) (1 2) (1 2 3)) 
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-45"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-45"> &para;</a></span></h4>
+
+<p>The contents of <i class="i">place</i> may be modified.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-339"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-339"> &para;</a></span></h4>
+
+<p><a class="ref" href="push.html">push                                                                [Macro]</a>
+,
+<a class="ref" href="adjoin.html">adjoin                                                           [Function]</a>
+,
+<a class="ref" href="Generalized-Reference.html">Generalized Reference</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-225"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-225"> &para;</a></span></h4>
+
+<p>The effect of
+</p><div class="example">
+<pre class="example-preformatted"> (pushnew item place :test p)
+</pre></div>
+
+<p>is roughly equivalent to
+</p><div class="example">
+<pre class="example-preformatted"> (setf place (adjoin item place :test p))
+</pre></div>
+
+<p>except that the <i class="i">subforms</i> of <code class="t">place</code> are evaluated only once, 
+and <code class="t">item</code> is evaluated before <code class="t">place</code>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="set_002ddifference.html">set-difference, nset-difference                                  [Function]</a>, Previous: <a href="adjoin.html">adjoin                                                           [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/quote.html
@@ -0,0 +1,103 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>quote (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="quote (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="quote (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="compiler_002dmacro_002dfunction.html" rel="next" title="compiler-macro-function">
+<link href="load_002dtime_002dvalue.html" rel="prev" title="load-time-value">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="quote">
+<div class="nav-panel">
+<p>
+Next: <a href="compiler_002dmacro_002dfunction.html" accesskey="n" rel="next">compiler-macro-function                                          [Accessor]</a>, Previous: <a href="load_002dtime_002dvalue.html" accesskey="p" rel="prev">load-time-value                                          [Special Operator]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="quote-_005bSpecial-Operator_005d"><span>3.8.7 quote                                                    [Special Operator]<a class="copiable-link" href="#quote-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">quote</code>  <i class="i">object</i> &rArr;  <i class="i">object</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-5"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-5"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>; not evaluated.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-6"><span>Description::<a class="copiable-link" href="#Description_003a_003a-6"> &para;</a></span></h4>
+
+<p>The <b class="b">quote</b> <i class="i">special operator</i> just returns <i class="i">object</i>.
+</p>
+<p>The consequences are undefined if <i class="i">literal objects</i> (including
+<i class="i">quoted objects</i>) are destructively modified.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-5"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-5"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq a 1) &rArr;  1
+ (quote (setq a 3)) &rArr;  (SETQ A 3)
+ a &rArr;  1
+ 'a &rArr;  A
+ ''a &rArr;  (QUOTE A) 
+ '''a &rArr;  (QUOTE (QUOTE A))
+ (setq a 43) &rArr;  43
+ (list a (cons a 3)) &rArr;  (43 (43 . 3))
+ (list (quote a) (quote (cons a 3))) &rArr;  (A (CONS A 3)) 
+ 1 &rArr;  1
+ '1 &rArr;  1
+ &quot;foo&quot; &rArr;  &quot;foo&quot;
+ '&quot;foo&quot; &rArr;  &quot;foo&quot;
+ (car '(a b)) &rArr;  A
+ '(car '(a b)) &rArr;  (CAR (QUOTE (A B)))
+ #(car '(a b)) &rArr;  #(CAR (QUOTE (A B)))
+ '#(car '(a b)) &rArr;  #(CAR (QUOTE (A B)))
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-6"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-6"> &para;</a></span></h4>
+
+<p><a class="ref" href="Evaluation.html">Evaluation</a>,
+<a class="ref" href="Single_002dQuote.html">Single-Quote</a>,
+</p>
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-5"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-5"> &para;</a></span></h4>
+
+<p>The textual notation <code class="t">'<i class="i">object</i></code> is equivalent to <code class="t">(quote <i class="i">object</i>)</code>;
+see <a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>.
+</p>
+<p>Some <i class="i">objects</i>, called <i class="i">self-evaluating objects</i>, 
+do not require quotation by <b class="b">quote</b>.  
+However, <i class="i">symbols</i> and <i class="i">lists</i> are used to represent parts of programs,
+and so would not be useable as constant data in a program without <b class="b">quote</b>.
+Since <b class="b">quote</b> suppresses the <i class="i">evaluation</i> of these <i class="i">objects</i>,
+they become data rather than program.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="compiler_002dmacro_002dfunction.html">compiler-macro-function                                          [Accessor]</a>, Previous: <a href="load_002dtime_002dvalue.html">load-time-value                                          [Special Operator]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/random.html
@@ -0,0 +1,99 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>random (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="random (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="random (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="random_002dstate_002dp.html" rel="next" title="random-state-p">
+<link href="make_002drandom_002dstate.html" rel="prev" title="make-random-state">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="random">
+<div class="nav-panel">
+<p>
+Next: <a href="random_002dstate_002dp.html" accesskey="n" rel="next">random-state-p                                                   [Function]</a>, Previous: <a href="make_002drandom_002dstate.html" accesskey="p" rel="prev">make-random-state                                                [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="random-_005bFunction_005d"><span>12.2.41 random                                                           [Function]<a class="copiable-link" href="#random-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">random</code>  <i class="i">limit <span class="r">&amp;optional</span> random-state</i> &rArr;  <i class="i">random-number</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-225"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-225"> &para;</a></span></h4>
+
+<p><i class="i">limit</i>&mdash;a positive <i class="i">integer</i>,
+	     or a positive <i class="i">float</i>.
+</p>
+<p><i class="i">random-state</i>&mdash;a <i class="i">random state</i>.
+ The default is the <i class="i">current random state</i>.
+</p>
+<p><i class="i">random-number</i>&mdash;a non-negative <i class="i">number</i>
+			less than <i class="i">limit</i> 
+		    and of the same <i class="i">type</i> as <i class="i">limit</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-306"><span>Description::<a class="copiable-link" href="#Description_003a_003a-306"> &para;</a></span></h4>
+
+<p>Returns a pseudo-random number that is a non-negative <i class="i">number</i>
+less than <i class="i">limit</i> and of the same <i class="i">type</i> as <i class="i">limit</i>.
+</p>
+<p>The <i class="i">random-state</i>, which is modified by this function,
+encodes the internal state maintained by the random number generator.
+</p>
+<p>An approximately uniform choice distribution is used.  If <i class="i">limit</i>
+is an <i class="i">integer</i>, each of the possible results occurs with
+(approximate) probability 1/<i class="i">limit</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-209"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-209"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (&lt;= 0 (random 1000) 1000) &rArr;  <i class="i">true</i>
+ (let ((state1 (make-random-state))
+       (state2 (make-random-state)))
+   (= (random 1000 state1) (random 1000 state2))) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-34"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-34"> &para;</a></span></h4>
+
+<p>The <i class="i">random-state</i> is modified.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-94"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-94"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">limit</i> is not a positive <i class="i">integer</i> or a positive <i class="i">real</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-259"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-259"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002drandom_002dstate.html">make-random-state                                                [Function]</a>
+, 
+<a class="ref" href="random_002dstate.html">random-state                                                 [System Class]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-156"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-156"> &para;</a></span></h4>
+
+<p>See <i class="i">Common Lisp: The Language</i> for information about generating random numbers.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/random_002dstate.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>random-state (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="random-state (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="random-state (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="make_002drandom_002dstate.html" rel="next" title="make-random-state">
+<link href="sqrt.html" rel="prev" title="sqrt">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="random_002dstate">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002drandom_002dstate.html" accesskey="n" rel="next">make-random-state                                                [Function]</a>, Previous: <a href="sqrt.html" accesskey="p" rel="prev">sqrt, isqrt                                                      [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="random_002dstate-_005bSystem-Class_005d"><span>12.2.39 random-state                                                 [System Class]<a class="copiable-link" href="#random_002dstate-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-42"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-42"> &para;</a></span></h4>
+<p><b class="b">random-state</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-304"><span>Description::<a class="copiable-link" href="#Description_003a_003a-304"> &para;</a></span></h4>
+
+<p>A <i class="i">random state</i> <i class="i">object</i> contains state
+information used by the pseudo-random number generator.
+The nature of a <i class="i">random state</i> <i class="i">object</i> is <i class="i">implementation-dependent</i>.
+It can be printed out and successfully read back in by the same <i class="i">implementation</i>,
+but might not function correctly as a <i class="i">random state</i> in another <i class="i">implementation</i>.
+</p>
+<p><i class="i">Implementations</i> are required to provide a read syntax for
+<i class="i">objects</i> of <i class="i">type</i> <b class="b">random-state</b>, but the specific nature of that syntax 
+is <i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-257"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-257"> &para;</a></span></h4>
+
+<p><a class="ref" href="#random_002dstate">random-state                                                 [System Class]</a>
+,
+<a class="ref" href="random.html">random                                                           [Function]</a>
+,
+<a class="ref" href="Printing-Random-States.html">Printing Random States</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/random_002dstate_002dp.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>random-state-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="random-state-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="random-state-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="_002arandom_002dstate_002a.html" rel="next" title="*random-state*">
+<link href="random.html" rel="prev" title="random">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="random_002dstate_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="_002arandom_002dstate_002a.html" accesskey="n" rel="next">*random-state*                                                   [Variable]</a>, Previous: <a href="random.html" accesskey="p" rel="prev">random                                                           [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="random_002dstate_002dp-_005bFunction_005d"><span>12.2.42 random-state-p                                                   [Function]<a class="copiable-link" href="#random_002dstate_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">random-state-p</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-226"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-226"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-307"><span>Description::<a class="copiable-link" href="#Description_003a_003a-307"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">random-state</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-210"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-210"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (random-state-p *random-state*) &rArr;  <i class="i">true</i>
+ (random-state-p (make-random-state)) &rArr;  <i class="i">true</i>
+ (random-state-p 'test-function) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-260"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-260"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002drandom_002dstate.html">make-random-state                                                [Function]</a>
+, 
+<a class="ref" href="random_002dstate.html">random-state                                                 [System Class]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-157"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-157"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (random-state-p <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'random-state)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/rassoc.html
@@ -0,0 +1,135 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>rassoc (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="rassoc (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="rassoc (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="get_002dproperties.html" rel="next" title="get-properties">
+<link href="pairlis.html" rel="prev" title="pairlis">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="rassoc">
+<div class="nav-panel">
+<p>
+Next: <a href="get_002dproperties.html" accesskey="n" rel="next">get-properties                                                   [Function]</a>, Previous: <a href="pairlis.html" accesskey="p" rel="prev">pairlis                                                          [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="rassoc_002c-rassoc_002dif_002c-rassoc_002dif_002dnot-_005bFunction_005d"><span>14.2.39 rassoc, rassoc-if, rassoc-if-not                                 [Function]<a class="copiable-link" href="#rassoc_002c-rassoc_002dif_002c-rassoc_002dif_002dnot-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">rassoc</code>  <i class="i">item      alist  <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">entry</i>
+</p>
+<p><code class="code">rassoc-if</code>  <i class="i">predicate alist <span class="r">&amp;key</span> key</i> &rArr;  <i class="i">entry</i>
+</p>
+<p><code class="code">rassoc-if-not</code>  <i class="i">predicate alist <span class="r">&amp;key</span> key</i> &rArr;  <i class="i">entry</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-308"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-308"> &para;</a></span></h4>
+
+<p><i class="i">item</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">alist</i>&mdash;an <i class="i">association list</i>.
+</p>
+<p><i class="i">predicate</i>&mdash;a <i class="i">designator</i> for
+		    a <i class="i">function</i> of one <i class="i">argument</i>
+		    that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">entry</i>&mdash;a <i class="i">cons</i> that is an <i class="i">element</i> of the <i class="i">alist</i>,
+		or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-409"><span>Description::<a class="copiable-link" href="#Description_003a_003a-409"> &para;</a></span></h4>
+
+<p><b class="b">rassoc</b>, <b class="b">rassoc-if</b>, and <b class="b">rassoc-if-not</b>
+return the first <i class="i">cons</i> whose <i class="i">cdr</i> 
+<i class="i">satisfies the test</i>.
+If no such <i class="i">cons</i> is found, <b class="b">nil</b>
+is returned.
+</p>
+<p>If <b class="b">nil</b> appears in <i class="i">alist</i> in place of a pair, it is  ignored.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-292"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-292"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq alist '((1 . &quot;one&quot;) (2 . &quot;two&quot;) (3 . 3))) 
+&rArr;  ((1 . &quot;one&quot;) (2 . &quot;two&quot;) (3 . 3))
+ (rassoc 3 alist) &rArr;  (3 . 3)
+ (rassoc &quot;two&quot; alist) &rArr;  NIL
+ (rassoc &quot;two&quot; alist :test 'equal) &rArr;  (2 . &quot;two&quot;)
+ (rassoc 1 alist :key #'(lambda (x) (if (numberp x) (/ x 3)))) &rArr;  (3 . 3)
+ (rassoc 'a '((a . b) (b . c) (c . a) (z . a))) &rArr;  (C . A)
+ (rassoc-if #'stringp alist) &rArr;  (1 . &quot;one&quot;)
+ (rassoc-if-not #'vectorp alist) &rArr;  (3 . 3)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-333"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-333"> &para;</a></span></h4>
+
+<p><a class="ref" href="assoc.html">assoc, assoc-if, assoc-if-not                                    [Function]</a>
+,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-221"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-221"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> parameter is deprecated.
+</p>
+<p>The <i class="i">function</i> <b class="b">rassoc-if-not</b> is deprecated.
+</p>
+<p>It is possible to <b class="b">rplaca</b> the result of <b class="b">rassoc</b>, 
+provided that it is not <b class="b">nil</b>, in order to &ldquo;update&rdquo; <i class="i">alist</i>. 
+</p>
+<p>The expressions
+</p>
+<div class="example">
+<pre class="example-preformatted"> (rassoc item list :test fn)
+</pre></div>
+
+<p>and
+</p>
+<div class="example">
+<pre class="example-preformatted"> (find item list :test fn :key #'cdr)
+</pre></div>
+
+<p>are equivalent in meaning, except when the <code class="t">item</code> is <b class="b">nil</b>
+and <b class="b">nil</b> appears in place of a pair in the <i class="i">alist</i>.
+See the <i class="i">function</i> <b class="b">assoc</b>. 
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="get_002dproperties.html">get-properties                                                   [Function]</a>, Previous: <a href="pairlis.html">pairlis                                                          [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/ratio.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>ratio (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="ratio (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="ratio (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="integer.html" rel="next" title="integer">
+<link href="rational-_0028System-Class_0029.html" rel="prev" title="rational (System Class)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="ratio">
+<div class="nav-panel">
+<p>
+Next: <a href="integer.html" accesskey="n" rel="next">integer                                                      [System Class]</a>, Previous: <a href="rational-_0028System-Class_0029.html" accesskey="p" rel="prev">rational                                                     [System Class]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="ratio-_005bSystem-Class_005d"><span>12.2.7 ratio                                                        [System Class]<a class="copiable-link" href="#ratio-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-40"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-40"> &para;</a></span></h4>
+<p><b class="b">ratio</b>,
+<b class="b">rational</b>,
+</p>
+<p><b class="b">real</b>,
+</p>
+<p><b class="b">number</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-273"><span>Description::<a class="copiable-link" href="#Description_003a_003a-273"> &para;</a></span></h4>
+
+<p>A <i class="i">ratio</i> is a <i class="i">number</i> 
+representing the mathematical ratio of two non-zero integers,
+the numerator and denominator,
+whose greatest common divisor is one,
+and of which the denominator is positive and greater than one.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-238"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-238"> &para;</a></span></h4>
+
+<p><i class="i">Figure~2&ndash;9</i>,
+<a class="ref" href="Constructing-Numbers-from-Tokens.html">Constructing Numbers from Tokens</a>,
+<a class="ref" href="Printing-Ratios.html">Printing Ratios</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/rational-_0028Function_0029.html
@@ -0,0 +1,119 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>rational (Function) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="rational (Function) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="rational (Function) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="rationalp.html" rel="next" title="rationalp">
+<link href="numerator.html" rel="prev" title="numerator">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="rational-_0028Function_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="rationalp.html" accesskey="n" rel="next">rationalp                                                        [Function]</a>, Previous: <a href="numerator.html" accesskey="p" rel="prev">numerator, denominator                                           [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="rational_002c-rationalize-_005bFunction_005d"><span>12.2.54 rational, rationalize                                            [Function]<a class="copiable-link" href="#rational_002c-rationalize-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">rational</code>  <i class="i">number</i> &rArr;  <i class="i">rational</i>
+</p>
+<p><code class="code">rationalize</code>  <i class="i">number</i> &rArr;  <i class="i">rational</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-237"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-237"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a <i class="i">real</i>.
+</p>
+<p><i class="i">rational</i>&mdash;a <i class="i">rational</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-319"><span>Description::<a class="copiable-link" href="#Description_003a_003a-319"> &para;</a></span></h4>
+
+<p><b class="b">rational</b> and <b class="b">rationalize</b> convert 
+</p>
+<p><i class="i">reals</i>
+</p>
+<p>to <i class="i">rationals</i>.
+</p>
+<p>If <i class="i">number</i> is already <i class="i">rational</i>, it is returned.
+</p>
+<p>If <i class="i">number</i> is a <i class="i">float</i>, 
+<b class="b">rational</b> returns a <i class="i">rational</i> 
+that is mathematically equal in value to the <i class="i">float</i>. 
+<b class="b">rationalize</b> returns a <i class="i">rational</i> that
+approximates the <i class="i">float</i> to the accuracy of 
+the underlying floating-point representation. 
+</p>
+<p><b class="b">rational</b> assumes that the <i class="i">float</i> is completely accurate.
+</p>
+<p><b class="b">rationalize</b> assumes that the
+<i class="i">float</i> is accurate only to the precision of the
+floating-point representation.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-221"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-221"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (rational 0) &rArr;  0
+ (rationalize -11/100) &rArr;  -11/100
+ (rational .1) &rArr;  13421773/134217728 ;implementation-dependent
+ (rationalize .1) &rArr;  1/10
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-57"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-57"> &para;</a></span></h4>
+
+<p>The <i class="i">implementation</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-97"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-97"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">number</i> is not a <i class="i">real</i>.
+Might signal <b class="b">arithmetic-error</b>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-166"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-166"> &para;</a></span></h4>
+
+<p>It is always the case that
+</p>
+<div class="example">
+<pre class="example-preformatted"> (float (rational x) x) &equiv; x
+</pre></div>
+
+<p>and
+</p>
+<div class="example">
+<pre class="example-preformatted"> (float (rationalize x) x) &equiv; x
+</pre></div>
+
+<p>That is, rationalizing a <i class="i">float</i> by either method
+and then converting it back
+to a <i class="i">float</i> 
+of the same format produces the original <i class="i">number</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="rationalp.html">rationalp                                                        [Function]</a>, Previous: <a href="numerator.html">numerator, denominator                                           [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/rational-_0028System-Class_0029.html
@@ -0,0 +1,80 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>rational (System Class) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="rational (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="rational (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="ratio.html" rel="next" title="ratio">
+<link href="short_002dfloat.html" rel="prev" title="short-float">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="rational-_0028System-Class_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="ratio.html" accesskey="n" rel="next">ratio                                                        [System Class]</a>, Previous: <a href="short_002dfloat.html" accesskey="p" rel="prev">short-float, single-float, double-float, long-float                  [Type]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="rational-_005bSystem-Class_005d"><span>12.2.6 rational                                                     [System Class]<a class="copiable-link" href="#rational-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-39"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-39"> &para;</a></span></h4>
+<p><b class="b">rational</b>,
+</p>
+<p><b class="b">real</b>,
+</p>
+<p><b class="b">number</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-272"><span>Description::<a class="copiable-link" href="#Description_003a_003a-272"> &para;</a></span></h4>
+
+<p>The canonical representation of a <i class="i">rational</i> 
+is as an <i class="i">integer</i> if its value is integral,
+and otherwise as a <i class="i">ratio</i>.
+</p>
+<p>The <i class="i">types</i> <b class="b">integer</b> and <b class="b">ratio</b> 
+are <i class="i">disjoint</i> <i class="i">subtypes</i> of <i class="i">type</i> <b class="b">rational</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-12"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-12"> &para;</a></span></h4>
+
+<p>Abbreviating.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-12"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-12"> &para;</a></span></h4>
+
+<p>(<code class="code">rational</code>{<i class="i"><code class="t">[</code>lower-limit <span class="r">[</span>upper-limit<span class="r">]</span><code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-12"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-12"> &para;</a></span></h4>
+
+<p><i class="i">lower-limit</i>, <i class="i">upper-limit</i>&mdash;<i class="i">interval designators</i> 
+					   for <i class="i">type</i> <b class="b">rational</b>.
+ The defaults for each of <i class="i">lower-limit</i> and <i class="i">upper-limit</i> is the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-12"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-12"> &para;</a></span></h4>
+
+<p>This denotes the <i class="i">rationals</i> on the interval described by
+<i class="i">lower-limit</i> and <i class="i">upper-limit</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/rationalp.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>rationalp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="rationalp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="rationalp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="ash.html" rel="next" title="ash">
+<link href="rational-_0028Function_0029.html" rel="prev" title="rational (Function)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="rationalp">
+<div class="nav-panel">
+<p>
+Next: <a href="ash.html" accesskey="n" rel="next">ash                                                              [Function]</a>, Previous: <a href="rational-_0028Function_0029.html" accesskey="p" rel="prev">rational, rationalize                                            [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="rationalp-_005bFunction_005d"><span>12.2.55 rationalp                                                        [Function]<a class="copiable-link" href="#rationalp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">rationalp</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-238"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-238"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-320"><span>Description::<a class="copiable-link" href="#Description_003a_003a-320"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">rational</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-222"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-222"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (rationalp 12) &rArr;  <i class="i">true</i>
+ (rationalp 6/5) &rArr;  <i class="i">true</i>
+ (rationalp 1.212) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-269"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-269"> &para;</a></span></h4>
+
+<p><a class="ref" href="rational-_0028Function_0029.html">rational, rationalize                                            [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-167"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-167"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (rationalp <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'rational)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/read.html
@@ -0,0 +1,217 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>read (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="read (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="read (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="read_002ddelimited_002dlist.html" rel="next" title="read-delimited-list">
+<link href="make_002ddispatch_002dmacro_002dcharacter.html" rel="prev" title="make-dispatch-macro-character">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="read">
+<div class="nav-panel">
+<p>
+Next: <a href="read_002ddelimited_002dlist.html" accesskey="n" rel="next">read-delimited-list                                              [Function]</a>, Previous: <a href="make_002ddispatch_002dmacro_002dcharacter.html" accesskey="p" rel="prev">make-dispatch-macro-character                                    [Function]</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="read_002c-read_002dpreserving_002dwhitespace-_005bFunction_005d"><span>23.2.4 read, read-preserving-whitespace                                 [Function]<a class="copiable-link" href="#read_002c-read_002dpreserving_002dwhitespace-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">read</code>  <i class="i"><span class="r">&amp;optional</span> input-stream eof-error-p eof-value recursive-p</i> &rArr;  <i class="i">object</i>
+</p>
+<p><code class="code">read-preserving-whitespace</code>  <i class="i"><span class="r">&amp;optional</span> input-stream eof-error-p
+		               eof-value recursive-p</i><br>
+   &rArr;  <i class="i">object</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-473"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-473"> &para;</a></span></h4>
+
+<p><i class="i">input-stream</i>&mdash;an <i class="i">input</i> <i class="i">stream designator</i>.
+</p>
+<p><i class="i">eof-error-p</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">true</i>.
+</p>
+<p><i class="i">eof-value</i>&mdash;an <i class="i">object</i>.
+</p>
+<p>The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">recursive-p</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">false</i>.
+</p>
+<p><i class="i">object</i>&mdash;an <i class="i">object</i> (parsed by the <i class="i">Lisp reader</i>)
+		 or the <i class="i">eof-value</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-623"><span>Description::<a class="copiable-link" href="#Description_003a_003a-623"> &para;</a></span></h4>
+
+<p><b class="b">read</b> parses the printed representation of an <i class="i">object</i>
+from <i class="i">input-stream</i> and builds such an <i class="i">object</i>.
+</p>
+<p><b class="b">read-preserving-whitespace</b> is like <b class="b">read</b> but preserves
+any <i class="i">whitespace</i>_2 <i class="i">character</i>
+that delimits the printed representation of the <i class="i">object</i>.
+<b class="b">read-preserving-whitespace</b> is exactly like <b class="b">read</b>
+when the <i class="i">recursive-p</i> <i class="i">argument</i> to <b class="b">read-preserving-whitespace</b>
+is <i class="i">true</i>.
+</p>
+<p>When <b class="b">*read-suppress*</b> is <i class="i">false</i>,
+<b class="b">read</b> throws away the delimiting <i class="i">character</i> required by
+certain printed representations if it is a
+<i class="i">whitespace</i>_2 <i class="i">character</i>;
+but <b class="b">read</b> preserves the character 
+(using <b class="b">unread-char</b>) if it is
+syntactically meaningful, because it could be the start of the next expression.
+</p>
+<p>If a file ends in a <i class="i">symbol</i> or a <i class="i">number</i>
+immediately followed by an <i class="i">end of file</i>_1,
+<b class="b">read</b> reads the <i class="i">symbol</i> or <i class="i">number</i> successfully;
+when called again, it sees the <i class="i">end of file</i>_1 and
+only then acts according to <i class="i">eof-error-p</i>.
+If a file contains ignorable text at the end, such
+as blank lines and comments, <b class="b">read</b> 
+does not consider it to end in the
+middle of an <i class="i">object</i>.
+</p>
+<p>If <i class="i">recursive-p</i> is <i class="i">true</i>, the call to <b class="b">read</b> is 
+expected to be made
+from within some function that itself
+has been called from <b class="b">read</b> or from a similar input function, rather
+than from the top level.  
+</p>
+<p>Both functions return the <i class="i">object</i> read from <i class="i">input-stream</i>.
+<i class="i">Eof-value</i> is returned if <i class="i">eof-error-p</i> is <i class="i">false</i> and end of file
+is reached before the beginning of an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-444"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-444"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (read)
+<code class="t"> |&gt; </code> <b class="b">|&gt;&gt;</b><code class="t">'a</code><b class="b">&lt;&lt;|</b>
+&rArr;  (QUOTE A)
+ (with-input-from-string (is &quot; &quot;) (read is nil 'the-end)) &rArr;  THE-END
+ (defun skip-then-read-char (s c n)
+    (if (char= c #\{) (read s t nil t) (read-preserving-whitespace s))
+    (read-char-no-hang s)) &rArr;  SKIP-THEN-READ-CHAR
+ (let ((*readtable* (copy-readtable nil)))
+    (set-dispatch-macro-character #\# #\{ #'skip-then-read-char)
+    (set-dispatch-macro-character #\# #\} #'skip-then-read-char)
+    (with-input-from-string (is &quot;#{123 x #}123 y&quot;)
+      (format t &quot;~S ~S&quot; (read is) (read is)))) &rArr;  #\x, #\Space, NIL
+</pre></div>
+
+<p>As an example, consider this <i class="i">reader macro</i> definition:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun slash-reader (stream char)
+   (declare (ignore char))
+   `(path . ,(loop for dir = (read-preserving-whitespace stream t nil t)
+                   then (progn (read-char stream t nil t)
+                               (read-preserving-whitespace stream t nil t))
+                   collect dir
+                   while (eql (peek-char nil stream nil nil t) #\/))))
+ (set-macro-character #\/ #'slash-reader)
+</pre></div>
+
+<p>Consider now calling <b class="b">read</b> on this expression:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (zyedh /usr/games/zork /usr/games/boggle)
+</pre></div>
+
+<p>The <code class="t">/</code> macro reads objects separated by more <code class="t">/</code> characters;
+thus <code class="t">/usr/games/zork</code> is intended to read as <code class="t">(path usr games zork)</code>.
+The entire example expression should therefore be read as
+</p>
+<div class="example">
+<pre class="example-preformatted"> (zyedh (path usr games zork) (path usr games boggle))
+</pre></div>
+
+<p>However, if <b class="b">read</b> had been used instead of
+<b class="b">read-preserving-whitespace</b>, then after the reading of the symbol
+<code class="t">zork</code>, the following space would be discarded; the next call
+to <b class="b">peek-char</b> would see the following <code class="t">/</code>, and the loop would
+continue, producing this interpretation:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (zyedh (path usr games zork usr games boggle))
+</pre></div>
+
+<p>There are times when <i class="i">whitespace</i>_2 should be discarded.
+If a command interpreter takes single-character commands,
+but occasionally reads an <i class="i">object</i> then if the <i class="i">whitespace</i>_2
+after a <i class="i">symbol</i> 
+is not discarded it might be interpreted as a command
+some time later after the <i class="i">symbol</i> had been read.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-108"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-108"> &para;</a></span></h4>
+
+<p><b class="b">*standard-input*</b>,
+<b class="b">*terminal-io*</b>,
+<b class="b">*readtable*</b>,
+<b class="b">*read-default-float-format*</b>,
+<b class="b">*read-base*</b>,
+<b class="b">*read-suppress*</b>,
+<b class="b">*package*</b>,
+<b class="b">*read-eval*</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-229"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-229"> &para;</a></span></h4>
+
+<p><b class="b">read</b> signals an error of <i class="i">type</i> <b class="b">end-of-file</b>, 
+regardless of <i class="i">eof-error-p</i>, if
+the file ends in the middle of an <i class="i">object</i> representation.
+For example, if a file does
+not contain enough right parentheses to balance the left parentheses in
+it, <b class="b">read</b> signals an error.
+This is detected when <b class="b">read</b> or <b class="b">read-preserving-whitespace</b>
+is called with <i class="i">recursive-p</i> and <i class="i">eof-error-p</i> <i class="i">non-nil</i>, 
+and end-of-file is reached before the beginning of an <i class="i">object</i>.
+</p>
+<p>If <i class="i">eof-error-p</i> is <i class="i">true</i>, an error of <i class="i">type</i> <b class="b">end-of-file</b>
+is signaled at the end of file.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-506"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-506"> &para;</a></span></h4>
+
+<p><a class="ref" href="peek_002dchar.html">peek-char                                                        [Function]</a>
+,
+<a class="ref" href="read_002dchar.html">read-char                                                        [Function]</a>
+,
+<a class="ref" href="unread_002dchar.html">unread-char                                                      [Function]</a>
+,
+<a class="ref" href="read_002dfrom_002dstring.html">read-from-string                                                 [Function]</a>
+,
+<a class="ref" href="read_002ddelimited_002dlist.html">read-delimited-list                                              [Function]</a>
+, 
+<a class="ref" href="parse_002dinteger.html">parse-integer                                                    [Function]</a>
+, 
+<a class="ref" href="Syntax.html">Syntax</a>,
+<a class="ref" href="Reader-Concepts.html">Reader Concepts</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="read_002ddelimited_002dlist.html">read-delimited-list                                              [Function]</a>, Previous: <a href="make_002ddispatch_002dmacro_002dcharacter.html">make-dispatch-macro-character                                    [Function]</a>, Up: <a href="Reader-Dictionary.html">Reader Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/read_002dbyte.html
@@ -0,0 +1,104 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>read-byte (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="read-byte (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="read-byte (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="write_002dbyte.html" rel="next" title="write-byte">
+<link href="streamp.html" rel="prev" title="streamp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="read_002dbyte">
+<div class="nav-panel">
+<p>
+Next: <a href="write_002dbyte.html" accesskey="n" rel="next">write-byte                                                       [Function]</a>, Previous: <a href="streamp.html" accesskey="p" rel="prev">streamp                                                          [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="read_002dbyte-_005bFunction_005d"><span>21.2.14 read-byte                                                        [Function]<a class="copiable-link" href="#read_002dbyte-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">read-byte</code>  <i class="i">stream <span class="r">&amp;optional</span> eof-error-p eof-value</i> &rArr;  <i class="i">byte</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-417"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-417"> &para;</a></span></h4>
+
+<p><i class="i">stream</i>&mdash;a <i class="i">binary</i> <i class="i">input</i> <i class="i">stream</i>.
+</p>
+<p><i class="i">eof-error-p</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">true</i>.
+</p>
+<p><i class="i">eof-value</i>&mdash;an <i class="i">object</i>.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">byte</i>&mdash;an <i class="i">integer</i>,
+ or the <i class="i">eof-value</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-545"><span>Description::<a class="copiable-link" href="#Description_003a_003a-545"> &para;</a></span></h4>
+
+<p><b class="b">read-byte</b> reads and returns one byte from <i class="i">stream</i>.
+</p>
+<p>If an <i class="i">end of file</i>_2 occurs and <i class="i">eof-error-p</i> is <i class="i">false</i>, 
+the <i class="i">eof-value</i> is returned.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-392"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-392"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (with-open-file (s &quot;temp-bytes&quot; 
+                     :direction :output
+                     :element-type 'unsigned-byte)
+    (write-byte 101 s)) &rArr;  101
+ (with-open-file (s &quot;temp-bytes&quot; :element-type 'unsigned-byte)
+    (format t &quot;~S ~S&quot; (read-byte s) (read-byte s nil 'eof)))
+<code class="t"> |&gt; </code> 101 EOF
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-60"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-60"> &para;</a></span></h4>
+
+<p>Modifies <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-196"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-196"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">stream</i> is not a <i class="i">stream</i>.
+</p>
+<p>Should signal an error of <i class="i">type</i> <b class="b">error</b> 
+if <i class="i">stream</i> is not  a <i class="i">binary</i> <i class="i">input</i> <i class="i">stream</i>.
+</p>
+<p>If there are no <i class="i">bytes</i> remaining in the <i class="i">stream</i> 
+and <i class="i">eof-error-p</i> is <i class="i">true</i>, an error of <i class="i">type</i> <b class="b">end-of-file</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-444"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-444"> &para;</a></span></h4>
+
+<p><a class="ref" href="read_002dchar.html">read-char                                                        [Function]</a>
+,
+</p>
+<p><a class="ref" href="read_002dsequence.html">read-sequence                                                    [Function]</a>
+,
+</p>
+<p><a class="ref" href="write_002dbyte.html">write-byte                                                       [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/read_002dchar.html
@@ -0,0 +1,124 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>read-char (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="read-char (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="read-char (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="read_002dchar_002dno_002dhang.html" rel="next" title="read-char-no-hang">
+<link href="peek_002dchar.html" rel="prev" title="peek-char">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="read_002dchar">
+<div class="nav-panel">
+<p>
+Next: <a href="read_002dchar_002dno_002dhang.html" accesskey="n" rel="next">read-char-no-hang                                                [Function]</a>, Previous: <a href="peek_002dchar.html" accesskey="p" rel="prev">peek-char                                                        [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="read_002dchar-_005bFunction_005d"><span>21.2.17 read-char                                                        [Function]<a class="copiable-link" href="#read_002dchar-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">read-char</code>  <i class="i"><span class="r">&amp;optional</span> input-stream eof-error-p eof-value recursive-p</i> &rArr;  <i class="i">char</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-420"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-420"> &para;</a></span></h4>
+
+<p><i class="i">input-stream</i>&mdash;an <i class="i">input</i> <i class="i">stream designator</i>.
+ The default is <i class="i">standard input</i>.
+</p>
+<p><i class="i">eof-error-p</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">true</i>.
+</p>
+<p><i class="i">eof-value</i>&mdash;an <i class="i">object</i>.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">recursive-p</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">false</i>.
+</p>
+<p><i class="i">char</i>&mdash;a <i class="i">character</i> or the <i class="i">eof-value</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-548"><span>Description::<a class="copiable-link" href="#Description_003a_003a-548"> &para;</a></span></h4>
+
+<p><b class="b">read-char</b> returns the next <i class="i">character</i> from <i class="i">input-stream</i>.
+</p>
+<p>When <i class="i">input-stream</i> is an <i class="i">echo stream</i>,
+the character is echoed on <i class="i">input-stream</i> the first time the character is 
+seen.
+  Characters that are not echoed by <b class="b">read-char</b> 
+are those that were
+  put there by <b class="b">unread-char</b> 
+and hence are assumed to have been echoed
+  already by a previous call to <b class="b">read-char</b>.
+</p>
+<p>If <i class="i">recursive-p</i> is <i class="i">true</i>,
+this call is expected to be embedded in a higher-level call to <b class="b">read</b> 
+or a similar <i class="i">function</i> used by the <i class="i">Lisp reader</i>.
+</p>
+<p>If an <i class="i">end of file</i>_2 occurs and <i class="i">eof-error-p</i> is <i class="i">false</i>, 
+<i class="i">eof-value</i> is returned.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-395"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-395"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (with-input-from-string (is &quot;0123&quot;)
+    (do ((c (read-char is) (read-char is nil 'the-end)))
+        ((not (characterp c)))
+     (format t &quot;~S &quot; c)))
+<code class="t"> |&gt; </code> #\0 #\1 #\2 #\3
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-83"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-83"> &para;</a></span></h4>
+
+<p><b class="b">*standard-input*</b>,
+<b class="b">*terminal-io*</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-199"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-199"> &para;</a></span></h4>
+
+<p>If an <i class="i">end of file</i>_2 occurs before a character can be read, and 
+<i class="i">eof-error-p</i> is <i class="i">true</i>, 
+an error of <i class="i">type</i> <b class="b">end-of-file</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-446"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-446"> &para;</a></span></h4>
+
+<p><a class="ref" href="read_002dbyte.html">read-byte                                                        [Function]</a>
+,
+</p>
+<p><a class="ref" href="read_002dsequence.html">read-sequence                                                    [Function]</a>
+,
+</p>
+<p><a class="ref" href="write_002dchar.html">write-char                                                       [Function]</a>
+,
+<a class="ref" href="read.html">read, read-preserving-whitespace                                 [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-285"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-285"> &para;</a></span></h4>
+<p>The corresponding output function is <b class="b">write-char</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="read_002dchar_002dno_002dhang.html">read-char-no-hang                                                [Function]</a>, Previous: <a href="peek_002dchar.html">peek-char                                                        [Function]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/read_002dchar_002dno_002dhang.html
@@ -0,0 +1,127 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>read-char-no-hang (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="read-char-no-hang (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="read-char-no-hang (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="terpri.html" rel="next" title="terpri">
+<link href="read_002dchar.html" rel="prev" title="read-char">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="read_002dchar_002dno_002dhang">
+<div class="nav-panel">
+<p>
+Next: <a href="terpri.html" accesskey="n" rel="next">terpri, fresh-line                                               [Function]</a>, Previous: <a href="read_002dchar.html" accesskey="p" rel="prev">read-char                                                        [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="read_002dchar_002dno_002dhang-_005bFunction_005d"><span>21.2.18 read-char-no-hang                                                [Function]<a class="copiable-link" href="#read_002dchar_002dno_002dhang-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">read-char-no-hang</code>  <i class="i"><span class="r">&amp;optional</span> input-stream eof-error-p
+			       eof-value recursive-p</i> &rArr;  <i class="i">char</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-421"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-421"> &para;</a></span></h4>
+
+<p><i class="i">input-stream</i> &ndash; an <i class="i">input</i> <i class="i">stream designator</i>.
+ The default is <i class="i">standard input</i>.
+</p>
+<p><i class="i">eof-error-p</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">true</i>.
+</p>
+<p><i class="i">eof-value</i>&mdash;an <i class="i">object</i>.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">recursive-p</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">false</i>.
+</p>
+<p><i class="i">char</i>&mdash;a <i class="i">character</i> or <b class="b">nil</b> or the <i class="i">eof-value</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-549"><span>Description::<a class="copiable-link" href="#Description_003a_003a-549"> &para;</a></span></h4>
+
+<p><b class="b">read-char-no-hang</b> returns a character
+from <i class="i">input-stream</i> if such a character is available.  If no character
+is available, <b class="b">read-char-no-hang</b> returns <b class="b">nil</b>.
+</p>
+<p>If <i class="i">recursive-p</i> is <i class="i">true</i>,
+this call is expected to be embedded in a higher-level call to <b class="b">read</b> 
+or a similar <i class="i">function</i> used by the <i class="i">Lisp reader</i>.
+</p>
+<p>If an <i class="i">end of file</i>_2 occurs and <i class="i">eof-error-p</i> is <i class="i">false</i>, 
+<i class="i">eof-value</i> is returned.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-396"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-396"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; This code assumes an implementation in which a newline is not
+;; required to terminate input from the console.
+ (defun test-it ()
+   (unread-char (read-char))
+   (list (read-char-no-hang) 
+         (read-char-no-hang) 
+         (read-char-no-hang)))
+&rArr;  TEST-IT
+;; Implementation A, where a Newline is not required to terminate
+;; interactive input on the console.
+ (test-it)
+<code class="t"> |&gt; </code> <b class="b">|&gt;&gt;</b><code class="t">a</code><b class="b">&lt;&lt;|</b>
+&rArr;  (#\a NIL NIL)
+;; Implementation B, where a Newline is required to terminate
+;; interactive input on the console, and where that Newline remains
+;; on the input stream.
+ (test-it)
+<code class="t"> |&gt; </code> <b class="b">|&gt;&gt;</b><code class="t">a<span class="r"><i class="i">[&lt;&ndash;</i>~]</span></code><b class="b">&lt;&lt;|</b>
+&rArr;  (#\a #\Newline NIL)
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-84"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-84"> &para;</a></span></h4>
+
+<p><b class="b">*standard-input*</b>,
+<b class="b">*terminal-io*</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-200"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-200"> &para;</a></span></h4>
+
+<p>If an <i class="i">end of file</i>_2 occurs
+when <i class="i">eof-error-p</i> is <i class="i">true</i>,
+an error of <i class="i">type</i> <b class="b">end-of-file</b> is signaled .
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-447"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-447"> &para;</a></span></h4>
+
+<p><a class="ref" href="listen.html">listen                                                           [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-286"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-286"> &para;</a></span></h4>
+
+<p><b class="b">read-char-no-hang</b> is exactly like <b class="b">read-char</b>, except
+that if it would be necessary to wait in order to get a character (as
+from a keyboard), <b class="b">nil</b> is immediately returned without waiting.  
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="terpri.html">terpri, fresh-line                                               [Function]</a>, Previous: <a href="read_002dchar.html">read-char                                                        [Function]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/read_002ddelimited_002dlist.html
@@ -0,0 +1,178 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>read-delimited-list (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="read-delimited-list (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="read-delimited-list (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="read_002dfrom_002dstring.html" rel="next" title="read-from-string">
+<link href="read.html" rel="prev" title="read">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="read_002ddelimited_002dlist">
+<div class="nav-panel">
+<p>
+Next: <a href="read_002dfrom_002dstring.html" accesskey="n" rel="next">read-from-string                                                 [Function]</a>, Previous: <a href="read.html" accesskey="p" rel="prev">read, read-preserving-whitespace                                 [Function]</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="read_002ddelimited_002dlist-_005bFunction_005d"><span>23.2.5 read-delimited-list                                              [Function]<a class="copiable-link" href="#read_002ddelimited_002dlist-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">read-delimited-list</code>  <i class="i">char <span class="r">&amp;optional</span> input-stream recursive-p</i> &rArr;  <i class="i">list</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-474"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-474"> &para;</a></span></h4>
+
+<p><i class="i">char</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">input-stream</i>&mdash;an <i class="i">input</i> <i class="i">stream designator</i>.
+ The default is <i class="i">standard input</i>.
+</p>
+<p><i class="i">recursive-p</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">false</i>.
+</p>
+<p><i class="i">list</i>&mdash;a <i class="i">list</i> of the <i class="i">objects</i> read.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-624"><span>Description::<a class="copiable-link" href="#Description_003a_003a-624"> &para;</a></span></h4>
+
+<p><b class="b">read-delimited-list</b> reads <i class="i">objects</i> from <i class="i">input-stream</i> 
+until the next character after an <i class="i">object</i>&rsquo;s
+representation (ignoring <i class="i">whitespace</i>_2 characters and comments) is <i class="i">char</i>.
+</p>
+<p><b class="b">read-delimited-list</b> looks ahead at each step
+for the next non-<i class="i">whitespace</i>_2 <i class="i">character</i>
+and peeks at it as if with <b class="b">peek-char</b>.
+If it is <i class="i">char</i>, 
+then the <i class="i">character</i> is consumed and the <i class="i">list</i> of <i class="i">objects</i> is returned.
+If it is a <i class="i">constituent</i> or <i class="i">escape</i> <i class="i">character</i>,
+then <b class="b">read</b> is used to read an <i class="i">object</i>,
+which is added to the end of the <i class="i">list</i>.
+If it is a <i class="i">macro character</i>,
+its <i class="i">reader macro function</i> is called;
+if the function returns a <i class="i">value</i>,
+that <i class="i">value</i> is added to the <i class="i">list</i>.
+The peek-ahead process is then repeated.
+</p>
+<p>If <i class="i">recursive-p</i> is <i class="i">true</i>,
+this call is expected to be embedded in a higher-level call to <b class="b">read</b> 
+or a similar function.
+</p>
+<p>It is an error to reach end-of-file during the operation of
+<b class="b">read-delimited-list</b>.
+</p>
+<p>The consequences are undefined
+if <i class="i">char</i> has a <i class="i">syntax type</i> of <i class="i">whitespace</i>_2
+in the <i class="i">current readtable</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-445"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-445"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (read-delimited-list #\<span class="r">]</span>) 1 2 3 4 5 6 <span class="r">]</span>
+&rArr;  (1 2 3 4 5 6)
+</pre></div>
+
+<p>Suppose you wanted <code class="t">#{<i class="i">a</i> <i class="i">b</i> <i class="i">c</i> ... <i class="i">z</i>}</code>
+to read as a list of all pairs of the elements <i class="i">a</i>, <i class="i">b</i>, <i class="i">c</i>, 
+..., <i class="i">z</i>, for example.
+</p>
+<div class="example">
+<pre class="example-preformatted"> #{p q z a}  reads as  ((p q) (p z) (p a) (q z) (q a) (z a))
+</pre></div>
+
+<p>This can be done by specifying a macro-character definition for <code class="t">#{</code>
+that does two things: reads in all the items up to the <code class="t">}</code>,
+and constructs the pairs.  <b class="b">read-delimited-list</b> performs
+the first task.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun |#{-reader| (stream char arg)
+   (declare (ignore char arg))
+   (mapcon #'(lambda (x)
+              (mapcar #'(lambda (y) (list (car x) y)) (cdr x)))
+          (read-delimited-list #\} stream t))) &rArr;  |#{-reader|
+
+ (set-dispatch-macro-character #\# #\{ #'|#{-reader|) &rArr;  T 
+ (set-macro-character #\} (get-macro-character #\) <b class="b">nil</b>))
+</pre></div>
+
+<p>Note that <i class="i">true</i> is supplied for the <i class="i">recursive-p</i> argument.
+</p>
+<p>It is necessary here to give a definition to the character <code class="t">}</code> as
+well to prevent it from being a constituent.
+If the line
+</p>
+<div class="example">
+<pre class="example-preformatted"> (set-macro-character #\} (get-macro-character #\) <b class="b">nil</b>))
+</pre></div>
+
+<p>shown above were not included, then the <code class="t">}</code> in
+</p>
+<div class="example">
+<pre class="example-preformatted"> #{ p q z a}
+</pre></div>
+
+<p>would be considered a constituent character, part of the symbol named
+<code class="t">a}</code>.  This could be corrected by putting a space before
+the <code class="t">}</code>, but it is better to call
+<b class="b">set-macro-character</b>.
+</p>
+<p>Giving <code class="t">}</code> the same	      
+definition as the standard definition of the character <code class="t">)</code> has the
+twin benefit of making it terminate tokens for use with 
+<b class="b">read-delimited-list</b> and also making it invalid for use in any
+other context. Attempting to read a stray <code class="t">}</code> will signal an error.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-109"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-109"> &para;</a></span></h4>
+
+<p><b class="b">*standard-input*</b>,
+<b class="b">*readtable*</b>,
+<b class="b">*terminal-io*</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-507"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-507"> &para;</a></span></h4>
+
+<p><a class="ref" href="read.html">read, read-preserving-whitespace                                 [Function]</a>
+,
+<a class="ref" href="peek_002dchar.html">peek-char                                                        [Function]</a>
+,
+<a class="ref" href="read_002dchar.html">read-char                                                        [Function]</a>
+,
+<a class="ref" href="unread_002dchar.html">unread-char                                                      [Function]</a>
+.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-313"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-313"> &para;</a></span></h4>
+
+<p><b class="b">read-delimited-list</b> is intended for use in implementing <i class="i">reader macros</i>.
+Usually it is desirable for <i class="i">char</i> to be a <i class="i">terminating</i> <i class="i">macro character</i>
+so that it can be used to delimit tokens; however, <b class="b">read-delimited-list</b>
+makes no attempt to alter the syntax specified for <i class="i">char</i> by the current
+readtable.  The caller must make any necessary changes to the readtable syntax 
+explicitly.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="read_002dfrom_002dstring.html">read-from-string                                                 [Function]</a>, Previous: <a href="read.html">read, read-preserving-whitespace                                 [Function]</a>, Up: <a href="Reader-Dictionary.html">Reader Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/read_002dfrom_002dstring.html
@@ -0,0 +1,131 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>read-from-string (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="read-from-string (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="read-from-string (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="readtable_002dcase.html" rel="next" title="readtable-case">
+<link href="read_002ddelimited_002dlist.html" rel="prev" title="read-delimited-list">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="read_002dfrom_002dstring">
+<div class="nav-panel">
+<p>
+Next: <a href="readtable_002dcase.html" accesskey="n" rel="next">readtable-case                                                   [Accessor]</a>, Previous: <a href="read_002ddelimited_002dlist.html" accesskey="p" rel="prev">read-delimited-list                                              [Function]</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="read_002dfrom_002dstring-_005bFunction_005d"><span>23.2.6 read-from-string                                                 [Function]<a class="copiable-link" href="#read_002dfrom_002dstring-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">read-from-string</code>  <i class="i">string <span class="r">&amp;optional</span> eof-error-p eof-value
+                               <span class="r">&amp;key</span> start end preserve-whitespace</i><br>
+   &rArr;  <i class="i">object, position</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-475"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-475"> &para;</a></span></h4>
+
+<p><i class="i">string</i>&mdash;a <i class="i">string</i>.
+</p>
+<p><i class="i">eof-error-p</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">true</i>.
+</p>
+<p><i class="i">eof-value</i>&mdash;an <i class="i">object</i>.
+</p>
+<p>The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">string</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">preserve-whitespace</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">false</i>.
+</p>
+<p><i class="i">object</i>&mdash;an <i class="i">object</i> (parsed by the <i class="i">Lisp reader</i>)
+		 or the <i class="i">eof-value</i>.
+</p>
+<p><i class="i">position</i>&mdash;an <i class="i">integer</i> greater than or equal to zero,
+		   and less than or equal to 
+		   one more than the <i class="i">length</i> of the <i class="i">string</i>. 
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-625"><span>Description::<a class="copiable-link" href="#Description_003a_003a-625"> &para;</a></span></h4>
+
+<p>Parses the printed representation of an <i class="i">object</i>
+from the subsequence of <i class="i">string</i> <i class="i">bounded</i> by <i class="i">start</i> and <i class="i">end</i>,
+as if <b class="b">read</b> had been called on an <i class="i">input</i> <i class="i">stream</i> 
+containing those same <i class="i">characters</i>.
+</p>
+<p>If <i class="i">preserve-whitespace</i> is <i class="i">true</i>,
+the operation will preserve <i class="i">whitespace</i>_2
+as <b class="b">read-preserving-whitespace</b> would do.
+</p>
+<p>If an <i class="i">object</i> is successfully parsed, the <i class="i">primary value</i>, <i class="i">object</i>,
+is the <i class="i">object</i> that was parsed.
+If <i class="i">eof-error-p</i> is <i class="i">false</i> and if the end of the <i class="i">substring</i> is reached,
+<i class="i">eof-value</i> is returned.
+</p>
+<p>The <i class="i">secondary value</i>, <i class="i">position</i>, is the index of the first <i class="i">character</i>
+in the <i class="i">bounded</i> <i class="i">string</i> that was not read.
+The <i class="i">position</i> may depend upon the value of <i class="i">preserve-whitespace</i>.
+If the entire <i class="i">string</i> was read, 
+the <i class="i">position</i> returned is either the <i class="i">length</i> of the <i class="i">string</i> 
+or one greater than the <i class="i">length</i> of the <i class="i">string</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-446"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-446"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (read-from-string &quot; 1 3 5&quot; t nil :start 2) &rArr;  3, 5
+ (read-from-string &quot;(a b c)&quot;) &rArr;  (A B C), 7
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-230"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-230"> &para;</a></span></h4>
+
+<p>If the end of the supplied substring
+occurs before an <i class="i">object</i> can be read, an
+error is signaled if <i class="i">eof-error-p</i> is <i class="i">true</i>.
+An error is signaled if the end of the <i class="i">substring</i> occurs
+in the middle of an incomplete <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-508"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-508"> &para;</a></span></h4>
+
+<p><a class="ref" href="read.html">read, read-preserving-whitespace                                 [Function]</a>
+,
+<b class="b">read-preserving-whitespace</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-314"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-314"> &para;</a></span></h4>
+
+<p>The reason that <i class="i">position</i> is allowed to be beyond the
+<i class="i">length</i> of the <i class="i">string</i> is to permit (but not require)
+the <i class="i">implementation</i> to work by simulating the effect of a 
+trailing delimiter at the end of the <i class="i">bounded</i> <i class="i">string</i>.
+When <i class="i">preserve-whitespace</i> is <i class="i">true</i>,
+the <i class="i">position</i> might count the simulated delimiter.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="readtable_002dcase.html">readtable-case                                                   [Accessor]</a>, Previous: <a href="read_002ddelimited_002dlist.html">read-delimited-list                                              [Function]</a>, Up: <a href="Reader-Dictionary.html">Reader Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/read_002dline.html
@@ -0,0 +1,127 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>read-line (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="read-line (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="read-line (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="write_002dstring.html" rel="next" title="write-string">
+<link href="write_002dchar.html" rel="prev" title="write-char">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="read_002dline">
+<div class="nav-panel">
+<p>
+Next: <a href="write_002dstring.html" accesskey="n" rel="next">write-string, write-line                                         [Function]</a>, Previous: <a href="write_002dchar.html" accesskey="p" rel="prev">write-char                                                       [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="read_002dline-_005bFunction_005d"><span>21.2.22 read-line                                                        [Function]<a class="copiable-link" href="#read_002dline-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">read-line</code>  <i class="i"><span class="r">&amp;optional</span> input-stream eof-error-p eof-value recursive-p</i><br>
+   &rArr;  <i class="i">line, missing-newline-p</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-425"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-425"> &para;</a></span></h4>
+
+<p><i class="i">input-stream</i>&mdash;an <i class="i">input</i> <i class="i">stream designator</i>.
+ The default is <i class="i">standard input</i>.
+</p>
+<p><i class="i">eof-error-p</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">true</i>.
+</p>
+<p><i class="i">eof-value</i>&mdash;an <i class="i">object</i>.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">recursive-p</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">false</i>.
+</p>
+<p><i class="i">line</i>&mdash;a <i class="i">string</i> or the <i class="i">eof-value</i>.
+</p>
+<p><i class="i">missing-newline-p</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-553"><span>Description::<a class="copiable-link" href="#Description_003a_003a-553"> &para;</a></span></h4>
+
+<p>Reads from <i class="i">input-stream</i> a line of text
+that is terminated by a <i class="i">newline</i> or <i class="i">end of file</i>.
+</p>
+<p>If <i class="i">recursive-p</i> is <i class="i">true</i>,
+this call is expected to be embedded in a higher-level call to <b class="b">read</b> 
+or a similar <i class="i">function</i> used by the <i class="i">Lisp reader</i>.
+</p>
+<p>The <i class="i">primary value</i>, <i class="i">line</i>, is the line that is read,
+represented as a <i class="i">string</i> (without the trailing <i class="i">newline</i>, if any).
+If  <i class="i">eof-error-p</i> is <i class="i">false</i> 
+and the <i class="i">end of file</i> for <i class="i">input-stream</i> is reached
+     before any <i class="i">characters</i> are read,
+<i class="i">eof-value</i> is returned as the <i class="i">line</i>.
+</p>
+<p>The <i class="i">secondary value</i>, <i class="i">missing-newline-p</i>, 
+is a <i class="i">generalized boolean</i> that is
+    <i class="i">false</i> if the <i class="i">line</i> was terminated by a <i class="i">newline</i>,
+ or <i class="i">true</i>  if the <i class="i">line</i> was terminated by 
+		   the <i class="i">end of file</i> for <i class="i">input-stream</i>
+		   (or if the <i class="i">line</i> is the <i class="i">eof-value</i>).
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-400"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-400"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq a &quot;line 1
+ line2&quot;)
+&rArr;  &quot;line 1
+ line2&quot;
+ (read-line (setq input-stream (make-string-input-stream a)))
+&rArr;  &quot;line 1&quot;, <i class="i">false</i>
+ (read-line input-stream)
+&rArr;  &quot;line2&quot;, <i class="i">true</i>
+ (read-line input-stream nil nil)
+&rArr;  NIL, <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-88"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-88"> &para;</a></span></h4>
+
+<p><b class="b">*standard-input*</b>,
+<b class="b">*terminal-io*</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-202"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-202"> &para;</a></span></h4>
+
+<p>If an <i class="i">end of file</i>_2 occurs before any characters are read in the line,
+an error is signaled if <i class="i">eof-error-p</i> is <i class="i">true</i>.  
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-450"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-450"> &para;</a></span></h4>
+
+<p><a class="ref" href="read.html">read, read-preserving-whitespace                                 [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-289"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-289"> &para;</a></span></h4>
+
+<p>The corresponding output function is <b class="b">write-line</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="write_002dstring.html">write-string, write-line                                         [Function]</a>, Previous: <a href="write_002dchar.html">write-char                                                       [Function]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/read_002dsequence.html
@@ -0,0 +1,119 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>read-sequence (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="read-sequence (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="read-sequence (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="write_002dsequence.html" rel="next" title="write-sequence">
+<link href="write_002dstring.html" rel="prev" title="write-string">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="read_002dsequence">
+<div class="nav-panel">
+<p>
+Next: <a href="write_002dsequence.html" accesskey="n" rel="next">write-sequence                                                   [Function]</a>, Previous: <a href="write_002dstring.html" accesskey="p" rel="prev">write-string, write-line                                         [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="read_002dsequence-_005bFunction_005d"><span>21.2.24 read-sequence                                                    [Function]<a class="copiable-link" href="#read_002dsequence-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">read-sequence</code>  <i class="i">sequence stream <span class="r">&amp;key</span> start end</i> &rArr;  <i class="i">position</i>
+</p>
+<p><i class="i">sequence</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<p><i class="i">stream</i>&mdash;an <i class="i">input</i> <i class="i">stream</i>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of
+ <i class="i">sequence</i>.  The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">position</i>&mdash;an <i class="i">integer</i> greater than or equal to zero, and
+ less than or equal to the <i class="i">length</i> of the <i class="i">sequence</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-555"><span>Description::<a class="copiable-link" href="#Description_003a_003a-555"> &para;</a></span></h4>
+
+<p>Destructively modifies <i class="i">sequence</i> by replacing the <i class="i">elements</i>
+of <i class="i">sequence</i> <i class="i">bounded</i> by <i class="i">start</i> and <i class="i">end</i> with
+<i class="i">elements</i> read from <i class="i">stream</i>.
+</p>
+<p><i class="i">Sequence</i> is destructively modified by copying successive
+<i class="i">elements</i> into it from <i class="i">stream</i>.  If the <i class="i">end of file</i> for
+<i class="i">stream</i> is reached before copying all <i class="i">elements</i> of the
+subsequence, then the extra <i class="i">elements</i> near the end of <i class="i">sequence</i>
+are not updated.
+</p>
+<p><i class="i">Position</i> is the index of the first <i class="i">element</i> of <i class="i">sequence</i>
+that was not updated, which might be less than <i class="i">end</i> because the
+<i class="i">end of file</i> was reached.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-402"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-402"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defvar *data* (make-array 15 :initial-element nil))
+ (values (read-sequence *data* (make-string-input-stream &quot;test string&quot;)) *data*)
+ &rArr;  11, #(#\t #\e #\s #\t #\Space #\s #\t #\r #\i #\n #\g NIL NIL NIL NIL)
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-64"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-64"> &para;</a></span></h4>
+
+<p>Modifies <i class="i">stream</i> and <i class="i">sequence</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-203"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-203"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">start</i> is not a non-negative <i class="i">integer</i>.
+Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">end</i> is not a non-negative <i class="i">integer</i> or <b class="b">nil</b>.
+</p>
+<p>Might signal an error of <i class="i">type</i> <b class="b">type-error</b> if an <i class="i">element</i> read from
+the <i class="i">stream</i> is not a member of the <i class="i">element type</i> of the
+<i class="i">sequence</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-452"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-452"> &para;</a></span></h4>
+
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>,
+<a class="ref" href="write_002dsequence.html">write-sequence                                                   [Function]</a>
+,
+<a class="ref" href="read_002dline.html">read-line                                                        [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-291"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-291"> &para;</a></span></h4>
+
+<p><b class="b">read-sequence</b> is identical in effect to iterating over the indicated
+subsequence and reading one <i class="i">element</i> at a time from <i class="i">stream</i> and
+storing it into <i class="i">sequence</i>, but may be more efficient than the
+equivalent loop.  An efficient implementation is more likely to exist
+for the case where the <i class="i">sequence</i> is a <i class="i">vector</i> with the same
+<i class="i">element type</i> as the <i class="i">stream</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="write_002dsequence.html">write-sequence                                                   [Function]</a>, Previous: <a href="write_002dstring.html">write-string, write-line                                         [Function]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/reader_002derror.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>reader-error (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="reader-error (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="reader-error (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="_002areadtable_002a.html" rel="prev" title="*readtable*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="reader_002derror">
+<div class="nav-panel">
+<p>
+Previous: <a href="_002areadtable_002a.html" accesskey="p" rel="prev">*readtable*                                                      [Variable]</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="reader_002derror-_005bCondition-Type_005d"><span>23.2.18 reader-error                                               [Condition Type]<a class="copiable-link" href="#reader_002derror-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-74"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-74"> &para;</a></span></h4>
+<p><b class="b">reader-error</b>,
+<b class="b">parse-error</b>,
+<b class="b">stream-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-637"><span>Description::<a class="copiable-link" href="#Description_003a_003a-637"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">reader-error</b> consists of
+error conditions that are related to tokenization and parsing
+done by the <i class="i">Lisp reader</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-517"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-517"> &para;</a></span></h4>
+
+<p><a class="ref" href="read.html">read, read-preserving-whitespace                                 [Function]</a>
+,
+<a class="ref" href="stream_002derror_002dstream.html">stream-error-stream                                              [Function]</a>
+,
+<a class="ref" href="Reader-Concepts.html">Reader Concepts</a>
+</p>
+
+
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/readtable.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>readtable (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="readtable (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="readtable (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="copy_002dreadtable.html" rel="next" title="copy-readtable">
+<link href="Reader-Dictionary.html" rel="prev" title="Reader Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="readtable">
+<div class="nav-panel">
+<p>
+Next: <a href="copy_002dreadtable.html" accesskey="n" rel="next">copy-readtable                                                   [Function]</a>, Previous: <a href="Reader-Dictionary.html" accesskey="p" rel="prev">Reader Dictionary</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="readtable-_005bSystem-Class_005d"><span>23.2.1 readtable                                                    [System Class]<a class="copiable-link" href="#readtable-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-73"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-73"> &para;</a></span></h4>
+<p><b class="b">readtable</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-620"><span>Description::<a class="copiable-link" href="#Description_003a_003a-620"> &para;</a></span></h4>
+
+<p>A <i class="i">readtable</i> maps <i class="i">characters</i> into <i class="i">syntax types</i> for 
+the <i class="i">Lisp reader</i>; see <a class="ref" href="Syntax.html">Syntax</a>.
+A <i class="i">readtable</i> also 
+     contains associations between <i class="i">macro characters</i> 
+		               and their <i class="i">reader macro functions</i>,
+ and records information about the case conversion rules 
+     to be used by the <i class="i">Lisp reader</i> when parsing <i class="i">symbols</i>.
+</p>
+<p>Each <i class="i">simple</i> <i class="i">character</i> must be representable in the <i class="i">readtable</i>.
+It is <i class="i">implementation-defined</i> whether <i class="i">non-simple</i> <i class="i">characters</i>
+can have syntax descriptions in the <i class="i">readtable</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-503"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-503"> &para;</a></span></h4>
+
+<p><a class="ref" href="Readtables.html">Readtables</a>,
+<a class="ref" href="Printing-Other-Objects.html">Printing Other Objects</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/readtable_002dcase.html
@@ -0,0 +1,83 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>readtable-case (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="readtable-case (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="readtable-case (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="readtablep.html" rel="next" title="readtablep">
+<link href="read_002dfrom_002dstring.html" rel="prev" title="read-from-string">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="readtable_002dcase">
+<div class="nav-panel">
+<p>
+Next: <a href="readtablep.html" accesskey="n" rel="next">readtablep                                                       [Function]</a>, Previous: <a href="read_002dfrom_002dstring.html" accesskey="p" rel="prev">read-from-string                                                 [Function]</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="readtable_002dcase-_005bAccessor_005d"><span>23.2.7 readtable-case                                                   [Accessor]<a class="copiable-link" href="#readtable_002dcase-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">readtable-case</code>  <i class="i">readtable</i> &rArr;  <i class="i">mode</i>
+</p>
+<p>(setf (<code class="code"> readtable-case</code> <i class="i">readtable</i>) mode)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-476"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-476"> &para;</a></span></h4>
+
+<p><i class="i">readtable</i>&mdash;a <i class="i">readtable</i>.
+</p>
+<p><i class="i">mode</i>&mdash;a <i class="i">case sensitivity mode</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-626"><span>Description::<a class="copiable-link" href="#Description_003a_003a-626"> &para;</a></span></h4>
+
+<p><i class="i">Accesses</i> the <i class="i">readtable case</i> of <i class="i">readtable</i>,
+which affects the way in which the <i class="i">Lisp Reader</i>  reads  <i class="i">symbols</i>
+          and the way in which the <i class="i">Lisp Printer</i> writes <i class="i">symbols</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-447"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-447"> &para;</a></span></h4>
+
+<p>See <a class="ref" href="Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Reader.html">Examples of Effect of Readtable Case on the Lisp Reader</a> and <a class="ref" href="Examples-of-Effect-of-Readtable-Case-on-the-Lisp-Printer.html">Examples of Effect of Readtable Case on the Lisp Printer</a>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-231"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-231"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">readtable</i> is not a <i class="i">readtable</i>.
+Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">mode</i> is not a <i class="i">case sensitivity mode</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-509"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-509"> &para;</a></span></h4>
+
+<p><a class="ref" href="readtable.html">readtable                                                    [System Class]</a>
+,
+<b class="b">*print-escape*</b>,
+<a class="ref" href="Reader-Algorithm.html">Reader Algorithm</a>,
+<a class="ref" href="Effect-of-Readtable-Case-on-the-Lisp-Reader.html">Effect of Readtable Case on the Lisp Reader</a>,
+<a class="ref" href="Effect-of-Readtable-Case-on-the-Lisp-Printer.html">Effect of Readtable Case on the Lisp Printer</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-315"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-315"> &para;</a></span></h4>
+
+<p><b class="b">copy-readtable</b> copies the <i class="i">readtable case</i> of the <i class="i">readtable</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/readtablep.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>readtablep (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="readtablep (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="readtablep (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="set_002ddispatch_002dmacro_002dcharacter.html" rel="next" title="set-dispatch-macro-character">
+<link href="readtable_002dcase.html" rel="prev" title="readtable-case">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="readtablep">
+<div class="nav-panel">
+<p>
+Next: <a href="set_002ddispatch_002dmacro_002dcharacter.html" accesskey="n" rel="next">set-dispatch-macro-character, get-dispatch-macro-character</a>, Previous: <a href="readtable_002dcase.html" accesskey="p" rel="prev">readtable-case                                                   [Accessor]</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="readtablep-_005bFunction_005d"><span>23.2.8 readtablep                                                       [Function]<a class="copiable-link" href="#readtablep-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">readtablep</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-477"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-477"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-627"><span>Description::<a class="copiable-link" href="#Description_003a_003a-627"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">readtable</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-448"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-448"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (readtablep *readtable*) &rArr;  <i class="i">true</i>
+ (readtablep (copy-readtable)) &rArr;  <i class="i">true</i>
+ (readtablep '*readtable*) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-316"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-316"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (readtablep <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'readtable) 
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/real.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>real (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="real (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="real (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="float-_0028System-Class_0029.html" rel="next" title="float (System Class)">
+<link href="complex-_0028System-Class_0029.html" rel="prev" title="complex (System Class)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="real">
+<div class="nav-panel">
+<p>
+Next: <a href="float-_0028System-Class_0029.html" accesskey="n" rel="next">float                                                        [System Class]</a>, Previous: <a href="complex-_0028System-Class_0029.html" accesskey="p" rel="prev">complex                                                      [System Class]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="real-_005bSystem-Class_005d"><span>12.2.3 real                                                         [System Class]<a class="copiable-link" href="#real-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-37"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-37"> &para;</a></span></h4>
+<p><b class="b">real</b>,
+<b class="b">number</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-269"><span>Description::<a class="copiable-link" href="#Description_003a_003a-269"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">real</b> includes all <i class="i">numbers</i> that
+represent mathematical real numbers, though there are mathematical real
+numbers (<i class="i">e.g.</i>, irrational numbers) that do not have an exact representation 
+in <span class="r">Common Lisp</span>.  Only <i class="i">reals</i> can be ordered using the
+<b class="b">&lt;</b>, <b class="b">&gt;</b>, <b class="b">&lt;=</b>, and <b class="b">&gt;=</b> functions.
+</p>
+<p>The <i class="i">types</i> <b class="b">rational</b> and <b class="b">float</b> are <i class="i">disjoint</i>
+<i class="i">subtypes</i> of <i class="i">type</i> <b class="b">real</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-9"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-9"> &para;</a></span></h4>
+
+<p>Abbreviating.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-9"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-9"> &para;</a></span></h4>
+
+<p>(<code class="code">real</code>{<i class="i"><code class="t">[</code>lower-limit <span class="r">[</span>upper-limit<span class="r">]</span><code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-9"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-9"> &para;</a></span></h4>
+
+<p><i class="i">lower-limit</i>, <i class="i">upper-limit</i>&mdash;<i class="i">interval designators</i> 
+					   for <i class="i">type</i> <b class="b">real</b>.
+ The defaults for each of <i class="i">lower-limit</i> and <i class="i">upper-limit</i> is the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-9"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-9"> &para;</a></span></h4>
+
+<p>This denotes the <i class="i">reals</i> on the interval described by
+<i class="i">lower-limit</i> and <i class="i">upper-limit</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/realp.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>realp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="realp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="realp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="numerator.html" rel="next" title="numerator">
+<link href="upgraded_002dcomplex_002dpart_002dtype.html" rel="prev" title="upgraded-complex-part-type">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="realp">
+<div class="nav-panel">
+<p>
+Next: <a href="numerator.html" accesskey="n" rel="next">numerator, denominator                                           [Function]</a>, Previous: <a href="upgraded_002dcomplex_002dpart_002dtype.html" accesskey="p" rel="prev">upgraded-complex-part-type                                       [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="realp-_005bFunction_005d"><span>12.2.52 realp                                                            [Function]<a class="copiable-link" href="#realp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">realp</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-235"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-235"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-317"><span>Description::<a class="copiable-link" href="#Description_003a_003a-317"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">real</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-219"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-219"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (realp 12) &rArr;  <i class="i">true</i>
+ (realp #c(5/3 7.2)) &rArr;  <i class="i">false</i>
+ (realp nil) &rArr;  <i class="i">false</i>
+ (realp (cons 1 2)) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-164"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-164"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (realp <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'real)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/realpart.html
@@ -0,0 +1,85 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>realpart (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="realpart (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="realpart (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="upgraded_002dcomplex_002dpart_002dtype.html" rel="next" title="upgraded-complex-part-type">
+<link href="phase.html" rel="prev" title="phase">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="realpart">
+<div class="nav-panel">
+<p>
+Next: <a href="upgraded_002dcomplex_002dpart_002dtype.html" accesskey="n" rel="next">upgraded-complex-part-type                                       [Function]</a>, Previous: <a href="phase.html" accesskey="p" rel="prev">phase                                                            [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="realpart_002c-imagpart-_005bFunction_005d"><span>12.2.50 realpart, imagpart                                               [Function]<a class="copiable-link" href="#realpart_002c-imagpart-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">realpart</code>  <i class="i">number</i> &rArr;  <i class="i">real</i>
+</p>
+<p><code class="code">imagpart</code>  <i class="i">number</i> &rArr;  <i class="i">real</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-233"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-233"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">real</i>&mdash;a <i class="i">real</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-315"><span>Description::<a class="copiable-link" href="#Description_003a_003a-315"> &para;</a></span></h4>
+
+<p><b class="b">realpart</b> and <b class="b">imagpart</b> return the real and
+imaginary parts of <i class="i">number</i> respectively.
+If <i class="i">number</i> is 
+</p>
+<p><i class="i">real</i>,
+</p>
+<p>then <b class="b">realpart</b> returns <i class="i">number</i> and <b class="b">imagpart</b>
+returns <code class="t">(* 0 <i class="i">number</i>)</code>, which has the effect that the
+imaginary part of a <i class="i">rational</i> is <code class="t">0</code> and that of
+a <i class="i">float</i> is a floating-point zero of the same format.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-218"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-218"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (realpart #c(23 41)) &rArr;  23
+ (imagpart #c(23 41.0)) &rArr;  41.0
+ (realpart #c(23 41.0)) &rArr;  23.0
+ (imagpart 23.0) &rArr;  0.0
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-96"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-96"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">number</i> is not a <i class="i">number</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-266"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-266"> &para;</a></span></h4>
+
+<p><a class="ref" href="complex.html">complex                                                          [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/reduce.html
@@ -0,0 +1,140 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>reduce (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="reduce (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="reduce (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="count.html" rel="next" title="count">
+<link href="map_002dinto.html" rel="prev" title="map-into">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="reduce">
+<div class="nav-panel">
+<p>
+Next: <a href="count.html" accesskey="n" rel="next">count, count-if, count-if-not                                    [Function]</a>, Previous: <a href="map_002dinto.html" accesskey="p" rel="prev">map-into                                                         [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="reduce-_005bFunction_005d"><span>17.3.9 reduce                                                           [Function]<a class="copiable-link" href="#reduce-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">reduce</code>  <i class="i">function sequence <span class="r">&amp;key</span> key from-end start end initial-value</i> &rArr;  <i class="i">result</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-361"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-361"> &para;</a></span></h4>
+
+<p><i class="i">function</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i>
+   that might be called with either zero or two <i class="i">arguments</i>.
+</p>
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">from-end</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is <i class="i">false</i>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">sequence</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">initial-value</i>&mdash;an <i class="i">object</i>. 
+</p>
+<p><i class="i">result</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-476"><span>Description::<a class="copiable-link" href="#Description_003a_003a-476"> &para;</a></span></h4>
+
+<p><b class="b">reduce</b> uses a binary operation, <i class="i">function</i>,
+to combine the <i class="i">elements</i> of <i class="i">sequence</i> 
+<i class="i">bounded</i> by <i class="i">start</i> and <i class="i">end</i>.
+</p>
+<p>The <i class="i">function</i> must accept as <i class="i">arguments</i> two <i class="i">elements</i>
+of <i class="i">sequence</i> or the results from combining those <i class="i">elements</i>.
+The <i class="i">function</i> must also be able to accept no arguments.
+</p>
+<p>If <i class="i">key</i> is supplied, it is used is used to extract the values to reduce.
+The <i class="i">key</i> function is applied exactly once to each element of <i class="i">sequence</i>
+in the order implied by the reduction order but not to the value of
+<i class="i">initial-value</i>, if supplied.
+</p>
+<p>The <i class="i">key</i> function typically returns part of the <i class="i">element</i> of <i class="i">sequence</i>.
+If <i class="i">key</i> is not supplied or is <b class="b">nil</b>, the <i class="i">sequence</i> <i class="i">element</i> itself is used.
+</p>
+<p>The reduction is left-associative,
+unless <i class="i">from-end</i> is <i class="i">true</i> in which case it is right-associative.  
+</p>
+<p>If <i class="i">initial-value</i> is supplied, 
+it is logically placed before the subsequence
+(or after it if <i class="i">from-end</i> is <i class="i">true</i>)
+and included in the reduction operation.
+</p>
+<p>In the normal case, the result of <b class="b">reduce</b> is the combined 
+result of <i class="i">function</i>&rsquo;s being applied to successive pairs of <i class="i">elements</i> 
+of <i class="i">sequence</i>.
+If the subsequence contains exactly one <i class="i">element</i> 
+and no <i class="i">initial-value</i> is given,
+then that <i class="i">element</i> is returned and <i class="i">function</i> is not called.
+If the subsequence is empty and an <i class="i">initial-value</i> is given,
+then the <i class="i">initial-value</i> is returned and <i class="i">function</i> is not called.
+If the subsequence is empty and no <i class="i">initial-value</i> is given,
+then the <i class="i">function</i> is called with zero arguments,
+and <b class="b">reduce</b> returns whatever <i class="i">function</i> does.
+This is the only case where the
+<i class="i">function</i> is called with other than two arguments.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-343"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-343"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (reduce #'* '(1 2 3 4 5)) &rArr;  120
+ (reduce #'append '((1) (2)) :initial-value '(i n i t)) &rArr;  (I N I T 1 2)
+ (reduce #'append '((1) (2)) :from-end t                  
+                             :initial-value '(i n i t)) &rArr;  (1 2 I N I T) 
+ (reduce #'- '(1 2 3 4)) &equiv; (- (- (- 1 2) 3) 4) &rArr;  -8
+ (reduce #'- '(1 2 3 4) :from-end t)    ;Alternating sum.
+&equiv; (- 1 (- 2 (- 3 4))) &rArr;  -2
+ (reduce #'+ '()) &rArr;  0
+ (reduce #'+ '(3)) &rArr;  3
+ (reduce #'+ '(foo)) &rArr;  FOO
+ (reduce #'list '(1 2 3 4)) &rArr;  (((1 2) 3) 4)
+ (reduce #'list '(1 2 3 4) :from-end t) &rArr;  (1 (2 (3 4)))
+ (reduce #'list '(1 2 3 4) :initial-value 'foo) &rArr;  ((((foo 1) 2) 3) 4)
+ (reduce #'list '(1 2 3 4)
+        :from-end t :initial-value 'foo) &rArr;  (1 (2 (3 (4 foo))))
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-157"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-157"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-387"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-387"> &para;</a></span></h4>
+
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="count.html">count, count-if, count-if-not                                    [Function]</a>, Previous: <a href="map_002dinto.html">map-into                                                         [Function]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/reinitialize_002dinstance.html
@@ -0,0 +1,119 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>reinitialize-instance (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="reinitialize-instance (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="reinitialize-instance (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="shared_002dinitialize.html" rel="next" title="shared-initialize">
+<link href="allocate_002dinstance.html" rel="prev" title="allocate-instance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="reinitialize_002dinstance">
+<div class="nav-panel">
+<p>
+Next: <a href="shared_002dinitialize.html" accesskey="n" rel="next">shared-initialize                               [Standard Generic Function]</a>, Previous: <a href="allocate_002dinstance.html" accesskey="p" rel="prev">allocate-instance                               [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="reinitialize_002dinstance-_005bStandard-Generic-Function_005d"><span>7.7.4 reinitialize-instance                           [Standard Generic Function]<a class="copiable-link" href="#reinitialize_002dinstance-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-13"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-13"> &para;</a></span></h4>
+
+<p><code class="code">reinitialize-instance</code>  <i class="i">instance <span class="r">&amp;rest</span> initargs <span class="r">&amp;key</span> <span class="r">&amp;allow-other-keys</span></i> &rArr;  <i class="i">instance</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-2"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-2"> &para;</a></span></h4>
+
+<p><code class="code">reinitialize-instance</code>  <i class="i"><span class="r">(</span><i class="i">instance</i> <b class="b">standard-object</b><span class="r">)</span> <span class="r">&amp;rest</span> initargs</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-92"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-92"> &para;</a></span></h4>
+
+<p><i class="i">instance</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">initargs</i>&mdash;an <i class="i">initialization argument list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-131"><span>Description::<a class="copiable-link" href="#Description_003a_003a-131"> &para;</a></span></h4>
+
+<p>The <i class="i">generic function</i> <b class="b">reinitialize-instance</b> can be used to change
+the values of <i class="i">local slots</i> of an <i class="i">instance</i> according to 
+<i class="i">initargs</i>.
+This <i class="i">generic function</i> can be called by users.
+</p>
+<p>The system-supplied primary <i class="i">method</i> for <b class="b">reinitialize-instance</b>
+checks the validity of <i class="i">initargs</i> and signals an error if
+an <i class="i">initarg</i> is supplied that is not declared as valid.
+The <i class="i">method</i> then calls the generic function <b class="b">shared-initialize</b>
+with the following arguments:  the <i class="i">instance</i>, 
+<b class="b">nil</b> (which means no <i class="i">slots</i>
+should be initialized according to their initforms), and the
+<i class="i">initargs</i> it received.
+</p>
+<h4 class="subsubheading" id="Side-Effects_003a_003a-6"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-6"> &para;</a></span></h4>
+
+<p>The <i class="i">generic function</i> <b class="b">reinitialize-instance</b> changes the values of <i class="i">local slots</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-23"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-23"> &para;</a></span></h4>
+
+<p>The system-supplied primary <i class="i">method</i> for <b class="b">reinitialize-instance</b>
+signals an error if an <i class="i">initarg</i> is supplied that is not declared as valid.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-113"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-113"> &para;</a></span></h4>
+
+<p><a class="ref" href="Initialize_002dInstance.html">Initialize-Instance</a>
+,
+<a class="ref" href="Shared_002dInitialize.html">Shared-Initialize</a>
+,
+<a class="ref" href="update_002dinstance_002dfor_002dredefined_002dclass.html">update-instance-for-redefined-class             [Standard Generic Function]</a>
+,
+<a class="ref" href="update_002dinstance_002dfor_002ddifferent_002dclass.html">update-instance-for-different-class             [Standard Generic Function]</a>
+,
+<a class="ref" href="slot_002dboundp.html">slot-boundp                                                      [Function]</a>
+,
+<a class="ref" href="slot_002dmakunbound.html">slot-makunbound                                                  [Function]</a>
+,
+<a class="ref" href="Reinitializing-an-Instance.html">Reinitializing an Instance</a>,
+<a class="ref" href="Rules-for-Initialization-Arguments.html">Rules for Initialization Arguments</a>,
+<a class="ref" href="Declaring-the-Validity-of-Initialization-Arguments.html">Declaring the Validity of Initialization Arguments</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-75"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-75"> &para;</a></span></h4>
+
+<p><i class="i">Initargs</i> are declared as valid by using the
+<code class="t">:initarg</code> option to <b class="b">defclass</b>, or by defining 
+<i class="i">methods</i> for <b class="b">reinitialize-instance</b>
+or <b class="b">shared-initialize</b>.  The keyword name
+of each keyword parameter specifier in the <i class="i">lambda list</i> of any 
+<i class="i">method</i>
+defined on <b class="b">reinitialize-instance</b> or <b class="b">shared-initialize</b> is
+declared as a valid initialization argument name for all 
+<i class="i">classes</i> for
+which that <i class="i">method</i> is applicable.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="shared_002dinitialize.html">shared-initialize                               [Standard Generic Function]</a>, Previous: <a href="allocate_002dinstance.html">allocate-instance                               [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/remf.html
@@ -0,0 +1,97 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>remf (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="remf (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="remf (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="intersection.html" rel="next" title="intersection">
+<link href="getf.html" rel="prev" title="getf">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="remf">
+<div class="nav-panel">
+<p>
+Next: <a href="intersection.html" accesskey="n" rel="next">intersection, nintersection                                      [Function]</a>, Previous: <a href="getf.html" accesskey="p" rel="prev">getf                                                             [Accessor]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="remf-_005bMacro_005d"><span>14.2.42 remf                                                                [Macro]<a class="copiable-link" href="#remf-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">remf</code>  <i class="i">place indicator</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-311"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-311"> &para;</a></span></h4>
+
+<p><i class="i">place</i>&mdash;a <i class="i">place</i>.
+</p>
+<p><i class="i">indicator</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-412"><span>Description::<a class="copiable-link" href="#Description_003a_003a-412"> &para;</a></span></h4>
+
+<p><b class="b">remf</b> removes from the <i class="i">property list</i> stored in <i class="i">place</i>
+a <i class="i">property</i>_1 with a <i class="i">property indicator</i>
+<i class="i">identical</i> to <i class="i">indicator</i>.
+</p>
+<p>If there are multiple <i class="i">properties</i>_1 with the <i class="i">identical</i> key,
+<b class="b">remf</b> only removes the first such <i class="i">property</i>.
+</p>
+<p><b class="b">remf</b> returns <i class="i">false</i> if no such <i class="i">property</i> was found,
+or <i class="i">true</i> if a property was found.
+</p>
+<p>The <i class="i">property indicator</i> 
+and the corresponding <i class="i">property value</i> 
+are removed in an undefined order
+by destructively splicing the property list.  
+</p>
+<p><b class="b">remf</b> is permitted to either <b class="b">setf</b> <i class="i">place</i> or to 
+<b class="b">setf</b> any part, <b class="b">car</b> or <b class="b">cdr</b>, 
+of the <i class="i">list structure</i> held by that <i class="i">place</i>.
+</p>
+<p>For information about the <i class="i">evaluation</i> of <i class="i">subforms</i> of <i class="i">place</i>,
+see <a class="ref" href="Evaluation-of-Subforms-to-Places.html">Evaluation of Subforms to Places</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-295"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-295"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq x (cons () ())) &rArr;  (NIL)
+ (setf (getf (car x) 'prop1) 'val1) &rArr;  VAL1
+ (remf (car x) 'prop1) &rArr;  <i class="i">true</i>
+ (remf (car x) 'prop1) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-43"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-43"> &para;</a></span></h4>
+
+<p>The property list stored in <i class="i">place</i> is modified.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-336"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-336"> &para;</a></span></h4>
+
+<p><a class="ref" href="remprop.html">remprop                                                          [Function]</a>
+, 
+<a class="ref" href="getf.html">getf                                                             [Accessor]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/remhash.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>remhash (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="remhash (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="remhash (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Tables-Dictionary.html" rel="up" title="Hash Tables Dictionary">
+<link href="maphash.html" rel="next" title="maphash">
+<link href="gethash.html" rel="prev" title="gethash">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="remhash">
+<div class="nav-panel">
+<p>
+Next: <a href="maphash.html" accesskey="n" rel="next">maphash                                                          [Function]</a>, Previous: <a href="gethash.html" accesskey="p" rel="prev">gethash                                                          [Accessor]</a>, Up: <a href="Hash-Tables-Dictionary.html" accesskey="u" rel="up">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="remhash-_005bFunction_005d"><span>18.2.10 remhash                                                          [Function]<a class="copiable-link" href="#remhash-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">remhash</code>  <i class="i">key hash-table</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-384"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-384"> &para;</a></span></h4>
+
+<p><i class="i">key</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">hash-table</i>&mdash;a <i class="i">hash table</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-500"><span>Description::<a class="copiable-link" href="#Description_003a_003a-500"> &para;</a></span></h4>
+
+<p>Removes the entry for <i class="i">key</i> in <i class="i">hash-table</i>, if any.
+Returns <i class="i">true</i> if there was such an entry, or <i class="i">false</i> otherwise.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-364"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-364"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (setq table (make-hash-table)) &rArr;  #&lt;HASH-TABLE EQL 0/120 32115666&gt;
+ (setf (gethash 100 table) &quot;C&quot;) &rArr;  &quot;C&quot;
+ (gethash 100 table) &rArr;  &quot;C&quot;, <i class="i">true</i>
+ (remhash 100 table) &rArr;  <i class="i">true</i>
+ (gethash 100 table) &rArr;  NIL, <i class="i">false</i>
+ (remhash 100 table) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-57"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-57"> &para;</a></span></h4>
+
+<p>The <i class="i">hash-table</i> is modified.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/remove.html
@@ -0,0 +1,239 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>remove (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="remove (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="remove (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="remove_002dduplicates.html" rel="next" title="remove-duplicates">
+<link href="merge.html" rel="prev" title="merge">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="remove">
+<div class="nav-panel">
+<p>
+Next: <a href="remove_002dduplicates.html" accesskey="n" rel="next">remove-duplicates, delete-duplicates                             [Function]</a>, Previous: <a href="merge.html" accesskey="p" rel="prev">merge                                                            [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="remove_002c-remove_002dif_002c-remove_002dif_002dnot_002c"><span>17.3.22 remove, remove-if, remove-if-not,<a class="copiable-link" href="#remove_002c-remove_002dif_002c-remove_002dif_002dnot_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="delete_002c-delete_002dif_002c-delete_002dif_002dnot"><span>delete, delete-if, delete-if-not<a class="copiable-link" href="#delete_002c-delete_002dif_002c-delete_002dif_002dnot"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Function]</i>
+</p></div>
+<p><code class="code">remove</code>  <i class="i">item sequence <span class="r">&amp;key</span> from-end test test-not start end count key</i> &rArr;  <i class="i">result-sequence</i>
+</p>
+<p><code class="code">remove-if</code>  <i class="i">test sequence <span class="r">&amp;key</span> from-end start end count key</i> &rArr;  <i class="i">result-sequence</i>
+</p>
+<p><code class="code">remove-if-not</code>  <i class="i">test sequence <span class="r">&amp;key</span> from-end start end count key</i> &rArr;  <i class="i">result-sequence</i>
+</p>
+<p><code class="code">delete</code>  <i class="i">item sequence <span class="r">&amp;key</span> from-end test test-not start end count key</i> &rArr;  <i class="i">result-sequence</i>
+</p>
+<p><code class="code">delete-if</code>  <i class="i">test sequence <span class="r">&amp;key</span> from-end start end count key</i> &rArr;  <i class="i">result-sequence</i>
+</p>
+<p><code class="code">delete-if-not</code>  <i class="i">test sequence <span class="r">&amp;key</span> from-end start end count key</i> &rArr;  <i class="i">result-sequence</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-374"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-374"> &para;</a></span></h4>
+
+<p><i class="i">item</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> 
+  of one <i class="i">argument</i> that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">from-end</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is <i class="i">false</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">sequence</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">count</i>&mdash;an <i class="i">integer</i> or <b class="b">nil</b>.
+</p>
+<p>The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">result-sequence</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-489"><span>Description::<a class="copiable-link" href="#Description_003a_003a-489"> &para;</a></span></h4>
+
+<p><b class="b">remove</b>, <b class="b">remove-if</b>, and <b class="b">remove-if-not</b>
+return a <i class="i">sequence</i> from which 
+the elements that <i class="i">satisfy the test</i> 
+have been removed.  
+</p>
+<p><b class="b">delete</b>, <b class="b">delete-if</b>, and <b class="b">delete-if-not</b>
+are like <b class="b">remove</b>, <b class="b">remove-if</b>, and
+<b class="b">remove-if-not</b> respectively, 
+but they may modify <i class="i">sequence</i>.
+</p>
+<p>If <i class="i">sequence</i> is a <i class="i">vector</i>, the result is a
+<i class="i">vector</i> that has the same
+<i class="i">actual array element type</i> as <i class="i">sequence</i>.
+The result might or might not be simple, and 
+might or might not be <i class="i">identical</i>
+to <i class="i">sequence</i>.
+If <i class="i">sequence</i> is a <i class="i">list</i>, the result is a <i class="i">list</i>. 
+</p>
+<p>Supplying a <i class="i">from-end</i> of <i class="i">true</i> matters only when the
+<i class="i">count</i> is provided; in that case only the rightmost <i class="i">count</i> elements 
+<i class="i">satisfying the test</i> are deleted.
+</p>
+<p><i class="i">Count</i>, if supplied, limits the number of elements
+removed or deleted; if more than <i class="i">count</i> elements <i class="i">satisfy the test</i>,
+then of these elements only the leftmost or rightmost, depending on
+<i class="i">from-end</i>,
+are deleted or removed,
+as many as specified by <i class="i">count</i>.
+</p>
+<p>If <i class="i">count</i> is supplied and negative, 
+the behavior is as if zero had been supplied instead.
+</p>
+<p>If <i class="i">count</i> is <b class="b">nil</b>, all matching items are affected.
+</p>
+<p>For all these functions,
+elements 
+not removed or deleted occur in the same order in the result
+as they did in <i class="i">sequence</i>.
+</p>
+<p><b class="b">remove</b>, <b class="b">remove-if</b>, <b class="b">remove-if-not</b> return
+a <i class="i">sequence</i>
+of the same <i class="i">type</i> as <i class="i">sequence</i>
+that has the same elements except that those in the subsequence
+<i class="i">bounded</i> by <i class="i">start</i> and <i class="i">end</i> and <i class="i">satisfying the test</i>
+have been removed.  
+This is a non-destructive operation. If any
+elements need to be removed, the result will be a copy.
+The result of <b class="b">remove</b> may share
+with <i class="i">sequence</i>; 
+the result may be <i class="i">identical</i> to the input <i class="i">sequence</i>
+if no elements need to be removed.
+</p>
+<p><b class="b">delete</b>, <b class="b">delete-if</b>, and <b class="b">delete-if-not</b>
+return a <i class="i">sequence</i> 
+of the same <i class="i">type</i> as <i class="i">sequence</i>
+that has the same elements except that those in the subsequence
+<i class="i">bounded</i> by <i class="i">start</i> and <i class="i">end</i> and <i class="i">satisfying the test</i>
+have been deleted. 
+<i class="i">Sequence</i> may be destroyed and used to construct
+the result; however, the result might or might not be <i class="i">identical</i> 
+to <i class="i">sequence</i>.
+</p>
+<p><b class="b">delete</b>, when <i class="i">sequence</i> is a <i class="i">list</i>, is permitted to 
+<b class="b">setf</b> any part, <b class="b">car</b> or <b class="b">cdr</b>, of the
+top-level list structure in that <i class="i">sequence</i>.
+When <i class="i">sequence</i> is a <i class="i">vector</i>,  <b class="b">delete</b> is 
+permitted to change the dimensions of the <i class="i">vector</i> 
+and to slide its elements into new positions without
+permuting them to produce the resulting <i class="i">vector</i>.
+</p>
+<p><b class="b">delete-if</b> is constrained to behave exactly as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (delete nil <i class="i">sequence</i>
+             :test #'(lambda (ignore <i class="i">item</i>) (funcall <i class="i">test</i> <i class="i">item</i>))
+             ...)
+</pre></div>
+
+<h4 class="subsubheading" id="Examples_003a_003a-356"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-356"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (remove 4 '(1 3 4 5 9)) &rArr;  (1 3 5 9)
+ (remove 4 '(1 2 4 1 3 4 5)) &rArr;  (1 2 1 3 5)
+ (remove 4 '(1 2 4 1 3 4 5) :count 1) &rArr;  (1 2 1 3 4 5)
+ (remove 4 '(1 2 4 1 3 4 5) :count 1 :from-end t) &rArr;  (1 2 4 1 3 5)
+ (remove 3 '(1 2 4 1 3 4 5) :test #'&gt;) &rArr;  (4 3 4 5)
+ (setq lst '(list of four elements)) &rArr;  (LIST OF FOUR ELEMENTS)
+ (setq lst2 (copy-seq lst)) &rArr;  (LIST OF FOUR ELEMENTS)
+ (setq lst3 (delete 'four lst)) &rArr;  (LIST OF ELEMENTS)
+ (equal lst lst2) &rArr;  <i class="i">false</i>
+ (remove-if #'oddp '(1 2 4 1 3 4 5)) &rArr;  (2 4 4)
+ (remove-if #'evenp '(1 2 4 1 3 4 5) :count 1 :from-end t) 
+&rArr;  (1 2 4 1 3 5)
+ (remove-if-not #'evenp '(1 2 3 4 5 6 7 8 9) :count 2 :from-end t)
+&rArr;  (1 2 3 4 5 6 8)
+ (setq tester (list 1 2 4 1 3 4 5)) &rArr;  (1 2 4 1 3 4 5)
+ (delete 4 tester) &rArr;  (1 2 1 3 5)
+ (setq tester (list 1 2 4 1 3 4 5)) &rArr;  (1 2 4 1 3 4 5)
+ (delete 4 tester :count 1) &rArr;  (1 2 1 3 4 5)
+ (setq tester (list 1 2 4 1 3 4 5)) &rArr;  (1 2 4 1 3 4 5)
+ (delete 4 tester :count 1 :from-end t) &rArr;  (1 2 4 1 3 5)
+ (setq tester (list 1 2 4 1 3 4 5)) &rArr;  (1 2 4 1 3 4 5)
+ (delete 3 tester :test #'&gt;) &rArr;  (4 3 4 5)
+ (setq tester (list 1 2 4 1 3 4 5)) &rArr;  (1 2 4 1 3 4 5)
+ (delete-if #'oddp tester) &rArr;  (2 4 4)
+ (setq tester (list 1 2 4 1 3 4 5)) &rArr;  (1 2 4 1 3 4 5)
+ (delete-if #'evenp tester :count 1 :from-end t) &rArr;  (1 2 4 1 3 5)    
+ (setq tester (list 1 2 3 4 5 6)) &rArr;  (1 2 3 4 5 6) 
+ (delete-if #'evenp tester) &rArr;  (1 3 5) 
+ tester &rArr;  <i class="i">implementation-dependent</i>
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (setq foo (list 'a 'b 'c)) &rArr;  (A B C)
+ (setq bar (cdr foo)) &rArr;  (B C)
+ (setq foo (delete 'b foo)) &rArr;  (A C)
+ bar &rArr;  ((C)) or ...
+ (eq (cdr foo) (car bar)) &rArr;  T or ...
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-55"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-55"> &para;</a></span></h4>
+
+<p>For <b class="b">delete</b>, <b class="b">delete-if</b>, and <b class="b">delete-if-not</b>,
+<i class="i">sequence</i> may be destroyed and used to construct the result.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-167"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-167"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-399"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-399"> &para;</a></span></h4>
+
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-267"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-267"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> <i class="i">argument</i> is deprecated.
+</p>
+<p>The functions <b class="b">delete-if-not</b> and <b class="b">remove-if-not</b> are deprecated.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="remove_002dduplicates.html">remove-duplicates, delete-duplicates                             [Function]</a>, Previous: <a href="merge.html">merge                                                            [Function]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/remove_002dduplicates.html
@@ -0,0 +1,163 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>remove-duplicates (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="remove-duplicates (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="remove-duplicates (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="remove.html" rel="prev" title="remove">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="remove_002dduplicates">
+<div class="nav-panel">
+<p>
+Previous: <a href="remove.html" accesskey="p" rel="prev">remove, remove-if, remove-if-not,</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="remove_002dduplicates_002c-delete_002dduplicates-_005bFunction_005d"><span>17.3.23 remove-duplicates, delete-duplicates                             [Function]<a class="copiable-link" href="#remove_002dduplicates_002c-delete_002dduplicates-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">remove-duplicates</code>  <i class="i">sequence <span class="r">&amp;key</span>
+ 			  from-end test test-not
+				start end key</i><br>
+   &rArr;  <i class="i">result-sequence</i>
+</p>
+<p><code class="code">delete-duplicates</code>  <i class="i">sequence <span class="r">&amp;key</span> 
+			   from-end test test-not
+                                 start end key</i><br>
+   &rArr;  <i class="i">result-sequence</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-375"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-375"> &para;</a></span></h4>
+
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">from-end</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is <i class="i">false</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">sequence</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">result-sequence</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-490"><span>Description::<a class="copiable-link" href="#Description_003a_003a-490"> &para;</a></span></h4>
+
+<p><b class="b">remove-duplicates</b> returns a modified copy of <i class="i">sequence</i> 
+from which any element that matches another element occurring in
+<i class="i">sequence</i> has been removed. 
+</p>
+<p>If <i class="i">sequence</i> is a <i class="i">vector</i>, the result is a
+<i class="i">vector</i> that has the same
+<i class="i">actual array element type</i> as <i class="i">sequence</i>.
+The result might or might not be simple, and 
+might or might not be <i class="i">identical</i>
+to <i class="i">sequence</i>.
+If <i class="i">sequence</i> is a <i class="i">list</i>, the result is a <i class="i">list</i>. 
+</p>
+<p><b class="b">delete-duplicates</b> is like <b class="b">remove-duplicates</b>,
+but <b class="b">delete-duplicates</b> may modify <i class="i">sequence</i>.
+</p>
+<p>The elements of <i class="i">sequence</i> are compared <i class="i">pairwise</i>, and if any two match,
+then the one occurring earlier in <i class="i">sequence</i>
+is discarded, unless <i class="i">from-end</i> is <i class="i">true</i>, in which case the one
+later in <i class="i">sequence</i> is discarded.
+</p>
+<p><b class="b">remove-duplicates</b> and <b class="b">delete-duplicates</b> 
+return a <i class="i">sequence</i> of the same <i class="i">type</i> as 
+<i class="i">sequence</i> with enough elements removed so that no two of the remaining
+elements match.  The order of the elements remaining in the result
+is the same as the order in which they appear in <i class="i">sequence</i>.
+</p>
+<p><b class="b">remove-duplicates</b> returns a <i class="i">sequence</i>
+that may share
+with <i class="i">sequence</i> or may be <i class="i">identical</i> to <i class="i">sequence</i>
+if no elements need to be removed.
+</p>
+<p><b class="b">delete-duplicates</b>, when <i class="i">sequence</i> is a <i class="i">list</i>,
+is permitted to <b class="b">setf</b> any part, <b class="b">car</b> or <b class="b">cdr</b>,
+of the top-level list structure in that <i class="i">sequence</i>.
+When <i class="i">sequence</i> is a <i class="i">vector</i>, <b class="b">delete-duplicates</b> 
+is permitted to change the dimensions of the <i class="i">vector</i> 
+and to slide its elements into new positions without
+permuting them to produce the resulting <i class="i">vector</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-357"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-357"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (remove-duplicates &quot;aBcDAbCd&quot; :test #'char-equal :from-end t) &rArr;  &quot;aBcD&quot;
+ (remove-duplicates '(a b c b d d e)) &rArr;  (A C B D E)
+ (remove-duplicates '(a b c b d d e) :from-end t) &rArr;  (A B C D E)
+ (remove-duplicates '((foo #\a) (bar #\%) (baz #\A))
+     :test #'char-equal :key #'cadr) &rArr;  ((BAR #\%) (BAZ #\A))
+ (remove-duplicates '((foo #\a) (bar #\%) (baz #\A)) 
+     :test #'char-equal :key #'cadr :from-end t) &rArr;  ((FOO #\a) (BAR #\%))
+ (setq tester (list 0 1 2 3 4 5 6))
+ (delete-duplicates tester :key #'oddp :start 1 :end 6) &rArr;  (0 4 5 6)
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-56"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-56"> &para;</a></span></h4>
+
+<p><b class="b">delete-duplicates</b> might destructively modify <i class="i">sequence</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-168"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-168"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-400"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-400"> &para;</a></span></h4>
+
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-268"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-268"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> <i class="i">argument</i> is deprecated.
+</p>
+<p>These functions are useful for converting <i class="i">sequence</i> into a canonical
+form suitable for representing a set.
+</p>
+
+
+
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="remove.html">remove, remove-if, remove-if-not,</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/remove_002dmethod.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>remove-method (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="remove-method (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="remove-method (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="make_002dinstance.html" rel="next" title="make-instance">
+<link href="no_002dnext_002dmethod.html" rel="prev" title="no-next-method">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="remove_002dmethod">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dinstance.html" accesskey="n" rel="next">make-instance                                   [Standard Generic Function]</a>, Previous: <a href="no_002dnext_002dmethod.html" accesskey="p" rel="prev">no-next-method                                  [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="remove_002dmethod-_005bStandard-Generic-Function_005d"><span>7.7.18 remove-method                                   [Standard Generic Function]<a class="copiable-link" href="#remove_002dmethod-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-23"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-23"> &para;</a></span></h4>
+
+<p><code class="code">remove-method</code>  <i class="i">generic-function method</i> &rArr;  <i class="i">generic-function</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-12"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-12"> &para;</a></span></h4>
+
+<p><code class="code">remove-method</code>  <i class="i"><span class="r">(</span><i class="i">generic-function</i> <b class="b">standard-generic-function</b><span class="r">)</span>
+			      method</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-106"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-106"> &para;</a></span></h4>
+
+<p><i class="i">generic-function</i>&mdash;a <i class="i">generic function</i>.
+</p>
+<p><i class="i">method</i>&mdash;a <i class="i">method</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-145"><span>Description::<a class="copiable-link" href="#Description_003a_003a-145"> &para;</a></span></h4>
+
+<p>The <i class="i">generic function</i> <b class="b">remove-method</b> removes a <i class="i">method</i> from <i class="i">generic-function</i>
+by modifying the <i class="i">generic-function</i> (if necessary).
+</p>
+<p><b class="b">remove-method</b> must not signal an error if the <i class="i">method</i> 
+is not one of the <i class="i">methods</i> on the <i class="i">generic-function</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-127"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-127"> &para;</a></span></h4>
+
+<p><a class="ref" href="find_002dmethod.html">find-method                                     [Standard Generic Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/remprop.html
@@ -0,0 +1,136 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>remprop (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="remprop (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="remprop (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="boundp.html" rel="next" title="boundp">
+<link href="get.html" rel="prev" title="get">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="remprop">
+<div class="nav-panel">
+<p>
+Next: <a href="boundp.html" accesskey="n" rel="next">boundp                                                           [Function]</a>, Previous: <a href="get.html" accesskey="p" rel="prev">get                                                              [Accessor]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="remprop-_005bFunction_005d"><span>10.2.16 remprop                                                          [Function]<a class="copiable-link" href="#remprop-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">remprop</code>  <i class="i">symbol indicator</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-170"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-170"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">indicator</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-232"><span>Description::<a class="copiable-link" href="#Description_003a_003a-232"> &para;</a></span></h4>
+
+<p><b class="b">remprop</b> removes from the <i class="i">property list</i>_2 of <i class="i">symbol</i>
+a <i class="i">property</i>_1 with a <i class="i">property indicator</i>
+<i class="i">identical</i> to <i class="i">indicator</i>.
+</p>
+<p>If there are multiple <i class="i">properties</i>_1 with the <i class="i">identical</i> key,
+<b class="b">remprop</b> only removes the first such <i class="i">property</i>.
+</p>
+<p><b class="b">remprop</b> returns <i class="i">false</i> if no such <i class="i">property</i> was found,
+or <i class="i">true</i> if a property was found.
+</p>
+<p>The <i class="i">property indicator</i> 
+and the corresponding <i class="i">property value</i> 
+are removed in an undefined order
+by destructively splicing the property list.  
+</p>
+<p>The permissible side-effects correspond to those permitted for <b class="b">remf</b>,
+such that:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (remprop <i class="i">x</i> <i class="i">y</i>) &equiv; (remf (symbol-plist <i class="i">x</i>) <i class="i">y</i>)
+</pre></div>
+
+<h4 class="subsubheading" id="Examples_003a_003a-153"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-153"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq test (make-symbol &quot;PSEUDO-PI&quot;)) &rArr;  #:PSEUDO-PI
+ (symbol-plist test) &rArr;  ()
+ (setf (get test 'constant) t) &rArr;  T
+ (setf (get test 'approximation) 3.14) &rArr;  3.14
+ (setf (get test 'error-range) 'noticeable) &rArr;  NOTICEABLE
+ (symbol-plist test) 
+&rArr;  (ERROR-RANGE NOTICEABLE APPROXIMATION 3.14 CONSTANT T)
+ (setf (get test 'approximation) nil) &rArr;  NIL
+ (symbol-plist test) 
+&rArr;  (ERROR-RANGE NOTICEABLE APPROXIMATION NIL CONSTANT T)
+ (get test 'approximation) &rArr;  NIL
+ (remprop test 'approximation) &rArr;  <i class="i">true</i>
+ (get test 'approximation) &rArr;  NIL
+ (symbol-plist test)
+&rArr;  (ERROR-RANGE NOTICEABLE CONSTANT T)
+ (remprop test 'approximation) &rArr;  NIL
+ (symbol-plist test)
+&rArr;  (ERROR-RANGE NOTICEABLE CONSTANT T)
+ (remprop test 'error-range) &rArr;  <i class="i">true</i>
+ (setf (get test 'approximation) 3) &rArr;  3
+ (symbol-plist test)
+&rArr;  (APPROXIMATION 3 CONSTANT T)
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-21"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-21"> &para;</a></span></h4>
+
+<p>The <i class="i">property list</i> of <i class="i">symbol</i> is modified.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-60"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-60"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">symbol</i> is not a <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-205"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-205"> &para;</a></span></h4>
+
+<p><a class="ref" href="remf.html">remf                                                                [Macro]</a>
+, 
+<a class="ref" href="symbol_002dplist.html">symbol-plist                                                     [Accessor]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-125"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-125"> &para;</a></span></h4>
+
+<p><i class="i">Numbers</i> and <i class="i">characters</i> are not recommended for use as
+<i class="i">indicators</i> in portable code since <b class="b">remprop</b> tests with
+<b class="b">eq</b> rather than <b class="b">eql</b>, and consequently the effect of
+using such <i class="i">indicators</i> is <i class="i">implementation-dependent</i>.  
+Of course, if you&rsquo;ve gotten as far as needing to remove such a
+<i class="i">property</i>, you don&rsquo;t have much choice&mdash;the time to have been
+thinking about this was when you used <b class="b">setf</b> of <b class="b">get</b> to
+establish the <i class="i">property</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="boundp.html">boundp                                                           [Function]</a>, Previous: <a href="get.html">get                                                              [Accessor]</a>, Up: <a href="Symbols-Dictionary.html">Symbols Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/rename_002dfile.html
@@ -0,0 +1,124 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>rename-file (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="rename-file (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="rename-file (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Files-Dictionary.html" rel="up" title="Files Dictionary">
+<link href="delete_002dfile.html" rel="next" title="delete-file">
+<link href="file_002dwrite_002ddate.html" rel="prev" title="file-write-date">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="rename_002dfile">
+<div class="nav-panel">
+<p>
+Next: <a href="delete_002dfile.html" accesskey="n" rel="next">delete-file                                                      [Function]</a>, Previous: <a href="file_002dwrite_002ddate.html" accesskey="p" rel="prev">file-write-date                                                  [Function]</a>, Up: <a href="Files-Dictionary.html" accesskey="u" rel="up">Files Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="rename_002dfile-_005bFunction_005d"><span>20.2.7 rename-file                                                      [Function]<a class="copiable-link" href="#rename_002dfile-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">rename-file</code>  <i class="i">filespec new-name</i> &rArr;  <i class="i">defaulted-new-name, old-truename, new-truename</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-409"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-409"> &para;</a></span></h4>
+
+<p><i class="i">filespec</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">new-name</i>&mdash;a <i class="i">pathname designator</i> 
+other than a <i class="i">stream</i>.
+</p>
+<p><i class="i">defaulted-new-name</i>&mdash;a <i class="i">pathname</i>
+</p>
+<p><i class="i">old-truename</i>&mdash;a <i class="i">physical pathname</i>.
+</p>
+<p><i class="i">new-truename</i>&mdash;a <i class="i">physical pathname</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-528"><span>Description::<a class="copiable-link" href="#Description_003a_003a-528"> &para;</a></span></h4>
+
+<p><b class="b">rename-file</b> modifies the file system in such a way
+that the file indicated by <i class="i">filespec</i> is renamed to
+<i class="i">defaulted-new-name</i>.
+</p>
+<p>It is an error to specify a filename containing a <i class="i">wild</i> component,
+for <i class="i">filespec</i> to contain a <b class="b">nil</b> component where the file system does
+not permit a <b class="b">nil</b> component, or for the result of defaulting missing
+components of <i class="i">new-name</i> from <i class="i">filespec</i> to contain a <b class="b">nil</b> component
+where the file system does not permit a <b class="b">nil</b> component.
+</p>
+<p>If <i class="i">new-name</i> is a <i class="i">logical pathname</i>, 
+<b class="b">rename-file</b> returns a <i class="i">logical pathname</i> as its <i class="i">primary value</i>.
+</p>
+<p><b class="b">rename-file</b> 
+returns three values if successful.  The <i class="i">primary value</i>, <i class="i">defaulted-new-name</i>,
+is the resulting name which is composed of
+<i class="i">new-name</i> with any missing components filled in by performing
+a <b class="b">merge-pathnames</b> operation using <i class="i">filespec</i> as the defaults.
+The <i class="i">secondary value</i>, <i class="i">old-truename</i>,
+is the <i class="i">truename</i> of the <i class="i">file</i> before it was renamed.
+The <i class="i">tertiary value</i>, <i class="i">new-truename</i>,
+is the <i class="i">truename</i> of the <i class="i">file</i> after it was renamed.
+</p>
+<p>If the <i class="i">filespec</i> <i class="i">designator</i> is an open <i class="i">stream</i>,
+then the <i class="i">stream</i> itself and the file associated with it are 
+affected (if the <i class="i">file system</i> permits).
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-385"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-385"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; An example involving logical pathnames.
+ (with-open-file (stream &quot;sys:chemistry;lead.text&quot;
+                         :direction :output :if-exists :error)
+   (princ &quot;eureka&quot; stream)
+   (values (pathname stream) (truename stream)))
+&rArr;  #P&quot;SYS:CHEMISTRY;LEAD.TEXT.NEWEST&quot;, #P&quot;Q:&gt;sys&gt;chem&gt;lead.text.1&quot;
+ (rename-file &quot;sys:chemistry;lead.text&quot; &quot;gold.text&quot;)
+&rArr;  #P&quot;SYS:CHEMISTRY;GOLD.TEXT.NEWEST&quot;,
+   #P&quot;Q:&gt;sys&gt;chem&gt;lead.text.1&quot;,
+   #P&quot;Q:&gt;sys&gt;chem&gt;gold.text.1&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-189"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-189"> &para;</a></span></h4>
+
+<p>If the renaming operation is not successful, an error of <i class="i">type</i> <b class="b">file-error</b> is signaled.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> might be signaled if <i class="i">filespec</i> is <i class="i">wild</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-431"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-431"> &para;</a></span></h4>
+
+<p><a class="ref" href="truename.html">truename                                                         [Function]</a>
+,
+<b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="delete_002dfile.html">delete-file                                                      [Function]</a>, Previous: <a href="file_002dwrite_002ddate.html">file-write-date                                                  [Function]</a>, Up: <a href="Files-Dictionary.html">Files Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/rename_002dpackage.html
@@ -0,0 +1,83 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>rename-package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="rename-package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="rename-package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="shadow.html" rel="next" title="shadow">
+<link href="list_002dall_002dpackages.html" rel="prev" title="list-all-packages">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="rename_002dpackage">
+<div class="nav-panel">
+<p>
+Next: <a href="shadow.html" accesskey="n" rel="next">shadow                                                           [Function]</a>, Previous: <a href="list_002dall_002dpackages.html" accesskey="p" rel="prev">list-all-packages                                                [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="rename_002dpackage-_005bFunction_005d"><span>11.2.8 rename-package                                                   [Function]<a class="copiable-link" href="#rename_002dpackage-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">rename-package</code>  <i class="i">package new-name <span class="r">&amp;optional</span> new-nicknames</i> &rArr;  <i class="i">package-object</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-180"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-180"> &para;</a></span></h4>
+
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<p><i class="i">new-name</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<p><i class="i">new-nicknames</i>&mdash;a <i class="i">list</i> of <i class="i">string designators</i>.
+ The default is the <i class="i">empty list</i>.
+</p>
+<p><i class="i">package-object</i>&mdash;the renamed <i class="i">package</i> <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-244"><span>Description::<a class="copiable-link" href="#Description_003a_003a-244"> &para;</a></span></h4>
+
+<p>Replaces the name and nicknames of <i class="i">package</i>.
+The old name and all of the old nicknames of <i class="i">package</i> are eliminated
+and are replaced by <i class="i">new-name</i> and <i class="i">new-nicknames</i>.
+</p>
+<p>The consequences are undefined if <i class="i">new-name</i> or any <i class="i">new-nickname</i>
+conflicts with any existing package names.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-163"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-163"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (make-package 'temporary :nicknames '(&quot;TEMP&quot;)) &rArr;  #&lt;PACKAGE &quot;TEMPORARY&quot;&gt;
+ (rename-package 'temp 'ephemeral) &rArr;  #&lt;PACKAGE &quot;EPHEMERAL&quot;&gt;
+ (package-nicknames (find-package 'ephemeral)) &rArr;  ()
+ (find-package 'temporary) &rArr;  NIL
+ (rename-package 'ephemeral 'temporary '(temp fleeting))
+&rArr;  #&lt;PACKAGE &quot;TEMPORARY&quot;&gt;
+ (package-nicknames (find-package 'temp)) &rArr;  (&quot;TEMP&quot; &quot;FLEETING&quot;)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-216"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-216"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dpackage.html">make-package                                                     [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/replace.html
@@ -0,0 +1,118 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>replace (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="replace (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="replace (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="substitute.html" rel="next" title="substitute">
+<link href="mismatch.html" rel="prev" title="mismatch">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="replace">
+<div class="nav-panel">
+<p>
+Next: <a href="substitute.html" accesskey="n" rel="next">substitute, substitute-if, substitute-if-not,</a>, Previous: <a href="mismatch.html" accesskey="p" rel="prev">mismatch                                                         [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="replace-_005bFunction_005d"><span>17.3.18 replace                                                          [Function]<a class="copiable-link" href="#replace-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">replace</code>  <i class="i">sequence-1 sequence-2 <span class="r">&amp;key</span> start1 end1 start2 end2</i> &rArr;  <i class="i">sequence-1</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-370"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-370"> &para;</a></span></h4>
+
+<p><i class="i">sequence-1</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<p><i class="i">sequence-2</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<p><i class="i">start1</i>, <i class="i">end1</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">sequence-1</i>.
+ The defaults for <i class="i">start1</i> and <i class="i">end1</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">start2</i>, <i class="i">end2</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">sequence-2</i>.
+ The defaults for <i class="i">start2</i> and <i class="i">end2</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-485"><span>Description::<a class="copiable-link" href="#Description_003a_003a-485"> &para;</a></span></h4>
+
+<p>Destructively modifies <i class="i">sequence-1</i> 
+by replacing the <i class="i">elements</i> of <i class="i">subsequence-1</i>
+ 	      <i class="i">bounded</i> by <i class="i">start1</i> and <i class="i">end1</i>
+with the <i class="i">elements</i> of <i class="i">subsequence-2</i> 
+      <i class="i">bounded</i> by <i class="i">start2</i> and <i class="i">end2</i>. 
+</p>
+<p><i class="i">Sequence-1</i> is destructively modified by copying successive
+<i class="i">elements</i> into it from <i class="i">sequence-2</i>.
+<i class="i">Elements</i> of the subsequence of <i class="i">sequence-2</i> 
+<i class="i">bounded</i> by <i class="i">start2</i> and <i class="i">end2</i>
+are copied into the subsequence of <i class="i">sequence-1</i> 
+<i class="i">bounded</i> by <i class="i">start1</i> and <i class="i">end1</i>.
+If these subsequences are not of the same length,
+then the shorter length determines how many <i class="i">elements</i> are copied;
+the extra <i class="i">elements</i> near the end of the longer subsequence 
+are not involved in the operation.
+The number of elements copied can be expressed as:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (min (- <i class="i">end1</i> <i class="i">start1</i>) (- <i class="i">end2</i> <i class="i">start2</i>))
+</pre></div>
+
+<p>If <i class="i">sequence-1</i> and <i class="i">sequence-2</i> are the <i class="i">same</i> <i class="i">object</i>
+and the region being modified overlaps the region being copied
+from, then it is as if the entire source region were copied to another
+place and only then copied back into the target region.
+However, if <i class="i">sequence-1</i> and <i class="i">sequence-2</i> are not the same,
+but the region being modified overlaps the region being copied from
+(perhaps because of shared list structure or displaced <i class="i">arrays</i>),
+then after the <b class="b">replace</b> operation
+the subsequence of <i class="i">sequence-1</i> being modified will have
+unpredictable contents.
+It is an error if the elements of <i class="i">sequence-2</i> are not of a 
+<i class="i">type</i> that can be stored into <i class="i">sequence-1</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-352"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-352"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (replace &quot;abcdefghij&quot; &quot;0123456789&quot; :start1 4 :end1 7 :start2 4) 
+&rArr;  &quot;abcd456hij&quot;
+ (setq lst &quot;012345678&quot;) &rArr;  &quot;012345678&quot;
+ (replace lst lst :start1 2 :start2 0) &rArr;  &quot;010123456&quot;
+ lst &rArr;  &quot;010123456&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-53"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-53"> &para;</a></span></h4>
+
+<p>The <i class="i">sequence-1</i> is modified.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-395"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-395"> &para;</a></span></h4>
+
+<p><a class="ref" href="fill.html">fill                                                             [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="substitute.html">substitute, substitute-if, substitute-if-not,</a>, Previous: <a href="mismatch.html">mismatch                                                         [Function]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/rest.html
@@ -0,0 +1,89 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>rest (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="rest (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="rest (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="member-_0028Function_0029.html" rel="next" title="member (Function)">
+<link href="nthcdr.html" rel="prev" title="nthcdr">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="rest">
+<div class="nav-panel">
+<p>
+Next: <a href="member-_0028Function_0029.html" accesskey="n" rel="next">member, member-if, member-if-not                                 [Function]</a>, Previous: <a href="nthcdr.html" accesskey="p" rel="prev">nthcdr                                                           [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="rest-_005bAccessor_005d"><span>14.2.32 rest                                                             [Accessor]<a class="copiable-link" href="#rest-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">rest</code>  <i class="i">list</i> &rArr;  <i class="i">tail</i>
+</p>
+<p>(setf (<code class="code">         rest</code> <i class="i">list</i>) new-tail)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-301"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-301"> &para;</a></span></h4>
+
+<p><i class="i">list</i>&mdash;a <i class="i">list</i>,
+</p>
+<p>which might be a <i class="i">dotted list</i> or a <i class="i">circular list</i>.
+</p>
+<p><i class="i">tail</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-402"><span>Description::<a class="copiable-link" href="#Description_003a_003a-402"> &para;</a></span></h4>
+
+<p><b class="b">rest</b> performs the same operation as <b class="b">cdr</b>,
+but mnemonically complements <b class="b">first</b>.
+Specifically,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (rest <i class="i">list</i>) &equiv; (cdr <i class="i">list</i>)
+ (setf (rest <i class="i">list</i>) <i class="i">new-tail</i>) &equiv; (setf (cdr <i class="i">list</i>) <i class="i">new-tail</i>)
+</pre></div>
+
+<h4 class="subsubheading" id="Examples_003a_003a-285"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-285"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (rest '(1 2)) &rArr;  (2)
+ (rest '(1 . 2)) &rArr;  2
+ (rest '(1)) &rArr;  NIL
+ (setq *cons* '(1 . 2)) &rArr;  (1 . 2)
+ (setf (rest *cons*) &quot;two&quot;) &rArr;  &quot;two&quot;
+ *cons* &rArr;  (1 . &quot;two&quot;)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-326"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-326"> &para;</a></span></h4>
+
+<p><b class="b">cdr</b>,
+<a class="ref" href="nthcdr.html">nthcdr                                                           [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-217"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-217"> &para;</a></span></h4>
+
+<p><b class="b">rest</b> is often preferred stylistically over <b class="b">cdr</b>
+when the argument is to being subjectively viewed as a <i class="i">list</i> 
+rather than as a <i class="i">cons</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/restart.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>restart (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="restart (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="restart (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="compute_002drestarts.html" rel="next" title="compute-restarts">
+<link href="make_002dcondition.html" rel="prev" title="make-condition">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="restart">
+<div class="nav-panel">
+<p>
+Next: <a href="compute_002drestarts.html" accesskey="n" rel="next">compute-restarts                                                 [Function]</a>, Previous: <a href="make_002dcondition.html" accesskey="p" rel="prev">make-condition                                                   [Function]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="restart-_005bSystem-Class_005d"><span>9.2.31 restart                                                      [System Class]<a class="copiable-link" href="#restart-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-30"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-30"> &para;</a></span></h4>
+<p><b class="b">restart</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-201"><span>Description::<a class="copiable-link" href="#Description_003a_003a-201"> &para;</a></span></h4>
+
+<p>An <i class="i">object</i> of <i class="i">type</i> <b class="b">restart</b> represents a <i class="i">function</i> that can be
+called to perform some form of recovery action, usually a transfer of control 
+to an outer point in the running program.
+</p>
+<p>An <i class="i">implementation</i> is free to implement a <i class="i">restart</i> in whatever 
+manner is most convenient; a <i class="i">restart</i> has only <i class="i">dynamic extent</i>
+relative to the scope of the binding <i class="i">form</i> which <i class="i">establishes</i> it.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/restart_002dbind.html
@@ -0,0 +1,164 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>restart-bind (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="restart-bind (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="restart-bind (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="restart_002dcase.html" rel="next" title="restart-case">
+<link href="invoke_002drestart_002dinteractively.html" rel="prev" title="invoke-restart-interactively">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="restart_002dbind">
+<div class="nav-panel">
+<p>
+Next: <a href="restart_002dcase.html" accesskey="n" rel="next">restart-case                                                        [Macro]</a>, Previous: <a href="invoke_002drestart_002dinteractively.html" accesskey="p" rel="prev">invoke-restart-interactively                                     [Function]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="restart_002dbind-_005bMacro_005d"><span>9.2.36 restart-bind                                                        [Macro]<a class="copiable-link" href="#restart_002dbind-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">restart-bind</code>  <i class="i"><span class="r">(</span>{<span class="r">(</span>name function
+				        {!<i class="i">key-val-pair</i>}*<span class="r">)</span>}<span class="r">)</span>
+		   {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><i class="i">key-val-pair</i>&nbsp;::=<code class="t">:interactive-function</code>&nbsp;<span class="r">interactive-function</span>&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;<code class="t">:report-function</code>&nbsp;<span class="r">report-function</span>&nbsp;|&nbsp;<!-- /@w -->
+&nbsp;<code class="t">:test-function</code>&nbsp;<span class="r">test-function</span><!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-152"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-152"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>; not evaluated.
+</p>
+<p><i class="i">function</i>&mdash;a <i class="i">form</i>; evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">interactive-function</i>&mdash;a <i class="i">form</i>; evaluated.
+</p>
+<p><i class="i">report-function</i>&mdash;a <i class="i">form</i>; evaluated.
+</p>
+<p><i class="i">test-function</i>&mdash;a <i class="i">form</i>; evaluated.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-206"><span>Description::<a class="copiable-link" href="#Description_003a_003a-206"> &para;</a></span></h4>
+
+<p><b class="b">restart-bind</b> executes the body of <i class="i">forms</i> 
+in a <i class="i">dynamic environment</i> where <i class="i">restarts</i> with the given <i class="i">names</i> are in effect.
+</p>
+<p>If a <i class="i">name</i> is <b class="b">nil</b>, it indicates an anonymous restart;
+if a <i class="i">name</i> is a <i class="i">non-nil</i> <i class="i">symbol</i>, it indicates a named restart.
+</p>
+<p>The <i class="i">function</i>, <i class="i">interactive-function</i>, and <i class="i">report-function</i>
+are unconditionally evaluated in the current lexical and dynamic environment
+prior to evaluation of the body. Each of these <i class="i">forms</i> must evaluate to
+a <i class="i">function</i>.
+</p>
+<p>If <b class="b">invoke-restart</b> is done on that restart,
+the <i class="i">function</i> which resulted from evaluating <i class="i">function</i> 
+is called, in the <i class="i">dynamic environment</i> of the <b class="b">invoke-restart</b>,
+with the <i class="i">arguments</i> given to <b class="b">invoke-restart</b>. 
+The <i class="i">function</i> may either perform a non-local transfer of control or may return normally.
+</p>
+<p>If the restart is invoked interactively from the debugger 
+(using <b class="b">invoke-restart-interactively</b>), 
+the arguments are defaulted by calling the <i class="i">function</i> 
+which resulted from evaluating <i class="i">interactive-function</i>.
+That <i class="i">function</i> may optionally prompt interactively on <i class="i">query I/O</i>, 
+and should return a <i class="i">list</i> of arguments to be used by
+<b class="b">invoke-restart-interactively</b> when invoking the restart. 
+</p>
+<p>If a restart is invoked interactively but no <i class="i">interactive-function</i> is used,
+then an argument list of <b class="b">nil</b> is used. In that case, the <i class="i">function</i>
+must be compatible with an empty argument list.
+</p>
+<p>If the restart is presented interactively (<i class="i">e.g.</i>, by the debugger),
+the presentation is done by calling the <i class="i">function</i> which resulted
+from evaluating <i class="i">report-function</i>.
+This <i class="i">function</i> must be a <i class="i">function</i> of one argument, a <i class="i">stream</i>. 
+It is expected to print a description of the action that the restart takes
+to that <i class="i">stream</i>. 
+This <i class="i">function</i> is called any time the restart is printed 
+while <b class="b">*print-escape*</b> is <b class="b">nil</b>.
+</p>
+<p>In the case of interactive invocation, 
+the result is dependent on the value of <code class="t">:interactive-function</code>
+as follows.
+</p>
+<dl class="table">
+<dt><code class="t">:interactive-function</code></dt>
+<dd><p><i class="i">Value</i> is evaluated in the current lexical environment and
+  should return a <i class="i">function</i> of no arguments which constructs a 
+  <i class="i">list</i> of arguments to be used by <b class="b">invoke-restart-interactively</b> 
+  when invoking this restart.  The <i class="i">function</i> may prompt interactively
+  using <i class="i">query I/O</i> if necessary.
+</p>
+</dd>
+<dt><code class="t">:report-function</code></dt>
+<dd><p><i class="i">Value</i> is evaluated in the current lexical environment and
+  should return a <i class="i">function</i> of one argument, a <i class="i">stream</i>, which
+  prints on the <i class="i">stream</i> a summary of the action that this restart
+  takes.  This <i class="i">function</i> is called whenever the restart is
+  reported (printed while <b class="b">*print-escape*</b> is <b class="b">nil</b>).
+  If no <code class="t">:report-function</code> option is provided, the manner in which the
+  <i class="i">restart</i> is reported is <i class="i">implementation-dependent</i>.
+</p>
+</dd>
+<dt><code class="t">:test-function</code></dt>
+<dd><p><i class="i">Value</i> is evaluated in the current lexical environment and
+  should return a <i class="i">function</i> of one argument, a <i class="i">condition</i>, which
+  returns <i class="i">true</i> if the restart is to be considered visible.
+</p>
+</dd>
+</dl>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-34"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-34"> &para;</a></span></h4>
+
+<p><b class="b">*query-io*</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-180"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-180"> &para;</a></span></h4>
+
+<p><a class="ref" href="restart_002dcase.html">restart-case                                                        [Macro]</a>
+, 
+<a class="ref" href="with_002dsimple_002drestart.html">with-simple-restart                                                 [Macro]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-110"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-110"> &para;</a></span></h4>
+
+<p><b class="b">restart-bind</b> is primarily intended to be used to implement
+<b class="b">restart-case</b> and  might be useful in implementing other
+macros. Programmers who are uncertain about whether to use <b class="b">restart-case</b>
+or <b class="b">restart-bind</b> should prefer <b class="b">restart-case</b> for the cases where
+it is powerful enough, using <b class="b">restart-bind</b> only in cases where its full
+generality is really needed.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="restart_002dcase.html">restart-case                                                        [Macro]</a>, Previous: <a href="invoke_002drestart_002dinteractively.html">invoke-restart-interactively                                     [Function]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/restart_002dcase.html
@@ -0,0 +1,326 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>restart-case (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="restart-case (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="restart-case (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="restart_002dname.html" rel="next" title="restart-name">
+<link href="restart_002dbind.html" rel="prev" title="restart-bind">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="restart_002dcase">
+<div class="nav-panel">
+<p>
+Next: <a href="restart_002dname.html" accesskey="n" rel="next">restart-name                                                     [Function]</a>, Previous: <a href="restart_002dbind.html" accesskey="p" rel="prev">restart-bind                                                        [Macro]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="restart_002dcase-_005bMacro_005d"><span>9.2.37 restart-case                                                        [Macro]<a class="copiable-link" href="#restart_002dcase-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">restart-case</code>  <i class="i">restartable-form <span class="r">{!<i class="i">clause</i>}</span></i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><i class="i">clause</i>&nbsp;::=<span class="r">(</span>&nbsp;case-name&nbsp;lambda-list&nbsp;<!-- /@w -->
+&nbsp;[[<code class="t">:interactive</code>&nbsp;interactive-expression&nbsp;|&nbsp;<code class="t">:report</code>&nbsp;report-expression&nbsp;|&nbsp;<code class="t">:test</code>&nbsp;test-expression]]&nbsp;<!-- /@w -->
+&nbsp;{<i class="i">declaration</i>}*&nbsp;{<i class="i">form</i>}*<span class="r">)</span><!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-153"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-153"> &para;</a></span></h4>
+
+<p><i class="i">restartable-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">case-name</i>&mdash;a <i class="i">symbol</i> or <b class="b">nil</b>.
+</p>
+<p><i class="i">lambda-list</i>&mdash;an <i class="i">ordinary lambda list</i>.
+</p>
+<p><i class="i">interactive-expression</i>&mdash;a <i class="i">symbol</i> or a <i class="i">lambda expression</i>.
+</p>
+<p><i class="i">report-expression</i>&mdash;a <i class="i">string</i>,
+			     a <i class="i">symbol</i>,
+			     or a <i class="i">lambda expression</i>.                                 
+</p>
+<p><i class="i">test-expression</i>&mdash;a <i class="i">symbol</i> or a <i class="i">lambda expression</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> resulting from the <i class="i">evaluation</i>
+		   of <i class="i">restartable-form</i>, 
+		  or the <i class="i">values</i> returned by the last <i class="i">form</i>
+		   executed in a chosen <i class="i">clause</i>,
+		  or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-207"><span>Description::<a class="copiable-link" href="#Description_003a_003a-207"> &para;</a></span></h4>
+
+<p><b class="b">restart-case</b> evaluates <i class="i">restartable-form</i> in a <i class="i">dynamic environment</i>
+where the clauses have special meanings as points to which control may be transferred.  
+If <i class="i">restartable-form</i> finishes executing and returns any values, 
+all values returned are returned by <b class="b">restart-case</b> and 
+processing has completed. While <i class="i">restartable-form</i> is executing, any code may
+  transfer control to one of the clauses (see <b class="b">invoke-restart</b>).  
+If a transfer
+  occurs, the forms in the body of that clause is evaluated and any values
+  returned by the last such form are returned by 
+<b class="b">restart-case</b>.
+In this case, the 
+dynamic state is unwound appropriately (so that the restarts established
+around the <i class="i">restartable-form</i> are no longer active) prior to execution of the
+clause.
+</p>
+<p>If there are no <i class="i">forms</i> 
+in a selected clause, <b class="b">restart-case</b> returns <b class="b">nil</b>.
+</p>
+<p>If <i class="i">case-name</i> is a <i class="i">symbol</i>, it names this restart.
+</p>
+<p>It is possible to have more than one clause use the same <i class="i">case-name</i>.
+In this case, the first clause with that name is found by <b class="b">find-restart</b>.  
+The other clauses are accessible using <b class="b">compute-restarts</b>.
+</p>
+<p>Each <i class="i">arglist</i> is an <i class="i">ordinary lambda list</i> to be bound during the 
+execution of its corresponding <i class="i">forms</i>.  These parameters are used 
+by the <b class="b">restart-case</b> clause to receive any necessary data from a call
+to <b class="b">invoke-restart</b>.
+</p>
+<p>By default, <b class="b">invoke-restart-interactively</b> passes no arguments and
+all arguments must be optional in order to accomodate interactive
+restarting.  However, the arguments need not be optional if the
+<code class="t">:interactive</code> 
+keyword has been used to inform <b class="b">invoke-restart-interactively</b>
+  about how to compute a proper argument list.
+</p>
+<p><i class="i">Keyword</i> options have the following meaning.
+</p><dl class="table">
+<dt><code class="t">:interactive</code></dt>
+<dd><p>The <i class="i">value</i> supplied by <code class="t">:interactive <i class="i">value</i></code>
+must be a suitable argument to <b class="b">function</b>. 
+<code class="t">(function <i class="i">value</i>)</code> is evaluated in the current lexical
+    environment.  It should return a <i class="i">function</i> of no arguments which 
+    returns arguments to be used by 
+<b class="b">invoke-restart-interactively</b> when it is invoked.
+<b class="b">invoke-restart-interactively</b> 
+is called in the dynamic
+    environment available prior to any restart attempt, and uses 
+<i class="i">query I/O</i> for user interaction.
+</p>
+<p>If a restart is invoked interactively but no <code class="t">:interactive</code> option
+    was supplied, the argument list used in the invocation is the empty
+    list.
+</p>
+</dd>
+<dt><code class="t">:report</code></dt>
+<dd><p>If the <i class="i">value</i> supplied by <code class="t">:report <i class="i">value</i></code>
+is a <i class="i">lambda expression</i> or a <i class="i">symbol</i>, it 
+must be acceptable to <b class="b">function</b>.
+<code class="t">(function <i class="i">value</i>)</code> is evaluated in the current lexical
+environment.  It should return a <i class="i">function</i> of one
+argument, a <i class="i">stream</i>, which prints on the <i class="i">stream</i> a 
+description of the restart.  This <i class="i">function</i> is called 
+whenever the restart is printed while <b class="b">*print-escape*</b> is <b class="b">nil</b>.
+</p>
+<p>If <i class="i">value</i> is a <i class="i">string</i>, it is a shorthand for
+</p>
+<div class="example">
+<pre class="example-preformatted"> (lambda (stream) (write-string value stream))
+</pre></div>
+
+<p>If a named restart is asked to report but no report information has been
+    supplied, the name of the restart is used in generating default report text.
+</p>
+<p>When <b class="b">*print-escape*</b> is <b class="b">nil</b>, the 
+printer uses the report information for
+    a restart.  For example, a debugger might announce the action of typing
+    a &ldquo;continue&rdquo; command by:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (format t &quot;~&amp;~S -- ~A~
+</pre></div>
+
+<p>which might then display as something like:
+</p>
+<div class="example">
+<pre class="example-preformatted"> :CONTINUE -- Return to command level
+</pre></div>
+
+<p>The consequences are unspecified if an unnamed restart is specified
+but no <code class="t">:report</code> option is provided.
+</p>
+</dd>
+<dt><code class="t">:test</code></dt>
+<dd><p>The <i class="i">value</i> supplied by <code class="t">:test <i class="i">value</i></code>
+must be a suitable argument to <b class="b">function</b>. 
+<code class="t">(function <i class="i">value</i>)</code> is evaluated in the current lexical
+    environment.  It should return a <i class="i">function</i> of one <i class="i">argument</i>, the
+<i class="i">condition</i>, that
+returns <i class="i">true</i> if the restart is to be considered visible.
+</p>
+<p>The default for this option is equivalent to <code class="t">(lambda (c) (declare (ignore c)) t)</code>.
+</p>
+</dd>
+</dl>
+
+<p>If the <i class="i">restartable-form</i> is a <i class="i">list</i> whose <i class="i">car</i> is any of
+the <i class="i">symbols</i> <b class="b">signal</b>, <b class="b">error</b>, <b class="b">cerror</b>,
+or <b class="b">warn</b> (or is a <i class="i">macro form</i> which macroexpands into such a
+<i class="i">list</i>), then <b class="b">with-condition-restarts</b> is used implicitly
+to associate the indicated <i class="i">restarts</i> with the <i class="i">condition</i> to be
+signaled.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-134"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-134"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (restart-case
+     (handler-bind ((error #'(lambda (c)
+                             (declare (ignore condition))
+                             (invoke-restart 'my-restart 7))))
+       (error &quot;Foo.&quot;))
+   (my-restart (&amp;optional v) v))
+&rArr;  7
+
+ (define-condition food-error (error) ())
+&rArr;  FOOD-ERROR
+ (define-condition bad-tasting-sundae (food-error) 
+   ((ice-cream :initarg :ice-cream :reader bad-tasting-sundae-ice-cream)
+    (sauce :initarg :sauce :reader bad-tasting-sundae-sauce)
+    (topping :initarg :topping :reader bad-tasting-sundae-topping))
+   (:report (lambda (condition stream)
+              (format stream &quot;Bad tasting sundae with ~S, ~S, and ~S&quot;
+                      (bad-tasting-sundae-ice-cream condition)
+                      (bad-tasting-sundae-sauce condition)
+                      (bad-tasting-sundae-topping condition)))))
+&rArr;  BAD-TASTING-SUNDAE
+ (defun all-start-with-same-letter (symbol1 symbol2 symbol3)
+   (let ((first-letter (char (symbol-name symbol1) 0)))
+     (and (eql first-letter (char (symbol-name symbol2) 0))
+          (eql first-letter (char (symbol-name symbol3) 0)))))
+&rArr;  ALL-START-WITH-SAME-LETTER
+ (defun read-new-value ()
+   (format t &quot;Enter a new value: &quot;)
+   (multiple-value-list (eval (read))))
+&rArr;  READ-NEW-VALUE
+</pre><pre class="example-preformatted"> (defun verify-or-fix-perfect-sundae (ice-cream sauce topping)
+   (do ()
+      ((all-start-with-same-letter ice-cream sauce topping))
+     (restart-case
+       (error 'bad-tasting-sundae
+              :ice-cream ice-cream
+              :sauce sauce
+              :topping topping)
+       (use-new-ice-cream (new-ice-cream)
+         :report &quot;Use a new ice cream.&quot;
+         :interactive read-new-value  
+         (setq ice-cream new-ice-cream))
+       (use-new-sauce (new-sauce)
+         :report &quot;Use a new sauce.&quot;
+         :interactive read-new-value
+         (setq sauce new-sauce))
+       (use-new-topping (new-topping)
+         :report &quot;Use a new topping.&quot;
+         :interactive read-new-value
+         (setq topping new-topping))))
+   (values ice-cream sauce topping))
+&rArr;  VERIFY-OR-FIX-PERFECT-SUNDAE
+ (verify-or-fix-perfect-sundae 'vanilla 'caramel 'cherry)
+<code class="t"> |&gt; </code> Error: Bad tasting sundae with VANILLA, CARAMEL, and CHERRY.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Use a new ice cream.
+<code class="t"> |&gt; </code>  2: Use a new sauce.
+<code class="t"> |&gt; </code>  3: Use a new topping.
+<code class="t"> |&gt; </code>  4: Return to Lisp Toplevel.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:continue 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Use a new ice cream.
+<code class="t"> |&gt; </code> Enter a new ice cream: <b class="b">|&gt;&gt;</b><code class="t">'chocolate</code><b class="b">&lt;&lt;|</b>
+&rArr;  CHOCOLATE, CARAMEL, CHERRY
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-181"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-181"> &para;</a></span></h4>
+
+<p><a class="ref" href="restart_002dbind.html">restart-bind                                                        [Macro]</a>
+, 
+<a class="ref" href="with_002dsimple_002drestart.html">with-simple-restart                                                 [Macro]</a>
+.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-111"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-111"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (restart-case <i class="i">expression</i>
+    (<i class="i">name1</i> <i class="i">arglist1</i> ...<i class="i">options1</i>... . <i class="i">body1</i>)
+    (<i class="i">name2</i> <i class="i">arglist2</i> ...<i class="i">options2</i>... . <i class="i">body2</i>))
+</pre></div>
+
+<p>is essentially equivalent to
+</p>
+<div class="example">
+<pre class="example-preformatted"> (block #1=#:g0001
+   (let ((#2=#:g0002 nil))
+        (tagbody
+        (restart-bind ((name1 #'(lambda (&amp;rest temp)
+                                (setq #2# temp)
+                                (go #3=#:g0003))
+                          ...<i class="i">slightly-transformed-options1</i>...)
+                       (name2 #'(lambda (&amp;rest temp)
+                                (setq #2# temp)
+                                (go #4=#:g0004))
+                          ...<i class="i">slightly-transformed-options2</i>...))
+        (return-from #1# <i class="i">expression</i>))
+          #3# (return-from #1#
+                  (apply #'(lambda <i class="i">arglist1</i> . <i class="i">body1</i>) #2#))
+          #4# (return-from #1#
+                  (apply #'(lambda <i class="i">arglist2</i> . <i class="i">body2</i>) #2#)))))
+</pre></div>
+
+<p>Unnamed restarts are generally only useful interactively
+    and an interactive option which has no description is of little value.
+    Implementations are encouraged to warn if 
+an unnamed restart is used and no report information
+    is provided
+at compilation    time.  
+At runtime, this error might be noticed when entering
+      the debugger.  Since signaling an error would probably cause recursive
+      entry into the debugger (causing yet another recursive error, etc.) it is
+      suggested that the debugger print some indication of such problems when
+      they occur but not actually signal errors.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (restart-case (signal fred)
+   (a ...)
+   (b ...))
+ &equiv;
+ (restart-case
+     (with-condition-restarts fred 
+                              (list (find-restart 'a) 
+                                    (find-restart 'b))
+       (signal fred))
+   (a ...)
+   (b ...))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="restart_002dname.html">restart-name                                                     [Function]</a>, Previous: <a href="restart_002dbind.html">restart-bind                                                        [Macro]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/restart_002dname.html
@@ -0,0 +1,78 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>restart-name (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="restart-name (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="restart-name (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="with_002dcondition_002drestarts.html" rel="next" title="with-condition-restarts">
+<link href="restart_002dcase.html" rel="prev" title="restart-case">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="restart_002dname">
+<div class="nav-panel">
+<p>
+Next: <a href="with_002dcondition_002drestarts.html" accesskey="n" rel="next">with-condition-restarts                                             [Macro]</a>, Previous: <a href="restart_002dcase.html" accesskey="p" rel="prev">restart-case                                                        [Macro]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="restart_002dname-_005bFunction_005d"><span>9.2.38 restart-name                                                     [Function]<a class="copiable-link" href="#restart_002dname-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">restart-name</code>  <i class="i">restart</i> &rArr;  <i class="i">name</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-154"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-154"> &para;</a></span></h4>
+
+<p><i class="i">restart</i>&mdash;a <i class="i">restart</i>.
+</p>
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-208"><span>Description::<a class="copiable-link" href="#Description_003a_003a-208"> &para;</a></span></h4>
+
+<p>Returns the name of the <i class="i">restart</i>,
+or <b class="b">nil</b> if the <i class="i">restart</i> is not named.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-135"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-135"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (restart-case 
+     (loop for restart in (compute-restarts)
+               collect (restart-name restart))
+   (case1 () :report &quot;Return 1.&quot; 1)
+   (nil   () :report &quot;Return 2.&quot; 2)
+   (case3 () :report &quot;Return 3.&quot; 3)
+   (case1 () :report &quot;Return 4.&quot; 4))
+&rArr;  (CASE1 NIL CASE3 CASE1 ABORT)
+ ;; In the example above the restart named ABORT was not created
+ ;; explicitly, but was implicitly supplied by the system.
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-182"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-182"> &para;</a></span></h4>
+
+<p><a class="ref" href="compute_002drestarts.html">compute-restarts                                                 [Function]</a>
+</p>
+<p><a class="ref" href="find_002drestart.html">find-restart                                                     [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/return.html
@@ -0,0 +1,86 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>return (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="return (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="return (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="tagbody.html" rel="next" title="tagbody">
+<link href="return_002dfrom.html" rel="prev" title="return-from">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="return">
+<div class="nav-panel">
+<p>
+Next: <a href="tagbody.html" accesskey="n" rel="next">tagbody                                                  [Special Operator]</a>, Previous: <a href="return_002dfrom.html" accesskey="p" rel="prev">return-from                                              [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="return-_005bMacro_005d"><span>5.3.26 return                                                              [Macro]<a class="copiable-link" href="#return-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">return</code>  <i class="i"><span class="r">[</span><i class="i">result</i><span class="r">]</span></i> &rArr;  #&lt;NoValue&gt;
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-47"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-47"> &para;</a></span></h4>
+
+<p><i class="i">result</i>&mdash;a <i class="i">form</i>; evaluated.
+  The default is <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-79"><span>Description::<a class="copiable-link" href="#Description_003a_003a-79"> &para;</a></span></h4>
+
+<p>Returns, as if by <b class="b">return-from</b>, from the <i class="i">block</i> named <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-53"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-53"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (block nil (return) 1) &rArr;  NIL
+ (block nil (return 1) 2) &rArr;  1
+ (block nil (return (values 1 2)) 3) &rArr;  1, 2
+ (block nil (block alpha (return 1) 2)) &rArr;  1
+ (block alpha (block nil (return 1)) 2) &rArr;  2
+ (block nil (block nil (return 1) 2)) &rArr;  1
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-64"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-64"> &para;</a></span></h4>
+
+<p><a class="ref" href="block.html">block                                                    [Special Operator]</a>
+,
+<a class="ref" href="return_002dfrom.html">return-from                                              [Special Operator]</a>
+,
+<a class="ref" href="Evaluation.html">Evaluation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-38"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-38"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (return) &equiv; (return-from nil)
+ (return <i class="i">form</i>) &equiv; (return-from nil <i class="i">form</i>)
+</pre></div>
+
+<p>The <i class="i">implicit blocks</i> <i class="i">established</i> by <i class="i">macros</i> such as <b class="b">do</b>
+are often named <b class="b">nil</b>, so that <b class="b">return</b> can be used to exit from
+such <i class="i">forms</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/return_002dfrom.html
@@ -0,0 +1,135 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>return-from (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="return-from (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="return-from (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="return.html" rel="next" title="return">
+<link href="go.html" rel="prev" title="go">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="return_002dfrom">
+<div class="nav-panel">
+<p>
+Next: <a href="return.html" accesskey="n" rel="next">return                                                              [Macro]</a>, Previous: <a href="go.html" accesskey="p" rel="prev">go                                                       [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="return_002dfrom-_005bSpecial-Operator_005d"><span>5.3.25 return-from                                              [Special Operator]<a class="copiable-link" href="#return_002dfrom-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">return-from</code>  <i class="i"><i class="i">name</i> <span class="r">[</span><i class="i">result</i><span class="r">]</span></i> 
+        &rArr;  #&lt;NoValue&gt;
+</p><h4 class="subsubheading" id="Arguments-and-Values_003a_003a-46"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-46"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">block tag</i>; not evaluated.
+</p>
+<p><i class="i">result</i>&mdash;a <i class="i">form</i>; evaluated.
+  The default is <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-78"><span>Description::<a class="copiable-link" href="#Description_003a_003a-78"> &para;</a></span></h4>
+
+<p>Returns control and <i class="i">multiple values</i>_2 from a lexically enclosing <i class="i">block</i>.
+</p>
+<p>A <b class="b">block</b> <i class="i">form</i> named <i class="i">name</i> must lexically enclose
+the occurrence of <b class="b">return-from</b>;  any <i class="i">values</i> <i class="i">yielded</i>
+by the <i class="i">evaluation</i> of <i class="i">result</i> are immediately returned from
+the innermost such lexically enclosing <i class="i">block</i>.
+</p>
+<p>The transfer of control initiated by <b class="b">return-from</b> is performed
+as described in <a class="ref" href="Transfer-of-Control-to-an-Exit-Point.html">Transfer of Control to an Exit Point</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-52"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-52"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (block alpha (return-from alpha) 1) &rArr;  NIL
+ (block alpha (return-from alpha 1) 2) &rArr;  1
+ (block alpha (return-from alpha (values 1 2)) 3) &rArr;  1, 2
+ (let ((a 0))
+    (dotimes (i 10) (incf a) (when (oddp i) (return)))
+    a) &rArr;  2
+ (defun temp (x)
+    (if x (return-from temp 'dummy))
+    44) &rArr;  TEMP
+ (temp nil) &rArr;  44
+ (temp t) &rArr;  DUMMY
+ (block out
+   (flet ((exit (n) (return-from out n)))
+     (block out (exit 1)))
+   2) &rArr;  1
+ (block nil   
+   (unwind-protect (return-from nil 1)
+     (return-from nil 2)))
+&rArr;  2
+ (dolist (flag '(nil t))
+   (block nil
+     (let ((x 5))
+       (declare (special x))
+       (unwind-protect (return-from nil)
+         (print x))))
+   (print 'here))
+<code class="t"> |&gt; </code> 5
+<code class="t"> |&gt; </code> HERE
+<code class="t"> |&gt; </code> 5
+<code class="t"> |&gt; </code> HERE
+&rArr;  NIL
+ (dolist (flag '(nil t))
+   (block nil
+     (let ((x 5))
+       (declare (special x))
+       (unwind-protect
+           (if flag (return-from nil))
+         (print x))))
+   (print 'here))
+<code class="t"> |&gt; </code> 5
+<code class="t"> |&gt; </code> HERE
+<code class="t"> |&gt; </code> 5
+<code class="t"> |&gt; </code> HERE
+&rArr;  NIL
+</pre></div>
+
+<p>The following has undefined consequences because the <b class="b">block</b> <i class="i">form</i>
+exits normally before the <b class="b">return-from</b> <i class="i">form</i> is attempted.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (funcall (block nil #'(lambda () (return-from nil)))) is an error.
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-63"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-63"> &para;</a></span></h4>
+
+<p><a class="ref" href="block.html">block                                                    [Special Operator]</a>
+,
+<a class="ref" href="return.html">return                                                              [Macro]</a>
+,
+<a class="ref" href="Evaluation.html">Evaluation</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="return.html">return                                                              [Macro]</a>, Previous: <a href="go.html">go                                                       [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/revappend.html
@@ -0,0 +1,134 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>revappend (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="revappend (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="revappend (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="butlast.html" rel="next" title="butlast">
+<link href="append.html" rel="prev" title="append">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="revappend">
+<div class="nav-panel">
+<p>
+Next: <a href="butlast.html" accesskey="n" rel="next">butlast, nbutlast                                                [Function]</a>, Previous: <a href="append.html" accesskey="p" rel="prev">append                                                           [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="revappend_002c-nreconc-_005bFunction_005d"><span>14.2.27 revappend, nreconc                                               [Function]<a class="copiable-link" href="#revappend_002c-nreconc-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">revappend</code>  <i class="i">list tail</i> &rArr;  <i class="i">result-list</i>
+</p>
+<p><code class="code">nreconc</code>  <i class="i">list tail</i> &rArr;  <i class="i">result-list</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-296"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-296"> &para;</a></span></h4>
+
+<p><i class="i">list</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<p><i class="i">tail</i>&mdash;an <i class="i">object</i>. 
+</p>
+<p><i class="i">result-list</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-397"><span>Description::<a class="copiable-link" href="#Description_003a_003a-397"> &para;</a></span></h4>
+
+<p><b class="b">revappend</b> constructs a <i class="i">copy</i>_2 of <i class="i">list</i>,
+but with the <i class="i">elements</i> in reverse order.  It then appends (as if
+by <b class="b">nconc</b>) the <i class="i">tail</i> to that reversed list and returns the result.
+</p>
+<p><b class="b">nreconc</b> reverses the order of <i class="i">elements</i> in <i class="i">list</i>
+(as if by <b class="b">nreverse</b>).  It then appends (as if by <b class="b">nconc</b>)
+the <i class="i">tail</i> to that reversed list and returns the result.
+</p>
+<p>The resulting <i class="i">list</i> shares <i class="i">list structure</i> with <i class="i">tail</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-280"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-280"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let ((list-1 (list 1 2 3))
+       (list-2 (list 'a 'b 'c)))
+   (print (revappend list-1 list-2))
+   (print (equal list-1 '(1 2 3)))
+   (print (equal list-2 '(a b c))))
+<code class="t"> |&gt; </code> (3 2 1 A B C) 
+<code class="t"> |&gt; </code> T
+<code class="t"> |&gt; </code> T
+&rArr;  T
+
+ (revappend '(1 2 3) '()) &rArr;  (3 2 1)
+ (revappend '(1 2 3) '(a . b)) &rArr;  (3 2 1 A . B)
+ (revappend '() '(a b c)) &rArr;  (A B C)
+ (revappend '(1 2 3) 'a) &rArr;  (3 2 1 . A)
+ (revappend '() 'a) &rArr;  A   ;degenerate case
+
+ (let ((list-1 '(1 2 3))
+       (list-2 '(a b c)))
+   (print (nreconc list-1 list-2))
+   (print (equal list-1 '(1 2 3)))
+   (print (equal list-2 '(a b c))))
+<code class="t"> |&gt; </code> (3 2 1 A B C) 
+<code class="t"> |&gt; </code> NIL
+<code class="t"> |&gt; </code> T
+&rArr;  T
+
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-41"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-41"> &para;</a></span></h4>
+
+<p><b class="b">revappend</b> does not modify either of its <i class="i">arguments</i>.
+<b class="b">nreconc</b> is permitted to modify <i class="i">list</i> but not <i class="i">tail</i>.
+</p>
+<p>Although it might be implemented differently,
+<b class="b">nreconc</b> is constrained to have side-effect behavior equivalent to:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (nconc (nreverse <i class="i">list</i>) <i class="i">tail</i>)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-322"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-322"> &para;</a></span></h4>
+
+<p><a class="ref" href="reverse.html">reverse, nreverse                                                [Function]</a>
+,
+<b class="b">nreverse</b>,
+<a class="ref" href="nconc.html">nconc                                                            [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-213"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-213"> &para;</a></span></h4>
+
+<p>The following functional equivalences are true, 
+although good <i class="i">implementations</i> will typically use a faster algorithm for
+achieving the same effect:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (revappend <i class="i">list</i> <i class="i">tail</i>) &equiv; (nconc (reverse <i class="i">list</i>) <i class="i">tail</i>)
+ (nreconc <i class="i">list</i> <i class="i">tail</i>) &equiv; (nconc (nreverse <i class="i">list</i>) <i class="i">tail</i>)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="butlast.html">butlast, nbutlast                                                [Function]</a>, Previous: <a href="append.html">append                                                           [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/reverse.html
@@ -0,0 +1,115 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>reverse (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="reverse (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="reverse (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="sort.html" rel="next" title="sort">
+<link href="length.html" rel="prev" title="length">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="reverse">
+<div class="nav-panel">
+<p>
+Next: <a href="sort.html" accesskey="n" rel="next">sort, stable-sort                                                [Function]</a>, Previous: <a href="length.html" accesskey="p" rel="prev">length                                                           [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="reverse_002c-nreverse-_005bFunction_005d"><span>17.3.12 reverse, nreverse                                                [Function]<a class="copiable-link" href="#reverse_002c-nreverse-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">reverse</code>  <i class="i">sequence</i> &rArr;  <i class="i">reversed-sequence</i>
+</p>
+<p><code class="code">nreverse</code>  <i class="i">sequence</i> &rArr;  <i class="i">reversed-sequence</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-364"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-364"> &para;</a></span></h4>
+
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">reversed-sequence</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-479"><span>Description::<a class="copiable-link" href="#Description_003a_003a-479"> &para;</a></span></h4>
+
+<p><b class="b">reverse</b> and <b class="b">nreverse</b> return a new <i class="i">sequence</i> 
+of the same kind as <i class="i">sequence</i>, containing the same <i class="i">elements</i>,
+but in reverse order.
+</p>
+<p><b class="b">reverse</b> and <b class="b">nreverse</b> differ in that <b class="b">reverse</b> 
+always creates and returns a new <i class="i">sequence</i>, whereas <b class="b">nreverse</b>
+might modify and return the given <i class="i">sequence</i>.  <b class="b">reverse</b> never
+modifies the given <i class="i">sequence</i>.
+</p>
+<p>For <b class="b">reverse</b>, if <i class="i">sequence</i> is a <i class="i">vector</i>, 
+the result is a <i class="i">fresh</i> <i class="i">simple array</i> of <i class="i">rank</i> one
+that has the same <i class="i">actual array element type</i> as <i class="i">sequence</i>.
+If <i class="i">sequence</i> is a <i class="i">list</i>, the result is a <i class="i">fresh</i> <i class="i">list</i>. 
+</p>
+<p>For <b class="b">nreverse</b>, if <i class="i">sequence</i> is a <i class="i">vector</i>,
+the result is a <i class="i">vector</i>
+that has the same <i class="i">actual array element type</i> as <i class="i">sequence</i>.
+If <i class="i">sequence</i> is a <i class="i">list</i>, the result is a <i class="i">list</i>.
+</p>
+<p>For <b class="b">nreverse</b>,
+<i class="i">sequence</i> might be destroyed and re-used to produce the result.
+The result might or might not be <i class="i">identical</i> to <i class="i">sequence</i>.
+</p>
+<p>Specifically, when <i class="i">sequence</i> is a <i class="i">list</i>, 
+<b class="b">nreverse</b> is permitted to <b class="b">setf</b> any part, <b class="b">car</b> or <b class="b">cdr</b>,
+of any <i class="i">cons</i> that is part of the <i class="i">list structure</i> of <i class="i">sequence</i>.
+When <i class="i">sequence</i> is a <i class="i">vector</i>,
+<b class="b">nreverse</b> is permitted to re-order the elements of <i class="i">sequence</i>
+in order to produce the resulting <i class="i">vector</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-346"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-346"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (setq str &quot;abc&quot;) &rArr;  &quot;abc&quot;
+ (reverse str) &rArr;  &quot;cba&quot;
+ str &rArr;  &quot;abc&quot;
+ (setq str (copy-seq str)) &rArr;  &quot;abc&quot;
+ (nreverse str) &rArr;  &quot;cba&quot;
+ str &rArr;  <i class="i">implementation-dependent</i>
+ (setq l (list 1 2 3)) &rArr;  (1 2 3)
+ (nreverse l) &rArr;  (3 2 1)
+ l &rArr;  <i class="i">implementation-dependent</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-52"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-52"> &para;</a></span></h4>
+
+<p><b class="b">nreverse</b> might either create a new <i class="i">sequence</i>,
+modify the argument <i class="i">sequence</i>, or both.
+(<b class="b">reverse</b> does not modify <i class="i">sequence</i>.)
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-160"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-160"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="sort.html">sort, stable-sort                                                [Function]</a>, Previous: <a href="length.html">length                                                           [Function]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/room.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>room (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="room (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="room (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="ed.html" rel="next" title="ed">
+<link href="documentation.html" rel="prev" title="documentation">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="room">
+<div class="nav-panel">
+<p>
+Next: <a href="ed.html" accesskey="n" rel="next">ed                                                               [Function]</a>, Previous: <a href="documentation.html" accesskey="p" rel="prev">documentation, (setf documentation)             [Standard Generic Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="room-_005bFunction_005d"><span>25.2.16 room                                                             [Function]<a class="copiable-link" href="#room-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">room</code>  <i class="i"><span class="r">&amp;optional</span> x</i> &rArr;  <i class="i"><i class="i">implementation-dependent</i></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-501"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-501"> &para;</a></span></h4>
+
+<p><i class="i">x</i>&mdash;one of <b class="b">t</b>, <b class="b">nil</b>, or <code class="t">:default</code>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-664"><span>Description::<a class="copiable-link" href="#Description_003a_003a-664"> &para;</a></span></h4>
+
+<p><b class="b">room</b> prints, to <i class="i">standard output</i>,
+information about the state of internal storage and its management.
+This might include descriptions of the amount of memory in use and 
+the degree of memory compaction, possibly broken down by internal data type if that
+is appropriate.  The nature and format of the printed information is
+<i class="i">implementation-dependent</i>.
+The intent is to provide information that a <i class="i">programmer</i>
+might use to tune a <i class="i">program</i> for a particular <i class="i">implementation</i>.
+</p>
+<p><code class="t">(room nil)</code> prints out a minimal amount of information.
+<code class="t">(room t)</code> prints out a maximal amount of information.
+</p>
+<p><code class="t">(room)</code> or <code class="t">(room :default)</code> prints out an intermediate amount
+of information that is likely to be useful.
+</p>
+<h4 class="subsubheading" id="Side-Effects_003a_003a-85"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-85"> &para;</a></span></h4>
+
+<p>Output to <i class="i">standard output</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-129"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-129"> &para;</a></span></h4>
+
+<p><b class="b">*standard-output*</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/rotatef.html
@@ -0,0 +1,115 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>rotatef (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="rotatef (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="rotatef (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="control_002derror.html" rel="next" title="control-error">
+<link href="shiftf.html" rel="prev" title="shiftf">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="rotatef">
+<div class="nav-panel">
+<p>
+Next: <a href="control_002derror.html" accesskey="n" rel="next">control-error                                              [Condition Type]</a>, Previous: <a href="shiftf.html" accesskey="p" rel="prev">shiftf                                                              [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="rotatef-_005bMacro_005d"><span>5.3.66 rotatef                                                             [Macro]<a class="copiable-link" href="#rotatef-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">rotatef</code>  <i class="i">{<i class="i">place</i>}*</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-84"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-84"> &para;</a></span></h4>
+
+<p><i class="i">place</i>&mdash;a <i class="i">place</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-119"><span>Description::<a class="copiable-link" href="#Description_003a_003a-119"> &para;</a></span></h4>
+
+<p><b class="b">rotatef</b> modifies the values of each <i class="i">place</i> by
+rotating values from one <i class="i">place</i> into another.
+</p>
+<p>If a <i class="i">place</i> produces more values than there
+are store variables, the extra values are ignored. If a <i class="i">place</i>
+produces fewer values than there are store variables, the missing values
+are set to <b class="b">nil</b>.
+</p>
+<p>In the form <code class="t">(rotatef <i class="i">place1</i> <i class="i">place2</i> ... <i class="i">placen</i>)</code>, 
+the values in <i class="i">place1</i> through <i class="i">placen</i> are <i class="i">read</i> and <i class="i">written</i>.
+Values 2 through <i class="i">n</i> 
+and value 1 are then stored into <i class="i">place1</i> through <i class="i">placen</i>.
+It is as if all the places form an end-around shift register
+that is rotated one place to the left, with the value of <i class="i">place1</i>
+being shifted around the end to <i class="i">placen</i>.
+</p>
+<p>For information about the <i class="i">evaluation</i> of <i class="i">subforms</i> of <i class="i">places</i>,
+see <a class="ref" href="Evaluation-of-Subforms-to-Places.html">Evaluation of Subforms to Places</a>.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-92"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-92"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (let ((n 0)
+        (x (list 'a 'b 'c 'd 'e 'f 'g)))
+    (rotatef (nth (incf n) x)
+             (nth (incf n) x)
+             (nth (incf n) x))
+    x) &rArr;  (A C D B E F G)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-103"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-103"> &para;</a></span></h4>
+
+<p><a class="ref" href="define_002dsetf_002dexpander.html">define-setf-expander                                                [Macro]</a>
+,
+<a class="ref" href="defsetf.html">defsetf                                                             [Macro]</a>
+,
+<a class="ref" href="setf.html">setf, psetf                                                         [Macro]</a>
+,
+<a class="ref" href="shiftf.html">shiftf                                                              [Macro]</a>
+,
+<b class="b">*macroexpand-hook*</b>,
+<a class="ref" href="Generalized-Reference.html">Generalized Reference</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-68"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-68"> &para;</a></span></h4>
+
+<p>The effect of
+ <code class="t">(rotatef <i class="i">place1</i> <i class="i">place2</i> ... <i class="i">placen</i>)</code>
+is roughly equivalent to
+</p>
+<div class="example">
+<pre class="example-preformatted"> (psetf <i class="i">place1</i> <i class="i">place2</i>
+        <i class="i">place2</i> <i class="i">place3</i>
+        ...
+        <i class="i">placen</i> <i class="i">place1</i>)
+</pre></div>
+
+<p>except that the latter would evaluate any <i class="i">subforms</i>
+of each <code class="t">place</code> twice, whereas <b class="b">rotatef</b> evaluates them once.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="control_002derror.html">control-error                                              [Condition Type]</a>, Previous: <a href="shiftf.html">shiftf                                                              [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/row_002dmajor_002daref.html
@@ -0,0 +1,83 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>row-major-aref (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="row-major-aref (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="row-major-aref (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="upgraded_002darray_002delement_002dtype.html" rel="next" title="upgraded-array-element-type">
+<link href="fill_002dpointer.html" rel="prev" title="fill-pointer">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="row_002dmajor_002daref">
+<div class="nav-panel">
+<p>
+Next: <a href="upgraded_002darray_002delement_002dtype.html" accesskey="n" rel="next">upgraded-array-element-type                                      [Function]</a>, Previous: <a href="fill_002dpointer.html" accesskey="p" rel="prev">fill-pointer                                                     [Accessor]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="row_002dmajor_002daref-_005bAccessor_005d"><span>15.2.22 row-major-aref                                                   [Accessor]<a class="copiable-link" href="#row_002dmajor_002daref-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">row-major-aref</code>  <i class="i">array index</i> &rArr;  <i class="i">element</i>
+</p>
+<p>(setf (<code class="code">         row-major-aref</code> <i class="i">array index</i>) new-element)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-334"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-334"> &para;</a></span></h4>
+
+<p><i class="i">array</i>&mdash;an <i class="i">array</i>.
+</p>
+<p><i class="i">index</i>&mdash;a <i class="i">valid array row-major index</i> for the <i class="i">array</i>.
+</p>
+<p><i class="i">element</i>, <i class="i">new-element</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-441"><span>Description::<a class="copiable-link" href="#Description_003a_003a-441"> &para;</a></span></h4>
+
+<p>Considers <i class="i">array</i> as a <i class="i">vector</i> by viewing its <i class="i">elements</i>
+in row-major order, and returns the <i class="i">element</i> of that <i class="i">vector</i> 
+which is referred to by the given <i class="i">index</i>.
+</p>
+<p><b class="b">row-major-aref</b> is valid for use with <b class="b">setf</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-361"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-361"> &para;</a></span></h4>
+
+<p><a class="ref" href="aref.html">aref                                                             [Accessor]</a>
+,
+<a class="ref" href="array_002drow_002dmajor_002dindex.html">array-row-major-index                                            [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-241"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-241"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (row-major-aref array index) &equiv;
+   (aref (make-array (array-total-size array)
+                     :displaced-to array
+                     :element-type (array-element-type array))
+         index)
+
+ (aref array i1 i2 ...) &equiv;
+     (row-major-aref array (array-row-major-index array i1 i2))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/rplaca.html
@@ -0,0 +1,87 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>rplaca (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="rplaca (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="rplaca (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="car.html" rel="next" title="car">
+<link href="atom.html" rel="prev" title="atom">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="rplaca">
+<div class="nav-panel">
+<p>
+Next: <a href="car.html" accesskey="n" rel="next">car,    cdr,</a>, Previous: <a href="atom.html" accesskey="p" rel="prev">atom                                                             [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="rplaca_002c-rplacd-_005bFunction_005d"><span>14.2.8 rplaca, rplacd                                                   [Function]<a class="copiable-link" href="#rplaca_002c-rplacd-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">rplaca</code>  <i class="i">cons object</i> &rArr;  <i class="i">cons</i>
+</p>
+<p><code class="code">rplacd</code>  <i class="i">cons object</i> &rArr;  <i class="i">cons</i>
+</p>
+<h4 class="subsubheading" id="Pronunciation_003a_003a-7"><span>Pronunciation::<a class="copiable-link" href="#Pronunciation_003a_003a-7"> &para;</a></span></h4>
+
+<p><b class="b">rplaca</b>: pronounced ,r\=e &rsquo;plak e
+	      or pronounced ,re &rsquo;plak e
+</p>
+<p><b class="b">rplacd</b>: pronounced ,r\=e &rsquo;plak de
+	      or pronounced ,re &rsquo;plak de
+	      or pronounced ,r\=e &rsquo;plak d\=e
+	      or pronounced ,re &rsquo;plak d\=e
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-277"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-277"> &para;</a></span></h4>
+
+<p><i class="i">cons</i>&mdash;a <i class="i">cons</i>.
+</p>
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-378"><span>Description::<a class="copiable-link" href="#Description_003a_003a-378"> &para;</a></span></h4>
+
+<p><b class="b">rplaca</b> replaces the <i class="i">car</i> of the <i class="i">cons</i> with <i class="i">object</i>.
+</p>
+<p><b class="b">rplacd</b> replaces the <i class="i">cdr</i> of the <i class="i">cons</i> with <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-261"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-261"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (defparameter *some-list* (list* 'one 'two 'three 'four)) &rArr;  *some-list*
+ *some-list* &rArr;  (ONE TWO THREE . FOUR)
+ (rplaca *some-list* 'uno) &rArr;  (UNO TWO THREE . FOUR)
+ *some-list* &rArr;  (UNO TWO THREE . FOUR)
+ (rplacd (last *some-list*) (list 'IV)) &rArr;  (THREE IV)
+ *some-list* &rArr;  (UNO TWO THREE IV)
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-35"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-35"> &para;</a></span></h4>
+
+<p>The <i class="i">cons</i> is modified. 
+</p>
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">cons</i> is not a <i class="i">cons</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/satisfies.html
@@ -0,0 +1,74 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>satisfies (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="satisfies (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="satisfies (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="member-_0028Type-Specifier_0029.html" rel="next" title="member (Type Specifier)">
+<link href="t-_0028System-Class_0029.html" rel="prev" title="t (System Class)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="satisfies">
+<div class="nav-panel">
+<p>
+Next: <a href="member-_0028Type-Specifier_0029.html" accesskey="n" rel="next">member                                                     [Type Specifier]</a>, Previous: <a href="t-_0028System-Class_0029.html" accesskey="p" rel="prev">t                                                            [System Class]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="satisfies-_005bType-Specifier_005d"><span>4.4.17 satisfies                                                  [Type Specifier]<a class="copiable-link" href="#satisfies-_005bType-Specifier_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-1"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-1"> &para;</a></span></h4>
+
+<p>Predicating.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-1"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-1"> &para;</a></span></h4>
+
+<p>(<code class="code">satisfies</code>{<i class="i">predicate-name</i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-1"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-1"> &para;</a></span></h4>
+
+<p><i class="i">predicate-name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-1"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-1"> &para;</a></span></h4>
+
+<p>This denotes the set of all <i class="i">objects</i> that satisfy the
+<i class="i">predicate</i> <i class="i">predicate-name</i>, which must be a <i class="i">symbol</i>
+whose global <i class="i">function</i> definition is a one-argument
+predicate.  A name is required for <i class="i">predicate-name</i>; 
+<i class="i">lambda expressions</i> are not allowed.
+For example, the <i class="i">type specifier</i> <code class="t">(and integer (satisfies evenp))</code>
+denotes the set of all even integers.
+The form <code class="t">(typep <i class="i">x</i> '(satisfies <i class="i">p</i>))</code> is equivalent to
+<code class="t">(if (<i class="i">p</i> <i class="i">x</i>) t nil)</code>.
+</p>
+<p>The argument is required.
+The <i class="i">symbol</i> <b class="b">*</b> can be the argument, but it
+denotes itself (the <i class="i">symbol</i> <b class="b">*</b>),
+and does not represent an unspecified value.
+</p>
+<p>The symbol <b class="b">satisfies</b> is not valid as a <i class="i">type specifier</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/search.html
@@ -0,0 +1,118 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>search (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="search (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="search (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="mismatch.html" rel="next" title="mismatch">
+<link href="position.html" rel="prev" title="position">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="search">
+<div class="nav-panel">
+<p>
+Next: <a href="mismatch.html" accesskey="n" rel="next">mismatch                                                         [Function]</a>, Previous: <a href="position.html" accesskey="p" rel="prev">position, position-if, position-if-not                           [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="search-_005bFunction_005d"><span>17.3.16 search                                                           [Function]<a class="copiable-link" href="#search-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">search</code>  <i class="i">sequence-1 sequence-2 
+                         <span class="r">&amp;key</span> from-end test test-not
+                                      key start1 start2
+                                      end1 end2</i><br>
+   &rArr;  <i class="i">position</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-368"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-368"> &para;</a></span></h4>
+
+<p><i class="i">Sequence-1</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<p><i class="i">Sequence-2</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<p><i class="i">from-end</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is <i class="i">false</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">start1</i>, <i class="i">end1</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">sequence-1</i>.
+ The defaults for <i class="i">start1</i> and <i class="i">end1</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">start2</i>, <i class="i">end2</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">sequence-2</i>.
+ The defaults for <i class="i">start2</i> and <i class="i">end2</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">position</i>&mdash;a <i class="i">bounding index</i> of <i class="i">sequence-2</i>,
+		   or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-483"><span>Description::<a class="copiable-link" href="#Description_003a_003a-483"> &para;</a></span></h4>
+
+<p>Searches <i class="i">sequence-2</i> for a subsequence that matches <i class="i">sequence-1</i>.  
+</p>
+<p>The implementation may choose to search <i class="i">sequence-2</i> in any order;
+there is no guarantee on the number of times the test is made.
+For example,
+when <i class="i">start-end</i> is <i class="i">true</i>,
+the <i class="i">sequence</i> might actually be searched from left to right
+instead of from right to left (but in either case would return
+the rightmost matching subsequence). 
+If the search succeeds,
+<b class="b">search</b> returns the offset into <i class="i">sequence-2</i> 
+of the first element of the leftmost or rightmost matching subsequence, 
+depending on <i class="i">from-end</i>;
+otherwise <b class="b">search</b> returns <b class="b">nil</b>.
+</p>
+<p>If <i class="i">from-end</i> is <i class="i">true</i>, the index of the leftmost
+element of the rightmost matching subsequence is returned.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-350"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-350"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (search &quot;dog&quot; &quot;it's a dog's life&quot;) &rArr;  7
+ (search '(0 1) '(2 4 6 1 3 5) :key #'oddp) &rArr;  2
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-393"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-393"> &para;</a></span></h4>
+
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-264"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-264"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> <i class="i">argument</i> is deprecated.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="mismatch.html">mismatch                                                         [Function]</a>, Previous: <a href="position.html">position, position-if, position-if-not                           [Function]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/sequence.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>sequence (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="sequence (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="sequence (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="copy_002dseq.html" rel="next" title="copy-seq">
+<link href="Sequences-Dictionary.html" rel="prev" title="Sequences Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="sequence">
+<div class="nav-panel">
+<p>
+Next: <a href="copy_002dseq.html" accesskey="n" rel="next">copy-seq                                                         [Function]</a>, Previous: <a href="Sequences-Dictionary.html" accesskey="p" rel="prev">Sequences Dictionary</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="sequence-_005bSystem-Class_005d"><span>17.3.1 sequence                                                     [System Class]<a class="copiable-link" href="#sequence-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-57"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-57"> &para;</a></span></h4>
+<p><b class="b">sequence</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-468"><span>Description::<a class="copiable-link" href="#Description_003a_003a-468"> &para;</a></span></h4>
+
+<p><i class="i">Sequences</i> are ordered collections of <i class="i">objects</i>,
+called the <i class="i">elements</i> of the <i class="i">sequence</i>.
+</p>
+<p>The <i class="i">types</i> <b class="b">vector</b> and the <i class="i">type</i> <b class="b">list</b> are <i class="i">disjoint</i> <i class="i">subtypes</i> of <i class="i">type</i> <b class="b">sequence</b>,
+but are not necessarily an <i class="i">exhaustive partition</i> of <i class="i">sequence</i>.
+</p>
+<p>When viewing a <i class="i">vector</i> as a <i class="i">sequence</i>, 
+only the <i class="i">active</i> <i class="i">elements</i> of that <i class="i">vector</i> 
+are considered <i class="i">elements</i> of the <i class="i">sequence</i>;
+that is,
+<i class="i">sequence</i> operations respect the <i class="i">fill pointer</i>
+when given <i class="i">sequences</i> represented as <i class="i">vectors</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/serious_002dcondition.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>serious-condition (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="serious-condition (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="serious-condition (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="error-_0028Condition-Type_0029.html" rel="next" title="error (Condition Type)">
+<link href="style_002dwarning.html" rel="prev" title="style-warning">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="serious_002dcondition">
+<div class="nav-panel">
+<p>
+Next: <a href="error-_0028Condition-Type_0029.html" accesskey="n" rel="next">error                                                      [Condition Type]</a>, Previous: <a href="style_002dwarning.html" accesskey="p" rel="prev">style-warning                                              [Condition Type]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="serious_002dcondition-_005bCondition-Type_005d"><span>9.2.4 serious-condition                                          [Condition Type]<a class="copiable-link" href="#serious_002dcondition-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-22"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-22"> &para;</a></span></h4>
+<p><b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-174"><span>Description::<a class="copiable-link" href="#Description_003a_003a-174"> &para;</a></span></h4>
+
+<p>All <i class="i">conditions</i> serious enough to require interactive intervention 
+if not handled should inherit from the <i class="i">type</i> <b class="b">serious-condition</b>.
+This condition type is provided
+primarily so that it may be included as
+a <i class="i">superclass</i> of other <i class="i">condition</i> <i class="i">types</i>;
+it is not intended to be signaled directly.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-95"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-95"> &para;</a></span></h4>
+
+<p>Signaling a <i class="i">serious condition</i> does not itself force entry into
+the debugger.   However, except in the unusual situation where the
+programmer can assure that no harm will come from failing to
+<i class="i">handle</i> a <i class="i">serious condition</i>, such a <i class="i">condition</i> is
+usually signaled with <b class="b">error</b> rather than <b class="b">signal</b> in
+order to assure that the program does not continue without
+<i class="i">handling</i> the <i class="i">condition</i>.  (And conversely, it is
+conventional to use <b class="b">signal</b> rather than <b class="b">error</b> to signal
+conditions which are not <i class="i">serious conditions</i>, since normally the
+failure to handle a non-serious condition is not reason enough for the
+debugger to be entered.)
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/set.html
@@ -0,0 +1,121 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>set (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="set (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="set (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="unbound_002dvariable.html" rel="next" title="unbound-variable">
+<link href="makunbound.html" rel="prev" title="makunbound">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="set">
+<div class="nav-panel">
+<p>
+Next: <a href="unbound_002dvariable.html" accesskey="n" rel="next">unbound-variable                                           [Condition Type]</a>, Previous: <a href="makunbound.html" accesskey="p" rel="prev">makunbound                                                       [Function]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="set-_005bFunction_005d"><span>10.2.19 set                                                              [Function]<a class="copiable-link" href="#set-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">set</code>  <i class="i">symbol value</i> &rArr;  <i class="i">value</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-173"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-173"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">value</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-235"><span>Description::<a class="copiable-link" href="#Description_003a_003a-235"> &para;</a></span></h4>
+
+<p><b class="b">set</b> changes the contents of the <i class="i">value cell</i> of <i class="i">symbol</i>
+to the given <i class="i">value</i>.
+</p>
+<div class="example">
+<pre class="example-preformatted">(set <i class="i">symbol</i> <i class="i">value</i>) &equiv; (setf (symbol-value <i class="i">symbol</i>) <i class="i">value</i>)
+</pre></div>
+
+<h4 class="subsubheading" id="Examples_003a_003a-156"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-156"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setf (symbol-value 'n) 1) &rArr;  1
+ (set 'n 2) &rArr;  2
+ (symbol-value 'n) &rArr;  2
+ (let ((n 3))
+   (declare (special n))
+   (setq n (+ n 1))
+   (setf (symbol-value 'n) (* n 10))
+   (set 'n (+ (symbol-value 'n) n))
+   n) &rArr;  80
+ n &rArr;  2
+ (let ((n 3))
+   (setq n (+ n 1))
+   (setf (symbol-value 'n) (* n 10))
+   (set 'n (+ (symbol-value 'n) n))
+   n) &rArr;  4
+ n &rArr;  44
+ (defvar *n* 2)
+ (let ((*n* 3))
+   (setq *n* (+ *n* 1))
+   (setf (symbol-value '*n*) (* *n* 10))
+   (set '*n* (+ (symbol-value '*n*) *n*))
+   *n*) &rArr;  80
+  *n* &rArr;  2
+ (defvar *even-count* 0) &rArr;  *EVEN-COUNT*
+ (defvar *odd-count* 0) &rArr;  *ODD-COUNT*
+ (defun tally-list (list)
+   (dolist (element list)
+     (set (if (evenp element) '*even-count* '*odd-count*)
+          (+ element (if (evenp element) *even-count* *odd-count*)))))
+ (tally-list '(1 9 4 3 2 7)) &rArr;  NIL
+ *even-count* &rArr;  6
+ *odd-count* &rArr;  20
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-23"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-23"> &para;</a></span></h4>
+
+<p>The <i class="i">value</i> of <i class="i">symbol</i> is changed.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-208"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-208"> &para;</a></span></h4>
+
+<p><a class="ref" href="setq.html">setq                                                         [Special Form]</a>
+, 
+<a class="ref" href="progv.html">progv                                                    [Special Operator]</a>
+, 
+<a class="ref" href="symbol_002dvalue.html">symbol-value                                                     [Accessor]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-127"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-127"> &para;</a></span></h4>
+
+<p>The function <b class="b">set</b> is deprecated.
+</p>
+<p><b class="b">set</b> cannot change the value of a <i class="i">lexical variable</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="unbound_002dvariable.html">unbound-variable                                           [Condition Type]</a>, Previous: <a href="makunbound.html">makunbound                                                       [Function]</a>, Up: <a href="Symbols-Dictionary.html">Symbols Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/set_002ddifference.html
@@ -0,0 +1,156 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>set-difference (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="set-difference (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="set-difference (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="set_002dexclusive_002dor.html" rel="next" title="set-exclusive-or">
+<link href="pushnew.html" rel="prev" title="pushnew">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="set_002ddifference">
+<div class="nav-panel">
+<p>
+Next: <a href="set_002dexclusive_002dor.html" accesskey="n" rel="next">set-exclusive-or, nset-exclusive-or                              [Function]</a>, Previous: <a href="pushnew.html" accesskey="p" rel="prev">pushnew                                                             [Macro]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="set_002ddifference_002c-nset_002ddifference-_005bFunction_005d"><span>14.2.46 set-difference, nset-difference                                  [Function]<a class="copiable-link" href="#set_002ddifference_002c-nset_002ddifference-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">set-difference</code>  <i class="i">list-1 list-2 <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">result-list</i>
+</p>
+<p><code class="code">nset-difference</code>  <i class="i">list-1 list-2 <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">result-list</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-315"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-315"> &para;</a></span></h4>
+
+<p><i class="i">list-1</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<p><i class="i">list-2</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">result-list</i>&mdash;a <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-416"><span>Description::<a class="copiable-link" href="#Description_003a_003a-416"> &para;</a></span></h4>
+<p><b class="b">set-difference</b> returns a <i class="i">list</i> 
+of elements of <i class="i">list-1</i>
+that do not appear in <i class="i">list-2</i>.  
+</p>
+<p><b class="b">nset-difference</b> is the destructive 
+version of <b class="b">set-difference</b>.
+It may destroy <i class="i">list-1</i>.
+</p>
+<p>For all possible ordered pairs consisting of
+one element from <i class="i">list-1</i> and one element from <i class="i">list-2</i>, the 
+<code class="t">:test</code> or <code class="t">:test-not</code> function is
+used to determine whether they <i class="i">satisfy the test</i>.  
+The first argument to the <code class="t">:test</code> or <code class="t">:test-not</code> function 
+is the part of an element of <i class="i">list-1</i> that is returned by 
+the <code class="t">:key</code> function (if supplied); the second argument is the part of 
+an element of <i class="i">list-2</i> that is 
+returned by the <code class="t">:key</code> function (if supplied).
+</p>
+<p>If <code class="t">:key</code> is supplied, its argument is a <i class="i">list-1</i> or
+<i class="i">list-2</i> element. The <code class="t">:key</code> function 
+typically returns part of 
+the supplied element.
+If <code class="t">:key</code> is not supplied, the <i class="i">list-1</i> or <i class="i">list-2</i>
+element is used.
+</p>
+<p>An element of <i class="i">list-1</i>
+appears in the result if and only if it does not match any element
+of <i class="i">list-2</i>.  
+</p>
+<p>There is no guarantee that the order of elements in the result will
+reflect the ordering of the arguments in any particular way.
+The result <i class="i">list</i> 
+may share cells with, or be <b class="b">eq</b> to, either of <i class="i">list-1</i>
+or <i class="i">list-2</i>,
+if appropriate.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-299"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-299"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq lst1 (list &quot;A&quot; &quot;b&quot; &quot;C&quot; &quot;d&quot;)
+       lst2 (list &quot;a&quot; &quot;B&quot; &quot;C&quot; &quot;d&quot;)) &rArr;  (&quot;a&quot; &quot;B&quot; &quot;C&quot; &quot;d&quot;)
+ (set-difference lst1 lst2) &rArr;  (&quot;d&quot; &quot;C&quot; &quot;b&quot; &quot;A&quot;)
+ (set-difference lst1 lst2 :test 'equal) &rArr;  (&quot;b&quot; &quot;A&quot;)
+ (set-difference lst1 lst2 :test #'equalp) &rArr;  NIL 
+ (nset-difference lst1 lst2 :test #'string=) &rArr;  (&quot;A&quot; &quot;b&quot;)
+ (setq lst1 '((&quot;a&quot; . &quot;b&quot;) (&quot;c&quot; . &quot;d&quot;) (&quot;e&quot; . &quot;f&quot;)))
+&rArr;  ((&quot;a&quot; . &quot;b&quot;) (&quot;c&quot; . &quot;d&quot;) (&quot;e&quot; . &quot;f&quot;)) 
+ (setq lst2 '((&quot;c&quot; . &quot;a&quot;) (&quot;e&quot; . &quot;b&quot;) (&quot;d&quot; . &quot;a&quot;)))
+&rArr;  ((&quot;c&quot; . &quot;a&quot;) (&quot;e&quot; . &quot;b&quot;) (&quot;d&quot; . &quot;a&quot;)) 
+ (nset-difference lst1 lst2 :test #'string= :key #'cdr)
+&rArr;  ((&quot;c&quot; . &quot;d&quot;) (&quot;e&quot; . &quot;f&quot;)) 
+ lst1 &rArr;  ((&quot;a&quot; . &quot;b&quot;) (&quot;c&quot; . &quot;d&quot;) (&quot;e&quot; . &quot;f&quot;)) 
+ lst2 &rArr;  ((&quot;c&quot; . &quot;a&quot;) (&quot;e&quot; . &quot;b&quot;) (&quot;d&quot; . &quot;a&quot;)) 
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted">;; Remove all flavor names that contain &quot;c&quot; or &quot;w&quot;.
+ (set-difference '(&quot;strawberry&quot; &quot;chocolate&quot; &quot;banana&quot;
+                  &quot;lemon&quot; &quot;pistachio&quot; &quot;rhubarb&quot;)
+          '(#\c #\w)
+          :test #'(lambda (s c) (find c s)))
+&rArr;  (&quot;banana&quot; &quot;rhubarb&quot; &quot;lemon&quot;)    ;One possible ordering.
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-46"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-46"> &para;</a></span></h4>
+
+<p><b class="b">nset-difference</b> may destroy <i class="i">list-1</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-134"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-134"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">list-1</i> and <i class="i">list-2</i> are not <i class="i">proper lists</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-340"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-340"> &para;</a></span></h4>
+
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-226"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-226"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> parameter is deprecated.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="set_002dexclusive_002dor.html">set-exclusive-or, nset-exclusive-or                              [Function]</a>, Previous: <a href="pushnew.html">pushnew                                                             [Macro]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/set_002ddispatch_002dmacro_002dcharacter.html
@@ -0,0 +1,149 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>set-dispatch-macro-character (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="set-dispatch-macro-character (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="set-dispatch-macro-character (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="set_002dmacro_002dcharacter.html" rel="next" title="set-macro-character">
+<link href="readtablep.html" rel="prev" title="readtablep">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="set_002ddispatch_002dmacro_002dcharacter">
+<div class="nav-panel">
+<p>
+Next: <a href="set_002dmacro_002dcharacter.html" accesskey="n" rel="next">set-macro-character, get-macro-character                         [Function]</a>, Previous: <a href="readtablep.html" accesskey="p" rel="prev">readtablep                                                       [Function]</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="set_002ddispatch_002dmacro_002dcharacter_002c-get_002ddispatch_002dmacro_002dcharacter"><span>23.2.9 set-dispatch-macro-character, get-dispatch-macro-character<a class="copiable-link" href="#set_002ddispatch_002dmacro_002dcharacter_002c-get_002ddispatch_002dmacro_002dcharacter"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Function]</i>
+</p></div>
+<p><code class="code">get-dispatch-macro-character</code>  <i class="i">disp-char sub-char <span class="r">&amp;optional</span> readtable</i> &rArr;  <i class="i">function</i>
+</p>
+<p><code class="code">set-dispatch-macro-character</code>  <i class="i">disp-char sub-char new-function <span class="r">&amp;optional</span> readtable</i> &rArr;  <i class="i"><b class="b">t</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-478"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-478"> &para;</a></span></h4>
+
+<p><i class="i">disp-char</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">sub-char</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">readtable</i>&mdash;a <i class="i">readtable designator</i>.
+</p>
+<p>The default is the <i class="i">current readtable</i>.
+</p>
+<p><i class="i">function</i>&mdash;a <i class="i">function designator</i> or <b class="b">nil</b>.
+</p>
+<p><i class="i">new-function</i>&mdash;a <i class="i">function designator</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-628"><span>Description::<a class="copiable-link" href="#Description_003a_003a-628"> &para;</a></span></h4>
+
+<p><b class="b">set-dispatch-macro-character</b> causes <i class="i">new-function</i> to be called
+when <i class="i">disp-char</i> followed by <i class="i">sub-char</i> is read.  
+If <i class="i">sub-char</i> is a lowercase letter, 
+it is converted to its uppercase equivalent.
+It is an error if <i class="i">sub-char</i> is one of the ten decimal digits.
+</p>
+<p><b class="b">set-dispatch-macro-character</b> installs a <i class="i">new-function</i> to be called
+when a particular <i class="i">dispatching macro character</i> pair is read.
+<i class="i">New-function</i> is installed as the dispatch function to be
+called  when <i class="i">readtable</i> is in use and when <i class="i">disp-char</i> is followed by 
+<i class="i">sub-char</i>.
+</p>
+<p>For more information about how the <i class="i">new-function</i> is invoked,
+see <a class="ref" href="Macro-Characters.html">Macro Characters</a>.
+</p>
+<p><b class="b">get-dispatch-macro-character</b> retrieves
+the dispatch function associated with <i class="i">disp-char</i> and <i class="i">sub-char</i>
+in <i class="i">readtable</i>.
+</p>
+<p><b class="b">get-dispatch-macro-character</b> returns the macro-character function
+for <i class="i">sub-char</i> under <i class="i">disp-char</i>, or <b class="b">nil</b> if there is no
+function associated with <i class="i">sub-char</i>.
+If <i class="i">sub-char</i> is a decimal digit, <b class="b">get-dispatch-macro-character</b>
+returns <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-449"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-449"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (get-dispatch-macro-character #\# #\{) &rArr;  NIL
+ (set-dispatch-macro-character #\# #\{        ;dispatch on #{
+    #'(lambda(s c n)
+        (let ((list (read s nil (values) t)))  ;list is object after #n{
+          (when (consp list)                   ;return nth element of list
+            (unless (and n (&lt; 0 n (length list))) (setq n 0))
+            (setq list (nth n list)))
+         list))) &rArr;  T
+ #{(1 2 3 4) &rArr;  1
+ #3{(0 1 2 3) &rArr;  3
+ #{123 &rArr;  123
+</pre></div>
+
+<p>If it is desired that <code class="t">#$<i class="i">foo</i></code> :
+as if it were <code class="t">(dollars <i class="i">foo</i>)</code>.
+</p>
+<div class="example">
+<pre class="example-preformatted">(defun |#$-reader| (stream subchar arg)
+   (declare (ignore subchar arg))
+   (list 'dollars (read stream t nil t))) &rArr;  |#$-reader|
+ (set-dispatch-macro-character #\# #\$ #'|#$-reader|) &rArr;  T
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-510"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-510"> &para;</a></span></h4>
+
+<p><a class="ref" href="Macro-Characters.html">Macro Characters</a>
+</p>
+<h4 class="subsubheading" id="Side-Effects_003a_003a-78"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-78"> &para;</a></span></h4>
+
+<p>The <i class="i">readtable</i> is modified.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-110"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-110"> &para;</a></span></h4>
+
+<p><b class="b">*readtable*</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-232"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-232"> &para;</a></span></h4>
+
+<p>For either function, an error is signaled if <i class="i">disp-char</i> is not 
+a <i class="i">dispatching macro character</i> in <i class="i">readtable</i>.  
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-511"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-511"> &para;</a></span></h4>
+
+<p><a class="ref" href="readtable.html">readtable                                                    [System Class]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-317"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-317"> &para;</a></span></h4>
+<p>It is necessary
+to use <b class="b">make-dispatch-macro-character</b> to set up the
+dispatch character before specifying its sub-characters.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="set_002dmacro_002dcharacter.html">set-macro-character, get-macro-character                         [Function]</a>, Previous: <a href="readtablep.html">readtablep                                                       [Function]</a>, Up: <a href="Reader-Dictionary.html">Reader Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/set_002dexclusive_002dor.html
@@ -0,0 +1,143 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>set-exclusive-or (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="set-exclusive-or (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="set-exclusive-or (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="subsetp.html" rel="next" title="subsetp">
+<link href="set_002ddifference.html" rel="prev" title="set-difference">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="set_002dexclusive_002dor">
+<div class="nav-panel">
+<p>
+Next: <a href="subsetp.html" accesskey="n" rel="next">subsetp                                                          [Function]</a>, Previous: <a href="set_002ddifference.html" accesskey="p" rel="prev">set-difference, nset-difference                                  [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="set_002dexclusive_002dor_002c-nset_002dexclusive_002dor-_005bFunction_005d"><span>14.2.47 set-exclusive-or, nset-exclusive-or                              [Function]<a class="copiable-link" href="#set_002dexclusive_002dor_002c-nset_002dexclusive_002dor-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">set-exclusive-or</code>  <i class="i">list-1 list-2 <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">result-list</i>
+</p>
+<p><code class="code">nset-exclusive-or</code>  <i class="i">list-1 list-2 <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">result-list</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-316"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-316"> &para;</a></span></h4>
+
+<p><i class="i">list-1</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<p><i class="i">list-2</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">result-list</i>&mdash;a <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-417"><span>Description::<a class="copiable-link" href="#Description_003a_003a-417"> &para;</a></span></h4>
+<p><b class="b">set-exclusive-or</b> returns a <i class="i">list</i> of elements that appear
+in exactly one of <i class="i">list-1</i> and <i class="i">list-2</i>.
+</p>
+<p><b class="b">nset-exclusive-or</b> 
+is the <i class="i">destructive</i> version of <b class="b">set-exclusive-or</b>.
+</p>
+<p>For all possible ordered pairs consisting of
+one element from <i class="i">list-1</i> and one element from <i class="i">list-2</i>, the 
+<code class="t">:test</code> or <code class="t">:test-not</code> function is
+used to determine whether they <i class="i">satisfy the test</i>.  
+</p>
+<p>If <code class="t">:key</code> is supplied, it is used to
+extract the part to be tested from the <i class="i">list-1</i> or <i class="i">list-2</i> element. 
+The first argument to the <code class="t">:test</code> or <code class="t">:test-not</code> function 
+is the part of an element of <i class="i">list-1</i> extracted by the <code class="t">:key</code>
+function (if supplied); the second argument  is the part of an 
+element of <i class="i">list-2</i> extracted by the <code class="t">:key</code> function (if supplied).
+If <code class="t">:key</code> is not supplied or <b class="b">nil</b>, the <i class="i">list-1</i> or
+<i class="i">list-2</i> element is used.
+</p>
+<p>The result contains precisely
+those elements of <i class="i">list-1</i> and <i class="i">list-2</i> 
+that appear in no matching pair.
+</p>
+<p>The result <i class="i">list</i> of <b class="b">set-exclusive-or</b> 
+might share storage with one of <i class="i">list-1</i> or <i class="i">list-2</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-300"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-300"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq lst1 (list 1 &quot;a&quot; &quot;b&quot;)
+       lst2 (list 1 &quot;A&quot; &quot;b&quot;)) &rArr;  (1 &quot;A&quot; &quot;b&quot;)
+ (set-exclusive-or lst1 lst2) &rArr;  (&quot;b&quot; &quot;A&quot; &quot;b&quot; &quot;a&quot;)
+ (set-exclusive-or lst1 lst2 :test #'equal) &rArr;  (&quot;A&quot; &quot;a&quot;)
+ (set-exclusive-or lst1 lst2 :test 'equalp) &rArr;  NIL 
+ (nset-exclusive-or lst1 lst2) &rArr;  (&quot;a&quot; &quot;b&quot; &quot;A&quot; &quot;b&quot;) 
+ (setq lst1 (list ((&quot;a&quot; . &quot;b&quot;) (&quot;c&quot; . &quot;d&quot;) (&quot;e&quot; . &quot;f&quot;))))
+&rArr;  ((&quot;a&quot; . &quot;b&quot;) (&quot;c&quot; . &quot;d&quot;) (&quot;e&quot; . &quot;f&quot;))
+ (setq lst2 (list ((&quot;c&quot; . &quot;a&quot;) (&quot;e&quot; . &quot;b&quot;) (&quot;d&quot; . &quot;a&quot;))))
+&rArr;  ((&quot;c&quot; . &quot;a&quot;) (&quot;e&quot; . &quot;b&quot;) (&quot;d&quot; . &quot;a&quot;)) 
+ (nset-exclusive-or lst1 lst2 :test #'string= :key #'cdr)
+&rArr;  ((&quot;c&quot; . &quot;d&quot;) (&quot;e&quot; . &quot;f&quot;) (&quot;c&quot; . &quot;a&quot;) (&quot;d&quot; . &quot;a&quot;)) 
+ lst1 &rArr;  ((&quot;a&quot; . &quot;b&quot;) (&quot;c&quot; . &quot;d&quot;) (&quot;e&quot; . &quot;f&quot;))
+ lst2 &rArr;  ((&quot;c&quot; . &quot;a&quot;) (&quot;d&quot; . &quot;a&quot;)) 
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-47"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-47"> &para;</a></span></h4>
+
+<p><b class="b">nset-exclusive-or</b> is permitted to modify any part,
+<i class="i">car</i> or <i class="i">cdr</i>, of the <i class="i">list structure</i> of <i class="i">list-1</i> or <i class="i">list-2</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-135"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-135"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">list-1</i> and <i class="i">list-2</i> are not <i class="i">proper lists</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-341"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-341"> &para;</a></span></h4>
+
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-227"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-227"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> parameter is deprecated.
+</p>
+<p>Since the <b class="b">nset-exclusive-or</b> side effect is not required,
+it should not be used in for-effect-only
+  positions in portable code.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="subsetp.html">subsetp                                                          [Function]</a>, Previous: <a href="set_002ddifference.html">set-difference, nset-difference                                  [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/set_002dmacro_002dcharacter.html
@@ -0,0 +1,129 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>set-macro-character (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="set-macro-character (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="set-macro-character (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="set_002dsyntax_002dfrom_002dchar.html" rel="next" title="set-syntax-from-char">
+<link href="set_002ddispatch_002dmacro_002dcharacter.html" rel="prev" title="set-dispatch-macro-character">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="set_002dmacro_002dcharacter">
+<div class="nav-panel">
+<p>
+Next: <a href="set_002dsyntax_002dfrom_002dchar.html" accesskey="n" rel="next">set-syntax-from-char                                             [Function]</a>, Previous: <a href="set_002ddispatch_002dmacro_002dcharacter.html" accesskey="p" rel="prev">set-dispatch-macro-character, get-dispatch-macro-character</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="set_002dmacro_002dcharacter_002c-get_002dmacro_002dcharacter-_005bFunction_005d"><span>23.2.10 set-macro-character, get-macro-character                         [Function]<a class="copiable-link" href="#set_002dmacro_002dcharacter_002c-get_002dmacro_002dcharacter-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">get-macro-character</code>  <i class="i">char <span class="r">&amp;optional</span> readtable</i> &rArr;  <i class="i">function, non-terminating-p</i>
+</p>
+<p><code class="code">set-macro-character</code>  <i class="i">char new-function <span class="r">&amp;optional</span> non-terminating-p readtable</i> &rArr;  <i class="i"><b class="b">t</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-479"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-479"> &para;</a></span></h4>
+
+<p><i class="i">char</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">non-terminating-p</i>&mdash;a <i class="i">generalized boolean</i>.
+ The default is <i class="i">false</i>.
+</p>
+<p><i class="i">readtable</i>&mdash;a <i class="i">readtable designator</i>.
+</p>
+<p>The default is the <i class="i">current readtable</i>.
+</p>
+<p><i class="i">function</i>&mdash;<b class="b">nil</b>, 
+		   or a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>.
+</p>
+<p><i class="i">new-function</i>&mdash;a <i class="i">function designator</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-629"><span>Description::<a class="copiable-link" href="#Description_003a_003a-629"> &para;</a></span></h4>
+
+<p><b class="b">get-macro-character</b> returns as its <i class="i">primary value</i>, <i class="i">function</i>,
+the <i class="i">reader macro function</i> associated with <i class="i">char</i> in <i class="i">readtable</i> (if any),
+or else <b class="b">nil</b> if <i class="i">char</i> is not a <i class="i">macro character</i> in <i class="i">readtable</i>.
+The <i class="i">secondary value</i>, <i class="i">non-terminating-p</i>, is <i class="i">true</i> 
+if <i class="i">char</i> is a <i class="i">non-terminating</i> <i class="i">macro character</i>;
+otherwise, it is <i class="i">false</i>.
+</p>
+<p><b class="b">set-macro-character</b> causes <i class="i">char</i> to be a <i class="i">macro character</i>
+associated with the <i class="i">reader macro function</i> <i class="i">new-function</i> 
+(or the <i class="i">designator</i> for <i class="i">new-function</i>) in <i class="i">readtable</i>.
+If <i class="i">non-terminating-p</i> is <i class="i">true</i>,
+<i class="i">char</i> becomes a <i class="i">non-terminating</i> <i class="i">macro character</i>;
+otherwise it becomes a     <i class="i">terminating</i> <i class="i">macro character</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-450"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-450"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (get-macro-character #\{) &rArr;  NIL, <i class="i">false</i>
+ (not (get-macro-character #\;)) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<p>The following is a possible definition for the <i class="i">single-quote</i> <i class="i">reader macro</i> 
+in <i class="i">standard syntax</i>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun single-quote-reader (stream char)
+   (declare (ignore char))
+   (list 'quote (read stream t nil t))) &rArr;  SINGLE-QUOTE-READER
+ (set-macro-character #\' #'single-quote-reader) &rArr;  T
+</pre></div>
+
+<p>Here <code class="t">single-quote-reader</code> reads an <i class="i">object</i> following the <i class="i">single-quote</i>
+and returns a <i class="i">list</i> of <b class="b">quote</b> and that <i class="i">object</i>.
+The <i class="i">char</i> argument is ignored.
+</p>
+<p>The following is a possible definition for the <i class="i">semicolon</i> <i class="i">reader macro</i>
+in <i class="i">standard syntax</i>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun semicolon-reader (stream char)
+   (declare (ignore char))
+   ;; First swallow the rest of the current input line.
+   ;; End-of-file is acceptable for terminating the comment.
+   (do () ((char= (read-char stream nil #\Newline t) #\Newline)))
+   ;; Return zero values.
+   (values)) &rArr;  SEMICOLON-READER
+ (set-macro-character #\; #'semicolon-reader) &rArr;  T
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-79"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-79"> &para;</a></span></h4>
+
+<p>The <i class="i">readtable</i> is modified.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-512"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-512"> &para;</a></span></h4>
+
+<p><a class="ref" href="readtable.html">readtable                                                    [System Class]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="set_002dsyntax_002dfrom_002dchar.html">set-syntax-from-char                                             [Function]</a>, Previous: <a href="set_002ddispatch_002dmacro_002dcharacter.html">set-dispatch-macro-character, get-dispatch-macro-character</a>, Up: <a href="Reader-Dictionary.html">Reader Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/set_002dpprint_002ddispatch.html
@@ -0,0 +1,111 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>set-pprint-dispatch (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="set-pprint-dispatch (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="set-pprint-dispatch (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="write.html" rel="next" title="write">
+<link href="print_002dunreadable_002dobject.html" rel="prev" title="print-unreadable-object">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="set_002dpprint_002ddispatch">
+<div class="nav-panel">
+<p>
+Next: <a href="write.html" accesskey="n" rel="next">write, prin1, print, pprint, princ                               [Function]</a>, Previous: <a href="print_002dunreadable_002dobject.html" accesskey="p" rel="prev">print-unreadable-object                                             [Macro]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="set_002dpprint_002ddispatch-_005bFunction_005d"><span>22.4.13 set-pprint-dispatch                                              [Function]<a class="copiable-link" href="#set_002dpprint_002ddispatch-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">set-pprint-dispatch</code>  <i class="i">type-specifier function <span class="r">&amp;optional</span> priority table</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-466"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-466"> &para;</a></span></h4>
+
+<p><i class="i">type-specifier</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<p><i class="i">function</i>&mdash;a <i class="i">function</i>, a <i class="i">function name</i>, or <b class="b">nil</b>.
+</p>
+<p><i class="i">priority</i>&mdash;a <i class="i">real</i>.
+ The default is <code class="t">0</code>.
+</p>
+<p><i class="i">table</i>&mdash;a <i class="i">pprint dispatch table</i>.
+ The default is the <i class="i">value</i> of <b class="b">*print-pprint-dispatch*</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-601"><span>Description::<a class="copiable-link" href="#Description_003a_003a-601"> &para;</a></span></h4>
+
+<p>Installs an entry into the <i class="i">pprint dispatch table</i> which is <i class="i">table</i>.
+</p>
+<p><i class="i">Type-specifier</i> 
+is the <i class="i">key</i>
+of the entry.  The first action of <b class="b">set-pprint-dispatch</b> is to remove any
+pre-existing entry associated with <i class="i">type-specifier</i>.  This guarantees that
+there will never be two entries associated with the same <i class="i">type specifier</i> 
+in a given <i class="i">pprint dispatch table</i>.  Equality of <i class="i">type specifiers</i> is
+tested by <b class="b">equal</b>.
+</p>
+<p>Two values are associated with each <i class="i">type specifier</i> in a 
+<i class="i">pprint dispatch table</i>: a <i class="i">function</i> and a <i class="i">priority</i>.
+The <i class="i">function</i> must accept two arguments: the <i class="i">stream</i> to which output
+is sent and the <i class="i">object</i> to be printed.  The <i class="i">function</i> should
+<i class="i">pretty print</i> the <i class="i">object</i> to the <i class="i">stream</i>.  The <i class="i">function</i>
+can assume that object satisfies the <i class="i">type</i> given by <i class="i">type-specifier</i>.
+The <i class="i">function</i> must obey <b class="b">*print-readably*</b>.
+Any values returned by the <i class="i">function</i> are ignored.
+</p>
+<p><i class="i">Priority</i> is a priority to resolve conflicts
+when an object matches more than one entry.
+</p>
+<p>It is permissible for <i class="i">function</i> to be <b class="b">nil</b>.  In this situation, 
+there will be no <i class="i">type-specifier</i> entry in <i class="i">table</i> after
+<b class="b">set-pprint-dispatch</b> returns.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-227"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-227"> &para;</a></span></h4>
+
+<p>An error is signaled if <i class="i">priority</i> is not a <i class="i">real</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-302"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-302"> &para;</a></span></h4>
+
+<p>Since <i class="i">pprint dispatch tables</i> are often used to control the pretty
+printing of Lisp code, it is common for the <i class="i">type-specifier</i> to be
+an <i class="i">expression</i> of the form 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (cons <i class="i">car-type</i> <i class="i">cdr-type</i>)
+</pre></div>
+
+<p>This signifies that the corresponding object must be a cons cell 
+whose <i class="i">car</i> matches the <i class="i">type specifier</i> <i class="i">car-type</i> 
+and whose <i class="i">cdr</i> matches the <i class="i">type specifier</i> <i class="i">cdr-type</i>.
+The <i class="i">cdr-type</i> can be omitted in which case it defaults to <b class="b">t</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="write.html">write, prin1, print, pprint, princ                               [Function]</a>, Previous: <a href="print_002dunreadable_002dobject.html">print-unreadable-object                                             [Macro]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/set_002dsyntax_002dfrom_002dchar.html
@@ -0,0 +1,118 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>set-syntax-from-char (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="set-syntax-from-char (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="set-syntax-from-char (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="with_002dstandard_002dio_002dsyntax.html" rel="next" title="with-standard-io-syntax">
+<link href="set_002dmacro_002dcharacter.html" rel="prev" title="set-macro-character">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="set_002dsyntax_002dfrom_002dchar">
+<div class="nav-panel">
+<p>
+Next: <a href="with_002dstandard_002dio_002dsyntax.html" accesskey="n" rel="next">with-standard-io-syntax                                             [Macro]</a>, Previous: <a href="set_002dmacro_002dcharacter.html" accesskey="p" rel="prev">set-macro-character, get-macro-character                         [Function]</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="set_002dsyntax_002dfrom_002dchar-_005bFunction_005d"><span>23.2.11 set-syntax-from-char                                             [Function]<a class="copiable-link" href="#set_002dsyntax_002dfrom_002dchar-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">set-syntax-from-char</code>  <i class="i">to-char from-char <span class="r">&amp;optional</span> to-readtable from-readtable</i> &rArr;  <i class="i"><b class="b">t</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-480"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-480"> &para;</a></span></h4>
+
+<p><i class="i">to-char</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">from-char</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">to-readtable</i>&mdash;a <i class="i">readtable</i>. 
+ The default is the <i class="i">current readtable</i>.
+</p>
+<p><i class="i">from-readtable</i>&mdash;a <i class="i">readtable designator</i>.
+ The default is the <i class="i">standard readtable</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-630"><span>Description::<a class="copiable-link" href="#Description_003a_003a-630"> &para;</a></span></h4>
+
+<p><b class="b">set-syntax-from-char</b> makes
+the syntax of <i class="i">to-char</i>   in <i class="i">to-readtable</i>    be the same as
+the syntax of <i class="i">from-char</i> in <i class="i">from-readtable</i>.
+</p>
+<p><b class="b">set-syntax-from-char</b> copies the <i class="i">syntax types</i> of <i class="i">from-char</i>.
+If <i class="i">from-char</i> is a <i class="i">macro character</i>,
+its <i class="i">reader macro function</i> is copied also.
+If the character is a <i class="i">dispatching macro character</i>, 
+its entire dispatch table of <i class="i">reader macro functions</i> is copied.  
+The <i class="i">constituent traits</i> of <i class="i">from-char</i> are not copied.
+</p>
+<p>A macro definition from a character such as
+<code class="t">&quot;</code> can be copied to another character; the standard definition for <code class="t">&quot;</code>
+looks for another character that is the same as the character that
+invoked it.  The definition of <code class="t">(</code> can not be meaningfully copied
+to <code class="t">{</code>, on the other hand. 
+The result is that <i class="i">lists</i> are of the form
+<code class="t">{a b c)</code>, not <code class="t">{a b c}</code>,
+because the definition
+always looks for a closing parenthesis, not a closing brace.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-451"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-451"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (set-syntax-from-char #\7 #\;) &rArr;  T
+ 123579 &rArr;  1235
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-80"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-80"> &para;</a></span></h4>
+
+<p>The <i class="i">to-readtable</i> is modified.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-111"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-111"> &para;</a></span></h4>
+
+<p>The existing values in the <i class="i">from-readtable</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-513"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-513"> &para;</a></span></h4>
+
+<p><a class="ref" href="set_002dmacro_002dcharacter.html">set-macro-character, get-macro-character                         [Function]</a>
+,
+<a class="ref" href="make_002ddispatch_002dmacro_002dcharacter.html">make-dispatch-macro-character                                    [Function]</a>
+,
+<a class="ref" href="Character-Syntax-Types.html">Character Syntax Types</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-318"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-318"> &para;</a></span></h4>
+
+<p>The <i class="i">constituent traits</i> of a <i class="i">character</i> are &ldquo;hard wired&rdquo; 
+into the parser for extended <i class="i">tokens</i>.  For example, if the definition
+of <code class="t">S</code> is copied to <code class="t">*</code>, then <code class="t">*</code> will become a <i class="i">constituent</i> 
+that is <i class="i">alphabetic</i>_2 but that cannot be used as a
+<i class="i">short float</i> <i class="i">exponent marker</i>.
+For further information, see <a class="ref" href="Constituent-Traits.html">Constituent Traits</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="with_002dstandard_002dio_002dsyntax.html">with-standard-io-syntax                                             [Macro]</a>, Previous: <a href="set_002dmacro_002dcharacter.html">set-macro-character, get-macro-character                         [Function]</a>, Up: <a href="Reader-Dictionary.html">Reader Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/setf-class_002dname.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>setf class-name (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="setf class-name (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="setf class-name (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="class_002dof.html" rel="next" title="class-of">
+<link href="class_002dname.html" rel="prev" title="class-name">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="setf-class_002dname">
+<div class="nav-panel">
+<p>
+Next: <a href="class_002dof.html" accesskey="n" rel="next">class-of                                                         [Function]</a>, Previous: <a href="class_002dname.html" accesskey="p" rel="prev">class-name                                      [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="setf-class_002dname-_005bStandard-Generic-Function_005d"><span>7.7.38 setf class-name                               [Standard Generic Function]<a class="copiable-link" href="#setf-class_002dname-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-35"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-35"> &para;</a></span></h4>
+
+<p><code class="code">setf class-name</code>  <i class="i">new-value class</i> &rArr;  <i class="i">new-value</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-21"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-21"> &para;</a></span></h4>
+
+<p><code class="code">setf class-name</code>  <i class="i">new-value <span class="r">(</span><i class="i">class</i> <b class="b">class</b><span class="r">)</span></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-126"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-126"> &para;</a></span></h4>
+
+<p><i class="i">new-value</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">class</i>&mdash;a <i class="i">class</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-165"><span>Description::<a class="copiable-link" href="#Description_003a_003a-165"> &para;</a></span></h4>
+
+<p>The generic function <code class="t">setf class-name</code> sets the name of 
+a <i class="i">class</i> object.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-147"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-147"> &para;</a></span></h4>
+
+<p><a class="ref" href="find_002dclass.html">find-class                                                       [Accessor]</a>
+,
+<i class="i">proper name</i>,
+<a class="ref" href="Classes.html">Classes</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/setf.html
@@ -0,0 +1,148 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>setf (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="setf (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="setf (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="shiftf.html" rel="next" title="shiftf">
+<link href="get_002dsetf_002dexpansion.html" rel="prev" title="get-setf-expansion">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="setf">
+<div class="nav-panel">
+<p>
+Next: <a href="shiftf.html" accesskey="n" rel="next">shiftf                                                              [Macro]</a>, Previous: <a href="get_002dsetf_002dexpansion.html" accesskey="p" rel="prev">get-setf-expansion                                               [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="setf_002c-psetf-_005bMacro_005d"><span>5.3.64 setf, psetf                                                         [Macro]<a class="copiable-link" href="#setf_002c-psetf-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">setf</code>  <i class="i">{!<i class="i">pair</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><code class="code">psetf</code>  <i class="i">{!<i class="i">pair</i>}*</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<p><i class="i">pair</i>&nbsp;::=place&nbsp;newvalue<!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-82"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-82"> &para;</a></span></h4>
+
+<p><i class="i">place</i>&mdash;a <i class="i">place</i>.
+</p>
+<p><i class="i">newvalue</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">multiple values</i>_2 
+                  returned by the storing form for the last <i class="i">place</i>,
+                  or <b class="b">nil</b> if there are no <i class="i">pairs</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-117"><span>Description::<a class="copiable-link" href="#Description_003a_003a-117"> &para;</a></span></h4>
+
+<p><b class="b">setf</b> changes the <i class="i">value</i> of <i class="i">place</i> to be <i class="i">newvalue</i>.
+</p>
+<p><code class="t">(setf place newvalue)</code> 
+expands into an update form that stores the 
+result 
+of evaluating
+<i class="i">newvalue</i> into the location referred to by <i class="i">place</i>.
+   Some <i class="i">place</i> forms 
+involve uses of accessors that take optional arguments. 
+   Whether those optional arguments are permitted by 
+<b class="b">setf</b>, or what their use
+   is, is up to the 
+<b class="b">setf</b> expander function and is not under the control
+   of <b class="b">setf</b>. 
+The documentation for any <i class="i">function</i> 
+that accepts <b class="b">&amp;optional</b>, <b class="b">&amp;rest</b>,
+   or <code class="t">&amp;key</code> arguments and that 
+claims to be usable with <b class="b">setf</b> must specify
+   how those arguments are treated.
+</p>
+<p>If more than one <i class="i">pair</i> is supplied,
+the <i class="i">pairs</i> are processed sequentially; that is,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setf place-1 newvalue-1
+       place-2 newvalue-2
+       ...
+       place-N newvalue-N)
+</pre></div>
+
+<p>is precisely equivalent to
+</p>
+<div class="example">
+<pre class="example-preformatted"> (progn (setf place-1 newvalue-1)
+        (setf place-2 newvalue-2)
+        ...
+        (setf place-N newvalue-N))
+</pre></div>
+
+<p>For <b class="b">psetf</b>, 
+if more than one <i class="i">pair</i> is supplied then the assignments of new values to places are
+done in parallel.  More precisely, all <i class="i">subforms</i> (in both the <i class="i">place</i>
+and <i class="i">newvalue</i> <i class="i">forms</i>) that are to be evaluated
+are evaluated from left to right; after all evaluations have been performed,
+all of the assignments are performed in an unpredictable order.
+</p>
+<p>For detailed treatment of the expansion of <b class="b">setf</b> and <b class="b">psetf</b>,
+see <a class="ref" href="Kinds-of-Places.html">Kinds of Places</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-90"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-90"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq x (cons 'a 'b) y (list 1 2 3)) &rArr;  (1 2 3) 
+ (setf (car x) 'x (cadr y) (car x) (cdr x) y) &rArr;  (1 X 3) 
+ x &rArr;  (X 1 X 3) 
+ y &rArr;  (1 X 3) 
+ (setq x (cons 'a 'b) y (list 1 2 3)) &rArr;  (1 2 3) 
+ (psetf (car x) 'x (cadr y) (car x) (cdr x) y) &rArr;  NIL 
+ x &rArr;  (X 1 A 3) 
+ y &rArr;  (1 A 3) 
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-7"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-7"> &para;</a></span></h4>
+
+<p><b class="b">define-setf-expander</b>,
+<b class="b">defsetf</b>,
+<b class="b">*macroexpand-hook*</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-101"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-101"> &para;</a></span></h4>
+
+<p><a class="ref" href="define_002dsetf_002dexpander.html">define-setf-expander                                                [Macro]</a>
+,
+<a class="ref" href="defsetf.html">defsetf                                                             [Macro]</a>
+,
+<b class="b">macroexpand-1</b>,
+<a class="ref" href="rotatef.html">rotatef                                                             [Macro]</a>
+,
+<a class="ref" href="shiftf.html">shiftf                                                              [Macro]</a>
+,
+<a class="ref" href="Generalized-Reference.html">Generalized Reference</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="shiftf.html">shiftf                                                              [Macro]</a>, Previous: <a href="get_002dsetf_002dexpansion.html">get-setf-expansion                                               [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/setq.html
@@ -0,0 +1,119 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>setq (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="setq (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="setq (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="psetq.html" rel="next" title="psetq">
+<link href="progv.html" rel="prev" title="progv">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="setq">
+<div class="nav-panel">
+<p>
+Next: <a href="psetq.html" accesskey="n" rel="next">psetq                                                               [Macro]</a>, Previous: <a href="progv.html" accesskey="p" rel="prev">progv                                                    [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="setq-_005bSpecial-Form_005d"><span>5.3.20 setq                                                         [Special Form]<a class="copiable-link" href="#setq-_005bSpecial-Form_005d"> &para;</a></span></h4>
+
+<p><code class="code">setq</code>  <i class="i">{!<i class="i">pair</i>}*</i> &rArr;  <i class="i">result</i>
+</p>
+<p><i class="i">pair</i>&nbsp;::=var&nbsp;form<!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Pronunciation_003a_003a-2"><span>Pronunciation::<a class="copiable-link" href="#Pronunciation_003a_003a-2"> &para;</a></span></h4>
+
+<p>pronounced &rsquo;set ,ky\&quot;u 
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-41"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-41"> &para;</a></span></h4>
+
+<p><i class="i">var</i>&mdash;a <i class="i">symbol</i> naming a <i class="i">variable</i> other than a <i class="i">constant variable</i>.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">result</i>&mdash;the <i class="i">primary value</i> of the last <i class="i">form</i>,
+		 or <b class="b">nil</b> if no <i class="i">pairs</i> were supplied.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-73"><span>Description::<a class="copiable-link" href="#Description_003a_003a-73"> &para;</a></span></h4>
+
+<p>Assigns values to <i class="i">variables</i>.
+</p>
+<p><code class="t">(setq <i class="i">var1</i> <i class="i">form1</i> <i class="i">var2</i> <i class="i">form2</i> ...)</code>
+is the simple variable assignment statement of <span class="r">Lisp</span>.
+First <i class="i">form1</i> is evaluated
+and the result is stored in the variable <i class="i">var1</i>, then <i class="i">form2</i>
+is evaluated and the result stored in <i class="i">var2</i>, and so forth.
+<b class="b">setq</b> may be used for assignment of both lexical
+and dynamic variables.
+</p>
+<p>If any <i class="i">var</i> refers to a <i class="i">binding</i> 
+made by <b class="b">symbol-macrolet</b>,
+then that <i class="i">var</i> is treated as if <b class="b">setf</b>
+(not <b class="b">setq</b>) had been used.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-47"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-47"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> ;; A simple use of SETQ to establish values for variables.
+ (setq a 1 b 2 c 3) &rArr;  3
+ a &rArr;  1
+ b &rArr;  2
+ c &rArr;  3
+
+ ;; Use of SETQ to update values by sequential assignment.
+ (setq a (1+ b) b (1+ a) c (+ a b)) &rArr;  7
+ a &rArr;  3
+ b &rArr;  4
+ c &rArr;  7
+
+ ;; This illustrates the use of SETQ on a symbol macro.
+ (let ((x (list 10 20 30)))
+   (symbol-macrolet ((y (car x)) (z (cadr x)))
+     (setq y (1+ z) z (1+ y))
+     (list x y z)))
+&rArr;  ((21 22 30) 21 22)
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-1"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-1"> &para;</a></span></h4>
+
+<p>The <i class="i">primary value</i> of each <i class="i">form</i> is assigned to the corresponding <i class="i">var</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-58"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-58"> &para;</a></span></h4>
+
+<p><a class="ref" href="psetq.html">psetq                                                               [Macro]</a>
+,
+<a class="ref" href="set.html">set                                                              [Function]</a>
+,
+<a class="ref" href="setf.html">setf, psetf                                                         [Macro]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="psetq.html">psetq                                                               [Macro]</a>, Previous: <a href="progv.html">progv                                                    [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/shadow.html
@@ -0,0 +1,125 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>shadow (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="shadow (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="shadow (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="shadowing_002dimport.html" rel="next" title="shadowing-import">
+<link href="rename_002dpackage.html" rel="prev" title="rename-package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="shadow">
+<div class="nav-panel">
+<p>
+Next: <a href="shadowing_002dimport.html" accesskey="n" rel="next">shadowing-import                                                 [Function]</a>, Previous: <a href="rename_002dpackage.html" accesskey="p" rel="prev">rename-package                                                   [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="shadow-_005bFunction_005d"><span>11.2.9 shadow                                                           [Function]<a class="copiable-link" href="#shadow-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">shadow</code>  <i class="i">symbol-names <span class="r">&amp;optional</span> package</i> &rArr;  <i class="i"><b class="b">t</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-181"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-181"> &para;</a></span></h4>
+
+<p><i class="i">symbol-names</i>&mdash;a <i class="i">designator</i> for 
+		       a <i class="i">list</i> of <i class="i">string designators</i>.
+</p>
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<p>The default is the <i class="i">current package</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-245"><span>Description::<a class="copiable-link" href="#Description_003a_003a-245"> &para;</a></span></h4>
+
+<p><b class="b">shadow</b> assures that <i class="i">symbols</i> with names given 
+by <i class="i">symbol-names</i> are <i class="i">present</i> 
+in
+the <i class="i">package</i>.
+</p>
+<p>Specifically, <i class="i">package</i> is searched for <i class="i">symbols</i> 
+with the <i class="i">names</i> supplied by <i class="i">symbol-names</i>.
+</p>
+<p>For each such <i class="i">name</i>, if a corresponding <i class="i">symbol</i> 
+is not <i class="i">present</i> in <i class="i">package</i> (directly, not by inheritance), 
+then a corresponding <i class="i">symbol</i> is created with that <i class="i">name</i>,
+and inserted into <i class="i">package</i> as an <i class="i">internal symbol</i>.
+The corresponding <i class="i">symbol</i>, whether pre-existing or newly created,
+is then added, if not already present, to the <i class="i">shadowing symbols list</i>
+of <i class="i">package</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-164"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-164"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (package-shadowing-symbols (make-package 'temp)) &rArr;  NIL
+ (find-symbol 'car 'temp) &rArr;  CAR, :INHERITED
+ (shadow 'car 'temp) &rArr;  T
+ (find-symbol 'car 'temp) &rArr;  TEMP::CAR, :INTERNAL
+ (package-shadowing-symbols 'temp) &rArr;  (TEMP::CAR)
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (make-package 'test-1) &rArr;  #&lt;PACKAGE &quot;TEST-1&quot;&gt;
+ (intern &quot;TEST&quot; (find-package 'test-1)) &rArr;  TEST-1::TEST, NIL
+ (shadow 'test-1::test (find-package 'test-1)) &rArr;  T
+ (shadow 'TEST (find-package 'test-1)) &rArr;  T
+ (assert (not (null (member 'test-1::test (package-shadowing-symbols
+                                            (find-package 'test-1))))))
+
+ (make-package 'test-2) &rArr;  #&lt;PACKAGE &quot;TEST-2&quot;&gt;
+ (intern &quot;TEST&quot; (find-package 'test-2)) &rArr;  TEST-2::TEST, NIL
+ (export 'test-2::test (find-package 'test-2)) &rArr;  T
+ (use-package 'test-2 (find-package 'test-1))    ;should not error
+
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-26"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-26"> &para;</a></span></h4>
+
+<p><b class="b">shadow</b> changes the state of the package system in such a 
+way that the package consistency rules do not hold across the change.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-47"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-47"> &para;</a></span></h4>
+
+<p>Current state of the package system.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-217"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-217"> &para;</a></span></h4>
+
+<p><a class="ref" href="package_002dshadowing_002dsymbols.html">package-shadowing-symbols                                        [Function]</a>
+,
+<a class="ref" href="Package-Concepts.html">Package Concepts</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-129"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-129"> &para;</a></span></h4>
+
+<p>If a <i class="i">symbol</i> with a name in <i class="i">symbol-names</i> already exists
+in <i class="i">package</i>, but by inheritance, the inherited symbol becomes
+<i class="i">shadowed</i>_3 by a newly created <i class="i">internal symbol</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="shadowing_002dimport.html">shadowing-import                                                 [Function]</a>, Previous: <a href="rename_002dpackage.html">rename-package                                                   [Function]</a>, Up: <a href="Packages-Dictionary.html">Packages Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/shadowing_002dimport.html
@@ -0,0 +1,112 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>shadowing-import (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="shadowing-import (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="shadowing-import (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="delete_002dpackage.html" rel="next" title="delete-package">
+<link href="shadow.html" rel="prev" title="shadow">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="shadowing_002dimport">
+<div class="nav-panel">
+<p>
+Next: <a href="delete_002dpackage.html" accesskey="n" rel="next">delete-package                                                   [Function]</a>, Previous: <a href="shadow.html" accesskey="p" rel="prev">shadow                                                           [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="shadowing_002dimport-_005bFunction_005d"><span>11.2.10 shadowing-import                                                 [Function]<a class="copiable-link" href="#shadowing_002dimport-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">shadowing-import</code>  <i class="i">symbols <span class="r">&amp;optional</span> package</i> &rArr;  <i class="i"><b class="b">t</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-182"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-182"> &para;</a></span></h4>
+
+<p><i class="i">symbols</i>&mdash;a <i class="i">designator</i> for a <i class="i">list</i> of <i class="i">symbols</i>.
+</p>
+<p><i class="i">package</i> &mdash;a <i class="i">package designator</i>.
+</p>
+<p>The default is the <i class="i">current package</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-246"><span>Description::<a class="copiable-link" href="#Description_003a_003a-246"> &para;</a></span></h4>
+
+<p><b class="b">shadowing-import</b> is like <b class="b">import</b>, 
+but it does not signal an error even if the importation of a <i class="i">symbol</i> 
+would shadow some <i class="i">symbol</i> already <i class="i">accessible</i> in <i class="i">package</i>.  
+</p>
+<p><b class="b">shadowing-import</b> inserts each of <i class="i">symbols</i> 
+into <i class="i">package</i> as an internal symbol, regardless
+of whether another <i class="i">symbol</i> of the same name is shadowed by this
+action.
+If a different <i class="i">symbol</i> of the same name is already <i class="i">present</i>
+in <i class="i">package</i>,
+that <i class="i">symbol</i> is first <i class="i">uninterned</i> from <i class="i">package</i>.
+The new <i class="i">symbol</i> is added to <i class="i">package</i>&rsquo;s shadowing-symbols list.  
+</p>
+<p><b class="b">shadowing-import</b> does name-conflict
+checking to the extent that it checks whether a distinct existing
+<i class="i">symbol</i> with the same name is <i class="i">accessible</i>; if so, it is shadowed by
+the new <i class="i">symbol</i>, which implies that it must be uninterned
+if it was 
+<i class="i">present</i> in <i class="i">package</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-165"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-165"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (in-package &quot;COMMON-LISP-USER&quot;) &rArr;  #&lt;PACKAGE &quot;COMMON-LISP-USER&quot;&gt;
+ (setq sym (intern &quot;CONFLICT&quot;)) &rArr;  CONFLICT
+ (intern &quot;CONFLICT&quot; (make-package 'temp)) &rArr;  TEMP::CONFLICT, NIL
+ (package-shadowing-symbols 'temp) &rArr;  NIL
+ (shadowing-import sym 'temp) &rArr;  T 
+ (package-shadowing-symbols 'temp) &rArr;  (CONFLICT)
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-27"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-27"> &para;</a></span></h4>
+
+<p><b class="b">shadowing-import</b> 
+changes the state of the package system in such a way that
+the consistency rules do not hold across the change.
+</p>
+<p><i class="i">package</i>&rsquo;s shadowing-symbols list is modified.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-48"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-48"> &para;</a></span></h4>
+
+<p>Current state of the package system.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-218"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-218"> &para;</a></span></h4>
+
+<p><a class="ref" href="import.html">import                                                           [Function]</a>
+, 
+<a class="ref" href="unintern.html">unintern                                                         [Function]</a>
+, 
+<a class="ref" href="package_002dshadowing_002dsymbols.html">package-shadowing-symbols                                        [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="delete_002dpackage.html">delete-package                                                   [Function]</a>, Previous: <a href="shadow.html">shadow                                                           [Function]</a>, Up: <a href="Packages-Dictionary.html">Packages Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/shared_002dinitialize.html
@@ -0,0 +1,171 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>shared-initialize (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="shared-initialize (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="shared-initialize (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="update_002dinstance_002dfor_002ddifferent_002dclass.html" rel="next" title="update-instance-for-different-class">
+<link href="reinitialize_002dinstance.html" rel="prev" title="reinitialize-instance">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="shared_002dinitialize">
+<div class="nav-panel">
+<p>
+Next: <a href="update_002dinstance_002dfor_002ddifferent_002dclass.html" accesskey="n" rel="next">update-instance-for-different-class             [Standard Generic Function]</a>, Previous: <a href="reinitialize_002dinstance.html" accesskey="p" rel="prev">reinitialize-instance                           [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="shared_002dinitialize-_005bStandard-Generic-Function_005d"><span>7.7.5 shared-initialize                               [Standard Generic Function]<a class="copiable-link" href="#shared_002dinitialize-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-14"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-14"> &para;</a></span></h4>
+
+<p><code class="code">shared-initialize</code>  <i class="i">instance slot-names <span class="r">&amp;rest</span> initargs <span class="r">&amp;key</span> <span class="r">&amp;allow-other-keys</span></i> &rArr;  <i class="i">instance</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-3"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-3"> &para;</a></span></h4>
+
+<p><code class="code">shared-initialize</code>  <i class="i"><span class="r">(</span><i class="i">instance</i> <b class="b">standard-object</b><span class="r">)</span> slot-names <span class="r">&amp;rest</span> initargs</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-93"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-93"> &para;</a></span></h4>
+
+<p><i class="i">instance</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">slot-names</i>&mdash;a <i class="i">list</i> or <b class="b">t</b>.
+</p>
+<p><i class="i">initargs</i>&mdash;a <i class="i">list</i> of <i class="i">keyword/value pairs</i>
+		   (of initialization argument <i class="i">names</i> and <i class="i">values</i>).
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-132"><span>Description::<a class="copiable-link" href="#Description_003a_003a-132"> &para;</a></span></h4>
+
+<p>The generic function <b class="b">shared-initialize</b> is used to fill the 
+<i class="i">slots</i>                        
+of an <i class="i">instance</i> 
+using <i class="i">initargs</i> and <code class="t">:initform</code>
+forms.  It is called when an instance is created, when an instance is
+re-initialized, when an instance is updated to conform to a redefined
+<i class="i">class</i>, and when an instance is updated to conform to a different
+<i class="i">class</i>. The generic function <b class="b">shared-initialize</b> is called by the
+system-supplied primary <i class="i">method</i> for <b class="b">initialize-instance</b>,
+<b class="b">reinitialize-instance</b>, <b class="b">update-instance-for-redefined-class</b>, and
+<b class="b">update-instance-for-different-class</b>.
+</p>
+<p>The generic function <b class="b">shared-initialize</b> takes the following
+arguments: the <i class="i">instance</i> to be initialized, a specification of a set of
+<i class="i">slot-names</i> <i class="i">accessible</i> in that <i class="i">instance</i>, 
+and any number of <i class="i">initargs</i>.
+The arguments after the first two must form an 
+<i class="i">initialization argument list</i>.  The system-supplied primary <i class="i">method</i> on 
+<b class="b">shared-initialize</b> initializes the <i class="i">slots</i> with values according to the
+<i class="i">initargs</i> and supplied <code class="t">:initform</code> forms.  <i class="i">Slot-names</i>
+indicates which <i class="i">slots</i> should be initialized according
+to their <code class="t">:initform</code> forms if no <i class="i">initargs</i> are
+provided for those <i class="i">slots</i>. 
+</p>
+<p>The system-supplied primary <i class="i">method</i> behaves as follows, 
+regardless of whether the <i class="i">slots</i> are local or shared: 
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>If an <i class="i">initarg</i> in the <i class="i">initialization argument list</i> 
+ specifies a value for that <i class="i">slot</i>, that
+ value is stored into the <i class="i">slot</i>, even if a value has
+ already been stored in the <i class="i">slot</i> before the <i class="i">method</i> is run.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Any <i class="i">slots</i> indicated by <i class="i">slot-names</i> that are still unbound
+ at this point are initialized according to their <code class="t">:initform</code> forms.
+ For any such <i class="i">slot</i> that has an <code class="t">:initform</code> form,
+ that <i class="i">form</i> is evaluated in the lexical environment of its defining 
+ <b class="b">defclass</b> <i class="i">form</i> and the result is stored into the <i class="i">slot</i>.
+ For example, if a <i class="i">before method</i> stores a value in the <i class="i">slot</i>, 
+ the <code class="t">:initform</code> form will not be used to supply a value for the <i class="i">slot</i>.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>The rules mentioned in <a class="ref" href="Rules-for-Initialization-Arguments.html">Rules for Initialization Arguments</a> are obeyed.
+</p>
+</dd>
+</dl>
+
+<p>The <i class="i">slots-names</i> argument specifies the <i class="i">slots</i> that are to be
+initialized according to their <code class="t">:initform</code> forms if no
+initialization arguments apply.  It can be a <i class="i">list</i> of slot <i class="i">names</i>, 
+which specifies the set of those slot <i class="i">names</i>; or it can be the <i class="i">symbol</i> <b class="b">t</b>, 
+which specifies the set of all of the <i class="i">slots</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-114"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-114"> &para;</a></span></h4>
+
+<p><a class="ref" href="Initialize_002dInstance.html">Initialize-Instance</a>
+,
+<a class="ref" href="reinitialize_002dinstance.html">reinitialize-instance                           [Standard Generic Function]</a>
+,
+<a class="ref" href="update_002dinstance_002dfor_002dredefined_002dclass.html">update-instance-for-redefined-class             [Standard Generic Function]</a>
+,
+<a class="ref" href="update_002dinstance_002dfor_002ddifferent_002dclass.html">update-instance-for-different-class             [Standard Generic Function]</a>
+,
+<a class="ref" href="slot_002dboundp.html">slot-boundp                                                      [Function]</a>
+,
+<a class="ref" href="slot_002dmakunbound.html">slot-makunbound                                                  [Function]</a>
+,
+<a class="ref" href="Object-Creation-and-Initialization.html">Object Creation and Initialization</a>,
+<a class="ref" href="Rules-for-Initialization-Arguments.html">Rules for Initialization Arguments</a>,
+<a class="ref" href="Declaring-the-Validity-of-Initialization-Arguments.html">Declaring the Validity of Initialization Arguments</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-76"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-76"> &para;</a></span></h4>
+
+<p><i class="i">Initargs</i> are declared as valid by using the <code class="t">:initarg</code>
+option to <b class="b">defclass</b>, or by defining 
+<i class="i">methods</i> for <b class="b">shared-initialize</b>. 
+The keyword name of each keyword parameter
+specifier in the <i class="i">lambda list</i> of any <i class="i">method</i> defined on 
+<b class="b">shared-initialize</b> is declared as a valid <i class="i">initarg</i>
+name for all <i class="i">classes</i> for which that <i class="i">method</i> is applicable.
+</p>
+<p>Implementations are permitted to optimize <code class="t">:initform</code> forms that 
+neither produce nor depend on side effects, by evaluating these <i class="i">forms</i>
+and storing them into slots before running any 
+<b class="b">initialize-instance</b> methods, rather than by handling them in the
+primary <b class="b">initialize-instance</b> method.  (This optimization might
+be implemented by having the <b class="b">allocate-instance</b> method copy a
+prototype instance.)
+</p>
+<p>Implementations are permitted to optimize default initial value forms
+for <i class="i">initargs</i> associated with slots by not actually
+creating the complete initialization argument 
+<i class="i">list</i> when the only <i class="i">method</i>
+that would receive the complete <i class="i">list</i> is the 
+<i class="i">method</i> on <b class="b">standard-object</b>.
+In this case default initial value forms can be 
+treated like <code class="t">:initform</code> forms.  This optimization has no visible
+effects other than a performance improvement.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="update_002dinstance_002dfor_002ddifferent_002dclass.html">update-instance-for-different-class             [Standard Generic Function]</a>, Previous: <a href="reinitialize_002dinstance.html">reinitialize-instance                           [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/shiftf.html
@@ -0,0 +1,146 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>shiftf (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="shiftf (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="shiftf (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="rotatef.html" rel="next" title="rotatef">
+<link href="setf.html" rel="prev" title="setf">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="shiftf">
+<div class="nav-panel">
+<p>
+Next: <a href="rotatef.html" accesskey="n" rel="next">rotatef                                                             [Macro]</a>, Previous: <a href="setf.html" accesskey="p" rel="prev">setf, psetf                                                         [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="shiftf-_005bMacro_005d"><span>5.3.65 shiftf                                                              [Macro]<a class="copiable-link" href="#shiftf-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">shiftf</code>  <i class="i">{<i class="i">place</i>}^+ newvalue</i> &rArr;  <i class="i">old-value-1</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-83"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-83"> &para;</a></span></h4>
+
+<p><i class="i">place</i>&mdash;a <i class="i">place</i>.
+</p>
+<p><i class="i">newvalue</i>&mdash;a <i class="i">form</i>; evaluated.
+</p>
+<p><i class="i">old-value-1</i>&mdash;an <i class="i">object</i> (the old <i class="i">value</i> of the first <i class="i">place</i>).
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-118"><span>Description::<a class="copiable-link" href="#Description_003a_003a-118"> &para;</a></span></h4>
+
+<p><b class="b">shiftf</b> modifies the values of each
+<i class="i">place</i> by storing <i class="i">newvalue</i>
+into the last <i class="i">place</i>, and shifting the 
+values of the second through the last <i class="i">place</i>
+into the remaining <i class="i">places</i>.
+</p>
+<p>If <i class="i">newvalue</i> produces more values than there
+are store variables, the extra values are ignored. If <i class="i">newvalue</i>
+produces fewer values than there are store variables, the missing values
+are set to <b class="b">nil</b>.
+</p>
+<p>In the form <code class="t">(shiftf <i class="i">place1</i> <i class="i">place2</i> ... <i class="i">placen</i> <i class="i">newvalue</i>)</code>, 
+the values in <i class="i">place1</i> through <i class="i">placen</i> are <i class="i">read</i> and saved,
+and <i class="i">newvalue</i> is evaluated, for a total of <code class="t">n</code>+1 values in all.
+Values 2 through <code class="t">n</code>+1 are then stored into <i class="i">place1</i> through <i class="i">placen</i>, respectively.
+It is as if all the <i class="i">places</i> form a shift register; the <i class="i">newvalue</i>
+is shifted in from the right, all values shift over to the left one place,
+and the value shifted out of <i class="i">place1</i> is returned. 
+</p>
+<p>For information about the <i class="i">evaluation</i> of <i class="i">subforms</i> of <i class="i">places</i>,
+see <a class="ref" href="Evaluation-of-Subforms-to-Places.html">Evaluation of Subforms to Places</a>.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-91"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-91"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq x (list 1 2 3) y 'trash) &rArr;  TRASH
+ (shiftf y x (cdr x) '(hi there)) &rArr;  TRASH
+ x &rArr;  (2 3)
+ y &rArr;  (1 HI THERE)
+
+ (setq x (list 'a 'b 'c)) &rArr;  (A B C)
+ (shiftf (cadr x) 'z) &rArr;  B
+ x &rArr;  (A Z C)
+ (shiftf (cadr x) (cddr x) 'q) &rArr;  Z
+ x &rArr;  (A (C) . Q)
+ (setq n 0) &rArr;  0
+ (setq x (list 'a 'b 'c 'd)) &rArr;  (A B C D)
+ (shiftf (nth (setq n (+ n 1)) x) 'z) &rArr;  B
+ x &rArr;  (A Z C D)
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-8"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-8"> &para;</a></span></h4>
+
+<p><b class="b">define-setf-expander</b>,
+<b class="b">defsetf</b>,
+<b class="b">*macroexpand-hook*</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-102"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-102"> &para;</a></span></h4>
+
+<p><a class="ref" href="setf.html">setf, psetf                                                         [Macro]</a>
+, 
+<a class="ref" href="rotatef.html">rotatef                                                             [Macro]</a>
+, <a class="ref" href="Generalized-Reference.html">Generalized Reference</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-67"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-67"> &para;</a></span></h4>
+
+<p>The effect of
+ <code class="t">(shiftf <i class="i">place1</i> <i class="i">place2</i> ... <i class="i">placen</i> <i class="i">newvalue</i>)</code>
+is roughly equivalent to
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((var1 <i class="i">place1</i>)
+       (var2 <i class="i">place2</i>)
+       ...
+       (varn <i class="i">placen</i>)
+       (var0 <i class="i">newvalue</i>))
+   (setf <i class="i">place1</i> var2)
+   (setf <i class="i">place2</i> var3)
+   ...
+   (setf <i class="i">placen</i> var0)
+   var1)
+</pre></div>
+
+<p>except that the latter would evaluate any <i class="i">subforms</i> 
+of each <code class="t">place</code> twice, whereas <b class="b">shiftf</b> evaluates them once.
+For example, 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (setq n 0) &rArr;  0
+ (setq x (list 'a 'b 'c 'd)) &rArr;  (A B C D)
+ (prog1 (nth (setq n (+ n 1)) x)
+        (setf (nth (setq n (+ n 1)) x) 'z)) &rArr;  B
+ x &rArr;  (A B Z D)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="rotatef.html">rotatef                                                             [Macro]</a>, Previous: <a href="setf.html">setf, psetf                                                         [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/short_002dfloat.html
@@ -0,0 +1,198 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>short-float (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="short-float (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="short-float (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="rational-_0028System-Class_0029.html" rel="next" title="rational (System Class)">
+<link href="float-_0028System-Class_0029.html" rel="prev" title="float (System Class)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="short_002dfloat">
+<div class="nav-panel">
+<p>
+Next: <a href="rational-_0028System-Class_0029.html" accesskey="n" rel="next">rational                                                     [System Class]</a>, Previous: <a href="float-_0028System-Class_0029.html" accesskey="p" rel="prev">float                                                        [System Class]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="short_002dfloat_002c-single_002dfloat_002c-double_002dfloat_002c-long_002dfloat-_005bType_005d"><span>12.2.5 short-float, single-float, double-float, long-float                  [Type]<a class="copiable-link" href="#short_002dfloat_002c-single_002dfloat_002c-double_002dfloat_002c-long_002dfloat-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-4"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-4"> &para;</a></span></h4>
+
+<p><b class="b">short-float</b>: 
+ <b class="b">short-float</b>,
+ <b class="b">float</b>, 
+</p>
+<p><b class="b">real</b>,
+</p>
+<p><b class="b">number</b>,
+ <b class="b">t</b>
+</p>
+<p><b class="b">single-float</b>: 
+ <b class="b">single-float</b>,
+ <b class="b">float</b>, 
+</p>
+<p><b class="b">real</b>,
+</p>
+<p><b class="b">number</b>,
+ <b class="b">t</b>
+</p>
+<p><b class="b">double-float</b>: 
+ <b class="b">double-float</b>,
+ <b class="b">float</b>, 
+</p>
+<p><b class="b">real</b>,
+</p>
+<p><b class="b">number</b>,
+ <b class="b">t</b>
+</p>
+<p><b class="b">long-float</b>: 
+ <b class="b">long-float</b>,
+ <b class="b">float</b>, 
+</p>
+<p><b class="b">real</b>,
+</p>
+<p><b class="b">number</b>,
+ <b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-271"><span>Description::<a class="copiable-link" href="#Description_003a_003a-271"> &para;</a></span></h4>
+
+<p>For the four defined <i class="i">subtypes</i> of <i class="i">type</i> <b class="b">float</b>, it is true that
+intermediate between the <i class="i">type</i> <b class="b">short-float</b> and the <i class="i">type</i> <b class="b">long-float</b> are
+the <i class="i">type</i> <b class="b">single-float</b> and the <i class="i">type</i> <b class="b">double-float</b>.
+The precise definition of these categories is 
+<i class="i">implementation-defined</i>.
+The precision (measured in &ldquo;bits&rdquo;, computed as p\log_2b)
+and the exponent size (also measured in &ldquo;bits,&rdquo; computed as
+\log_2(n+1), where n is the maximum exponent value) is recommended
+to be at least as great
+as the values in Figure 12&ndash;11. 
+Each of the defined <i class="i">subtypes</i> of <i class="i">type</i> <b class="b">float</b> might or might not have a minus zero.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  <b class="b">Format</b>  <b class="b">Minimum Precision</b>  <b class="b">Minimum Exponent Size</b>  <!-- /@w -->
+  __________________________________________________<!-- /@w -->
+  Short   13 bits            5 bits                 <!-- /@w -->
+  Single  24 bits            8 bits                 <!-- /@w -->
+  Double  50 bits            8 bits                 <!-- /@w -->
+  Long    50 bits            8 bits                 <!-- /@w -->
+
+  Figure 12&ndash;11: Recommended Minimum Floating-Point Precision and Exponent Size<!-- /@w -->
+
+</pre></div></div>
+
+<p>There can be fewer than four internal 
+representations for <i class="i">floats</i>. 
+If there are fewer distinct representations, the following rules apply:
+</p><dl class="table">
+<dt>&ndash;</dt>
+<dd><p>If there is only one, it is 
+the <i class="i">type</i> <b class="b">single-float</b>.
+In this representation, an <i class="i">object</i> is simultaneously of <i class="i">types</i> 
+<b class="b">single-float</b>, <b class="b">double-float</b>, <b class="b">short-float</b>, 
+and <b class="b">long-float</b>.
+</p></dd>
+<dt>&ndash;</dt>
+<dd><p>Two internal representations can be arranged in either of the
+following ways:
+</p><dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>Two <i class="i">types</i> are provided: <b class="b">single-float</b> and
+<b class="b">short-float</b>.  An <i class="i">object</i> is simultaneously 
+of <i class="i">types</i> <b class="b">single-float</b>, <b class="b">double-float</b>, and <b class="b">long-float</b>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Two <i class="i">types</i> are provided: <b class="b">single-float</b> and
+<b class="b">double-float</b>. An <i class="i">object</i> is simultaneously of <i class="i">types</i>
+<b class="b">single-float</b> and <b class="b">short-float</b>, or
+<b class="b">double-float</b> and <b class="b">long-float</b>.
+</p></dd>
+</dl>
+
+</dd>
+<dt>&ndash;</dt>
+<dd><p>Three internal representations can be arranged in either
+of the following ways:
+</p><dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>Three <i class="i">types</i> are provided: <b class="b">short-float</b>, 
+<b class="b">single-float</b>, and <b class="b">double-float</b>.
+An <i class="i">object</i> can simultaneously be of <i class="i">type</i> <b class="b">double-float</b>
+and <b class="b">long-float</b>.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>Three <i class="i">types</i> are provided: 
+<b class="b">single-float</b>, <b class="b">double-float</b>,
+and <b class="b">long-float</b>. An <i class="i">object</i> can simultaneously
+be of <i class="i">types</i> <b class="b">single-float</b> and <b class="b">short-float</b>.
+</p></dd>
+</dl>
+
+</dd>
+</dl>
+
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-11"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-11"> &para;</a></span></h4>
+
+<p>Abbreviating.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-11"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-11"> &para;</a></span></h4>
+
+<p>(<code class="code">short-float</code>{<i class="i"><code class="t">[</code>short-lower-limit   <span class="r">[</span>short-upper-limit<span class="r">]</span><code class="t">]</code></i>})
+(<code class="code">single-float</code>{<i class="i"><code class="t">[</code>single-lower-limit <span class="r">[</span>single-upper-limit<span class="r">]</span><code class="t">]</code></i>})
+(<code class="code">double-float</code>{<i class="i"><code class="t">[</code>double-lower-limit <span class="r">[</span>double-upper-limit<span class="r">]</span><code class="t">]</code></i>})
+(<code class="code">long-float</code>{<i class="i"><code class="t">[</code>long-lower-limit     <span class="r">[</span>long-upper-limit<span class="r">]</span><code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-11"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-11"> &para;</a></span></h4>
+
+<p><i class="i">short-lower-limit</i>, <i class="i">short-upper-limit</i>&mdash;<i class="i">interval designators</i> 
+					   for <i class="i">type</i> <b class="b">short-float</b>.
+ The defaults for each of <i class="i">lower-limit</i> and <i class="i">upper-limit</i> is the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<p><i class="i">single-lower-limit</i>, <i class="i">single-upper-limit</i>&mdash;<i class="i">interval designators</i> 
+					   for <i class="i">type</i> <b class="b">single-float</b>.
+ The defaults for each of <i class="i">lower-limit</i> and <i class="i">upper-limit</i> is the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<p><i class="i">double-lower-limit</i>, <i class="i">double-upper-limit</i>&mdash;<i class="i">interval designators</i> 
+					   for <i class="i">type</i> <b class="b">double-float</b>.
+ The defaults for each of <i class="i">lower-limit</i> and <i class="i">upper-limit</i> is the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<p><i class="i">long-lower-limit</i>, <i class="i">long-upper-limit</i>&mdash;<i class="i">interval designators</i> 
+					   for <i class="i">type</i> <b class="b">long-float</b>.
+ The defaults for each of <i class="i">lower-limit</i> and <i class="i">upper-limit</i> is the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-11"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-11"> &para;</a></span></h4>
+
+<p>Each of these denotes the set of <i class="i">floats</i> of the indicated <i class="i">type</i> 
+that are on the interval specified by the <i class="i">interval designators</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="rational-_0028System-Class_0029.html">rational                                                     [System Class]</a>, Previous: <a href="float-_0028System-Class_0029.html">float                                                        [System Class]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/short_002dfloat_002depsilon.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>short-float-epsilon (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="short-float-epsilon (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="short-float-epsilon (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="arithmetic_002derror.html" rel="next" title="arithmetic-error">
+<link href="most_002dpositive_002dshort_002dfloat.html" rel="prev" title="most-positive-short-float">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+p.flushright-paragraph {text-align:right}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="short_002dfloat_002depsilon">
+<div class="nav-panel">
+<p>
+Next: <a href="arithmetic_002derror.html" accesskey="n" rel="next">arithmetic-error                                           [Condition Type]</a>, Previous: <a href="most_002dpositive_002dshort_002dfloat.html" accesskey="p" rel="prev">most-positive-short-float, least-positive-short-float,</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="short_002dfloat_002depsilon_002c-short_002dfloat_002dnegative_002depsilon_002c"><span>12.2.77 short-float-epsilon, short-float-negative-epsilon,<a class="copiable-link" href="#short_002dfloat_002depsilon_002c-short_002dfloat_002dnegative_002depsilon_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="single_002dfloat_002depsilon_002c-single_002dfloat_002dnegative_002depsilon_002c"><span>single-float-epsilon, single-float-negative-epsilon,<a class="copiable-link" href="#single_002dfloat_002depsilon_002c-single_002dfloat_002dnegative_002depsilon_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="double_002dfloat_002depsilon_002c-double_002dfloat_002dnegative_002depsilon_002c"><span>double-float-epsilon, double-float-negative-epsilon,<a class="copiable-link" href="#double_002dfloat_002depsilon_002c-double_002dfloat_002dnegative_002depsilon_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="long_002dfloat_002depsilon_002c-long_002dfloat_002dnegative_002depsilon"><span>long-float-epsilon, long-float-negative-epsilon<a class="copiable-link" href="#long_002dfloat_002depsilon_002c-long_002dfloat_002dnegative_002depsilon"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Constant Variable]</i>
+</p></div>
+<h4 class="subsubheading" id="Constant-Value_003a_003a-9"><span>Constant Value::<a class="copiable-link" href="#Constant-Value_003a_003a-9"> &para;</a></span></h4>
+
+<p><i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-342"><span>Description::<a class="copiable-link" href="#Description_003a_003a-342"> &para;</a></span></h4>
+
+<p>The value of each of the constants <b class="b">short-float-epsilon</b>, 
+<b class="b">single-float-epsilon</b>,
+<b class="b">double-float-epsilon</b>, and <b class="b">long-float-epsilon</b> is 
+the smallest positive <i class="i">float</i> \epsilon of the given format, 
+such that the following expression is <i class="i">true</i> when evaluated:
+</p>
+<p><code class="t">(not (= (float 1 \epsilon) (+ (float 1 \epsilon) \epsilon)))\/</code>
+</p>
+<p>The value of each of the constants <b class="b">short-float-negative-epsilon</b>, 
+<b class="b">single-float-negative-epsilon</b>,
+<b class="b">double-float-negative-epsilon</b>, and  
+<b class="b">long-float-negative-epsilon</b> is the smallest positive
+<i class="i">float</i> \epsilon of the given format, such that the following
+expression is <i class="i">true</i> when evaluated:
+</p>
+<p><code class="t">(not (= (float 1 \epsilon) (- (float 1 \epsilon) \epsilon)))\/</code>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/short_002dsite_002dname.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>short-site-name (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="short-site-name (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="short-site-name (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="machine_002dinstance.html" rel="next" title="machine-instance">
+<link href="lisp_002dimplementation_002dtype.html" rel="prev" title="lisp-implementation-type">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="short_002dsite_002dname">
+<div class="nav-panel">
+<p>
+Next: <a href="machine_002dinstance.html" accesskey="n" rel="next">machine-instance                                                 [Function]</a>, Previous: <a href="lisp_002dimplementation_002dtype.html" accesskey="p" rel="prev">lisp-implementation-type,</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="short_002dsite_002dname_002c-long_002dsite_002dname-_005bFunction_005d"><span>25.2.25 short-site-name, long-site-name                                  [Function]<a class="copiable-link" href="#short_002dsite_002dname_002c-long_002dsite_002dname-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">short-site-name</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i">description</i>
+</p>
+<p><code class="code">long-site-name</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i">description</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-506"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-506"> &para;</a></span></h4>
+
+<p><i class="i">description</i>&mdash;a <i class="i">string</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-673"><span>Description::<a class="copiable-link" href="#Description_003a_003a-673"> &para;</a></span></h4>
+
+<p><b class="b">short-site-name</b> and <b class="b">long-site-name</b> return
+a <i class="i">string</i> that identifies the physical location 
+of the computer hardware, 
+or <b class="b">nil</b> if no appropriate <i class="i">description</i> can be produced.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-473"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-473"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (short-site-name)
+&rArr;  &quot;MIT AI Lab&quot;
+<i class="i">OR</i>&rArr; &quot;CMU-CSD&quot;
+ (long-site-name)
+&rArr;  &quot;MIT Artificial Intelligence Laboratory&quot;
+<i class="i">OR</i>&rArr; &quot;CMU Computer Science Department&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-136"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-136"> &para;</a></span></h4>
+
+<p>The implementation,
+the location of the computer hardware,
+and the installation/configuration process.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/signal.html
@@ -0,0 +1,122 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>signal (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="signal (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="signal (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="simple_002dcondition.html" rel="next" title="simple-condition">
+<link href="method_002dcombination_002derror.html" rel="prev" title="method-combination-error">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="signal">
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002dcondition.html" accesskey="n" rel="next">simple-condition                                           [Condition Type]</a>, Previous: <a href="method_002dcombination_002derror.html" accesskey="p" rel="prev">method-combination-error                                         [Function]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="signal-_005bFunction_005d"><span>9.2.17 signal                                                           [Function]<a class="copiable-link" href="#signal-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">signal</code>  <i class="i">datum <span class="r">&amp;rest</span> arguments</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-138"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-138"> &para;</a></span></h4>
+
+<p><i class="i">datum</i>, <i class="i">arguments</i>&mdash;<i class="i">designators</i> for a <i class="i">condition</i> 
+ of default type <b class="b">simple-condition</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-187"><span>Description::<a class="copiable-link" href="#Description_003a_003a-187"> &para;</a></span></h4>
+
+<p><i class="i">Signals</i> the <i class="i">condition</i> denoted by the given <i class="i">datum</i> and <i class="i">arguments</i>.
+If the <i class="i">condition</i> is not handled, <b class="b">signal</b> returns <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-118"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-118"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun handle-division-conditions (condition)
+   (format t &quot;Considering condition for division condition handling~
+   (when (and (typep condition 'arithmetic-error)
+              (eq '/ (arithmetic-error-operation condition)))
+     (invoke-debugger condition)))
+HANDLE-DIVISION-CONDITIONS
+ (defun handle-other-arithmetic-errors (condition)
+   (format t &quot;Considering condition for arithmetic condition handling~
+   (when (typep condition 'arithmetic-error)
+     (abort)))
+HANDLE-OTHER-ARITHMETIC-ERRORS
+ (define-condition a-condition-with-no-handler (condition) ())
+A-CONDITION-WITH-NO-HANDLER
+ (signal 'a-condition-with-no-handler)
+NIL
+ (handler-bind ((condition #'handle-division-conditions)
+                  (condition #'handle-other-arithmetic-errors))
+   (signal 'a-condition-with-no-handler))
+Considering condition for division condition handling
+Considering condition for arithmetic condition handling
+NIL
+ (handler-bind ((arithmetic-error #'handle-division-conditions)
+                  (arithmetic-error #'handle-other-arithmetic-errors))
+   (signal 'arithmetic-error :operation '* :operands '(1.2 b)))
+Considering condition for division condition handling
+Considering condition for arithmetic condition handling
+Back to Lisp Toplevel
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-12"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-12"> &para;</a></span></h4>
+
+<p>The debugger might be entered due to <b class="b">*break-on-signals*</b>.
+</p>
+<p>Handlers for the condition being signaled might transfer control.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-24"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-24"> &para;</a></span></h4>
+
+<p>Existing handler bindings.
+</p>
+<p><b class="b">*break-on-signals*</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-164"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-164"> &para;</a></span></h4>
+
+<p><b class="b">*break-on-signals*</b>,
+<a class="ref" href="error.html">error                                                            [Function]</a>
+,
+<b class="b">simple-condition</b>,
+<a class="ref" href="Signaling-and-Handling-Conditions.html">Signaling and Handling Conditions</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-101"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-101"> &para;</a></span></h4>
+
+<p>If <code class="t">(typep <i class="i">datum</i> *break-on-signals*)</code> <i class="i">yields</i> <i class="i">true</i>,
+the debugger is entered prior to beginning the signaling process.  
+The <b class="b">continue</b> <i class="i">restart</i> can be used to continue with the signaling process.
+This is also true for all other <i class="i">functions</i> and <i class="i">macros</i> that
+should, might, or must <i class="i">signal</i> <i class="i">conditions</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002dcondition.html">simple-condition                                           [Condition Type]</a>, Previous: <a href="method_002dcombination_002derror.html">method-combination-error                                         [Function]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/signed_002dbyte.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>signed-byte (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="signed-byte (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="signed-byte (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="unsigned_002dbyte.html" rel="next" title="unsigned-byte">
+<link href="integer.html" rel="prev" title="integer">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="signed_002dbyte">
+<div class="nav-panel">
+<p>
+Next: <a href="unsigned_002dbyte.html" accesskey="n" rel="next">unsigned-byte                                                        [Type]</a>, Previous: <a href="integer.html" accesskey="p" rel="prev">integer                                                      [System Class]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="signed_002dbyte-_005bType_005d"><span>12.2.9 signed-byte                                                          [Type]<a class="copiable-link" href="#signed_002dbyte-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-5"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-5"> &para;</a></span></h4>
+
+<p><b class="b">signed-byte</b>,
+<b class="b">integer</b>,
+<b class="b">rational</b>,
+</p>
+<p><b class="b">real</b>,
+</p>
+<p><b class="b">number</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-275"><span>Description::<a class="copiable-link" href="#Description_003a_003a-275"> &para;</a></span></h4>
+
+<p>The atomic <i class="i">type specifier</i> <b class="b">signed-byte</b> denotes the same 
+type as is denoted by the <i class="i">type specifier</i> <b class="b">integer</b>;
+however, the list forms of these two <i class="i">type specifiers</i> have different semantics.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-14"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-14"> &para;</a></span></h4>
+
+<p>Abbreviating.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-14"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-14"> &para;</a></span></h4>
+
+<p>(<code class="code">signed-byte</code>{<i class="i"><code class="t">[</code>s | <b class="b">*</b><code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-14"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-14"> &para;</a></span></h4>
+
+<p><i class="i">s</i>&mdash;a positive <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-14"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-14"> &para;</a></span></h4>
+
+<p>This denotes the set of <i class="i">integers</i> that can be represented
+in two&rsquo;s-complement form in a <i class="i">byte</i> of <i class="i">s</i> bits.  This is
+equivalent to <code class="t">(integer -2^<span class="r">s-1</span> 2^<span class="r">s-1</span>-1)</code>.  The type
+<b class="b">signed-byte</b> or the type <code class="t">(signed-byte *)</code> is the same
+as the <i class="i">type</i> <b class="b">integer</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/signum.html
@@ -0,0 +1,105 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>signum (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="signum (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="signum (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="sqrt.html" rel="next" title="sqrt">
+<link href="mod-_0028Function_0029.html" rel="prev" title="mod (Function)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="signum">
+<div class="nav-panel">
+<p>
+Next: <a href="sqrt.html" accesskey="n" rel="next">sqrt, isqrt                                                      [Function]</a>, Previous: <a href="mod-_0028Function_0029.html" accesskey="p" rel="prev">mod, rem                                                         [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="signum-_005bFunction_005d"><span>12.2.37 signum                                                           [Function]<a class="copiable-link" href="#signum-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">signum</code>  <i class="i">number</i> &rArr;  <i class="i">signed-prototype</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-222"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-222"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">signed-prototype</i>&mdash;a <i class="i">number</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-302"><span>Description::<a class="copiable-link" href="#Description_003a_003a-302"> &para;</a></span></h4>
+
+<p><b class="b">signum</b> determines a numerical value that indicates whether
+<i class="i">number</i> is negative, zero, or positive.
+</p>
+<p>For a <i class="i">rational</i>,
+<b class="b">signum</b> returns one of <code class="t">-1</code>, <code class="t">0</code>, or <code class="t">1</code>
+according to whether <i class="i">number</i> is negative, zero, or positive.
+For a <i class="i">float</i>, 
+the result is a <i class="i">float</i> of the same format
+whose value is minus one, zero, or one.
+For a <i class="i">complex</i> number <code class="t">z</code>,
+<code class="t">(signum <i class="i">z</i>)</code> is a complex number of the same phase but with unit magnitude,
+unless <code class="t">z</code> is a complex zero, in which case the result is <code class="t">z</code>.
+</p>
+<p>For <i class="i">rational</i> <i class="i">arguments</i>, <b class="b">signum</b> is a rational function,
+but it may be irrational for <i class="i">complex</i> <i class="i">arguments</i>.
+</p>
+<p>If <i class="i">number</i> is a <i class="i">float</i>, the result is a <i class="i">float</i>.
+If <i class="i">number</i> is a <i class="i">rational</i>, the result is a <i class="i">rational</i>.
+If <i class="i">number</i> is a <i class="i">complex float</i>, the result is a <i class="i">complex float</i>.
+If <i class="i">number</i> is a <i class="i">complex rational</i>, the result is a <i class="i">complex</i>, 
+but it is <i class="i">implementation-dependent</i> whether that result is a
+<i class="i">complex rational</i> or a <i class="i">complex float</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-206"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-206"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (signum 0) &rArr;  0
+ (signum 99) &rArr;  1
+ (signum 4/5) &rArr;  1
+ (signum -99/100) &rArr;  -1
+ (signum 0.0) &rArr;  0.0
+ (signum #c(0 33)) &rArr;  #C(0.0 1.0)
+ (signum #c(7.5 10.0)) &rArr;  #C(0.6 0.8)
+ (signum #c(0.0 -14.7)) &rArr;  #C(0.0 -1.0)
+ (eql (signum -0.0) -0.0) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-255"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-255"> &para;</a></span></h4>
+
+<p><a class="ref" href="Rule-of-Float-Substitutability.html">Rule of Float Substitutability</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-153"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-153"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (signum x) &equiv; (if (zerop x) x (/ x (abs x)))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="sqrt.html">sqrt, isqrt                                                      [Function]</a>, Previous: <a href="mod-_0028Function_0029.html">mod, rem                                                         [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/simple_002darray.html
@@ -0,0 +1,113 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>simple-array (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="simple-array (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="simple-array (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="vector-_0028System-Class_0029.html" rel="next" title="vector (System Class)">
+<link href="array.html" rel="prev" title="array">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="simple_002darray">
+<div class="nav-panel">
+<p>
+Next: <a href="vector-_0028System-Class_0029.html" accesskey="n" rel="next">vector                                                       [System Class]</a>, Previous: <a href="array.html" accesskey="p" rel="prev">array                                                        [System Class]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="simple_002darray-_005bType_005d"><span>15.2.2 simple-array                                                         [Type]<a class="copiable-link" href="#simple_002darray-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-14"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-14"> &para;</a></span></h4>
+
+<p><b class="b">simple-array</b>,
+<b class="b">array</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-421"><span>Description::<a class="copiable-link" href="#Description_003a_003a-421"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> of an <i class="i">array</i> that is not displaced 
+to another <i class="i">array</i>, has no <i class="i">fill pointer</i>, and is
+not
+<i class="i">expressly adjustable</i> is a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">simple-array</b>.
+The concept of a <i class="i">simple array</i>
+exists to allow the implementation to use a specialized representation
+and to allow the user to declare that certain values will always be
+<i class="i">simple arrays</i>. 
+</p>
+<p>The <i class="i">types</i> <b class="b">simple-vector</b>,
+		 <b class="b">simple-string</b>,
+             and <b class="b">simple-bit-vector</b>
+are <i class="i">disjoint</i> <i class="i">subtypes</i> of <i class="i">type</i> <b class="b">simple-array</b>, 
+for they respectively mean <code class="t">(simple-array t (*))</code>,
+		           the union of all <code class="t">(simple-array <i class="i">c</i> (*))</code> 
+ 			    for any <i class="i">c</i> being a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">character</b>,
+			and <code class="t">(simple-array bit (*))</code>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-19"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-19"> &para;</a></span></h4>
+
+<p>Specializing.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-19"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-19"> &para;</a></span></h4>
+
+<p>(<code class="code">simple-array</code>{<i class="i"><code class="t">[</code>{element-type | <b class="b">*</b>} <span class="r">[</span>dimension-spec<span class="r">]</span><code class="t">]</code></i>})
+</p>
+<p><i class="i">dimension-spec</i>&nbsp;::=rank&nbsp;|&nbsp;<b class="b">*</b>&nbsp;|&nbsp;<span class="r">(</span>{dimension&nbsp;|&nbsp;<b class="b">*</b>}*<span class="r">)</span><!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-19"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-19"> &para;</a></span></h4>
+
+<p><i class="i">dimension</i>&mdash;a <i class="i">valid array dimension</i>.
+</p>
+<p><i class="i">element-type</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<p><i class="i">rank</i>&mdash;a non-negative <i class="i">fixnum</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-19"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-19"> &para;</a></span></h4>
+
+<p>This <i class="i">compound type specifier</i> is treated exactly as the corresponding
+<i class="i">compound type specifier</i> for <i class="i">type</i> <b class="b">array</b> would be treated,
+except that the set is further constrained to include only <i class="i">simple arrays</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-231"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-231"> &para;</a></span></h4>
+
+<p>It is <i class="i">implementation-dependent</i> 
+whether <i class="i">displaced arrays</i>,
+        <i class="i">vectors</i> with <i class="i">fill pointers</i>,
+     or arrays that are <i class="i">actually adjustable</i>
+  are <i class="i">simple arrays</i>.
+</p>
+<p><code class="t">(simple-array *)</code> refers to all <i class="i">simple arrays</i> 
+regardless of element type, <code class="t">(simple-array <i class="i">type-specifier</i>)</code>
+refers only to those <i class="i">simple arrays</i>
+that can result from giving <i class="i">type-specifier</i> as the
+<code class="t">:element-type</code> argument to <b class="b">make-array</b>.  
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="vector-_0028System-Class_0029.html">vector                                                       [System Class]</a>, Previous: <a href="array.html">array                                                        [System Class]</a>, Up: <a href="Arrays-Dictionary.html">Arrays Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/simple_002dbase_002dstring.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>simple-base-string (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="simple-base-string (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="simple-base-string (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Strings-Dictionary.html" rel="up" title="Strings Dictionary">
+<link href="simple_002dstring_002dp.html" rel="next" title="simple-string-p">
+<link href="simple_002dstring.html" rel="prev" title="simple-string">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="simple_002dbase_002dstring">
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002dstring_002dp.html" accesskey="n" rel="next">simple-string-p                                                  [Function]</a>, Previous: <a href="simple_002dstring.html" accesskey="p" rel="prev">simple-string                                                        [Type]</a>, Up: <a href="Strings-Dictionary.html" accesskey="u" rel="up">Strings Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="simple_002dbase_002dstring-_005bType_005d"><span>16.2.4 simple-base-string                                                   [Type]<a class="copiable-link" href="#simple_002dbase_002dstring-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-19"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-19"> &para;</a></span></h4>
+
+<p><b class="b">simple-base-string</b>,
+<b class="b">base-string</b>,
+<b class="b">simple-string</b>,
+<b class="b">string</b>,
+<b class="b">vector</b>,
+<b class="b">simple-array</b>,
+<b class="b">array</b>,
+<b class="b">sequence</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-459"><span>Description::<a class="copiable-link" href="#Description_003a_003a-459"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">simple-base-string</b> is equivalent to 
+</p>
+<p><code class="t">(simple-array base-char (*))</code>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-27"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-27"> &para;</a></span></h4>
+
+<p>Abbreviating.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-27"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-27"> &para;</a></span></h4>
+
+<p>(<code class="code">simple-base-string</code>{<i class="i"><code class="t">[</code>size<code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-27"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-27"> &para;</a></span></h4>
+
+<p><i class="i">size</i>&mdash;a non-negative <i class="i">fixnum</i>,
+	    or the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-27"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-27"> &para;</a></span></h4>
+
+<p>This is equivalent to the type <code class="t">(simple-array base-char (<i class="i">size</i>))</code>;
+that is, the set of <i class="i">simple base strings</i> of size <i class="i">size</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/simple_002dbit_002dvector.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>simple-bit-vector (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="simple-bit-vector (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="simple-bit-vector (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="make_002darray.html" rel="next" title="make-array">
+<link href="bit_002dvector.html" rel="prev" title="bit-vector">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="simple_002dbit_002dvector">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002darray.html" accesskey="n" rel="next">make-array                                                       [Function]</a>, Previous: <a href="bit_002dvector.html" accesskey="p" rel="prev">bit-vector                                                   [System Class]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="simple_002dbit_002dvector-_005bType_005d"><span>15.2.6 simple-bit-vector                                                    [Type]<a class="copiable-link" href="#simple_002dbit_002dvector-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-16"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-16"> &para;</a></span></h4>
+
+<p><b class="b">simple-bit-vector</b>,
+<b class="b">bit-vector</b>,
+<b class="b">vector</b>,
+<b class="b">simple-array</b>,
+<b class="b">array</b>,
+<b class="b">sequence</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-425"><span>Description::<a class="copiable-link" href="#Description_003a_003a-425"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> of a <i class="i">bit vector</i> that is not displaced
+to another <i class="i">array</i>, has no <i class="i">fill pointer</i>, and is 
+not
+<i class="i">expressly adjustable</i>
+is a
+<i class="i">subtype</i> of <i class="i">type</i> <b class="b">simple-bit-vector</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-23"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-23"> &para;</a></span></h4>
+
+<p>Abbreviating.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-23"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-23"> &para;</a></span></h4>
+
+<p>(<code class="code">simple-bit-vector</code>{<i class="i"><code class="t">[</code>size<code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-23"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-23"> &para;</a></span></h4>
+
+<p><i class="i">size</i>&mdash;a non-negative <i class="i">fixnum</i>,
+	    or the <i class="i">symbol</i> <b class="b">*</b>.
+  The default is the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-23"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-23"> &para;</a></span></h4>
+
+<p>This denotes the same type as the <i class="i">type</i>
+<code class="t">(simple-array bit (<i class="i">size</i>))</code>; 
+that is, the set of <i class="i">simple bit vectors</i> of size <i class="i">size</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/simple_002dbit_002dvector_002dp.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>simple-bit-vector-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="simple-bit-vector-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="simple-bit-vector-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="bit_002dvector_002dp.html" rel="prev" title="bit-vector-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="simple_002dbit_002dvector_002dp">
+<div class="nav-panel">
+<p>
+Previous: <a href="bit_002dvector_002dp.html" accesskey="p" rel="prev">bit-vector-p                                                     [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="simple_002dbit_002dvector_002dp-_005bFunction_005d"><span>15.2.36 simple-bit-vector-p                                              [Function]<a class="copiable-link" href="#simple_002dbit_002dvector_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">simple-bit-vector-p</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-345"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-345"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-455"><span>Description::<a class="copiable-link" href="#Description_003a_003a-455"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">simple-bit-vector</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-327"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-327"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (simple-bit-vector-p (make-array 6)) &rArr;  <i class="i">false</i>
+ (simple-bit-vector-p #*) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-374"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-374"> &para;</a></span></h4>
+
+<p><a class="ref" href="simple_002dvector_002dp.html">simple-vector-p                                                  [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-249"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-249"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (simple-bit-vector-p <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'simple-bit-vector)
+</pre></div>
+
+
+
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/simple_002dcondition.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>simple-condition (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="simple-condition (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="simple-condition (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="simple_002dcondition_002dformat_002dcontrol.html" rel="next" title="simple-condition-format-control">
+<link href="signal.html" rel="prev" title="signal">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="simple_002dcondition">
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002dcondition_002dformat_002dcontrol.html" accesskey="n" rel="next">simple-condition-format-control, simple-condition-format-arguments</a>, Previous: <a href="signal.html" accesskey="p" rel="prev">signal                                                           [Function]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="simple_002dcondition-_005bCondition-Type_005d"><span>9.2.18 simple-condition                                           [Condition Type]<a class="copiable-link" href="#simple_002dcondition-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-28"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-28"> &para;</a></span></h4>
+<p><b class="b">simple-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-188"><span>Description::<a class="copiable-link" href="#Description_003a_003a-188"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">simple-condition</b> represents <i class="i">conditions</i> that are
+signaled by <b class="b">signal</b> whenever a <i class="i">format-control</i> is
+supplied as the function&rsquo;s first argument.
+</p>
+<p>The <i class="i">format control</i> and <i class="i">format arguments</i> are initialized with 
+the initialization arguments named <code class="t">:format-control</code> 
+</p>
+<p>and <code class="t">:format-arguments</code> to <b class="b">make-condition</b>, and are
+<i class="i">accessed</i> by the <i class="i">functions</i>
+</p>
+<p><b class="b">simple-condition-format-control</b>
+</p>
+<p>and <b class="b">simple-condition-format-arguments</b>.
+If format arguments are not supplied to <b class="b">make-condition</b>,
+<b class="b">nil</b> is used as a default.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-165"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-165"> &para;</a></span></h4>
+
+<p><a class="ref" href="simple_002dcondition_002dformat_002dcontrol.html">simple-condition-format-control, simple-condition-format-arguments</a>
+,
+</p>
+<p><b class="b">simple-condition-format-arguments</b>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/simple_002dcondition_002dformat_002dcontrol.html
@@ -0,0 +1,84 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>simple-condition-format-control (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="simple-condition-format-control (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="simple-condition-format-control (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="warn.html" rel="next" title="warn">
+<link href="simple_002dcondition.html" rel="prev" title="simple-condition">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="simple_002dcondition_002dformat_002dcontrol">
+<div class="nav-panel">
+<p>
+Next: <a href="warn.html" accesskey="n" rel="next">warn                                                             [Function]</a>, Previous: <a href="simple_002dcondition.html" accesskey="p" rel="prev">simple-condition                                           [Condition Type]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="simple_002dcondition_002dformat_002dcontrol_002c-simple_002dcondition_002dformat_002darguments"><span>9.2.19 simple-condition-format-control, simple-condition-format-arguments<a class="copiable-link" href="#simple_002dcondition_002dformat_002dcontrol_002c-simple_002dcondition_002dformat_002darguments"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Function]</i>
+</p></div>
+<p><code class="code">simple-condition-format-control</code>  <i class="i">condition</i> &rArr;  <i class="i">format-control</i>
+</p>
+<p><code class="code">simple-condition-format-arguments</code>  <i class="i">condition</i> &rArr;  <i class="i">format-arguments</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-139"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-139"> &para;</a></span></h4>
+
+<p><i class="i">condition</i>&mdash;a <i class="i">condition</i> of <i class="i">type</i> <b class="b">simple-condition</b>.
+</p>
+<p><i class="i">format-control</i>&mdash;a <i class="i">format control</i>.
+</p>
+<p><i class="i">format-arguments</i>&mdash;a <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-189"><span>Description::<a class="copiable-link" href="#Description_003a_003a-189"> &para;</a></span></h4>
+
+<p><b class="b">simple-condition-format-control</b> returns the <i class="i">format control</i> needed to 
+process the <i class="i">condition</i>&rsquo;s <i class="i">format arguments</i>.
+</p>
+<p><b class="b">simple-condition-format-arguments</b> returns a <i class="i">list</i> of <i class="i">format arguments</i> 
+needed to process the <i class="i">condition</i>&rsquo;s <i class="i">format control</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-119"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-119"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq foo (make-condition 'simple-condition
+                          :format-control &quot;Hi ~S&quot;
+                          :format-arguments '(ho)))
+&rArr;  #&lt;SIMPLE-CONDITION 26223553&gt;
+ (apply #'format nil (simple-condition-format-control foo)
+                     (simple-condition-format-arguments foo))
+&rArr;  &quot;Hi HO&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-166"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-166"> &para;</a></span></h4>
+
+<p><a class="ref" href="simple_002dcondition.html">simple-condition                                           [Condition Type]</a>
+,
+<a class="ref" href="Condition-System-Concepts.html">Condition System Concepts</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/simple_002derror.html
@@ -0,0 +1,61 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>simple-error (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="simple-error (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="simple-error (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="invalid_002dmethod_002derror.html" rel="next" title="invalid-method-error">
+<link href="check_002dtype.html" rel="prev" title="check-type">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="simple_002derror">
+<div class="nav-panel">
+<p>
+Next: <a href="invalid_002dmethod_002derror.html" accesskey="n" rel="next">invalid-method-error                                             [Function]</a>, Previous: <a href="check_002dtype.html" accesskey="p" rel="prev">check-type                                                          [Macro]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="simple_002derror-_005bCondition-Type_005d"><span>9.2.14 simple-error                                               [Condition Type]<a class="copiable-link" href="#simple_002derror-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-27"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-27"> &para;</a></span></h4>
+
+<p><b class="b">simple-error</b>,
+<b class="b">simple-condition</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-184"><span>Description::<a class="copiable-link" href="#Description_003a_003a-184"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">simple-error</b> consists of <i class="i">conditions</i> that
+are signaled by <b class="b">error</b> or <b class="b">cerror</b> when a
+</p>
+<p><i class="i">format control</i>
+</p>
+<p>is supplied as the function&rsquo;s first argument.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/simple_002dstring.html
@@ -0,0 +1,79 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>simple-string (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="simple-string (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="simple-string (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Strings-Dictionary.html" rel="up" title="Strings Dictionary">
+<link href="simple_002dbase_002dstring.html" rel="next" title="simple-base-string">
+<link href="base_002dstring.html" rel="prev" title="base-string">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="simple_002dstring">
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002dbase_002dstring.html" accesskey="n" rel="next">simple-base-string                                                   [Type]</a>, Previous: <a href="base_002dstring.html" accesskey="p" rel="prev">base-string                                                          [Type]</a>, Up: <a href="Strings-Dictionary.html" accesskey="u" rel="up">Strings Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="simple_002dstring-_005bType_005d"><span>16.2.3 simple-string                                                        [Type]<a class="copiable-link" href="#simple_002dstring-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-18"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-18"> &para;</a></span></h4>
+
+<p><b class="b">simple-string</b>,
+<b class="b">string</b>,
+<b class="b">vector</b>,
+<b class="b">simple-array</b>,
+<b class="b">array</b>,
+<b class="b">sequence</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-458"><span>Description::<a class="copiable-link" href="#Description_003a_003a-458"> &para;</a></span></h4>
+
+<p>A <i class="i">simple string</i> is a specialized one-dimensional
+<i class="i">simple array</i> whose <i class="i">elements</i> are of <i class="i">type</i> <b class="b">character</b> or a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">character</b>.
+When used as a <i class="i">type specifier</i> for object creation,
+<b class="b">simple-string</b> means <code class="t">(simple-array character (<i class="i">size</i>))</code>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-26"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-26"> &para;</a></span></h4>
+
+<p>Abbreviating.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-26"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-26"> &para;</a></span></h4>
+
+<p>(<code class="code">simple-string</code>{<i class="i"><code class="t">[</code>size<code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-26"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-26"> &para;</a></span></h4>
+
+<p><i class="i">size</i>&mdash;a non-negative <i class="i">fixnum</i>,
+	    or the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-26"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-26"> &para;</a></span></h4>
+
+<p>This denotes the union of all <i class="i">types</i>
+<code class="t">(simple-array <i class="i">c</i> (<i class="i">size</i>))</code> for all <i class="i">subtypes</i> <i class="i">c</i> of
+<b class="b">character</b>; that is, the set of <i class="i">simple strings</i> of size <i class="i">size</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/simple_002dstring_002dp.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>simple-string-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="simple-string-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="simple-string-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Strings-Dictionary.html" rel="up" title="Strings Dictionary">
+<link href="char.html" rel="next" title="char">
+<link href="simple_002dbase_002dstring.html" rel="prev" title="simple-base-string">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="simple_002dstring_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="char.html" accesskey="n" rel="next">char, schar                                                      [Accessor]</a>, Previous: <a href="simple_002dbase_002dstring.html" accesskey="p" rel="prev">simple-base-string                                                   [Type]</a>, Up: <a href="Strings-Dictionary.html" accesskey="u" rel="up">Strings Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="simple_002dstring_002dp-_005bFunction_005d"><span>16.2.5 simple-string-p                                                  [Function]<a class="copiable-link" href="#simple_002dstring_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">simple-string-p</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-346"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-346"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-460"><span>Description::<a class="copiable-link" href="#Description_003a_003a-460"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">simple-string</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-328"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-328"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (simple-string-p &quot;aaaaaa&quot;) &rArr;  <i class="i">true</i>
+ (simple-string-p (make-array 6 
+                              :element-type 'character 
+                              :fill-pointer t)) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-250"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-250"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (simple-string-p <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'simple-string)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/simple_002dtype_002derror.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>simple-type-error (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="simple-type-error (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="simple-type-error (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="type_002derror_002ddatum.html" rel="prev" title="type-error-datum">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="simple_002dtype_002derror">
+<div class="nav-panel">
+<p>
+Previous: <a href="type_002derror_002ddatum.html" accesskey="p" rel="prev">type-error-datum, type-error-expected-type                       [Function]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="simple_002dtype_002derror-_005bCondition-Type_005d"><span>4.4.31 simple-type-error                                          [Condition Type]<a class="copiable-link" href="#simple_002dtype_002derror-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-14"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-14"> &para;</a></span></h4>
+
+<p><b class="b">simple-type-error</b>,
+<b class="b">simple-condition</b>,
+<b class="b">type-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-53"><span>Description::<a class="copiable-link" href="#Description_003a_003a-53"> &para;</a></span></h4>
+
+<p><i class="i">Conditions</i> of <i class="i">type</i> <b class="b">simple-type-error</b> 
+are like <i class="i">conditions</i> of <i class="i">type</i> <b class="b">type-error</b>, 
+except that they provide an alternate mechanism for specifying
+how the <i class="i">condition</i> is to be <i class="i">reported</i>;
+see the <i class="i">type</i> <b class="b">simple-condition</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-40"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-40"> &para;</a></span></h4>
+
+<p><b class="b">simple-condition</b>,
+</p>
+<p><a class="ref" href="simple_002dcondition_002dformat_002dcontrol.html">simple-condition-format-control, simple-condition-format-arguments</a>
+,
+</p>
+<p><b class="b">simple-condition-format-arguments</b>, 
+<a class="ref" href="type_002derror_002ddatum.html">type-error-datum, type-error-expected-type                       [Function]</a>
+,
+<b class="b">type-error-expected-type</b>
+</p>
+
+
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/simple_002dvector.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>simple-vector (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="simple-vector (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="simple-vector (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="bit_002dvector.html" rel="next" title="bit-vector">
+<link href="vector-_0028System-Class_0029.html" rel="prev" title="vector (System Class)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="simple_002dvector">
+<div class="nav-panel">
+<p>
+Next: <a href="bit_002dvector.html" accesskey="n" rel="next">bit-vector                                                   [System Class]</a>, Previous: <a href="vector-_0028System-Class_0029.html" accesskey="p" rel="prev">vector                                                       [System Class]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="simple_002dvector-_005bType_005d"><span>15.2.4 simple-vector                                                        [Type]<a class="copiable-link" href="#simple_002dvector-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-15"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-15"> &para;</a></span></h4>
+
+<p><b class="b">simple-vector</b>,
+<b class="b">vector</b>,
+<b class="b">simple-array</b>,
+<b class="b">array</b>,
+<b class="b">sequence</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-423"><span>Description::<a class="copiable-link" href="#Description_003a_003a-423"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> of a <i class="i">vector</i> that is not displaced to another
+<i class="i">array</i>, has no <i class="i">fill pointer</i>, is not 
+<i class="i">expressly adjustable</i>
+and is able to hold 
+elements of any <i class="i">type</i> is a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">simple-vector</b>.
+</p>
+<p>The <i class="i">type</i> <b class="b">simple-vector</b> is a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">vector</b>,
+and is a <i class="i">subtype</i> of <i class="i">type</i> <code class="t">(vector t)</code>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-21"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-21"> &para;</a></span></h4>
+
+<p>Specializing.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-21"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-21"> &para;</a></span></h4>
+
+<p>(<code class="code">simple-vector</code>{<i class="i"><code class="t">[</code>size<code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-21"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-21"> &para;</a></span></h4>
+
+<p><i class="i">size</i>&mdash;a non-negative <i class="i">fixnum</i>,
+	    or the <i class="i">symbol</i> <b class="b">*</b>.
+  The default is the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-21"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-21"> &para;</a></span></h4>
+
+<p>This is the same as <code class="t">(simple-array t (<i class="i">size</i>))</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/simple_002dvector_002dp.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>simple-vector-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="simple-vector-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="simple-vector-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="svref.html" rel="next" title="svref">
+<link href="array_002dtotal_002dsize_002dlimit.html" rel="prev" title="array-total-size-limit">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="simple_002dvector_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="svref.html" accesskey="n" rel="next">svref                                                            [Accessor]</a>, Previous: <a href="array_002dtotal_002dsize_002dlimit.html" accesskey="p" rel="prev">array-total-size-limit                                  [Constant Variable]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="simple_002dvector_002dp-_005bFunction_005d"><span>15.2.27 simple-vector-p                                                  [Function]<a class="copiable-link" href="#simple_002dvector_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">simple-vector-p</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-336"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-336"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-446"><span>Description::<a class="copiable-link" href="#Description_003a_003a-446"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">simple-vector</b>;
+otherwise, returns <i class="i">false</i>..
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-318"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-318"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (simple-vector-p (make-array 6)) &rArr;  <i class="i">true</i>
+ (simple-vector-p &quot;aaaaaa&quot;) &rArr;  <i class="i">false</i>
+ (simple-vector-p (make-array 6 :fill-pointer t)) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-366"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-366"> &para;</a></span></h4>
+
+<p><b class="b">simple-vector</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-243"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-243"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (simple-vector-p <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'simple-vector)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/simple_002dwarning.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>simple-warning (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="simple-warning (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="simple-warning (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="invoke_002ddebugger.html" rel="next" title="invoke-debugger">
+<link href="warn.html" rel="prev" title="warn">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="simple_002dwarning">
+<div class="nav-panel">
+<p>
+Next: <a href="invoke_002ddebugger.html" accesskey="n" rel="next">invoke-debugger                                                  [Function]</a>, Previous: <a href="warn.html" accesskey="p" rel="prev">warn                                                             [Function]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="simple_002dwarning-_005bCondition-Type_005d"><span>9.2.21 simple-warning                                             [Condition Type]<a class="copiable-link" href="#simple_002dwarning-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-29"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-29"> &para;</a></span></h4>
+
+<p><b class="b">simple-warning</b>,
+<b class="b">simple-condition</b>,
+<b class="b">warning</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-191"><span>Description::<a class="copiable-link" href="#Description_003a_003a-191"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">simple-warning</b> represents <i class="i">conditions</i> that 
+are signaled by <b class="b">warn</b> whenever a 
+</p>
+<p><i class="i">format control</i> 
+</p>
+<p>is supplied as the function&rsquo;s first argument.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/sin.html
@@ -0,0 +1,83 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>sin (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="sin (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="sin (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="asin.html" rel="next" title="asin">
+<link href="floor.html" rel="prev" title="floor">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="sin">
+<div class="nav-panel">
+<p>
+Next: <a href="asin.html" accesskey="n" rel="next">asin, acos, atan                                                 [Function]</a>, Previous: <a href="floor.html" accesskey="p" rel="prev">floor, ffloor, ceiling, fceiling,</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="sin_002c-cos_002c-tan-_005bFunction_005d"><span>12.2.20 sin, cos, tan                                                    [Function]<a class="copiable-link" href="#sin_002c-cos_002c-tan-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">sin</code>  <i class="i">radians</i> &rArr;  <i class="i">number</i>
+</p>
+<p><code class="code">cos</code>  <i class="i">radians</i> &rArr;  <i class="i">number</i>
+</p>
+<p><code class="code">tan</code>  <i class="i">radians</i> &rArr;  <i class="i">number</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-206"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-206"> &para;</a></span></h4>
+
+<p><i class="i">radians</i>&mdash;a <i class="i">number</i> given in radians.
+</p>
+<p><i class="i">number</i>&mdash;a <i class="i">number</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-285"><span>Description::<a class="copiable-link" href="#Description_003a_003a-285"> &para;</a></span></h4>
+
+<p><b class="b">sin</b>, <b class="b">cos</b>, and <b class="b">tan</b> 
+return the sine, cosine, and tangent, respectively, of <i class="i">radians</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-189"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-189"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (sin 0) &rArr;  0.0
+ (cos 0.7853982) &rArr;  0.707107
+ (tan #c(0 1)) &rArr;  #C(0.0 0.761594)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-81"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-81"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">radians</i> is not a <i class="i">number</i>.
+Might signal <b class="b">arithmetic-error</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-240"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-240"> &para;</a></span></h4>
+
+<p><a class="ref" href="asin.html">asin, acos, atan                                                 [Function]</a>
+,
+<b class="b">acos</b>,
+<b class="b">atan</b>,
+<a class="ref" href="Rule-of-Float-Substitutability.html">Rule of Float Substitutability</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/sinh.html
@@ -0,0 +1,181 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>sinh (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="sinh (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="sinh (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="_002a.html" rel="next" title="*">
+<link href="pi.html" rel="prev" title="pi">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.center {text-align:center}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="sinh">
+<div class="nav-panel">
+<p>
+Next: <a href="_002a.html" accesskey="n" rel="next">*                                                                [Function]</a>, Previous: <a href="pi.html" accesskey="p" rel="prev">pi                                                      [Constant Variable]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="sinh_002c-cosh_002c-tanh_002c-asinh_002c-acosh_002c-atanh-_005bFunction_005d"><span>12.2.23 sinh, cosh, tanh, asinh, acosh, atanh                            [Function]<a class="copiable-link" href="#sinh_002c-cosh_002c-tanh_002c-asinh_002c-acosh_002c-atanh-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">sinh</code>  <i class="i">number</i> &rArr;  <i class="i">result</i>
+</p>
+<p><code class="code">cosh</code>  <i class="i">number</i> &rArr;  <i class="i">result</i>
+</p>
+<p><code class="code">tanh</code>  <i class="i">number</i> &rArr;  <i class="i">result</i>
+</p>
+<p><code class="code">asinh</code>  <i class="i">number</i> &rArr;  <i class="i">result</i>
+</p>
+<p><code class="code">acosh</code>  <i class="i">number</i> &rArr;  <i class="i">result</i>
+</p>
+<p><code class="code">atanh</code>  <i class="i">number</i> &rArr;  <i class="i">result</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-208"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-208"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">result</i>&mdash;a <i class="i">number</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-288"><span>Description::<a class="copiable-link" href="#Description_003a_003a-288"> &para;</a></span></h4>
+
+<p>These functions compute the hyperbolic sine, cosine, tangent,
+arc sine, arc cosine, and arc tangent functions, 
+which are mathematically defined for an argument <i class="i">x</i>
+as given in Figure 12&ndash;15.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Function                Definition                                  <!-- /@w -->
+  Hyperbolic sine          (e^x-e^<i class="i">-x</i>)/2                             <!-- /@w -->
+  Hyperbolic cosine        (e^x+e^<i class="i">-x</i>)/2                             <!-- /@w -->
+  Hyperbolic tangent       (e^x-e^<i class="i">-x</i>)/(e^x+e^<i class="i">-x</i>)                  <!-- /@w -->
+  Hyperbolic arc sine      <code class="t">log</code>  (x+\sqrt<i class="i">1+x^2</i>)                      <!-- /@w -->
+  Hyperbolic arc cosine    2 <code class="t">log</code>  (\sqrt<i class="i">(x+1)/2</i> + \sqrt<i class="i">(x-1)/2</i>)   <!-- /@w -->
+  Hyperbolic arc tangent   (<code class="t">log</code>  (1+x) - <code class="t">log</code> (1-x))/2                 <!-- /@w -->
+
+    Figure 12&ndash;15: Mathematical definitions for hyperbolic functions  <!-- /@w -->
+
+</pre></div></div>
+
+<p>The following definition for the inverse hyperbolic cosine
+determines the range and branch cuts:
+</p>
+<div class="center"><code class="t">arccosh</code>  z = 2 <code class="t">log</code>  (\sqrt<i class="i">(z+1)/2</i> + \sqrt<i class="i">(z-1)/2</i>\Bigr).
+</div>
+<p>The branch cut for the inverse hyperbolic cosine function
+lies along the real axis to the left of~1 (inclusive), extending
+indefinitely along the negative real axis, continuous with quadrant II
+and (between 0 and~1) with quadrant I.
+The range is that half-strip of the complex plane containing numbers whose
+real part is non-negative and whose imaginary
+part is between -\pi (exclusive) and~\pi (inclusive).
+A number with real part zero is in the range 
+if its imaginary part is between zero (inclusive) and~\pi (inclusive).
+</p>
+<p>The following definition for the inverse hyperbolic sine determines
+the range and branch cuts:
+</p>
+<div class="center"><code class="t">arcsinh</code>  z = <code class="t">log</code>  (z+\sqrt<i class="i">1+z^2</i>\Bigr).
+</div>
+<p>The branch cut for the inverse hyperbolic sine function is in two pieces:
+one along the positive imaginary axis above i
+(inclusive), continuous with quadrant I, and one along the negative imaginary
+axis below -i (inclusive), continuous with quadrant III.
+The range is that strip of the complex plane containing numbers whose imaginary
+part is between -\pi/2 and~\pi/2.  A number with imaginary
+part equal to -\pi/2 is in the range if and only if its real
+part is non-positive; a number with imaginary part equal to \pi/2 is in
+the range if and only if its imaginary part is non-negative.
+</p>
+<p>The following definition for the inverse hyperbolic tangent
+determines the range and branch cuts:
+</p>
+<div class="center"><code class="t">arctanh</code>  z = <i class="i"><i class="i"><code class="t">log</code>  (1+z) - <code class="t">log</code>  (1-z)</i>\over<span class="r">2</span></i>.
+</div>
+<p>Note that:
+</p>
+<div class="center">i <code class="t">arctan</code>  z = <code class="t">arctanh</code>  iz.
+</div>
+<p>The branch cut for the inverse hyperbolic tangent function
+is in two pieces: one along the negative real axis to the left of
+-1 (inclusive), continuous with quadrant III, and one along
+the positive real axis to the right of~1 (inclusive), continuous with
+quadrant I.  The points -1 and~1 are excluded from the
+domain.
+The range is that strip of the complex plane containing
+numbers whose imaginary part is between -\pi/2 and
+\pi/2.  A number with imaginary part equal to -\pi/2
+is in the range if and only if its real part is strictly negative; a number with
+imaginary part equal to \pi/2 is in the range if and only if its imaginary
+part is strictly positive.  
+Thus the range of the inverse hyperbolic tangent function is identical to
+that of the inverse hyperbolic sine function with the points
+-\pi i/2 and~\pi i/2 excluded.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-192"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-192"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (sinh 0) &rArr;  0.0 
+ (cosh (complex 0 -1)) &rArr;  #C(0.540302 -0.0)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-83"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-83"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">number</i> is not a <i class="i">number</i>.
+Might signal <b class="b">arithmetic-error</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-242"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-242"> &para;</a></span></h4>
+
+<p><a class="ref" href="log.html">log                                                              [Function]</a>
+,
+<a class="ref" href="sqrt.html">sqrt, isqrt                                                      [Function]</a>
+,
+<a class="ref" href="Rule-of-Float-Substitutability.html">Rule of Float Substitutability</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-146"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-146"> &para;</a></span></h4>
+
+<p>The result of <b class="b">acosh</b> may be a <i class="i">complex</i> even if <i class="i">number</i> 
+is not a <i class="i">complex</i>; this occurs when <i class="i">number</i> is less than one.
+Also, the result of <b class="b">atanh</b> may be a <i class="i">complex</i> even if <i class="i">number</i> 
+is not a <i class="i">complex</i>; this occurs when the absolute value of <i class="i">number</i> 
+is greater than one.
+</p>
+<p>The branch cut formulae are mathematically correct, assuming
+completely accurate computation.  
+Implementors should consult a good text on
+numerical analysis.  The formulae given above are not necessarily
+the simplest ones for real-valued computations; they are chosen
+to define the branch cuts in desirable ways for the complex case.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002a.html">*                                                                [Function]</a>, Previous: <a href="pi.html">pi                                                      [Constant Variable]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/sleep.html
@@ -0,0 +1,83 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>sleep (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="sleep (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="sleep (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="apropos.html" rel="next" title="apropos">
+<link href="get_002duniversal_002dtime.html" rel="prev" title="get-universal-time">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="sleep">
+<div class="nav-panel">
+<p>
+Next: <a href="apropos.html" accesskey="n" rel="next">apropos, apropos-list                                            [Function]</a>, Previous: <a href="get_002duniversal_002dtime.html" accesskey="p" rel="prev">get-universal-time, get-decoded-time                             [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="sleep-_005bFunction_005d"><span>25.2.4 sleep                                                            [Function]<a class="copiable-link" href="#sleep-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">sleep</code>  <i class="i">seconds</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-490"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-490"> &para;</a></span></h4>
+
+<p><i class="i">seconds</i>&mdash;a non-negative <i class="i">real</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-652"><span>Description::<a class="copiable-link" href="#Description_003a_003a-652"> &para;</a></span></h4>
+
+<p>Causes execution to cease and become dormant for approximately the
+seconds of real time indicated by <i class="i">seconds</i>, 
+whereupon execution is resumed.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-464"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-464"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (sleep 1) &rArr;  NIL 
+
+;; Actually, since SLEEP is permitted to use approximate timing, 
+;; this might not always yield true, but it will often enough that
+;; we felt it to be a productive example of the intent.
+ (let ((then (get-universal-time))
+       (now  (progn (sleep 10) (get-universal-time))))
+   (&gt;= (- now then) 10))
+&rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-82"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-82"> &para;</a></span></h4>
+
+<p>Causes processing to pause.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-121"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-121"> &para;</a></span></h4>
+
+<p>The granularity of the scheduler.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-238"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-238"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">seconds</i> is not a non-negative <i class="i">real</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/slot_002dboundp.html
@@ -0,0 +1,103 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>slot-boundp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="slot-boundp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="slot-boundp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="slot_002dexists_002dp.html" rel="next" title="slot-exists-p">
+<link href="change_002dclass.html" rel="prev" title="change-class">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="slot_002dboundp">
+<div class="nav-panel">
+<p>
+Next: <a href="slot_002dexists_002dp.html" accesskey="n" rel="next">slot-exists-p                                                    [Function]</a>, Previous: <a href="change_002dclass.html" accesskey="p" rel="prev">change-class                                    [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="slot_002dboundp-_005bFunction_005d"><span>7.7.9 slot-boundp                                                      [Function]<a class="copiable-link" href="#slot_002dboundp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">slot-boundp</code>  <i class="i">instance slot-name</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-97"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-97"> &para;</a></span></h4>
+
+<p><i class="i">instance</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">slot-name</i>&mdash;a <i class="i">symbol</i> naming a <i class="i">slot</i> of <i class="i">instance</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-136"><span>Description::<a class="copiable-link" href="#Description_003a_003a-136"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if the <i class="i">slot</i> named <i class="i">slot-name</i> in <i class="i">instance</i> is bound;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-26"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-26"> &para;</a></span></h4>
+
+<p>If no <i class="i">slot</i> of the <i class="i">name</i> <i class="i">slot-name</i> exists in the 
+<i class="i">instance</i>, <b class="b">slot-missing</b> is called as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (slot-missing (class-of <i class="i">instance</i>)
+               <i class="i">instance</i>
+               <i class="i">slot-name</i>
+               'slot-boundp)
+</pre></div>
+
+<p>(If <b class="b">slot-missing</b> is invoked and returns a value,
+a <i class="i">boolean equivalent</i> to its <i class="i">primary value</i> 
+is returned by <b class="b">slot-boundp</b>.)
+</p>
+<p>The specific behavior depends on <i class="i">instance</i>&rsquo;s <i class="i">metaclass</i>.
+An error is never signaled if <i class="i">instance</i> has <i class="i">metaclass</i> <b class="b">standard-class</b>.
+An error is always signaled if <i class="i">instance</i> has <i class="i">metaclass</i> <b class="b">built-in-class</b>.
+The consequences are undefined if <i class="i">instance</i> has any other <i class="i">metaclass</i>&ndash;an error
+might or might not be signaled in this situation.  Note in particular that the behavior
+for <i class="i">conditions</i> and <i class="i">structures</i> is not specified.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-118"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-118"> &para;</a></span></h4>
+
+<p><a class="ref" href="slot_002dmakunbound.html">slot-makunbound                                                  [Function]</a>
+,
+<a class="ref" href="slot_002dmissing.html">slot-missing                                    [Standard Generic Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-80"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-80"> &para;</a></span></h4>
+
+<p>The <i class="i">function</i> <b class="b">slot-boundp</b> allows for writing 
+<i class="i">after methods</i> on <b class="b">initialize-instance</b> in order to initialize only
+those <i class="i">slots</i> that have not already been bound.
+</p>
+<p>Although no <i class="i">implementation</i> is required to do so,
+  implementors are strongly encouraged to implement the <i class="i">function</i> <b class="b">slot-boundp</b> using 
+  the <i class="i">function</i> <code class="t">slot-boundp-using-class</code> described in the <i class="i">Metaobject Protocol</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="slot_002dexists_002dp.html">slot-exists-p                                                    [Function]</a>, Previous: <a href="change_002dclass.html">change-class                                    [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/slot_002dexists_002dp.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>slot-exists-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="slot-exists-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="slot-exists-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="slot_002dmakunbound.html" rel="next" title="slot-makunbound">
+<link href="slot_002dboundp.html" rel="prev" title="slot-boundp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="slot_002dexists_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="slot_002dmakunbound.html" accesskey="n" rel="next">slot-makunbound                                                  [Function]</a>, Previous: <a href="slot_002dboundp.html" accesskey="p" rel="prev">slot-boundp                                                      [Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="slot_002dexists_002dp-_005bFunction_005d"><span>7.7.10 slot-exists-p                                                    [Function]<a class="copiable-link" href="#slot_002dexists_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">slot-exists-p</code>  <i class="i">object slot-name</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-98"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-98"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">slot-name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-137"><span>Description::<a class="copiable-link" href="#Description_003a_003a-137"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if the <i class="i">object</i> has
+a <i class="i">slot</i> named <i class="i">slot-name</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-11"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-11"> &para;</a></span></h4>
+
+<p><b class="b">defclass</b>,
+<b class="b">defstruct</b>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-119"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-119"> &para;</a></span></h4>
+
+<p><a class="ref" href="defclass.html">defclass                                                            [Macro]</a>
+,
+<a class="ref" href="slot_002dmissing.html">slot-missing                                    [Standard Generic Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-81"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-81"> &para;</a></span></h4>
+
+<p>Although no <i class="i">implementation</i> is required to do so,
+  implementors are strongly encouraged to implement the <i class="i">function</i> <b class="b">slot-exists-p</b> using 
+  the <i class="i">function</i> <code class="t">slot-exists-p-using-class</code> described in the <i class="i">Metaobject Protocol</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/slot_002dmakunbound.html
@@ -0,0 +1,92 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>slot-makunbound (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="slot-makunbound (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="slot-makunbound (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="slot_002dmissing.html" rel="next" title="slot-missing">
+<link href="slot_002dexists_002dp.html" rel="prev" title="slot-exists-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="slot_002dmakunbound">
+<div class="nav-panel">
+<p>
+Next: <a href="slot_002dmissing.html" accesskey="n" rel="next">slot-missing                                    [Standard Generic Function]</a>, Previous: <a href="slot_002dexists_002dp.html" accesskey="p" rel="prev">slot-exists-p                                                    [Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="slot_002dmakunbound-_005bFunction_005d"><span>7.7.11 slot-makunbound                                                  [Function]<a class="copiable-link" href="#slot_002dmakunbound-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">slot-makunbound</code>  <i class="i">instance slot-name</i> &rArr;  <i class="i">instance</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-99"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-99"> &para;</a></span></h4>
+
+<p><i class="i">instance</i> &ndash; instance.
+</p>
+<p><i class="i">Slot-name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-138"><span>Description::<a class="copiable-link" href="#Description_003a_003a-138"> &para;</a></span></h4>
+
+<p>The <i class="i">function</i> <b class="b">slot-makunbound</b> restores a <i class="i">slot</i> 
+of the name <i class="i">slot-name</i> in an <i class="i">instance</i> to
+the unbound state.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-27"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-27"> &para;</a></span></h4>
+
+<p>If no <i class="i">slot</i> of the name <i class="i">slot-name</i> exists in the 
+<i class="i">instance</i>, <b class="b">slot-missing</b> is called as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted">(slot-missing (class-of <i class="i">instance</i>)
+              <i class="i">instance</i>
+              <i class="i">slot-name</i>
+              'slot-makunbound)
+</pre></div>
+
+<p>(Any values returned by <b class="b">slot-missing</b> in this case are
+ignored by <b class="b">slot-makunbound</b>.)
+</p>
+<p>The specific behavior depends on <i class="i">instance</i>&rsquo;s <i class="i">metaclass</i>.
+An error is never signaled if <i class="i">instance</i> has <i class="i">metaclass</i> <b class="b">standard-class</b>.
+An error is always signaled if <i class="i">instance</i> has <i class="i">metaclass</i> <b class="b">built-in-class</b>.
+The consequences are undefined if <i class="i">instance</i> has any other <i class="i">metaclass</i>&ndash;an error
+might or might not be signaled in this situation.  Note in particular that the behavior
+for <i class="i">conditions</i> and <i class="i">structures</i> is not specified.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-120"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-120"> &para;</a></span></h4>
+
+<p><a class="ref" href="slot_002dboundp.html">slot-boundp                                                      [Function]</a>
+,
+<a class="ref" href="slot_002dmissing.html">slot-missing                                    [Standard Generic Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-82"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-82"> &para;</a></span></h4>
+
+<p>Although no <i class="i">implementation</i> is required to do so,
+  implementors are strongly encouraged to implement the <i class="i">function</i> <b class="b">slot-makunbound</b> using 
+  the <i class="i">function</i> <code class="t">slot-makunbound-using-class</code> described in the <i class="i">Metaobject Protocol</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/slot_002dmissing.html
@@ -0,0 +1,141 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>slot-missing (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="slot-missing (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="slot-missing (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="slot_002dunbound.html" rel="next" title="slot-unbound">
+<link href="slot_002dmakunbound.html" rel="prev" title="slot-makunbound">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="slot_002dmissing">
+<div class="nav-panel">
+<p>
+Next: <a href="slot_002dunbound.html" accesskey="n" rel="next">slot-unbound                                    [Standard Generic Function]</a>, Previous: <a href="slot_002dmakunbound.html" accesskey="p" rel="prev">slot-makunbound                                                  [Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="slot_002dmissing-_005bStandard-Generic-Function_005d"><span>7.7.12 slot-missing                                    [Standard Generic Function]<a class="copiable-link" href="#slot_002dmissing-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-18"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-18"> &para;</a></span></h4>
+
+<p><code class="code">slot-missing</code>  <i class="i">class object slot-name operation <span class="r">&amp;optional</span> new-value</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-7"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-7"> &para;</a></span></h4>
+
+<p><code class="code">slot-missing</code>  <i class="i"><span class="r">(</span><i class="i">class</i> <b class="b">t</b><span class="r">)</span>
+				   object slot-name
+			     operation <span class="r">&amp;optional</span> new-value</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-100"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-100"> &para;</a></span></h4>
+
+<p><i class="i">class</i>&mdash;the <i class="i">class</i> of <i class="i">object</i>.
+</p>
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">slot-name</i>&mdash;a <i class="i">symbol</i> (the <i class="i">name</i> of a would-be <i class="i">slot</i>).
+</p>
+<p><i class="i">operation</i>&mdash;one of the <i class="i">symbols</i>
+		    <b class="b">setf</b>,
+		    <b class="b">slot-boundp</b>,
+		    <b class="b">slot-makunbound</b>,
+		 or <b class="b">slot-value</b>.
+</p>
+<p><i class="i">new-value</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">result</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-139"><span>Description::<a class="copiable-link" href="#Description_003a_003a-139"> &para;</a></span></h4>
+
+<p>The generic function <b class="b">slot-missing</b> is invoked when an attempt is
+made to <i class="i">access</i> a <i class="i">slot</i> in an <i class="i">object</i> whose 
+<i class="i">metaclass</i> is <b class="b">standard-class</b>
+and the <i class="i">slot</i> of the name <i class="i">slot-name</i>
+is not a <i class="i">name</i> of a
+<i class="i">slot</i> in that <i class="i">class</i>. 
+The default <i class="i">method</i> signals an error.
+</p>
+<p>The generic function <b class="b">slot-missing</b> is not intended to be called by
+programmers.  Programmers may write <i class="i">methods</i> for it.
+</p>
+<p>The generic function <b class="b">slot-missing</b> may be called during
+evaluation of <b class="b">slot-value</b>, <code class="t">(setf slot-value)</code>, 
+<b class="b">slot-boundp</b>, and <b class="b">slot-makunbound</b>.  For each
+of these operations the corresponding <i class="i">symbol</i> 
+for the <i class="i">operation</i>
+argument is <b class="b">slot-value</b>, <b class="b">setf</b>, <b class="b">slot-boundp</b>,
+and <b class="b">slot-makunbound</b> respectively.
+</p>
+<p>The optional <i class="i">new-value</i> argument to <b class="b">slot-missing</b> is used
+when the operation is attempting to set the value of the <i class="i">slot</i>.
+</p>
+<p>If <b class="b">slot-missing</b> returns, its values will be treated as follows:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>If the <i class="i">operation</i> is <b class="b">setf</b> or <b class="b">slot-makunbound</b>,
+any <i class="i">values</i> will be ignored by the caller.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If the <i class="i">operation</i> is <b class="b">slot-value</b>,
+only the <i class="i">primary value</i> will be used by the caller,
+and all other values will be ignored.
+</p>
+</dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If the <i class="i">operation</i> is <b class="b">slot-boundp</b>,
+any <i class="i">boolean equivalent</i> of the <i class="i">primary value</i>
+of the <i class="i">method</i> might be is used,
+and all other values will be ignored.
+</p></dd>
+</dl>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-28"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-28"> &para;</a></span></h4>
+
+<p>The default <i class="i">method</i> on <b class="b">slot-missing</b> 
+signals an error of <i class="i">type</i> <b class="b">error</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-121"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-121"> &para;</a></span></h4>
+
+<p><a class="ref" href="defclass.html">defclass                                                            [Macro]</a>
+,
+<a class="ref" href="slot_002dexists_002dp.html">slot-exists-p                                                    [Function]</a>
+,
+<a class="ref" href="slot_002dvalue.html">slot-value                                                       [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-83"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-83"> &para;</a></span></h4>
+
+<p>The set of arguments (including the <i class="i">class</i> of the instance) facilitates
+defining methods on the metaclass for <b class="b">slot-missing</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="slot_002dunbound.html">slot-unbound                                    [Standard Generic Function]</a>, Previous: <a href="slot_002dmakunbound.html">slot-makunbound                                                  [Function]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/slot_002dunbound.html
@@ -0,0 +1,106 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>slot-unbound (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="slot-unbound (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="slot-unbound (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="slot_002dvalue.html" rel="next" title="slot-value">
+<link href="slot_002dmissing.html" rel="prev" title="slot-missing">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="slot_002dunbound">
+<div class="nav-panel">
+<p>
+Next: <a href="slot_002dvalue.html" accesskey="n" rel="next">slot-value                                                       [Function]</a>, Previous: <a href="slot_002dmissing.html" accesskey="p" rel="prev">slot-missing                                    [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="slot_002dunbound-_005bStandard-Generic-Function_005d"><span>7.7.13 slot-unbound                                    [Standard Generic Function]<a class="copiable-link" href="#slot_002dunbound-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-19"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-19"> &para;</a></span></h4>
+
+<p><code class="code">slot-unbound</code>  <i class="i">class instance slot-name</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-8"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-8"> &para;</a></span></h4>
+
+<p><code class="code">slot-unbound</code>  <i class="i"><span class="r">(</span><i class="i">class</i> <b class="b">t</b><span class="r">)</span>
+		       instance slot-name</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-101"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-101"> &para;</a></span></h4>
+
+<p><i class="i">class</i>&mdash;the <i class="i">class</i> of the <i class="i">instance</i>.
+</p>
+<p><i class="i">instance</i>&mdash;the <i class="i">instance</i> in which an attempt
+		   was made to <i class="i">read</i> the <i class="i">unbound</i> <i class="i">slot</i>.
+</p>
+<p><i class="i">slot-name</i>&mdash;the <i class="i">name</i> of the <i class="i">unbound</i> <i class="i">slot</i>.
+</p>
+<p><i class="i">result</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-140"><span>Description::<a class="copiable-link" href="#Description_003a_003a-140"> &para;</a></span></h4>
+
+<p>The generic function <b class="b">slot-unbound</b> is called when an
+unbound <i class="i">slot</i> is read in
+an <i class="i">instance</i> whose metaclass is <b class="b">standard-class</b>.
+The default <i class="i">method</i> signals an error 
+</p>
+<p>of <i class="i">type</i> <b class="b">unbound-slot</b>.
+The name slot of the 
+<b class="b">unbound-slot</b> <i class="i">condition</i> is initialized
+  to the name of the offending variable, and the instance slot
+  of the <b class="b">unbound-slot</b> <i class="i">condition</i> is initialized to the offending instance.
+</p>
+<p>The generic function <b class="b">slot-unbound</b> is not intended to be called
+by programmers.  Programmers may write <i class="i">methods</i> for it.
+The <i class="i">function</i> <b class="b">slot-unbound</b> is called only 
+indirectly by <b class="b">slot-value</b>.
+</p>
+<p>If <b class="b">slot-unbound</b> returns, 
+only the <i class="i">primary value</i> will be used by the caller,
+and all other values will be ignored.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-29"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-29"> &para;</a></span></h4>
+
+<p>The default <i class="i">method</i> on <b class="b">slot-unbound</b>
+signals an error of <i class="i">type</i> <b class="b">unbound-slot</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-122"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-122"> &para;</a></span></h4>
+
+<p><a class="ref" href="slot_002dmakunbound.html">slot-makunbound                                                  [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-84"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-84"> &para;</a></span></h4>
+
+<p>An unbound <i class="i">slot</i> may occur if no <code class="t">:initform</code> form was
+specified for the <i class="i">slot</i> and the <i class="i">slot</i> value has not been set,
+or if <b class="b">slot-makunbound</b> has been called on the <i class="i">slot</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="slot_002dvalue.html">slot-value                                                       [Function]</a>, Previous: <a href="slot_002dmissing.html">slot-missing                                    [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/slot_002dvalue.html
@@ -0,0 +1,145 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>slot-value (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="slot-value (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="slot-value (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="method_002dqualifiers.html" rel="next" title="method-qualifiers">
+<link href="slot_002dunbound.html" rel="prev" title="slot-unbound">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="slot_002dvalue">
+<div class="nav-panel">
+<p>
+Next: <a href="method_002dqualifiers.html" accesskey="n" rel="next">method-qualifiers                               [Standard Generic Function]</a>, Previous: <a href="slot_002dunbound.html" accesskey="p" rel="prev">slot-unbound                                    [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="slot_002dvalue-_005bFunction_005d"><span>7.7.14 slot-value                                                       [Function]<a class="copiable-link" href="#slot_002dvalue-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">slot-value</code>  <i class="i">object slot-name</i> &rArr;  <i class="i">value</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-102"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-102"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">value</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-141"><span>Description::<a class="copiable-link" href="#Description_003a_003a-141"> &para;</a></span></h4>
+
+<p>The <i class="i">function</i> <b class="b">slot-value</b> returns the <i class="i">value</i> of the <i class="i">slot</i>
+named <i class="i">slot-name</i> in the <i class="i">object</i>.
+If there is no <i class="i">slot</i> named <i class="i">slot-name</i>, <b class="b">slot-missing</b> is called.
+If the <i class="i">slot</i> is unbound, <b class="b">slot-unbound</b> is called.
+</p>
+<p>The macro <b class="b">setf</b> can be used with <b class="b">slot-value</b> 
+to change the value of a <i class="i">slot</i>. 
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-102"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-102"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defclass foo () 
+   ((a :accessor foo-a :initarg :a :initform 1)
+    (b :accessor foo-b :initarg :b)
+    (c :accessor foo-c :initform 3)))
+&rArr;  #&lt;STANDARD-CLASS FOO 244020371&gt;
+ (setq foo1 (make-instance 'foo :a 'one :b 'two))
+&rArr;  #&lt;FOO 36325624&gt;
+ (slot-value foo1 'a) &rArr;  ONE
+ (slot-value foo1 'b) &rArr;  TWO
+ (slot-value foo1 'c) &rArr;  3
+ (setf (slot-value foo1 'a) 'uno) &rArr;  UNO
+ (slot-value foo1 'a) &rArr;  UNO
+ (defmethod foo-method ((x foo))
+   (slot-value x 'a))
+&rArr;  #&lt;STANDARD-METHOD FOO-METHOD (FOO) 42720573&gt;
+ (foo-method foo1) &rArr;  UNO
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-30"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-30"> &para;</a></span></h4>
+
+<p>If an attempt is made to read a <i class="i">slot</i> and no <i class="i">slot</i> of
+the name <i class="i">slot-name</i> exists in the <i class="i">object</i>, 
+<b class="b">slot-missing</b> is called as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (slot-missing (class-of <i class="i">instance</i>)
+               <i class="i">instance</i>
+               <i class="i">slot-name</i>
+               'slot-value)
+</pre></div>
+
+<p>(If <b class="b">slot-missing</b> is invoked, its <i class="i">primary value</i> 
+ is returned by <b class="b">slot-value</b>.)
+</p>
+<p>If an attempt is made to write a <i class="i">slot</i> and no <i class="i">slot</i> of
+the name <i class="i">slot-name</i> exists in the <i class="i">object</i>,
+<b class="b">slot-missing</b> is called as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (slot-missing (class-of <i class="i">instance</i>)
+               <i class="i">instance</i>
+               <i class="i">slot-name</i>
+               'setf
+               <i class="i">new-value</i>)
+</pre></div>
+
+<p>(If <b class="b">slot-missing</b> returns in this case, any <i class="i">values</i> are ignored.)
+</p>
+<p>The specific behavior depends on <i class="i">object</i>&rsquo;s <i class="i">metaclass</i>.
+An error is never signaled if <i class="i">object</i> has <i class="i">metaclass</i> <b class="b">standard-class</b>.
+An error is always signaled if <i class="i">object</i> has <i class="i">metaclass</i> <b class="b">built-in-class</b>.
+The consequences are 
+unspecified
+if <i class="i">object</i> has any other <i class="i">metaclass</i>&ndash;an error
+might or might not be signaled in this situation.  Note in particular that the behavior
+for <i class="i">conditions</i> and <i class="i">structures</i> is not specified.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-123"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-123"> &para;</a></span></h4>
+
+<p><a class="ref" href="slot_002dmissing.html">slot-missing                                    [Standard Generic Function]</a>
+,
+<a class="ref" href="slot_002dunbound.html">slot-unbound                                    [Standard Generic Function]</a>
+,
+<a class="ref" href="with_002dslots.html">with-slots                                                          [Macro]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-85"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-85"> &para;</a></span></h4>
+
+<p>Although no <i class="i">implementation</i> is required to do so,
+  implementors are strongly encouraged to implement the <i class="i">function</i> <b class="b">slot-value</b> using 
+  the <i class="i">function</i> <code class="t">slot-value-using-class</code> described in the <i class="i">Metaobject Protocol</i>.
+</p>
+<p>Implementations may optimize <b class="b">slot-value</b> by compiling it inline.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="method_002dqualifiers.html">method-qualifiers                               [Standard Generic Function]</a>, Previous: <a href="slot_002dunbound.html">slot-unbound                                    [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/software_002dtype.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>software-type (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="software-type (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="software-type (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="user_002dhomedir_002dpathname.html" rel="next" title="user-homedir-pathname">
+<link href="machine_002dversion.html" rel="prev" title="machine-version">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="software_002dtype">
+<div class="nav-panel">
+<p>
+Next: <a href="user_002dhomedir_002dpathname.html" accesskey="n" rel="next">user-homedir-pathname                                            [Function]</a>, Previous: <a href="machine_002dversion.html" accesskey="p" rel="prev">machine-version                                                  [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="software_002dtype_002c-software_002dversion-_005bFunction_005d"><span>25.2.29 software-type, software-version                                  [Function]<a class="copiable-link" href="#software_002dtype_002c-software_002dversion-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">software-type</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i">description</i>
+</p>
+<p><code class="code">software-version</code>  <i class="i">&lt;<i class="i">no <i class="i">arguments</i></i>&gt;</i> &rArr;  <i class="i">description</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-510"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-510"> &para;</a></span></h4>
+
+<p><i class="i">description</i>&mdash;a <i class="i">string</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-677"><span>Description::<a class="copiable-link" href="#Description_003a_003a-677"> &para;</a></span></h4>
+
+<p><b class="b">software-type</b> returns a <i class="i">string</i> that identifies the
+generic name of any relevant supporting software, or <b class="b">nil</b> if no
+appropriate or relevant result can be produced.          
+</p>
+<p><b class="b">software-version</b> returns a <i class="i">string</i> that identifies 
+the version of any relevant supporting software, or <b class="b">nil</b> if no 
+appropriate or relevant result can be produced.          
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-477"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-477"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (software-type) &rArr;  &quot;Multics&quot;
+ (software-version) &rArr;  &quot;1.3x&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-140"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-140"> &para;</a></span></h4>
+
+<p>Operating system environment.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-336"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-336"> &para;</a></span></h4>
+
+<p>This information should be of use to maintainers of the <i class="i">implementation</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/sort.html
@@ -0,0 +1,187 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>sort (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="sort (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="sort (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="find.html" rel="next" title="find">
+<link href="reverse.html" rel="prev" title="reverse">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="sort">
+<div class="nav-panel">
+<p>
+Next: <a href="find.html" accesskey="n" rel="next">find, find-if, find-if-not                                       [Function]</a>, Previous: <a href="reverse.html" accesskey="p" rel="prev">reverse, nreverse                                                [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="sort_002c-stable_002dsort-_005bFunction_005d"><span>17.3.13 sort, stable-sort                                                [Function]<a class="copiable-link" href="#sort_002c-stable_002dsort-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">sort</code>  <i class="i">sequence predicate <span class="r">&amp;key</span> key</i> &rArr;  <i class="i">sorted-sequence</i>
+</p>
+<p><code class="code">stable-sort</code>  <i class="i">sequence predicate <span class="r">&amp;key</span> key</i> &rArr;  <i class="i">sorted-sequence</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-365"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-365"> &para;</a></span></h4>
+
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">predicate</i>&mdash;a <i class="i">designator</i> for
+  a <i class="i">function</i> of two arguments that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">sorted-sequence</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-480"><span>Description::<a class="copiable-link" href="#Description_003a_003a-480"> &para;</a></span></h4>
+
+<p><b class="b">sort</b> and <b class="b">stable-sort</b> destructively sort <i class="i">sequences</i>  
+according to the order determined by the <i class="i">predicate</i> function.
+</p>
+<p>If <i class="i">sequence</i> is a <i class="i">vector</i>,
+the result is a <i class="i">vector</i> 
+that has the same <i class="i">actual array element type</i> as <i class="i">sequence</i>.
+The result might or might not be simple, 
+and might or might not be <i class="i">identical</i> to <i class="i">sequence</i>.
+If <i class="i">sequence</i> is a <i class="i">list</i>,
+the result is a <i class="i">list</i>. 
+</p>
+<p><b class="b">sort</b> determines the relationship between two elements
+by giving keys extracted from the elements to the <i class="i">predicate</i>.
+The first argument to the <i class="i">predicate</i> function is the part of one element
+of <i class="i">sequence</i> extracted by the <i class="i">key</i> function
+(if supplied); the second
+argument is the part of another element
+of <i class="i">sequence</i> extracted by the <i class="i">key</i> function
+(if supplied).
+<i class="i">Predicate</i> should return <i class="i">true</i> if and only if the first argument is
+strictly less than the second (in some appropriate sense). 
+If the first argument is greater than or equal to the second
+(in the appropriate sense), then the <i class="i">predicate</i> should return <i class="i">false</i>.
+</p>
+<p>The argument to the <i class="i">key</i> function is the <i class="i">sequence</i> element.
+The return value of the <i class="i">key</i> function 
+becomes an argument to <i class="i">predicate</i>.
+If <i class="i">key</i> is not supplied or <b class="b">nil</b>, the <i class="i">sequence</i> element itself is used.
+There is no guarantee on the number of times the <i class="i">key</i> will be called.
+</p>
+<p>If the <i class="i">key</i> and <i class="i">predicate</i> always return,
+then the sorting operation will always terminate,
+producing a <i class="i">sequence</i> containing the same <i class="i">elements</i> as <i class="i">sequence</i> 
+(that is, the result is a permutation of <i class="i">sequence</i>).
+This is guaranteed even if the <i class="i">predicate</i>
+does not really consistently represent a total order
+(in which case the <i class="i">elements</i> will be scrambled in some unpredictable way,
+but no <i class="i">element</i> will be lost).  
+If the <i class="i">key</i> consistently returns meaningful keys,
+and the <i class="i">predicate</i> does reflect some total ordering criterion on those keys,
+then the <i class="i">elements</i> of the <i class="i">sorted-sequence</i>
+will be properly sorted according to that ordering.
+</p>
+<p>The sorting operation performed by <b class="b">sort</b> is not guaranteed stable.
+Elements considered equal by the <i class="i">predicate</i> might or might not
+stay in their original order.  The <i class="i">predicate</i> is assumed to
+consider two elements <code class="t">x</code> and <code class="t">y</code> to be equal if
+<code class="t">(funcall <i class="i">predicate</i> <i class="i">x</i> <i class="i">y</i>)</code> and
+<code class="t">(funcall <i class="i">predicate</i> <i class="i">y</i> <i class="i">x</i>)</code> are both <i class="i">false</i>.
+<b class="b">stable-sort</b> guarantees stability.
+</p>
+<p>The sorting operation can be destructive in all cases.  In the case of a
+<i class="i">vector</i> 
+argument, this is accomplished by permuting the elements in place.
+In the case of a <i class="i">list</i>, the <i class="i">list</i> is
+destructively reordered in the same manner as for
+<b class="b">nreverse</b>.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-347"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-347"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq tester (copy-seq &quot;lkjashd&quot;)) &rArr;  &quot;lkjashd&quot;
+ (sort tester #'char-lessp) &rArr;  &quot;adhjkls&quot;
+ (setq tester (list '(1 2 3) '(4 5 6) '(7 8 9))) &rArr;  ((1 2 3) (4 5 6) (7 8 9))
+ (sort tester #'&gt; :key #'car)  &rArr;  ((7 8 9) (4 5 6) (1 2 3)) 
+ (setq tester (list 1 2 3 4 5 6 7 8 9 0)) &rArr;  (1 2 3 4 5 6 7 8 9 0)
+ (stable-sort tester #'(lambda (x y) (and (oddp x) (evenp y))))
+&rArr;  (1 3 5 7 9 2 4 6 8 0)
+ (sort (setq committee-data
+             (vector (list (list &quot;JonL&quot; &quot;White&quot;) &quot;Iteration&quot;)
+                     (list (list &quot;Dick&quot; &quot;Waters&quot;) &quot;Iteration&quot;)
+                     (list (list &quot;Dick&quot; &quot;Gabriel&quot;) &quot;Objects&quot;)
+                     (list (list &quot;Kent&quot; &quot;Pitman&quot;) &quot;Conditions&quot;)
+                     (list (list &quot;Gregor&quot; &quot;Kiczales&quot;) &quot;Objects&quot;)
+                     (list (list &quot;David&quot; &quot;Moon&quot;) &quot;Objects&quot;)
+                     (list (list &quot;Kathy&quot; &quot;Chapman&quot;) &quot;Editorial&quot;)
+                     (list (list &quot;Larry&quot; &quot;Masinter&quot;) &quot;Cleanup&quot;)
+                     (list (list &quot;Sandra&quot; &quot;Loosemore&quot;) &quot;Compiler&quot;)))
+       #'string-lessp :key #'cadar)
+&rArr;  #(((&quot;Kathy&quot; &quot;Chapman&quot;) &quot;Editorial&quot;)
+     ((&quot;Dick&quot; &quot;Gabriel&quot;) &quot;Objects&quot;)
+     ((&quot;Gregor&quot; &quot;Kiczales&quot;) &quot;Objects&quot;)
+     ((&quot;Sandra&quot; &quot;Loosemore&quot;) &quot;Compiler&quot;)
+     ((&quot;Larry&quot; &quot;Masinter&quot;) &quot;Cleanup&quot;)
+     ((&quot;David&quot; &quot;Moon&quot;) &quot;Objects&quot;)
+     ((&quot;Kent&quot; &quot;Pitman&quot;) &quot;Conditions&quot;)
+     ((&quot;Dick&quot; &quot;Waters&quot;) &quot;Iteration&quot;)
+     ((&quot;JonL&quot; &quot;White&quot;) &quot;Iteration&quot;))
+ ;; Note that individual alphabetical order within `committees'
+ ;; is preserved.
+ (setq committee-data 
+       (stable-sort committee-data #'string-lessp :key #'cadr))
+&rArr;  #(((&quot;Larry&quot; &quot;Masinter&quot;) &quot;Cleanup&quot;)
+     ((&quot;Sandra&quot; &quot;Loosemore&quot;) &quot;Compiler&quot;)
+     ((&quot;Kent&quot; &quot;Pitman&quot;) &quot;Conditions&quot;)
+     ((&quot;Kathy&quot; &quot;Chapman&quot;) &quot;Editorial&quot;)
+     ((&quot;Dick&quot; &quot;Waters&quot;) &quot;Iteration&quot;)
+     ((&quot;JonL&quot; &quot;White&quot;) &quot;Iteration&quot;)
+     ((&quot;Dick&quot; &quot;Gabriel&quot;) &quot;Objects&quot;)
+     ((&quot;Gregor&quot; &quot;Kiczales&quot;) &quot;Objects&quot;)
+     ((&quot;David&quot; &quot;Moon&quot;) &quot;Objects&quot;))
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-161"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-161"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-390"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-390"> &para;</a></span></h4>
+
+<p><a class="ref" href="merge.html">merge                                                            [Function]</a>
+,
+</p>
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>,
+</p>
+<p><a class="ref" href="Destructive-Operations.html">Destructive Operations</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="find.html">find, find-if, find-if-not                                       [Function]</a>, Previous: <a href="reverse.html">reverse, nreverse                                                [Function]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/special.html
@@ -0,0 +1,202 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>special (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="special (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="special (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="locally.html" rel="next" title="locally">
+<link href="optimize.html" rel="prev" title="optimize">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="special">
+<div class="nav-panel">
+<p>
+Next: <a href="locally.html" accesskey="n" rel="next">locally                                                  [Special Operator]</a>, Previous: <a href="optimize.html" accesskey="p" rel="prev">optimize                                                      [Declaration]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="special-_005bDeclaration_005d"><span>3.8.26 special                                                       [Declaration]<a class="copiable-link" href="#special-_005bDeclaration_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-9"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-9"> &para;</a></span></h4>
+
+<p><code class="t">(special {<i class="i">var</i>}*)</code>
+</p>
+<h4 class="subsubheading" id="Arguments_003a_003a-9"><span>Arguments::<a class="copiable-link" href="#Arguments_003a_003a-9"> &para;</a></span></h4>
+
+<p><i class="i">var</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="Valid-Context_003a_003a-7"><span>Valid Context::<a class="copiable-link" href="#Valid-Context_003a_003a-7"> &para;</a></span></h4>
+
+<p><i class="i">declaration</i> or <i class="i">proclamation</i>
+</p>
+<h4 class="subsubheading" id="Binding-Types-Affected_003a_003a-5"><span>Binding Types Affected::<a class="copiable-link" href="#Binding-Types-Affected_003a_003a-5"> &para;</a></span></h4>
+
+<p><i class="i">variable</i>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-25"><span>Description::<a class="copiable-link" href="#Description_003a_003a-25"> &para;</a></span></h4>
+
+<p>Specifies that all of
+the <i class="i">vars</i> named are dynamic.
+This specifier affects variable <i class="i">bindings</i> and 
+affects references.
+All variable <i class="i">bindings</i> affected are made to be dynamic <i class="i">bindings</i>,
+and affected variable references refer to the current dynamic 
+<i class="i">binding</i>.
+For example:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun hack (thing *mod*)    ;The binding of the parameter
+   (declare (special *mod*))  ; *mod* is visible to hack1,
+   (hack1 (car thing)))       ; but not that of thing.
+ (defun hack1 (arg)
+   (declare (special *mod*))  ;Declare references to *mod*
+                              ;within hack1 to be special.
+   (if (atom arg) *mod*
+       (cons (hack1 (car arg)) (hack1 (cdr arg)))))
+</pre></div>
+
+<p>A <b class="b">special</b> declaration does not affect inner <i class="i">bindings</i> 
+of a <i class="i">var</i>; the inner <i class="i">bindings</i> implicitly shadow
+a <b class="b">special</b> declaration and must be explicitly re-declared to
+be <b class="b">special</b>.
+<b class="b">special</b> declarations never apply to function <i class="i">bindings</i>.
+</p>
+<p><b class="b">special</b> declarations can be either <i class="i">bound declarations</i>,
+affecting both a binding and references, or <i class="i">free declarations</i>,
+affecting only references, depending on whether the declaration is 
+attached to a variable binding.
+</p>
+<p>When used in a <i class="i">proclamation</i>, a <b class="b">special</b> 
+<i class="i">declaration specifier</i>
+applies to all <i class="i">bindings</i> as well as to all references of the
+mentioned variables.  For example, after
+</p>
+<div class="example">
+<pre class="example-preformatted"> (declaim (special x))
+</pre></div>
+
+<p>then in a function definition such as
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun example (x) ...)
+</pre></div>
+
+<p>the parameter <code class="t">x</code> is bound as a dynamic variable
+rather than as a lexical variable.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-21"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-21"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">(defun declare-eg (y)                 ;this y is special
+ (declare (special y))
+ (let ((y t))                         ;this y is lexical
+      (list y
+            (locally (declare (special y)) y)))) ;this y refers to the
+                                                 ;special binding of y
+&rArr;  DECLARE-EG 
+ (declare-eg nil) &rArr;  (T NIL) 
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted">(setf (symbol-value 'x) 6)
+(defun foo (x)                         ;a lexical binding of x
+  (print x)
+  (let ((x (1+ x)))                    ;a special binding of x
+    (declare (special x))              ;and a lexical reference
+    (bar))
+  (1+ x))
+(defun bar () 
+  (print (locally (declare (special x))
+           x)))
+(foo 10) 
+<code class="t"> |&gt; </code> 10
+<code class="t"> |&gt; </code> 11
+&rArr;  11
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted">(setf (symbol-value 'x) 6)
+(defun bar (x y)            ;[1] 1st occurrence of x
+  (let ((old-x x)           ;[2] 2nd occurrence of x -- same as 1st occurrence
+        (x y))              ;[3] 3rd occurrence of x
+    (declare (special x))
+    (list old-x x)))
+(bar 'first 'second) &rArr;  (FIRST SECOND)
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (defun few (x &amp;optional (y *foo*))
+   (declare (special *foo*))
+   ...)
+</pre></div>
+
+<p>The reference to <code class="t">*foo*</code>
+in the first line of this example is not <b class="b">special</b>
+even though there is a <b class="b">special</b> declaration in the second line.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (declaim (special prosp)) &rArr;  <i class="i">implementation-dependent</i>
+ (setq prosp 1 reg 1) &rArr;  1
+ (let ((prosp 2) (reg 2))         ;the binding of prosp is special
+    (set 'prosp 3) (set 'reg 3)   ;due to the preceding proclamation,
+    (list prosp reg))             ;whereas the variable reg is lexical
+&rArr;  (3 2)
+ (list prosp reg) &rArr;  (1 3)
+
+ (declaim (special x))          ;x is always special.
+ (defun example (x y)                                 
+   (declare (special y))
+   (let ((y 3) (x (* x 2)))
+     (print (+ y (locally (declare (special y)) y)))
+     (let ((y 4)) (declare (special y)) (foo x)))) &rArr;  EXAMPLE
+</pre></div>
+
+<p>In the contorted code above, the outermost and innermost <i class="i">bindings</i> of
+<code class="t">y</code> are dynamic,
+but the middle
+binding is lexical. The two arguments to <code class="t">+</code> are different,
+one being the value, which is <code class="t">3</code>, of the lexical variable
+<code class="t">y</code>, and the other being the value of the dynamic variable named <code class="t">y</code>
+(a <i class="i">binding</i> 
+of which happens, coincidentally, to lexically surround it at
+an outer level).  All the <i class="i">bindings</i> 
+of <code class="t">x</code> and references to <code class="t">x</code>
+are dynamic, however, because of the proclamation that <code class="t">x</code> is
+always <b class="b">special</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-25"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-25"> &para;</a></span></h4>
+
+<p><a class="ref" href="defparameter.html">defparameter, defvar                                                [Macro]</a>
+,
+<b class="b">defvar</b>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="locally.html">locally                                                  [Special Operator]</a>, Previous: <a href="optimize.html">optimize                                                      [Declaration]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/special_002doperator_002dp.html
@@ -0,0 +1,75 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>special-operator-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="special-operator-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="special-operator-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="constantp.html" rel="next" title="constantp">
+<link href="the.html" rel="prev" title="the">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="special_002doperator_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="constantp.html" accesskey="n" rel="next">constantp                                                        [Function]</a>, Previous: <a href="the.html" accesskey="p" rel="prev">the                                                      [Special Operator]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="special_002doperator_002dp-_005bFunction_005d"><span>3.8.29 special-operator-p                                               [Function]<a class="copiable-link" href="#special_002doperator_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">special-operator-p</code>  <i class="i">symbol</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-17"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-17"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-28"><span>Description::<a class="copiable-link" href="#Description_003a_003a-28"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">symbol</i> is a <i class="i">special operator</i>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-24"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-24"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (special-operator-p 'if) &rArr;  <i class="i">true</i>
+ (special-operator-p 'car) &rArr;  <i class="i">false</i>
+ (special-operator-p 'one) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-7"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-7"> &para;</a></span></h4>
+
+<p>Should signal <b class="b">type-error</b> if its argument is not a <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-17"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-17"> &para;</a></span></h4>
+
+<p>Historically, this function was called <code class="t">special-form-p</code>.  The name was
+finally declared a misnomer and changed, since it returned true for
+<i class="i">special operators</i>, not <i class="i">special forms</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/sqrt.html
@@ -0,0 +1,131 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>sqrt (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="sqrt (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="sqrt (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="random_002dstate.html" rel="next" title="random-state">
+<link href="signum.html" rel="prev" title="signum">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="sqrt">
+<div class="nav-panel">
+<p>
+Next: <a href="random_002dstate.html" accesskey="n" rel="next">random-state                                                 [System Class]</a>, Previous: <a href="signum.html" accesskey="p" rel="prev">signum                                                           [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="sqrt_002c-isqrt-_005bFunction_005d"><span>12.2.38 sqrt, isqrt                                                      [Function]<a class="copiable-link" href="#sqrt_002c-isqrt-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">sqrt</code>  <i class="i">number</i> &rArr;  <i class="i">root</i>
+</p>
+<p><code class="code">isqrt</code>  <i class="i">natural</i> &rArr;  <i class="i">natural-root</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-223"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-223"> &para;</a></span></h4>
+
+<p><i class="i">number</i>, <i class="i">root</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">natural</i>, <i class="i">natural-root</i>&mdash;a non-negative <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-303"><span>Description::<a class="copiable-link" href="#Description_003a_003a-303"> &para;</a></span></h4>
+
+<p><b class="b">sqrt</b> and <b class="b">isqrt</b> compute square roots.
+</p>
+<p><b class="b">sqrt</b> returns the <i class="i">principal</i> square root of <i class="i">number</i>.
+If the <i class="i">number</i> is not a <i class="i">complex</i> but is negative,
+then the result is a <i class="i">complex</i>.
+</p>
+<p><b class="b">isqrt</b> returns the greatest <i class="i">integer</i> 
+less than or equal to the exact positive square root of <i class="i">natural</i>.
+</p>
+<p>If <i class="i">number</i> is a positive <i class="i">rational</i>,
+it is <i class="i">implementation-dependent</i> 
+whether <i class="i">root</i> is a <i class="i">rational</i> or a <i class="i">float</i>.
+If <i class="i">number</i> is a negative <i class="i">rational</i>,
+it is <i class="i">implementation-dependent</i> 
+whether <i class="i">root</i> is a <i class="i">complex rational</i> or a <i class="i">complex float</i>.
+</p>
+<p>The mathematical definition of complex square root (whether or not
+minus zero is supported) follows:
+</p>
+<p><code class="t">(sqrt <i class="i">x</i>) = (exp (/ (log <i class="i">x</i>) 2))</code>
+</p>
+<p>The branch cut for square root lies along the negative real axis,
+continuous with quadrant II.
+The range consists of the right half-plane, including the non-negative
+imaginary axis and excluding the negative imaginary axis.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-207"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-207"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (sqrt 9.0) &rArr;  3.0
+ (sqrt -9.0) &rArr;  #C(0.0 3.0)
+ (isqrt 9) &rArr;  3
+ (sqrt 12) &rArr;  3.4641016
+ (isqrt 12) &rArr;  3
+ (isqrt 300) &rArr;  17
+ (isqrt 325) &rArr;  18
+ (sqrt 25)
+&rArr;  5
+<i class="i">OR</i>&rArr; 5.0
+ (isqrt 25) &rArr;  5
+ (sqrt -1) &rArr;  #C(0.0 1.0)
+ (sqrt #c(0 2)) &rArr;  #C(1.0 1.0)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-92"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-92"> &para;</a></span></h4>
+
+<p>The <i class="i">function</i> <b class="b">sqrt</b> should signal <b class="b">type-error</b> if its argument 
+is not a <i class="i">number</i>.
+</p>
+<p>The <i class="i">function</i> <b class="b">isqrt</b> should signal <b class="b">type-error</b> if its argument 
+is not a non-negative <i class="i">integer</i>.
+</p>
+<p>The functions <b class="b">sqrt</b> and <b class="b">isqrt</b> might signal <b class="b">arithmetic-error</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-256"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-256"> &para;</a></span></h4>
+
+<p><a class="ref" href="exp.html">exp, expt                                                        [Function]</a>
+,
+<a class="ref" href="log.html">log                                                              [Function]</a>
+,
+<a class="ref" href="Rule-of-Float-Substitutability.html">Rule of Float Substitutability</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-154"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-154"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (isqrt x) &equiv; (values (floor (sqrt x))) 
+</pre></div>
+
+<p>but it is potentially more efficient.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="random_002dstate.html">random-state                                                 [System Class]</a>, Previous: <a href="signum.html">signum                                                           [Function]</a>, Up: <a href="Numbers-Dictionary.html">Numbers Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/standard_002dchar.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>standard-char (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="standard-char (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="standard-char (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="extended_002dchar.html" rel="next" title="extended-char">
+<link href="base_002dchar.html" rel="prev" title="base-char">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="standard_002dchar">
+<div class="nav-panel">
+<p>
+Next: <a href="extended_002dchar.html" accesskey="n" rel="next">extended-char                                                        [Type]</a>, Previous: <a href="base_002dchar.html" accesskey="p" rel="prev">base-char                                                            [Type]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="standard_002dchar-_005bType_005d"><span>13.2.3 standard-char                                                        [Type]<a class="copiable-link" href="#standard_002dchar-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-11"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-11"> &para;</a></span></h4>
+
+<p><b class="b">standard-char</b>,
+</p>
+<p><b class="b">base-char</b>,
+</p>
+<p><b class="b">character</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-352"><span>Description::<a class="copiable-link" href="#Description_003a_003a-352"> &para;</a></span></h4>
+
+<p>A fixed set of 96 <i class="i">characters</i> required to be present in all 
+<i class="i">conforming implementations</i>.  <i class="i">Standard characters</i> are 
+defined in <a class="ref" href="Standard-Characters.html">Standard Characters</a>.
+</p>
+<p>Any <i class="i">character</i> that is not <i class="i">simple</i> is not a <i class="i">standard character</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-283"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-283"> &para;</a></span></h4>
+
+<p><a class="ref" href="Standard-Characters.html">Standard Characters</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/standard_002dchar_002dp.html
@@ -0,0 +1,72 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>standard-char-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="standard-char-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="standard-char-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="char_002dupcase.html" rel="next" title="char-upcase">
+<link href="graphic_002dchar_002dp.html" rel="prev" title="graphic-char-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="standard_002dchar_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="char_002dupcase.html" accesskey="n" rel="next">char-upcase, char-downcase                                       [Function]</a>, Previous: <a href="graphic_002dchar_002dp.html" accesskey="p" rel="prev">graphic-char-p                                                   [Function]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="standard_002dchar_002dp-_005bFunction_005d"><span>13.2.13 standard-char-p                                                  [Function]<a class="copiable-link" href="#standard_002dchar_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">standard-char-p</code>  <i class="i">character</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-266"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-266"> &para;</a></span></h4>
+
+<p><i class="i">character</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-362"><span>Description::<a class="copiable-link" href="#Description_003a_003a-362"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">character</i> is of <i class="i">type</i> <b class="b">standard-char</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-250"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-250"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (standard-char-p #\Space) &rArr;  <i class="i">true</i>
+ (standard-char-p #\~) &rArr;  <i class="i">true</i>
+ ;; This next example presupposes an implementation
+ ;; in which #\Bell is a defined character.
+ (standard-char-p #\Bell) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-112"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-112"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">character</i> is not a <i class="i">character</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/standard_002dclass.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>standard-class (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="standard-class (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="standard-class (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="method.html" rel="next" title="method">
+<link href="structure_002dclass.html" rel="prev" title="structure-class">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="standard_002dclass">
+<div class="nav-panel">
+<p>
+Next: <a href="method.html" accesskey="n" rel="next">method                                                       [System Class]</a>, Previous: <a href="structure_002dclass.html" accesskey="p" rel="prev">structure-class                                              [System Class]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="standard_002dclass-_005bSystem-Class_005d"><span>4.4.10 standard-class                                               [System Class]<a class="copiable-link" href="#standard_002dclass-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-6"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-6"> &para;</a></span></h4>
+<p><b class="b">standard-class</b>,
+<b class="b">class</b>,
+</p>
+<p><b class="b">standard-object</b>,
+</p>
+<p><b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-39"><span>Description::<a class="copiable-link" href="#Description_003a_003a-39"> &para;</a></span></h4>
+
+<p>The <i class="i">class</i> <b class="b">standard-class</b> is the default <i class="i">class</i> of <i class="i">classes</i>
+defined by <b class="b">defclass</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/standard_002dgeneric_002dfunction.html
@@ -0,0 +1,60 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>standard-generic-function (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="standard-generic-function (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="standard-generic-function (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="class.html" rel="next" title="class">
+<link href="generic_002dfunction.html" rel="prev" title="generic-function">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="standard_002dgeneric_002dfunction">
+<div class="nav-panel">
+<p>
+Next: <a href="class.html" accesskey="n" rel="next">class                                                        [System Class]</a>, Previous: <a href="generic_002dfunction.html" accesskey="p" rel="prev">generic-function                                             [System Class]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="standard_002dgeneric_002dfunction-_005bSystem-Class_005d"><span>4.4.6 standard-generic-function                                    [System Class]<a class="copiable-link" href="#standard_002dgeneric_002dfunction-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-2"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-2"> &para;</a></span></h4>
+<p><b class="b">standard-generic-function</b>,
+<b class="b">generic-function</b>,
+<b class="b">function</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-35"><span>Description::<a class="copiable-link" href="#Description_003a_003a-35"> &para;</a></span></h4>
+
+<p>The <i class="i">class</i> <b class="b">standard-generic-function</b> is the default <i class="i">class</i> of
+<i class="i">generic functions</i> <i class="i">established</i> by
+<b class="b">defmethod</b>,
+<b class="b">ensure-generic-function</b>,
+<b class="b">defgeneric</b>,
+</p>
+<p>and
+<b class="b">defclass</b> <i class="i">forms</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/standard_002dmethod.html
@@ -0,0 +1,58 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>standard-method (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="standard-method (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="standard-method (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="structure_002dobject.html" rel="next" title="structure-object">
+<link href="method.html" rel="prev" title="method">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="standard_002dmethod">
+<div class="nav-panel">
+<p>
+Next: <a href="structure_002dobject.html" accesskey="n" rel="next">structure-object                                                    [Class]</a>, Previous: <a href="method.html" accesskey="p" rel="prev">method                                                       [System Class]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="standard_002dmethod-_005bSystem-Class_005d"><span>4.4.12 standard-method                                              [System Class]<a class="copiable-link" href="#standard_002dmethod-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-8"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-8"> &para;</a></span></h4>
+<p><b class="b">standard-method</b>,
+<b class="b">method</b>,
+</p>
+<p><b class="b">standard-object</b>,
+</p>
+<p><b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-41"><span>Description::<a class="copiable-link" href="#Description_003a_003a-41"> &para;</a></span></h4>
+
+<p>The <i class="i">class</i> <b class="b">standard-method</b> is the default <i class="i">class</i> of 
+<i class="i">methods</i> defined by the 
+ <b class="b">defmethod</b> and
+ <b class="b">defgeneric</b> <i class="i">forms</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/standard_002dobject.html
@@ -0,0 +1,53 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>standard-object (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="standard-object (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="standard-object (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="method_002dcombination.html" rel="next" title="method-combination">
+<link href="structure_002dobject.html" rel="prev" title="structure-object">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="standard_002dobject">
+<div class="nav-panel">
+<p>
+Next: <a href="method_002dcombination.html" accesskey="n" rel="next">method-combination                                           [System Class]</a>, Previous: <a href="structure_002dobject.html" accesskey="p" rel="prev">structure-object                                                    [Class]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="standard_002dobject-_005bClass_005d"><span>4.4.14 standard-object                                                     [Class]<a class="copiable-link" href="#standard_002dobject-_005bClass_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-10"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-10"> &para;</a></span></h4>
+<p><b class="b">standard-object</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-43"><span>Description::<a class="copiable-link" href="#Description_003a_003a-43"> &para;</a></span></h4>
+
+<p>The <i class="i">class</i> <b class="b">standard-object</b> is an <i class="i">instance</i> of <b class="b">standard-class</b>
+and is a <i class="i">superclass</i> of every <i class="i">class</i> that is an <i class="i">instance</i> of
+<b class="b">standard-class</b> except itself.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/step.html
@@ -0,0 +1,86 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>step (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="step (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="step (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="time.html" rel="next" title="time">
+<link href="trace.html" rel="prev" title="trace">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="step">
+<div class="nav-panel">
+<p>
+Next: <a href="time.html" accesskey="n" rel="next">time                                                                [Macro]</a>, Previous: <a href="trace.html" accesskey="p" rel="prev">trace, untrace                                                      [Macro]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="step-_005bMacro_005d"><span>25.2.9 step                                                                [Macro]<a class="copiable-link" href="#step-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">step</code>  <i class="i">form</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-495"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-495"> &para;</a></span></h4>
+
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>; evaluated as described below.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-657"><span>Description::<a class="copiable-link" href="#Description_003a_003a-657"> &para;</a></span></h4>
+
+<p><b class="b">step</b> implements a debugging paradigm wherein the programmer
+is allowed to <i class="i">step</i> through the <i class="i">evaluation</i> of a <i class="i">form</i>.
+The specific nature of the interaction,
+</p>
+<p>including which I/O streams are used and
+whether the stepping has lexical or dynamic scope,
+</p>
+<p>is <i class="i">implementation-defined</i>.
+</p>
+<p><b class="b">step</b> evaluates <i class="i">form</i> in the current <i class="i">environment</i>.
+A call to <b class="b">step</b> can be compiled, but it is acceptable for an
+implementation to interactively step through only those parts of the computation
+that are interpreted.
+</p>
+<p>It is technically permissible for a <i class="i">conforming implementation</i> 
+to take no action at all other than normal <i class="i">execution</i> of the <i class="i">form</i>.
+In such a situation, 
+<code class="t">(step <i class="i">form</i>)</code>
+is equivalent to, for example,
+<code class="t">(let () <i class="i">form</i>)</code>. 
+In implementations where this is the case, the associated documentation
+should mention that fact.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-535"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-535"> &para;</a></span></h4>
+
+<p><a class="ref" href="trace.html">trace, untrace                                                      [Macro]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-328"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-328"> &para;</a></span></h4>
+
+<p><i class="i">Implementations</i> are encouraged to respond to the typing of <code class="t">?</code> 
+or the pressing of a &ldquo;help key&rdquo; by providing help including a list of
+commands.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/storage_002dcondition.html
@@ -0,0 +1,84 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>storage-condition (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="storage-condition (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="storage-condition (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="assert.html" rel="next" title="assert">
+<link href="parse_002derror.html" rel="prev" title="parse-error">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="storage_002dcondition">
+<div class="nav-panel">
+<p>
+Next: <a href="assert.html" accesskey="n" rel="next">assert                                                              [Macro]</a>, Previous: <a href="parse_002derror.html" accesskey="p" rel="prev">parse-error                                                [Condition Type]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="storage_002dcondition-_005bCondition-Type_005d"><span>9.2.9 storage-condition                                          [Condition Type]<a class="copiable-link" href="#storage_002dcondition-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-26"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-26"> &para;</a></span></h4>
+<p><b class="b">storage-condition</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-179"><span>Description::<a class="copiable-link" href="#Description_003a_003a-179"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">storage-condition</b> consists of serious conditions that 
+relate to problems with memory management that are potentially due to
+<i class="i">implementation-dependent</i> limits rather than semantic errors
+in <i class="i">conforming programs</i>, and that typically warrant entry to the 
+debugger if not handled.  Depending on the details of the <i class="i">implementation</i>, 
+these might include such problems as 
+  stack overflow,
+  memory region overflow, 
+and
+  storage exhausted.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-96"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-96"> &para;</a></span></h4>
+
+<p>While some <span class="r">Common Lisp</span> operations might signal <i class="i">storage-condition</i>
+because they are defined to create <i class="i">objects</i>,
+it is unspecified whether operations that are not defined to create
+<i class="i">objects</i> create them anyway 
+and so might also signal <b class="b">storage-condition</b>.
+Likewise, the evaluator itself might create <i class="i">objects</i>
+and so might signal <b class="b">storage-condition</b>.
+(The natural assumption might be that such 
+<i class="i">object</i> creation is naturally inefficient, 
+but even that is <i class="i">implementation-dependent</i>.)
+In general, the entire question of how storage allocation is done is
+<i class="i">implementation-dependent</i>, 
+and so any operation might signal <b class="b">storage-condition</b> at any time.
+Because such a <i class="i">condition</i> is indicative of a limitation 
+   of the <i class="i">implementation</i> 
+or of the <i class="i">image</i>
+rather than an error in a <i class="i">program</i>,
+<i class="i">objects</i> of <i class="i">type</i> <b class="b">storage-condition</b> are not of <i class="i">type</i> <b class="b">error</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/store_002dvalue.html
@@ -0,0 +1,86 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>store-value (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="store-value (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="store-value (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="use_002dvalue.html" rel="next" title="use-value">
+<link href="muffle_002dwarning.html" rel="prev" title="muffle-warning">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="store_002dvalue">
+<div class="nav-panel">
+<p>
+Next: <a href="use_002dvalue.html" accesskey="n" rel="next">use-value                                                         [Restart]</a>, Previous: <a href="muffle_002dwarning.html" accesskey="p" rel="prev">muffle-warning                                                    [Restart]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="store_002dvalue-_005bRestart_005d"><span>9.2.44 store-value                                                       [Restart]<a class="copiable-link" href="#store_002dvalue-_005bRestart_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Data-Arguments-Required_003a_003a-3"><span>Data Arguments Required::<a class="copiable-link" href="#Data-Arguments-Required_003a_003a-3"> &para;</a></span></h4>
+
+<p>a value to use instead (on an ongoing basis).
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-214"><span>Description::<a class="copiable-link" href="#Description_003a_003a-214"> &para;</a></span></h4>
+
+<p>The <b class="b">store-value</b> <i class="i">restart</i> is generally used by <i class="i">handlers</i>
+trying to recover from errors of <i class="i">types</i> such as <b class="b">cell-error</b> 
+or <b class="b">type-error</b>, which may wish to supply a replacement datum to
+be stored permanently.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-139"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-139"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun type-error-auto-coerce (c)
+   (when (typep c 'type-error)
+     (let ((r (find-restart 'store-value c)))
+       (handler-case (let ((v (coerce (type-error-datum c)
+                                      (type-error-expected-type c))))
+                       (invoke-restart r v))
+         (error ()))))) &rArr;  TYPE-ERROR-AUTO-COERCE
+ (let ((x 3))
+   (handler-bind ((type-error #'type-error-auto-coerce))
+     (check-type x float)
+     x)) &rArr;  3.0
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-188"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-188"> &para;</a></span></h4>
+
+<p><a class="ref" href="Restarts.html">Restarts</a>,
+<a class="ref" href="Interfaces-to-Restarts.html">Interfaces to Restarts</a>,
+<a class="ref" href="invoke_002drestart.html">invoke-restart                                                   [Function]</a>
+,
+<a class="ref" href="#store_002dvalue">store-value                                                       [Restart]</a>
+ (<i class="i">function</i>),
+<b class="b">ccase</b>,
+<a class="ref" href="check_002dtype.html">check-type                                                          [Macro]</a>
+,
+<b class="b">ctypecase</b>,
+<a class="ref" href="use_002dvalue.html">use-value                                                         [Restart]</a>
+ (<i class="i">function</i> and <i class="i">restart</i>)
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/stream.html
@@ -0,0 +1,62 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="broadcast_002dstream.html" rel="next" title="broadcast-stream">
+<link href="Streams-Dictionary.html" rel="prev" title="Streams Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="stream">
+<div class="nav-panel">
+<p>
+Next: <a href="broadcast_002dstream.html" accesskey="n" rel="next">broadcast-stream                                             [System Class]</a>, Previous: <a href="Streams-Dictionary.html" accesskey="p" rel="prev">Streams Dictionary</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="stream-_005bSystem-Class_005d"><span>21.2.1 stream                                                       [System Class]<a class="copiable-link" href="#stream-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-62"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-62"> &para;</a></span></h4>
+<p><b class="b">stream</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-532"><span>Description::<a class="copiable-link" href="#Description_003a_003a-532"> &para;</a></span></h4>
+
+<p>A <i class="i">stream</i> is an <i class="i">object</i> that can be used with an input or output
+function to identify an appropriate source or sink of <i class="i">characters</i> or 
+<i class="i">bytes</i> for that operation.
+</p>
+<p>For more complete information, see <a class="ref" href="Stream-Concepts.html">Stream Concepts</a>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-435"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-435"> &para;</a></span></h4>
+
+<p><a class="ref" href="Stream-Concepts.html">Stream Concepts</a>,
+<a class="ref" href="Printing-Other-Objects.html">Printing Other Objects</a>,
+<a class="ref" href="Printer.html">Printer</a>,
+<a class="ref" href="Reader.html">Reader</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/stream_002delement_002dtype.html
@@ -0,0 +1,86 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>stream-element-type (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="stream-element-type (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="stream-element-type (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="streamp.html" rel="next" title="streamp">
+<link href="open_002dstream_002dp.html" rel="prev" title="open-stream-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="stream_002delement_002dtype">
+<div class="nav-panel">
+<p>
+Next: <a href="streamp.html" accesskey="n" rel="next">streamp                                                          [Function]</a>, Previous: <a href="open_002dstream_002dp.html" accesskey="p" rel="prev">open-stream-p                                                    [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="stream_002delement_002dtype-_005bFunction_005d"><span>21.2.12 stream-element-type                                              [Function]<a class="copiable-link" href="#stream_002delement_002dtype-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">stream-element-type</code>  <i class="i">stream</i> &rArr;  <i class="i">typespec</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-415"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-415"> &para;</a></span></h4>
+
+<p><i class="i">stream</i>&mdash;a <i class="i">stream</i>.
+</p>
+<p><i class="i">typespec</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-543"><span>Description::<a class="copiable-link" href="#Description_003a_003a-543"> &para;</a></span></h4>
+
+<p><b class="b">stream-element-type</b> returns a <i class="i">type specifier</i> that
+indicates the <i class="i">types</i> of <i class="i">objects</i> that may be read from 
+or written to <i class="i">stream</i>.
+</p>
+<p><i class="i">Streams</i> created by <b class="b">open</b> have an <i class="i">element type</i>
+restricted to <b class="b">integer</b> or a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">character</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-390"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-390"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; Note that the stream must accomodate at least the specified type,
+;; but might accomodate other types.  Further note that even if it does
+;; accomodate exactly the specified type, the type might be specified in
+;; any of several ways.
+ (with-open-file (s &quot;test&quot; :element-type '(integer 0 1)
+                           :if-exists :error
+                           :direction :output)
+   (stream-element-type s))
+&rArr;  INTEGER
+<i class="i">OR</i>&rArr; (UNSIGNED-BYTE 16)
+<i class="i">OR</i>&rArr; (UNSIGNED-BYTE 8)
+<i class="i">OR</i>&rArr; BIT
+<i class="i">OR</i>&rArr; (UNSIGNED-BYTE 1)
+<i class="i">OR</i>&rArr; (INTEGER 0 1)
+<i class="i">OR</i>&rArr; (INTEGER 0 (2))
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-195"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-195"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">stream</i> is not a <i class="i">stream</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/stream_002derror.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>stream-error (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="stream-error (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="stream-error (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="stream_002derror_002dstream.html" rel="next" title="stream-error-stream">
+<link href="_002aterminal_002dio_002a.html" rel="prev" title="*terminal-io*">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="stream_002derror">
+<div class="nav-panel">
+<p>
+Next: <a href="stream_002derror_002dstream.html" accesskey="n" rel="next">stream-error-stream                                              [Function]</a>, Previous: <a href="_002aterminal_002dio_002a.html" accesskey="p" rel="prev">*terminal-io*                                                    [Variable]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="stream_002derror-_005bCondition-Type_005d"><span>21.2.55 stream-error                                               [Condition Type]<a class="copiable-link" href="#stream_002derror-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-70"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-70"> &para;</a></span></h4>
+<p><b class="b">stream-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-586"><span>Description::<a class="copiable-link" href="#Description_003a_003a-586"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">stream-error</b>
+consists of error conditions that are related to receiving input from
+or sending output to a <i class="i">stream</i>.  
+The &ldquo;offending stream&rdquo; is initialized by
+the <code class="t">:stream</code> initialization argument to <b class="b">make-condition</b>, 
+and is <i class="i">accessed</i> by the <i class="i">function</i> <b class="b">stream-error-stream</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-477"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-477"> &para;</a></span></h4>
+
+<p><a class="ref" href="stream_002derror_002dstream.html">stream-error-stream                                              [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/stream_002derror_002dstream.html
@@ -0,0 +1,70 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>stream-error-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="stream-error-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="stream-error-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="end_002dof_002dfile.html" rel="next" title="end-of-file">
+<link href="stream_002derror.html" rel="prev" title="stream-error">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="stream_002derror_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="end_002dof_002dfile.html" accesskey="n" rel="next">end-of-file                                                [Condition Type]</a>, Previous: <a href="stream_002derror.html" accesskey="p" rel="prev">stream-error                                               [Condition Type]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="stream_002derror_002dstream-_005bFunction_005d"><span>21.2.56 stream-error-stream                                              [Function]<a class="copiable-link" href="#stream_002derror_002dstream-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">stream-error-stream</code>  <i class="i">condition</i> &rArr;  <i class="i">stream</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-454"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-454"> &para;</a></span></h4>
+
+<p><i class="i">condition</i>&mdash;a <i class="i">condition</i> of <i class="i">type</i> <b class="b">stream-error</b>.
+</p>
+<p><i class="i">stream</i>&mdash;a <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-587"><span>Description::<a class="copiable-link" href="#Description_003a_003a-587"> &para;</a></span></h4>
+
+<p>Returns the offending <i class="i">stream</i> of a <i class="i">condition</i> of <i class="i">type</i> <b class="b">stream-error</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-427"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-427"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (with-input-from-string (s &quot;(FOO&quot;)
+   (handler-case (read s)
+     (end-of-file (c)
+       (format nil &quot;~&amp;End of file on ~S.&quot; (stream-error-stream c)))))
+&quot;End of file on #&lt;String Stream&gt;.&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-478"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-478"> &para;</a></span></h4>
+
+<p><b class="b">stream-error</b>,
+<a class="ref" href="Conditions.html">Conditions</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/stream_002dexternal_002dformat.html
@@ -0,0 +1,82 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>stream-external-format (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="stream-external-format (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="stream-external-format (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="with_002dopen_002dfile.html" rel="next" title="with-open-file">
+<link href="open.html" rel="prev" title="open">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="stream_002dexternal_002dformat">
+<div class="nav-panel">
+<p>
+Next: <a href="with_002dopen_002dfile.html" accesskey="n" rel="next">with-open-file                                                      [macro]</a>, Previous: <a href="open.html" accesskey="p" rel="prev">open                                                             [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="stream_002dexternal_002dformat-_005bFunction_005d"><span>21.2.30 stream-external-format                                           [Function]<a class="copiable-link" href="#stream_002dexternal_002dformat-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">stream-external-format</code>  <i class="i">stream</i> &rArr;  <i class="i">format</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-431"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-431"> &para;</a></span></h4>
+
+<p><i class="i">stream</i>&mdash;a <i class="i">file stream</i>.
+</p>
+<p><i class="i">format</i>&mdash;an <i class="i">external file format</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-561"><span>Description::<a class="copiable-link" href="#Description_003a_003a-561"> &para;</a></span></h4>
+
+<p>Returns an <i class="i">external file format designator</i> for the <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-407"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-407"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (with-open-file (stream &quot;test&quot; :direction :output)
+   (stream-external-format stream))
+&rArr;  :DEFAULT
+<i class="i">OR</i>&rArr; :ISO8859/1-1987
+<i class="i">OR</i>&rArr; (:ASCII :SAIL)
+<i class="i">OR</i>&rArr; ACME::PROPRIETARY-FILE-FORMAT-17
+<i class="i">OR</i>&rArr; #&lt;FILE-FORMAT :ISO646-1983 2343673&gt;
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-457"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-457"> &para;</a></span></h4>
+
+<p>the <code class="t">:external-format</code> <i class="i">argument</i> to the <i class="i">function</i> 
+<a class="ref" href="open.html">open                                                             [Function]</a>
+ and
+the 
+<a class="ref" href="with_002dopen_002dfile.html">with-open-file                                                      [macro]</a>
+ <i class="i">macro</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-295"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-295"> &para;</a></span></h4>
+
+<p>The <i class="i">format</i> returned is not necessarily meaningful 
+to other <i class="i">implementations</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/streamp.html
@@ -0,0 +1,73 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>streamp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="streamp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="streamp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="read_002dbyte.html" rel="next" title="read-byte">
+<link href="stream_002delement_002dtype.html" rel="prev" title="stream-element-type">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="streamp">
+<div class="nav-panel">
+<p>
+Next: <a href="read_002dbyte.html" accesskey="n" rel="next">read-byte                                                        [Function]</a>, Previous: <a href="stream_002delement_002dtype.html" accesskey="p" rel="prev">stream-element-type                                              [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="streamp-_005bFunction_005d"><span>21.2.13 streamp                                                          [Function]<a class="copiable-link" href="#streamp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">streamp</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-416"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-416"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-544"><span>Description::<a class="copiable-link" href="#Description_003a_003a-544"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">stream</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<p><b class="b">streamp</b> is unaffected by whether <i class="i">object</i>,
+if it is a <i class="i">stream</i>, is <i class="i">open</i> or closed.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-391"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-391"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (streamp *terminal-io*) &rArr;  <i class="i">true</i>
+ (streamp 1) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-284"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-284"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (streamp <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'stream)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/string-_0028System-Class_0029.html
@@ -0,0 +1,83 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>string (System Class) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="string (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="string (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Strings-Dictionary.html" rel="up" title="Strings Dictionary">
+<link href="base_002dstring.html" rel="next" title="base-string">
+<link href="Strings-Dictionary.html" rel="prev" title="Strings Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="string-_0028System-Class_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="base_002dstring.html" accesskey="n" rel="next">base-string                                                          [Type]</a>, Previous: <a href="Strings-Dictionary.html" accesskey="p" rel="prev">Strings Dictionary</a>, Up: <a href="Strings-Dictionary.html" accesskey="u" rel="up">Strings Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="string-_005bSystem-Class_005d"><span>16.2.1 string                                                       [System Class]<a class="copiable-link" href="#string-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-56"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-56"> &para;</a></span></h4>
+<p><b class="b">string</b>,
+<b class="b">vector</b>,
+<b class="b">array</b>,
+<b class="b">sequence</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-456"><span>Description::<a class="copiable-link" href="#Description_003a_003a-456"> &para;</a></span></h4>
+
+<p>A <i class="i">string</i> is a <i class="i">specialized</i> <i class="i">vector</i> 
+whose <i class="i">elements</i> are of <i class="i">type</i> <b class="b">character</b> or a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">character</b>.  
+When used as a <i class="i">type specifier</i> for object creation,
+<b class="b">string</b> means <code class="t">(vector character)</code>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-24"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-24"> &para;</a></span></h4>
+
+<p>Abbreviating.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-24"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-24"> &para;</a></span></h4>
+
+<p>(<code class="code">string</code>{<i class="i"><code class="t">[</code>size<code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-24"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-24"> &para;</a></span></h4>
+
+<p><i class="i">size</i>&mdash;a non-negative <i class="i">fixnum</i>,
+	    or the <i class="i">symbol</i> <b class="b">*</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-24"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-24"> &para;</a></span></h4>
+
+<p>This denotes the union of all <i class="i">types</i>
+<code class="t">(array <i class="i">c</i> (<i class="i">size</i>))</code>
+for all <i class="i">subtypes</i> <i class="i">c</i> of <b class="b">character</b>;
+that is, the set of <i class="i">strings</i> of size <i class="i">size</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-375"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-375"> &para;</a></span></h4>
+
+<p><a class="ref" href="String-Concepts.html">String Concepts</a>,
+<a class="ref" href="Double_002dQuote.html">Double-Quote</a>,
+<a class="ref" href="Printing-Strings.html">Printing Strings</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/string.html
@@ -0,0 +1,104 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>string (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="string (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="string (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Strings-Dictionary.html" rel="up" title="Strings Dictionary">
+<link href="string_002dupcase.html" rel="next" title="string-upcase">
+<link href="char.html" rel="prev" title="char">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="string">
+<div class="nav-panel">
+<p>
+Next: <a href="string_002dupcase.html" accesskey="n" rel="next">string-upcase, string-downcase, string-capitalize,</a>, Previous: <a href="char.html" accesskey="p" rel="prev">char, schar                                                      [Accessor]</a>, Up: <a href="Strings-Dictionary.html" accesskey="u" rel="up">Strings Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="string-_005bFunction_005d"><span>16.2.7 string                                                           [Function]<a class="copiable-link" href="#string-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">string</code>  <i class="i">x</i> &rArr;  <i class="i">string</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-348"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-348"> &para;</a></span></h4>
+
+<p><i class="i">x</i>&mdash;a <i class="i">string</i>, a <i class="i">symbol</i>, or a <i class="i">character</i>.
+</p>
+<p><i class="i">string</i>&mdash;a <i class="i">string</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-462"><span>Description::<a class="copiable-link" href="#Description_003a_003a-462"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">string</i> described by <i class="i">x</i>; specifically:
+</p>
+<dl class="table">
+<dt><code class="t">*</code></dt>
+<dd><p>If <i class="i">x</i> is a <i class="i">string</i>, it is returned.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd><p>If <i class="i">x</i> is a <i class="i">symbol</i>, its <i class="i">name</i> is returned.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd>
+<p>If <i class="i">x</i> is a <i class="i">character</i>,
+</p>
+<p>then a <i class="i">string</i> containing that one <i class="i">character</i> is returned.
+</p></dd>
+<dt><code class="t">*</code></dt>
+<dd>
+<p><b class="b">string</b> might perform additional, <i class="i">implementation-defined</i> conversions.
+</p>
+</dd>
+</dl>
+
+<h4 class="subsubheading" id="Examples_003a_003a-330"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-330"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (string &quot;already a string&quot;) &rArr;  &quot;already a string&quot;
+ (string 'elm) &rArr;  &quot;ELM&quot;
+ (string #\c) &rArr;  &quot;c&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-149"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-149"> &para;</a></span></h4>
+
+<p>In the case where a conversion is defined neither by this specification nor
+by the <i class="i">implementation</i>, an error of <i class="i">type</i> <b class="b">type-error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-377"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-377"> &para;</a></span></h4>
+
+<p><a class="ref" href="coerce.html">coerce                                                           [Function]</a>
+,
+<b class="b">string</b> (<i class="i">type</i>).
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-252"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-252"> &para;</a></span></h4>
+
+<p><b class="b">coerce</b> can be used to convert a <i class="i">sequence</i> of <i class="i">characters</i>
+to a <i class="i">string</i>.
+</p>
+<p><b class="b">prin1-to-string</b>, <b class="b">princ-to-string</b>, <b class="b">write-to-string</b>,
+or <b class="b">format</b> (with a first argument of <b class="b">nil</b>) can be used to get a
+<i class="i">string</i> representation of a <i class="i">number</i> or any other <i class="i">object</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/string_002dstream.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>string-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="string-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="string-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="synonym_002dstream.html" rel="next" title="synonym-stream">
+<link href="file_002dstream.html" rel="prev" title="file-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="string_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="synonym_002dstream.html" accesskey="n" rel="next">synonym-stream                                               [System Class]</a>, Previous: <a href="file_002dstream.html" accesskey="p" rel="prev">file-stream                                                  [System Class]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="string_002dstream-_005bSystem-Class_005d"><span>21.2.6 string-stream                                                [System Class]<a class="copiable-link" href="#string_002dstream-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-67"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-67"> &para;</a></span></h4>
+
+<p><b class="b">string-stream</b>,
+<b class="b">stream</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-537"><span>Description::<a class="copiable-link" href="#Description_003a_003a-537"> &para;</a></span></h4>
+
+<p>A <i class="i">string stream</i> is a <i class="i">stream</i> 
+which reads input from or writes output to an associated <i class="i">string</i>.
+</p>
+<p>The <i class="i">stream element type</i> of a <i class="i">string stream</i> is always
+a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">character</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-440"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-440"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dstring_002dinput_002dstream.html">make-string-input-stream                                         [Function]</a>
+,
+<a class="ref" href="make_002dstring_002doutput_002dstream.html">make-string-output-stream                                        [Function]</a>
+,
+<a class="ref" href="with_002dinput_002dfrom_002dstring.html">with-input-from-string                                              [Macro]</a>
+,
+<a class="ref" href="with_002doutput_002dto_002dstring.html">with-output-to-string                                               [Macro]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/string_002dtrim.html
@@ -0,0 +1,91 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>string-trim (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="string-trim (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="string-trim (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Strings-Dictionary.html" rel="up" title="Strings Dictionary">
+<link href="string_003d.html" rel="next" title="string=">
+<link href="string_002dupcase.html" rel="prev" title="string-upcase">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="string_002dtrim">
+<div class="nav-panel">
+<p>
+Next: <a href="string_003d.html" accesskey="n" rel="next">string=, string/=, string&lt;, string&gt;, string&lt;=, string&gt;=,</a>, Previous: <a href="string_002dupcase.html" accesskey="p" rel="prev">string-upcase, string-downcase, string-capitalize,</a>, Up: <a href="Strings-Dictionary.html" accesskey="u" rel="up">Strings Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="string_002dtrim_002c-string_002dleft_002dtrim_002c-string_002dright_002dtrim-_005bFunction_005d"><span>16.2.9 string-trim, string-left-trim, string-right-trim                 [Function]<a class="copiable-link" href="#string_002dtrim_002c-string_002dleft_002dtrim_002c-string_002dright_002dtrim-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">string-trim</code>  <i class="i">character-bag string</i> &rArr;  <i class="i">trimmed-string</i>
+</p>
+<p><code class="code">string-left-trim</code>  <i class="i">character-bag string</i> &rArr;  <i class="i">trimmed-string</i>
+</p>
+<p><code class="code">string-right-trim</code>  <i class="i">character-bag string</i> &rArr;  <i class="i">trimmed-string</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-350"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-350"> &para;</a></span></h4>
+
+<p><i class="i">character-bag</i>&mdash;a <i class="i">sequence</i> containing <i class="i">characters</i>.
+</p>
+<p><i class="i">string</i>&mdash;a <i class="i">string designator</i>.
+</p>
+<p><i class="i">trimmed-string</i>&mdash;a <i class="i">string</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-464"><span>Description::<a class="copiable-link" href="#Description_003a_003a-464"> &para;</a></span></h4>
+
+<p><b class="b">string-trim</b> returns a substring of <i class="i">string</i>, 
+with all characters in <i class="i">character-bag</i> stripped off the beginning and end.
+<b class="b">string-left-trim</b> is similar but strips characters off only the beginning; 
+<b class="b">string-right-trim</b> strips off only the end.
+</p>
+<p>If no <i class="i">characters</i> need to be trimmed from the <i class="i">string</i>,
+then either <i class="i">string</i> itself or a copy of it may be returned,
+at the discretion of the implementation.
+</p>
+<p>All of these <i class="i">functions</i> observe the <i class="i">fill pointer</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-332"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-332"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (string-trim &quot;abc&quot; &quot;abcaakaaakabcaaa&quot;) &rArr;  &quot;kaaak&quot;
+ (string-trim '(#\Space #\Tab #\Newline) &quot; garbanzo beans
+        &quot;) &rArr;  &quot;garbanzo beans&quot;
+ (string-trim &quot; (*)&quot; &quot; ( *three (silly) words* ) &quot;)
+&rArr;  &quot;three (silly) words&quot;
+
+ (string-left-trim &quot;abc&quot; &quot;labcabcabc&quot;) &rArr;  &quot;labcabcabc&quot;
+ (string-left-trim &quot; (*)&quot; &quot; ( *three (silly) words* ) &quot;)
+&rArr;  &quot;three (silly) words* ) &quot;
+
+ (string-right-trim &quot; (*)&quot; &quot; ( *three (silly) words* ) &quot;) 
+&rArr;  &quot; ( *three (silly) words&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-67"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-67"> &para;</a></span></h4>
+
+<p>The <i class="i">implementation</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/string_002dupcase.html
@@ -0,0 +1,165 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>string-upcase (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="string-upcase (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="string-upcase (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Strings-Dictionary.html" rel="up" title="Strings Dictionary">
+<link href="string_002dtrim.html" rel="next" title="string-trim">
+<link href="string.html" rel="prev" title="string">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="string_002dupcase">
+<div class="nav-panel">
+<p>
+Next: <a href="string_002dtrim.html" accesskey="n" rel="next">string-trim, string-left-trim, string-right-trim                 [Function]</a>, Previous: <a href="string.html" accesskey="p" rel="prev">string                                                           [Function]</a>, Up: <a href="Strings-Dictionary.html" accesskey="u" rel="up">Strings Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="string_002dupcase_002c-string_002ddowncase_002c-string_002dcapitalize_002c"><span>16.2.8 string-upcase, string-downcase, string-capitalize,<a class="copiable-link" href="#string_002dupcase_002c-string_002ddowncase_002c-string_002dcapitalize_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="nstring_002dupcase_002c-nstring_002ddowncase_002c-nstring_002dcapitalize"><span>nstring-upcase, nstring-downcase, nstring-capitalize<a class="copiable-link" href="#nstring_002dupcase_002c-nstring_002ddowncase_002c-nstring_002dcapitalize"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Function]</i>
+</p></div>
+<p><code class="code">string-upcase</code>  <i class="i">string <span class="r">&amp;key</span> start end</i> &rArr;  <i class="i">cased-string</i>
+</p>
+<p><code class="code">string-downcase</code>  <i class="i">string <span class="r">&amp;key</span> start end</i> &rArr;  <i class="i">cased-string</i>
+</p>
+<p><code class="code">string-capitalize</code>  <i class="i">string <span class="r">&amp;key</span> start end</i> &rArr;  <i class="i">cased-string</i>
+</p>
+<p><code class="code">nstring-upcase</code>  <i class="i">string <span class="r">&amp;key</span> start end</i> &rArr;  <i class="i">string</i>
+</p>
+<p><code class="code">nstring-downcase</code>  <i class="i">string <span class="r">&amp;key</span> start end</i> &rArr;  <i class="i">string</i>
+</p>
+<p><code class="code">nstring-capitalize</code>  <i class="i">string <span class="r">&amp;key</span> start end</i> &rArr;  <i class="i">string</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-349"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-349"> &para;</a></span></h4>
+
+<p><i class="i">string</i>&mdash;a <i class="i">string designator</i>.
+  For <b class="b">nstring-upcase</b>,
+      <b class="b">nstring-downcase</b>,
+  and <b class="b">nstring-capitalize</b>,
+  the <i class="i">string</i> <i class="i">designator</i> must be a <i class="i">string</i>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">string</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">cased-string</i>&mdash;a <i class="i">string</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-463"><span>Description::<a class="copiable-link" href="#Description_003a_003a-463"> &para;</a></span></h4>
+
+<p><b class="b">string-upcase</b>,  <b class="b">string-downcase</b>,  <b class="b">string-capitalize</b>,
+<b class="b">nstring-upcase</b>, <b class="b">nstring-downcase</b>, <b class="b">nstring-capitalize</b>
+change the case of the subsequence of <i class="i">string</i> 
+<i class="i">bounded</i> by <i class="i">start</i> and <i class="i">end</i> 
+as follows:
+</p>
+<dl class="table">
+<dt>string-upcase</dt>
+<dd><p><b class="b">string-upcase</b> returns a <i class="i">string</i> just like <i class="i">string</i> 
+with all lowercase characters replaced by the corresponding uppercase 
+characters.  More precisely, each character of the result <i class="i">string</i> 
+is produced by applying the <i class="i">function</i> <b class="b">char-upcase</b> to the corresponding
+character of <i class="i">string</i>.
+</p>
+</dd>
+<dt>string-downcase</dt>
+<dd><p><b class="b">string-downcase</b> is like <b class="b">string-upcase</b> 
+except that all uppercase characters are replaced by the corresponding 
+lowercase characters (using <b class="b">char-downcase</b>).
+</p>
+</dd>
+<dt>string-capitalize</dt>
+<dd><p><b class="b">string-capitalize</b> produces a copy of <i class="i">string</i> such that,
+for every word in the copy, the first <i class="i">character</i> of the &ldquo;word,&rdquo;
+if it has <i class="i">case</i>, is <i class="i">uppercase</i> and
+any other <i class="i">characters</i> with <i class="i">case</i> in the word are <i class="i">lowercase</i>.
+For the purposes of <b class="b">string-capitalize</b>,
+a &ldquo;word&rdquo; is defined to be a
+consecutive subsequence consisting of <i class="i">alphanumeric</i> <i class="i">characters</i>,
+delimited at each end either by a non-<i class="i">alphanumeric</i> <i class="i">character</i>
+or by an end of the <i class="i">string</i>.
+</p>
+</dd>
+<dt>nstring-upcase, nstring-downcase, nstring-capitalize</dt>
+<dd><p><b class="b">nstring-upcase</b>, <b class="b">nstring-downcase</b>,
+and <b class="b">nstring-capitalize</b> are identical to <b class="b">string-upcase</b>, 
+<b class="b">string-downcase</b>, and <b class="b">string-capitalize</b>
+respectively except that they  modify <i class="i">string</i>.
+</p></dd>
+</dl>
+
+<p>For <b class="b">string-upcase</b>, <b class="b">string-downcase</b>, and <b class="b">string-capitalize</b>,
+<i class="i">string</i> is not modified.  However, if no characters in <i class="i">string</i> 
+require conversion, the result may be either <i class="i">string</i> or a copy of it,
+at the implementation&rsquo;s discretion.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-331"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-331"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (string-upcase &quot;abcde&quot;) &rArr;  &quot;ABCDE&quot;
+ (string-upcase &quot;Dr. Livingston, I presume?&quot;)
+&rArr;  &quot;DR. LIVINGSTON, I PRESUME?&quot;
+ (string-upcase &quot;Dr. Livingston, I presume?&quot; :start 6 :end 10)
+&rArr;  &quot;Dr. LiVINGston, I presume?&quot;
+ (string-downcase &quot;Dr. Livingston, I presume?&quot;)
+&rArr;  &quot;dr. livingston, i presume?&quot;
+
+ (string-capitalize &quot;elm 13c arthur;fig don't&quot;) &rArr;  &quot;Elm 13c Arthur;Fig Don'T&quot;
+ (string-capitalize &quot; hello &quot;) &rArr;  &quot; Hello &quot;
+ (string-capitalize &quot;occlUDeD cASEmenTs FOreSTAll iNADVertent DEFenestraTION&quot;)
+&rArr;   &quot;Occluded Casements Forestall Inadvertent Defenestration&quot;
+ (string-capitalize 'kludgy-hash-search) &rArr;  &quot;Kludgy-Hash-Search&quot;
+ (string-capitalize &quot;DON'T!&quot;) &rArr;  &quot;Don'T!&quot;    ;not &quot;Don't!&quot;
+ (string-capitalize &quot;pipe 13a, foo16c&quot;) &rArr;  &quot;Pipe 13a, Foo16c&quot;
+
+ (setq str (copy-seq &quot;0123ABCD890a&quot;)) &rArr;  &quot;0123ABCD890a&quot;
+ (nstring-downcase str :start 5 :end 7) &rArr;  &quot;0123AbcD890a&quot;
+ str &rArr;  &quot;0123AbcD890a&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-50"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-50"> &para;</a></span></h4>
+
+<p><b class="b">nstring-upcase</b>,
+    <b class="b">nstring-downcase</b>, 
+and <b class="b">nstring-capitalize</b> modify <i class="i">string</i> as appropriate
+rather than constructing a new <i class="i">string</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-378"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-378"> &para;</a></span></h4>
+
+<p><a class="ref" href="char_002dupcase.html">char-upcase, char-downcase                                       [Function]</a>
+, <b class="b">char-downcase</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-253"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-253"> &para;</a></span></h4>
+<p>The result is always of the same length
+as <i class="i">string</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="string_002dtrim.html">string-trim, string-left-trim, string-right-trim                 [Function]</a>, Previous: <a href="string.html">string                                                           [Function]</a>, Up: <a href="Strings-Dictionary.html">Strings Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/string_003d.html
@@ -0,0 +1,207 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>string= (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="string= (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="string= (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Strings-Dictionary.html" rel="up" title="Strings Dictionary">
+<link href="stringp.html" rel="next" title="stringp">
+<link href="string_002dtrim.html" rel="prev" title="string-trim">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="string_003d">
+<div class="nav-panel">
+<p>
+Next: <a href="stringp.html" accesskey="n" rel="next">stringp                                                          [Function]</a>, Previous: <a href="string_002dtrim.html" accesskey="p" rel="prev">string-trim, string-left-trim, string-right-trim                 [Function]</a>, Up: <a href="Strings-Dictionary.html" accesskey="u" rel="up">Strings Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="string_003d_002c-string_002f_003d_002c-string_003c_002c-string_003e_002c-string_003c_003d_002c-string_003e_003d_002c"><span>16.2.10 string=, string/=, string&lt;, string&gt;, string&lt;=, string&gt;=,<a class="copiable-link" href="#string_003d_002c-string_002f_003d_002c-string_003c_002c-string_003e_002c-string_003c_003d_002c-string_003e_003d_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="string_002dequal_002c-string_002dnot_002dequal_002c-string_002dlessp_002c"><span>string-equal, string-not-equal, string-lessp,<a class="copiable-link" href="#string_002dequal_002c-string_002dnot_002dequal_002c-string_002dlessp_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="string_002dgreaterp_002c-string_002dnot_002dgreaterp_002c-string_002dnot_002dlessp"><span>string-greaterp, string-not-greaterp, string-not-lessp<a class="copiable-link" href="#string_002dgreaterp_002c-string_002dnot_002dgreaterp_002c-string_002dnot_002dlessp"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Function]</i>
+</p></div>
+<p><code class="code">string=</code>  <i class="i">string1 string2 <span class="r">&amp;key</span> start1 end1 start2 end2</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">string/=</code>  <i class="i">string1 string2 <span class="r">&amp;key</span> start1 end1 start2 end2</i> &rArr;  <i class="i">mismatch-index</i>
+</p>
+<p><code class="code">string&lt;</code>  <i class="i">string1 string2 <span class="r">&amp;key</span> start1 end1 start2 end2</i> &rArr;  <i class="i">mismatch-index</i>
+</p>
+<p><code class="code">string&gt;</code>  <i class="i">string1 string2 <span class="r">&amp;key</span> start1 end1 start2 end2</i> &rArr;  <i class="i">mismatch-index</i>
+</p>
+<p><code class="code">string&lt;=</code>  <i class="i">string1 string2 <span class="r">&amp;key</span> start1 end1 start2 end2</i> &rArr;  <i class="i">mismatch-index</i>
+</p>
+<p><code class="code">string&gt;=</code>  <i class="i">string1 string2 <span class="r">&amp;key</span> start1 end1 start2 end2</i> &rArr;  <i class="i">mismatch-index</i>
+</p>
+<p><code class="code">string-equal</code>  <i class="i">string1 string2 <span class="r">&amp;key</span> start1 end1 start2 end2</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">string-not-equal</code>  <i class="i">string1 string2 <span class="r">&amp;key</span> start1 end1 start2 end2</i> &rArr;  <i class="i">mismatch-index</i>
+</p>
+<p><code class="code">string-lessp</code>  <i class="i">string1 string2 <span class="r">&amp;key</span> start1 end1 start2 end2</i> &rArr;  <i class="i">mismatch-index</i>
+</p>
+<p><code class="code">string-greaterp</code>  <i class="i">string1 string2 <span class="r">&amp;key</span> start1 end1 start2 end2</i> &rArr;  <i class="i">mismatch-index</i>
+</p>
+<p><code class="code">string-not-greaterp</code>  <i class="i">string1 string2 <span class="r">&amp;key</span> start1 end1 start2 end2</i> &rArr;  <i class="i">mismatch-index</i>
+</p>
+<p><code class="code">string-not-lessp</code>  <i class="i">string1 string2 <span class="r">&amp;key</span> start1 end1 start2 end2</i> &rArr;  <i class="i">mismatch-index</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-351"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-351"> &para;</a></span></h4>
+
+<p><i class="i">string1</i>&mdash;a <i class="i">string designator</i>.
+</p>
+<p><i class="i">string2</i>&mdash;a <i class="i">string designator</i>.
+</p>
+<p><i class="i">start1</i>, <i class="i">end1</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">string1</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">start2</i>, <i class="i">end2</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">string2</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">mismatch-index</i>&mdash;a <i class="i">bounding index</i> of <i class="i">string1</i>, or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-465"><span>Description::<a class="copiable-link" href="#Description_003a_003a-465"> &para;</a></span></h4>
+
+<p>These functions perform lexicographic comparisons on <i class="i">string1</i> and <i class="i">string2</i>.
+<b class="b">string=</b> and <b class="b">string-equal</b> are called equality functions;
+the others are called inequality functions.
+The comparison operations these <i class="i">functions</i> perform are restricted
+     to the subsequence of <i class="i">string1</i> <i class="i">bounded</i> by <i class="i">start1</i> and <i class="i">end1</i>
+ and to the subsequence of <i class="i">string2</i> <i class="i">bounded</i> by <i class="i">start2</i> and <i class="i">end2</i>.
+</p>
+<p>A string <i class="i">a</i> is equal to a string <i class="i">b</i> if it contains the same number
+of characters, and the corresponding characters are the <i class="i">same</i>
+under <b class="b">char=</b> or <b class="b">char-equal</b>, as appropriate.
+</p>
+<p>A string <i class="i">a</i> is less than a string <i class="i">b</i> if in the first position in
+which they differ the character of <i class="i">a</i> is less than the corresponding
+character of <i class="i">b</i> according to <b class="b">char&lt;</b> or <b class="b">char-lessp</b> 
+as appropriate, or if string <i class="i">a</i> is a proper prefix of string <i class="i">b</i>
+(of shorter length and matching in all the characters of <i class="i">a</i>).
+</p>
+<p>The equality functions return a <i class="i">generalized boolean</i> 
+that is <i class="i">true</i> if the strings are equal, 
+or <i class="i">false</i> otherwise.
+</p>
+<p>The inequality functions return a <i class="i">mismatch-index</i>
+that is <i class="i">true</i> if the strings are not equal,
+or <i class="i">false</i> otherwise.
+When the <i class="i">mismatch-index</i> is <i class="i">true</i>,
+it is an <i class="i">integer</i> representing the first character position at which the 
+two substrings differ, as an offset from the beginning of <i class="i">string1</i>.
+</p>
+<p>The comparison has one of the following results:
+</p>
+<dl class="table">
+<dt><b class="b">string=</b></dt>
+<dd><p><b class="b">string=</b> is <i class="i">true</i> if the supplied substrings are of
+the same length and contain the <i class="i">same</i> characters in corresponding
+positions; otherwise it is <i class="i">false</i>.
+</p>
+</dd>
+<dt><b class="b">string/=</b></dt>
+<dd><p><b class="b">string/=</b> is <i class="i">true</i> if the supplied substrings are 
+different; otherwise it is <i class="i">false</i>.
+</p>
+</dd>
+<dt><b class="b">string-equal</b></dt>
+<dd><p><b class="b">string-equal</b> is just like <b class="b">string=</b> 
+except that differences in case are ignored; 
+two characters are considered to be the same if <b class="b">char-equal</b> is <i class="i">true</i> of them.
+</p>
+</dd>
+<dt><b class="b">string&lt;</b></dt>
+<dd><p><b class="b">string&lt;</b> is <i class="i">true</i> if substring1 is less than substring2;
+otherwise it is <i class="i">false</i>.
+</p>
+</dd>
+<dt><b class="b">string&gt;</b></dt>
+<dd><p><b class="b">string&gt;</b> is <i class="i">true</i> if substring1 is greater than substring2;
+otherwise it is <i class="i">false</i>.
+</p>
+</dd>
+<dt><b class="b">string-lessp</b>, <b class="b">string-greaterp</b></dt>
+<dd><p><b class="b">string-lessp</b> and <b class="b">string-greaterp</b> 
+are exactly like <b class="b">string&lt;</b> and <b class="b">string&gt;</b>, respectively,
+except that distinctions between uppercase and lowercase letters are ignored.
+It is as if <b class="b">char-lessp</b> were used instead of <b class="b">char&lt;</b>
+for comparing characters.
+</p>
+</dd>
+<dt><b class="b">string&lt;=</b></dt>
+<dd><p><b class="b">string&lt;=</b> is <i class="i">true</i> if substring1 is less than or equal to substring2;
+otherwise it is <i class="i">false</i>.
+</p>
+</dd>
+<dt><b class="b">string&gt;=</b></dt>
+<dd><p><b class="b">string&gt;=</b> is <i class="i">true</i> if substring1 is greater than or equal to substring2;
+otherwise it is <i class="i">false</i>.
+</p>
+</dd>
+<dt><b class="b">string-not-greaterp</b>, <b class="b">string-not-lessp</b></dt>
+<dd><p><b class="b">string-not-greaterp</b> and <b class="b">string-not-lessp</b>
+are exactly like <b class="b">string&lt;=</b> and <b class="b">string&gt;=</b>, respectively, 
+except that distinctions between uppercase and lowercase letters are ignored.
+It is as if <b class="b">char-lessp</b> were used instead of <b class="b">char&lt;</b>
+for comparing characters.
+</p>
+</dd>
+</dl>
+
+<h4 class="subsubheading" id="Examples_003a_003a-333"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-333"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (string= &quot;foo&quot; &quot;foo&quot;) &rArr;  <i class="i">true</i>
+ (string= &quot;foo&quot; &quot;Foo&quot;) &rArr;  <i class="i">false</i>
+ (string= &quot;foo&quot; &quot;bar&quot;) &rArr;  <i class="i">false</i>
+ (string= &quot;together&quot; &quot;frog&quot; :start1 1 :end1 3 :start2 2) &rArr;  <i class="i">true</i>
+ (string-equal &quot;foo&quot; &quot;Foo&quot;) &rArr;  <i class="i">true</i>
+ (string= &quot;abcd&quot; &quot;01234abcd9012&quot; :start2 5 :end2 9) &rArr;  <i class="i">true</i>
+ (string&lt; &quot;aaaa&quot; &quot;aaab&quot;) &rArr;  3
+ (string&gt;= &quot;aaaaa&quot; &quot;aaaa&quot;) &rArr;  4
+ (string-not-greaterp &quot;Abcde&quot; &quot;abcdE&quot;) &rArr;  5
+ (string-lessp &quot;012AAAA789&quot; &quot;01aaab6&quot; :start1 3 :end1 7
+                                      :start2 2 :end2 6) &rArr;  6
+ (string-not-equal &quot;AAAA&quot; &quot;aaaA&quot;) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-379"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-379"> &para;</a></span></h4>
+
+<p><a class="ref" href="char_003d.html">char=, char/=, char&lt;, char&gt;, char&lt;=, char&gt;=,</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-254"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-254"> &para;</a></span></h4>
+
+<p><b class="b">equal</b> calls <b class="b">string=</b> if applied to two <i class="i">strings</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="stringp.html">stringp                                                          [Function]</a>, Previous: <a href="string_002dtrim.html">string-trim, string-left-trim, string-right-trim                 [Function]</a>, Up: <a href="Strings-Dictionary.html">Strings Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/stringp.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>stringp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="stringp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="stringp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Strings-Dictionary.html" rel="up" title="Strings Dictionary">
+<link href="make_002dstring.html" rel="next" title="make-string">
+<link href="string_003d.html" rel="prev" title="string=">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="stringp">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dstring.html" accesskey="n" rel="next">make-string                                                      [Function]</a>, Previous: <a href="string_003d.html" accesskey="p" rel="prev">string=, string/=, string&lt;, string&gt;, string&lt;=, string&gt;=,</a>, Up: <a href="Strings-Dictionary.html" accesskey="u" rel="up">Strings Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="stringp-_005bFunction_005d"><span>16.2.11 stringp                                                          [Function]<a class="copiable-link" href="#stringp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">stringp</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-352"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-352"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-466"><span>Description::<a class="copiable-link" href="#Description_003a_003a-466"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">string</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-334"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-334"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (stringp &quot;aaaaaa&quot;) &rArr;  <i class="i">true</i>
+ (stringp #\a) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-380"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-380"> &para;</a></span></h4>
+
+<p><a class="ref" href="typep.html">typep                                                            [Function]</a>
+,
+<b class="b">string</b> (<i class="i">type</i>)
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-255"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-255"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (stringp <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'string)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/structure_002dclass.html
@@ -0,0 +1,57 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>structure-class (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="structure-class (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="structure-class (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="standard_002dclass.html" rel="next" title="standard-class">
+<link href="built_002din_002dclass.html" rel="prev" title="built-in-class">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="structure_002dclass">
+<div class="nav-panel">
+<p>
+Next: <a href="standard_002dclass.html" accesskey="n" rel="next">standard-class                                               [System Class]</a>, Previous: <a href="built_002din_002dclass.html" accesskey="p" rel="prev">built-in-class                                               [System Class]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="structure_002dclass-_005bSystem-Class_005d"><span>4.4.9 structure-class                                              [System Class]<a class="copiable-link" href="#structure_002dclass-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-5"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-5"> &para;</a></span></h4>
+
+<p><b class="b">structure-class</b>,
+<b class="b">class</b>,
+</p>
+<p><b class="b">standard-object</b>,
+</p>
+<p><b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-38"><span>Description::<a class="copiable-link" href="#Description_003a_003a-38"> &para;</a></span></h4>
+
+<p>All <i class="i">classes</i> defined by means of <b class="b">defstruct</b> 
+are <i class="i">instances</i> of the <i class="i">class</i> <b class="b">structure-class</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/structure_002dobject.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>structure-object (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="structure-object (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="structure-object (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="standard_002dobject.html" rel="next" title="standard-object">
+<link href="standard_002dmethod.html" rel="prev" title="standard-method">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="structure_002dobject">
+<div class="nav-panel">
+<p>
+Next: <a href="standard_002dobject.html" accesskey="n" rel="next">standard-object                                                     [Class]</a>, Previous: <a href="standard_002dmethod.html" accesskey="p" rel="prev">standard-method                                              [System Class]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="structure_002dobject-_005bClass_005d"><span>4.4.13 structure-object                                                    [Class]<a class="copiable-link" href="#structure_002dobject-_005bClass_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-9"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-9"> &para;</a></span></h4>
+
+<p><b class="b">structure-object</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-42"><span>Description::<a class="copiable-link" href="#Description_003a_003a-42"> &para;</a></span></h4>
+
+<p>The <i class="i">class</i> <b class="b">structure-object</b> is an <i class="i">instance</i> of <b class="b">structure-class</b>
+and is a <i class="i">superclass</i> of every <i class="i">class</i> 
+that is an <i class="i">instance</i> of <b class="b">structure-class</b>
+except itself, and is a <i class="i">superclass</i> of every <i class="i">class</i> 
+that is defined by <b class="b">defstruct</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-31"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-31"> &para;</a></span></h4>
+
+<p><a class="ref" href="defstruct.html">defstruct                                                           [Macro]</a>
+,
+<a class="ref" href="Sharpsign-S.html">Sharpsign S</a>,
+<a class="ref" href="Printing-Structures.html">Printing Structures</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/style_002dwarning.html
@@ -0,0 +1,77 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>style-warning (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="style-warning (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="style-warning (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="serious_002dcondition.html" rel="next" title="serious-condition">
+<link href="warning.html" rel="prev" title="warning">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="style_002dwarning">
+<div class="nav-panel">
+<p>
+Next: <a href="serious_002dcondition.html" accesskey="n" rel="next">serious-condition                                          [Condition Type]</a>, Previous: <a href="warning.html" accesskey="p" rel="prev">warning                                                    [Condition Type]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="style_002dwarning-_005bCondition-Type_005d"><span>9.2.3 style-warning                                              [Condition Type]<a class="copiable-link" href="#style_002dwarning-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-21"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-21"> &para;</a></span></h4>
+<p><b class="b">style-warning</b>,
+<b class="b">warning</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-173"><span>Description::<a class="copiable-link" href="#Description_003a_003a-173"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">style-warning</b> includes those <i class="i">conditions</i> 
+that represent <i class="i">situations</i> involving <i class="i">code</i> 
+that is <i class="i">conforming code</i> but that is nevertheless 
+considered to be faulty or substandard.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-154"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-154"> &para;</a></span></h4>
+
+<p><a class="ref" href="muffle_002dwarning.html">muffle-warning                                                    [Restart]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-94"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-94"> &para;</a></span></h4>
+
+<p>An <i class="i">implementation</i> might signal such a <i class="i">condition</i>
+if it encounters <i class="i">code</i>
+     that uses deprecated features 
+  or that appears unaesthetic or inefficient.
+</p>
+<p>An &lsquo;unused variable&rsquo; warning must be of <i class="i">type</i> <b class="b">style-warning</b>.
+</p>
+<p>In general, the question of whether <i class="i">code</i> is faulty or substandard
+is a subjective decision to be made by the facility processing that <i class="i">code</i>.
+The intent is that whenever such a facility wishes to complain about
+<i class="i">code</i> on such subjective grounds, it should use this 
+<i class="i">condition</i> <i class="i">type</i> so that any clients who wish to redirect or
+muffle superfluous warnings can do so without risking that they will be
+redirecting or muffling other, more serious warnings.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/sublis.html
@@ -0,0 +1,162 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>sublis (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="sublis (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="sublis (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="subst.html" rel="next" title="subst">
+<link href="copy_002dtree.html" rel="prev" title="copy-tree">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="sublis">
+<div class="nav-panel">
+<p>
+Next: <a href="subst.html" accesskey="n" rel="next">subst, subst-if, subst-if-not, nsubst, nsubst-if, nsubst-if-not</a>, Previous: <a href="copy_002dtree.html" accesskey="p" rel="prev">copy-tree                                                        [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="sublis_002c-nsublis-_005bFunction_005d"><span>14.2.11 sublis, nsublis                                                  [Function]<a class="copiable-link" href="#sublis_002c-nsublis-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">sublis</code>  <i class="i">alist tree <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">new-tree</i>
+</p>
+<p><code class="code">nsublis</code>  <i class="i">alist tree <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">new-tree</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-280"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-280"> &para;</a></span></h4>
+
+<p><i class="i">alist</i>&mdash;an <i class="i">association list</i>.
+</p>
+<p><i class="i">tree</i>&mdash;a <i class="i">tree</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">new-tree</i>&mdash;a <i class="i">tree</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-381"><span>Description::<a class="copiable-link" href="#Description_003a_003a-381"> &para;</a></span></h4>
+
+<p><b class="b">sublis</b> makes substitutions for <i class="i">objects</i> in <i class="i">tree</i>
+(a structure of <i class="i">conses</i>).
+<b class="b">nsublis</b> is like <b class="b">sublis</b> 
+but destructively modifies the relevant
+parts of the <i class="i">tree</i>.
+</p>
+<p><b class="b">sublis</b> looks at all subtrees and leaves of <i class="i">tree</i>;
+if a subtree or leaf appears as a key in <i class="i">alist</i>
+(that is, the key and the subtree or leaf <i class="i">satisfy the test</i>),
+it is replaced by the <i class="i">object</i> with which that key is associated.
+This operation is non-destructive.  In effect, <b class="b">sublis</b> can
+perform several <b class="b">subst</b> operations simultaneously.
+</p>
+<p>If <b class="b">sublis</b> succeeds, a new copy of <i class="i">tree</i> is returned in
+which each occurrence of such a subtree or leaf is replaced by the
+<i class="i">object</i> with which it is associated.   If no changes are made, the
+original tree is returned.  The original <i class="i">tree</i> is left unchanged,
+but the result tree may share cells with it.
+</p>
+<p><b class="b">nsublis</b> is permitted to modify <i class="i">tree</i> 
+but otherwise returns the same values as <b class="b">sublis</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-264"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-264"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (sublis '((x . 100) (z . zprime))
+         '(plus x (minus g z x p) 4 . x))
+&rArr;  (PLUS 100 (MINUS G ZPRIME 100 P) 4 . 100)
+ (sublis '(((+ x y) . (- x y)) ((- x y) . (+ x y)))
+         '(* (/ (+ x y) (+ x p)) (- x y))
+         :test #'equal)
+&rArr;  (* (/ (- X Y) (+ X P)) (+ X Y))
+ (setq tree1 '(1 (1 2) ((1 2 3)) (((1 2 3 4)))))
+&rArr;  (1 (1 2) ((1 2 3)) (((1 2 3 4))))
+ (sublis '((3 . &quot;three&quot;)) tree1) 
+&rArr;  (1 (1 2) ((1 2 &quot;three&quot;)) (((1 2 &quot;three&quot; 4))))
+ (sublis '((t . &quot;string&quot;))
+          (sublis '((1 . &quot;&quot;) (4 . 44)) tree1)
+          :key #'stringp)
+&rArr;  (&quot;string&quot; (&quot;string&quot; 2) ((&quot;string&quot; 2 3)) (((&quot;string&quot; 2 3 44))))
+ tree1 &rArr;  (1 (1 2) ((1 2 3)) (((1 2 3 4))))
+ (setq tree2 '(&quot;one&quot; (&quot;one&quot; &quot;two&quot;) ((&quot;one&quot; &quot;Two&quot; &quot;three&quot;))))
+&rArr;  (&quot;one&quot; (&quot;one&quot; &quot;two&quot;) ((&quot;one&quot; &quot;Two&quot; &quot;three&quot;))) 
+ (sublis '((&quot;two&quot; . 2)) tree2) 
+&rArr;  (&quot;one&quot; (&quot;one&quot; &quot;two&quot;) ((&quot;one&quot; &quot;Two&quot; &quot;three&quot;))) 
+ tree2 &rArr;  (&quot;one&quot; (&quot;one&quot; &quot;two&quot;) ((&quot;one&quot; &quot;Two&quot; &quot;three&quot;))) 
+ (sublis '((&quot;two&quot; . 2)) tree2 :test 'equal) 
+&rArr;  (&quot;one&quot; (&quot;one&quot; 2) ((&quot;one&quot; &quot;Two&quot; &quot;three&quot;))) 
+
+ (nsublis '((t . 'temp))
+           tree1
+           :key #'(lambda (x) (or (atom x) (&lt; (list-length x) 3))))
+&rArr;  ((QUOTE TEMP) (QUOTE TEMP) QUOTE TEMP) 
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-36"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-36"> &para;</a></span></h4>
+
+<p><b class="b">nsublis</b> modifies <i class="i">tree</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-307"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-307"> &para;</a></span></h4>
+
+<p><a class="ref" href="subst.html">subst, subst-if, subst-if-not, nsubst, nsubst-if, nsubst-if-not</a>
+,
+</p>
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-201"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-201"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> parameter is deprecated.
+</p>
+<p>Because the side-effecting variants (<i class="i">e.g.</i>, <b class="b">nsublis</b>) potentially
+change the path that is being traversed, their effects in the presence
+of shared or circular structure structure may vary in surprising ways
+when compared to their non-side-effecting alternatives.  To see this,
+consider the following side-effect behavior, which might be exhibited by
+some implementations:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun test-it (fn)
+   (let* ((shared-piece (list 'a 'b))
+          (data (list shared-piece shared-piece)))
+     (funcall fn '((a . b) (b . a)) data)))
+ (test-it #'sublis) &rArr;  ((B A) (B A))
+ (test-it #'nsublis) &rArr;  ((A B) (A B))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="subst.html">subst, subst-if, subst-if-not, nsubst, nsubst-if, nsubst-if-not</a>, Previous: <a href="copy_002dtree.html">copy-tree                                                        [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/subseq.html
@@ -0,0 +1,117 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>subseq (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="subseq (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="subseq (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="map.html" rel="next" title="map">
+<link href="make_002dsequence.html" rel="prev" title="make-sequence">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="subseq">
+<div class="nav-panel">
+<p>
+Next: <a href="map.html" accesskey="n" rel="next">map                                                              [Function]</a>, Previous: <a href="make_002dsequence.html" accesskey="p" rel="prev">make-sequence                                                    [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="subseq-_005bAccessor_005d"><span>17.3.6 subseq                                                           [Accessor]<a class="copiable-link" href="#subseq-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">subseq</code>  <i class="i">sequence start <span class="r">&amp;optional</span> end</i> &rArr;  <i class="i">subsequence</i>
+</p>
+<p>(setf (<code class="code">         subseq</code> <i class="i">sequence start <span class="r">&amp;optional</span> end</i>) new-subsequence)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-358"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-358"> &para;</a></span></h4>
+
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">sequence</i>.
+ The default for <i class="i">end</i> is <b class="b">nil</b>.
+</p>
+<p><i class="i">subsequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">new-subsequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-473"><span>Description::<a class="copiable-link" href="#Description_003a_003a-473"> &para;</a></span></h4>
+
+<p><b class="b">subseq</b> creates a <i class="i">sequence</i> 
+that is a copy of the subsequence of <i class="i">sequence</i>
+<i class="i">bounded</i> by <i class="i">start</i> and <i class="i">end</i>.
+</p>
+<p><i class="i">Start</i> specifies an offset into the original <i class="i">sequence</i> and
+marks the beginning position of the subsequence.
+<i class="i">end</i> marks the position following the last element of the subsequence.
+</p>
+<p><b class="b">subseq</b> always allocates a new <i class="i">sequence</i> for a result;
+it never shares storage with an old <i class="i">sequence</i>. 
+The result subsequence is always of the same <i class="i">type</i> as <i class="i">sequence</i>.
+</p>
+<p>If <i class="i">sequence</i> is a <i class="i">vector</i>,
+the result is a <i class="i">fresh</i> <i class="i">simple array</i>
+of <i class="i">rank</i> one
+that has the same <i class="i">actual array element type</i> as <i class="i">sequence</i>.
+If <i class="i">sequence</i> is a <i class="i">list</i>, 
+the result is a <i class="i">fresh</i> <i class="i">list</i>. 
+</p>
+<p><b class="b">setf</b> may be used with <b class="b">subseq</b> to destructively replace
+<i class="i">elements</i> of a subsequence with <i class="i">elements</i> 
+taken from a <i class="i">sequence</i> of new values.
+If the subsequence and the new sequence are not of equal length,
+the shorter length determines the number of elements that are
+replaced.  The remaining <i class="i">elements</i> at the end of the longer sequence 
+are not modified in the operation.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-340"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-340"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq str &quot;012345&quot;) &rArr;  &quot;012345&quot;
+ (subseq str 2) &rArr;  &quot;2345&quot;
+ (subseq str 3 5) &rArr;  &quot;34&quot;
+ (setf (subseq str 4) &quot;abc&quot;) &rArr;  &quot;abc&quot;
+ str &rArr;  &quot;0123ab&quot;
+ (setf (subseq str 0 2) &quot;A&quot;) &rArr;  &quot;A&quot;
+ str &rArr;  &quot;A123ab&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-154"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-154"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">new-subsequence</i> is not a <i class="i">proper sequence</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-385"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-385"> &para;</a></span></h4>
+
+<p><a class="ref" href="replace.html">replace                                                          [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="map.html">map                                                              [Function]</a>, Previous: <a href="make_002dsequence.html">make-sequence                                                    [Function]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/subsetp.html
@@ -0,0 +1,119 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>subsetp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="subsetp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="subsetp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="union.html" rel="next" title="union">
+<link href="set_002dexclusive_002dor.html" rel="prev" title="set-exclusive-or">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="subsetp">
+<div class="nav-panel">
+<p>
+Next: <a href="union.html" accesskey="n" rel="next">union, nunion                                                    [Function]</a>, Previous: <a href="set_002dexclusive_002dor.html" accesskey="p" rel="prev">set-exclusive-or, nset-exclusive-or                              [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="subsetp-_005bFunction_005d"><span>14.2.48 subsetp                                                          [Function]<a class="copiable-link" href="#subsetp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">subsetp</code>  <i class="i">list-1 list-2 <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-317"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-317"> &para;</a></span></h4>
+
+<p><i class="i">list-1</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<p><i class="i">list-2</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-418"><span>Description::<a class="copiable-link" href="#Description_003a_003a-418"> &para;</a></span></h4>
+
+<p><b class="b">subsetp</b> returns <i class="i">true</i> if every element of <i class="i">list-1</i>
+matches some element of <i class="i">list-2</i>,
+and <i class="i">false</i> otherwise.
+</p>
+<p>Whether a list element is the same as another list element is
+determined by the functions specified by the keyword arguments.  
+The first argument to the <code class="t">:test</code> or <code class="t">:test-not</code> 
+function is 
+typically
+part of an element of <i class="i">list-1</i> extracted by
+the <code class="t">:key</code> function; the second argument is  typically part of 
+an element of <i class="i">list-2</i> extracted by
+the <code class="t">:key</code> function.
+</p>
+<p>The argument to the <code class="t">:key</code> function is an element of either
+<i class="i">list-1</i> or <i class="i">list-2</i>; the return value is part of the element
+of the supplied list element.
+If <code class="t">:key</code> is not supplied or <b class="b">nil</b>, 
+the <i class="i">list-1</i> or <i class="i">list-2</i>
+element itself is supplied to the <code class="t">:test</code> or <code class="t">:test-not</code> 
+function.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-301"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-301"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq cosmos '(1 &quot;a&quot; (1 2))) &rArr;  (1 &quot;a&quot; (1 2))
+ (subsetp '(1) cosmos) &rArr;  <i class="i">true</i>
+ (subsetp '((1 2)) cosmos) &rArr;  <i class="i">false</i>
+ (subsetp '((1 2)) cosmos :test 'equal) &rArr;  <i class="i">true</i>
+ (subsetp '(1 &quot;A&quot;) cosmos :test #'equalp) &rArr;  <i class="i">true</i>
+ (subsetp '((1) (2)) '((1) (2))) &rArr;  <i class="i">false</i>
+ (subsetp '((1) (2)) '((1) (2)) :key #'car) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-136"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-136"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">list-1</i> and <i class="i">list-2</i> are not <i class="i">proper lists</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-342"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-342"> &para;</a></span></h4>
+
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-228"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-228"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> parameter is deprecated.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="union.html">union, nunion                                                    [Function]</a>, Previous: <a href="set_002dexclusive_002dor.html">set-exclusive-or, nset-exclusive-or                              [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/subst.html
@@ -0,0 +1,191 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>subst (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="subst (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="subst (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="tree_002dequal.html" rel="next" title="tree-equal">
+<link href="sublis.html" rel="prev" title="sublis">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="subst">
+<div class="nav-panel">
+<p>
+Next: <a href="tree_002dequal.html" accesskey="n" rel="next">tree-equal                                                       [Function]</a>, Previous: <a href="sublis.html" accesskey="p" rel="prev">sublis, nsublis                                                  [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="subst_002c-subst_002dif_002c-subst_002dif_002dnot_002c-nsubst_002c-nsubst_002dif_002c-nsubst_002dif_002dnot"><span>14.2.12 subst, subst-if, subst-if-not, nsubst, nsubst-if, nsubst-if-not<a class="copiable-link" href="#subst_002c-subst_002dif_002c-subst_002dif_002dnot_002c-nsubst_002c-nsubst_002dif_002c-nsubst_002dif_002dnot"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Function]</i>
+</p></div>
+<p><code class="code">subst</code>  <i class="i">new old  tree <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">new-tree</i>
+</p>
+<p><code class="code">subst-if</code>  <i class="i">new predicate tree <span class="r">&amp;key</span> key</i> &rArr;  <i class="i">new-tree</i>
+</p>
+<p><code class="code">subst-if-not</code>  <i class="i">new predicate tree <span class="r">&amp;key</span> key</i> &rArr;  <i class="i">new-tree</i>
+</p>
+<p><code class="code">nsubst</code>  <i class="i">new old  tree <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">new-tree</i>
+</p>
+<p><code class="code">nsubst-if</code>  <i class="i">new predicate tree <span class="r">&amp;key</span> key</i> &rArr;  <i class="i">new-tree</i>
+</p>
+<p><code class="code">nsubst-if-not</code>  <i class="i">new predicate tree <span class="r">&amp;key</span> key</i> &rArr;  <i class="i">new-tree</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-281"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-281"> &para;</a></span></h4>
+
+<p><i class="i">new</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">old</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">predicate</i>&mdash;a <i class="i">symbol</i> that names a <i class="i">function</i>,
+   or a <i class="i">function</i> of one argument 
+      that returns a <i class="i">generalized boolean</i> value.
+</p>
+<p><i class="i">tree</i>&mdash;a <i class="i">tree</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">new-tree</i>&mdash;a <i class="i">tree</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-382"><span>Description::<a class="copiable-link" href="#Description_003a_003a-382"> &para;</a></span></h4>
+
+<p><b class="b">subst</b>, <b class="b">subst-if</b>, and <b class="b">subst-if-not</b> perform
+substitution operations on <i class="i">tree</i>.  
+Each function searches <i class="i">tree</i> for occurrences of a 
+particular <i class="i">old</i> item of an element or subexpression that 
+<i class="i">satisfies the test</i>.
+</p>
+<p><b class="b">nsubst</b>, <b class="b">nsubst-if</b>, and <b class="b">nsubst-if-not</b> are 
+like <b class="b">subst</b>,
+<b class="b">subst-if</b>, and <b class="b">subst-if-not</b> respectively, except that the 
+original <i class="i">tree</i> is  modified.
+</p>
+<p><b class="b">subst</b> makes a copy of <i class="i">tree</i>,
+substituting <i class="i">new</i> for every subtree or leaf of <i class="i">tree</i>
+(whether the subtree or leaf is a <i class="i">car</i> or a <i class="i">cdr</i> of its parent)
+such that <i class="i">old</i> and the subtree or leaf <i class="i">satisfy the test</i>.  
+</p>
+<p><b class="b">nsubst</b> is a destructive version of <b class="b">subst</b>.  
+The list structure of
+<i class="i">tree</i> is altered by destructively replacing with <i class="i">new</i>
+each leaf of the <i class="i">tree</i> such that <i class="i">old</i> and the leaf
+<i class="i">satisfy the test</i>.
+</p>
+<p>For <b class="b">subst</b>, <b class="b">subst-if</b>, 
+and <b class="b">subst-if-not</b>,
+if the functions succeed, a new
+copy of the tree is returned in which each  occurrence of such an
+element is replaced by the
+<i class="i">new</i> element or subexpression.  If no changes are made, the original 
+<i class="i">tree</i> may be returned.
+The original <i class="i">tree</i> is left unchanged, but the result tree 
+may share storage with it.           
+</p>
+<p>For <b class="b">nsubst</b>, <b class="b">nsubst-if</b>, 
+and <b class="b">nsubst-if-not</b>
+the original <i class="i">tree</i> is  modified and returned as the function result,
+but the result may not be <b class="b">eq</b> to <i class="i">tree</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-265"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-265"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq tree1 '(1 (1 2) (1 2 3) (1 2 3 4))) &rArr;  (1 (1 2) (1 2 3) (1 2 3 4))
+ (subst &quot;two&quot; 2 tree1) &rArr;  (1 (1 &quot;two&quot;) (1 &quot;two&quot; 3) (1 &quot;two&quot; 3 4))
+ (subst &quot;five&quot; 5 tree1) &rArr;  (1 (1 2) (1 2 3) (1 2 3 4))
+ (eq tree1 (subst &quot;five&quot; 5 tree1)) &rArr;  <i class="i">implementation-dependent</i>
+ (subst 'tempest 'hurricane
+        '(shakespeare wrote (the hurricane)))
+&rArr;  (SHAKESPEARE WROTE (THE TEMPEST))
+ (subst 'foo 'nil '(shakespeare wrote (twelfth night)))
+&rArr;  (SHAKESPEARE WROTE (TWELFTH NIGHT . FOO) . FOO)
+ (subst '(a . cons) '(old . pair)
+        '((old . spice) ((old . shoes) old . pair) (old . pair))
+        :test #'equal)
+&rArr;  ((OLD . SPICE) ((OLD . SHOES) A . CONS) (A . CONS))
+
+ (subst-if 5 #'listp tree1) &rArr;  5
+ (subst-if-not '(x) #'consp tree1) 
+&rArr;  (1 X)
+
+ tree1 &rArr;  (1 (1 2) (1 2 3) (1 2 3 4))
+ (nsubst 'x 3 tree1 :key #'(lambda (y) (and (listp y) (third y)))) 
+&rArr;  (1 (1 2) X X)
+ tree1 &rArr;  (1 (1 2) X X)
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-37"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-37"> &para;</a></span></h4>
+
+<p><b class="b">nsubst</b>, <b class="b">nsubst-if</b>, and <b class="b">nsubst-if-not</b> 
+might alter the <i class="i">tree structure</i> of <i class="i">tree</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-308"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-308"> &para;</a></span></h4>
+
+<p><a class="ref" href="substitute.html">substitute, substitute-if, substitute-if-not,</a>
+,
+<b class="b">nsubstitute</b>,
+</p>
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-202"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-202"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> parameter is deprecated.
+</p>
+<p>The functions <b class="b">subst-if-not</b> and <b class="b">nsubst-if-not</b> are deprecated.
+</p>
+<p>One possible definition of <b class="b">subst</b>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun subst (old new tree &amp;rest x &amp;key test test-not key)
+   (cond ((satisfies-the-test old tree :test test
+                                 :test-not test-not :key key)
+         new)
+        ((atom tree) tree)
+        (t (let ((a (apply #'subst old new (car tree) x))
+                 (d (apply #'subst old new (cdr tree) x)))
+             (if (and (eql a (car tree))
+                      (eql d (cdr tree)))
+                 tree
+                 (cons a d))))))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="tree_002dequal.html">tree-equal                                                       [Function]</a>, Previous: <a href="sublis.html">sublis, nsublis                                                  [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/substitute.html
@@ -0,0 +1,239 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>substitute (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="substitute (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="substitute (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Sequences-Dictionary.html" rel="up" title="Sequences Dictionary">
+<link href="concatenate.html" rel="next" title="concatenate">
+<link href="replace.html" rel="prev" title="replace">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+p.flushright-paragraph {text-align:right}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="substitute">
+<div class="nav-panel">
+<p>
+Next: <a href="concatenate.html" accesskey="n" rel="next">concatenate                                                      [Function]</a>, Previous: <a href="replace.html" accesskey="p" rel="prev">replace                                                          [Function]</a>, Up: <a href="Sequences-Dictionary.html" accesskey="u" rel="up">Sequences Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="substitute_002c-substitute_002dif_002c-substitute_002dif_002dnot_002c"><span>17.3.19 substitute, substitute-if, substitute-if-not,<a class="copiable-link" href="#substitute_002c-substitute_002dif_002c-substitute_002dif_002dnot_002c"> &para;</a></span></h4>
+<h4 class="subheading" id="nsubstitute_002c-nsubstitute_002dif_002c-nsubstitute_002dif_002dnot"><span>nsubstitute, nsubstitute-if, nsubstitute-if-not<a class="copiable-link" href="#nsubstitute_002c-nsubstitute_002dif_002c-nsubstitute_002dif_002dnot"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Function]</i>
+</p></div>
+<p><code class="code">substitute</code>  <i class="i">newitem  olditem  sequence 
+		   	  <span class="r">&amp;key</span> from-end test
+				       test-not start
+                                       end count key</i><br>
+   &rArr;  <i class="i">result-sequence</i>
+</p>
+<p><code class="code">substitute-if</code>  <i class="i">newitem predicate sequence <span class="r">&amp;key</span> from-end start end count key</i><br>
+   &rArr;  <i class="i">result-sequence</i>
+</p>
+<p><code class="code">substitute-if-not</code>  <i class="i">newitem predicate sequence <span class="r">&amp;key</span> from-end start end count key</i><br>
+   &rArr;  <i class="i">result-sequence</i>
+</p>
+<p><code class="code">nsubstitute</code>  <i class="i">newitem  olditem  sequence
+                          <span class="r">&amp;key</span> from-end test test-not start end count key</i><br>
+   &rArr;  <i class="i">sequence</i>
+</p>
+<p><code class="code">nsubstitute-if</code>  <i class="i">newitem predicate sequence <span class="r">&amp;key</span> from-end start end count key</i><br>
+   &rArr;  <i class="i">sequence</i>
+</p>
+<p><code class="code">nsubstitute-if-not</code>  <i class="i">newitem predicate sequence <span class="r">&amp;key</span> from-end start end count key</i><br>
+   &rArr;  <i class="i">sequence</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-371"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-371"> &para;</a></span></h4>
+
+<p><i class="i">newitem</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">olditem</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">sequence</i>&mdash;a <i class="i">proper sequence</i>.
+</p>
+<p><i class="i">predicate</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one <i class="i">argument</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">from-end</i>&mdash;a <i class="i">generalized boolean</i>.
+  The default is <i class="i">false</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">sequence</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">count</i>&mdash;an <i class="i">integer</i> or <b class="b">nil</b>.
+</p>
+<p>The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">result-sequence</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-486"><span>Description::<a class="copiable-link" href="#Description_003a_003a-486"> &para;</a></span></h4>
+
+<p><b class="b">substitute</b>, <b class="b">substitute-if</b>, and <b class="b">substitute-if-not</b>
+return a 
+copy of <i class="i">sequence</i> in which each <i class="i">element</i>
+that <i class="i">satisfies the test</i> has been replaced with <i class="i">newitem</i>.
+</p>
+<p><b class="b">nsubstitute</b>, <b class="b">nsubstitute-if</b>, and <b class="b">nsubstitute-if-not</b>
+are like <b class="b">substitute</b>, <b class="b">substitute-if</b>, and
+<b class="b">substitute-if-not</b> respectively, but they may modify 
+<i class="i">sequence</i>.
+</p>
+<p>If 
+<i class="i">sequence</i> is a <i class="i">vector</i>, the result is a
+<i class="i">vector</i> that has the same
+<i class="i">actual array element type</i> as <i class="i">sequence</i>.
+The result might or might not be simple, and 
+might or might not be <i class="i">identical</i>
+to <i class="i">sequence</i>.
+If <i class="i">sequence</i> is a <i class="i">list</i>, the result is a 
+<i class="i">list</i>. 
+</p>
+<p><i class="i">Count</i>, if supplied, limits the number of elements
+altered; if more than <i class="i">count</i> <i class="i">elements</i> <i class="i">satisfy the test</i>,
+then of these <i class="i">elements</i> only the leftmost or rightmost, depending
+on <i class="i">from-end</i>, are replaced,
+as many as specified by <i class="i">count</i>.
+</p>
+<p>If <i class="i">count</i> is supplied and negative, 
+the behavior is as if zero had been supplied instead.
+</p>
+<p>If <i class="i">count</i> is <b class="b">nil</b>, all matching items are affected.
+</p>
+<p>Supplying a <i class="i">from-end</i> of <i class="i">true</i> matters only when the
+<i class="i">count</i> is provided (and <i class="i">non-nil</i>);
+in that case,
+only the rightmost <i class="i">count</i> <i class="i">elements</i> <i class="i">satisfying the test</i> are removed
+(instead of the leftmost).
+</p>
+<p><i class="i">predicate</i>, <i class="i">test</i>, and <i class="i">test-not</i> 
+might be called more than once for each <i class="i">sequence</i> <i class="i">element</i>,
+and their side effects can happen in any order.         
+</p>
+<p>The result of all these functions is a <i class="i">sequence</i>
+of the same <i class="i">type</i> as <i class="i">sequence</i>
+that has the same elements except that those in the subsequence
+<i class="i">bounded</i> by <i class="i">start</i> and <i class="i">end</i> and <i class="i">satisfying the test</i> 
+have been replaced by <i class="i">newitem</i>.  
+</p>
+<p><b class="b">substitute</b>, <b class="b">substitute-if</b>, and <b class="b">substitute-if-not</b>
+return a <i class="i">sequence</i> which can share with <i class="i">sequence</i> 
+or may be <i class="i">identical</i> to the input <i class="i">sequence</i>
+if no elements need to be changed.
+</p>
+<p><b class="b">nsubstitute</b> and  <b class="b">nsubstitute-if</b> are required to 
+<b class="b">setf</b> any <b class="b">car</b> (if <i class="i">sequence</i> is a <i class="i">list</i>) 
+or <b class="b">aref</b> (if <i class="i">sequence</i> is a <i class="i">vector</i>)
+of <i class="i">sequence</i> that is required to be replaced with <i class="i">newitem</i>.
+If <i class="i">sequence</i> is a <i class="i">list</i>,
+none of the <i class="i">cdrs</i> of the top-level <i class="i">list</i> can be modified.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-353"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-353"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (substitute #\. #\SPACE &quot;0 2 4 6&quot;) &rArr;  &quot;0.2.4.6&quot;
+ (substitute 9 4 '(1 2 4 1 3 4 5)) &rArr;  (1 2 9 1 3 9 5)
+ (substitute 9 4 '(1 2 4 1 3 4 5) :count 1) &rArr;  (1 2 9 1 3 4 5)
+ (substitute 9 4 '(1 2 4 1 3 4 5) :count 1 :from-end t)
+&rArr;  (1 2 4 1 3 9 5)
+ (substitute 9 3 '(1 2 4 1 3 4 5) :test #'&gt;) &rArr;  (9 9 4 9 3 4 5)
+
+ (substitute-if 0 #'evenp '((1) (2) (3) (4)) :start 2 :key #'car)
+&rArr;  ((1) (2) (3) 0)
+ (substitute-if 9 #'oddp '(1 2 4 1 3 4 5)) &rArr;  (9 2 4 9 9 4 9)
+ (substitute-if 9 #'evenp '(1 2 4 1 3 4 5) :count 1 :from-end t)
+&rArr;  (1 2 4 1 3 9 5)
+
+ (setq some-things (list 'a 'car 'b 'cdr 'c)) &rArr;  (A CAR B CDR C)
+ (nsubstitute-if &quot;function was here&quot; #'fboundp some-things
+                 :count 1 :from-end t) &rArr;  (A CAR B &quot;function was here&quot; C)
+ some-things &rArr;  (A CAR B &quot;function was here&quot; C)
+ (setq alpha-tester (copy-seq &quot;ab &quot;)) &rArr;  &quot;ab &quot;
+ (nsubstitute-if-not #\z #'alpha-char-p alpha-tester) &rArr;  &quot;abz&quot;
+ alpha-tester &rArr;  &quot;abz&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-54"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-54"> &para;</a></span></h4>
+
+<p><b class="b">nsubstitute</b>, <b class="b">nsubstitute-if</b>, and <b class="b">nsubstitute-if-not</b>
+modify <i class="i">sequence</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-164"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-164"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-396"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-396"> &para;</a></span></h4>
+
+<p><a class="ref" href="subst.html">subst, subst-if, subst-if-not, nsubst, nsubst-if, nsubst-if-not</a>
+,
+<b class="b">nsubst</b>,
+</p>
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-266"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-266"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> <i class="i">argument</i> is deprecated.
+</p>
+<p>The functions <b class="b">substitute-if-not</b> and <b class="b">nsubstitute-if-not</b> are deprecated.
+</p>
+<p><b class="b">nsubstitute</b> and <b class="b">nsubstitute-if</b> can be used 
+in for-effect-only positions in code.
+</p>
+<p>Because the side-effecting variants (<i class="i">e.g.</i>, <b class="b">nsubstitute</b>)
+potentially change the path that is being traversed, their effects in
+the presence of shared or circular structure may vary in surprising ways when
+compared to their non-side-effecting alternatives.  To see this,
+consider the following side-effect behavior, which might be exhibited by
+some implementations:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun test-it (fn)
+   (let ((x (cons 'b nil)))
+     (rplacd x x)
+     (funcall fn 'a 'b x :count 1)))
+ (test-it #'substitute) &rArr;  (A . #1=(B . #1#))
+ (test-it #'nsubstitute) &rArr;  (A . #1#)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="concatenate.html">concatenate                                                      [Function]</a>, Previous: <a href="replace.html">replace                                                          [Function]</a>, Up: <a href="Sequences-Dictionary.html">Sequences Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/subtypep.html
@@ -0,0 +1,279 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>subtypep (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="subtypep (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="subtypep (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="type_002dof.html" rel="next" title="type-of">
+<link href="deftype.html" rel="prev" title="deftype">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="subtypep">
+<div class="nav-panel">
+<p>
+Next: <a href="type_002dof.html" accesskey="n" rel="next">type-of                                                          [Function]</a>, Previous: <a href="deftype.html" accesskey="p" rel="prev">deftype                                                             [Macro]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="subtypep-_005bFunction_005d"><span>4.4.26 subtypep                                                         [Function]<a class="copiable-link" href="#subtypep-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">subtypep</code>  <i class="i">type-1 type-2 <span class="r">&amp;optional</span> environment</i> &rArr;  <i class="i">subtype-p, valid-p</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-21"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-21"> &para;</a></span></h4>
+
+<p><i class="i">type-1</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<p><i class="i">type-2</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<p><i class="i">environment</i>&mdash;an <i class="i">environment</i> <i class="i">object</i>.
+  The default is <b class="b">nil</b>, denoting the <i class="i">null lexical environment</i>
+	   and the current <i class="i">global environment</i>.
+</p>
+<p><i class="i">subtype-p</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">valid-p</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-48"><span>Description::<a class="copiable-link" href="#Description_003a_003a-48"> &para;</a></span></h4>
+
+<p>If <i class="i">type-1</i> is a <i class="i">recognizable subtype</i> of <i class="i">type-2</i>, 
+the first <i class="i">value</i> is <i class="i">true</i>.
+Otherwise, the first <i class="i">value</i> is <i class="i">false</i>,
+indicating that either
+ <i class="i">type-1</i> is not a <i class="i">subtype</i> of <i class="i">type-2</i>, or else
+ <i class="i">type-1</i> is a <i class="i">subtype</i> of <i class="i">type-2</i> 
+  but is not a <i class="i">recognizable subtype</i>.
+</p>
+<p>A second <i class="i">value</i> is also returned indicating the &lsquo;certainty&rsquo; of 
+the first <i class="i">value</i>.  If this value is <i class="i">true</i>, then the first
+value is an accurate indication of the <i class="i">subtype</i> relationship.
+(The second <i class="i">value</i> is always <i class="i">true</i> when the first <i class="i">value</i>
+ is <i class="i">true</i>.)
+</p>
+<p>Figure 4&ndash;9 summarizes the possible combinations of <i class="i">values</i>
+that might result.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Value 1  Value 2  Meaning                                               <!-- /@w -->
+  <i class="i">true</i>     <i class="i">true</i>     <i class="i">type-1</i> is definitely a <i class="i">subtype</i> of <i class="i">type-2</i>.             <!-- /@w -->
+  <i class="i">false</i>    <i class="i">true</i>     <i class="i">type-1</i> is definitely not a <i class="i">subtype</i> of <i class="i">type-2</i>.         <!-- /@w -->
+  <i class="i">false</i>    <i class="i">false</i>    <b class="b">subtypep</b> could not determine the relationship,        <!-- /@w -->
+                    so <i class="i">type-1</i> might or might not be a <i class="i">subtype</i> of <i class="i">type-2</i>.  <!-- /@w -->
+
+               Figure 4&ndash;9: Result possibilities for subtypep             <!-- /@w -->
+
+</pre></div></div>
+
+<p><b class="b">subtypep</b> is permitted to return the 
+<i class="i">values</i> <i class="i">false</i> and <i class="i">false</i> only when at least
+one argument involves one of these <i class="i">type specifiers</i>:
+  <b class="b">and</b>,
+  <b class="b">eql</b>,
+  the list form of <b class="b">function</b>,
+  <b class="b">member</b>,
+  <b class="b">not</b>,
+  <b class="b">or</b>,
+  <b class="b">satisfies</b>,
+or
+  <b class="b">values</b>.
+(A <i class="i">type specifier</i> &lsquo;involves&rsquo; such a <i class="i">symbol</i> if, 
+ after being <i class="i">type expanded</i>,
+ it contains that <i class="i">symbol</i> in a position that would call for
+ its meaning as a <i class="i">type specifier</i> to be used.)
+One consequence of this is that if neither <i class="i">type-1</i> nor <i class="i">type-2</i>
+involves any of these <i class="i">type specifiers</i>, then <b class="b">subtypep</b> is obliged
+to determine the relationship accurately.  In particular, <b class="b">subtypep</b> 
+returns the <i class="i">values</i> <i class="i">true</i> and <i class="i">true</i>
+if the arguments are <b class="b">equal</b> and do not involve
+any of these <i class="i">type specifiers</i>.
+</p>
+<p><b class="b">subtypep</b> never returns a second value of <b class="b">nil</b> when both
+<i class="i">type-1</i> and <i class="i">type-2</i> involve only
+ the names in <i class="i">Figure~4&ndash;2</i>, or
+ names of <i class="i">types</i> defined by <b class="b">defstruct</b>,
+<b class="b">define-condition</b>,
+ or <b class="b">defclass</b>, or
+ <i class="i">derived types</i> that expand into only those names.
+While <i class="i">type specifiers</i> listed in <i class="i">Figure~4&ndash;2</i> and 
+names of <b class="b">defclass</b> and <b class="b">defstruct</b> can in some cases be
+implemented as <i class="i">derived types</i>, <b class="b">subtypep</b> regards them as primitive.
+</p>
+<p>The relationships between <i class="i">types</i> reflected by <b class="b">subtypep</b>
+are those specific to the particular implementation.  For example, if
+an implementation supports only a single type of floating-point numbers,
+in that implementation <code class="t">(subtypep 'float 'long-float)</code> 
+returns the <i class="i">values</i> <i class="i">true</i> and <i class="i">true</i> 
+(since the two <i class="i">types</i> are identical).
+</p>
+<p>For all <i class="i">T1</i> and <i class="i">T2</i> other than <code class="t">*</code>, 
+<code class="t">(array <i class="i">T1</i>)</code> and <code class="t">(array <i class="i">T2</i>)</code> 
+are two different <i class="i">type specifiers</i> that always refer to the same sets of
+things if and only if they refer to <i class="i">arrays</i>
+of exactly the same specialized representation, <i class="i">i.e.</i>, if <code class="t">(upgraded-array-element-type '<i class="i">T1</i>)</code>  and
+   <code class="t">(upgraded-array-element-type '<i class="i">T2</i>)</code> 
+return two different <i class="i">type specifiers</i> that always refer to the same sets of
+<i class="i">objects</i>.
+This is another way of saying that 
+<code class="t">`(array <i class="i">type-specifier</i>)</code>
+and
+<code class="t">`(array ,(upgraded-array-element-type '<i class="i">type-specifier</i>))</code> 
+refer to the same
+set of specialized <i class="i">array</i> representations.
+For all <i class="i">T1</i> and <i class="i">T2</i> other than <code class="t">*</code>, 
+the intersection of
+    <code class="t">(array <i class="i">T1</i>)</code>
+and <code class="t">(array <i class="i">T2</i>)</code> is the empty set
+if and only if they refer to <i class="i">arrays</i> of different,
+distinct specialized representations.  
+</p>
+<p>Therefore,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (subtypep '(array T1) '(array T2)) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<p>if and only if
+</p>
+<div class="example">
+<pre class="example-preformatted"> (upgraded-array-element-type 'T1)  and
+ (upgraded-array-element-type 'T2)  
+</pre></div>
+
+<p>return two different <i class="i">type specifiers</i> that always refer to the same sets of
+<i class="i">objects</i>.
+</p>
+<p>For all type-specifiers <i class="i">T1</i> and <i class="i">T2</i> other than <code class="t">*</code>, 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (subtypep '(complex T1) '(complex T2)) &rArr;  <i class="i">true</i>, <i class="i">true</i>
+</pre></div>
+
+<p>if:
+</p><dl class="table">
+<dt>1.</dt>
+<dd><p><code class="t">T1</code> is a <i class="i">subtype</i> of <code class="t">T2</code>, or
+</p></dd>
+<dt>2.</dt>
+<dd><p><code class="t">(upgraded-complex-part-type '<i class="i">T1</i>)</code> and
+	      <code class="t">(upgraded-complex-part-type '<i class="i">T2</i>)</code> 
+   return two different <i class="i">type specifiers</i> that always refer to the 
+   same sets of <i class="i">objects</i>; in this case,
+    <code class="t">(complex <i class="i">T1</i>)</code> and 
+    <code class="t">(complex <i class="i">T2</i>)</code> both refer to the 
+   same specialized representation.
+</p></dd>
+</dl>
+
+<p>The <i class="i">values</i> are <i class="i">false</i> and <i class="i">true</i> otherwise.
+</p>
+<p>The form
+</p>
+<div class="example">
+<pre class="example-preformatted"> (subtypep '(complex single-float) '(complex float))
+</pre></div>
+
+<p>must return <i class="i">true</i> in all implementations, but
+</p>
+<div class="example">
+<pre class="example-preformatted"> (subtypep '(array single-float) '(array float))
+</pre></div>
+
+<p>returns <i class="i">true</i> only in implementations that do not have a specialized <i class="i">array</i>
+representation for <i class="i">single floats</i> distinct from that for other <i class="i">floats</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-28"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-28"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (subtypep 'compiled-function 'function) &rArr;  <i class="i">true</i>, <i class="i">true</i>
+ (subtypep 'null 'list) &rArr;  <i class="i">true</i>, <i class="i">true</i>
+ (subtypep 'null 'symbol) &rArr;  <i class="i">true</i>, <i class="i">true</i>
+ (subtypep 'integer 'string) &rArr;  <i class="i">false</i>, <i class="i">true</i>
+ (subtypep '(satisfies dummy) nil) &rArr;  <i class="i">false</i>, <i class="i">implementation-dependent</i>
+ (subtypep '(integer 1 3) '(integer 1 4)) &rArr;  <i class="i">true</i>, <i class="i">true</i>
+ (subtypep '(integer (0) (0)) 'nil) &rArr;  <i class="i">true</i>, <i class="i">true</i>
+ (subtypep 'nil '(integer (0) (0))) &rArr;  <i class="i">true</i>, <i class="i">true</i>
+ (subtypep '(integer (0) (0)) '(member)) &rArr;  <i class="i">true</i>, <i class="i">true</i> ;or <i class="i">false</i>, <i class="i">false</i>
+ (subtypep '(member) 'nil) &rArr;  <i class="i">true</i>, <i class="i">true</i> ;or <i class="i">false</i>, <i class="i">false</i>
+ (subtypep 'nil '(member)) &rArr;  <i class="i">true</i>, <i class="i">true</i> ;or <i class="i">false</i>, <i class="i">false</i>
+</pre></div>
+
+<p>Let <code class="t">&lt;aet-x&gt;</code> and <code class="t">&lt;aet-y&gt;</code> be two distinct <i class="i">type specifiers</i> that 
+do not always refer to the same sets of
+<i class="i">objects</i>
+in a given implementation, but for which
+<b class="b">make-array</b>, will return an 
+<i class="i">object</i> of the same <i class="i">array</i> <i class="i">type</i>.
+</p>
+<p>Thus, in each case, 
+</p>
+<div class="example">
+<pre class="example-preformatted">  (subtypep (array-element-type (make-array 0 :element-type '&lt;aet-x&gt;))
+            (array-element-type (make-array 0 :element-type '&lt;aet-y&gt;)))
+&rArr;  <i class="i">true</i>, <i class="i">true</i>
+
+  (subtypep (array-element-type (make-array 0 :element-type '&lt;aet-y&gt;))
+            (array-element-type (make-array 0 :element-type '&lt;aet-x&gt;)))
+&rArr;  <i class="i">true</i>, <i class="i">true</i>
+</pre></div>
+
+<p>If  <code class="t">(array &lt;aet-x&gt;)</code> 
+and <code class="t">(array &lt;aet-y&gt;)</code> are different names for
+exactly the same set of <i class="i">objects</i>, 
+these names should always refer to the same sets of
+<i class="i">objects</i>.
+ That implies that the following set of tests are also true:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (subtypep '(array &lt;aet-x&gt;) '(array &lt;aet-y&gt;)) &rArr;  <i class="i">true</i>, <i class="i">true</i>
+ (subtypep '(array &lt;aet-y&gt;) '(array &lt;aet-x&gt;)) &rArr;  <i class="i">true</i>, <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-35"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-35"> &para;</a></span></h4>
+
+<p><a class="ref" href="Types.html">Types</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-21"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-21"> &para;</a></span></h4>
+
+<p>The small differences between the <b class="b">subtypep</b> specification for
+the <b class="b">array</b> and <b class="b">complex</b> types are necessary because there 
+is no creation function for <i class="i">complexes</i> which allows 
+the specification of the resultant part type independently of
+the actual types of the parts.  Thus in the case of the <i class="i">type</i> <b class="b">complex</b>,
+the actual type of the parts is referred to, although a <i class="i">number</i> 
+can be a member of more than one <i class="i">type</i>.
+For example, <code class="t">17</code> is of <i class="i">type</i> <code class="t">(mod 18)</code> 
+as well as <i class="i">type</i> <code class="t">(mod 256)</code> and <i class="i">type</i> <b class="b">integer</b>;
+and <code class="t">2.3f5</code> is of <i class="i">type</i> <b class="b">single-float</b> 
+as well as <i class="i">type</i> <b class="b">float</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="type_002dof.html">type-of                                                          [Function]</a>, Previous: <a href="deftype.html">deftype                                                             [Macro]</a>, Up: <a href="Types-and-Classes-Dictionary.html">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/svref.html
@@ -0,0 +1,92 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>svref (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="svref (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="svref (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="vector.html" rel="next" title="vector">
+<link href="simple_002dvector_002dp.html" rel="prev" title="simple-vector-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="svref">
+<div class="nav-panel">
+<p>
+Next: <a href="vector.html" accesskey="n" rel="next">vector                                                           [Function]</a>, Previous: <a href="simple_002dvector_002dp.html" accesskey="p" rel="prev">simple-vector-p                                                  [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="svref-_005bAccessor_005d"><span>15.2.28 svref                                                            [Accessor]<a class="copiable-link" href="#svref-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">svref</code>  <i class="i">simple-vector index</i> &rArr;  <i class="i">element</i>
+</p>
+<p>(setf (<code class="code">         svref</code> <i class="i">simple-vector index</i>) new-element)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-337"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-337"> &para;</a></span></h4>
+
+<p><i class="i">simple-vector</i>&mdash;a <i class="i">simple vector</i>.
+</p>
+<p><i class="i">index</i>&mdash;a <i class="i">valid array index</i> for the <i class="i">simple-vector</i>.
+</p>
+<p><i class="i">element</i>, <i class="i">new-element</i>&mdash;an <i class="i">object</i>
+  (whose <i class="i">type</i> is a <i class="i">subtype</i> 
+   of the <i class="i">array element type</i> of the <i class="i">simple-vector</i>).
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-447"><span>Description::<a class="copiable-link" href="#Description_003a_003a-447"> &para;</a></span></h4>
+
+<p><i class="i">Accesses</i> the <i class="i">element</i> of <i class="i">simple-vector</i> specified by <i class="i">index</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-319"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-319"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (simple-vector-p (setq v (vector 1 2 'sirens))) &rArr;  <i class="i">true</i>
+ (svref v 0) &rArr;  1
+ (svref v 2) &rArr;  SIRENS
+ (setf (svref v 1) 'newcomer) &rArr;  NEWCOMER               
+ v &rArr;  #(1 NEWCOMER SIRENS)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-367"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-367"> &para;</a></span></h4>
+
+<p><a class="ref" href="aref.html">aref                                                             [Accessor]</a>
+,
+<b class="b">sbit</b>,
+<b class="b">schar</b>,
+<a class="ref" href="vector.html">vector                                                           [Function]</a>
+,
+</p>
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-244"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-244"> &para;</a></span></h4>
+
+<p><b class="b">svref</b> is identical to <b class="b">aref</b> 
+except that it requires its first argument to be a <i class="i">simple vector</i>.  
+</p>
+<div class="example">
+<pre class="example-preformatted"> (svref <i class="i">v</i> <i class="i">i</i>) &equiv; (aref (the simple-vector <i class="i">v</i>) <i class="i">i</i>)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/sxhash.html
@@ -0,0 +1,152 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>sxhash (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="sxhash (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="sxhash (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Tables-Dictionary.html" rel="up" title="Hash Tables Dictionary">
+<link href="clrhash.html" rel="prev" title="clrhash">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="sxhash">
+<div class="nav-panel">
+<p>
+Previous: <a href="clrhash.html" accesskey="p" rel="prev">clrhash                                                          [Function]</a>, Up: <a href="Hash-Tables-Dictionary.html" accesskey="u" rel="up">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="sxhash-_005bFunction_005d"><span>18.2.14 sxhash                                                           [Function]<a class="copiable-link" href="#sxhash-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">sxhash</code>  <i class="i">object</i> &rArr;  <i class="i">hash-code</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-388"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-388"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">hash-code</i>&mdash;a non-negative <i class="i">fixnum</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-504"><span>Description::<a class="copiable-link" href="#Description_003a_003a-504"> &para;</a></span></h4>
+
+<p><b class="b">sxhash</b> returns a hash code for <i class="i">object</i>. 
+</p>
+<p>The manner in which the hash code is computed is <i class="i">implementation-dependent</i>,
+but subject to certain constraints:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p><code class="t">(equal <i class="i">x</i> <i class="i">y</i>)</code> implies <code class="t">(= (sxhash <i class="i">x</i>) (sxhash <i class="i">y</i>))</code>.
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p>For any two <i class="i">objects</i>, <i class="i">x</i> and <i class="i">y</i>,
+       both of which are 
+          <i class="i">bit vectors</i>,
+          <i class="i">characters</i>, 
+          <i class="i">conses</i>,
+          <i class="i">numbers</i>,
+          <i class="i">pathnames</i>,
+          <i class="i">strings</i>,
+       or <i class="i">symbols</i>,
+   and which are <i class="i">similar</i>,
+   <code class="t">(sxhash <i class="i">x</i>)</code> and <code class="t">(sxhash <i class="i">y</i>)</code>
+   <i class="i">yield</i> the same mathematical value 
+   even if <i class="i">x</i> and <i class="i">y</i> exist in different <i class="i">Lisp images</i> of
+   the same <i class="i">implementation</i>.
+   See <a class="ref" href="Literal-Objects-in-Compiled-Files.html">Literal Objects in Compiled Files</a>.
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>The <i class="i">hash-code</i> for an <i class="i">object</i> is always the <i class="i">same</i>
+  within a single <i class="i">session</i> provided that the <i class="i">object</i> is not
+  visibly modified with regard to the equivalence test <b class="b">equal</b>.
+  See <a class="ref" href="Modifying-Hash-Table-Keys.html">Modifying Hash Table Keys</a>.
+</p>
+</dd>
+<dt>4.</dt>
+<dd><p>The <i class="i">hash-code</i> is intended for hashing.  This places no verifiable
+  constraint on a <i class="i">conforming implementation</i>, but the intent is that
+  an <i class="i">implementation</i> should make a good-faith effort to produce
+  <i class="i">hash-codes</i> that are well distributed within the range of
+  non-negative <i class="i">fixnums</i>.
+</p>
+</dd>
+<dt>5.</dt>
+<dd><p>Computation of the <i class="i">hash-code</i> must terminate, 
+  even if the <i class="i">object</i> contains circularities.  
+</p></dd>
+</dl>
+
+<h4 class="subsubheading" id="Examples_003a_003a-368"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-368"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (= (sxhash (list 'list &quot;ab&quot;)) (sxhash (list 'list &quot;ab&quot;))) &rArr;  <i class="i">true</i>
+ (= (sxhash &quot;a&quot;) (sxhash (make-string 1 :initial-element #\a))) &rArr;  <i class="i">true</i>
+ (let ((r (make-random-state)))
+   (= (sxhash r) (sxhash (make-random-state r))))
+&rArr;  <i class="i">implementation-dependent</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-71"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-71"> &para;</a></span></h4>
+
+<p>The <i class="i">implementation</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-274"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-274"> &para;</a></span></h4>
+
+<p>Many common hashing needs are satisfied by <b class="b">make-hash-table</b> and the
+related functions on <i class="i">hash tables</i>.  <b class="b">sxhash</b> is intended for use
+where the pre-defined abstractions are insufficient.  Its main intent is to
+allow the user a convenient means of implementing more complicated hashing
+paradigms than are provided through <i class="i">hash tables</i>.
+</p>
+<p>The hash codes returned by <b class="b">sxhash</b> are not necessarily related to 
+any hashing strategy used by any other <i class="i">function</i> in <span class="r">Common Lisp</span>.
+</p>
+<p>For <i class="i">objects</i> of <i class="i">types</i> that <b class="b">equal</b> compares 
+with <b class="b">eq</b>, item 3 requires that the <i class="i">hash-code</i> be
+based on some immutable quality of the identity of the object.
+Another legitimate implementation technique would be to have 
+<b class="b">sxhash</b> assign (and cache) a random hash code for these
+<i class="i">objects</i>, since there is no requirement that <i class="i">similar</i> but
+non-<b class="b">eq</b> objects have the same hash code.
+</p>
+<p>Although <i class="i">similarity</i> is defined for <i class="i">symbols</i> in terms
+of both the <i class="i">symbol</i>&rsquo;s <i class="i">name</i> and the <i class="i">packages</i> in which 
+the <i class="i">symbol</i> is <i class="i">accessible</i>, item 3 disallows using <i class="i">package</i>
+information to compute the hash code, since changes to the package status 
+of a symbol are not visible to <i class="i">equal</i>.
+</p>
+
+
+
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="clrhash.html">clrhash                                                          [Function]</a>, Up: <a href="Hash-Tables-Dictionary.html">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/symbol.html
@@ -0,0 +1,178 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>symbol (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="symbol (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="symbol (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="keyword.html" rel="next" title="keyword">
+<link href="Symbols-Dictionary.html" rel="prev" title="Symbols Dictionary">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="symbol">
+<div class="nav-panel">
+<p>
+Next: <a href="keyword.html" accesskey="n" rel="next">keyword                                                              [Type]</a>, Previous: <a href="Symbols-Dictionary.html" accesskey="p" rel="prev">Symbols Dictionary</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="symbol-_005bSystem-Class_005d"><span>10.2.1 symbol                                                       [System Class]<a class="copiable-link" href="#symbol-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-31"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-31"> &para;</a></span></h4>
+<p><b class="b">symbol</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-217"><span>Description::<a class="copiable-link" href="#Description_003a_003a-217"> &para;</a></span></h4>
+
+<p><i class="i">Symbols</i> are used for their <i class="i">object</i> identity to name various entities
+in <span class="r">Common Lisp</span>, including (but not limited to) linguistic entities such as
+<i class="i">variables</i> and <i class="i">functions</i>.
+</p>
+<p><i class="i">Symbols</i> can be collected together into <i class="i">packages</i>.
+A <i class="i">symbol</i> is said to be <i class="i">interned</i> in a <i class="i">package</i> 
+if it is <i class="i">accessible</i> in that <i class="i">package</i>;
+the same <i class="i">symbol</i> can be <i class="i">interned</i> in more than one <i class="i">package</i>.
+If a <i class="i">symbol</i> is not <i class="i">interned</i> in any <i class="i">package</i>, 
+it is called <i class="i">uninterned</i>.
+</p>
+<p>An <i class="i">interned</i> <i class="i">symbol</i> is uniquely identifiable by its <i class="i">name</i> from 
+any <i class="i">package</i> in which it is <i class="i">accessible</i>.
+</p>
+<p><i class="i">Symbols</i> have the following attributes. For historically reasons,
+these are sometimes referred to as <i class="i">cells</i>, although the actual
+internal representation of <i class="i">symbols</i> and their attributes is
+<i class="i">implementation-dependent</i>.
+</p>
+<dl class="table">
+<dt><b class="b">Name</b></dt>
+<dd><p>The <i class="i">name</i> of a <i class="i">symbol</i> is a <i class="i">string</i> used to identify the <i class="i">symbol</i>.
+Every <i class="i">symbol</i> has a <i class="i">name</i>, 
+</p>
+<p>and the consequences are undefined if that <i class="i">name</i> is altered.  
+</p>
+<p>The <i class="i">name</i> is used as part of the external, printed representation of
+the <i class="i">symbol</i>; see <a class="ref" href="Character-Syntax.html">Character Syntax</a>.
+The <i class="i">function</i> <b class="b">symbol-name</b> returns the <i class="i">name</i> of a given <i class="i">symbol</i>.
+</p>
+<p>A <i class="i">symbol</i> may have any <i class="i">character</i> in its <i class="i">name</i>.
+</p>
+</dd>
+<dt><b class="b">Package</b></dt>
+<dd><p>The <i class="i">object</i> in this <i class="i">cell</i> is called the <i class="i">home package</i> 
+of the <i class="i">symbol</i>.  If the <i class="i">home package</i> is <b class="b">nil</b>, the <i class="i">symbol</i>
+is sometimes said to have no <i class="i">home package</i>.
+</p>
+<p>When a <i class="i">symbol</i> is first created, it has no <i class="i">home package</i>.
+When it is first <i class="i">interned</i>, the <i class="i">package</i> in which it is
+initially <i class="i">interned</i> becomes its <i class="i">home package</i>.
+The <i class="i">home package</i> of a <i class="i">symbol</i> can be <i class="i">accessed</i>
+by using the <i class="i">function</i> <b class="b">symbol-package</b>.
+</p>
+<p>If a <i class="i">symbol</i> is <i class="i">uninterned</i> from the <i class="i">package</i> 
+which is its <i class="i">home package</i>, its <i class="i">home package</i> is set to <b class="b">nil</b>.
+Depending on whether there is another <i class="i">package</i> in which the <i class="i">symbol</i>
+is <i class="i">interned</i>, the symbol might or might not really be an <i class="i">uninterned</i> <i class="i">symbol</i>.
+A <i class="i">symbol</i> with no <i class="i">home package</i> is therefore called 
+<i class="i">apparently uninterned</i>.
+</p>
+<p>The consequences are undefined if an attempt is made to alter the <i class="i">home package</i>
+of a <i class="i">symbol</i> 
+external
+in the <code class="t">COMMON-LISP</code> <i class="i">package</i> or the <code class="t">KEYWORD</code> <i class="i">package</i>.
+</p>
+</dd>
+<dt><b class="b">Property list</b></dt>
+<dd><p>The <i class="i">property list</i> of a <i class="i">symbol</i> provides a mechanism for
+associating named attributes with that <i class="i">symbol</i>.
+The operations for adding and removing entries are <i class="i">destructive</i>
+to the <i class="i">property list</i>.  <span class="r">Common Lisp</span> provides <i class="i">operators</i> both for
+direct manipulation of <i class="i">property list</i> <i class="i">objects</i> 
+ (<i class="i">e.g.</i>, see <b class="b">getf</b>, <b class="b">remf</b>, and <b class="b">symbol-plist</b>)
+and for implicit manipulation of a <i class="i">symbol</i>&rsquo;s <i class="i">property list</i> 
+by reference to the <i class="i">symbol</i> 
+ (<i class="i">e.g.</i>, see <b class="b">get</b> and <b class="b">remprop</b>).
+The <i class="i">property list</i> associated with a <i class="i">fresh</i> <i class="i">symbol</i> is 
+initially <i class="i">null</i>.
+</p>
+</dd>
+<dt><b class="b">Value</b></dt>
+<dd><p>If a symbol has a value attribute, it is said to be <i class="i">bound</i>,
+and that fact can be detected by the <i class="i">function</i> <b class="b">boundp</b>.
+The <i class="i">object</i> contained in the <i class="i">value cell</i> of a <i class="i">bound</i> <i class="i">symbol</i>
+is the <i class="i">value</i> of the <i class="i">global variable</i> named by that <i class="i">symbol</i>, 
+and can be <i class="i">accessed</i> by the <i class="i">function</i> <b class="b">symbol-value</b>.
+A <i class="i">symbol</i> can be made to be <i class="i">unbound</i> by the <i class="i">function</i> <b class="b">makunbound</b>.
+</p>
+<p>The consequences are undefined if an attempt is made to change the <i class="i">value</i>
+of a <i class="i">symbol</i> that names a <i class="i">constant variable</i>, or to make such a 
+<i class="i">symbol</i> be <i class="i">unbound</i>.
+</p>
+</dd>
+<dt><b class="b">Function</b></dt>
+<dd><p>If a symbol has a function attribute, it is said to be <i class="i">fbound</i>,
+and that fact can be detected by the <i class="i">function</i> <b class="b">fboundp</b>.
+If the <i class="i">symbol</i> is the <i class="i">name</i> of a <i class="i">function</i> in the <i class="i">global environment</i>,
+the <i class="i">function cell</i> contains the <i class="i">function</i>, 
+and can be <i class="i">accessed</i> by the <i class="i">function</i> <b class="b">symbol-function</b>.
+If the <i class="i">symbol</i> is the <i class="i">name</i> of either
+   a <i class="i">macro</i> in the <i class="i">global environment</i> (see <b class="b">macro-function</b>)
+or a <i class="i">special operator</i> (see <b class="b">special-operator-p</b>),
+the <i class="i">symbol</i> is <i class="i">fbound</i>, 
+and can be <i class="i">accessed</i> by the <i class="i">function</i> <b class="b">symbol-function</b>,
+but the <i class="i">object</i> which the <i class="i">function cell</i>
+contains is of <i class="i">implementation-dependent</i> <i class="i">type</i> and purpose.
+A <i class="i">symbol</i> can be made to be <i class="i">funbound</i> by the <i class="i">function</i> <b class="b">fmakunbound</b>.
+</p>
+<p>The consequences are undefined if an attempt is made to change the <i class="i">functional value</i>
+of a <i class="i">symbol</i> that names a <i class="i">special form</i>.
+</p>
+</dd>
+</dl>
+
+<p>Operations on a <i class="i">symbol</i>&rsquo;s <i class="i">value cell</i> and <i class="i">function cell</i> are
+sometimes described in terms of their effect on the <i class="i">symbol</i> itself, but 
+the user should keep in mind that there is an intimate relationship between the
+contents of those <i class="i">cells</i> and the <i class="i">global variable</i> or 
+global <i class="i">function</i> definition, respectively.
+</p>
+<p><i class="i">Symbols</i> are used as identifiers for <i class="i">lexical variables</i> and 
+lexical <i class="i">function</i> definitions, but in that role, only their <i class="i">object</i>
+identity is significant.  <span class="r">Common Lisp</span> provides no operation on a <i class="i">symbol</i> that
+can have any effect on a <i class="i">lexical variable</i> or 
+on a lexical <i class="i">function</i> definition.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-191"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-191"> &para;</a></span></h4>
+
+<p><a class="ref" href="Symbols-as-Tokens.html">Symbols as Tokens</a>,
+<a class="ref" href="Potential-Numbers-as-Tokens.html">Potential Numbers as Tokens</a>,
+<a class="ref" href="Printing-Symbols.html">Printing Symbols</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="keyword.html">keyword                                                              [Type]</a>, Previous: <a href="Symbols-Dictionary.html">Symbols Dictionary</a>, Up: <a href="Symbols-Dictionary.html">Symbols Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/symbol_002dfunction.html
@@ -0,0 +1,150 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>symbol-function (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="symbol-function (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="symbol-function (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="symbol_002dname.html" rel="next" title="symbol-name">
+<link href="gentemp.html" rel="prev" title="gentemp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="symbol_002dfunction">
+<div class="nav-panel">
+<p>
+Next: <a href="symbol_002dname.html" accesskey="n" rel="next">symbol-name                                                      [Function]</a>, Previous: <a href="gentemp.html" accesskey="p" rel="prev">gentemp                                                          [Function]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="symbol_002dfunction-_005bAccessor_005d"><span>10.2.10 symbol-function                                                  [Accessor]<a class="copiable-link" href="#symbol_002dfunction-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">symbol-function</code>  <i class="i">symbol</i> &rArr;  <i class="i">contents</i>
+</p>
+<p>(setf (<code class="code">         symbol-function</code> <i class="i">symbol</i>) new-contents)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-164"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-164"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">contents</i>&mdash;
+</p>
+<p>If the <i class="i">symbol</i> is globally defined as a <i class="i">macro</i> or a <i class="i">special operator</i>,
+an <i class="i">object</i> of <i class="i">implementation-dependent</i> nature and identity is returned.
+If the <i class="i">symbol</i> is not globally defined as 
+ either a <i class="i">macro</i> or a <i class="i">special operator</i>,
+and
+ if the <i class="i">symbol</i> is <i class="i">fbound</i>,
+a <i class="i">function</i> <i class="i">object</i> is returned.
+</p>
+<p><i class="i">new-contents</i>&mdash;a <i class="i">function</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-226"><span>Description::<a class="copiable-link" href="#Description_003a_003a-226"> &para;</a></span></h4>
+
+<p><i class="i">Accesses</i> the <i class="i">symbol</i>&rsquo;s <i class="i">function cell</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-147"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-147"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (symbol-function 'car) &rArr;  #&lt;FUNCTION CAR&gt;
+ (symbol-function 'twice) is an error   ;because TWICE isn't defined.
+ (defun twice (n) (* n 2)) &rArr;  TWICE
+ (symbol-function 'twice) &rArr;  #&lt;FUNCTION TWICE&gt;
+ (list (twice 3)
+       (funcall (function twice) 3)
+       (funcall (symbol-function 'twice) 3))
+&rArr;  (6 6 6)
+ (flet ((twice (x) (list x x)))
+   (list (twice 3)
+         (funcall (function twice) 3)
+         (funcall (symbol-function 'twice) 3)))
+&rArr;  ((3 3) (3 3) 6)   
+ (setf (symbol-function 'twice) #'(lambda (x) (list x x)))
+&rArr;  #&lt;FUNCTION anonymous&gt;
+ (list (twice 3)
+       (funcall (function twice) 3)
+       (funcall (symbol-function 'twice) 3))
+&rArr;  ((3 3) (3 3) (3 3))
+ (fboundp 'defun) &rArr;  <i class="i">true</i>
+ (symbol-function 'defun)
+&rArr;  <i class="i">implementation-dependent</i>
+ (functionp (symbol-function 'defun))
+&rArr;  <i class="i">implementation-dependent</i>
+ (defun symbol-function-or-nil (symbol)
+   (if (and (fboundp symbol) 
+            (not (macro-function symbol))
+            (not (special-operator-p symbol)))
+       (symbol-function symbol)
+       nil)) &rArr;  SYMBOL-FUNCTION-OR-NIL
+ (symbol-function-or-nil 'car) &rArr;  #&lt;FUNCTION CAR&gt;
+ (symbol-function-or-nil 'defun) &rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-39"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-39"> &para;</a></span></h4>
+
+<p><b class="b">defun</b>
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-54"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-54"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">symbol</i> is not a <i class="i">symbol</i>.
+</p>
+<p>Should signal <b class="b">undefined-function</b> if <i class="i">symbol</i> is not <i class="i">fbound</i>
+and an attempt is made to <i class="i">read</i> its definition.  (No such error is signaled
+on an attempt to <i class="i">write</i> its definition.)
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-200"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-200"> &para;</a></span></h4>
+
+<p><a class="ref" href="fboundp.html">fboundp                                                          [Function]</a>
+,
+<a class="ref" href="fmakunbound.html">fmakunbound                                                      [Function]</a>
+,
+<a class="ref" href="macro_002dfunction.html">macro-function                                                   [Accessor]</a>
+,
+</p>
+<p><a class="ref" href="special_002doperator_002dp.html">special-operator-p                                               [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-121"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-121"> &para;</a></span></h4>
+<p><b class="b">symbol-function</b> cannot <i class="i">access</i> the value of a lexical function name
+produced by <b class="b">flet</b> or <b class="b">labels</b>; it can <i class="i">access</i> only
+the global function value.
+</p>
+<p><b class="b">setf</b> may be used with 
+<b class="b">symbol-function</b> to replace a global function
+definition when the <i class="i">symbol</i>&rsquo;s function definition 
+does not represent a <i class="i">special operator</i>.
+</p>
+<div class="example">
+<pre class="example-preformatted">(symbol-function <i class="i">symbol</i>) &equiv; (fdefinition <i class="i">symbol</i>)
+</pre></div>
+
+<p>However, <b class="b">fdefinition</b> accepts arguments other than just <i class="i">symbols</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="symbol_002dname.html">symbol-name                                                      [Function]</a>, Previous: <a href="gentemp.html">gentemp                                                          [Function]</a>, Up: <a href="Symbols-Dictionary.html">Symbols Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/symbol_002dmacrolet.html
@@ -0,0 +1,147 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>symbol-macrolet (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="symbol-macrolet (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="symbol-macrolet (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="_002amacroexpand_002dhook_002a.html" rel="next" title="*macroexpand-hook*">
+<link href="define_002dsymbol_002dmacro.html" rel="prev" title="define-symbol-macro">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="symbol_002dmacrolet">
+<div class="nav-panel">
+<p>
+Next: <a href="_002amacroexpand_002dhook_002a.html" accesskey="n" rel="next">*macroexpand-hook*                                               [Variable]</a>, Previous: <a href="define_002dsymbol_002dmacro.html" accesskey="p" rel="prev">define-symbol-macro                                                 [Macro]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="symbol_002dmacrolet-_005bSpecial-Operator_005d"><span>3.8.14 symbol-macrolet                                          [Special Operator]<a class="copiable-link" href="#symbol_002dmacrolet-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">symbol-macrolet</code>  <i class="i"><span class="r">(</span>{<span class="r">(</span>symbol expansion <span class="r">)</span>}*<span class="r">)</span>
+			   {<i class="i">declaration</i>}* 
+			   {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-12"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-12"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">expansion</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-13"><span>Description::<a class="copiable-link" href="#Description_003a_003a-13"> &para;</a></span></h4>
+
+<p><b class="b">symbol-macrolet</b> provides a mechanism for 
+affecting the <i class="i">macro expansion</i> environment for <i class="i">symbols</i>.
+</p>
+<p><b class="b">symbol-macrolet</b> lexically establishes expansion functions
+for each of the <i class="i">symbol macros</i> named by <i class="i">symbols</i>.
+</p>
+<p>The only guaranteed property of an expansion <i class="i">function</i> for a <i class="i">symbol macro</i>
+is that when it is applied to the <i class="i">form</i> and the <i class="i">environment</i> it returns
+the correct expansion.  (In particular, it is <i class="i">implementation-dependent</i> 
+whether the expansion is conceptually stored in the expansion function,
+the <i class="i">environment</i>, or both.)
+</p>
+<p>Each reference to <i class="i">symbol</i> as a variable within the lexical <i class="i">scope</i>
+of <b class="b">symbol-macrolet</b> is expanded by the normal macro expansion process;
+see <a class="ref" href="Symbols-as-Forms.html">Symbols as Forms</a>.
+The expansion of a symbol macro is subject to further macro expansion
+in the same lexical environment as the symbol macro invocation, exactly 
+analogous to normal <i class="i">macros</i>.
+</p>
+<p>Exactly the same <i class="i">declarations</i> are allowed as for <b class="b">let</b>
+with one exception: <b class="b">symbol-macrolet</b> signals an error
+if a <b class="b">special</b> declaration names one of the <i class="i">symbols</i> 
+being defined by <b class="b">symbol-macrolet</b>.  
+</p>
+<p>When the <i class="i">forms</i> of the <b class="b">symbol-macrolet</b> form are expanded, 
+any use of <b class="b">setq</b> to set the value of one of the specified variables 
+ is treated as if it were a <b class="b">setf</b>.
+<b class="b">psetq</b> of a <i class="i">symbol</i> defined as a symbol macro 
+ is treated as if it were a <b class="b">psetf</b>, and
+<b class="b">multiple-value-setq</b> 
+ is treated as if it were a <b class="b">setf</b> of <b class="b">values</b>.
+</p>
+<p>The use of <b class="b">symbol-macrolet</b> can be shadowed by <b class="b">let</b>.
+In other words, <b class="b">symbol-macrolet</b> only substitutes for occurrences
+of <i class="i">symbol</i> that would be in the <i class="i">scope</i> of a lexical binding of
+<i class="i">symbol</i> surrounding the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-11"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-11"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;;; The following is equivalent to
+;;;   (list 'foo (let ((x 'bar)) x)),
+;;; not
+;;;   (list 'foo (let (('foo 'bar)) 'foo))
+ (symbol-macrolet ((x 'foo))
+   (list x (let ((x 'bar)) x))) 
+&rArr;  (foo bar)
+<i class="i">NOT</i>&rArr; (foo foo) 
+
+ (symbol-macrolet ((x '(foo x)))
+   (list x))
+&rArr;  ((FOO X))
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-4"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-4"> &para;</a></span></h4>
+
+<p>If an attempt is made to bind a <i class="i">symbol</i> that is defined as a <i class="i">global variable</i>,
+an error of <i class="i">type</i> <b class="b">program-error</b> is signaled.
+</p>
+<p>If <i class="i">declaration</i> contains a <b class="b">special</b> declaration 
+that names one of the <i class="i">symbols</i> being bound by <b class="b">symbol-macrolet</b>,
+an error of <i class="i">type</i> <b class="b">program-error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-13"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-13"> &para;</a></span></h4>
+
+<p><a class="ref" href="with_002dslots.html">with-slots                                                          [Macro]</a>
+, 
+<a class="ref" href="macroexpand.html">macroexpand, macroexpand-1                                       [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-9"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-9"> &para;</a></span></h4>
+
+<p>The special form <b class="b">symbol-macrolet</b> is the basic mechanism that is used to
+implement <b class="b">with-slots</b>.
+</p>
+<p>If a <b class="b">symbol-macrolet</b> <i class="i">form</i> is a <i class="i">top level form</i>,
+the <i class="i">forms</i> are also processed as <i class="i">top level forms</i>.
+See <a class="ref" href="File-Compilation.html">File Compilation</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002amacroexpand_002dhook_002a.html">*macroexpand-hook*                                               [Variable]</a>, Previous: <a href="define_002dsymbol_002dmacro.html">define-symbol-macro                                                 [Macro]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/symbol_002dname.html
@@ -0,0 +1,71 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>symbol-name (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="symbol-name (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="symbol-name (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="symbol_002dpackage.html" rel="next" title="symbol-package">
+<link href="symbol_002dfunction.html" rel="prev" title="symbol-function">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="symbol_002dname">
+<div class="nav-panel">
+<p>
+Next: <a href="symbol_002dpackage.html" accesskey="n" rel="next">symbol-package                                                   [Function]</a>, Previous: <a href="symbol_002dfunction.html" accesskey="p" rel="prev">symbol-function                                                  [Accessor]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="symbol_002dname-_005bFunction_005d"><span>10.2.11 symbol-name                                                      [Function]<a class="copiable-link" href="#symbol_002dname-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">symbol-name</code>  <i class="i">symbol</i> &rArr;  <i class="i">name</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-165"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-165"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">name</i>&mdash;a <i class="i">string</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-227"><span>Description::<a class="copiable-link" href="#Description_003a_003a-227"> &para;</a></span></h4>
+
+<p><b class="b">symbol-name</b> returns the <i class="i">name</i> of <i class="i">symbol</i>.
+</p>
+<p>The consequences are undefined if <i class="i">name</i> is ever modified.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-148"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-148"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (symbol-name 'temp) &rArr;  &quot;TEMP&quot; 
+ (symbol-name :start) &rArr;  &quot;START&quot;
+ (symbol-name (gensym)) &rArr;  &quot;G1234&quot; ;for example
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-55"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-55"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">symbol</i> is not a <i class="i">symbol</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/symbol_002dpackage.html
@@ -0,0 +1,99 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>symbol-package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="symbol-package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="symbol-package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="symbol_002dplist.html" rel="next" title="symbol-plist">
+<link href="symbol_002dname.html" rel="prev" title="symbol-name">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="symbol_002dpackage">
+<div class="nav-panel">
+<p>
+Next: <a href="symbol_002dplist.html" accesskey="n" rel="next">symbol-plist                                                     [Accessor]</a>, Previous: <a href="symbol_002dname.html" accesskey="p" rel="prev">symbol-name                                                      [Function]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="symbol_002dpackage-_005bFunction_005d"><span>10.2.12 symbol-package                                                   [Function]<a class="copiable-link" href="#symbol_002dpackage-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">symbol-package</code>  <i class="i">symbol</i> &rArr;  <i class="i">contents</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-166"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-166"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">contents</i>&mdash;a <i class="i">package</i> <i class="i">object</i> or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-228"><span>Description::<a class="copiable-link" href="#Description_003a_003a-228"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">home package</i> of <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-149"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-149"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (in-package &quot;CL-USER&quot;) &rArr;  #&lt;PACKAGE &quot;COMMON-LISP-USER&quot;&gt;
+ (symbol-package 'car) &rArr;  #&lt;PACKAGE &quot;COMMON-LISP&quot;&gt;
+ (symbol-package 'bus) &rArr;  #&lt;PACKAGE &quot;COMMON-LISP-USER&quot;&gt;
+ (symbol-package :optional) &rArr;  #&lt;PACKAGE &quot;KEYWORD&quot;&gt;
+ ;; Gensyms are uninterned, so have no home package.
+ (symbol-package (gensym)) &rArr;  NIL
+ (make-package 'pk1) &rArr;  #&lt;PACKAGE &quot;PK1&quot;&gt;
+ (intern &quot;SAMPLE1&quot; &quot;PK1&quot;) &rArr;  PK1::SAMPLE1, NIL
+ (export (find-symbol &quot;SAMPLE1&quot; &quot;PK1&quot;) &quot;PK1&quot;) &rArr;  T
+ (make-package 'pk2 :use '(pk1)) &rArr;  #&lt;PACKAGE &quot;PK2&quot;&gt;
+ (find-symbol &quot;SAMPLE1&quot; &quot;PK2&quot;) &rArr;  PK1:SAMPLE1, :INHERITED
+ (symbol-package 'pk1::sample1) &rArr;  #&lt;PACKAGE &quot;PK1&quot;&gt;
+ (symbol-package 'pk2::sample1) &rArr;  #&lt;PACKAGE &quot;PK1&quot;&gt;
+ (symbol-package 'pk1::sample2) &rArr;  #&lt;PACKAGE &quot;PK1&quot;&gt;
+ (symbol-package 'pk2::sample2) &rArr;  #&lt;PACKAGE &quot;PK2&quot;&gt;
+ ;; The next several forms create a scenario in which a symbol
+ ;; is not really uninterned, but is &quot;apparently uninterned&quot;,
+ ;; and so SYMBOL-PACKAGE still returns NIL.
+ (setq s3 'pk1::sample3) &rArr;  PK1::SAMPLE3
+ (import s3 'pk2) &rArr;  T
+ (unintern s3 'pk1) &rArr;  T
+ (symbol-package s3) &rArr;  NIL
+ (eq s3 'pk2::sample3) &rArr;  T
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-40"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-40"> &para;</a></span></h4>
+
+<p><b class="b">import</b>,
+<b class="b">intern</b>,
+<b class="b">unintern</b>
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-56"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-56"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">symbol</i> is not a <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-201"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-201"> &para;</a></span></h4>
+
+<p><a class="ref" href="intern.html">intern                                                           [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/symbol_002dplist.html
@@ -0,0 +1,88 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>symbol-plist (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="symbol-plist (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="symbol-plist (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="symbol_002dvalue.html" rel="next" title="symbol-value">
+<link href="symbol_002dpackage.html" rel="prev" title="symbol-package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="symbol_002dplist">
+<div class="nav-panel">
+<p>
+Next: <a href="symbol_002dvalue.html" accesskey="n" rel="next">symbol-value                                                     [Accessor]</a>, Previous: <a href="symbol_002dpackage.html" accesskey="p" rel="prev">symbol-package                                                   [Function]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="symbol_002dplist-_005bAccessor_005d"><span>10.2.13 symbol-plist                                                     [Accessor]<a class="copiable-link" href="#symbol_002dplist-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">symbol-plist</code>  <i class="i">symbol</i> &rArr;  <i class="i">plist</i>
+</p>
+<p>(setf (<code class="code">         symbol-plist</code> <i class="i">symbol</i>) new-plist)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-167"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-167"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">plist</i>, <i class="i">new-plist</i>&mdash;a <i class="i">property list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-229"><span>Description::<a class="copiable-link" href="#Description_003a_003a-229"> &para;</a></span></h4>
+
+<p><i class="i">Accesses</i> the <i class="i">property list</i> of <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-150"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-150"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq sym (gensym)) &rArr;  #:G9723
+ (symbol-plist sym) &rArr;  ()
+ (setf (get sym 'prop1) 'val1) &rArr;  VAL1
+ (symbol-plist sym) &rArr;  (PROP1 VAL1)
+ (setf (get sym 'prop2) 'val2) &rArr;  VAL2
+ (symbol-plist sym) &rArr;  (PROP2 VAL2 PROP1 VAL1)
+ (setf (symbol-plist sym) (list 'prop3 'val3)) &rArr;  (PROP3 VAL3)
+ (symbol-plist sym) &rArr;  (PROP3 VAL3)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-57"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-57"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">symbol</i> is not a <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-202"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-202"> &para;</a></span></h4>
+
+<p><a class="ref" href="get.html">get                                                              [Accessor]</a>
+,
+<a class="ref" href="remprop.html">remprop                                                          [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-122"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-122"> &para;</a></span></h4>
+
+<p>The use of <b class="b">setf</b> should be avoided, since a <i class="i">symbol</i>&rsquo;s
+<i class="i">property list</i> is a global resource that can contain information 
+established and depended upon by unrelated programs in the same <i class="i">Lisp image</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/symbol_002dvalue.html
@@ -0,0 +1,127 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>symbol-value (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="symbol-value (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="symbol-value (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="get.html" rel="next" title="get">
+<link href="symbol_002dplist.html" rel="prev" title="symbol-plist">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="symbol_002dvalue">
+<div class="nav-panel">
+<p>
+Next: <a href="get.html" accesskey="n" rel="next">get                                                              [Accessor]</a>, Previous: <a href="symbol_002dplist.html" accesskey="p" rel="prev">symbol-plist                                                     [Accessor]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="symbol_002dvalue-_005bAccessor_005d"><span>10.2.14 symbol-value                                                     [Accessor]<a class="copiable-link" href="#symbol_002dvalue-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">symbol-value</code>  <i class="i">symbol</i> &rArr;  <i class="i">value</i>
+</p>
+<p>(setf (<code class="code">         symbol-value</code> <i class="i">symbol</i>) new-value)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-168"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-168"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i> that must have a <i class="i">value</i>.
+</p>
+<p><i class="i">value</i>, <i class="i">new-value</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-230"><span>Description::<a class="copiable-link" href="#Description_003a_003a-230"> &para;</a></span></h4>
+
+<p><i class="i">Accesses</i> the <i class="i">symbol</i>&rsquo;s <i class="i">value cell</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-151"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-151"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setf (symbol-value 'a) 1) &rArr;  1
+ (symbol-value 'a) &rArr;  1
+ ;; SYMBOL-VALUE cannot see lexical variables.
+ (let ((a 2)) (symbol-value 'a)) &rArr;  1
+ (let ((a 2)) (setq a 3) (symbol-value 'a)) &rArr;  1
+ ;; SYMBOL-VALUE can see dynamic variables.
+ (let ((a 2)) 
+   (declare (special a)) 
+   (symbol-value 'a)) &rArr;  2
+ (let ((a 2)) 
+   (declare (special a)) 
+   (setq a 3)
+   (symbol-value 'a)) &rArr;  3
+ (let ((a 2))
+   (setf (symbol-value 'a) 3)
+   a) &rArr;  2
+ a &rArr;  3
+ (symbol-value 'a) &rArr;  3
+ (let ((a 4))
+   (declare (special a))
+   (let ((b (symbol-value 'a)))
+     (setf (symbol-value 'a) 5)
+     (values a b))) &rArr;  5, 4
+ a &rArr;  3
+ (symbol-value :any-keyword) &rArr;  :ANY-KEYWORD
+ (symbol-value 'nil) &rArr;  NIL
+ (symbol-value '()) &rArr;  NIL
+ ;; The precision of this next one is <i class="i">implementation-dependent</i>.
+ (symbol-value 'pi) &rArr;  3.141592653589793d0  
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-41"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-41"> &para;</a></span></h4>
+
+<p><b class="b">makunbound</b>,
+<b class="b">set</b>,
+<b class="b">setq</b>
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-58"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-58"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">symbol</i> is not a <i class="i">symbol</i>.
+</p>
+<p>Should signal <b class="b">unbound-variable</b> if <i class="i">symbol</i> is <i class="i">unbound</i>
+and an attempt is made to <i class="i">read</i> its <i class="i">value</i>.  (No such error is signaled
+on an attempt to <i class="i">write</i> its <i class="i">value</i>.)
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-203"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-203"> &para;</a></span></h4>
+
+<p><a class="ref" href="boundp.html">boundp                                                           [Function]</a>
+, 
+<a class="ref" href="makunbound.html">makunbound                                                       [Function]</a>
+, 
+<a class="ref" href="set.html">set                                                              [Function]</a>
+, 
+<a class="ref" href="setq.html">setq                                                         [Special Form]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-123"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-123"> &para;</a></span></h4>
+
+<p><b class="b">symbol-value</b> can be used to get the value of a <i class="i">constant variable</i>.
+<b class="b">symbol-value</b> cannot <i class="i">access</i> the value of a <i class="i">lexical variable</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="get.html">get                                                              [Accessor]</a>, Previous: <a href="symbol_002dplist.html">symbol-plist                                                     [Accessor]</a>, Up: <a href="Symbols-Dictionary.html">Symbols Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/symbolp.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>symbolp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="symbolp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="symbolp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="keywordp.html" rel="next" title="keywordp">
+<link href="keyword.html" rel="prev" title="keyword">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="symbolp">
+<div class="nav-panel">
+<p>
+Next: <a href="keywordp.html" accesskey="n" rel="next">keywordp                                                         [Function]</a>, Previous: <a href="keyword.html" accesskey="p" rel="prev">keyword                                                              [Type]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="symbolp-_005bFunction_005d"><span>10.2.3 symbolp                                                          [Function]<a class="copiable-link" href="#symbolp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">symbolp</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-158"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-158"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-219"><span>Description::<a class="copiable-link" href="#Description_003a_003a-219"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">symbol</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-141"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-141"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (symbolp 'elephant) &rArr;  <i class="i">true</i>
+ (symbolp 12) &rArr;  <i class="i">false</i>
+ (symbolp nil) &rArr;  <i class="i">true</i>
+ (symbolp '()) &rArr;  <i class="i">true</i>
+ (symbolp :test) &rArr;  <i class="i">true</i>
+ (symbolp &quot;hello&quot;) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-193"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-193"> &para;</a></span></h4>
+
+<p><a class="ref" href="keywordp.html">keywordp                                                         [Function]</a>
+,
+<b class="b">symbol</b>,
+<a class="ref" href="typep.html">typep                                                            [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-115"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-115"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (symbolp <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'symbol)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/synonym_002dstream.html
@@ -0,0 +1,68 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>synonym-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="synonym-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="synonym-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="two_002dway_002dstream.html" rel="next" title="two-way-stream">
+<link href="string_002dstream.html" rel="prev" title="string-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="synonym_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="two_002dway_002dstream.html" accesskey="n" rel="next">two-way-stream                                               [System Class]</a>, Previous: <a href="string_002dstream.html" accesskey="p" rel="prev">string-stream                                                [System Class]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="synonym_002dstream-_005bSystem-Class_005d"><span>21.2.7 synonym-stream                                               [System Class]<a class="copiable-link" href="#synonym_002dstream-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-68"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-68"> &para;</a></span></h4>
+
+<p><b class="b">synonym-stream</b>,
+<b class="b">stream</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-538"><span>Description::<a class="copiable-link" href="#Description_003a_003a-538"> &para;</a></span></h4>
+
+<p>A <i class="i">stream</i> that is an alias for another <i class="i">stream</i>,
+which is the <i class="i">value</i> of a <i class="i">dynamic variable</i>
+whose <i class="i">name</i> is the <i class="i">synonym stream symbol</i> of the <i class="i">synonym stream</i>.
+</p>
+<p>Any operations on a <i class="i">synonym stream</i> will be performed 
+on the <i class="i">stream</i> that is then the <i class="i">value</i> of the
+<i class="i">dynamic variable</i> named by the <i class="i">synonym stream symbol</i>.
+If the <i class="i">value</i> of the <i class="i">variable</i> should change,
+or if the <i class="i">variable</i> should be <i class="i">bound</i>,
+then the <i class="i">stream</i> will operate on the new <i class="i">value</i> of the <i class="i">variable</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-441"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-441"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dsynonym_002dstream.html">make-synonym-stream                                              [Function]</a>
+,
+<a class="ref" href="synonym_002dstream_002dsymbol.html">synonym-stream-symbol                                            [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/synonym_002dstream_002dsymbol.html
@@ -0,0 +1,59 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>synonym-stream-symbol (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="synonym-stream-symbol (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="synonym-stream-symbol (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="broadcast_002dstream_002dstreams.html" rel="next" title="broadcast-stream-streams">
+<link href="make_002dsynonym_002dstream.html" rel="prev" title="make-synonym-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="synonym_002dstream_002dsymbol">
+<div class="nav-panel">
+<p>
+Next: <a href="broadcast_002dstream_002dstreams.html" accesskey="n" rel="next">broadcast-stream-streams                                         [Function]</a>, Previous: <a href="make_002dsynonym_002dstream.html" accesskey="p" rel="prev">make-synonym-stream                                              [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="synonym_002dstream_002dsymbol-_005bFunction_005d"><span>21.2.39 synonym-stream-symbol                                            [Function]<a class="copiable-link" href="#synonym_002dstream_002dsymbol-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">synonym-stream-symbol</code>  <i class="i">synonym-stream</i> &rArr;  <i class="i">symbol</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-440"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-440"> &para;</a></span></h4>
+
+<p><i class="i">synonym-stream</i>&mdash;a <i class="i">synonym stream</i>.
+</p>
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-570"><span>Description::<a class="copiable-link" href="#Description_003a_003a-570"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">symbol</i> whose <b class="b">symbol-value</b> the <i class="i">synonym-stream</i> is using.  
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-466"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-466"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dsynonym_002dstream.html">make-synonym-stream                                              [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/t-_0028System-Class_0029.html
@@ -0,0 +1,51 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>t (System Class) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="t (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="t (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="satisfies.html" rel="next" title="satisfies">
+<link href="method_002dcombination.html" rel="prev" title="method-combination">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="t-_0028System-Class_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="satisfies.html" accesskey="n" rel="next">satisfies                                                  [Type Specifier]</a>, Previous: <a href="method_002dcombination.html" accesskey="p" rel="prev">method-combination                                           [System Class]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="t-_005bSystem-Class_005d"><span>4.4.16 t                                                            [System Class]<a class="copiable-link" href="#t-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-12"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-12"> &para;</a></span></h4>
+<p><b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-45"><span>Description::<a class="copiable-link" href="#Description_003a_003a-45"> &para;</a></span></h4>
+<p>The set of all <i class="i">objects</i>.  
+The <i class="i">type</i> <b class="b">t</b> is a <i class="i">supertype</i> of every <i class="i">type</i>, 
+including itself. Every <i class="i">object</i> is of <i class="i">type</i> <b class="b">t</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/t.html
@@ -0,0 +1,81 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>t (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="t (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="t (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="eq.html" rel="next" title="eq">
+<link href="not.html" rel="prev" title="not">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="t">
+<div class="nav-panel">
+<p>
+Next: <a href="eq.html" accesskey="n" rel="next">eq                                                               [Function]</a>, Previous: <a href="not.html" accesskey="p" rel="prev">not                                                              [Function]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="t-_005bConstant-Variable_005d"><span>5.3.32 t                                                       [Constant Variable]<a class="copiable-link" href="#t-_005bConstant-Variable_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Constant-Value_003a_003a-4"><span>Constant Value::<a class="copiable-link" href="#Constant-Value_003a_003a-4"> &para;</a></span></h4>
+
+<p><b class="b">t</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-85"><span>Description::<a class="copiable-link" href="#Description_003a_003a-85"> &para;</a></span></h4>
+
+<p>The <i class="i">boolean</i> representing true, 
+and the canonical <i class="i">generalized boolean</i> representing true.
+Although any <i class="i">object</i> 
+other than <b class="b">nil</b> is considered <i class="i">true</i>,
+<b class="b">t</b> is generally used when there is no special reason 
+to prefer one such <i class="i">object</i> over another.
+</p>
+<p>The <i class="i">symbol</i> <b class="b">t</b> is also sometimes used for other purposes as well.
+For example,
+    as the <i class="i">name</i> of a <i class="i">class</i>,
+    as a <i class="i">designator</i> (<i class="i">e.g.</i>, a <i class="i">stream designator</i>)
+ or as a special symbol for some syntactic reason 
+      (<i class="i">e.g.</i>, in <b class="b">case</b> and <b class="b">typecase</b> to label the <i class="i">otherwise-clause</i>).
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-59"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-59"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> t &rArr;  T 
+ (eq t 't) &rArr;  <i class="i">true</i>
+ (find-class 't) &rArr;  #&lt;CLASS T 610703333&gt;
+ (case 'a (a 1) (t 2)) &rArr;  1
+ (case 'b (a 1) (t 2)) &rArr;  2
+ (prin1 'hello t)
+<code class="t"> |&gt; </code> HELLO
+&rArr;  HELLO
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-70"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-70"> &para;</a></span></h4>
+
+<p><a class="ref" href="NIL.html">NIL</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/tagbody.html
@@ -0,0 +1,139 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>tagbody (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="tagbody (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="tagbody (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="throw.html" rel="next" title="throw">
+<link href="return.html" rel="prev" title="return">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="tagbody">
+<div class="nav-panel">
+<p>
+Next: <a href="throw.html" accesskey="n" rel="next">throw                                                    [Special Operator]</a>, Previous: <a href="return.html" accesskey="p" rel="prev">return                                                              [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="tagbody-_005bSpecial-Operator_005d"><span>5.3.27 tagbody                                                  [Special Operator]<a class="copiable-link" href="#tagbody-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">tagbody</code>  <i class="i">{<i class="i">tag</i> | <i class="i">statement</i>}*</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-48"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-48"> &para;</a></span></h4>
+
+<p><i class="i">tag</i>&mdash;a <i class="i">go tag</i>; not evaluated.
+</p>
+<p><i class="i">statement</i>&mdash;a <i class="i">compound form</i>; evaluated as described below.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-80"><span>Description::<a class="copiable-link" href="#Description_003a_003a-80"> &para;</a></span></h4>
+
+<p>Executes zero or more <i class="i">statements</i> in a 
+<i class="i">lexical environment</i>
+that provides for control transfers to labels indicated by the <i class="i">tags</i>.
+</p>
+<p>The <i class="i">statements</i> in a <b class="b">tagbody</b> are <i class="i">evaluated</i> in order
+from left to right, and their <i class="i">values</i> are discarded.  If at any time
+there are no remaining <i class="i">statements</i>, <b class="b">tagbody</b> returns <b class="b">nil</b>.
+However, if <code class="t">(go <i class="i">tag</i>)</code> is <i class="i">evaluated</i>, control jumps to the
+part of the body labeled with the <i class="i">tag</i>.  (Tags are compared with <b class="b">eql</b>.)
+</p>
+<p>A <i class="i">tag</i> established by <b class="b">tagbody</b> has <i class="i">lexical scope</i>
+and has <i class="i">dynamic extent</i>.  Once <b class="b">tagbody</b> has been exited,
+it is no longer valid to <b class="b">go</b> to a <i class="i">tag</i> in its body.
+It is permissible for <b class="b">go</b> to jump to a <b class="b">tagbody</b> that is 
+not the innermost <b class="b">tagbody</b> containing that <b class="b">go</b>;
+the <i class="i">tags</i> established by a <b class="b">tagbody</b> only shadow
+other <i class="i">tags</i> of like name.
+</p>
+<p>The determination of which elements of the body are <i class="i">tags</i> 
+and which are <i class="i">statements</i> is made prior to any <i class="i">macro expansion</i>
+of that element.  If a <i class="i">statement</i> is a <i class="i">macro form</i> and
+its <i class="i">macro expansion</i> is an <i class="i">atom</i>, that <i class="i">atom</i> is treated
+as a <i class="i">statement</i>, not a <i class="i">tag</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-54"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-54"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (let (val)
+    (tagbody
+      (setq val 1)
+      (go point-a)
+      (incf val 16)
+     point-c
+      (incf val 04)
+      (go point-b)
+      (incf val 32)
+     point-a
+      (incf val 02)
+      (go point-c)
+      (incf val 64)
+     point-b
+      (incf val 08))
+    val)
+&rArr;  15
+ (defun f1 (flag)
+   (let ((n 1))
+     (tagbody 
+       (setq n (f2 flag #'(lambda () (go out))))
+      out
+       (prin1 n))))
+&rArr;  F1
+ (defun f2 (flag escape)
+   (if flag (funcall escape) 2))
+&rArr;  F2
+ (f1 nil)
+<code class="t"> |&gt; </code> 2
+&rArr;  NIL
+ (f1 t)
+<code class="t"> |&gt; </code> 1
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-65"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-65"> &para;</a></span></h4>
+
+<p><a class="ref" href="go.html">go                                                       [Special Operator]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-39"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-39"> &para;</a></span></h4>
+
+<p>The <i class="i">macros</i> in Figure 5&ndash;10 have <i class="i">implicit tagbodies</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  do              do-external-symbols  dotimes  <!-- /@w -->
+  do*             do-symbols           prog     <!-- /@w -->
+  do-all-symbols  dolist               prog*    <!-- /@w -->
+
+  Figure 5&ndash;10: Macros that have implicit tagbodies.<!-- /@w -->
+
+</pre></div></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="throw.html">throw                                                    [Special Operator]</a>, Previous: <a href="return.html">return                                                              [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/terpri.html
@@ -0,0 +1,109 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>terpri (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="terpri (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="terpri (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="unread_002dchar.html" rel="next" title="unread-char">
+<link href="read_002dchar_002dno_002dhang.html" rel="prev" title="read-char-no-hang">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="terpri">
+<div class="nav-panel">
+<p>
+Next: <a href="unread_002dchar.html" accesskey="n" rel="next">unread-char                                                      [Function]</a>, Previous: <a href="read_002dchar_002dno_002dhang.html" accesskey="p" rel="prev">read-char-no-hang                                                [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="terpri_002c-fresh_002dline-_005bFunction_005d"><span>21.2.19 terpri, fresh-line                                               [Function]<a class="copiable-link" href="#terpri_002c-fresh_002dline-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">terpri</code>  <i class="i"><span class="r">&amp;optional</span> output-stream</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<p><code class="code">fresh-line</code>  <i class="i"><span class="r">&amp;optional</span> output-stream</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-422"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-422"> &para;</a></span></h4>
+
+<p><i class="i">output-stream</i> &ndash; an <i class="i">output</i> <i class="i">stream designator</i>.
+ The default is <i class="i">standard output</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-550"><span>Description::<a class="copiable-link" href="#Description_003a_003a-550"> &para;</a></span></h4>
+
+<p><b class="b">terpri</b> outputs a <i class="i">newline</i> to <i class="i">output-stream</i>.
+</p>
+<p><b class="b">fresh-line</b> is similar to <b class="b">terpri</b> but outputs a <i class="i">newline</i>
+only if the <i class="i">output-stream</i> is not already at the start of a line.
+If for some reason this cannot be determined, then a <i class="i">newline</i> is output anyway.
+<b class="b">fresh-line</b> returns <i class="i">true</i> if it outputs a <i class="i">newline</i>;
+otherwise it returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-397"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-397"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (with-output-to-string (s)
+    (write-string &quot;some text&quot; s)
+    (terpri s)
+    (terpri s)
+    (write-string &quot;more text&quot; s))
+&rArr;  &quot;some text
+
+more text&quot;
+ (with-output-to-string (s)
+    (write-string &quot;some text&quot; s)
+    (fresh-line s)
+    (fresh-line s)
+    (write-string &quot;more text&quot; s))
+&rArr;  &quot;some text
+more text&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-62"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-62"> &para;</a></span></h4>
+
+<p>The <i class="i">output-stream</i> is modified.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-85"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-85"> &para;</a></span></h4>
+
+<p><b class="b">*standard-output*</b>,
+<b class="b">*terminal-io*</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-201"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-201"> &para;</a></span></h4>
+
+<p>None.
+</p>
+<p>[Reviewer Note by Barmar: What if stream is closed?]
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-287"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-287"> &para;</a></span></h4>
+
+<p><b class="b">terpri</b> is identical in effect to
+</p>
+<div class="example">
+<pre class="example-preformatted"> (write-char #\Newline output-stream)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/the.html
@@ -0,0 +1,124 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>the (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="the (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="the (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="special_002doperator_002dp.html" rel="next" title="special-operator-p">
+<link href="locally.html" rel="prev" title="locally">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="the">
+<div class="nav-panel">
+<p>
+Next: <a href="special_002doperator_002dp.html" accesskey="n" rel="next">special-operator-p                                               [Function]</a>, Previous: <a href="locally.html" accesskey="p" rel="prev">locally                                                  [Special Operator]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="the-_005bSpecial-Operator_005d"><span>3.8.28 the                                                      [Special Operator]<a class="copiable-link" href="#the-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">the</code>  <i class="i">value-type form</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-16"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-16"> &para;</a></span></h4>
+
+<p><i class="i">value-type</i>&mdash;a <i class="i">type specifier</i>; not evaluated.
+</p>
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>; evaluated.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> resulting from the <i class="i">evaluation</i> of <i class="i">form</i>.
+  These <i class="i">values</i> must conform to the <i class="i">type</i> supplied by <i class="i">value-type</i>;
+  see below.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-27"><span>Description::<a class="copiable-link" href="#Description_003a_003a-27"> &para;</a></span></h4>
+
+<p><b class="b">the</b> specifies that the <i class="i">values</i>_{1a} returned by <i class="i">form</i>
+are of the <i class="i">types</i> specified by <i class="i">value-type</i>.
+The consequences are undefined if any <i class="i">result</i>
+is not of the declared type.
+</p>
+<p>It is permissible for <i class="i">form</i> to <i class="i">yield</i> a different number of <i class="i">values</i> 
+than are specified by <i class="i">value-type</i>, provided that the values
+for which <i class="i">types</i> are declared are indeed of those <i class="i">types</i>.
+Missing values are treated as <b class="b">nil</b> for the purposes of checking their <i class="i">types</i>.
+</p>
+<p>Regardless of number of <i class="i">values</i> declared by <i class="i">value-type</i>,
+the number of <i class="i">values</i> returned by the <b class="b">the</b> <i class="i">special form</i> is the same as
+the number of <i class="i">values</i> returned by <i class="i">form</i>. 
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-23"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-23"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (the symbol (car (list (gensym)))) &rArr;  #:G9876
+ (the fixnum (+ 5 7)) &rArr;  12
+ (the (values) (truncate 3.2 2)) &rArr;  1, 1.2
+ (the integer (truncate 3.2 2)) &rArr;  1, 1.2
+ (the (values integer) (truncate 3.2 2)) &rArr;  1, 1.2
+ (the (values integer float) (truncate 3.2 2))   &rArr;  1, 1.2
+ (the (values integer float symbol) (truncate 3.2 2)) &rArr;  1, 1.2
+ (the (values integer float symbol t null list) 
+      (truncate 3.2 2)) &rArr;  1, 1.2
+ (let ((i 100))
+    (declare (fixnum i))
+    (the fixnum (1+ i))) &rArr;  101
+ (let* ((x (list 'a 'b 'c))
+        (y 5))
+    (setf (the fixnum (car x)) y)
+    x) &rArr;  (5 B C)
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-6"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-6"> &para;</a></span></h4>
+
+<p>The consequences are undefined if
+the <i class="i">values</i> <i class="i">yielded</i> by the <i class="i">form</i> 
+are not of the <i class="i">type</i> specified by <i class="i">value-type</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-27"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-27"> &para;</a></span></h4>
+
+<p><b class="b">values</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-16"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-16"> &para;</a></span></h4>
+
+<p>The <b class="b">values</b> <i class="i">type specifier</i> can be used to indicate the types
+of <i class="i">multiple values</i>:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (the (values integer integer) (floor x y))
+ (the (values string t)
+      (gethash the-key the-string-table))
+</pre></div>
+
+<p><b class="b">setf</b> can be used with <b class="b">the</b> type declarations.
+In this case the declaration is transferred to the form that
+specifies  the new value.  The resulting <b class="b">setf</b> <i class="i">form</i>
+is then analyzed.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="special_002doperator_002dp.html">special-operator-p                                               [Function]</a>, Previous: <a href="locally.html">locally                                                  [Special Operator]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/throw.html
@@ -0,0 +1,147 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>throw (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="throw (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="throw (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="unwind_002dprotect.html" rel="next" title="unwind-protect">
+<link href="tagbody.html" rel="prev" title="tagbody">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="throw">
+<div class="nav-panel">
+<p>
+Next: <a href="unwind_002dprotect.html" accesskey="n" rel="next">unwind-protect                                           [Special Operator]</a>, Previous: <a href="tagbody.html" accesskey="p" rel="prev">tagbody                                                  [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="throw-_005bSpecial-Operator_005d"><span>5.3.28 throw                                                    [Special Operator]<a class="copiable-link" href="#throw-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">throw</code>  <i class="i">tag result-form</i> 
+        &rArr;  #&lt;NoValue&gt;
+</p><h4 class="subsubheading" id="Arguments-and-Values_003a_003a-49"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-49"> &para;</a></span></h4>
+
+<p><i class="i">tag</i>&mdash;a <i class="i">catch tag</i>; evaluated.
+</p>
+<p><i class="i">result-form</i>&mdash;a <i class="i">form</i>; evaluated as described below.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-81"><span>Description::<a class="copiable-link" href="#Description_003a_003a-81"> &para;</a></span></h4>
+
+<p><b class="b">throw</b> causes a non-local control transfer
+to a <b class="b">catch</b> whose tag is <b class="b">eq</b> to <i class="i">tag</i>. 
+</p>
+<p><i class="i">Tag</i> is evaluated first to produce an <i class="i">object</i>
+called the throw tag; then <i class="i">result-form</i> is evaluated,
+and its results are saved. If the <i class="i">result-form</i> produces
+multiple values, then all the values are saved.
+The most recent outstanding <b class="b">catch</b> 
+whose <i class="i">tag</i> is <b class="b">eq</b> to the throw tag
+is exited; the saved results are returned as the value or 
+values of <b class="b">catch</b>.
+</p>
+<p>The transfer of control initiated by <b class="b">throw</b> is performed
+as described in <a class="ref" href="Transfer-of-Control-to-an-Exit-Point.html">Transfer of Control to an Exit Point</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-55"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-55"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (catch 'result
+    (setq i 0 j 0)
+    (loop (incf j 3) (incf i)
+          (if (= i 3) (throw 'result (values i j))))) &rArr;  3, 9
+
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (catch nil 
+   (unwind-protect (throw nil 1)
+     (throw nil 2))) &rArr;  2
+</pre></div>
+
+<p>The consequences of the following are undefined 
+because the <b class="b">catch</b> of <code class="t">b</code> 
+is passed over by the first <b class="b">throw</b>, 
+hence portable programs must assume that 
+its <i class="i">dynamic extent</i> is terminated. 
+The <i class="i">binding</i> of the <i class="i">catch tag</i> is not yet <i class="i">disestablished</i>
+and therefore it is the target of the second <b class="b">throw</b>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (catch 'a
+   (catch 'b
+     (unwind-protect (throw 'a 1)
+       (throw 'b 2))))
+</pre></div>
+
+<p>The following prints &ldquo;<code class="t">The inner catch returns :SECOND-THROW</code>&rdquo;
+and then returns <code class="t">:outer-catch</code>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (catch 'foo
+         (format t &quot;The inner catch returns ~s.~
+                 (catch 'foo
+                     (unwind-protect (throw 'foo :first-throw)
+                         (throw 'foo :second-throw))))
+         :outer-catch)
+<code class="t"> |&gt; </code> The inner catch returns :SECOND-THROW
+&rArr;  :OUTER-CATCH
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-16"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-16"> &para;</a></span></h4>
+
+<p>If there is no outstanding <i class="i">catch tag</i> that matches the throw tag,
+no unwinding of the stack is performed,
+and an error of <i class="i">type</i> <b class="b">control-error</b> is signaled.
+When the error is signaled, 
+the <i class="i">dynamic environment</i> is that which was
+in force at the point of the <b class="b">throw</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-66"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-66"> &para;</a></span></h4>
+
+<p><a class="ref" href="block.html">block                                                    [Special Operator]</a>
+,
+<a class="ref" href="catch.html">catch                                                    [Special Operator]</a>
+,
+<a class="ref" href="return_002dfrom.html">return-from                                              [Special Operator]</a>
+,
+<a class="ref" href="unwind_002dprotect.html">unwind-protect                                           [Special Operator]</a>
+,
+<a class="ref" href="Evaluation.html">Evaluation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-40"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-40"> &para;</a></span></h4>
+
+<p><b class="b">catch</b> and <b class="b">throw</b> are normally used when the <i class="i">exit point</i>
+must have <i class="i">dynamic scope</i> (<i class="i">e.g.</i>, the <b class="b">throw</b> is not lexically enclosed
+by the <b class="b">catch</b>), while <b class="b">block</b> and <b class="b">return</b> are used 
+when <i class="i">lexical scope</i> is sufficient.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="unwind_002dprotect.html">unwind-protect                                           [Special Operator]</a>, Previous: <a href="tagbody.html">tagbody                                                  [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/time.html
@@ -0,0 +1,104 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>time (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="time (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="time (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="internal_002dtime_002dunits_002dper_002dsecond.html" rel="next" title="internal-time-units-per-second">
+<link href="step.html" rel="prev" title="step">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="time">
+<div class="nav-panel">
+<p>
+Next: <a href="internal_002dtime_002dunits_002dper_002dsecond.html" accesskey="n" rel="next">internal-time-units-per-second                          [Constant Variable]</a>, Previous: <a href="step.html" accesskey="p" rel="prev">step                                                                [Macro]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="time-_005bMacro_005d"><span>25.2.10 time                                                                [Macro]<a class="copiable-link" href="#time-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">time</code>  <i class="i">form</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-496"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-496"> &para;</a></span></h4>
+
+<p><i class="i">form</i>&mdash;a <i class="i">form</i>; evaluated as described below.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-658"><span>Description::<a class="copiable-link" href="#Description_003a_003a-658"> &para;</a></span></h4>
+
+<p><b class="b">time</b> evaluates <i class="i">form</i> in the current <i class="i">environment</i> (lexical and dynamic).
+A call to <b class="b">time</b> can be compiled.
+</p>
+<p><b class="b">time</b> prints various timing data and other information to <i class="i">trace output</i>.
+The nature and format of the printed information is <i class="i">implementation-defined</i>.
+Implementations are encouraged to provide such information as 
+     elapsed real time,
+     machine run time,
+ and storage management statistics.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-125"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-125"> &para;</a></span></h4>
+
+<p>The accuracy of the results depends, among other things, on the accuracy
+of the corresponding functions provided by the underlying operating system.
+</p>
+<p>The magnitude of the results may depend on 
+  the hardware,
+  the operating system,
+  the lisp implementation,
+ and the state of the global environment.
+Some specific issues which frequently affect the outcome are
+  hardware speed,
+  nature of the scheduler (if any),
+  number of competing processes (if any),
+  system paging,
+  whether the call is interpreted or compiled,
+  whether functions called are compiled,
+  the kind of garbage collector involved and whether it runs,
+  whether internal data structures (e.g., hash tables) are implicitly reorganized,
+  <i class="i">etc.</i>
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-536"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-536"> &para;</a></span></h4>
+
+<p><a class="ref" href="get_002dinternal_002dreal_002dtime.html">get-internal-real-time                                           [Function]</a>
+,
+<a class="ref" href="get_002dinternal_002drun_002dtime.html">get-internal-run-time                                            [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-329"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-329"> &para;</a></span></h4>
+
+<p>In general, these timings are not guaranteed to be reliable enough for
+marketing comparisons. Their value is primarily heuristic, for tuning
+purposes.
+</p>
+<p>For useful background information on the complicated issues involved in
+interpreting timing results, see <i class="i">Performance and Evaluation of Lisp Programs</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="internal_002dtime_002dunits_002dper_002dsecond.html">internal-time-units-per-second                          [Constant Variable]</a>, Previous: <a href="step.html">step                                                                [Macro]</a>, Up: <a href="Environment-Dictionary.html">Environment Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/trace.html
@@ -0,0 +1,141 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>trace (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="trace (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="trace (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="step.html" rel="next" title="step">
+<link href="describe_002dobject.html" rel="prev" title="describe-object">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="trace">
+<div class="nav-panel">
+<p>
+Next: <a href="step.html" accesskey="n" rel="next">step                                                                [Macro]</a>, Previous: <a href="describe_002dobject.html" accesskey="p" rel="prev">describe-object                                 [Standard Generic Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="trace_002c-untrace-_005bMacro_005d"><span>25.2.8 trace, untrace                                                      [Macro]<a class="copiable-link" href="#trace_002c-untrace-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">trace</code>  <i class="i">{<i class="i">function-name</i>}*</i> &rArr;  <i class="i">trace-result</i>
+</p>
+<p><code class="code">untrace</code>  <i class="i">{<i class="i">function-name</i>}*</i> &rArr;  <i class="i">untrace-result</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-494"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-494"> &para;</a></span></h4>
+
+<p><i class="i">function-name</i>&mdash;a <i class="i">function name</i>.
+</p>
+<p><i class="i">trace-result</i>&mdash;<i class="i">implementation-dependent</i>,
+  unless no <i class="i">function-names</i> are supplied, 
+  in which case <i class="i">trace-result</i> is a <i class="i">list</i> of <i class="i">function names</i>.
+</p>
+<p><i class="i">untrace-result</i>&mdash;<i class="i">implementation-dependent</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-656"><span>Description::<a class="copiable-link" href="#Description_003a_003a-656"> &para;</a></span></h4>
+
+<p><b class="b">trace</b> and <b class="b">untrace</b> control the invocation of the trace facility.  
+</p>
+<p>Invoking <b class="b">trace</b> with one or more <i class="i">function-names</i> causes
+the denoted <i class="i">functions</i> to be &ldquo;traced.&rdquo;
+Whenever a traced <i class="i">function</i> is invoked, information
+     about the call,
+     about the arguments passed,
+ and about any eventually returned values
+is printed to <i class="i">trace output</i>.
+If <b class="b">trace</b> is used with no <i class="i">function-names</i>,
+no tracing action is performed; 
+instead, a list of the <i class="i">functions</i> currently being traced is returned.
+</p>
+<p>Invoking <b class="b">untrace</b> with one or more function names causes those
+functions to be &ldquo;untraced&rdquo; (<i class="i">i.e.</i>, no longer traced).
+If <b class="b">untrace</b> is used with no <i class="i">function-names</i>,
+all <i class="i">functions</i> currently being traced are untraced.
+</p>
+<p>If a <i class="i">function</i> to be traced has been open-coded
+(<i class="i">e.g.</i>, because it was declared <b class="b">inline</b>),
+a call to that <i class="i">function</i> might not produce trace output.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-466"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-466"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun fact (n) (if (zerop n) 1 (* n (fact (- n 1)))))
+&rArr;  FACT
+ (trace fact)
+&rArr;  (FACT)
+;; Of course, the format of traced output is implementation-dependent.
+ (fact 3)
+<code class="t"> |&gt; </code> 1 Enter FACT 3
+<code class="t"> |&gt; </code> | 2 Enter FACT 2
+<code class="t"> |&gt; </code> |   3 Enter FACT 1
+<code class="t"> |&gt; </code> |   | 4 Enter FACT 0
+<code class="t"> |&gt; </code> |   | 4 Exit FACT 1
+<code class="t"> |&gt; </code> |   3 Exit FACT 1
+<code class="t"> |&gt; </code> | 2 Exit FACT 2
+<code class="t"> |&gt; </code> 1 Exit FACT 6
+&rArr;  6
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-84"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-84"> &para;</a></span></h4>
+
+<p>Might change the definitions of the <i class="i">functions</i> named by <i class="i">function-names</i>.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-124"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-124"> &para;</a></span></h4>
+
+<p>Whether the functions named are defined or already being traced.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-239"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-239"> &para;</a></span></h4>
+
+<p>Tracing an already traced function,
+or untracing a function not currently being traced,
+should produce no harmful effects, but might signal a warning.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-534"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-534"> &para;</a></span></h4>
+
+<p><b class="b">*trace-output*</b>,
+<a class="ref" href="step.html">step                                                                [Macro]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-327"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-327"> &para;</a></span></h4>
+
+<p><b class="b">trace</b> and <b class="b">untrace</b> may also accept additional
+<i class="i">implementation-dependent</i> argument formats.  The format of the trace
+output is <i class="i">implementation-dependent</i>.
+</p>
+<p>Although <b class="b">trace</b> can be extended to permit non-standard options,
+<i class="i">implementations</i> are nevertheless encouraged (but not required)
+to warn about the use of syntax or options 
+that are neither specified by this standard 
+nor added as an extension by the <i class="i">implementation</i>,
+since they could be symptomatic of typographical errors
+or of reliance on features supported in <i class="i">implementations</i> 
+other than the current <i class="i">implementation</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="step.html">step                                                                [Macro]</a>, Previous: <a href="describe_002dobject.html">describe-object                                 [Standard Generic Function]</a>, Up: <a href="Environment-Dictionary.html">Environment Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/translate_002dlogical_002dpathname.html
@@ -0,0 +1,127 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>translate-logical-pathname (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="translate-logical-pathname (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="translate-logical-pathname (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="translate_002dpathname.html" rel="next" title="translate-pathname">
+<link href="pathname_002dmatch_002dp.html" rel="prev" title="pathname-match-p">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="translate_002dlogical_002dpathname">
+<div class="nav-panel">
+<p>
+Next: <a href="translate_002dpathname.html" accesskey="n" rel="next">translate-pathname                                               [Function]</a>, Previous: <a href="pathname_002dmatch_002dp.html" accesskey="p" rel="prev">pathname-match-p                                                 [Function]</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="translate_002dlogical_002dpathname-_005bFunction_005d"><span>19.4.15 translate-logical-pathname                                       [Function]<a class="copiable-link" href="#translate_002dlogical_002dpathname-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">translate-logical-pathname</code>  <i class="i">pathname <span class="r">&amp;key</span></i> &rArr;  <i class="i">physical-pathname</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-400"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-400"> &para;</a></span></h4>
+
+<p><i class="i">pathname</i>&mdash;a <i class="i">pathname designator</i>,
+		or a <i class="i">logical pathname</i> <i class="i">namestring</i>.
+</p>
+<p><i class="i">physical-pathname</i>&mdash;a <i class="i">physical pathname</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-519"><span>Description::<a class="copiable-link" href="#Description_003a_003a-519"> &para;</a></span></h4>
+
+<p>Translates <i class="i">pathname</i> to a <i class="i">physical pathname</i>, which it returns.
+</p>
+<p>If <i class="i">pathname</i> is a <i class="i">stream</i>, the
+<i class="i">stream</i> can be either open or closed.
+<b class="b">translate-logical-pathname</b> returns the same 
+physical pathname after a
+    file is closed as it did when the file was open.
+</p>
+<p>It is an error if <i class="i">pathname</i> is a <i class="i">stream</i> that is 
+created with <b class="b">make-two-way-stream</b>, 
+<b class="b">make-echo-stream</b>,             
+<b class="b">make-broadcast-stream</b>, 
+<b class="b">make-concatenated-stream</b>, <b class="b">make-string-input-stream</b>,
+<b class="b">make-string-output-stream</b>.
+</p>
+<p>If <i class="i">pathname</i> is a <i class="i">logical pathname</i> namestring,
+the host portion of the 
+<i class="i">logical pathname</i> namestring and its following <i class="i">colon</i> are required.
+</p>
+<p><i class="i">Pathname</i> is first coerced to a <i class="i">pathname</i>.
+If the coerced <i class="i">pathname</i> is a physical pathname, it is returned.
+If the coerced <i class="i">pathname</i> is a <i class="i">logical pathname</i>,
+the first matching translation (according to <b class="b">pathname-match-p</b>)
+of the <i class="i">logical pathname</i> host is applied, as if by calling 
+<b class="b">translate-pathname</b>.  If the result is
+    a <i class="i">logical pathname</i>, this process is repeated.  
+When the result is
+    finally a physical pathname, it is returned.
+    If no translation matches, an error 
+is signaled.
+</p>
+<p><b class="b">translate-logical-pathname</b> might perform additional translations,
+    typically to provide translation of file types to local naming
+    conventions, to accomodate physical file systems with limited length
+    names, or to deal with special character requirements such as
+    translating hyphens to underscores or uppercase letters to lowercase.
+    Any such additional translations are <i class="i">implementation-defined</i>.  Some
+    implementations do no additional translations.
+</p>
+<p>There are no specified keyword arguments for
+<b class="b">translate-logical-pathname</b>, 
+but implementations are permitted to extend
+    it by adding keyword arguments.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-379"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-379"> &para;</a></span></h4>
+
+<p>See <b class="b">logical-pathname-translations</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-181"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-181"> &para;</a></span></h4>
+
+<p>If <i class="i">pathname</i> is incorrectly supplied, an error of <i class="i">type</i> <b class="b">type-error</b> is signaled.
+</p>
+<p>If no translation matches, an error of <i class="i">type</i> <b class="b">file-error</b> is signaled.
+</p>
+<p>[Editorial Note by KMP: Is file-error really right, or should it be pathname-error?]
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-422"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-422"> &para;</a></span></h4>
+
+<p><a class="ref" href="logical_002dpathname.html">logical-pathname                                                 [Function]</a>
+,
+<a class="ref" href="logical_002dpathname_002dtranslations.html">logical-pathname-translations                                    [Accessor]</a>
+, 
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="translate_002dpathname.html">translate-pathname                                               [Function]</a>, Previous: <a href="pathname_002dmatch_002dp.html">pathname-match-p                                                 [Function]</a>, Up: <a href="Filenames-Dictionary.html">Filenames Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/translate_002dpathname.html
@@ -0,0 +1,215 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>translate-pathname (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="translate-pathname (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="translate-pathname (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="merge_002dpathnames.html" rel="next" title="merge-pathnames">
+<link href="translate_002dlogical_002dpathname.html" rel="prev" title="translate-logical-pathname">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="translate_002dpathname">
+<div class="nav-panel">
+<p>
+Next: <a href="merge_002dpathnames.html" accesskey="n" rel="next">merge-pathnames                                                  [Function]</a>, Previous: <a href="translate_002dlogical_002dpathname.html" accesskey="p" rel="prev">translate-logical-pathname                                       [Function]</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="translate_002dpathname-_005bFunction_005d"><span>19.4.16 translate-pathname                                               [Function]<a class="copiable-link" href="#translate_002dpathname-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">translate-pathname</code>  <i class="i">source from-wildcard to-wildcard <span class="r">&amp;key</span></i><br>
+   &rArr;  <i class="i">translated-pathname</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-401"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-401"> &para;</a></span></h4>
+
+<p><i class="i">source</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">from-wildcard</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">to-wildcard</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">translated-pathname</i>&mdash;a <i class="i">pathname</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-520"><span>Description::<a class="copiable-link" href="#Description_003a_003a-520"> &para;</a></span></h4>
+
+<p><b class="b">translate-pathname</b> translates <i class="i">source</i> 
+(that matches <i class="i">from-wildcard</i>) into a corresponding <i class="i">pathname</i> 
+that matches <i class="i">to-wildcard</i>, and returns the corresponding <i class="i">pathname</i>.
+</p>
+<p>The resulting <i class="i">pathname</i> is <i class="i">to-wildcard</i> with each wildcard or missing
+field replaced by a portion of <i class="i">source</i>.  A &ldquo;wildcard field&rdquo; is a
+<i class="i">pathname</i> component with a value of <code class="t">:wild</code>, a <code class="t">:wild</code> element of a
+<i class="i">list</i>-valued directory component, or an <i class="i">implementation-defined</i> portion
+of a component, such as the <code class="t">&quot;*&quot;</code> in the complex wildcard string
+<code class="t">&quot;foo*bar&quot;</code> that some implementations support.  An implementation that
+adds other wildcard features, such as regular expressions, must define
+how <b class="b">translate-pathname</b> extends to those features.  
+A &ldquo;missing field&rdquo; is a <i class="i">pathname</i> component with a value of <b class="b">nil</b>.
+</p>
+<p>The portion of <i class="i">source</i> 
+that is copied into the resulting <i class="i">pathname</i> is 
+<i class="i">implementation-defined</i>.  Typically 
+it is determined by the user interface conventions
+    of the file systems involved.  Usually it is the portion of <i class="i">source</i>
+    that matches a wildcard field of 
+<i class="i">from-wildcard</i> that is in the same
+    position as the wildcard or missing field of 
+<i class="i">to-wildcard</i>.  If there
+    is no wildcard field in 
+<i class="i">from-wildcard</i> at that position, then usually
+    it is the entire corresponding 
+<i class="i">pathname</i> component of <i class="i">source</i>, or in
+    the case of a 
+<i class="i">list</i>-valued directory component, the entire corresponding
+    <i class="i">list</i> element.  
+</p>
+<p>During the copying of a portion of <i class="i">source</i> into 
+the resulting <i class="i">pathname</i>, additional
+    <i class="i">implementation-defined</i> translations of <i class="i">case</i> or file naming
+    conventions might occur, especially when 
+<i class="i">from-wildcard</i> and
+    <i class="i">to-wildcard</i> are for different hosts.
+</p>
+<p>It is valid for
+    <i class="i">source</i> to be a wild 
+<i class="i">pathname</i>; in general this will produce a wild
+    result.  It 
+is valid for <i class="i">from-wildcard</i> and/or <i class="i">to-wildcard</i> to be
+    non-wild <i class="i">pathnames</i>.  
+</p>
+<p>There are no specified keyword arguments for 
+<b class="b">translate-pathname</b>, but
+    implementations are permitted to extend it by adding keyword arguments.
+</p>
+<p><b class="b">translate-pathname</b> maps customary case in
+<i class="i">source</i> into customary case in the output <i class="i">pathname</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-380"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-380"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> ;; The results of the following five forms are all implementation-dependent.
+ ;; The second item in particular is shown with multiple results just to 
+ ;; emphasize one of many particular variations which commonly occurs.
+ (pathname-name (translate-pathname &quot;foobar&quot; &quot;foo*&quot; &quot;*baz&quot;)) &rArr;  &quot;barbaz&quot;
+ (pathname-name (translate-pathname &quot;foobar&quot; &quot;foo*&quot; &quot;*&quot;))
+&rArr;  &quot;foobar&quot;
+<i class="i">OR</i>&rArr; &quot;bar&quot;
+ (pathname-name (translate-pathname &quot;foobar&quot; &quot;*&quot;    &quot;foo*&quot;)) &rArr;  &quot;foofoobar&quot;
+ (pathname-name (translate-pathname &quot;bar&quot;    &quot;*&quot;    &quot;foo*&quot;)) &rArr;  &quot;foobar&quot;
+ (pathname-name (translate-pathname &quot;foobar&quot; &quot;foo*&quot; &quot;baz*&quot;)) &rArr;  &quot;bazbar&quot;
+
+ (defun translate-logical-pathname-1 (pathname rules)
+   (let ((rule (assoc pathname rules :test #'pathname-match-p)))
+     (unless rule (error &quot;No translation rule for ~A&quot; pathname))
+     (translate-pathname pathname (first rule) (second rule))))
+ (translate-logical-pathname-1 &quot;FOO:CODE;BASIC.LISP&quot;
+                       '((&quot;FOO:DOCUMENTATION;&quot; &quot;MY-UNIX:/doc/foo/&quot;)
+                         (&quot;FOO:CODE;&quot;          &quot;MY-UNIX:/lib/foo/&quot;)
+                         (&quot;FOO:PATCHES;*;&quot;     &quot;MY-UNIX:/lib/foo/patch/*/&quot;)))
+&rArr;  #P&quot;MY-UNIX:/lib/foo/basic.l&quot;
+
+;;;This example assumes one particular set of wildcard conventions
+;;;Not all file systems will run this example exactly as written
+ (defun rename-files (from to)
+   (dolist (file (directory from))
+     (rename-file file (translate-pathname file from to))))
+ (rename-files &quot;/usr/me/*.lisp&quot; &quot;/dev/her/*.l&quot;)
+   ;Renames /usr/me/init.lisp to /dev/her/init.l
+ (rename-files &quot;/usr/me/pcl*/*&quot; &quot;/sys/pcl/*/&quot;)
+   ;Renames /usr/me/pcl-5-may/low.lisp to /sys/pcl/pcl-5-may/low.lisp
+   ;In some file systems the result might be /sys/pcl/5-may/low.lisp
+ (rename-files &quot;/usr/me/pcl*/*&quot; &quot;/sys/library/*/&quot;)
+   ;Renames /usr/me/pcl-5-may/low.lisp to /sys/library/pcl-5-may/low.lisp
+   ;In some file systems the result might be /sys/library/5-may/low.lisp
+ (rename-files &quot;/usr/me/foo.bar&quot; &quot;/usr/me2/&quot;)
+   ;Renames /usr/me/foo.bar to /usr/me2/foo.bar
+ (rename-files &quot;/usr/joe/*-recipes.text&quot; &quot;/usr/jim/cookbook/joe's-*-rec.text&quot;)
+   ;Renames /usr/joe/lamb-recipes.text to /usr/jim/cookbook/joe's-lamb-rec.text
+   ;Renames /usr/joe/pork-recipes.text to /usr/jim/cookbook/joe's-pork-rec.text
+   ;Renames /usr/joe/veg-recipes.text to /usr/jim/cookbook/joe's-veg-rec.text
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-182"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-182"> &para;</a></span></h4>
+
+<p>If any of <i class="i">source</i>, <i class="i">from-wildcard</i>, or <i class="i">to-wildcard</i>
+is not a <i class="i">pathname</i>, a <i class="i">string</i>, or a <i class="i">stream associated with a file</i>
+an error of <i class="i">type</i> <b class="b">type-error</b> is signaled.  
+</p>
+<p><code class="t">(pathname-match-p <i class="i">source from-wildcard</i>)</code> must
+be true or an error of <i class="i">type</i> <b class="b">error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-423"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-423"> &para;</a></span></h4>
+
+<p><a class="ref" href="namestring.html">namestring, file-namestring, directory-namestring,</a>
+,
+<a class="ref" href="pathname_002dhost.html">pathname-host, pathname-device, pathname-directory,</a>
+,
+</p>
+<p><b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-280"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-280"> &para;</a></span></h4>
+
+<p>The exact behavior of <b class="b">translate-pathname</b> cannot be dictated
+by the <span class="r">Common Lisp</span> language and must be allowed to vary, depending on the
+user interface conventions of the file systems involved.
+</p>
+<p>The following is an implementation guideline.
+One file system performs this operation by
+    examining each piece of the three 
+<i class="i">pathnames</i> in turn, where a piece is a
+    <i class="i">pathname</i> component or a 
+<i class="i">list</i> element of a structured component such as
+    a hierarchical directory.  Hierarchical directory elements in
+    <i class="i">from-wildcard</i> and 
+<i class="i">to-wildcard</i> are matched by whether they are
+    wildcards, not by depth in the directory hierarchy.  If the piece in
+<i class="i">to-wildcard</i> is present and not wild, it is copied into the result.
+    If the piece in <i class="i">to-wildcard</i> is 
+<code class="t">:wild</code> or <b class="b">nil</b>, the piece in <i class="i">source</i> is
+    copied into the result.  Otherwise, the piece in
+<i class="i">to-wildcard</i> might be
+    a complex wildcard such as <code class="t">&quot;foo*bar&quot;</code> and the piece in 
+<i class="i">from-wildcard</i>
+    should be wild; the portion of the piece in 
+<i class="i">source</i> that matches the
+    wildcard portion of the piece in 
+<i class="i">from-wildcard</i> replaces the wildcard
+    portion of the piece in 
+<i class="i">to-wildcard</i> and the value produced is used in
+    the result.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="merge_002dpathnames.html">merge-pathnames                                                  [Function]</a>, Previous: <a href="translate_002dlogical_002dpathname.html">translate-logical-pathname                                       [Function]</a>, Up: <a href="Filenames-Dictionary.html">Filenames Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/tree_002dequal.html
@@ -0,0 +1,117 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>tree-equal (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="tree-equal (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="tree-equal (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="copy_002dlist.html" rel="next" title="copy-list">
+<link href="subst.html" rel="prev" title="subst">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="tree_002dequal">
+<div class="nav-panel">
+<p>
+Next: <a href="copy_002dlist.html" accesskey="n" rel="next">copy-list                                                        [Function]</a>, Previous: <a href="subst.html" accesskey="p" rel="prev">subst, subst-if, subst-if-not, nsubst, nsubst-if, nsubst-if-not</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="tree_002dequal-_005bFunction_005d"><span>14.2.13 tree-equal                                                       [Function]<a class="copiable-link" href="#tree_002dequal-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">tree-equal</code>  <i class="i">tree-1 tree-2 <span class="r">&amp;key</span> test test-not</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-282"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-282"> &para;</a></span></h4>
+
+<p><i class="i">tree-1</i>&mdash;a <i class="i">tree</i>.
+</p>
+<p><i class="i">tree-2</i>&mdash;a <i class="i">tree</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-383"><span>Description::<a class="copiable-link" href="#Description_003a_003a-383"> &para;</a></span></h4>
+
+<p><b class="b">tree-equal</b> tests whether two trees are of the same shape
+and have the same leaves.  
+<b class="b">tree-equal</b> returns <i class="i">true</i> if <i class="i">tree-1</i> and <i class="i">tree-2</i>  are 
+both <i class="i">atoms</i> and <i class="i">satisfy the test</i>,
+or if they are both <i class="i">conses</i> and
+the <i class="i">car</i> of <i class="i">tree-1</i> is <b class="b">tree-equal</b> to
+the <i class="i">car</i> of <i class="i">tree-2</i> and
+the <i class="i">cdr</i> of <i class="i">tree-1</i> is <b class="b">tree-equal</b> to
+the <i class="i">cdr</i> of <i class="i">tree-2</i>.  
+Otherwise, <b class="b">tree-equal</b> returns <i class="i">false</i>.
+</p>
+<p><b class="b">tree-equal</b> recursively compares <i class="i">conses</i> but not any 
+other <i class="i">objects</i> that have components.  
+</p>
+<p>The first argument to the <code class="t">:test</code> or <code class="t">:test-not</code> 
+function is <i class="i">tree-1</i> or a <i class="i">car</i> or <i class="i">cdr</i> of <i class="i">tree-1</i>;
+the second argument is <i class="i">tree-2</i> or a <i class="i">car</i> 
+or <i class="i">cdr</i> of <i class="i">tree-2</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-266"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-266"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq tree1 '(1 (1 2))
+       tree2 '(1 (1 2))) &rArr;  (1 (1 2))
+ (tree-equal tree1 tree2) &rArr;  <i class="i">true</i>
+ (eql tree1 tree2) &rArr;  <i class="i">false</i>
+ (setq tree1 '('a ('b 'c))
+       tree2 '('a ('b 'c))) &rArr;  ('a ('b 'c)) 
+&rArr;  ((QUOTE A) ((QUOTE B) (QUOTE C)))
+ (tree-equal tree1 tree2 :test 'eq) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-119"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-119"> &para;</a></span></h4>
+
+<p>The consequences are undefined 
+if both <i class="i">tree-1</i> and <i class="i">tree-2</i> are circular.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-309"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-309"> &para;</a></span></h4>
+
+<p><a class="ref" href="equal.html">equal                                                            [Function]</a>
+,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-203"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-203"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> parameter is deprecated.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="copy_002dlist.html">copy-list                                                        [Function]</a>, Previous: <a href="subst.html">subst, subst-if, subst-if-not, nsubst, nsubst-if, nsubst-if-not</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/truename.html
@@ -0,0 +1,125 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>truename (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="truename (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="truename (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Files-Dictionary.html" rel="up" title="Files Dictionary">
+<link href="file_002dauthor.html" rel="next" title="file-author">
+<link href="ensure_002ddirectories_002dexist.html" rel="prev" title="ensure-directories-exist">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="truename">
+<div class="nav-panel">
+<p>
+Next: <a href="file_002dauthor.html" accesskey="n" rel="next">file-author                                                      [Function]</a>, Previous: <a href="ensure_002ddirectories_002dexist.html" accesskey="p" rel="prev">ensure-directories-exist                                         [Function]</a>, Up: <a href="Files-Dictionary.html" accesskey="u" rel="up">Files Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="truename-_005bFunction_005d"><span>20.2.4 truename                                                         [Function]<a class="copiable-link" href="#truename-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">truename</code>  <i class="i">filespec</i> &rArr;  <i class="i">truename</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-406"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-406"> &para;</a></span></h4>
+
+<p><i class="i">filespec</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">truename</i>&mdash;a <i class="i">physical pathname</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-525"><span>Description::<a class="copiable-link" href="#Description_003a_003a-525"> &para;</a></span></h4>
+
+<p><b class="b">truename</b> tries to find the <i class="i">file</i> indicated by 
+<i class="i">filespec</i> and returns its <i class="i">truename</i>.
+If the <i class="i">filespec</i> <i class="i">designator</i> is an open <i class="i">stream</i>,
+its associated <i class="i">file</i> is used.
+</p>
+<p>If <i class="i">filespec</i> is a <i class="i">stream</i>,
+<b class="b">truename</b> can be used whether the <i class="i">stream</i>
+is open or closed. It is permissible for <b class="b">truename</b> 
+to return more specific information after the <i class="i">stream</i>
+is closed than when the <i class="i">stream</i> was open.
+</p>
+<p>If <i class="i">filespec</i> is a <i class="i">pathname</i> 
+it represents the name used to open the file. This may be, but is
+not required to be, the actual name of the file. 
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-382"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-382"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;; An example involving version numbers.  Note that the precise nature of
+;; the truename is implementation-dependent while the file is still open.
+ (with-open-file (stream &quot;&gt;vistor&gt;test.text.newest&quot;)
+   (values (pathname stream)
+           (truename stream)))
+&rArr;  #P&quot;S:&gt;vistor&gt;test.text.newest&quot;, #P&quot;S:&gt;vistor&gt;test.text.1&quot;
+<i class="i">OR</i>&rArr; #P&quot;S:&gt;vistor&gt;test.text.newest&quot;, #P&quot;S:&gt;vistor&gt;test.text.newest&quot;
+<i class="i">OR</i>&rArr; #P&quot;S:&gt;vistor&gt;test.text.newest&quot;, #P&quot;S:&gt;vistor&gt;_temp_._temp_.1&quot;
+
+;; In this case, the file is closed when the truename is tried, so the
+;; truename information is reliable.
+ (with-open-file (stream &quot;&gt;vistor&gt;test.text.newest&quot;)
+   (close stream)
+   (values (pathname stream)
+           (truename stream)))
+&rArr;  #P&quot;S:&gt;vistor&gt;test.text.newest&quot;, #P&quot;S:&gt;vistor&gt;test.text.1&quot;
+
+;; An example involving TOP-20's implementation-dependent concept 
+;; of logical devices -- in this case, &quot;DOC:&quot; is shorthand for
+;; &quot;PS:&lt;DOCUMENTATION&gt;&quot; ...
+ (with-open-file (stream &quot;CMUC::DOC:DUMPER.HLP&quot;)
+   (values (pathname stream)
+           (truename stream)))
+&rArr;  #P&quot;CMUC::DOC:DUMPER.HLP&quot;, #P&quot;CMUC::PS:&lt;DOCUMENTATION&gt;DUMPER.HLP.13&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-186"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-186"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> is signaled if an appropriate <i class="i">file</i>
+cannot be located within the <i class="i">file system</i> for the given <i class="i">filespec</i>,
+</p>
+<p>or if the <i class="i">file system</i> cannot perform the requested operation.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">file-error</b> is signaled if <i class="i">pathname</i> is <i class="i">wild</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-428"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-428"> &para;</a></span></h4>
+
+<p><b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-283"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-283"> &para;</a></span></h4>
+
+<p><b class="b">truename</b> may be used to account for any <i class="i">filename</i> translations 
+performed by the <i class="i">file system</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="file_002dauthor.html">file-author                                                      [Function]</a>, Previous: <a href="ensure_002ddirectories_002dexist.html">ensure-directories-exist                                         [Function]</a>, Up: <a href="Files-Dictionary.html">Files Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/two_002dway_002dstream.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>two-way-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="two-way-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="two-way-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="input_002dstream_002dp.html" rel="next" title="input-stream-p">
+<link href="synonym_002dstream.html" rel="prev" title="synonym-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="two_002dway_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="input_002dstream_002dp.html" accesskey="n" rel="next">input-stream-p, output-stream-p                                  [Function]</a>, Previous: <a href="synonym_002dstream.html" accesskey="p" rel="prev">synonym-stream                                               [System Class]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="two_002dway_002dstream-_005bSystem-Class_005d"><span>21.2.8 two-way-stream                                               [System Class]<a class="copiable-link" href="#two_002dway_002dstream-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-69"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-69"> &para;</a></span></h4>
+
+<p><b class="b">two-way-stream</b>,
+<b class="b">stream</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-539"><span>Description::<a class="copiable-link" href="#Description_003a_003a-539"> &para;</a></span></h4>
+
+<p>A <i class="i">bidirectional</i> <i class="i">composite stream</i> that 
+     receives its input  from an associated <i class="i">input</i>  <i class="i">stream</i> 
+ and sends    its output to   an associated <i class="i">output</i> <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-442"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-442"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dtwo_002dway_002dstream.html">make-two-way-stream                                              [Function]</a>
+,
+<a class="ref" href="two_002dway_002dstream_002dinput_002dstream.html">two-way-stream-input-stream, two-way-stream-output-stream</a>
+,
+<b class="b">two-way-stream-output-stream</b>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/two_002dway_002dstream_002dinput_002dstream.html
@@ -0,0 +1,65 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>two-way-stream-input-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="two-way-stream-input-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="two-way-stream-input-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="echo_002dstream_002dinput_002dstream.html" rel="next" title="echo-stream-input-stream">
+<link href="make_002dtwo_002dway_002dstream.html" rel="prev" title="make-two-way-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+p.flushright-paragraph {text-align:right}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="two_002dway_002dstream_002dinput_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="echo_002dstream_002dinput_002dstream.html" accesskey="n" rel="next">echo-stream-input-stream, echo-stream-output-stream              [Function]</a>, Previous: <a href="make_002dtwo_002dway_002dstream.html" accesskey="p" rel="prev">make-two-way-stream                                              [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="two_002dway_002dstream_002dinput_002dstream_002c-two_002dway_002dstream_002doutput_002dstream"><span>21.2.43 two-way-stream-input-stream, two-way-stream-output-stream<a class="copiable-link" href="#two_002dway_002dstream_002dinput_002dstream_002c-two_002dway_002dstream_002doutput_002dstream"> &para;</a></span></h4>
+<div class="flushright"><p class="flushright-paragraph"><i class="i">[Function]</i>
+</p></div>
+<p><code class="code">two-way-stream-input-stream</code>  <i class="i">two-way-stream</i> &rArr;  <i class="i">input-stream</i>
+</p>
+<p><code class="code">two-way-stream-output-stream</code>  <i class="i">two-way-stream</i> &rArr;  <i class="i">output-stream</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-444"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-444"> &para;</a></span></h4>
+
+<p><i class="i">two-way-stream</i>&mdash;a <i class="i">two-way stream</i>.
+</p>
+<p><i class="i">input-stream</i>&mdash;an <i class="i">input</i> <i class="i">stream</i>.
+</p>
+<p><i class="i">output-stream</i>&mdash;an <i class="i">output</i> <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-574"><span>Description::<a class="copiable-link" href="#Description_003a_003a-574"> &para;</a></span></h4>
+
+<p><b class="b">two-way-stream-input-stream</b> returns the <i class="i">stream</i>
+from which <i class="i">two-way-stream</i> receives input.
+</p>
+<p><b class="b">two-way-stream-output-stream</b> returns the <i class="i">stream</i> 
+to which <i class="i">two-way-stream</i> sends output.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/type.html
@@ -0,0 +1,276 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>type (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="type (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="type (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Evaluation-and-Compilation-Dictionary.html" rel="up" title="Evaluation and Compilation Dictionary">
+<link href="inline.html" rel="next" title="inline">
+<link href="dynamic_002dextent.html" rel="prev" title="dynamic-extent">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="type">
+<div class="nav-panel">
+<p>
+Next: <a href="inline.html" accesskey="n" rel="next">inline, notinline                                             [Declaration]</a>, Previous: <a href="dynamic_002dextent.html" accesskey="p" rel="prev">dynamic-extent                                                [Declaration]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html" accesskey="u" rel="up">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="type-_005bDeclaration_005d"><span>3.8.21 type                                                          [Declaration]<a class="copiable-link" href="#type-_005bDeclaration_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-4"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-4"> &para;</a></span></h4>
+
+<p><code class="t">(type <i class="i">typespec</i> {<i class="i">var</i>}*)</code>
+</p>
+<p><code class="t">(<i class="i">typespec</i> {<i class="i">var</i>}*)</code>
+</p>
+<h4 class="subsubheading" id="Arguments_003a_003a-4"><span>Arguments::<a class="copiable-link" href="#Arguments_003a_003a-4"> &para;</a></span></h4>
+
+<p><i class="i">typespec</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<p><i class="i">var</i>&mdash;a <i class="i">variable</i> <i class="i">name</i>.
+</p>
+<h4 class="subsubheading" id="Valid-Context_003a_003a-2"><span>Valid Context::<a class="copiable-link" href="#Valid-Context_003a_003a-2"> &para;</a></span></h4>
+
+<p><i class="i">declaration</i> or <i class="i">proclamation</i>
+</p>
+<h4 class="subsubheading" id="Binding-Types-Affected_003a_003a-2"><span>Binding Types Affected::<a class="copiable-link" href="#Binding-Types-Affected_003a_003a-2"> &para;</a></span></h4>
+
+<p><i class="i">variable</i>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-20"><span>Description::<a class="copiable-link" href="#Description_003a_003a-20"> &para;</a></span></h4>
+
+<p>Affects
+only variable <i class="i">bindings</i> and specifies that the
+<i class="i">vars</i> take on 
+values only of the specified <i class="i">typespec</i>.
+In particular, values assigned to the variables by <b class="b">setq</b>,
+as well as the initial values of the <i class="i">vars</i> must be of
+the specified <i class="i">typespec</i>.
+<b class="b">type</b> declarations never apply to function <i class="i">bindings</i> (see <b class="b">ftype</b>).
+</p>
+<p>A type declaration of a <i class="i">symbol</i> 
+defined by <b class="b">symbol-macrolet</b> is equivalent
+to wrapping a <b class="b">the</b> 
+expression around the expansion of that <i class="i">symbol</i>,
+</p>
+<p>although the <i class="i">symbol</i>&rsquo;s <i class="i">macro expansion</i> is not actually affected.
+</p>
+<p>The meaning of a type declaration
+  is equivalent to changing each reference to 
+a variable (<i class="i">var</i>) within the scope of the
+  declaration to <code class="t">(the <i class="i">typespec</i> <i class="i">var</i>)</code>,
+changing each expression assigned to the
+  variable (<i class="i">new-value</i>) within the scope of the declaration to 
+<code class="t">(the <i class="i">typespec</i> <i class="i">new-value</i>)</code>,
+  and executing 
+<code class="t">(the <i class="i">typespec</i> <i class="i">var</i>)</code> at the moment the scope of the declaration
+  is entered.
+</p>
+<p>A <i class="i">type</i> declaration is valid in all declarations. The interpretation
+  of a type declaration is as follows:
+</p><dl class="table">
+<dt>1.</dt>
+<dd><p>During the execution of any reference to the
+  declared variable within the scope of the declaration, the consequences
+are 
+undefined
+if
+  the value of the declared variable is not of the declared <i class="i">type</i>.
+</p>
+</dd>
+<dt>2.</dt>
+<dd><p>During the execution of any 
+<b class="b">setq</b> of the declared variable within the scope
+  of the declaration, the consequences are 
+undefined
+if the newly assigned value of the
+  declared variable is not of the declared <i class="i">type</i>. 
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>At the moment the
+  scope of the declaration is entered, the consequences are 
+undefined
+if the value of the
+  declared variable is not of the declared <i class="i">type</i>.
+</p></dd>
+</dl>
+
+<p>A <i class="i">type</i> declaration affects only variable references within
+its scope.
+</p>
+<p>If nested <i class="i">type</i> declarations refer to the same variable,
+  then the value of the variable must be a member of the intersection of
+  the declared <i class="i">types</i>.
+</p>
+<p>If there is a local <code class="t">type</code> declaration for a dynamic
+  variable, and there is also a global <code class="t">type</code> proclamation for that same
+  variable, then the value of the variable within the scope of the local
+  declaration must be a member of the intersection of the two declared
+  <i class="i">types</i>.
+</p>
+<p><b class="b">type</b> declarations can  be <i class="i">free declarations</i>
+or <i class="i">bound declarations</i>.
+</p>
+<p>A <i class="i">symbol</i> cannot be both the name of a <i class="i">type</i> and the name of a
+declaration.  Defining a <i class="i">symbol</i> as the <i class="i">name</i> of a <i class="i">class</i>,
+<i class="i">structure</i>, <i class="i">condition</i>, or <i class="i">type</i>, when the <i class="i">symbol</i>
+has been <i class="i">declared</i> as a declaration name, or vice versa, signals an error.
+</p>
+<p>Within the <i class="i">lexical scope</i> of an <b class="b">array</b> type declaration, 
+all references to <i class="i">array</i> <i class="i">elements</i> are assumed to satisfy the
+<i class="i">expressed array element type</i> (as opposed to the <i class="i">upgraded array element type</i>).
+A compiler can treat
+the code within the scope of the <b class="b">array</b> type declaration as if each
+<i class="i">access</i> of an <i class="i">array</i> <i class="i">element</i> were surrounded by an appropriate 
+<b class="b">the</b> form.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-17"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-17"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun f (x y)
+   (declare (type fixnum x y))
+   (let ((z (+ x y)))
+     (declare (type fixnum z))
+     z)) &rArr;  F
+ (f 1 2) &rArr;  3
+ ;; The previous definition of F is equivalent to
+ (defun f (x y)
+   ;; This declaration is a shorthand form of the TYPE declaration
+   (declare (fixnum x y))
+   ;; To declare the type of a return value, it's not necessary to
+   ;; create a named variable.  A THE special form can be used instead.
+   (the fixnum (+ x y))) &rArr;  F
+ (f 1 2) &rArr;  3
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (defvar *one-array* (make-array 10 :element-type '(signed-byte 5)))
+ (defvar *another-array* (make-array 10 :element-type '(signed-byte 8)))
+
+ (defun frob (an-array)
+   (declare (type (array (signed-byte 5) 1) an-array))
+   (setf (aref an-array 1) 31)
+   (setf (aref an-array 2) 127)
+   (setf (aref an-array 3) (* 2 (aref an-array 3)))
+   (let ((foo 0))
+     (declare (type (signed-byte 5) foo))
+     (setf foo (aref an-array 0))))
+
+ (frob *one-array*)
+ (frob *another-array*)
+</pre></div>
+
+<p>The above definition of <code class="t">frob</code> is equivalent to:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun frob (an-array)
+   (setf (the (signed-byte 5) (aref an-array 1)) 31)
+   (setf (the (signed-byte 5) (aref an-array 2)) 127)
+   (setf (the (signed-byte 5) (aref an-array 3))
+         (* 2 (the (signed-byte 5) (aref an-array 3))))
+   (let ((foo 0))
+     (declare (type (signed-byte 5) foo))
+     (setf foo (the (signed-byte 5) (aref an-array 0)))))
+</pre></div>
+
+<p>Given an implementation in which 
+<i class="i">fixnums</i> are 29 bits but <b class="b">fixnum</b> <i class="i">arrays</i> 
+are upgraded to signed 32-bit <i class="i">arrays</i>,
+the following 
+could be compiled with all <i class="i">fixnum</i> arithmetic:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun bump-counters (counters)
+   (declare (type (array fixnum *) bump-counters))
+   (dotimes (i (length counters))
+     (incf (aref counters i))))
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-20"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-20"> &para;</a></span></h4>
+
+<p><b class="b">declare</b>,
+<a class="ref" href="declaim.html">declaim                                                             [Macro]</a>
+,
+<a class="ref" href="proclaim.html">proclaim                                                         [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-13"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-13"> &para;</a></span></h4>
+
+<p><code class="t">(<i class="i">typespec</i> {<i class="i">var</i>}*)</code> 
+is an abbreviation for <code class="t">(type <i class="i">typespec</i> {<i class="i">var</i>}*)</code>.
+</p>
+<p>A <b class="b">type</b> declaration for the arguments to a function does not
+necessarily imply anything about the type of the result.  The following
+function is not permitted to be compiled using <i class="i">implementation-dependent</i>
+<i class="i">fixnum</i>-only arithmetic:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun f (x y) (declare (fixnum x y)) (+ x y))
+</pre></div>
+
+<p>To see why, consider <code class="t">(f most-positive-fixnum 1)</code>.
+Common Lisp defines that <code class="t">F</code> must return a <i class="i">bignum</i> here, rather
+than signal an error or produce a mathematically incorrect result.
+If you have special knowledge such &ldquo;<i class="i">fixnum</i> overflow&rdquo; cases will
+not come up, you can declare the result value to be in the <i class="i">fixnum</i>
+range, enabling some compilers to use more efficient arithmetic:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun f (x y)
+   (declare (fixnum x y))
+   (the fixnum (+ x y)))
+</pre></div>
+
+<p>Note, however, that in the three-argument case, because of the possibility
+of an implicit intermediate value growing too large, the following will not
+cause <i class="i">implementation-dependent</i> <i class="i">fixnum</i>-only arithmetic to be used:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun f (x y)
+   (declare (fixnum x y z))
+   (the fixnum (+ x y z)))
+</pre></div>
+
+<p>To see why, consider <code class="t">(f most-positive-fixnum 1 -1).</code>
+Although the arguments and the result are all <i class="i">fixnums</i>, an intermediate
+value is not a <i class="i">fixnum</i>.  If it is important that 
+<i class="i">implementation-dependent</i> <i class="i">fixnum</i>-only arithmetic be selected
+in <i class="i">implementations</i> that provide it, 
+consider writing something like this instead:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun f (x y)
+   (declare (fixnum x y z))
+   (the fixnum (+ (the fixnum (+ x y)) z)))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="inline.html">inline, notinline                                             [Declaration]</a>, Previous: <a href="dynamic_002dextent.html">dynamic-extent                                                [Declaration]</a>, Up: <a href="Evaluation-and-Compilation-Dictionary.html">Evaluation and Compilation Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/type_002derror.html
@@ -0,0 +1,63 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>type-error (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="type-error (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="type-error (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="type_002derror_002ddatum.html" rel="next" title="type-error-datum">
+<link href="typep.html" rel="prev" title="typep">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="type_002derror">
+<div class="nav-panel">
+<p>
+Next: <a href="type_002derror_002ddatum.html" accesskey="n" rel="next">type-error-datum, type-error-expected-type                       [Function]</a>, Previous: <a href="typep.html" accesskey="p" rel="prev">typep                                                            [Function]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="type_002derror-_005bCondition-Type_005d"><span>4.4.29 type-error                                                 [Condition Type]<a class="copiable-link" href="#type_002derror-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-13"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-13"> &para;</a></span></h4>
+<p><b class="b">type-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-51"><span>Description::<a class="copiable-link" href="#Description_003a_003a-51"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">type-error</b> represents a situation in which an <i class="i">object</i> is not
+of the expected type.  The &ldquo;offending datum&rdquo; and &ldquo;expected type&rdquo; are initialized 
+by the initialization arguments named <code class="t">:datum</code> and <code class="t">:expected-type</code> to <b class="b">make-condition</b>,
+and are <i class="i">accessed</i> by the functions 
+<b class="b">type-error-datum</b> and <b class="b">type-error-expected-type</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-38"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-38"> &para;</a></span></h4>
+
+<p><a class="ref" href="type_002derror_002ddatum.html">type-error-datum, type-error-expected-type                       [Function]</a>
+, <b class="b">type-error-expected-type</b>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/type_002derror_002ddatum.html
@@ -0,0 +1,89 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>type-error-datum (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="type-error-datum (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="type-error-datum (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="simple_002dtype_002derror.html" rel="next" title="simple-type-error">
+<link href="type_002derror.html" rel="prev" title="type-error">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="type_002derror_002ddatum">
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002dtype_002derror.html" accesskey="n" rel="next">simple-type-error                                          [Condition Type]</a>, Previous: <a href="type_002derror.html" accesskey="p" rel="prev">type-error                                                 [Condition Type]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="type_002derror_002ddatum_002c-type_002derror_002dexpected_002dtype-_005bFunction_005d"><span>4.4.30 type-error-datum, type-error-expected-type                       [Function]<a class="copiable-link" href="#type_002derror_002ddatum_002c-type_002derror_002dexpected_002dtype-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">type-error-datum</code>  <i class="i">condition</i> &rArr;  <i class="i">datum</i>
+</p>
+<p><code class="code">type-error-expected-type</code>  <i class="i">condition</i> &rArr;  <i class="i">expected-type</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-24"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-24"> &para;</a></span></h4>
+
+<p><i class="i">condition</i>&mdash;a <i class="i">condition</i> of <i class="i">type</i> <b class="b">type-error</b>.
+</p>
+<p><i class="i">datum</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">expected-type</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-52"><span>Description::<a class="copiable-link" href="#Description_003a_003a-52"> &para;</a></span></h4>
+
+<p><b class="b">type-error-datum</b> returns the offending datum in the <i class="i">situation</i>
+represented by the <i class="i">condition</i>.
+</p>
+<p><b class="b">type-error-expected-type</b> returns the expected type of the
+offending datum in the <i class="i">situation</i> represented by the <i class="i">condition</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-31"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-31"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun fix-digits (condition)
+   (check-type condition type-error)
+   (let* ((digits '(zero one two three four
+                   five six seven eight nine))
+         (val (position (type-error-datum condition) digits)))
+     (if (and val (subtypep 'fixnum (type-error-expected-type condition)))
+         (store-value 7))))
+
+ (defun foo (x)
+   (handler-bind ((type-error #'fix-digits))
+     (check-type x number)
+     (+ x 3)))
+
+ (foo 'seven)
+&rArr;  10
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-39"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-39"> &para;</a></span></h4>
+
+<p><b class="b">type-error</b>,
+<a class="ref" href="Conditions.html">Conditions</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/type_002dof.html
@@ -0,0 +1,180 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>type-of (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="type-of (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="type-of (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="typep.html" rel="next" title="typep">
+<link href="subtypep.html" rel="prev" title="subtypep">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="type_002dof">
+<div class="nav-panel">
+<p>
+Next: <a href="typep.html" accesskey="n" rel="next">typep                                                            [Function]</a>, Previous: <a href="subtypep.html" accesskey="p" rel="prev">subtypep                                                         [Function]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="type_002dof-_005bFunction_005d"><span>4.4.27 type-of                                                          [Function]<a class="copiable-link" href="#type_002dof-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">type-of</code>  <i class="i">object</i> &rArr;  <i class="i">typespec</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-22"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-22"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">typespec</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-49"><span>Description::<a class="copiable-link" href="#Description_003a_003a-49"> &para;</a></span></h4>
+
+<p>Returns a <i class="i">type specifier</i>, <i class="i">typespec</i>, for a <i class="i">type</i> 
+that has the <i class="i">object</i> as an <i class="i">element</i>.
+The <i class="i">typespec</i> satisfies the following:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>For any <i class="i">object</i> that is an <i class="i">element</i> of some <i class="i">built-in type</i>:
+</p>
+<dl class="table">
+<dt>a.</dt>
+<dd><p>the <i class="i">type</i> returned is a <i class="i">recognizable subtype</i> of that <i class="i">built-in type</i>.
+</p>
+</dd>
+<dt>b.</dt>
+<dd><p>the <i class="i">type</i> returned does not involve 
+     <code class="t">and</code>,
+     <code class="t">eql</code>,
+     <code class="t">member</code>,
+     <code class="t">not</code>,
+     <code class="t">or</code>, 
+     <code class="t">satisfies</code>,
+  or <code class="t">values</code>.
+</p></dd>
+</dl>
+
+</dd>
+<dt>2.</dt>
+<dd><p>For all <i class="i">objects</i>, <code class="t">(typep <i class="i">object</i> (type-of <i class="i">object</i>))</code> 
+returns <i class="i">true</i>.
+Implicit in this is that <i class="i">type specifiers</i> which are
+not valid for use with <b class="b">typep</b>, such as the <i class="i">list</i> form of the
+<b class="b">function</b> <i class="i">type specifier</i>, are never returned by <b class="b">type-of</b>.
+</p>
+</dd>
+<dt>3.</dt>
+<dd><p>The <i class="i">type</i> returned by <b class="b">type-of</b> is always a <i class="i">recognizable subtype</i>
+of the <i class="i">class</i> returned by <b class="b">class-of</b>.  That is,
+</p>
+<div class="example">
+<pre class="example-preformatted"> (subtypep (type-of <i class="i">object</i>) (class-of <i class="i">object</i>)) &rArr;  <i class="i">true</i>, <i class="i">true</i>
+</pre></div>
+
+</dd>
+<dt>4.</dt>
+<dd><p>For <i class="i">objects</i> of metaclass <b class="b">structure-class</b> or <b class="b">standard-class</b>,
+</p>
+<p>and for <i class="i">conditions</i>,
+</p>
+<p><b class="b">type-of</b> returns the <i class="i">proper name</i> of the <i class="i">class</i> returned 
+by <b class="b">class-of</b> if it has a <i class="i">proper name</i>,
+and otherwise returns the <i class="i">class</i> itself.
+In particular, for <i class="i">objects</i> created by the constructor function
+of a structure defined with <b class="b">defstruct</b> without a <code class="t">:type</code> option,
+<b class="b">type-of</b> returns the structure name; and for <i class="i">objects</i> created 
+by <b class="b">make-condition</b>, the <i class="i">typespec</i> is the <i class="i">name</i> of the
+<i class="i">condition</i> <i class="i">type</i>.
+</p>
+</dd>
+<dt>5.</dt>
+<dd><p>For each of the <i class="i">types</i>
+     <b class="b">short-float</b>, 
+     <b class="b">single-float</b>,
+     <b class="b">double-float</b>,
+  or <b class="b">long-float</b>
+of which the <i class="i">object</i> is an <i class="i">element</i>,
+the <i class="i">typespec</i> is a <i class="i">recognizable subtype</i> of that <i class="i">type</i>.
+</p>
+</dd>
+</dl>
+
+<h4 class="subsubheading" id="Examples_003a_003a-29"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-29"> &para;</a></span></h4>
+
+
+<div class="example">
+<pre class="example-preformatted"> (type-of 'a) &rArr;  SYMBOL          
+ (type-of '(1 . 2))
+&rArr;  CONS
+<i class="i">OR</i>&rArr; (CONS FIXNUM FIXNUM)
+ (type-of #c(0 1))
+&rArr;  COMPLEX
+<i class="i">OR</i>&rArr; (COMPLEX INTEGER)
+ (defstruct temp-struct x y z) &rArr;  TEMP-STRUCT
+ (type-of (make-temp-struct)) &rArr;  TEMP-STRUCT
+ (type-of &quot;abc&quot;)
+&rArr;  STRING
+<i class="i">OR</i>&rArr; (STRING 3)
+ (subtypep (type-of &quot;abc&quot;) 'string) &rArr;  <i class="i">true</i>, <i class="i">true</i>
+ (type-of (expt 2 40))
+&rArr;  BIGNUM
+<i class="i">OR</i>&rArr; INTEGER
+<i class="i">OR</i>&rArr; (INTEGER 1099511627776 1099511627776)
+<i class="i">OR</i>&rArr; SYSTEM::TWO-WORD-BIGNUM
+<i class="i">OR</i>&rArr; FIXNUM
+ (subtypep (type-of 112312) 'integer) &rArr;  <i class="i">true</i>, <i class="i">true</i>
+ (defvar *foo* (make-array 5 :element-type t)) &rArr;  *FOO*
+ (class-name (class-of *foo*)) &rArr;  VECTOR
+ (type-of *foo*)
+&rArr;  VECTOR
+<i class="i">OR</i>&rArr; (VECTOR T 5)
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-36"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-36"> &para;</a></span></h4>
+
+<p><a class="ref" href="array_002delement_002dtype.html">array-element-type                                               [Function]</a>
+,
+<a class="ref" href="class_002dof.html">class-of                                                         [Function]</a>
+,
+<a class="ref" href="defstruct.html">defstruct                                                           [Macro]</a>
+,
+<a class="ref" href="typecase.html">typecase, ctypecase, etypecase                                      [Macro]</a>
+,
+<a class="ref" href="typep.html">typep                                                            [Function]</a>
+,
+<a class="ref" href="Types.html">Types</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-22"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-22"> &para;</a></span></h4>
+
+<p>Implementors are encouraged to arrange for <b class="b">type-of</b> to return
+</p>
+<p>a portable value.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="typep.html">typep                                                            [Function]</a>, Previous: <a href="subtypep.html">subtypep                                                         [Function]</a>, Up: <a href="Types-and-Classes-Dictionary.html">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/typecase.html
@@ -0,0 +1,229 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>typecase (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="typecase (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="typecase (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="multiple_002dvalue_002dbind.html" rel="next" title="multiple-value-bind">
+<link href="case.html" rel="prev" title="case">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="typecase">
+<div class="nav-panel">
+<p>
+Next: <a href="multiple_002dvalue_002dbind.html" accesskey="n" rel="next">multiple-value-bind                                                 [Macro]</a>, Previous: <a href="case.html" accesskey="p" rel="prev">case, ccase, ecase                                                  [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="typecase_002c-ctypecase_002c-etypecase-_005bMacro_005d"><span>5.3.47 typecase, ctypecase, etypecase                                      [Macro]<a class="copiable-link" href="#typecase_002c-ctypecase_002c-etypecase-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">typecase</code>  <i class="i">keyform  {!<i class="i">normal-clause</i>}* <span class="r">[</span>!<i class="i">otherwise-clause</i><span class="r">]</span></i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><code class="code">ctypecase</code>  <i class="i">keyplace {!<i class="i">normal-clause</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><code class="code">etypecase</code>  <i class="i">keyform  {!<i class="i">normal-clause</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><i class="i">normal-clause</i>&nbsp;::=<span class="r">(</span>type&nbsp;{<i class="i">form</i>}*<span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">otherwise-clause</i>&nbsp;::=<span class="r">(</span>{otherwise&nbsp;|&nbsp;t}&nbsp;{<i class="i">form</i>}*<span class="r">)</span><!-- /@w -->
+</p>
+<p><i class="i">clause</i>&nbsp;::=normal-clause&nbsp;|&nbsp;otherwise-clause<!-- /@w -->
+</p>
+<a class="index-entry-id" id="index-otherwise-1"></a>
+
+<a class="index-entry-id" id="index-t-2"></a>
+
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-66"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-66"> &para;</a></span></h4>
+
+<p><i class="i">keyform</i>&mdash;a <i class="i">form</i>; evaluated to produce a <i class="i">test-key</i>.
+</p>
+<p><i class="i">keyplace</i>&mdash;a <i class="i">form</i>; evaluated initially to produce a <i class="i">test-key</i>.
+   Possibly also used later as a <i class="i">place</i> if no <i class="i">types</i> match.
+</p>
+<p><i class="i">test-key</i>&mdash;an object produced by evaluating <i class="i">keyform</i> or <i class="i">keyplace</i>.
+</p>
+<p><i class="i">type</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">forms</i> 
+		  in the matching <i class="i">clause</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-100"><span>Description::<a class="copiable-link" href="#Description_003a_003a-100"> &para;</a></span></h4>
+
+<p>These <i class="i">macros</i> allow the conditional execution of a body of <i class="i">forms</i>
+in a <i class="i">clause</i> that is selected by matching the <i class="i">test-key</i> on the basis 
+of its <i class="i">type</i>.
+</p>
+<p>The <i class="i">keyform</i> or <i class="i">keyplace</i> is <i class="i">evaluated</i> to produce the
+<i class="i">test-key</i>.
+</p>
+<p>Each of the <i class="i">normal-clauses</i> is then considered in turn.
+If the <i class="i">test-key</i> is of the <i class="i">type</i> 
+given by the <i class="i">clauses</i>&rsquo;s <i class="i">type</i>,
+the <i class="i">forms</i> in that <i class="i">clause</i> are
+<i class="i">evaluated</i> as an <i class="i">implicit progn</i>, and the <i class="i">values</i>
+it returns are returned as the value of the <b class="b">typecase</b>,
+<b class="b">ctypecase</b>, or <b class="b">etypecase</b> <i class="i">form</i>.
+</p>
+<p>These <i class="i">macros</i> differ only in their <i class="i">behavior</i> when 
+no <i class="i">normal-clause</i> matches; specifically:
+</p>
+<dl class="table">
+<dt><b class="b">typecase</b></dt>
+<dd><p>If no <i class="i">normal-clause</i> matches, and there is an <i class="i">otherwise-clause</i>,
+then that <i class="i">otherwise-clause</i> automatically matches; the <i class="i">forms</i> in
+that <i class="i">clause</i> are <i class="i">evaluated</i> as an <i class="i">implicit progn</i>, 
+and the <i class="i">values</i> it returns are returned as the value of the <b class="b">typecase</b>.
+</p>
+<p>If there is no <i class="i">otherwise-clause</i>, <b class="b">typecase</b> returns <b class="b">nil</b>.
+</p>
+</dd>
+<dt><b class="b">ctypecase</b></dt>
+<dd><p>If no <i class="i">normal-clause</i> matches,
+a <i class="i">correctable</i> <i class="i">error</i> of <i class="i">type</i> <b class="b">type-error</b> is signaled.
+The offending datum is the <i class="i">test-key</i> and
+the expected type is <i class="i">type equivalent</i> to <code class="t">(or <i class="i">type1</i> <i class="i">type2</i> ...)</code>.
+The <b class="b">store-value</b> <i class="i">restart</i> can be used to correct the error.
+</p>
+<p>If the <b class="b">store-value</b> <i class="i">restart</i> is invoked, its <i class="i">argument</i> becomes the 
+new <i class="i">test-key</i>, and is stored in <i class="i">keyplace</i> as if by
+<code class="t">(setf <i class="i">keyplace</i> <i class="i">test-key</i>)</code>.
+Then <b class="b">ctypecase</b> starts over, considering each <i class="i">clause</i> anew.
+</p>
+<p>If the <b class="b">store-value</b> <i class="i">restart</i> is invoked interactively, 
+the user is prompted for a new <i class="i">test-key</i> to use.
+</p>
+<p>The subforms of <i class="i">keyplace</i> might be evaluated again if
+none of the cases holds.
+</p>
+</dd>
+<dt><b class="b">etypecase</b></dt>
+<dd><p>If no <i class="i">normal-clause</i> matches,
+a <i class="i">non-correctable</i> <i class="i">error</i> of <i class="i">type</i> <b class="b">type-error</b> is signaled.
+The offending datum is the <i class="i">test-key</i> and
+the expected type is <i class="i">type equivalent</i> to <code class="t">(or <i class="i">type1</i> <i class="i">type2</i> ...)</code>.
+</p>
+<p>Note that in contrast with <b class="b">ctypecase</b>,
+the caller of <b class="b">etypecase</b> may rely on the fact that <b class="b">etypecase</b> 
+does not return if a <i class="i">normal-clause</i> does not match.
+</p>
+</dd>
+</dl>
+
+<p>In all three cases, is permissible for more than one <i class="i">clause</i> to specify a
+matching <i class="i">type</i>, particularly if one is a <i class="i">subtype</i> of another;
+the earliest applicable <i class="i">clause</i> is chosen.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-74"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-74"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">;;; (Note that the parts of this example which use TYPE-OF 
+;;;  are implementation-dependent.)
+ (defun what-is-it (x)
+   (format t &quot;~&amp;~S is ~A.~
+           x (typecase x
+               (float &quot;a float&quot;)
+               (null &quot;a symbol, boolean false, or the empty list&quot;)
+               (list &quot;a list&quot;)
+               (t (format nil &quot;a(n) ~(~A~)&quot; (type-of x))))))
+&rArr;  WHAT-IS-IT
+ (map 'nil #'what-is-it '(nil (a b) 7.0 7 box))
+<code class="t"> |&gt; </code> NIL is a symbol, boolean false, or the empty list.
+<code class="t"> |&gt; </code> (A B) is a list.
+<code class="t"> |&gt; </code> 7.0 is a float.
+<code class="t"> |&gt; </code> 7 is a(n) integer.
+<code class="t"> |&gt; </code> BOX is a(n) symbol.
+&rArr;  NIL
+ (setq x 1/3)
+&rArr;  1/3
+ (ctypecase x
+     (integer (* x 4))
+     (symbol  (symbol-value x)))
+<code class="t"> |&gt; </code> Error: The value of X, 1/3, is neither an integer nor a symbol.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Specify a value to use instead.
+<code class="t"> |&gt; </code>  2: Return to Lisp Toplevel.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:CONTINUE 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Use value: <b class="b">|&gt;&gt;</b><code class="t">3.7</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Error: The value of X, 3.7, is neither an integer nor a symbol.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Specify a value to use instead.
+<code class="t"> |&gt; </code>  2: Return to Lisp Toplevel.
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:CONTINUE 1</code><b class="b">&lt;&lt;|</b>
+<code class="t"> |&gt; </code> Use value: <b class="b">|&gt;&gt;</b><code class="t">12</code><b class="b">&lt;&lt;|</b>
+&rArr;  48
+ x &rArr;  12
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-6"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-6"> &para;</a></span></h4>
+
+<p><b class="b">ctypecase</b> and <b class="b">etypecase</b>, since they might signal an error,
+are potentially affected by existing <i class="i">handlers</i> and <b class="b">*debug-io*</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-19"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-19"> &para;</a></span></h4>
+
+<p><b class="b">ctypecase</b> and <b class="b">etypecase</b> signal an error of <i class="i">type</i> <b class="b">type-error</b>
+if no <i class="i">normal-clause</i> matches.
+</p>
+<p>The <i class="i">compiler</i> may choose to issue a warning of <i class="i">type</i> <b class="b">style-warning</b>
+if a <i class="i">clause</i> will never be selected because it is completely 
+shadowed by earlier clauses.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-84"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-84"> &para;</a></span></h4>
+
+<p><a class="ref" href="case.html">case, ccase, ecase                                                  [Macro]</a>
+,
+<a class="ref" href="cond.html">cond                                                                [Macro]</a>
+,
+<a class="ref" href="setf.html">setf, psetf                                                         [Macro]</a>
+,
+<a class="ref" href="Generalized-Reference.html">Generalized Reference</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-54"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-54"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">(typecase <i class="i">test-key</i>
+  {(<i class="i">type</i> {<i class="i">form</i>}*)}*)
+&equiv;
+(let ((#1=#:g0001 <i class="i">test-key</i>))
+  (cond {((typep #1# '<i class="i">type</i>) {<i class="i">form</i>}*)}*))
+</pre></div>
+
+<p>The specific error message used by <b class="b">etypecase</b> and <b class="b">ctypecase</b> can vary
+between implementations.  In situations where control of the specific wording 
+of the error message is important, it is better to use <b class="b">typecase</b> with an
+<i class="i">otherwise-clause</i> that explicitly signals an error with an appropriate 
+message.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="multiple_002dvalue_002dbind.html">multiple-value-bind                                                 [Macro]</a>, Previous: <a href="case.html">case, ccase, ecase                                                  [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/typep.html
@@ -0,0 +1,172 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>typep (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="typep (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="typep (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="type_002derror.html" rel="next" title="type-error">
+<link href="type_002dof.html" rel="prev" title="type-of">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="typep">
+<div class="nav-panel">
+<p>
+Next: <a href="type_002derror.html" accesskey="n" rel="next">type-error                                                 [Condition Type]</a>, Previous: <a href="type_002dof.html" accesskey="p" rel="prev">type-of                                                          [Function]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="typep-_005bFunction_005d"><span>4.4.28 typep                                                            [Function]<a class="copiable-link" href="#typep-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">typep</code>  <i class="i">object type-specifier <span class="r">&amp;optional</span> environment</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-23"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-23"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">type-specifier</i>&mdash;any <i class="i">type specifier</i> except 
+</p>
+<p><b class="b">values</b>, or a <i class="i">type specifier</i> list
+whose first element is either <b class="b">function</b> or <b class="b">values</b>.
+</p>
+<p><i class="i">environment</i>&mdash;an <i class="i">environment</i> <i class="i">object</i>.
+  The default is <b class="b">nil</b>, denoting the <i class="i">null lexical environment</i>
+	   and the and current <i class="i">global environment</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-50"><span>Description::<a class="copiable-link" href="#Description_003a_003a-50"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of the <i class="i">type</i> specified by <i class="i">type-specifier</i>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<p>A <i class="i">type-specifier</i> of the form <code class="t">(satisfies fn)</code> 
+is handled by applying the function <code class="t">fn</code> to <i class="i">object</i>.
+</p>
+<p><code class="t">(typep <i class="i">object</i> '(array <i class="i">type-specifier</i>))</code>, 
+where <i class="i">type-specifier</i> is not <code class="t">*</code>,   
+returns <i class="i">true</i> if and only if <i class="i">object</i> is an <i class="i">array</i> 
+that could be the result 
+of supplying <i class="i">type-specifier</i> 
+as the <code class="t">:element-type</code> argument to <b class="b">make-array</b>.
+<code class="t">(array *)</code> refers to all <i class="i">arrays</i> 
+regardless of element type, while <code class="t">(array <i class="i">type-specifier</i>)</code>
+refers only to those <i class="i">arrays</i> 
+that can result from giving <i class="i">type-specifier</i> as the
+<code class="t">:element-type</code> argument to <b class="b">make-array</b>.  
+A similar interpretation applies to <code class="t">(simple-array <i class="i">type-specifier</i>)</code> 
+and <code class="t">(vector <i class="i">type-specifier</i>)</code>.
+See <a class="ref" href="Array-Upgrading.html">Array Upgrading</a>.
+</p>
+<p><code class="t">(typep <i class="i">object</i> '(complex <i class="i">type-specifier</i>))</code>
+returns <i class="i">true</i> for all <i class="i">complex</i> numbers that can result from 
+giving <i class="i">numbers</i> of type <i class="i">type-specifier</i>
+to the <i class="i">function</i> <b class="b">complex</b>, plus all other <i class="i">complex</i> numbers 
+of the same specialized representation.      
+Both the real and the imaginary parts of any such 
+<i class="i">complex</i> number must satisfy:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (typep realpart 'type-specifier)
+ (typep imagpart 'type-specifier)
+</pre></div>
+
+<p>See the <i class="i">function</i> <b class="b">upgraded-complex-part-type</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-30"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-30"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (typep 12 'integer) &rArr;  <i class="i">true</i>
+ (typep (1+ most-positive-fixnum) 'fixnum) &rArr;  <i class="i">false</i>
+ (typep nil t) &rArr;  <i class="i">true</i>
+ (typep nil nil) &rArr;  <i class="i">false</i>
+ (typep 1 '(mod 2)) &rArr;  <i class="i">true</i>
+ (typep #c(1 1) '(complex (eql 1))) &rArr;  <i class="i">true</i>
+;; To understand this next example, you might need to refer to
+;; <a class="ref" href="Rule-of-Canonical-Representation-for-Complex-Rationals.html">Rule of Canonical Representation for Complex Rationals</a>.
+ (typep #c(0 0) '(complex (eql 0))) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<p>Let <code class="t">A_x</code> and <code class="t">A_y</code> be two <i class="i">type specifiers</i> that 
+denote different <i class="i">types</i>, but for which
+</p>
+<div class="example">
+<pre class="example-preformatted"> (upgraded-array-element-type 'A_x)
+</pre></div>
+
+<p>and
+</p>
+<div class="example">
+<pre class="example-preformatted"> (upgraded-array-element-type 'A_y)
+</pre></div>
+
+<p>denote the same <i class="i">type</i>.  Notice that
+</p>
+<div class="example">
+<pre class="example-preformatted"> (typep (make-array 0 :element-type 'A_x) '(array A_x)) &rArr;  <i class="i">true</i>
+ (typep (make-array 0 :element-type 'A_y) '(array A_y)) &rArr;  <i class="i">true</i>
+ (typep (make-array 0 :element-type 'A_x) '(array A_y)) &rArr;  <i class="i">true</i>
+ (typep (make-array 0 :element-type 'A_y) '(array A_x)) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-9"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-9"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">error</b> is signaled if <i class="i">type-specifier</i> is <code class="t">values</code>, 
+or a <i class="i">type specifier</i> list whose first element is either
+<b class="b">function</b> or <b class="b">values</b>.
+</p>
+<p>The consequences are undefined if
+the <i class="i">type-specifier</i> is not a <i class="i">type specifier</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-37"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-37"> &para;</a></span></h4>
+
+<p><a class="ref" href="type_002dof.html">type-of                                                          [Function]</a>
+,
+<a class="ref" href="upgraded_002darray_002delement_002dtype.html">upgraded-array-element-type                                      [Function]</a>
+,
+<a class="ref" href="upgraded_002dcomplex_002dpart_002dtype.html">upgraded-complex-part-type                                       [Function]</a>
+,
+<a class="ref" href="Type-Specifiers.html">Type Specifiers</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-23"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-23"> &para;</a></span></h4>
+
+<p><i class="i">Implementations</i> are encouraged to recognize and optimize the case of 
+<code class="t">(typep <i class="i">x</i> (the class <i class="i">y</i>))</code>,
+since it does not involve any need for expansion 
+of <b class="b">deftype</b> information at runtime.
+</p>
+<div class="example">
+<pre class="example-preformatted">
+
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="type_002derror.html">type-error                                                 [Condition Type]</a>, Previous: <a href="type_002dof.html">type-of                                                          [Function]</a>, Up: <a href="Types-and-Classes-Dictionary.html">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/unbound_002dslot.html
@@ -0,0 +1,66 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>unbound-slot (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="unbound-slot (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="unbound-slot (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="unbound_002dslot_002dinstance.html" rel="next" title="unbound-slot-instance">
+<link href="class_002dof.html" rel="prev" title="class-of">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="unbound_002dslot">
+<div class="nav-panel">
+<p>
+Next: <a href="unbound_002dslot_002dinstance.html" accesskey="n" rel="next">unbound-slot-instance                                            [Function]</a>, Previous: <a href="class_002dof.html" accesskey="p" rel="prev">class-of                                                         [Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="unbound_002dslot-_005bCondition-Type_005d"><span>7.7.40 unbound-slot                                               [Condition Type]<a class="copiable-link" href="#unbound_002dslot-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-18"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-18"> &para;</a></span></h4>
+<p><b class="b">unbound-slot</b>,
+<b class="b">cell-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-167"><span>Description::<a class="copiable-link" href="#Description_003a_003a-167"> &para;</a></span></h4>
+
+<p>The <i class="i">object</i> having the unbound slot is initialized by 
+the <code class="t">:instance</code> initialization argument to <b class="b">make-condition</b>,
+and is <i class="i">accessed</i> by the <i class="i">function</i> <b class="b">unbound-slot-instance</b>.
+</p>
+<p>The name of the cell (see <b class="b">cell-error</b>) is the name of the slot.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-149"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-149"> &para;</a></span></h4>
+
+<p><a class="ref" href="cell_002derror_002dname.html">cell-error-name                                                  [Function]</a>
+,
+<b class="b">unbound-slot-object</b>,
+<a class="ref" href="Condition-System-Concepts.html">Condition System Concepts</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/unbound_002dslot_002dinstance.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>unbound-slot-instance (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="unbound-slot-instance (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="unbound-slot-instance (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="unbound_002dslot.html" rel="prev" title="unbound-slot">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="unbound_002dslot_002dinstance">
+<div class="nav-panel">
+<p>
+Previous: <a href="unbound_002dslot.html" accesskey="p" rel="prev">unbound-slot                                               [Condition Type]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="unbound_002dslot_002dinstance-_005bFunction_005d"><span>7.7.41 unbound-slot-instance                                            [Function]<a class="copiable-link" href="#unbound_002dslot_002dinstance-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">unbound-slot-instance</code>  <i class="i">condition</i> &rArr;  <i class="i">instance</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-128"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-128"> &para;</a></span></h4>
+
+<p><i class="i">condition</i>&mdash;a <i class="i">condition</i> of <i class="i">type</i> <b class="b">unbound-slot</b>.
+</p>
+<p><i class="i">instance</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-168"><span>Description::<a class="copiable-link" href="#Description_003a_003a-168"> &para;</a></span></h4>
+
+<p>Returns the instance which had the unbound slot in the <i class="i">situation</i>
+represented by the <i class="i">condition</i>.          
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-150"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-150"> &para;</a></span></h4>
+
+<p><a class="ref" href="cell_002derror_002dname.html">cell-error-name                                                  [Function]</a>
+,
+<b class="b">unbound-slot</b>,
+<a class="ref" href="Condition-System-Concepts.html">Condition System Concepts</a>
+</p>
+
+
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/unbound_002dvariable.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>unbound-variable (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="unbound-variable (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="unbound-variable (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Symbols-Dictionary.html" rel="up" title="Symbols Dictionary">
+<link href="set.html" rel="prev" title="set">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="unbound_002dvariable">
+<div class="nav-panel">
+<p>
+Previous: <a href="set.html" accesskey="p" rel="prev">set                                                              [Function]</a>, Up: <a href="Symbols-Dictionary.html" accesskey="u" rel="up">Symbols Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="unbound_002dvariable-_005bCondition-Type_005d"><span>10.2.20 unbound-variable                                           [Condition Type]<a class="copiable-link" href="#unbound_002dvariable-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-32"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-32"> &para;</a></span></h4>
+<p><b class="b">unbound-variable</b>,
+<b class="b">cell-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-236"><span>Description::<a class="copiable-link" href="#Description_003a_003a-236"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">unbound-variable</b> consists of <i class="i">error</i> <i class="i">conditions</i>
+that represent attempts to <i class="i">read</i> the <i class="i">value</i> of an <i class="i">unbound variable</i>.
+</p>
+<p>The name of the cell (see <b class="b">cell-error</b>) is the <i class="i">name</i> of the 
+<i class="i">variable</i> that was <i class="i">unbound</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-209"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-209"> &para;</a></span></h4>
+
+<p><a class="ref" href="cell_002derror_002dname.html">cell-error-name                                                  [Function]</a>
+</p>
+
+
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/undefined_002dfunction.html
@@ -0,0 +1,67 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>undefined-function (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="undefined-function (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="undefined-function (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="program_002derror.html" rel="prev" title="program-error">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="undefined_002dfunction">
+<div class="nav-panel">
+<p>
+Previous: <a href="program_002derror.html" accesskey="p" rel="prev">program-error                                              [Condition Type]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="undefined_002dfunction-_005bCondition-Type_005d"><span>5.3.69 undefined-function                                         [Condition Type]<a class="copiable-link" href="#undefined_002dfunction-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-17"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-17"> &para;</a></span></h4>
+<p><b class="b">undefined-function</b>,
+<b class="b">cell-error</b>,
+<b class="b">error</b>,
+<b class="b">serious-condition</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-122"><span>Description::<a class="copiable-link" href="#Description_003a_003a-122"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">undefined-function</b> consists of <i class="i">error</i> <i class="i">conditions</i>
+that represent attempts to <i class="i">read</i> the definition of an <i class="i">undefined function</i>.
+</p>
+<p>The name of the cell (see <b class="b">cell-error</b>) is the <i class="i">function name</i>
+which was <i class="i">funbound</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-104"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-104"> &para;</a></span></h4>
+
+<p><a class="ref" href="cell_002derror_002dname.html">cell-error-name                                                  [Function]</a>
+</p>
+
+
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/unexport.html
@@ -0,0 +1,101 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>unexport (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="unexport (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="unexport (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="unintern.html" rel="next" title="unintern">
+<link href="with_002dpackage_002diterator.html" rel="prev" title="with-package-iterator">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="unexport">
+<div class="nav-panel">
+<p>
+Next: <a href="unintern.html" accesskey="n" rel="next">unintern                                                         [Function]</a>, Previous: <a href="with_002dpackage_002diterator.html" accesskey="p" rel="prev">with-package-iterator                                               [Macro]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="unexport-_005bFunction_005d"><span>11.2.14 unexport                                                         [Function]<a class="copiable-link" href="#unexport-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">unexport</code>  <i class="i">symbols <span class="r">&amp;optional</span> package</i> &rArr;  <i class="i"><b class="b">t</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-186"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-186"> &para;</a></span></h4>
+
+<p><i class="i">symbols</i>&mdash;a <i class="i">designator</i> for a <i class="i">list</i> of <i class="i">symbols</i>.
+</p>
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<p>The default is the <i class="i">current package</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-250"><span>Description::<a class="copiable-link" href="#Description_003a_003a-250"> &para;</a></span></h4>
+
+<p><b class="b">unexport</b> reverts external <i class="i">symbols</i> in <i class="i">package</i> to
+internal status; it undoes the effect of <b class="b">export</b>.
+</p>
+<p><b class="b">unexport</b> works only on <i class="i">symbols</i> 
+<i class="i">present</i>
+in <i class="i">package</i>, switching them back to internal status.
+If <b class="b">unexport</b> is given a <i class="i">symbol</i> that is 
+already <i class="i">accessible</i> as an <i class="i">internal symbol</i> in <i class="i">package</i>,
+it does nothing.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-169"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-169"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (in-package &quot;COMMON-LISP-USER&quot;) &rArr;  #&lt;PACKAGE &quot;COMMON-LISP-USER&quot;&gt;
+ (export (intern &quot;CONTRABAND&quot; (make-package 'temp)) 'temp) &rArr;  T
+ (find-symbol &quot;CONTRABAND&quot;) &rArr;  NIL, NIL 
+ (use-package 'temp) &rArr;  T 
+ (find-symbol &quot;CONTRABAND&quot;) &rArr;  CONTRABAND, :INHERITED
+ (unexport 'contraband 'temp) &rArr;  T
+ (find-symbol &quot;CONTRABAND&quot;) &rArr;  NIL, NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-28"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-28"> &para;</a></span></h4>
+
+<p>Package system is modified.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-50"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-50"> &para;</a></span></h4>
+
+<p>Current state of the package system.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-68"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-68"> &para;</a></span></h4>
+
+<p>If <b class="b">unexport</b> is given a <i class="i">symbol</i>
+not <i class="i">accessible</i> in <i class="i">package</i> at all, 
+an error of <i class="i">type</i> <b class="b">package-error</b> is signaled.
+</p>
+<p>The consequences are undefined if <i class="i">package</i> is the <code class="t">KEYWORD</code> <i class="i">package</i>
+or the <code class="t">COMMON-LISP</code> <i class="i">package</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-222"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-222"> &para;</a></span></h4>
+
+<p><a class="ref" href="export.html">export                                                           [Function]</a>
+, <a class="ref" href="Package-Concepts.html">Package Concepts</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/unintern.html
@@ -0,0 +1,115 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>unintern (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="unintern (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="unintern (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="in_002dpackage.html" rel="next" title="in-package">
+<link href="unexport.html" rel="prev" title="unexport">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="unintern">
+<div class="nav-panel">
+<p>
+Next: <a href="in_002dpackage.html" accesskey="n" rel="next">in-package                                                          [Macro]</a>, Previous: <a href="unexport.html" accesskey="p" rel="prev">unexport                                                         [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="unintern-_005bFunction_005d"><span>11.2.15 unintern                                                         [Function]<a class="copiable-link" href="#unintern-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">unintern</code>  <i class="i">symbol <span class="r">&amp;optional</span> package</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-187"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-187"> &para;</a></span></h4>
+
+<p><i class="i">symbol</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+</p>
+<p>The default is the <i class="i">current package</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-251"><span>Description::<a class="copiable-link" href="#Description_003a_003a-251"> &para;</a></span></h4>
+<p><b class="b">unintern</b> removes <i class="i">symbol</i> from <i class="i">package</i>.
+If <i class="i">symbol</i> is <i class="i">present</i> in <i class="i">package</i>, it is
+removed from <i class="i">package</i> and also from <i class="i">package</i>&rsquo;s 
+<i class="i">shadowing symbols list</i> if it is present there.  If <i class="i">package</i> is the
+<i class="i">home package</i> for <i class="i">symbol</i>, <i class="i">symbol</i> is made to have no 
+<i class="i">home package</i>.
+<i class="i">Symbol</i> may continue to be <i class="i">accessible</i>
+in <i class="i">package</i> by inheritance.
+</p>
+<p>Use of <b class="b">unintern</b> can result in a <i class="i">symbol</i> 
+that has no
+recorded <i class="i">home package</i>,
+but that in fact is <i class="i">accessible</i> in some <i class="i">package</i>.
+<span class="r">Common Lisp</span> does not check for this pathological case, 
+and such <i class="i">symbols</i>
+are always printed preceded by <code class="t">#:</code>.
+</p>
+<p><b class="b">unintern</b> returns <i class="i">true</i> if it removes <i class="i">symbol</i>, and <b class="b">nil</b> otherwise.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-170"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-170"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (in-package &quot;COMMON-LISP-USER&quot;) &rArr;  #&lt;PACKAGE &quot;COMMON-LISP-USER&quot;&gt;
+ (setq temps-unpack (intern &quot;UNPACK&quot; (make-package 'temp))) &rArr;  TEMP::UNPACK 
+ (unintern temps-unpack 'temp) &rArr;  T
+ (find-symbol &quot;UNPACK&quot; 'temp) &rArr;  NIL, NIL 
+ temps-unpack &rArr;  #:UNPACK 
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-29"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-29"> &para;</a></span></h4>
+
+<p><b class="b">unintern</b> changes the state of the
+package system in such a way that the consistency rules do not hold
+across the change.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-51"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-51"> &para;</a></span></h4>
+<p>Current state of the package system.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-69"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-69"> &para;</a></span></h4>
+<p>Giving a shadowing symbol to <b class="b">unintern</b> 
+can uncover a name conflict that had
+previously been resolved by the shadowing.  If package A uses packages
+B and C, A contains a shadowing symbol <code class="t">x</code>, and B and C each contain external
+symbols named <code class="t">x</code>, then removing the shadowing symbol <code class="t">x</code>
+from A will reveal a name
+conflict between <code class="t">b:x</code> and <code class="t">c:x</code> if those two <i class="i">symbols</i> are distinct.
+In this case <b class="b">unintern</b> will signal an error.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-223"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-223"> &para;</a></span></h4>
+
+<p><a class="ref" href="Package-Concepts.html">Package Concepts</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="in_002dpackage.html">in-package                                                          [Macro]</a>, Previous: <a href="unexport.html">unexport                                                         [Function]</a>, Up: <a href="Packages-Dictionary.html">Packages Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/union.html
@@ -0,0 +1,163 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>union (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="union (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="union (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conses-Dictionary.html" rel="up" title="Conses Dictionary">
+<link href="subsetp.html" rel="prev" title="subsetp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="union">
+<div class="nav-panel">
+<p>
+Previous: <a href="subsetp.html" accesskey="p" rel="prev">subsetp                                                          [Function]</a>, Up: <a href="Conses-Dictionary.html" accesskey="u" rel="up">Conses Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="union_002c-nunion-_005bFunction_005d"><span>14.2.49 union, nunion                                                    [Function]<a class="copiable-link" href="#union_002c-nunion-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">union</code>  <i class="i">list-1 list-2 <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">result-list</i>
+</p>
+<p><code class="code">nunion</code>  <i class="i">list-1 list-2 <span class="r">&amp;key</span> key test test-not</i> &rArr;  <i class="i">result-list</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-318"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-318"> &para;</a></span></h4>
+
+<p><i class="i">list-1</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<p><i class="i">list-2</i>&mdash;a <i class="i">proper list</i>.
+</p>
+<p><i class="i">test</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">test-not</i>&mdash;a <i class="i">designator</i> for 
+  a <i class="i">function</i> of two <i class="i">arguments</i>
+  that returns a <i class="i">generalized boolean</i>.
+</p>
+<p><i class="i">key</i>&mdash;a <i class="i">designator</i> for a <i class="i">function</i> of one argument,
+  or <b class="b">nil</b>.
+</p>
+<p><i class="i">result-list</i>&mdash;a <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-419"><span>Description::<a class="copiable-link" href="#Description_003a_003a-419"> &para;</a></span></h4>
+
+<p><b class="b">union</b> and <b class="b">nunion</b> return a <i class="i">list</i>
+that contains every element that occurs in either <i class="i">list-1</i> 
+or <i class="i">list-2</i>.                                 
+</p>
+<p>For all possible ordered pairs consisting of one
+element from <i class="i">list-1</i> 
+and one element from <i class="i">list-2</i>, <code class="t">:test</code> or  <code class="t">:test-not</code> is used
+to determine whether they <i class="i">satisfy the test</i>. 
+The first argument to the <code class="t">:test</code> or <code class="t">:test-not</code> 
+function is the part of the element of <i class="i">list-1</i> extracted by the
+<code class="t">:key</code> function (if supplied); the second argument  
+is the part of the element of <i class="i">list-2</i> extracted by the
+<code class="t">:key</code> function (if supplied).
+</p>
+<p>The argument to the <code class="t">:key</code> function is an element of
+<i class="i">list-1</i> or <i class="i">list-2</i>; the return value is part of the supplied
+element.  
+If <code class="t">:key</code> is not supplied or <b class="b">nil</b>, 
+the element of <i class="i">list-1</i> or <i class="i">list-2</i>
+itself is supplied to the <code class="t">:test</code> or <code class="t">:test-not</code> function. 
+</p>
+<p>For every matching pair, 
+one of the two elements of the pair will be in the result.  Any
+element from either <i class="i">list-1</i> or <i class="i">list-2</i>
+that matches no element of the other will appear
+in the result.  
+</p>
+<p>If there is a duplication between <i class="i">list-1</i> 
+and <i class="i">list-2</i>,
+only one of the duplicate instances will be in the result.
+If either <i class="i">list-1</i> 
+or <i class="i">list-2</i> has duplicate entries within it,
+the redundant entries
+might or might not appear in the result.
+</p>
+<p>The order of elements in the result do not have to
+reflect the ordering of <i class="i">list-1</i> or <i class="i">list-2</i> in any way.
+The result <i class="i">list</i> may be <b class="b">eq</b> to either
+<i class="i">list-1</i> or <i class="i">list-2</i> if appropriate.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-302"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-302"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (union '(a b c) '(f a d))
+&rArr;  (A B C F D)
+<i class="i">OR</i>&rArr; (B C F A D)
+<i class="i">OR</i>&rArr; (D F A B C)
+ (union '((x 5) (y 6)) '((z 2) (x 4)) :key #'car)
+&rArr;  ((X 5) (Y 6) (Z 2))
+<i class="i">OR</i>&rArr; ((X 4) (Y 6) (Z 2))
+
+ (setq lst1 (list 1 2 '(1 2) &quot;a&quot; &quot;b&quot;)
+       lst2 (list 2 3 '(2 3) &quot;B&quot; &quot;C&quot;))
+&rArr;  (2 3 (2 3) &quot;B&quot; &quot;C&quot;)
+ (nunion lst1 lst2)
+&rArr;  (1 (1 2) &quot;a&quot; &quot;b&quot; 2 3 (2 3) &quot;B&quot; &quot;C&quot;) 
+<i class="i">OR</i>&rArr; (1 2 (1 2) &quot;a&quot; &quot;b&quot; &quot;C&quot; &quot;B&quot; (2 3) 3)
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-48"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-48"> &para;</a></span></h4>
+
+<p><b class="b">nunion</b> is permitted to modify any part, <i class="i">car</i> or <i class="i">cdr</i>, 
+of the <i class="i">list structure</i> of <i class="i">list-1</i> or <i class="i">list-2</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-137"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-137"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">list-1</i> and <i class="i">list-2</i> are not <i class="i">proper lists</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-343"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-343"> &para;</a></span></h4>
+
+<p><a class="ref" href="intersection.html">intersection, nintersection                                      [Function]</a>
+,
+</p>
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-229"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-229"> &para;</a></span></h4>
+
+<p>The <code class="t">:test-not</code> parameter is deprecated.
+</p>
+<p>Since the <b class="b">nunion</b> side effect is not required,
+it should not be used in for-effect-only positions in portable code.
+</p>
+
+
+
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Previous: <a href="subsetp.html">subsetp                                                          [Function]</a>, Up: <a href="Conses-Dictionary.html">Conses Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/unread_002dchar.html
@@ -0,0 +1,120 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>unread-char (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="unread-char (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="unread-char (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="write_002dchar.html" rel="next" title="write-char">
+<link href="terpri.html" rel="prev" title="terpri">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="unread_002dchar">
+<div class="nav-panel">
+<p>
+Next: <a href="write_002dchar.html" accesskey="n" rel="next">write-char                                                       [Function]</a>, Previous: <a href="terpri.html" accesskey="p" rel="prev">terpri, fresh-line                                               [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="unread_002dchar-_005bFunction_005d"><span>21.2.20 unread-char                                                      [Function]<a class="copiable-link" href="#unread_002dchar-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">unread-char</code>  <i class="i">character <span class="r">&amp;optional</span> input-stream</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-423"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-423"> &para;</a></span></h4>
+
+<p><i class="i">character</i>&mdash;a <i class="i">character</i>;
+  must be the last <i class="i">character</i> that was read from <i class="i">input-stream</i>.
+</p>
+<p><i class="i">input-stream</i>&mdash;an <i class="i">input</i> <i class="i">stream designator</i>.
+ The default is <i class="i">standard input</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-551"><span>Description::<a class="copiable-link" href="#Description_003a_003a-551"> &para;</a></span></h4>
+
+<p><b class="b">unread-char</b> places <i class="i">character</i> back onto the front of
+<i class="i">input-stream</i> so that it will again be the next character
+in <i class="i">input-stream</i>.
+</p>
+<p>When <i class="i">input-stream</i> is an <i class="i">echo stream</i>,
+no attempt is made to undo any echoing of the character that might already
+have been done on <i class="i">input-stream</i>. However, characters placed on 
+<i class="i">input-stream</i> by <b class="b">unread-char</b> are marked in such a way 
+as to inhibit later re-echo by <b class="b">read-char</b>.
+</p>
+<p>It is an error to invoke <b class="b">unread-char</b> 
+twice consecutively on the same <i class="i">stream</i>
+without an intervening call to <b class="b">read-char</b> 
+(or some other input operation which implicitly reads characters)
+on that <i class="i">stream</i>.
+</p>
+<p>Invoking <b class="b">peek-char</b> or <b class="b">read-char</b> commits all previous characters.
+The consequences of invoking <b class="b">unread-char</b>
+on any character preceding that which is returned by 
+<b class="b">peek-char</b> (including those passed over by 
+<b class="b">peek-char</b> that has a <i class="i">non-nil</i> <i class="i">peek-type</i>)
+are unspecified.
+In particular, the consequences of 
+invoking <b class="b">unread-char</b> after <b class="b">peek-char</b>
+are unspecified.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-398"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-398"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (with-input-from-string (is &quot;0123&quot;)
+    (dotimes (i 6)
+      (let ((c (read-char is)))
+        (if (evenp i) (format t &quot;~&amp;~S ~S~
+<code class="t"> |&gt; </code> 0 #\0
+<code class="t"> |&gt; </code> 2 #\1
+<code class="t"> |&gt; </code> 4 #\2
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-86"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-86"> &para;</a></span></h4>
+
+<p><b class="b">*standard-input*</b>,
+<b class="b">*terminal-io*</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-448"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-448"> &para;</a></span></h4>
+
+<p><a class="ref" href="peek_002dchar.html">peek-char                                                        [Function]</a>
+,
+<a class="ref" href="read_002dchar.html">read-char                                                        [Function]</a>
+,
+<a class="ref" href="Stream-Concepts.html">Stream Concepts</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-288"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-288"> &para;</a></span></h4>
+
+<p><b class="b">unread-char</b> is intended to be an efficient mechanism for allowing
+the <i class="i">Lisp reader</i> and other parsers to perform one-character lookahead
+in <i class="i">input-stream</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="write_002dchar.html">write-char                                                       [Function]</a>, Previous: <a href="terpri.html">terpri, fresh-line                                               [Function]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/unsigned_002dbyte.html
@@ -0,0 +1,87 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>unsigned-byte (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="unsigned-byte (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="unsigned-byte (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="mod-_0028System-Class_0029.html" rel="next" title="mod (System Class)">
+<link href="signed_002dbyte.html" rel="prev" title="signed-byte">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="unsigned_002dbyte">
+<div class="nav-panel">
+<p>
+Next: <a href="mod-_0028System-Class_0029.html" accesskey="n" rel="next">mod                                                        [Type Specifier]</a>, Previous: <a href="signed_002dbyte.html" accesskey="p" rel="prev">signed-byte                                                          [Type]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="unsigned_002dbyte-_005bType_005d"><span>12.2.10 unsigned-byte                                                        [Type]<a class="copiable-link" href="#unsigned_002dbyte-_005bType_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Supertypes_003a_003a-6"><span>Supertypes::<a class="copiable-link" href="#Supertypes_003a_003a-6"> &para;</a></span></h4>
+
+<p><b class="b">unsigned-byte</b>,
+<b class="b">signed-byte</b>,
+<b class="b">integer</b>,
+<b class="b">rational</b>,
+</p>
+<p><b class="b">real</b>,
+</p>
+<p><b class="b">number</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-276"><span>Description::<a class="copiable-link" href="#Description_003a_003a-276"> &para;</a></span></h4>
+
+<p>The atomic <i class="i">type specifier</i> <b class="b">unsigned-byte</b> denotes the same 
+type as is denoted by the <i class="i">type specifier</i> <code class="t">(integer 0 *)</code>.  
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-15"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-15"> &para;</a></span></h4>
+
+<p>Abbreviating.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-15"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-15"> &para;</a></span></h4>
+
+<p>(<code class="code">unsigned-byte</code>{<i class="i"><code class="t">[</code><i class="i">s</i> | <b class="b">*</b><code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-15"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-15"> &para;</a></span></h4>
+
+<p><i class="i">s</i>&mdash;a positive <i class="i">integer</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-15"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-15"> &para;</a></span></h4>
+
+<p>This denotes the set of non-negative <i class="i">integers</i> that can be
+represented in a byte of size <i class="i">s</i> (bits).  
+This is equivalent 
+to <code class="t">(mod <i class="i">m</i>)</code> for <i class="i">m</i>=2^s, or
+to <code class="t">(integer 0 <i class="i">n</i>)</code> for <i class="i">n</i>=2^s-1.
+The <i class="i">type</i> <b class="b">unsigned-byte</b> or 
+the type <code class="t">(unsigned-byte *)</code> is the same as
+the type <code class="t">(integer 0 *)</code>, the set of non-negative <i class="i">integers</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-140"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-140"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <code class="t">(unsigned-byte 1)</code> is also called <b class="b">bit</b>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/unuse_002dpackage.html
@@ -0,0 +1,93 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>unuse-package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="unuse-package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="unuse-package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="use_002dpackage.html" rel="next" title="use-package">
+<link href="in_002dpackage.html" rel="prev" title="in-package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="unuse_002dpackage">
+<div class="nav-panel">
+<p>
+Next: <a href="use_002dpackage.html" accesskey="n" rel="next">use-package                                                      [Function]</a>, Previous: <a href="in_002dpackage.html" accesskey="p" rel="prev">in-package                                                          [Macro]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="unuse_002dpackage-_005bFunction_005d"><span>11.2.17 unuse-package                                                    [Function]<a class="copiable-link" href="#unuse_002dpackage-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">unuse-package</code>  <i class="i">packages-to-unuse <span class="r">&amp;optional</span> package</i> &rArr;  <i class="i"><b class="b">t</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-189"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-189"> &para;</a></span></h4>
+
+<p><i class="i">packages-to-unuse</i>&mdash;a <i class="i">designator</i> for
+			    a <i class="i">list</i> of <i class="i">package designators</i>.
+</p>
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+ The default is the <i class="i">current package</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-253"><span>Description::<a class="copiable-link" href="#Description_003a_003a-253"> &para;</a></span></h4>
+
+<p><b class="b">unuse-package</b> causes <i class="i">package</i> to cease inheriting
+all the <i class="i">external symbols</i> of 
+<i class="i">packages-to-unuse</i>; <b class="b">unuse-package</b> undoes
+the effects of <b class="b">use-package</b>.   The 
+<i class="i">packages-to-unuse</i> 
+are removed from the <i class="i">use list</i> of <i class="i">package</i>.
+</p>
+<p>Any <i class="i">symbols</i> that have been
+<i class="i">imported</i> into <i class="i">package</i> continue to be <i class="i">present</i> in <i class="i">package</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-171"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-171"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (in-package &quot;COMMON-LISP-USER&quot;) &rArr;  #&lt;PACKAGE &quot;COMMON-LISP-USER&quot;&gt;
+ (export (intern &quot;SHOES&quot; (make-package 'temp)) 'temp) &rArr;  T
+ (find-symbol &quot;SHOES&quot;) &rArr;  NIL, NIL
+ (use-package 'temp) &rArr;  T
+ (find-symbol &quot;SHOES&quot;) &rArr;  SHOES, :INHERITED
+ (find (find-package 'temp) (package-use-list 'common-lisp-user)) &rArr;  #&lt;PACKAGE &quot;TEMP&quot;&gt;
+ (unuse-package 'temp) &rArr;  T
+ (find-symbol &quot;SHOES&quot;) &rArr;  NIL, NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-31"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-31"> &para;</a></span></h4>
+
+<p>The <i class="i">use list</i> of <i class="i">package</i> is modified.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-52"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-52"> &para;</a></span></h4>
+<p>Current state of the package system.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-225"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-225"> &para;</a></span></h4>
+
+<p><a class="ref" href="use_002dpackage.html">use-package                                                      [Function]</a>
+, 
+<a class="ref" href="package_002duse_002dlist.html">package-use-list                                                 [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/unwind_002dprotect.html
@@ -0,0 +1,230 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>unwind-protect (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="unwind-protect (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="unwind-protect (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="nil.html" rel="next" title="nil">
+<link href="throw.html" rel="prev" title="throw">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="unwind_002dprotect">
+<div class="nav-panel">
+<p>
+Next: <a href="nil.html" accesskey="n" rel="next">nil                                                     [Constant Variable]</a>, Previous: <a href="throw.html" accesskey="p" rel="prev">throw                                                    [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="unwind_002dprotect-_005bSpecial-Operator_005d"><span>5.3.29 unwind-protect                                           [Special Operator]<a class="copiable-link" href="#unwind_002dprotect-_005bSpecial-Operator_005d"> &para;</a></span></h4>
+
+<p><code class="code">unwind-protect</code>  <i class="i"><i class="i">protected-form</i> {<i class="i">cleanup-form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-50"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-50"> &para;</a></span></h4>
+
+<p><i class="i">protected-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">cleanup-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> of the <i class="i">protected-form</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-82"><span>Description::<a class="copiable-link" href="#Description_003a_003a-82"> &para;</a></span></h4>
+<p><b class="b">unwind-protect</b> evaluates <i class="i">protected-form</i>
+and guarantees that <i class="i">cleanup-forms</i> are executed
+before <b class="b">unwind-protect</b> exits,
+whether it terminates
+normally or is aborted by a control transfer of some kind. 
+<b class="b">unwind-protect</b> is intended to be used
+to make sure that
+certain side effects take place after the evaluation of 
+<i class="i">protected-form</i>.
+</p>
+<p>If a <i class="i">non-local exit</i> occurs during execution of <i class="i">cleanup-forms</i>,
+no special action is taken.  The <i class="i">cleanup-forms</i> of 
+<b class="b">unwind-protect</b>
+are not protected by that <b class="b">unwind-protect</b>.
+</p>
+<p><b class="b">unwind-protect</b> protects against all attempts to exit 
+from <i class="i">protected-form</i>, including
+     <b class="b">go</b>,
+     <b class="b">handler-case</b>,
+     <b class="b">ignore-errors</b>,
+     <b class="b">restart-case</b>,
+     <b class="b">return-from</b>,
+     <b class="b">throw</b>,
+ and <b class="b">with-simple-restart</b>.
+</p>
+<p>Undoing of <i class="i">handler</i> and <i class="i">restart</i> <i class="i">bindings</i> during an exit
+happens in parallel with the undoing of the bindings of <i class="i">dynamic variables</i>
+and <b class="b">catch</b> tags, in the reverse order in which they were established.
+The effect of this is that <i class="i">cleanup-form</i> sees the same <i class="i">handler</i>
+and <i class="i">restart</i> <i class="i">bindings</i>, as well as <i class="i">dynamic variable</i> <i class="i">bindings</i>
+and <b class="b">catch</b> tags, as were visible when the <b class="b">unwind-protect</b> was entered.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-56"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-56"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (tagbody
+   (let ((x 3))
+     (unwind-protect
+       (if (numberp x) (go out))
+       (print x)))
+  out
+   ...)
+</pre></div>
+
+<p>When <b class="b">go</b> is executed, the call to <b class="b">print</b> is executed first,
+and then the transfer of control to the tag <code class="t">out</code> is completed.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun dummy-function (x)
+    (setq state 'running)
+    (unless (numberp x) (throw 'abort 'not-a-number))
+    (setq state (1+ x))) &rArr;  DUMMY-FUNCTION
+ (catch 'abort (dummy-function 1)) &rArr;  2
+ state &rArr;  2
+ (catch 'abort (dummy-function 'trash)) &rArr;  NOT-A-NUMBER
+ state &rArr;  RUNNING
+ (catch 'abort (unwind-protect (dummy-function 'trash) 
+                  (setq state 'aborted))) &rArr;  NOT-A-NUMBER
+ state &rArr;  ABORTED
+</pre></div>
+
+<p>The following code
+is not correct:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (unwind-protect
+   (progn (incf *access-count*)
+          (perform-access))
+   (decf *access-count*))
+</pre></div>
+
+<p>If an exit occurs before completion of <b class="b">incf</b>,
+the <b class="b">decf</b> <i class="i">form</i> is executed anyway, resulting in an
+incorrect value for <code class="t">*access-count*</code>.
+The correct way to code this is as follows:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (let ((old-count *access-count*))
+   (unwind-protect
+     (progn (incf *access-count*)
+            (perform-access))
+     (setq *access-count* old-count)))
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted">;;; The following returns 2.
+ (block nil   
+   (unwind-protect (return 1)
+     (return 2)))
+
+;;; The following has undefined consequences.
+ (block a    
+   (block b
+     (unwind-protect (return-from a 1)
+       (return-from b 2))))
+
+;;; The following returns 2.
+ (catch nil 
+   (unwind-protect (throw nil 1)
+     (throw nil 2)))
+
+;;; The following has undefined consequences because the catch of B is 
+;;; passed over by the first THROW, hence portable programs must assume 
+;;; its dynamic extent is terminated.  The binding of the catch tag is not
+;;; yet disestablished and therefore it is the target of the second throw.
+ (catch 'a
+   (catch 'b
+     (unwind-protect (throw 'a 1)
+       (throw 'b 2))))
+
+;;; The following prints &quot;The inner catch returns :SECOND-THROW&quot;
+;;; and then returns :OUTER-CATCH.
+ (catch 'foo
+         (format t &quot;The inner catch returns ~s.~
+                 (catch 'foo
+                     (unwind-protect (throw 'foo :first-throw)
+                         (throw 'foo :second-throw))))
+         :outer-catch)
+
+;;; The following returns 10. The inner CATCH of A is passed over, but 
+;;; because that CATCH is disestablished before the THROW to A is executed,
+;;; it isn't seen.
+ (catch 'a
+   (catch 'b
+     (unwind-protect (1+ (catch 'a (throw 'b 1)))
+       (throw 'a 10))))
+
+;;; The following has undefined consequences because the extent of
+;;; the (CATCH 'BAR ...) exit ends when the (THROW 'FOO ...)
+;;; commences.
+ (catch 'foo
+   (catch 'bar
+       (unwind-protect (throw 'foo 3)
+         (throw 'bar 4)
+         (print 'xxx))))
+
+;;; The following returns 4; XXX is not printed.
+;;; The (THROW 'FOO ...) has no effect on the scope of the BAR
+;;; catch tag or the extent of the (CATCH 'BAR ...) exit.
+ (catch 'bar
+   (catch 'foo
+       (unwind-protect (throw 'foo 3)
+         (throw 'bar 4)
+         (print 'xxx))))
+
+;;; The following prints 5.
+ (block nil
+   (let ((x 5))
+     (declare (special x))
+     (unwind-protect (return)
+       (print x))))          
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-67"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-67"> &para;</a></span></h4>
+
+<p><a class="ref" href="catch.html">catch                                                    [Special Operator]</a>
+,
+<a class="ref" href="go.html">go                                                       [Special Operator]</a>
+,
+<a class="ref" href="handler_002dcase.html">handler-case                                                        [Macro]</a>
+,
+<a class="ref" href="restart_002dcase.html">restart-case                                                        [Macro]</a>
+,
+<a class="ref" href="return.html">return                                                              [Macro]</a>
+, 
+<a class="ref" href="return_002dfrom.html">return-from                                              [Special Operator]</a>
+,
+<a class="ref" href="throw.html">throw                                                    [Special Operator]</a>
+,
+<a class="ref" href="Evaluation.html">Evaluation</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="nil.html">nil                                                     [Constant Variable]</a>, Previous: <a href="throw.html">throw                                                    [Special Operator]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/update_002dinstance_002dfor_002ddifferent_002dclass.html
@@ -0,0 +1,150 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>update-instance-for-different-class (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="update-instance-for-different-class (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="update-instance-for-different-class (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="update_002dinstance_002dfor_002dredefined_002dclass.html" rel="next" title="update-instance-for-redefined-class">
+<link href="shared_002dinitialize.html" rel="prev" title="shared-initialize">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="update_002dinstance_002dfor_002ddifferent_002dclass">
+<div class="nav-panel">
+<p>
+Next: <a href="update_002dinstance_002dfor_002dredefined_002dclass.html" accesskey="n" rel="next">update-instance-for-redefined-class             [Standard Generic Function]</a>, Previous: <a href="shared_002dinitialize.html" accesskey="p" rel="prev">shared-initialize                               [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="update_002dinstance_002dfor_002ddifferent_002dclass-_005bStandard-Generic-Function_005d"><span>7.7.6 update-instance-for-different-class             [Standard Generic Function]<a class="copiable-link" href="#update_002dinstance_002dfor_002ddifferent_002dclass-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-15"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-15"> &para;</a></span></h4>
+
+<p><code class="code">update-instance-for-different-class</code>  <i class="i">previous current 
+		   <span class="r">&amp;rest</span> initargs
+		   <span class="r">&amp;key</span> <span class="r">&amp;allow-other-keys</span></i> &rArr;  <i class="i"><i class="i">implementation-dependent</i></i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-4"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-4"> &para;</a></span></h4>
+
+<p><code class="code">update-instance-for-different-class</code>  <i class="i"><span class="r">(</span><i class="i">previous</i> <b class="b">standard-object</b><span class="r">)</span>
+	        <span class="r">(</span><i class="i">current</i> <b class="b">standard-object</b><span class="r">)</span>
+	        <span class="r">&amp;rest</span> initargs</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-94"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-94"> &para;</a></span></h4>
+
+<p><i class="i">previous</i>&mdash;a copy of the original <i class="i">instance</i>.
+</p>
+<p><i class="i">current</i>&mdash;the original <i class="i">instance</i> (altered).
+</p>
+<p><i class="i">initargs</i>&mdash;an <i class="i">initialization argument list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-133"><span>Description::<a class="copiable-link" href="#Description_003a_003a-133"> &para;</a></span></h4>
+
+<p>The generic function <b class="b">update-instance-for-different-class</b> is not
+intended to be called by programmers.  Programmers may write
+<i class="i">methods</i> for it.  The <i class="i">function</i> <b class="b">update-instance-for-different-class</b>
+is called only by the <i class="i">function</i> <b class="b">change-class</b>.
+</p>
+<p>The system-supplied primary <i class="i">method</i> on 
+<b class="b">update-instance-for-different-class</b> checks the validity of
+<i class="i">initargs</i> and signals an error if an <i class="i">initarg</i>
+is supplied that is not declared as valid.  This <i class="i">method</i> then
+initializes <i class="i">slots</i> with values according to the <i class="i">initargs</i>,
+and initializes the newly added <i class="i">slots</i> with values according
+to their <code class="t">:initform</code> forms.  It does this by calling the generic
+function <b class="b">shared-initialize</b> with the following arguments: the 
+instance (<i class="i">current</i>),
+a list of <i class="i">names</i> of the newly added <i class="i">slots</i>, and the <i class="i">initargs</i>
+it received.  Newly added <i class="i">slots</i> are those <i class="i">local slots</i> for which
+no <i class="i">slot</i> of the same name exists in the <i class="i">previous</i> class.
+</p>
+<p><i class="i">Methods</i> for <b class="b">update-instance-for-different-class</b> can be defined to
+specify actions to be taken when an <i class="i">instance</i> is updated.  If only 
+<i class="i">after methods</i> for <b class="b">update-instance-for-different-class</b> are
+defined, they will be run after the system-supplied primary <i class="i">method</i> for
+initialization and therefore will not interfere with the default
+behavior of <b class="b">update-instance-for-different-class</b>.
+</p>
+<p><i class="i">Methods</i> on <b class="b">update-instance-for-different-class</b> can be defined to
+initialize <i class="i">slots</i> differently from <b class="b">change-class</b>.  The default
+behavior of <b class="b">change-class</b> is described in 
+<a class="ref" href="Changing-the-Class-of-an-Instance.html">Changing the Class of an Instance</a>.
+</p>
+<p>The arguments to <b class="b">update-instance-for-different-class</b> are
+computed by <b class="b">change-class</b>.  When <b class="b">change-class</b> is invoked on
+an <i class="i">instance</i>, a copy of that <i class="i">instance</i> is made; <b class="b">change-class</b> then
+destructively alters the original <i class="i">instance</i>. The first argument to
+<b class="b">update-instance-for-different-class</b>, <i class="i">previous</i>, is that
+copy; it holds the old <i class="i">slot</i> values temporarily.  This argument has
+dynamic extent within <b class="b">change-class</b>; if it is referenced in any
+way once <b class="b">update-instance-for-different-class</b> returns, the
+results are undefined.  The second argument to
+<b class="b">update-instance-for-different-class</b>, <i class="i">current</i>, is the altered
+original <i class="i">instance</i>.
+The intended use of <i class="i">previous</i> is to extract old <i class="i">slot</i> values by using
+<b class="b">slot-value</b> or <b class="b">with-slots</b> or by invoking 
+a reader generic function, or to run other <i class="i">methods</i> that were applicable to 
+<i class="i">instances</i> of
+the original <i class="i">class</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-99"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-99"> &para;</a></span></h4>
+
+<p>See the example for the <i class="i">function</i> <b class="b">change-class</b>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-24"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-24"> &para;</a></span></h4>
+<p>The system-supplied primary <i class="i">method</i> on
+<b class="b">update-instance-for-different-class</b> signals an error if an
+initialization argument is supplied that is not declared as valid.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-115"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-115"> &para;</a></span></h4>
+
+<p><a class="ref" href="change_002dclass.html">change-class                                    [Standard Generic Function]</a>
+,
+<a class="ref" href="Shared_002dInitialize.html">Shared-Initialize</a>
+,
+<a class="ref" href="Changing-the-Class-of-an-Instance.html">Changing the Class of an Instance</a>,
+<a class="ref" href="Rules-for-Initialization-Arguments.html">Rules for Initialization Arguments</a>,
+<a class="ref" href="Declaring-the-Validity-of-Initialization-Arguments.html">Declaring the Validity of Initialization Arguments</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-77"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-77"> &para;</a></span></h4>
+
+<p><i class="i">Initargs</i> are declared as valid by using the <code class="t">:initarg</code>
+option to <b class="b">defclass</b>, or by defining <i class="i">methods</i>
+for <b class="b">update-instance-for-different-class</b> or <b class="b">shared-initialize</b>.
+The keyword name of each keyword parameter specifier in the <i class="i">lambda list</i> of
+any <i class="i">method</i> defined on <b class="b">update-instance-for-different-class</b>
+or <b class="b">shared-initialize</b> is declared as a valid <i class="i">initarg</i> name
+for all <i class="i">classes</i> for which that <i class="i">method</i> is applicable.
+</p>
+<p>The value returned by <b class="b">update-instance-for-different-class</b> is
+ignored by <b class="b">change-class</b>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="update_002dinstance_002dfor_002dredefined_002dclass.html">update-instance-for-redefined-class             [Standard Generic Function]</a>, Previous: <a href="shared_002dinitialize.html">shared-initialize                               [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/update_002dinstance_002dfor_002dredefined_002dclass.html
@@ -0,0 +1,199 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>update-instance-for-redefined-class (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="update-instance-for-redefined-class (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="update-instance-for-redefined-class (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="change_002dclass.html" rel="next" title="change-class">
+<link href="update_002dinstance_002dfor_002ddifferent_002dclass.html" rel="prev" title="update-instance-for-different-class">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="update_002dinstance_002dfor_002dredefined_002dclass">
+<div class="nav-panel">
+<p>
+Next: <a href="change_002dclass.html" accesskey="n" rel="next">change-class                                    [Standard Generic Function]</a>, Previous: <a href="update_002dinstance_002dfor_002ddifferent_002dclass.html" accesskey="p" rel="prev">update-instance-for-different-class             [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="update_002dinstance_002dfor_002dredefined_002dclass-_005bStandard-Generic-Function_005d"><span>7.7.7 update-instance-for-redefined-class             [Standard Generic Function]<a class="copiable-link" href="#update_002dinstance_002dfor_002dredefined_002dclass-_005bStandard-Generic-Function_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-16"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-16"> &para;</a></span></h4>
+
+<p><code class="code">update-instance-for-redefined-class</code>  <i class="i">instance
+                                added-slots discarded-slots
+                                property-list
+                                <span class="r">&amp;rest</span> initargs <span class="r">&amp;key</span> <span class="r">&amp;allow-other-keys</span></i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Method-Signatures_003a_003a-5"><span>Method Signatures::<a class="copiable-link" href="#Method-Signatures_003a_003a-5"> &para;</a></span></h4>
+
+<p><code class="code">update-instance-for-redefined-class</code>  <i class="i"><span class="r">(</span><i class="i">instance</i> <b class="b">standard-object</b><span class="r">)</span>
+		added-slots discarded-slots
+		property-list
+		<span class="r">&amp;rest</span> initargs</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-95"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-95"> &para;</a></span></h4>
+
+<p><i class="i">instance</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">added-slots</i>&mdash;a <i class="i">list</i>.
+</p>
+<p><i class="i">discarded-slots</i>&mdash;a <i class="i">list</i>.
+</p>
+<p><i class="i">property-list</i>&mdash;a <i class="i">list</i>.
+</p>
+<p><i class="i">initargs</i>&mdash;an <i class="i">initialization argument list</i>.
+</p>
+<p><i class="i">result</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-134"><span>Description::<a class="copiable-link" href="#Description_003a_003a-134"> &para;</a></span></h4>
+
+<p>The <i class="i">generic function</i> <b class="b">update-instance-for-redefined-class</b> 
+is not intended to be called by programmers. Programmers may write
+<i class="i">methods</i> for it.  The <i class="i">generic function</i> 
+<b class="b">update-instance-for-redefined-class</b> is called by the mechanism
+activated by <b class="b">make-instances-obsolete</b>.
+</p>
+<p>The system-supplied primary <i class="i">method</i> on 
+<b class="b">update-instance-for-redefined-class</b> checks the validity of
+<i class="i">initargs</i> and signals an error if an <i class="i">initarg</i>
+is supplied that is not declared as valid.  This <i class="i">method</i> then
+initializes <i class="i">slots</i> with values according to the <i class="i">initargs</i>,
+and initializes the newly <i class="i">added-slots</i> with values according
+to their <code class="t">:initform</code> forms.  It does this by calling the generic
+function <b class="b">shared-initialize</b> with the following arguments: 
+the <i class="i">instance</i>,
+a list of names of the newly <i class="i">added-slots</i> to <i class="i">instance</i>,
+and the <i class="i">initargs</i>
+it received.  Newly <i class="i">added-slots</i> are those <i class="i">local slots</i> for which
+no <i class="i">slot</i> of the same name exists in the old version of the <i class="i">class</i>.
+</p>
+<p>When <b class="b">make-instances-obsolete</b> is invoked or when a <i class="i">class</i> has been
+redefined and an <i class="i">instance</i> is being updated, a <i class="i">property-list</i> is created
+that captures the slot names and values of all the <i class="i">discarded-slots</i> with
+values in the original <i class="i">instance</i>.  The structure of the 
+<i class="i">instance</i> is
+transformed so that it conforms to the current class definition.  The
+arguments to <b class="b">update-instance-for-redefined-class</b> are this
+transformed <i class="i">instance</i>, a list of <i class="i">added-slots</i> to the
+<i class="i">instance</i>, a list <i class="i">discarded-slots</i> from the
+<i class="i">instance</i>, and the <i class="i">property-list</i> 
+containing the slot names and values for
+<i class="i">slots</i> that were discarded and had values.  Included in this list of
+discarded <i class="i">slots</i> are <i class="i">slots</i> that were local in the old <i class="i">class</i> and are
+shared in the new <i class="i">class</i>.
+</p>
+<p>The value returned by <b class="b">update-instance-for-redefined-class</b> is ignored.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-100"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-100"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">
+
+ (defclass position () ())
+
+ (defclass x-y-position (position)
+     ((x :initform 0 :accessor position-x)
+      (y :initform 0 :accessor position-y)))
+
+;;; It turns out polar coordinates are used more than Cartesian 
+;;; coordinates, so the representation is altered and some new
+;;; accessor methods are added.
+
+ (defmethod update-instance-for-redefined-class :before
+    ((pos x-y-position) added deleted plist &amp;key)
+   ;; Transform the x-y coordinates to polar coordinates
+   ;; and store into the new slots.
+   (let ((x (getf plist 'x))
+         (y (getf plist 'y)))
+     (setf (position-rho pos) (sqrt (+ (* x x) (* y y)))
+           (position-theta pos) (atan y x))))
+
+ (defclass x-y-position (position)
+     ((rho :initform 0 :accessor position-rho)
+      (theta :initform 0 :accessor position-theta)))
+
+;;; All instances of the old x-y-position class will be updated
+;;; automatically.
+
+;;; The new representation is given the look and feel of the old one.
+
+ (defmethod position-x ((pos x-y-position))  
+    (with-slots (rho theta) pos (* rho (cos theta))))
+
+ (defmethod (setf position-x) (new-x (pos x-y-position))
+    (with-slots (rho theta) pos
+      (let ((y (position-y pos)))
+        (setq rho (sqrt (+ (* new-x new-x) (* y y)))
+              theta (atan y new-x))
+        new-x)))
+
+ (defmethod position-y ((pos x-y-position))
+    (with-slots (rho theta) pos (* rho (sin theta))))
+
+ (defmethod (setf position-y) (new-y (pos x-y-position))
+    (with-slots (rho theta) pos
+      (let ((x (position-x pos)))
+        (setq rho (sqrt (+ (* x x) (* new-y new-y)))
+              theta (atan new-y x))
+        new-y)))
+
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-25"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-25"> &para;</a></span></h4>
+<p>The system-supplied primary <i class="i">method</i> on 
+<b class="b">update-instance-for-redefined-class</b> signals an error if an
+<i class="i">initarg</i> is supplied that is not declared as valid.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-116"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-116"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dinstances_002dobsolete.html">make-instances-obsolete                         [Standard Generic Function]</a>
+,
+<a class="ref" href="Shared_002dInitialize.html">Shared-Initialize</a>
+,
+<a class="ref" href="Redefining-Classes.html">Redefining Classes</a>,
+<a class="ref" href="Rules-for-Initialization-Arguments.html">Rules for Initialization Arguments</a>,
+<a class="ref" href="Declaring-the-Validity-of-Initialization-Arguments.html">Declaring the Validity of Initialization Arguments</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-78"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-78"> &para;</a></span></h4>
+
+<p><i class="i">Initargs</i> are declared as valid by using the <code class="t">:initarg</code>
+option to <b class="b">defclass</b>, or by defining <i class="i">methods</i> for
+<b class="b">update-instance-for-redefined-class</b> or <b class="b">shared-initialize</b>.
+The keyword name of each keyword parameter specifier in the <i class="i">lambda list</i> of
+any <i class="i">method</i> defined on 
+<b class="b">update-instance-for-redefined-class</b> or 
+<b class="b">shared-initialize</b> is declared as a valid <i class="i">initarg</i> name
+for all <i class="i">classes</i> for which that <i class="i">method</i> is applicable.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="change_002dclass.html">change-class                                    [Standard Generic Function]</a>, Previous: <a href="update_002dinstance_002dfor_002ddifferent_002dclass.html">update-instance-for-different-class             [Standard Generic Function]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/upgraded_002darray_002delement_002dtype.html
@@ -0,0 +1,99 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>upgraded-array-element-type (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="upgraded-array-element-type (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="upgraded-array-element-type (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="array_002ddimension_002dlimit.html" rel="next" title="array-dimension-limit">
+<link href="row_002dmajor_002daref.html" rel="prev" title="row-major-aref">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="upgraded_002darray_002delement_002dtype">
+<div class="nav-panel">
+<p>
+Next: <a href="array_002ddimension_002dlimit.html" accesskey="n" rel="next">array-dimension-limit                                   [Constant Variable]</a>, Previous: <a href="row_002dmajor_002daref.html" accesskey="p" rel="prev">row-major-aref                                                   [Accessor]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="upgraded_002darray_002delement_002dtype-_005bFunction_005d"><span>15.2.23 upgraded-array-element-type                                      [Function]<a class="copiable-link" href="#upgraded_002darray_002delement_002dtype-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">upgraded-array-element-type</code>  <i class="i">typespec <span class="r">&amp;optional</span> environment</i> &rArr;  <i class="i">upgraded-typespec</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-335"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-335"> &para;</a></span></h4>
+
+<p><i class="i">typespec</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<p><i class="i">environment</i>&mdash;an <i class="i">environment</i> <i class="i">object</i>.
+  The default is <b class="b">nil</b>, denoting the <i class="i">null lexical environment</i>
+	   and the current <i class="i">global environment</i>.
+</p>
+<p><i class="i">upgraded-typespec</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-442"><span>Description::<a class="copiable-link" href="#Description_003a_003a-442"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">element type</i> of 
+the most <i class="i">specialized</i> <i class="i">array</i> representation capable of 
+holding items of the <i class="i">type</i> denoted by <i class="i">typespec</i>.
+</p>
+<p>The <i class="i">typespec</i> is a <i class="i">subtype</i> of 
+(and possibly <i class="i">type equivalent</i> to)
+the <i class="i">upgraded-typespec</i>.
+</p>
+<p>If <i class="i">typespec</i> is <b class="b">bit</b>,
+ the result is <i class="i">type equivalent</i> to <code class="t">bit</code>.
+</p>
+<p>If <i class="i">typespec</i> is <b class="b">base-char</b>,
+ the result is <i class="i">type equivalent</i> to <code class="t">base-char</code>.
+</p>
+<p>If <i class="i">typespec</i> is <b class="b">character</b>,
+ the result is <i class="i">type equivalent</i> to <code class="t">character</code>.
+</p>
+<p>The purpose of <b class="b">upgraded-array-element-type</b> is to reveal how
+an implementation does its <i class="i">upgrading</i>.
+</p>
+<p>The <i class="i">environment</i> is used to expand any <i class="i">derived type specifiers</i>
+that are mentioned in the <i class="i">typespec</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-362"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-362"> &para;</a></span></h4>
+
+<p><a class="ref" href="array_002delement_002dtype.html">array-element-type                                               [Function]</a>
+,
+<a class="ref" href="make_002darray.html">make-array                                                       [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-242"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-242"> &para;</a></span></h4>
+
+<p>Except for storage allocation consequences and dealing correctly with the
+optional <i class="i">environment</i> <i class="i">argument</i>,
+<b class="b">upgraded-array-element-type</b> could be defined as:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun upgraded-array-element-type (type &amp;optional environment)
+   (array-element-type (make-array 0 :element-type type)))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/upgraded_002dcomplex_002dpart_002dtype.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>upgraded-complex-part-type (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="upgraded-complex-part-type (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="upgraded-complex-part-type (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="realp.html" rel="next" title="realp">
+<link href="realpart.html" rel="prev" title="realpart">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="upgraded_002dcomplex_002dpart_002dtype">
+<div class="nav-panel">
+<p>
+Next: <a href="realp.html" accesskey="n" rel="next">realp                                                            [Function]</a>, Previous: <a href="realpart.html" accesskey="p" rel="prev">realpart, imagpart                                               [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="upgraded_002dcomplex_002dpart_002dtype-_005bFunction_005d"><span>12.2.51 upgraded-complex-part-type                                       [Function]<a class="copiable-link" href="#upgraded_002dcomplex_002dpart_002dtype-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">upgraded-complex-part-type</code>  <i class="i">typespec <span class="r">&amp;optional</span> environment</i> &rArr;  <i class="i">upgraded-typespec</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-234"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-234"> &para;</a></span></h4>
+
+<p><i class="i">typespec</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<p><i class="i">environment</i>&mdash;an <i class="i">environment</i> <i class="i">object</i>.
+  The default is <b class="b">nil</b>, denoting the <i class="i">null lexical environment</i>
+	   and the and current <i class="i">global environment</i>.
+</p>
+<p><i class="i">upgraded-typespec</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-316"><span>Description::<a class="copiable-link" href="#Description_003a_003a-316"> &para;</a></span></h4>
+
+<p><b class="b">upgraded-complex-part-type</b> returns the part type of the
+most specialized <i class="i">complex</i> number representation that can
+hold parts of <i class="i">type</i> <i class="i">typespec</i>.
+</p>
+<p>The <i class="i">typespec</i> is a <i class="i">subtype</i> of 
+(and possibly <i class="i">type equivalent</i> to)
+the <i class="i">upgraded-typespec</i>.
+</p>
+<p>The purpose of <b class="b">upgraded-complex-part-type</b>
+is to reveal how an implementation does its <i class="i">upgrading</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-267"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-267"> &para;</a></span></h4>
+
+<p><a class="ref" href="complex.html">complex                                                          [Function]</a>
+ (<i class="i">function</i> and <i class="i">type</i>)
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-163"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-163"> &para;</a></span></h4>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/upper_002dcase_002dp.html
@@ -0,0 +1,96 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>upper-case-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="upper-case-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="upper-case-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Characters-Dictionary.html" rel="up" title="Characters Dictionary">
+<link href="char_002dcode.html" rel="next" title="char-code">
+<link href="char_002dupcase.html" rel="prev" title="char-upcase">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="upper_002dcase_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="char_002dcode.html" accesskey="n" rel="next">char-code                                                        [Function]</a>, Previous: <a href="char_002dupcase.html" accesskey="p" rel="prev">char-upcase, char-downcase                                       [Function]</a>, Up: <a href="Characters-Dictionary.html" accesskey="u" rel="up">Characters Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="upper_002dcase_002dp_002c-lower_002dcase_002dp_002c-both_002dcase_002dp-_005bFunction_005d"><span>13.2.15 upper-case-p, lower-case-p, both-case-p                          [Function]<a class="copiable-link" href="#upper_002dcase_002dp_002c-lower_002dcase_002dp_002c-both_002dcase_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">upper-case-p</code>  <i class="i">character</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">lower-case-p</code>  <i class="i">character</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">both-case-p</code>  <i class="i">character</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-268"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-268"> &para;</a></span></h4>
+
+<p><i class="i">character</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-364"><span>Description::<a class="copiable-link" href="#Description_003a_003a-364"> &para;</a></span></h4>
+
+<p>These functions test the case of a given <i class="i">character</i>.
+</p>
+<p><b class="b">upper-case-p</b> returns <i class="i">true</i> if <i class="i">character</i> is an <i class="i">uppercase</i> <i class="i">character</i>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<p><b class="b">lower-case-p</b> returns <i class="i">true</i> if <i class="i">character</i> is a <i class="i">lowercase</i> <i class="i">character</i>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<p><b class="b">both-case-p</b> returns <i class="i">true</i> if <i class="i">character</i> is a <i class="i">character</i> with <i class="i">case</i>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-252"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-252"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (upper-case-p #\A) &rArr;  <i class="i">true</i>
+ (upper-case-p #\a) &rArr;  <i class="i">false</i>
+ (both-case-p #\a) &rArr;  <i class="i">true</i>
+ (both-case-p #\5) &rArr;  <i class="i">false</i>
+ (lower-case-p #\5) &rArr;  <i class="i">false</i>
+ (upper-case-p #\5) &rArr;  <i class="i">false</i>
+ ;; This next example presupposes an implementation 
+ ;; in which #\Bell is an implementation-defined character.
+ (lower-case-p #\Bell) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-114"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-114"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">character</i> is not a <i class="i">character</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-293"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-293"> &para;</a></span></h4>
+
+<p><a class="ref" href="char_002dupcase.html">char-upcase, char-downcase                                       [Function]</a>
+,
+<b class="b">char-downcase</b>,
+<a class="ref" href="Characters-With-Case.html">Characters With Case</a>,
+<a class="ref" href="Documentation-of-Implementation_002dDefined-Scripts.html">Documentation of Implementation-Defined Scripts</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/use_002dpackage.html
@@ -0,0 +1,117 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>use-package (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="use-package (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="use-package (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="defpackage.html" rel="next" title="defpackage">
+<link href="unuse_002dpackage.html" rel="prev" title="unuse-package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="use_002dpackage">
+<div class="nav-panel">
+<p>
+Next: <a href="defpackage.html" accesskey="n" rel="next">defpackage                                                          [Macro]</a>, Previous: <a href="unuse_002dpackage.html" accesskey="p" rel="prev">unuse-package                                                    [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="use_002dpackage-_005bFunction_005d"><span>11.2.18 use-package                                                      [Function]<a class="copiable-link" href="#use_002dpackage-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">use-package</code>  <i class="i">packages-to-use <span class="r">&amp;optional</span> package</i> &rArr;  <i class="i"><b class="b">t</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-190"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-190"> &para;</a></span></h4>
+
+<p><i class="i">packages-to-use</i>&mdash;a <i class="i">designator</i> for 
+			  a <i class="i">list</i> of <i class="i">package designators</i>.
+  The <code class="t">KEYWORD</code> <i class="i">package</i> may not be supplied.
+</p>
+<p><i class="i">package</i>&mdash;a <i class="i">package designator</i>.
+  The <code class="t">KEYWORD</code> <i class="i">package</i> cannot be supplied.
+  The default is the <i class="i">current package</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-254"><span>Description::<a class="copiable-link" href="#Description_003a_003a-254"> &para;</a></span></h4>
+
+<p><b class="b">use-package</b> causes <i class="i">package</i> to inherit all the
+<i class="i">external symbols</i> of <i class="i">packages-to-use</i>.
+The inherited <i class="i">symbols</i> become <i class="i">accessible</i> as 
+<i class="i">internal symbols</i> of <i class="i">package</i>.  
+</p>
+<p><i class="i">Packages-to-use</i> are added to the <i class="i">use list</i> of <i class="i">package</i>
+if they are not there already.  All <i class="i">external symbols</i> in
+<i class="i">packages-to-use</i> become <i class="i">accessible</i> in <i class="i">package</i>
+as <i class="i">internal symbols</i>.
+<b class="b">use-package</b> does not cause any new <i class="i">symbols</i> to be <i class="i">present</i>
+in <i class="i">package</i> but only makes them <i class="i">accessible</i> by inheritance.
+</p>
+<p><b class="b">use-package</b> checks for
+name conflicts between the newly imported symbols and those already
+<i class="i">accessible</i> in <i class="i">package</i>.  
+A name conflict in <b class="b">use-package</b> 
+between two external symbols inherited
+by <i class="i">package</i> from <i class="i">packages-to-use</i> may be resolved in favor of
+either <i class="i">symbol</i> 
+by <i class="i">importing</i> one of them into <i class="i">package</i> and making it a
+shadowing symbol. 
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-172"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-172"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (export (intern &quot;LAND-FILL&quot; (make-package 'trash)) 'trash) &rArr;  T
+ (find-symbol &quot;LAND-FILL&quot; (make-package 'temp)) &rArr;  NIL, NIL
+ (package-use-list 'temp) &rArr;  (#&lt;PACKAGE &quot;TEMP&quot;&gt;)
+ (use-package 'trash 'temp) &rArr;  T
+ (package-use-list 'temp) &rArr;  (#&lt;PACKAGE &quot;TEMP&quot;&gt; #&lt;PACKAGE &quot;TRASH&quot;&gt;)
+ (find-symbol &quot;LAND-FILL&quot; 'temp) &rArr;  TRASH:LAND-FILL, :INHERITED
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-32"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-32"> &para;</a></span></h4>
+
+<p>The <i class="i">use list</i> of <i class="i">package</i> may be modified.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-226"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-226"> &para;</a></span></h4>
+
+<p><a class="ref" href="unuse_002dpackage.html">unuse-package                                                    [Function]</a>
+,
+<a class="ref" href="package_002duse_002dlist.html">package-use-list                                                 [Function]</a>
+,
+<a class="ref" href="Package-Concepts.html">Package Concepts</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-131"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-131"> &para;</a></span></h4>
+
+<p>It is permissible for a <i class="i">package</i> P_1 
+to <i class="i">use</i> a <i class="i">package</i> P_2
+even if P_2 already uses P_1.
+The using of <i class="i">packages</i> is not transitive, 
+so no problem results from the apparent circularity.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="defpackage.html">defpackage                                                          [Macro]</a>, Previous: <a href="unuse_002dpackage.html">unuse-package                                                    [Function]</a>, Up: <a href="Packages-Dictionary.html">Packages Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/use_002dvalue.html
@@ -0,0 +1,64 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>use-value (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="use-value (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="use-value (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="abort-_0028Function_0029.html" rel="next" title="abort (Function)">
+<link href="store_002dvalue.html" rel="prev" title="store-value">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="use_002dvalue">
+<div class="nav-panel">
+<p>
+Next: <a href="abort-_0028Function_0029.html" accesskey="n" rel="next">abort, continue, muffle-warning, store-value, use-value          [Function]</a>, Previous: <a href="store_002dvalue.html" accesskey="p" rel="prev">store-value                                                       [Restart]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="use_002dvalue-_005bRestart_005d"><span>9.2.45 use-value                                                         [Restart]<a class="copiable-link" href="#use_002dvalue-_005bRestart_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Data-Arguments-Required_003a_003a-4"><span>Data Arguments Required::<a class="copiable-link" href="#Data-Arguments-Required_003a_003a-4"> &para;</a></span></h4>
+
+<p>a value to use instead (once).
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-215"><span>Description::<a class="copiable-link" href="#Description_003a_003a-215"> &para;</a></span></h4>
+
+<p>The <b class="b">use-value</b> <i class="i">restart</i> is generally used by <i class="i">handlers</i> trying 
+to recover from errors of <i class="i">types</i> such as <b class="b">cell-error</b>, 
+where the handler may wish to supply a replacement datum for one-time use.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-189"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-189"> &para;</a></span></h4>
+
+<p><a class="ref" href="Restarts.html">Restarts</a>,
+<a class="ref" href="Interfaces-to-Restarts.html">Interfaces to Restarts</a>,
+<a class="ref" href="invoke_002drestart.html">invoke-restart                                                   [Function]</a>
+,
+<a class="ref" href="#use_002dvalue">use-value                                                         [Restart]</a>
+ (<i class="i">function</i>),
+<a class="ref" href="store_002dvalue.html">store-value                                                       [Restart]</a>
+ (<i class="i">function</i> and <i class="i">restart</i>)
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/user_002dhomedir_002dpathname.html
@@ -0,0 +1,88 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>user-homedir-pathname (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="user-homedir-pathname (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="user-homedir-pathname (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Environment-Dictionary.html" rel="up" title="Environment Dictionary">
+<link href="software_002dtype.html" rel="prev" title="software-type">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="user_002dhomedir_002dpathname">
+<div class="nav-panel">
+<p>
+Previous: <a href="software_002dtype.html" accesskey="p" rel="prev">software-type, software-version                                  [Function]</a>, Up: <a href="Environment-Dictionary.html" accesskey="u" rel="up">Environment Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="user_002dhomedir_002dpathname-_005bFunction_005d"><span>25.2.30 user-homedir-pathname                                            [Function]<a class="copiable-link" href="#user_002dhomedir_002dpathname-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">user-homedir-pathname</code>  <i class="i"><span class="r">&amp;optional</span> host</i> &rArr;  <i class="i">pathname</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-511"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-511"> &para;</a></span></h4>
+
+<p><i class="i">host</i>&mdash;a <i class="i">string</i>, a <i class="i">list</i> of <i class="i">strings</i>, or <code class="t">:unspecific</code>.
+</p>
+<p><i class="i">pathname</i>&mdash;a <i class="i">pathname</i>, or <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-678"><span>Description::<a class="copiable-link" href="#Description_003a_003a-678"> &para;</a></span></h4>
+
+<p><b class="b">user-homedir-pathname</b> determines the <i class="i">pathname</i> that corresponds
+to the user&rsquo;s home directory on <i class="i">host</i>.  
+If <i class="i">host</i> is not supplied, its value is <i class="i">implementation-dependent</i>.
+</p>
+<p>For a description of <code class="t">:unspecific</code>, see <a class="ref" href="Pathname-Components.html">Pathname Components</a>.
+</p>
+<p>The definition of home directory is <i class="i">implementation-dependent</i>, 
+but defined in <span class="r">Common Lisp</span> to mean the directory where the user
+keeps personal files such as initialization files and mail.  
+</p>
+<p><b class="b">user-homedir-pathname</b> returns a <i class="i">pathname</i> without any name, 
+type, or version component (those components are all <b class="b">nil</b>)
+for the user&rsquo;s home directory on <i class="i">host</i>.
+</p>
+<p>If it is impossible to determine the user&rsquo;s home directory on <i class="i">host</i>,
+then <b class="b">nil</b> is returned.
+<b class="b">user-homedir-pathname</b> never returns <b class="b">nil</b> if <i class="i">host</i> is not supplied.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-478"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-478"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (pathnamep (user-homedir-pathname)) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-141"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-141"> &para;</a></span></h4>
+
+<p>The host computer&rsquo;s file system,
+and the <i class="i">implementation</i>.
+</p>
+
+
+
+
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/values-_0028Type-Specifier_0029.html
@@ -0,0 +1,76 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>values (Type Specifier) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="values (Type Specifier) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="values (Type Specifier) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Types-and-Classes-Dictionary.html" rel="up" title="Types and Classes Dictionary">
+<link href="eql-_0028Type-Specifier_0029.html" rel="next" title="eql (Type Specifier)">
+<link href="or-_0028Type-Specifier_0029.html" rel="prev" title="or (Type Specifier)">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="values-_0028Type-Specifier_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="eql-_0028Type-Specifier_0029.html" accesskey="n" rel="next">eql                                                        [Type Specifier]</a>, Previous: <a href="or-_0028Type-Specifier_0029.html" accesskey="p" rel="prev">or                                                         [Type Specifier]</a>, Up: <a href="Types-and-Classes-Dictionary.html" accesskey="u" rel="up">Types and Classes Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="values-_005bType-Specifier_005d"><span>4.4.22 values                                                     [Type Specifier]<a class="copiable-link" href="#values-_005bType-Specifier_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-6"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-6"> &para;</a></span></h4>
+
+<p>Specializing.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-6"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-6"> &para;</a></span></h4>
+
+<p>(<code class="code">values</code>{<i class="i">!<i class="i">value-typespec</i></i>})
+</p>
+<p>[Reviewer Note by Barmar: Missing <b class="b">&amp;key</b>]
+</p>
+<p><i class="i">value-typespec</i>&nbsp;::={<i class="i">typespec</i>}*&nbsp;<code class="t">[</code><span class="r">&amp;optional</span>&nbsp;<span class="r">{<i class="i">typespec</i>}*</span><code class="t">]</code>&nbsp;<code class="t">[</code><span class="r">&amp;rest</span>&nbsp;typespec&nbsp;<code class="t">]</code>&nbsp;<code class="t">[</code><b class="b">&amp;allow-other-keys</b><code class="t">]</code><!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-6"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-6"> &para;</a></span></h4>
+
+<p><i class="i">typespec</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-6"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-6"> &para;</a></span></h4>
+
+<p>This <i class="i">type specifier</i> can be used only as the <i class="i">value-type</i> in a
+<b class="b">function</b> <i class="i">type specifier</i> or a <b class="b">the</b>
+<i class="i">special form</i>.  It is used to specify individual <i class="i">types</i> 
+when <i class="i">multiple values</i> are involved.
+The <b class="b">&amp;optional</b> and <b class="b">&amp;rest</b> markers can appear in the <i class="i">value-type</i> list;
+they indicate the parameter list of a <i class="i">function</i> that, 
+when given to <b class="b">multiple-value-call</b> along with the values,
+would correctly receive those values.
+</p>
+<p>The symbol <b class="b">*</b> may not be among the <i class="i">value-types</i>.
+</p>
+<p>The symbol <b class="b">values</b> is not valid as a <i class="i">type specifier</i>;
+and, specifically, it is not an abbreviation for <code class="t">(values)</code>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/values.html
@@ -0,0 +1,127 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>values (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="values (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="values (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="values_002dlist.html" rel="next" title="values-list">
+<link href="multiple_002dvalue_002dsetq.html" rel="prev" title="multiple-value-setq">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="values">
+<div class="nav-panel">
+<p>
+Next: <a href="values_002dlist.html" accesskey="n" rel="next">values-list                                                      [Function]</a>, Previous: <a href="multiple_002dvalue_002dsetq.html" accesskey="p" rel="prev">multiple-value-setq                                                 [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="values-_005bAccessor_005d"><span>5.3.53 values                                                           [Accessor]<a class="copiable-link" href="#values-_005bAccessor_005d"> &para;</a></span></h4>
+
+<p><code class="code">values</code>  <i class="i"><span class="r">&amp;rest</span> object</i> &rArr;  <i class="i">{<i class="i">object</i>}*</i>
+</p>
+<p>(setf (<code class="code">         values</code> <i class="i"><span class="r">&amp;rest</span> place</i>) new-values)<br>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-72"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-72"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">place</i>&mdash;a <i class="i">place</i>.
+</p>
+<p><i class="i">new-value</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-106"><span>Description::<a class="copiable-link" href="#Description_003a_003a-106"> &para;</a></span></h4>
+
+<p><b class="b">values</b> 
+returns the <i class="i">objects</i> as <i class="i">multiple values</i>_2.
+</p>
+<p><b class="b">setf</b> of <b class="b">values</b> is used to store the
+<i class="i">multiple values</i>_2 <i class="i">new-values</i> into the <i class="i">places</i>.  
+See <a class="ref" href="VALUES-Forms-as-Places.html">VALUES Forms as Places</a>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-80"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-80"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (values) &rArr;  &lt;<i class="i">no <i class="i">values</i></i>&gt;
+ (values 1) &rArr;  1
+ (values 1 2) &rArr;  1, 2
+ (values 1 2 3) &rArr;  1, 2, 3
+ (values (values 1 2 3) 4 5) &rArr;  1, 4, 5
+ (defun polar (x y)
+   (values (sqrt (+ (* x x) (* y y))) (atan y x))) &rArr;  POLAR
+ (multiple-value-bind (r theta) (polar 3.0 4.0)
+   (vector r theta))
+&rArr;  #(5.0 0.927295)
+</pre></div>
+
+<p>Sometimes it is desirable to indicate explicitly that a function returns
+exactly one value.  For example, the function
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun foo (x y)
+   (floor (+ x y) y)) &rArr;  FOO
+</pre></div>
+
+<p>returns two values because <b class="b">floor</b> returns
+two values.  It may be that the second value makes no sense,
+or that for efficiency reasons it is desired not to compute the
+second value.  <b class="b">values</b> is the standard idiom
+for indicating that only one value is to be returned:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun foo (x y)
+   (values (floor (+ x y) y))) &rArr;  FOO
+</pre></div>
+
+<p>This works because <b class="b">values</b> 
+returns exactly one value for each of
+<i class="i">args</i>; as for any function call,
+if any of <i class="i">args</i> produces more than one value, all but the
+first are discarded.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-90"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-90"> &para;</a></span></h4>
+
+<p><a class="ref" href="values_002dlist.html">values-list                                                      [Function]</a>
+,
+<a class="ref" href="multiple_002dvalue_002dbind.html">multiple-value-bind                                                 [Macro]</a>
+,
+<a class="ref" href="multiple_002dvalues_002dlimit.html">multiple-values-limit                                   [Constant Variable]</a>
+,
+<a class="ref" href="Evaluation.html">Evaluation</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-57"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-57"> &para;</a></span></h4>
+
+<p>Since <b class="b">values</b> is a <i class="i">function</i>, not a <i class="i">macro</i> or <i class="i">special form</i>,
+it receives as <i class="i">arguments</i> only the <i class="i">primary values</i> of 
+its <i class="i">argument</i> <i class="i">forms</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="values_002dlist.html">values-list                                                      [Function]</a>, Previous: <a href="multiple_002dvalue_002dsetq.html">multiple-value-setq                                                 [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/values_002dlist.html
@@ -0,0 +1,88 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>values-list (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="values-list (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="values-list (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="multiple_002dvalues_002dlimit.html" rel="next" title="multiple-values-limit">
+<link href="values.html" rel="prev" title="values">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="values_002dlist">
+<div class="nav-panel">
+<p>
+Next: <a href="multiple_002dvalues_002dlimit.html" accesskey="n" rel="next">multiple-values-limit                                   [Constant Variable]</a>, Previous: <a href="values.html" accesskey="p" rel="prev">values                                                           [Accessor]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="values_002dlist-_005bFunction_005d"><span>5.3.54 values-list                                                      [Function]<a class="copiable-link" href="#values_002dlist-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">values-list</code>  <i class="i">list</i> &rArr;  <i class="i">{<i class="i">element</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-73"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-73"> &para;</a></span></h4>
+
+<p><i class="i">list</i>&mdash;a <i class="i">list</i>.
+</p>
+<p><i class="i">elements</i>&mdash;the <i class="i">elements</i> of the <i class="i">list</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-107"><span>Description::<a class="copiable-link" href="#Description_003a_003a-107"> &para;</a></span></h4>
+
+<p>Returns the <i class="i">elements</i> of the <i class="i">list</i> as <i class="i">multiple values</i>_2.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-81"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-81"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (values-list nil) &rArr;  &lt;<i class="i">no <i class="i">values</i></i>&gt;
+ (values-list '(1)) &rArr;  1
+ (values-list '(1 2)) &rArr;  1, 2
+ (values-list '(1 2 3)) &rArr;  1, 2, 3
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-20"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-20"> &para;</a></span></h4>
+
+<p>Should signal <b class="b">type-error</b> if its argument is not a <i class="i">proper list</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-91"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-91"> &para;</a></span></h4>
+
+<p><a class="ref" href="multiple_002dvalue_002dbind.html">multiple-value-bind                                                 [Macro]</a>
+,
+<a class="ref" href="multiple_002dvalue_002dlist.html">multiple-value-list                                                 [Macro]</a>
+,
+<a class="ref" href="multiple_002dvalues_002dlimit.html">multiple-values-limit                                   [Constant Variable]</a>
+,
+<a class="ref" href="values.html">values                                                           [Accessor]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-58"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-58"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (values-list <i class="i">list</i>) &equiv; (apply #'values <i class="i">list</i>)
+</pre></div>
+
+<p><code class="t">(equal <i class="i">x</i> (multiple-value-list (values-list <i class="i">x</i>)))</code>
+returns <i class="i">true</i> for all <i class="i">lists</i> <i class="i">x</i>.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/vector-_0028System-Class_0029.html
@@ -0,0 +1,122 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>vector (System Class) (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="vector (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="vector (System Class) (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="simple_002dvector.html" rel="next" title="simple-vector">
+<link href="simple_002darray.html" rel="prev" title="simple-array">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="vector-_0028System-Class_0029">
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002dvector.html" accesskey="n" rel="next">simple-vector                                                        [Type]</a>, Previous: <a href="simple_002darray.html" accesskey="p" rel="prev">simple-array                                                         [Type]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="vector-_005bSystem-Class_005d"><span>15.2.3 vector                                                       [System Class]<a class="copiable-link" href="#vector-_005bSystem-Class_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-54"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-54"> &para;</a></span></h4>
+<p><b class="b">vector</b>,
+<b class="b">array</b>,
+<b class="b">sequence</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-422"><span>Description::<a class="copiable-link" href="#Description_003a_003a-422"> &para;</a></span></h4>
+
+<p>Any one-dimensional <i class="i">array</i> is a <i class="i">vector</i>.
+</p>
+<p>The <i class="i">type</i> <b class="b">vector</b> is a <i class="i">subtype</i> of <i class="i">type</i> <b class="b">array</b>; 
+for all <i class="i">types</i> <code class="t">x</code>, <code class="t">(vector x)</code> is the same as <code class="t">(array x (*))</code>.
+</p>
+<p>The <i class="i">type</i> <code class="t">(vector t)</code>, the <i class="i">type</i> <b class="b">string</b>, and the <i class="i">type</i> <b class="b">bit-vector</b>
+are <i class="i">disjoint</i> <i class="i">subtypes</i> of <i class="i">type</i> <b class="b">vector</b>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Kind_003a_003a-20"><span>Compound Type Specifier Kind::<a class="copiable-link" href="#Compound-Type-Specifier-Kind_003a_003a-20"> &para;</a></span></h4>
+
+<p>Specializing.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Syntax_003a_003a-20"><span>Compound Type Specifier Syntax::<a class="copiable-link" href="#Compound-Type-Specifier-Syntax_003a_003a-20"> &para;</a></span></h4>
+
+<p>(<code class="code">vector</code>{<i class="i"><code class="t">[</code>{element-type | <b class="b">*</b>} <span class="r">[</span>{size | <b class="b">*</b>}<span class="r">]</span><code class="t">]</code></i>})
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Arguments_003a_003a-20"><span>Compound Type Specifier Arguments::<a class="copiable-link" href="#Compound-Type-Specifier-Arguments_003a_003a-20"> &para;</a></span></h4>
+
+<p><i class="i">size</i>&mdash;a non-negative <i class="i">fixnum</i>.
+</p>
+<p><i class="i">element-type</i>&mdash;a <i class="i">type specifier</i>.
+</p>
+<h4 class="subsubheading" id="Compound-Type-Specifier-Description_003a_003a-20"><span>Compound Type Specifier Description::<a class="copiable-link" href="#Compound-Type-Specifier-Description_003a_003a-20"> &para;</a></span></h4>
+
+<p>This denotes the set of specialized <i class="i">vectors</i>
+whose <i class="i">element type</i> and <i class="i">dimension</i> match the specified values.
+Specifically:
+</p>
+<p>If <i class="i">element-type</i> is the <i class="i">symbol</i> <b class="b">*</b>,
+<i class="i">vectors</i> are not excluded on the basis of their <i class="i">element type</i>.
+Otherwise, only those <i class="i">vectors</i> are included whose <i class="i">actual array element type</i>
+</p>
+<p>is the result of <i class="i">upgrading</i> <i class="i">element-type</i>;
+see <a class="ref" href="Array-Upgrading.html">Array Upgrading</a>.
+</p>
+<p>If a <i class="i">size</i> is specified,
+the set includes only those <i class="i">vectors</i> whose only <i class="i">dimension</i>
+is <i class="i">size</i>.
+If the <i class="i">symbol</i> <b class="b">*</b> is specified instead of a <i class="i">size</i>,
+the set is not restricted on the basis of <i class="i">dimension</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-345"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-345"> &para;</a></span></h4>
+
+<p><a class="ref" href="Required-Kinds-of-Specialized-Arrays.html">Required Kinds of Specialized Arrays</a>,
+<a class="ref" href="Sharpsign-Left_002dParenthesis.html">Sharpsign Left-Parenthesis</a>,
+<a class="ref" href="Printing-Other-Vectors.html">Printing Other Vectors</a>,
+<a class="ref" href="Sharpsign-A.html">Sharpsign A</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-232"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-232"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <code class="t">(vector <i class="i">e</i> <i class="i">s</i>)</code> 
+is equivalent to the <i class="i">type</i> <code class="t">(array <i class="i">e</i> (<i class="i">s</i>))</code>.
+</p>
+<p>The type <code class="t">(vector bit)</code> has the name <b class="b">bit-vector</b>.
+</p>
+<p>The union of all <i class="i">types</i> <code class="t">(vector C)</code>, 
+where C is any <i class="i">subtype</i> of <b class="b">character</b>,
+has the name <b class="b">string</b>.
+</p>
+<p><code class="t">(vector *)</code> refers to all <i class="i">vectors</i> 
+regardless of element type, <code class="t">(vector <i class="i">type-specifier</i>)</code>
+refers only to those <i class="i">vectors</i> 
+that can result from giving <i class="i">type-specifier</i> as the
+<code class="t">:element-type</code> argument to <b class="b">make-array</b>.  
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002dvector.html">simple-vector                                                        [Type]</a>, Previous: <a href="simple_002darray.html">simple-array                                                         [Type]</a>, Up: <a href="Arrays-Dictionary.html">Arrays Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/vector.html
@@ -0,0 +1,84 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>vector (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="vector (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="vector (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="vector_002dpop.html" rel="next" title="vector-pop">
+<link href="svref.html" rel="prev" title="svref">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="vector">
+<div class="nav-panel">
+<p>
+Next: <a href="vector_002dpop.html" accesskey="n" rel="next">vector-pop                                                       [Function]</a>, Previous: <a href="svref.html" accesskey="p" rel="prev">svref                                                            [Accessor]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="vector-_005bFunction_005d"><span>15.2.29 vector                                                           [Function]<a class="copiable-link" href="#vector-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">vector</code>  <i class="i"><span class="r">&amp;rest</span> objects</i> &rArr;  <i class="i">vector</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-338"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-338"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">vector</i>&mdash;a <i class="i">vector</i> of <i class="i">type</i> <code class="t">(vector t <code class="t">*</code>)</code>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-448"><span>Description::<a class="copiable-link" href="#Description_003a_003a-448"> &para;</a></span></h4>
+
+<p>Creates a <i class="i">fresh</i> <i class="i">simple general vector</i> whose size
+corresponds to the number of <i class="i">objects</i>. 
+</p>
+<p>The <i class="i">vector</i> is initialized to contain the <i class="i">objects</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-320"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-320"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (arrayp (setq v (vector 1 2 'sirens))) &rArr;  <i class="i">true</i>
+ (vectorp v) &rArr;  <i class="i">true</i>
+ (simple-vector-p v) &rArr;  <i class="i">true</i>         
+ (length v) &rArr;  3
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-368"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-368"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002darray.html">make-array                                                       [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-245"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-245"> &para;</a></span></h4>
+
+<p><b class="b">vector</b> is analogous to <b class="b">list</b>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (vector a_1 a_2 ... a_n)
+  &equiv; (make-array (list <i class="i">n</i>) :element-type t
+                          :initial-contents 
+                            (list a_1 a_2 ... a_n))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/vector_002dpop.html
@@ -0,0 +1,91 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>vector-pop (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="vector-pop (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="vector-pop (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="vector_002dpush.html" rel="next" title="vector-push">
+<link href="vector.html" rel="prev" title="vector">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="vector_002dpop">
+<div class="nav-panel">
+<p>
+Next: <a href="vector_002dpush.html" accesskey="n" rel="next">vector-push, vector-push-extend                                  [Function]</a>, Previous: <a href="vector.html" accesskey="p" rel="prev">vector                                                           [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="vector_002dpop-_005bFunction_005d"><span>15.2.30 vector-pop                                                       [Function]<a class="copiable-link" href="#vector_002dpop-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">vector-pop</code>  <i class="i">vector</i> &rArr;  <i class="i">element</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-339"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-339"> &para;</a></span></h4>
+
+<p><i class="i">vector</i>&mdash;a <i class="i">vector</i> with a <i class="i">fill pointer</i>.
+</p>
+<p><i class="i">element</i>&mdash;an <i class="i">object</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-449"><span>Description::<a class="copiable-link" href="#Description_003a_003a-449"> &para;</a></span></h4>
+
+<p>Decreases the <i class="i">fill pointer</i> of <i class="i">vector</i> by one, 
+and retrieves the <i class="i">element</i> of <i class="i">vector</i> that is
+designated by the new <i class="i">fill pointer</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-321"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-321"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (vector-push (setq fable (list 'fable))
+              (setq fa (make-array 8
+                                   :fill-pointer 2
+                                   :initial-element 'sisyphus))) &rArr;  2 
+ (fill-pointer fa) &rArr;  3 
+ (eq (vector-pop fa) fable) &rArr;  <i class="i">true</i>
+ (vector-pop fa) &rArr;  SISYPHUS 
+ (fill-pointer fa) &rArr;  1 
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-49"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-49"> &para;</a></span></h4>
+
+<p>The <i class="i">fill pointer</i> is decreased by one.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-65"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-65"> &para;</a></span></h4>
+
+<p>The value of the <i class="i">fill pointer</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-147"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-147"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">type-error</b> is signaled if <i class="i">vector</i> does not have a <i class="i">fill pointer</i>.
+</p>
+<p>If the <i class="i">fill pointer</i> is zero, <b class="b">vector-pop</b> signals an error of <i class="i">type</i> <b class="b">error</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-369"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-369"> &para;</a></span></h4>
+
+<p><a class="ref" href="vector_002dpush.html">vector-push, vector-push-extend                                  [Function]</a>
+, <b class="b">vector-push-extend</b>, 
+<a class="ref" href="fill_002dpointer.html">fill-pointer                                                     [Accessor]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/vector_002dpush.html
@@ -0,0 +1,137 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>vector-push (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="vector-push (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="vector-push (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="vectorp.html" rel="next" title="vectorp">
+<link href="vector_002dpop.html" rel="prev" title="vector-pop">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="vector_002dpush">
+<div class="nav-panel">
+<p>
+Next: <a href="vectorp.html" accesskey="n" rel="next">vectorp                                                          [Function]</a>, Previous: <a href="vector_002dpop.html" accesskey="p" rel="prev">vector-pop                                                       [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="vector_002dpush_002c-vector_002dpush_002dextend-_005bFunction_005d"><span>15.2.31 vector-push, vector-push-extend                                  [Function]<a class="copiable-link" href="#vector_002dpush_002c-vector_002dpush_002dextend-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">vector-push</code>  <i class="i">new-element vector</i> &rArr;  <i class="i">new-index-p</i>
+</p>
+<p><code class="code">vector-push-extend</code>  <i class="i">new-element vector <span class="r">&amp;optional</span> extension</i> &rArr;  <i class="i">new-index</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-340"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-340"> &para;</a></span></h4>
+
+<p><i class="i">new-element</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">vector</i>&mdash;a <i class="i">vector</i> with a <i class="i">fill pointer</i>.
+</p>
+<p><i class="i">extension</i>&mdash;a positive <i class="i">integer</i>.
+ The default is <i class="i">implementation-dependent</i>.
+</p>
+<p><i class="i">new-index-p</i>&mdash;a <i class="i">valid array index</i> for <i class="i">vector</i>, or <b class="b">nil</b>.
+</p>
+<p><i class="i">new-index</i>&mdash;a <i class="i">valid array index</i> for <i class="i">vector</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-450"><span>Description::<a class="copiable-link" href="#Description_003a_003a-450"> &para;</a></span></h4>
+
+<p><b class="b">vector-push</b> and <b class="b">vector-push-extend</b> store 
+<i class="i">new-element</i> in <i class="i">vector</i>.
+<b class="b">vector-push</b> attempts to store
+<i class="i">new-element</i> 
+in the element of <i class="i">vector</i> designated by the <i class="i">fill pointer</i>,
+and to increase the <i class="i">fill pointer</i> by one.  If the 
+<code class="t">(&gt;= (fill-pointer <i class="i">vector</i>) (array-dimension <i class="i">vector</i> 0))</code>,
+neither <i class="i">vector</i> nor its <i class="i">fill pointer</i> are affected.
+Otherwise, the store and increment take
+place and <b class="b">vector-push</b> 
+returns the former value of the <i class="i">fill pointer</i>
+which is one less than the one it leaves in <i class="i">vector</i>.
+</p>
+<p><b class="b">vector-push-extend</b> is just like <b class="b">vector-push</b> except
+that if the <i class="i">fill pointer</i> gets too large, <i class="i">vector</i> is extended using
+<b class="b">adjust-array</b> so that it can contain more elements.
+<i class="i">Extension</i>
+is the minimum number of elements to be added to <i class="i">vector</i> if it
+must be extended.
+</p>
+<p><b class="b">vector-push</b> and 
+<b class="b">vector-push-extend</b> return the index of <i class="i">new-element</i> in <i class="i">vector</i>.
+If <code class="t">(&gt;= (fill-pointer <i class="i">vector</i>) (array-dimension <i class="i">vector</i> 0))</code>,
+<b class="b">vector-push</b> returns <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-322"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-322"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (vector-push (setq fable (list 'fable))
+              (setq fa (make-array 8 
+                                   :fill-pointer 2
+                                   :initial-element 'first-one))) &rArr;  2 
+ (fill-pointer fa) &rArr;  3 
+ (eq (aref fa 2) fable) &rArr;  <i class="i">true</i>
+ (vector-push-extend #\X
+                    (setq aa 
+                          (make-array 5
+                                      :element-type 'character
+                                      :adjustable t
+                                      :fill-pointer 3))) &rArr;  3 
+ (fill-pointer aa) &rArr;  4 
+ (vector-push-extend #\Y aa 4) &rArr;  4 
+ (array-total-size aa) &rArr;  at least 5 
+ (vector-push-extend #\Z aa 4) &rArr;  5 
+ (array-total-size aa) &rArr;  9 ;(or more)
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-66"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-66"> &para;</a></span></h4>
+<p>The value of the <i class="i">fill pointer</i>.
+</p>
+<p>How <i class="i">vector</i> was created.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-148"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-148"> &para;</a></span></h4>
+
+<p>An error of <i class="i">type</i> <b class="b">error</b> is signaled by <b class="b">vector-push-extend</b>
+if it tries to extend <i class="i">vector</i> and <i class="i">vector</i> is not <i class="i">actually adjustable</i>.
+</p>
+<p>An error of <i class="i">type</i> <b class="b">error</b> is signaled if <i class="i">vector</i> does not 
+have a <i class="i">fill pointer</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-370"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-370"> &para;</a></span></h4>
+
+<p><a class="ref" href="adjustable_002darray_002dp.html">adjustable-array-p                                               [Function]</a>
+, 
+<a class="ref" href="fill_002dpointer.html">fill-pointer                                                     [Accessor]</a>
+, 
+<a class="ref" href="vector_002dpop.html">vector-pop                                                       [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="vectorp.html">vectorp                                                          [Function]</a>, Previous: <a href="vector_002dpop.html">vector-pop                                                       [Function]</a>, Up: <a href="Arrays-Dictionary.html">Arrays Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/vectorp.html
@@ -0,0 +1,72 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>vectorp (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="vectorp (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="vectorp (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Arrays-Dictionary.html" rel="up" title="Arrays Dictionary">
+<link href="bit-_0028Array_0029.html" rel="next" title="bit (Array)">
+<link href="vector_002dpush.html" rel="prev" title="vector-push">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="vectorp">
+<div class="nav-panel">
+<p>
+Next: <a href="bit-_0028Array_0029.html" accesskey="n" rel="next">bit, sbit                                                        [Accessor]</a>, Previous: <a href="vector_002dpush.html" accesskey="p" rel="prev">vector-push, vector-push-extend                                  [Function]</a>, Up: <a href="Arrays-Dictionary.html" accesskey="u" rel="up">Arrays Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="vectorp-_005bFunction_005d"><span>15.2.32 vectorp                                                          [Function]<a class="copiable-link" href="#vectorp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">vectorp</code>  <i class="i">object</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-341"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-341"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-451"><span>Description::<a class="copiable-link" href="#Description_003a_003a-451"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">object</i> is of <i class="i">type</i> <b class="b">vector</b>;
+otherwise, returns <i class="i">false</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-323"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-323"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (vectorp &quot;aaaaaa&quot;) &rArr;  <i class="i">true</i>
+ (vectorp (make-array 6 :fill-pointer t)) &rArr;  <i class="i">true</i>
+ (vectorp (make-array '(2 3 4))) &rArr;  <i class="i">false</i>
+ (vectorp #*11) &rArr;  <i class="i">true</i>
+ (vectorp #b11) &rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Notes_003a_003a-246"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-246"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (vectorp <i class="i">object</i>) &equiv; (typep <i class="i">object</i> 'vector)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/warn.html
@@ -0,0 +1,143 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>warn (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="warn (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="warn (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="simple_002dwarning.html" rel="next" title="simple-warning">
+<link href="simple_002dcondition_002dformat_002dcontrol.html" rel="prev" title="simple-condition-format-control">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="warn">
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002dwarning.html" accesskey="n" rel="next">simple-warning                                             [Condition Type]</a>, Previous: <a href="simple_002dcondition_002dformat_002dcontrol.html" accesskey="p" rel="prev">simple-condition-format-control, simple-condition-format-arguments</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="warn-_005bFunction_005d"><span>9.2.20 warn                                                             [Function]<a class="copiable-link" href="#warn-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">warn</code>  <i class="i">datum <span class="r">&amp;rest</span> arguments</i> &rArr;  <i class="i"><b class="b">nil</b></i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-140"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-140"> &para;</a></span></h4>
+
+<p><i class="i">datum</i>, <i class="i">arguments</i>&mdash;<i class="i">designators</i> for a <i class="i">condition</i> 
+ of default type <b class="b">simple-warning</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-190"><span>Description::<a class="copiable-link" href="#Description_003a_003a-190"> &para;</a></span></h4>
+
+<p><i class="i">Signals</i> a <i class="i">condition</i> of <i class="i">type</i> <b class="b">warning</b>.
+If the <i class="i">condition</i> is not <i class="i">handled</i>,
+reports the <i class="i">condition</i> to <i class="i">error output</i>.
+</p>
+<p>The precise mechanism for warning is as follows:
+</p>
+<dl class="table">
+<dt><b class="b">The warning condition is signaled</b></dt>
+<dd><p>While the <b class="b">warning</b> <i class="i">condition</i> is being signaled,
+the <b class="b">muffle-warning</b> <i class="i">restart</i> is established for use by a <i class="i">handler</i>.
+If invoked, this <i class="i">restart</i> bypasses further action by <b class="b">warn</b>,
+which in turn causes <b class="b">warn</b> to immediately return <b class="b">nil</b>.
+</p>
+</dd>
+<dt><b class="b">If no handler for the warning condition is found</b></dt>
+<dd><p>If no handlers for the warning condition are found,
+or if all such handlers decline,
+then the <i class="i">condition</i> is reported to <i class="i">error output</i>
+by <b class="b">warn</b> in an <i class="i">implementation-dependent</i> format.
+</p>
+</dd>
+<dt><b class="b"><b class="b">nil</b> is returned</b></dt>
+<dd><p>The value returned by <b class="b">warn</b> if it returns is <b class="b">nil</b>.
+</p></dd>
+</dl>
+
+<h4 class="subsubheading" id="Examples_003a_003a-120"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-120"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted">  (defun foo (x)
+    (let ((result (* x 2)))
+      (if (not (typep result 'fixnum))
+          (warn &quot;You're using very big numbers.&quot;))
+      result))
+&rArr;  FOO
+
+  (foo 3)
+&rArr;  6
+
+  (foo most-positive-fixnum)
+<code class="t"> |&gt; </code> Warning: You're using very big numbers.
+&rArr;  4294967294
+
+  (setq *break-on-signals* t)
+&rArr;  T
+
+  (foo most-positive-fixnum)
+<code class="t"> |&gt; </code> Break: Caveat emptor.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number.
+<code class="t"> |&gt; </code>  1: Return from Break.
+<code class="t"> |&gt; </code>  2: Abort to Lisp Toplevel.
+<code class="t"> |&gt; </code> Debug&gt; :continue 1
+<code class="t"> |&gt; </code> Warning: You're using very big numbers.
+&rArr;  4294967294
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-13"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-13"> &para;</a></span></h4>
+
+<p>A warning is issued.  The debugger might be entered.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-25"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-25"> &para;</a></span></h4>
+
+<p>Existing handler bindings.
+</p>
+<p><b class="b">*break-on-signals*</b>,
+<b class="b">*error-output*</b>.         
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-46"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-46"> &para;</a></span></h4>
+
+<p>If <i class="i">datum</i> is a <i class="i">condition</i>
+and if the <i class="i">condition</i> is not of <i class="i">type</i> <b class="b">warning</b>,
+or <i class="i">arguments</i> is <i class="i">non-nil</i>, an error of <i class="i">type</i> <b class="b">type-error</b> is signaled.
+</p>
+<p>If <i class="i">datum</i> is a condition type, 
+the result of <code class="t">(apply #'make-condition datum arguments)</code> 
+must be of <i class="i">type</i> <b class="b">warning</b> or an error of <i class="i">type</i> <b class="b">type-error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-167"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-167"> &para;</a></span></h4>
+
+<p><b class="b">*break-on-signals*</b>,
+<a class="ref" href="muffle_002dwarning.html">muffle-warning                                                    [Restart]</a>
+,
+<a class="ref" href="signal.html">signal                                                           [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="simple_002dwarning.html">simple-warning                                             [Condition Type]</a>, Previous: <a href="simple_002dcondition_002dformat_002dcontrol.html">simple-condition-format-control, simple-condition-format-arguments</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/warning.html
@@ -0,0 +1,56 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>warning (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="warning (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="warning (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="style_002dwarning.html" rel="next" title="style-warning">
+<link href="condition.html" rel="prev" title="condition">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="warning">
+<div class="nav-panel">
+<p>
+Next: <a href="style_002dwarning.html" accesskey="n" rel="next">style-warning                                              [Condition Type]</a>, Previous: <a href="condition.html" accesskey="p" rel="prev">condition                                                  [Condition Type]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="warning-_005bCondition-Type_005d"><span>9.2.2 warning                                                    [Condition Type]<a class="copiable-link" href="#warning-_005bCondition-Type_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Class-Precedence-List_003a_003a-20"><span>Class Precedence List::<a class="copiable-link" href="#Class-Precedence-List_003a_003a-20"> &para;</a></span></h4>
+<p><b class="b">warning</b>,
+<b class="b">condition</b>,
+<b class="b">t</b>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-172"><span>Description::<a class="copiable-link" href="#Description_003a_003a-172"> &para;</a></span></h4>
+
+<p>The <i class="i">type</i> <b class="b">warning</b> consists of all types of warnings.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-153"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-153"> &para;</a></span></h4>
+
+<p><b class="b">style-warning</b>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/when.html
@@ -0,0 +1,138 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>when (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="when (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="when (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Data-and-Control-Flow-Dictionary.html" rel="up" title="Data and Control Flow Dictionary">
+<link href="case.html" rel="next" title="case">
+<link href="or.html" rel="prev" title="or">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="when">
+<div class="nav-panel">
+<p>
+Next: <a href="case.html" accesskey="n" rel="next">case, ccase, ecase                                                  [Macro]</a>, Previous: <a href="or.html" accesskey="p" rel="prev">or                                                                  [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html" accesskey="u" rel="up">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="when_002c-unless-_005bMacro_005d"><span>5.3.45 when, unless                                                        [Macro]<a class="copiable-link" href="#when_002c-unless-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">when</code>  <i class="i">test-form {<i class="i">form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><code class="code">unless</code>  <i class="i">test-form {<i class="i">form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-64"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-64"> &para;</a></span></h4>
+
+<p><i class="i">test-form</i>&mdash;a <i class="i">form</i>.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> of the <i class="i">forms</i>
+    in a  <b class="b">when</b>   <i class="i">form</i> if the <i class="i">test-form</i> <i class="i">yields</i> <i class="i">true</i> 
+ or in an <b class="b">unless</b> <i class="i">form</i> if the <i class="i">test-form</i> <i class="i">yields</i> <i class="i">false</i>;
+ otherwise <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-98"><span>Description::<a class="copiable-link" href="#Description_003a_003a-98"> &para;</a></span></h4>
+
+<p><b class="b">when</b> and <b class="b">unless</b> allow the execution of <i class="i">forms</i> 
+to be dependent on a single <i class="i">test-form</i>.
+</p>
+<p>In a <b class="b">when</b> <i class="i">form</i>,
+if the <i class="i">test-form</i> <i class="i">yields</i> <i class="i">true</i>,
+the <i class="i">forms</i> are <i class="i">evaluated</i> in order from left to right
+and the <i class="i">values</i> returned by the <i class="i">forms</i> 
+are returned from the <b class="b">when</b> <i class="i">form</i>. 
+Otherwise, if the <i class="i">test-form</i> <i class="i">yields</i> <i class="i">false</i>,
+the <i class="i">forms</i> are not <i class="i">evaluated</i>,
+and the <b class="b">when</b> <i class="i">form</i> returns <b class="b">nil</b>.
+</p>
+<p>In an <b class="b">unless</b> <i class="i">form</i>,
+if the <i class="i">test-form</i> <i class="i">yields</i> <i class="i">false</i>,
+the <i class="i">forms</i> are <i class="i">evaluated</i> in order from left to right
+and the <i class="i">values</i> returned by the <i class="i">forms</i> 
+are returned from the <b class="b">unless</b> <i class="i">form</i>. 
+Otherwise, if the <i class="i">test-form</i> <i class="i">yields</i> <i class="i">false</i>,
+the <i class="i">forms</i> are not <i class="i">evaluated</i>,
+and the <b class="b">unless</b> <i class="i">form</i> returns <b class="b">nil</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-72"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-72"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (when t 'hello) &rArr;  HELLO
+ (unless t 'hello) &rArr;  NIL
+ (when nil 'hello) &rArr;  NIL
+ (unless nil 'hello) &rArr;  HELLO
+ (when t) &rArr;  NIL
+ (unless nil) &rArr;  NIL
+ (when t (prin1 1) (prin1 2) (prin1 3))
+<code class="t"> |&gt; </code> 123
+&rArr;  3
+ (unless t (prin1 1) (prin1 2) (prin1 3)) &rArr;  NIL
+ (when nil (prin1 1) (prin1 2) (prin1 3)) &rArr;  NIL
+ (unless nil (prin1 1) (prin1 2) (prin1 3))
+<code class="t"> |&gt; </code> 123
+&rArr;  3
+ (let ((x 3))
+   (list (when (oddp x) (incf x) (list x))
+         (when (oddp x) (incf x) (list x))
+         (unless (oddp x) (incf x) (list x))
+         (unless (oddp x) (incf x) (list x))
+         (if (oddp x) (incf x) (list x)) 
+         (if (oddp x) (incf x) (list x)) 
+         (if (not (oddp x)) (incf x) (list x)) 
+         (if (not (oddp x)) (incf x) (list x))))
+&rArr;  ((4) NIL (5) NIL 6 (6) 7 (7))
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-82"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-82"> &para;</a></span></h4>
+
+<p><a class="ref" href="and.html">and                                                                 [Macro]</a>
+,
+<a class="ref" href="cond.html">cond                                                                [Macro]</a>
+,
+<a class="ref" href="if.html">if                                                       [Special Operator]</a>
+,
+<a class="ref" href="or.html">or                                                                  [Macro]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-52"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-52"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (when <i class="i">test</i> {<i class="i">form</i>}^+) &equiv; (and <i class="i">test</i> (progn {<i class="i">form</i>}^+))
+ (when <i class="i">test</i> {<i class="i">form</i>}^+) &equiv; (cond (<i class="i">test</i> {<i class="i">form</i>}^+))
+ (when <i class="i">test</i> {<i class="i">form</i>}^+) &equiv; (if <i class="i">test</i> (progn {<i class="i">form</i>}^+) nil)
+ (when <i class="i">test</i> {<i class="i">form</i>}^+) &equiv; (unless (not <i class="i">test</i>) {<i class="i">form</i>}^+)
+ (unless <i class="i">test</i> {<i class="i">form</i>}^+) &equiv; (cond ((not <i class="i">test</i>) {<i class="i">form</i>}^+))
+ (unless <i class="i">test</i> {<i class="i">form</i>}^+) &equiv; (if <i class="i">test</i> nil (progn {<i class="i">form</i>}^+))
+ (unless <i class="i">test</i> {<i class="i">form</i>}^+) &equiv; (when (not <i class="i">test</i>) {<i class="i">form</i>}^+)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="case.html">case, ccase, ecase                                                  [Macro]</a>, Previous: <a href="or.html">or                                                                  [Macro]</a>, Up: <a href="Data-and-Control-Flow-Dictionary.html">Data and Control Flow Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/wild_002dpathname_002dp.html
@@ -0,0 +1,113 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>wild-pathname-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="wild-pathname-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="wild-pathname-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Filenames-Dictionary.html" rel="up" title="Filenames Dictionary">
+<link href="pathname_002dmatch_002dp.html" rel="next" title="pathname-match-p">
+<link href="parse_002dnamestring.html" rel="prev" title="parse-namestring">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="wild_002dpathname_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="pathname_002dmatch_002dp.html" accesskey="n" rel="next">pathname-match-p                                                 [Function]</a>, Previous: <a href="parse_002dnamestring.html" accesskey="p" rel="prev">parse-namestring                                                 [Function]</a>, Up: <a href="Filenames-Dictionary.html" accesskey="u" rel="up">Filenames Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="wild_002dpathname_002dp-_005bFunction_005d"><span>19.4.13 wild-pathname-p                                                  [Function]<a class="copiable-link" href="#wild_002dpathname_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">wild-pathname-p</code>  <i class="i">pathname <span class="r">&amp;optional</span> field-key</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-398"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-398"> &para;</a></span></h4>
+
+<p><i class="i">pathname</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">Field-key</i>&mdash;one of <code class="t">:host</code>,
+			   <code class="t">:device</code>
+			   <code class="t">:directory</code>,
+			   <code class="t">:name</code>,
+			   <code class="t">:type</code>,
+		 	   <code class="t">:version</code>,
+			or <b class="b">nil</b>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-517"><span>Description::<a class="copiable-link" href="#Description_003a_003a-517"> &para;</a></span></h4>
+
+<p><b class="b">wild-pathname-p</b> tests <i class="i">pathname</i> for the presence of wildcard components.  
+</p>
+<p>If <i class="i">pathname</i> is a <i class="i">pathname</i> (as returned by <b class="b">pathname</b>)
+it represents the name used to open the file. This may be, but is
+not required to be, the actual name of the file. 
+</p>
+<p>If <i class="i">field-key</i> is not supplied or <b class="b">nil</b>, <b class="b">wild-pathname-p</b>    
+returns true if <i class="i">pathname</i> has any wildcard components, <b class="b">nil</b> 
+if <i class="i">pathname</i> has none.
+If <i class="i">field-key</i> is <i class="i">non-nil</i>, <b class="b">wild-pathname-p</b>    
+returns true if the indicated component of <i class="i">pathname</i> is a wildcard, 
+<b class="b">nil</b> if the component is not a wildcard.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-378"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-378"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> ;;;The following examples are not portable.  They are written to run
+ ;;;with particular file systems and particular wildcard conventions.
+ ;;;Other implementations will behave differently.  These examples are
+ ;;;intended to be illustrative, not to be prescriptive.
+
+ (wild-pathname-p (make-pathname :name :wild)) &rArr;  <i class="i">true</i>
+ (wild-pathname-p (make-pathname :name :wild) :name) &rArr;  <i class="i">true</i>
+ (wild-pathname-p (make-pathname :name :wild) :type) &rArr;  <i class="i">false</i>
+ (wild-pathname-p (pathname &quot;s:&gt;foo&gt;**&gt;&quot;)) &rArr;  <i class="i">true</i> ;Lispm
+ (wild-pathname-p (pathname :name &quot;F*O&quot;)) &rArr;  <i class="i">true</i> ;Most places
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-179"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-179"> &para;</a></span></h4>
+
+<p>If <i class="i">pathname</i> is not a <i class="i">pathname</i>, a <i class="i">string</i>, 
+or a <i class="i">stream associated with a file</i> an error of <i class="i">type</i> <b class="b">type-error</b> is signaled.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-420"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-420"> &para;</a></span></h4>
+
+<p><b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+<a class="ref" href="File-System-Concepts.html">File System Concepts</a>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-279"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-279"> &para;</a></span></h4>
+
+<p>Not all implementations support wildcards in all fields.
+See <a class="ref" href="_002d_003eWILD-as-a-Component-Value.html">:WILD as a Component Value</a> and <a class="ref" href="Restrictions-on-Wildcard-Pathnames.html">Restrictions on Wildcard Pathnames</a>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="pathname_002dmatch_002dp.html">pathname-match-p                                                 [Function]</a>, Previous: <a href="parse_002dnamestring.html">parse-namestring                                                 [Function]</a>, Up: <a href="Filenames-Dictionary.html">Filenames Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/with_002daccessors.html
@@ -0,0 +1,159 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>with-accessors (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="with-accessors (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="with-accessors (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="with_002dslots.html" rel="next" title="with-slots">
+<link href="make_002dload_002dform_002dsaving_002dslots.html" rel="prev" title="make-load-form-saving-slots">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="with_002daccessors">
+<div class="nav-panel">
+<p>
+Next: <a href="with_002dslots.html" accesskey="n" rel="next">with-slots                                                          [Macro]</a>, Previous: <a href="make_002dload_002dform_002dsaving_002dslots.html" accesskey="p" rel="prev">make-load-form-saving-slots                                      [Function]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="with_002daccessors-_005bMacro_005d"><span>7.7.23 with-accessors                                                      [Macro]<a class="copiable-link" href="#with_002daccessors-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">with-accessors</code>  <i class="i"><span class="r"><span class="r">(</span>{<i class="i">slot-entry</i>}*<span class="r">)</span></span> 
+		   instance-form
+ 		   {<i class="i">declaration</i>}* {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><i class="i">slot-entry</i>&nbsp;::=<span class="r">(</span>variable-name&nbsp;accessor-name&nbsp;<span class="r">)</span><!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-111"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-111"> &para;</a></span></h4>
+
+<p><i class="i">variable-name</i>&mdash;a <i class="i">variable name</i>; not evaluated.
+</p>
+<p><i class="i">accessor-name</i>&mdash;a <i class="i">function name</i>; not evaluated.
+</p>
+<p><i class="i">instance-form</i>&mdash;a <i class="i">form</i>; evaluated.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-150"><span>Description::<a class="copiable-link" href="#Description_003a_003a-150"> &para;</a></span></h4>
+
+<p>Creates a lexical environment in which
+the slots specified by
+<i class="i">slot-entry</i> are lexically available through their accessors as if
+they were variables.  The macro <b class="b">with-accessors</b> invokes the
+appropriate accessors to <i class="i">access</i> the <i class="i">slots</i> specified
+by <i class="i">slot-entry</i>.  Both <b class="b">setf</b>
+and <b class="b">setq</b> can be used to set the value of the <i class="i">slot</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-106"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-106"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defclass thing ()
+           ((x :initarg :x :accessor thing-x)
+            (y :initarg :y :accessor thing-y)))
+&rArr;  #&lt;STANDARD-CLASS THING 250020173&gt;
+ (defmethod (setf thing-x) :before (new-x (thing thing))
+   (format t &quot;~&amp;Changing X from ~D to ~D in ~S.~
+           (thing-x thing) new-x thing))
+ (setq thing1 (make-instance 'thing :x 1 :y 2)) &rArr;  #&lt;THING 43135676&gt;
+ (setq thing2 (make-instance 'thing :x 7 :y 8)) &rArr;  #&lt;THING 43147374&gt;
+ (with-accessors ((x1 thing-x) (y1 thing-y))
+                 thing1
+   (with-accessors ((x2 thing-x) (y2 thing-y))
+                   thing2
+     (list (list x1 (thing-x thing1) y1 (thing-y thing1)
+                 x2 (thing-x thing2) y2 (thing-y thing2))
+           (setq x1 (+ y1 x2))
+           (list x1 (thing-x thing1) y1 (thing-y thing1)
+                 x2 (thing-x thing2) y2 (thing-y thing2))
+           (setf (thing-x thing2) (list x1))
+           (list x1 (thing-x thing1) y1 (thing-y thing1)
+                 x2 (thing-x thing2) y2 (thing-y thing2)))))
+<code class="t"> |&gt; </code> Changing X from 1 to 9 in #&lt;THING 43135676&gt;.
+<code class="t"> |&gt; </code> Changing X from 7 to (9) in #&lt;THING 43147374&gt;.
+&rArr;  ((1 1 2 2 7 7 8 8)
+     9
+     (9 9 2 2 7 7 8 8) 
+     (9)
+     (9 9 2 2 (9) (9) 8 8))
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-12"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-12"> &para;</a></span></h4>
+
+<p><b class="b">defclass</b>
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-35"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-35"> &para;</a></span></h4>
+
+<p>The consequences are undefined if any <i class="i">accessor-name</i> is not the name
+of an accessor for the <i class="i">instance</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-132"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-132"> &para;</a></span></h4>
+
+<p><a class="ref" href="with_002dslots.html">with-slots                                                          [Macro]</a>
+,
+<a class="ref" href="symbol_002dmacrolet.html">symbol-macrolet                                          [Special Operator]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-88"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-88"> &para;</a></span></h4>
+
+<p>A <b class="b">with-accessors</b> expression of the form:
+</p>
+<div class="example">
+<pre class="example-preformatted">
+
+<code class="t">(with-accessors</code> (<span class="r">slot-entry</span>_1 ...<span class="r">slot-entry</span>_n) <i class="i">instance-form</i> <span class="r">form</span>_1 ...<span class="r">form</span>_k)<!-- /@w -->
+
+</pre></div>
+
+<p>expands into the equivalent of
+</p>
+<div class="example">
+<pre class="example-preformatted">
+
+<code class="t">(</code><code class="t">let ((</code>in <i class="i">instance-form</i><code class="t">))</code><!-- /@w -->
+
+ <code class="t">(symbol-macrolet (</code><span class="r">Q</span>_1... <span class="r">Q</span>_n<code class="t">)</code> <span class="r">form</span>_1 ...<span class="r">form</span>_k<code class="t">))</code><!-- /@w -->
+
+</pre></div>
+
+<p>where <span class="r">Q</span>_i is 
+</p>
+<div class="example">
+<pre class="example-preformatted"><code class="t">(</code><span class="r">variable-name</span>_i () 
+<code class="t">(<span class="r">accessor-name</span>_i in))</code>
+</pre></div>
+
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="with_002dslots.html">with-slots                                                          [Macro]</a>, Previous: <a href="make_002dload_002dform_002dsaving_002dslots.html">make-load-form-saving-slots                                      [Function]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/with_002dcompilation_002dunit.html
@@ -0,0 +1,118 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>with-compilation-unit (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="with-compilation-unit (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="with-compilation-unit (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="System-Construction-Dictionary.html" rel="up" title="System Construction Dictionary">
+<link href="_002afeatures_002a.html" rel="next" title="*features*">
+<link href="load.html" rel="prev" title="load">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="with_002dcompilation_002dunit">
+<div class="nav-panel">
+<p>
+Next: <a href="_002afeatures_002a.html" accesskey="n" rel="next">*features*                                                       [Variable]</a>, Previous: <a href="load.html" accesskey="p" rel="prev">load                                                             [Function]</a>, Up: <a href="System-Construction-Dictionary.html" accesskey="u" rel="up">System Construction Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="with_002dcompilation_002dunit-_005bMacro_005d"><span>24.2.4 with-compilation-unit                                               [Macro]<a class="copiable-link" href="#with_002dcompilation_002dunit-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">with-compilation-unit</code>  <i class="i"><span class="r">(</span>[[!<i class="i">option</i>]]<span class="r">)</span>
+		   {<i class="i">form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><i class="i">option</i>&nbsp;::=<code class="t">:override</code>&nbsp;override<!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-485"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-485"> &para;</a></span></h4>
+
+<p><i class="i">override</i>&mdash;a <i class="i">generalized boolean</i>; evaluated.
+ The default is <b class="b">nil</b>.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-641"><span>Description::<a class="copiable-link" href="#Description_003a_003a-641"> &para;</a></span></h4>
+
+<p>Executes <i class="i">forms</i> from left to right.
+Within the <i class="i">dynamic environment</i> of <b class="b">with-compilation-unit</b>,
+actions deferred by the compiler until the end of compilation will be
+deferred until the end of the outermost call to <b class="b">with-compilation-unit</b>.
+</p>
+<p>The set of <i class="i">options</i> permitted may be extended by the implementation,
+but the only <i class="i">standardized</i> keyword is <code class="t">:override</code>.
+</p>
+<p>If nested dynamically only the outer call to 
+<b class="b">with-compilation-unit</b> has any effect unless the value
+associated with <code class="t">:override</code> is <i class="i">true</i>, in which case warnings are
+deferred only to the end of the innermost call for which <i class="i">override</i> is <i class="i">true</i>.
+</p>
+<p>The function <b class="b">compile-file</b> 
+provides the effect of 
+</p>
+<div class="example">
+<pre class="example-preformatted"> (with-compilation-unit (:override nil) ...)
+</pre></div>
+
+<p>around its <i class="i">code</i>.
+</p>
+<p>Any <i class="i">implementation-dependent</i> extensions can only be provided as the
+result of an explicit programmer request by use of an
+<i class="i">implementation-dependent</i> keyword.  <i class="i">Implementations</i> are forbidden
+from attaching additional meaning to a use of this macro which involves either
+no keywords or just the keyword <code class="t">:override</code>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-459"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-459"> &para;</a></span></h4>
+
+<p>If an <i class="i">implementation</i> would normally defer certain kinds of warnings,
+such as warnings about undefined functions, to the end of a compilation
+unit (such as a <i class="i">file</i>), the following example shows how to cause those
+warnings to be deferred to the end of the compilation of several files.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun compile-files (&amp;rest files)
+   (with-compilation-unit ()
+     (mapcar #'(lambda (file) (compile-file file)) files)))
+
+ (compile-files &quot;A&quot; &quot;B&quot; &quot;C&quot;)
+</pre></div>
+
+<p>Note however that if the implementation does not normally defer any warnings,
+use of <i class="i">with-compilation-unit</i> might not have any effect.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-521"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-521"> &para;</a></span></h4>
+
+<p><a class="ref" href="compile.html">compile                                                          [Function]</a>
+, 
+<a class="ref" href="compile_002dfile.html">compile-file                                                     [Function]</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002afeatures_002a.html">*features*                                                       [Variable]</a>, Previous: <a href="load.html">load                                                             [Function]</a>, Up: <a href="System-Construction-Dictionary.html">System Construction Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/with_002dcondition_002drestarts.html
@@ -0,0 +1,83 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>with-condition-restarts (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="with-condition-restarts (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="with-condition-restarts (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="with_002dsimple_002drestart.html" rel="next" title="with-simple-restart">
+<link href="restart_002dname.html" rel="prev" title="restart-name">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="with_002dcondition_002drestarts">
+<div class="nav-panel">
+<p>
+Next: <a href="with_002dsimple_002drestart.html" accesskey="n" rel="next">with-simple-restart                                                 [Macro]</a>, Previous: <a href="restart_002dname.html" accesskey="p" rel="prev">restart-name                                                     [Function]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="with_002dcondition_002drestarts-_005bMacro_005d"><span>9.2.39 with-condition-restarts                                             [Macro]<a class="copiable-link" href="#with_002dcondition_002drestarts-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">with-condition-restarts</code>  <i class="i">condition-form restarts-form {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-155"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-155"> &para;</a></span></h4>
+
+<p><i class="i">condition-form</i>&mdash;a <i class="i">form</i>; <i class="i">evaluated</i> to produce a <i class="i">condition</i>.
+</p>
+<p><i class="i">condition</i>&mdash;a <i class="i">condition</i> <i class="i">object</i> resulting from the 
+		    <i class="i">evaluation</i> of <i class="i">condition-form</i>.
+</p>
+<p><i class="i">restart-form</i>&mdash;a <i class="i">form</i>; <i class="i">evaluated</i> to produce a <i class="i">restart-list</i>.
+</p>
+<p><i class="i">restart-list</i>&mdash;a <i class="i">list</i> of <i class="i">restart</i> <i class="i">objects</i> resulting 
+		       from the <i class="i">evaluation</i> of <i class="i">restart-form</i>.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>; evaluated.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-209"><span>Description::<a class="copiable-link" href="#Description_003a_003a-209"> &para;</a></span></h4>
+
+<p>First, the <i class="i">condition-form</i> and <i class="i">restarts-form</i> are <i class="i">evaluated</i>
+in normal left-to-right order; the <i class="i">primary values</i> yielded by these
+<i class="i">evaluations</i> are respectively called the <i class="i">condition</i> 
+and the <i class="i">restart-list</i>.
+</p>
+<p>Next, the <i class="i">forms</i> are <i class="i">evaluated</i> in a <i class="i">dynamic environment</i>
+in which each <i class="i">restart</i> in <i class="i">restart-list</i> is associated with
+the <i class="i">condition</i>.  See <a class="ref" href="Associating-a-Restart-with-a-Condition.html">Associating a Restart with a Condition</a>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-183"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-183"> &para;</a></span></h4>
+
+<p><a class="ref" href="restart_002dcase.html">restart-case                                                        [Macro]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-112"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-112"> &para;</a></span></h4>
+
+<p>Usually this <i class="i">macro</i> is not used explicitly in code, 
+since <b class="b">restart-case</b> handles most of the common cases
+in a way that is syntactically more concise.
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/with_002dhash_002dtable_002diterator.html
@@ -0,0 +1,149 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>with-hash-table-iterator (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="with-hash-table-iterator (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="with-hash-table-iterator (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Hash-Tables-Dictionary.html" rel="up" title="Hash Tables Dictionary">
+<link href="clrhash.html" rel="next" title="clrhash">
+<link href="maphash.html" rel="prev" title="maphash">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="with_002dhash_002dtable_002diterator">
+<div class="nav-panel">
+<p>
+Next: <a href="clrhash.html" accesskey="n" rel="next">clrhash                                                          [Function]</a>, Previous: <a href="maphash.html" accesskey="p" rel="prev">maphash                                                          [Function]</a>, Up: <a href="Hash-Tables-Dictionary.html" accesskey="u" rel="up">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="with_002dhash_002dtable_002diterator-_005bMacro_005d"><span>18.2.12 with-hash-table-iterator                                            [Macro]<a class="copiable-link" href="#with_002dhash_002dtable_002diterator-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">with-hash-table-iterator</code>  <i class="i"><span class="r">(</span>name hash-table<span class="r">)</span> 
+	           {<i class="i">declaration</i>}* {<i class="i">form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-386"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-386"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a name suitable for the first argument to <b class="b">macrolet</b>.
+</p>
+<p><i class="i">hash-table</i>&mdash;a <i class="i">form</i>, evaluated once, that should produce a <i class="i">hash table</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-502"><span>Description::<a class="copiable-link" href="#Description_003a_003a-502"> &para;</a></span></h4>
+
+<p>Within the lexical scope of the body, <i class="i">name</i> is defined via <b class="b">macrolet</b> 
+such that successive invocations of <code class="t">(<i class="i">name</i>)</code> return the items,
+one by one, from the <i class="i">hash table</i> that is obtained by evaluating
+<i class="i">hash-table</i> only once.
+</p>
+<p>An invocation <code class="t">(<i class="i">name</i>)</code> returns three values as follows:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>A <i class="i">generalized boolean</i> that is <i class="i">true</i> if an entry is returned.
+</p></dd>
+<dt>2.</dt>
+<dd><p>The key from the <i class="i">hash-table</i> entry.
+</p></dd>
+<dt>3.</dt>
+<dd><p>The value from the <i class="i">hash-table</i> entry.
+</p></dd>
+</dl>
+
+<p>After all entries have been returned by successive invocations of
+<code class="t">(<i class="i">name</i>)</code>, then only one value is returned, namely <b class="b">nil</b>.
+</p>
+<p>It is unspecified what happens if any of the implicit interior state 
+of an iteration is returned outside the dynamic extent of the 
+<b class="b">with-hash-table-iterator</b> <i class="i">form</i>
+such as by returning some <i class="i">closure</i> over the invocation <i class="i">form</i>.
+</p>
+<p>Any number of invocations of <b class="b">with-hash-table-iterator</b> 
+can be nested, and the body of the innermost one can invoke all of the
+locally <i class="i">established</i> <i class="i">macros</i>, provided all of those <i class="i">macros</i>
+have <i class="i">distinct</i> names.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-366"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-366"> &para;</a></span></h4>
+
+<p>The following function should return <b class="b">t</b> on any 
+<i class="i">hash table</i>, and signal
+an error if the usage of <b class="b">with-hash-table-iterator</b> does not agree
+with the corresponding usage of <b class="b">maphash</b>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun test-hash-table-iterator (hash-table)
+   (let ((all-entries '())
+         (generated-entries '())
+         (unique (list nil)))
+     (maphash #'(lambda (key value) (push (list key value) all-entries))
+              hash-table)
+     (with-hash-table-iterator (generator-fn hash-table)
+       (loop     
+         (multiple-value-bind (more? key value) (generator-fn)
+           (unless more? (return))
+           (unless (eql value (gethash key hash-table unique))
+             (error &quot;Key ~S not found for value ~S&quot; key value))
+           (push (list key value) generated-entries))))
+     (unless (= (length all-entries)
+                (length generated-entries)
+                (length (union all-entries generated-entries
+                               :key #'car :test (hash-table-test hash-table))))
+       (error &quot;Generated entries and Maphash entries don't correspond&quot;))
+     t))
+</pre></div>
+
+<p>The following could be an acceptable definition of 
+<b class="b">maphash</b>, implemented by <b class="b">with-hash-table-iterator</b>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun maphash (function hash-table)
+   (with-hash-table-iterator (next-entry hash-table)
+     (loop (multiple-value-bind (more key value) (next-entry)
+             (unless more (return nil))
+             (funcall function key value)))))
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-173"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-173"> &para;</a></span></h4>
+
+<p>The consequences are undefined if the local function named <i class="i">name</i>
+<i class="i">established</i> by <b class="b">with-hash-table-iterator</b> is called after it has
+returned <i class="i">false</i> as its <i class="i">primary value</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-410"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-410"> &para;</a></span></h4>
+
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="clrhash.html">clrhash                                                          [Function]</a>, Previous: <a href="maphash.html">maphash                                                          [Function]</a>, Up: <a href="Hash-Tables-Dictionary.html">Hash Tables Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/with_002dinput_002dfrom_002dstring.html
@@ -0,0 +1,136 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>with-input-from-string (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="with-input-from-string (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="with-input-from-string (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="with_002doutput_002dto_002dstring.html" rel="next" title="with-output-to-string">
+<link href="make_002dstring_002doutput_002dstream.html" rel="prev" title="make-string-output-stream">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="with_002dinput_002dfrom_002dstring">
+<div class="nav-panel">
+<p>
+Next: <a href="with_002doutput_002dto_002dstring.html" accesskey="n" rel="next">with-output-to-string                                               [Macro]</a>, Previous: <a href="make_002dstring_002doutput_002dstream.html" accesskey="p" rel="prev">make-string-output-stream                                        [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="with_002dinput_002dfrom_002dstring-_005bMacro_005d"><span>21.2.51 with-input-from-string                                              [Macro]<a class="copiable-link" href="#with_002dinput_002dfrom_002dstring-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">with-input-from-string</code>  <i class="i"><span class="r">(</span>var string <span class="r">&amp;key</span> index start end<span class="r">)</span>
+			  {<i class="i">declaration</i>}*
+			  {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-452"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-452"> &para;</a></span></h4>
+
+<p><i class="i">var</i>&mdash;a <i class="i">variable</i> <i class="i">name</i>.
+</p>
+<p><i class="i">string</i>&mdash;a <i class="i">form</i>; evaluated to produce a <i class="i">string</i>.
+</p>
+<p><i class="i">index</i>&mdash;a <i class="i">place</i>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">string</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">result</i>&mdash;the <i class="i">values</i> returned by the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-582"><span>Description::<a class="copiable-link" href="#Description_003a_003a-582"> &para;</a></span></h4>
+
+<p>Creates an
+</p>
+<p><i class="i">input</i> <i class="i">string stream</i>, 
+</p>
+<p>provides an opportunity to perform operations on the <i class="i">stream</i> 
+ (returning zero or more <i class="i">values</i>),
+and then closes the <i class="i">string stream</i>.
+</p>
+<p><i class="i">String</i> is evaluated first, and <i class="i">var</i> is bound to
+a character <i class="i">input</i> <i class="i">string stream</i> that supplies 
+<i class="i">characters</i> from the subsequence of the resulting <i class="i">string</i> <i class="i">bounded</i> by
+<i class="i">start</i> and <i class="i">end</i>. 
+The body is executed as an <i class="i">implicit progn</i>.
+</p>
+<p>The <i class="i">input</i> <i class="i">string stream</i> is automatically closed on exit from
+<b class="b">with-input-from-string</b>, no matter whether the exit is normal or abnormal.
+</p>
+<p>The <i class="i">input</i> <i class="i">string stream</i> to which the <i class="i">variable</i> <i class="i">var</i>
+is <i class="i">bound</i> has <i class="i">dynamic extent</i>;
+its <i class="i">extent</i> ends when the <i class="i">form</i> is exited.
+</p>
+<p>The <i class="i">index</i> is a pointer within the <i class="i">string</i> to be advanced.
+If <b class="b">with-input-from-string</b>
+is exited normally, then <i class="i">index</i> will have
+as its <i class="i">value</i>
+the index into the <i class="i">string</i> indicating the first character not read
+which is <code class="t">(length <i class="i">string</i>)</code> if all characters were used.
+The place specified by <i class="i">index</i>
+is not updated as reading progresses, but only at the
+end of the operation. 
+</p>
+<p><i class="i">start</i> and <i class="i">index</i> may both specify the same variable, 
+which is a pointer within the <i class="i">string</i> to be advanced,
+perhaps repeatedly by some containing loop.
+</p>
+<p>The consequences are undefined if an attempt is made to <i class="i">assign</i> 
+the <i class="i">variable</i> <i class="i">var</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-423"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-423"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (with-input-from-string (s &quot;XXX1 2 3 4xxx&quot;
+                             :index ind
+                             :start 3 :end 10)
+    (+ (read s) (read s) (read s))) &rArr;  6
+ ind &rArr;  9
+ (with-input-from-string (s &quot;Animal Crackers&quot; :index j :start 6)
+   (read s)) &rArr;  CRACKERS
+</pre></div>
+
+<p>The variable <code class="t">j</code> is set to <code class="t">15</code>.
+</p>
+<h4 class="subsubheading" id="Side-Effects_003a_003a-73"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-73"> &para;</a></span></h4>
+
+<p>The <i class="i">value</i> of the <i class="i">place</i> named by <i class="i">index</i>, if any, is modified.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-473"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-473"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dstring_002dinput_002dstream.html">make-string-input-stream                                         [Function]</a>
+,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="with_002doutput_002dto_002dstring.html">with-output-to-string                                               [Macro]</a>, Previous: <a href="make_002dstring_002doutput_002dstream.html">make-string-output-stream                                        [Function]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/with_002dopen_002dfile.html
@@ -0,0 +1,164 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>with-open-file (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="with-open-file (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="with-open-file (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="close.html" rel="next" title="close">
+<link href="stream_002dexternal_002dformat.html" rel="prev" title="stream-external-format">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="with_002dopen_002dfile">
+<div class="nav-panel">
+<p>
+Next: <a href="close.html" accesskey="n" rel="next">close                                                            [Function]</a>, Previous: <a href="stream_002dexternal_002dformat.html" accesskey="p" rel="prev">stream-external-format                                           [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="with_002dopen_002dfile-_005bmacro_005d"><span>21.2.31 with-open-file                                                      [macro]<a class="copiable-link" href="#with_002dopen_002dfile-_005bmacro_005d"> &para;</a></span></h4>
+
+<h4 class="subsubheading" id="Syntax_003a_003a-36"><span>Syntax::<a class="copiable-link" href="#Syntax_003a_003a-36"> &para;</a></span></h4>
+
+<p><code class="code">with-open-file</code>  <i class="i"><span class="r">(</span>stream filespec {<i class="i">options</i>}*<span class="r">)</span>
+		   {<i class="i">declaration</i>}*
+		   {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">results</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-432"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-432"> &para;</a></span></h4>
+
+<p><i class="i">stream</i> &ndash; a variable.
+</p>
+<p><i class="i">filespec</i>&mdash;a <i class="i">pathname designator</i>.
+</p>
+<p><i class="i">options</i> &ndash; <i class="i">forms</i>; evaluated.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-562"><span>Description::<a class="copiable-link" href="#Description_003a_003a-562"> &para;</a></span></h4>
+
+<p><b class="b">with-open-file</b> uses <b class="b">open</b> to create a <i class="i">file stream</i>
+</p>
+<p>to <i class="i">file</i> named by <i class="i">filespec</i>. 
+<i class="i">Filespec</i> is the name of the file to be opened.
+<i class="i">Options</i> are used as keyword arguments to <b class="b">open</b>.
+</p>
+<p>The <i class="i">stream</i> <i class="i">object</i> to which the <i class="i">stream</i> <i class="i">variable</i> 
+is <i class="i">bound</i> has <i class="i">dynamic extent</i>;
+its <i class="i">extent</i> ends when the <i class="i">form</i> is exited.
+</p>
+<p><b class="b">with-open-file</b> evaluates the <i class="i">forms</i> as an <i class="i">implicit progn</i> 
+with <i class="i">stream</i> bound to 
+</p>
+<p>the value returned by <b class="b">open</b>.
+</p>
+<p>When control leaves the body, either normally or abnormally (such as by
+use of <b class="b">throw</b>), the file is automatically closed.  If a new
+output file is being written, and control leaves abnormally, the file is
+aborted and the file system is left, so far as possible, as if the file
+had never been opened.  
+</p>
+<p>It is possible by the use of <code class="t">:if-exists nil</code> 
+or <code class="t">:if-does-not-exist nil</code> for
+<i class="i">stream</i> to be bound to <b class="b">nil</b>.
+</p>
+<p>Users of <code class="t">:if-does-not-exist nil</code> should check for a valid <i class="i">stream</i>.
+</p>
+<p>The consequences are undefined if an attempt is made to <i class="i">assign</i> the 
+<i class="i">stream</i> <i class="i">variable</i>.  The compiler may choose to issue a
+warning if such an attempt is detected.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-408"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-408"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (setq p (merge-pathnames &quot;test&quot;))
+&rArr;  #&lt;PATHNAME :HOST NIL :DEVICE <i class="i">device-name</i> :DIRECTORY <i class="i">directory-name</i>
+    :NAME &quot;test&quot; :TYPE NIL :VERSION :NEWEST&gt;
+ (with-open-file (s p :direction :output :if-exists :supersede)
+    (format s &quot;Here are a couple~
+ (with-open-file (s p)
+    (do ((l (read-line s) (read-line s nil 'eof)))
+        ((eq l 'eof) &quot;Reached end of file.&quot;)
+     (format t &quot;~&amp;*** ~A~
+<code class="t"> |&gt; </code> *** Here are a couple
+<code class="t"> |&gt; </code> *** of test data lines
+&rArr;  &quot;Reached end of file.&quot;
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted">;; Normally one would not do this intentionally because it is
+;; not perspicuous, but beware when using :IF-DOES-NOT-EXIST NIL
+;; that this doesn't happen to you accidentally...
+ (with-open-file (foo &quot;no-such-file&quot; :if-does-not-exist nil)
+   (read foo))
+<code class="t"> |&gt; </code> <b class="b">|&gt;&gt;</b><code class="t">hello?</code><b class="b">&lt;&lt;|</b>
+&rArr;  HELLO? ;This value was read from the terminal, not a file!
+
+;; Here's another bug to avoid...
+ (with-open-file (foo &quot;no-such-file&quot; :direction :output :if-does-not-exist nil)
+   (format foo &quot;Hello&quot;))
+&rArr;  &quot;Hello&quot; ;FORMAT got an argument of NIL!
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-67"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-67"> &para;</a></span></h4>
+
+<p>Creates a <i class="i">stream</i> to the <i class="i">file</i> named by <i class="i">filename</i> (upon entry),
+and closes the <i class="i">stream</i> (upon exit).
+In some <i class="i">implementations</i>,
+the <i class="i">file</i> might be locked in some way while it is open.
+If the <i class="i">stream</i> is an <i class="i">output</i> <i class="i">stream</i>,
+a <i class="i">file</i> might be created.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-92"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-92"> &para;</a></span></h4>
+
+<p>The host computer&rsquo;s file system.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-208"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-208"> &para;</a></span></h4>
+
+<p>See the <i class="i">function</i> <b class="b">open</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-458"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-458"> &para;</a></span></h4>
+
+<p><a class="ref" href="open.html">open                                                             [Function]</a>
+,
+<a class="ref" href="close.html">close                                                            [Function]</a>
+,
+<b class="b">pathname</b>,
+<b class="b">logical-pathname</b>,
+</p>
+<p><a class="ref" href="Pathnames-as-Filenames.html">Pathnames as Filenames</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="close.html">close                                                            [Function]</a>, Previous: <a href="stream_002dexternal_002dformat.html">stream-external-format                                           [Function]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/with_002dopen_002dstream.html
@@ -0,0 +1,95 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>with-open-stream (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="with-open-stream (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="with-open-stream (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="listen.html" rel="next" title="listen">
+<link href="close.html" rel="prev" title="close">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="with_002dopen_002dstream">
+<div class="nav-panel">
+<p>
+Next: <a href="listen.html" accesskey="n" rel="next">listen                                                           [Function]</a>, Previous: <a href="close.html" accesskey="p" rel="prev">close                                                            [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="with_002dopen_002dstream-_005bMacro_005d"><span>21.2.33 with-open-stream                                                    [Macro]<a class="copiable-link" href="#with_002dopen_002dstream-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">with-open-stream</code>  <i class="i"><span class="r">(</span>var stream<span class="r">)</span>
+		   {<i class="i">declaration</i>}* 
+		   {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-434"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-434"> &para;</a></span></h4>
+
+<p><i class="i">var</i>&mdash;a <i class="i">variable</i> <i class="i">name</i>.
+</p>
+<p><i class="i">stream</i>&mdash;a <i class="i">form</i>; evaluated to produce a <i class="i">stream</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-564"><span>Description::<a class="copiable-link" href="#Description_003a_003a-564"> &para;</a></span></h4>
+
+<p><b class="b">with-open-stream</b> performs a series of operations on 
+<i class="i">stream</i>, returns a value, and then closes the <i class="i">stream</i>.
+</p>
+<p><i class="i">Var</i> is bound to the value of <i class="i">stream</i>,
+and then <i class="i">forms</i> are executed
+as an <i class="i">implicit progn</i>. 
+<i class="i">stream</i>
+is automatically closed on exit from <b class="b">with-open-stream</b>,
+no matter whether the exit is normal or abnormal.
+</p>
+<p>The <i class="i">stream</i> has <i class="i">dynamic extent</i>;
+its <i class="i">extent</i> ends when the <i class="i">form</i> is exited.
+</p>
+<p>The consequences are undefined if an attempt is made to <i class="i">assign</i> the 
+the <i class="i">variable</i> <i class="i">var</i> with the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-410"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-410"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (with-open-stream (s (make-string-input-stream &quot;1 2 3 4&quot;))
+    (+ (read s) (read s) (read s))) &rArr;  6
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-69"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-69"> &para;</a></span></h4>
+
+<p>The <i class="i">stream</i> is closed (upon exit).
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-460"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-460"> &para;</a></span></h4>
+
+<p><a class="ref" href="close.html">close                                                            [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/with_002doutput_002dto_002dstring.html
@@ -0,0 +1,141 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>with-output-to-string (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="with-output-to-string (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="with-output-to-string (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="_002adebug_002dio_002a.html" rel="next" title="*debug-io*">
+<link href="with_002dinput_002dfrom_002dstring.html" rel="prev" title="with-input-from-string">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="with_002doutput_002dto_002dstring">
+<div class="nav-panel">
+<p>
+Next: <a href="_002adebug_002dio_002a.html" accesskey="n" rel="next">*debug-io*, *error-output*, *query-io*,</a>, Previous: <a href="with_002dinput_002dfrom_002dstring.html" accesskey="p" rel="prev">with-input-from-string                                              [Macro]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="with_002doutput_002dto_002dstring-_005bMacro_005d"><span>21.2.52 with-output-to-string                                               [Macro]<a class="copiable-link" href="#with_002doutput_002dto_002dstring-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">with-output-to-string</code>  <i class="i"><span class="r">(</span>var <span class="r">&amp;optional</span> string-form <span class="r">&amp;key</span> element-type<span class="r">)</span>
+ 			  {<i class="i">declaration</i>}*
+ 			  {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-453"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-453"> &para;</a></span></h4>
+
+<p><i class="i">var</i>&mdash;a <i class="i">variable</i> <i class="i">name</i>.
+</p>
+<p><i class="i">string-form</i>&mdash;a <i class="i">form</i> or <b class="b">nil</b>;
+		      if <i class="i">non-nil</i>, evaluated to produce <i class="i">string</i>.
+</p>
+<p><i class="i">string</i>&mdash;a <i class="i">string</i> that has a <i class="i">fill pointer</i>.
+</p>
+<p><i class="i">element-type</i>&mdash;a <i class="i">type specifier</i>; evaluated.
+</p>
+<p>The default is <b class="b">character</b>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;If a <i class="i">string-form</i> is not supplied or <b class="b">nil</b>,
+		  a <i class="i">string</i>; otherwise, 
+		  the <i class="i">values</i> returned by the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-583"><span>Description::<a class="copiable-link" href="#Description_003a_003a-583"> &para;</a></span></h4>
+
+<p><b class="b">with-output-to-string</b> creates a
+</p>
+<p>character <i class="i">output</i> <i class="i">stream</i>, performs a series of operations
+that may send results to this <i class="i">stream</i>, and then closes the <i class="i">stream</i>. 
+</p>
+<p>The <i class="i">element-type</i> names the <i class="i">type</i> of the elements
+of the <i class="i">stream</i>; a <i class="i">stream</i> is constructed of the most specialized
+<i class="i">type</i> that can accommodate elements of the given <i class="i">type</i>.  
+</p>
+<p>The body is executed as an <i class="i">implicit progn</i> with <i class="i">var</i>
+bound to an <i class="i">output</i> <i class="i">string stream</i>.  
+All output to that <i class="i">string stream</i> is saved in a <i class="i">string</i>.  
+</p>
+<p>If <i class="i">string</i> is supplied, <i class="i">element-type</i> is ignored, 
+and the output is incrementally appended to <i class="i">string</i> as
+if by use of <b class="b">vector-push-extend</b>.
+</p>
+<p>The <i class="i">output</i> <i class="i">stream</i> 
+is automatically closed on exit from <b class="b">with-output-from-string</b>,
+no matter whether the exit is normal or abnormal.
+</p>
+<p>The <i class="i">output</i> <i class="i">string stream</i> to which the <i class="i">variable</i> <i class="i">var</i>
+is <i class="i">bound</i> has <i class="i">dynamic extent</i>;
+its <i class="i">extent</i> ends when the <i class="i">form</i> is exited.
+</p>
+<p>If no <i class="i">string</i> is provided, then <b class="b">with-output-from-string</b> 
+</p>
+<p>produces a <i class="i">stream</i> that accepts characters and returns a <i class="i">string</i> 
+of the indicated <i class="i">element-type</i>.
+</p>
+<p>If <i class="i">string</i> is provided,
+<b class="b">with-output-to-string</b> returns the results of evaluating the last <i class="i">form</i>.
+</p>
+<p>The consequences are undefined if an attempt is made to <i class="i">assign</i>
+the <i class="i">variable</i> <i class="i">var</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-424"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-424"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (setq fstr (make-array '(0) :element-type 'base-char
+                             :fill-pointer 0 :adjustable t)) &rArr;  &quot;&quot;
+ (with-output-to-string (s fstr)
+    (format s &quot;here's some output&quot;)
+    (input-stream-p s)) &rArr;  <i class="i">false</i>
+ fstr &rArr;  &quot;here's some output&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-74"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-74"> &para;</a></span></h4>
+
+<p>The <i class="i">string</i> is modified.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-216"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-216"> &para;</a></span></h4>
+
+<p>The consequences are undefined if destructive modifications are performed
+directly on the <i class="i">string</i> during the <i class="i">dynamic extent</i> of the call.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-474"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-474"> &para;</a></span></h4>
+
+<p><a class="ref" href="make_002dstring_002doutput_002dstream.html">make-string-output-stream                                        [Function]</a>
+,
+<b class="b">vector-push-extend</b>,
+</p>
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002adebug_002dio_002a.html">*debug-io*, *error-output*, *query-io*,</a>, Previous: <a href="with_002dinput_002dfrom_002dstring.html">with-input-from-string                                              [Macro]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/with_002dpackage_002diterator.html
@@ -0,0 +1,228 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>with-package-iterator (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="with-package-iterator (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="with-package-iterator (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Packages-Dictionary.html" rel="up" title="Packages Dictionary">
+<link href="unexport.html" rel="next" title="unexport">
+<link href="make_002dpackage.html" rel="prev" title="make-package">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="with_002dpackage_002diterator">
+<div class="nav-panel">
+<p>
+Next: <a href="unexport.html" accesskey="n" rel="next">unexport                                                         [Function]</a>, Previous: <a href="make_002dpackage.html" accesskey="p" rel="prev">make-package                                                     [Function]</a>, Up: <a href="Packages-Dictionary.html" accesskey="u" rel="up">Packages Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="with_002dpackage_002diterator-_005bMacro_005d"><span>11.2.13 with-package-iterator                                               [Macro]<a class="copiable-link" href="#with_002dpackage_002diterator-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">with-package-iterator</code>  <i class="i"><span class="r">(</span>name package-list-form <span class="r">&amp;rest</span> <span class="r">symbol-types</span><span class="r">)</span>
+ 		   {<i class="i">declaration</i>}* {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-185"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-185"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">package-list-form</i>&mdash;a <i class="i">form</i>; evaluated once to produce a <i class="i">package-list</i>.
+</p>
+<p><i class="i">package-list</i>&mdash;a <i class="i">designator</i> for a list of <i class="i">package designators</i>.
+</p>
+<p><i class="i">symbol-type</i>&mdash;one of the <i class="i">symbols</i> 
+		      <code class="t">:internal</code>, <code class="t">:external</code>, or <code class="t">:inherited</code>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> of the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-249"><span>Description::<a class="copiable-link" href="#Description_003a_003a-249"> &para;</a></span></h4>
+
+<p>Within the lexical scope of the body <i class="i">forms</i>,
+the <i class="i">name</i> is defined via <b class="b">macrolet</b> 
+such that successive invocations of <code class="t">(<i class="i">name</i>)</code>
+will return the <i class="i">symbols</i>, one by one, 
+from the <i class="i">packages</i> in <i class="i">package-list</i>. 
+</p>
+<p>It is unspecified whether <i class="i">symbols</i> inherited from
+multiple <i class="i">packages</i> are returned more than once.  
+The order of <i class="i">symbols</i> returned does not necessarily reflect the order
+of <i class="i">packages</i> in <i class="i">package-list</i>.  When <i class="i">package-list</i> has 
+more than one element, it is unspecified whether duplicate <i class="i">symbols</i> are
+returned once or more than once.  
+</p>
+<p><i class="i">Symbol-types</i> controls which <i class="i">symbols</i> that are <i class="i">accessible</i>
+in a <i class="i">package</i> are returned as follows:
+</p>
+<dl class="table">
+<dt><code class="t">:internal</code></dt>
+<dd><p>The <i class="i">symbols</i> that are <i class="i">present</i> in the <i class="i">package</i>,
+  but that are not <i class="i">exported</i>.
+</p>
+</dd>
+<dt><code class="t">:external</code></dt>
+<dd><p>The <i class="i">symbols</i> that are <i class="i">present</i> in the <i class="i">package</i>
+  and are <i class="i">exported</i>.
+</p>
+</dd>
+<dt><code class="t">:inherited</code></dt>
+<dd><p>The <i class="i">symbols</i> that are <i class="i">exported</i> by used <i class="i">packages</i>
+  and that are not <i class="i">shadowed</i>.
+</p></dd>
+</dl>
+
+<p>When more than one argument is supplied for <i class="i">symbol-types</i>, 
+a <i class="i">symbol</i> is returned if its <i class="i">accessibility</i> matches 
+any one of the <i class="i">symbol-types</i> supplied.  
+Implementations may extend this syntax by recognizing additional 
+symbol accessibility types.
+</p>
+<p>An invocation of <code class="t">(<i class="i">name</i>)</code> returns four values as follows:
+</p>
+<dl class="table">
+<dt>1.</dt>
+<dd><p>A flag that indicates whether a <i class="i">symbol</i> is returned
+	      (true means that a <i class="i">symbol</i> is returned).
+</p></dd>
+<dt>2.</dt>
+<dd><p>A <i class="i">symbol</i> that is <i class="i">accessible</i> in one the
+	      indicated <i class="i">packages</i>.
+</p></dd>
+<dt>3.</dt>
+<dd><p>The accessibility type for that <i class="i">symbol</i>; 
+	      <i class="i">i.e.</i>, one of the symbols <code class="t">:internal</code>, <code class="t">:external</code>, or <code class="t">:inherited</code>.
+</p></dd>
+<dt>4.</dt>
+<dd><p>The <i class="i">package</i> from which the <i class="i">symbol</i> was obtained.
+	      The <i class="i">package</i> is one of the <i class="i">packages</i> present 
+	      or named in <i class="i">package-list</i>.
+</p></dd>
+</dl>
+
+<p>After all <i class="i">symbols</i> have been returned by successive invocations of
+<code class="t">(<i class="i">name</i>)</code>, then only one value is returned, namely <b class="b">nil</b>.
+</p>
+<p>The meaning of the second, third, and fourth <i class="i">values</i> is that the returned 
+<i class="i">symbol</i> is <i class="i">accessible</i> in the returned <i class="i">package</i>
+in the way indicated by the second return value as follows:
+</p>
+<dl class="table">
+<dt><code class="t">:internal</code></dt>
+<dd><p>Means <i class="i">present</i> and not <i class="i">exported</i>.
+</p>
+</dd>
+<dt><code class="t">:external</code></dt>
+<dd><p>Means <i class="i">present</i> and <i class="i">exported</i>.
+</p>
+</dd>
+<dt><code class="t">:inherited</code></dt>
+<dd><p>Means not <i class="i">present</i> (thus not <i class="i">shadowed</i>) but inherited
+from some used <i class="i">package</i>.
+</p></dd>
+</dl>
+
+<p>It is unspecified what happens if any of the implicit interior state 
+of an iteration is returned outside the dynamic extent of the 
+<b class="b">with-package-iterator</b>
+form such as by returning some <i class="i">closure</i> over the invocation <i class="i">form</i>.
+</p>
+<p>Any number of invocations of <b class="b">with-package-iterator</b> 
+can be nested, and the body of the innermost one can invoke all of the
+locally <i class="i">established</i> <i class="i">macros</i>, provided all those <i class="i">macros</i>
+have distinct names.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-168"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-168"> &para;</a></span></h4>
+
+<p>The following function should return <b class="b">t</b> on any <i class="i">package</i>, and signal
+an error if the usage of <b class="b">with-package-iterator</b> does not agree
+with the corresponding usage of <b class="b">do-symbols</b>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun test-package-iterator (package)
+   (unless (packagep package)
+     (setq package (find-package package)))
+   (let ((all-entries '())
+         (generated-entries '()))
+     (do-symbols (x package) 
+       (multiple-value-bind (symbol accessibility) 
+           (find-symbol (symbol-name x) package)
+         (push (list symbol accessibility) all-entries)))
+     (with-package-iterator (generator-fn package 
+                             :internal :external :inherited)
+       (loop     
+         (multiple-value-bind (more? symbol accessibility pkg)
+             (generator-fn)
+           (unless more? (return))
+           (let ((l (multiple-value-list (find-symbol (symbol-name symbol) 
+                                                      package))))
+             (unless (equal l (list symbol accessibility))
+               (error &quot;Symbol ~S not found as ~S in package ~A [~S]&quot;
+                      symbol accessibility (package-name package) l))
+             (push l generated-entries)))))
+     (unless (and (subsetp all-entries generated-entries :test #'equal)
+                  (subsetp generated-entries all-entries :test #'equal))
+      (error &quot;Generated entries and Do-Symbols entries don't correspond&quot;))
+     t))
+</pre></div>
+
+<p>The following function prints out every <i class="i">present</i> <i class="i">symbol</i> 
+(possibly more than once):
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defun print-all-symbols () 
+   (with-package-iterator (next-symbol (list-all-packages)
+                           :internal :external)
+     (loop
+       (multiple-value-bind (more? symbol) (next-symbol)
+         (if more? 
+            (print symbol)
+            (return))))))
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-67"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-67"> &para;</a></span></h4>
+
+<p><b class="b">with-package-iterator</b> signals an error of <i class="i">type</i> <b class="b">program-error</b> if 
+no <i class="i">symbol-types</i> are supplied or if a <i class="i">symbol-type</i> is not
+recognized  by the implementation is supplied.  
+</p>
+<p>The consequences are undefined if the local function named <i class="i">name</i>
+<i class="i">established</i> by <b class="b">with-package-iterator</b> is called after it 
+has returned <i class="i">false</i> as its <i class="i">primary value</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-221"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-221"> &para;</a></span></h4>
+
+<p><a class="ref" href="Traversal-Rules-and-Side-Effects.html">Traversal Rules and Side Effects</a>
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="unexport.html">unexport                                                         [Function]</a>, Previous: <a href="make_002dpackage.html">make-package                                                     [Function]</a>, Up: <a href="Packages-Dictionary.html">Packages Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/with_002dsimple_002drestart.html
@@ -0,0 +1,155 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>with-simple-restart (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="with-simple-restart (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="with-simple-restart (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Conditions-Dictionary.html" rel="up" title="Conditions Dictionary">
+<link href="abort-_0028Restart_0029.html" rel="next" title="abort (Restart)">
+<link href="with_002dcondition_002drestarts.html" rel="prev" title="with-condition-restarts">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="with_002dsimple_002drestart">
+<div class="nav-panel">
+<p>
+Next: <a href="abort-_0028Restart_0029.html" accesskey="n" rel="next">abort                                                             [Restart]</a>, Previous: <a href="with_002dcondition_002drestarts.html" accesskey="p" rel="prev">with-condition-restarts                                             [Macro]</a>, Up: <a href="Conditions-Dictionary.html" accesskey="u" rel="up">Conditions Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="with_002dsimple_002drestart-_005bMacro_005d"><span>9.2.40 with-simple-restart                                                 [Macro]<a class="copiable-link" href="#with_002dsimple_002drestart-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">with-simple-restart</code>  <i class="i"><span class="r">(</span>name format-control {<i class="i">format-argument</i>}*<span class="r">)</span>
+		   {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-156"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-156"> &para;</a></span></h4>
+
+<p><i class="i">name</i>&mdash;a <i class="i">symbol</i>.
+</p>
+<p><i class="i">format-control</i>&mdash;a <i class="i">format control</i>.
+</p>
+<p><i class="i">format-argument</i>&mdash;an <i class="i">object</i> (<i class="i">i.e.</i>, a <i class="i">format argument</i>).
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;in the normal situation,
+   the <i class="i">values</i> returned by the <i class="i">forms</i>;
+   in the exceptional situation where the <i class="i">restart</i> named <i class="i">name</i> is invoked,
+   two values&mdash;<b class="b">nil</b> and <b class="b">t</b>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-210"><span>Description::<a class="copiable-link" href="#Description_003a_003a-210"> &para;</a></span></h4>
+
+<p><b class="b">with-simple-restart</b> establishes a restart.  
+</p>
+<p>If the restart designated by <i class="i">name</i> is not invoked while executing <i class="i">forms</i>,
+all values returned by the last of <i class="i">forms</i> are returned. 
+If the restart designated by <i class="i">name</i> is invoked,
+control is transferred to <b class="b">with-simple-restart</b>,
+which returns two values, <b class="b">nil</b> and <b class="b">t</b>.
+</p>
+<p>If <i class="i">name</i> is <b class="b">nil</b>, an anonymous restart is established.
+</p>
+<p>The <i class="i">format-control</i> and <i class="i">format-arguments</i> are used 
+report the <i class="i">restart</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-136"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-136"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defun read-eval-print-loop (level)
+   (with-simple-restart (abort &quot;Exit command level ~D.&quot; level)
+     (loop
+       (with-simple-restart (abort &quot;Return to command level ~D.&quot; level)
+         (let ((form (prog2 (fresh-line) (read) (fresh-line))))
+           (prin1 (eval form)))))))
+&rArr;  READ-EVAL-PRINT-LOOP
+ (read-eval-print-loop 1)
+ (+ 'a 3)
+<code class="t"> |&gt; </code> Error: The argument, A, to the function + was of the wrong type.
+<code class="t"> |&gt; </code>        The function expected a number.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number:
+<code class="t"> |&gt; </code>  1: Specify a value to use this time.
+<code class="t"> |&gt; </code>  2: Return to command level 1.
+<code class="t"> |&gt; </code>  3: Exit command level 1.
+<code class="t"> |&gt; </code>  4: Return to Lisp Toplevel.
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (defun compute-fixnum-power-of-2 (x)
+   (with-simple-restart (nil &quot;Give up on computing 2<code class="t">^</code>~D.&quot; x)
+     (let ((result 1))
+       (dotimes (i x result)
+         (setq result (* 2 result))
+         (unless (fixnump result)
+           (error &quot;Power of 2 is too large.&quot;))))))
+COMPUTE-FIXNUM-POWER-OF-2
+ (defun compute-power-of-2 (x)
+   (or (compute-fixnum-power-of-2 x) 'something big))
+COMPUTE-POWER-OF-2
+ (compute-power-of-2 10)
+1024
+ (compute-power-of-2 10000)
+<code class="t"> |&gt; </code> Error: Power of 2 is too large.
+<code class="t"> |&gt; </code> To continue, type :CONTINUE followed by an option number.
+<code class="t"> |&gt; </code>  1: Give up on computing 2<code class="t">^</code>10000.
+<code class="t"> |&gt; </code>  2: Return to Lisp Toplevel
+<code class="t"> |&gt; </code> Debug&gt; <b class="b">|&gt;&gt;</b><code class="t">:continue 1</code><b class="b">&lt;&lt;|</b>
+&rArr;  SOMETHING-BIG
+</pre></div>
+
+<h4 class="subsubheading" id="See-Also_003a_003a-184"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-184"> &para;</a></span></h4>
+
+<p><a class="ref" href="restart_002dcase.html">restart-case                                                        [Macro]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-113"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-113"> &para;</a></span></h4>
+
+<p><b class="b">with-simple-restart</b> is shorthand for one of the most
+common uses of <b class="b">restart-case</b>.
+</p>
+<p><b class="b">with-simple-restart</b> could be defined by:
+</p>
+<div class="example">
+<pre class="example-preformatted"> (defmacro with-simple-restart ((restart-name format-control
+                                              &amp;rest format-arguments)
+                                &amp;body forms)
+   `(restart-case (progn ,@forms)
+      (,restart-name ()
+          :report (lambda (stream)
+                    (format stream ,format-control ,@format-arguments))
+         (values nil t))))
+</pre></div>
+
+<p>Because the second return value is <b class="b">t</b> in the exceptional case,
+it is common (but not required) to arrange for the second return value
+in the normal case to be missing or <b class="b">nil</b> so that the two situations
+can be distinguished.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="abort-_0028Restart_0029.html">abort                                                             [Restart]</a>, Previous: <a href="with_002dcondition_002drestarts.html">with-condition-restarts                                             [Macro]</a>, Up: <a href="Conditions-Dictionary.html">Conditions Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/with_002dslots.html
@@ -0,0 +1,185 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>with-slots (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="with-slots (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="with-slots (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Objects-Dictionary.html" rel="up" title="Objects Dictionary">
+<link href="defclass.html" rel="next" title="defclass">
+<link href="with_002daccessors.html" rel="prev" title="with-accessors">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="with_002dslots">
+<div class="nav-panel">
+<p>
+Next: <a href="defclass.html" accesskey="n" rel="next">defclass                                                            [Macro]</a>, Previous: <a href="with_002daccessors.html" accesskey="p" rel="prev">with-accessors                                                      [Macro]</a>, Up: <a href="Objects-Dictionary.html" accesskey="u" rel="up">Objects Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="with_002dslots-_005bMacro_005d"><span>7.7.24 with-slots                                                          [Macro]<a class="copiable-link" href="#with_002dslots-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">with-slots</code>  <i class="i"><span class="r">(</span>{<i class="i">slot-entry</i>}*<span class="r">)</span>
+		          instance-form 
+                          {<i class="i">declaration</i>}* {<i class="i">form</i>}*</i><br>
+   &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<p><i class="i">slot-entry</i>&nbsp;::=slot-name&nbsp;|&nbsp;<span class="r">(</span>variable-name&nbsp;slot-name<span class="r">)</span><!-- /@w -->
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-112"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-112"> &para;</a></span></h4>
+
+<p><i class="i">slot-name</i>&mdash;a <i class="i">slot</i> <i class="i">name</i>; not evaluated.
+</p>
+<p><i class="i">variable-name</i>&mdash;a <i class="i">variable name</i>; not evaluated.
+</p>
+<p><i class="i">instance-form</i>&mdash;a <i class="i">form</i>; evaluted to produce <i class="i">instance</i>.
+</p>
+<p><i class="i">instance</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">declaration</i>&mdash;a <b class="b">declare</b> <i class="i">expression</i>; not evaluated.
+</p>
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-151"><span>Description::<a class="copiable-link" href="#Description_003a_003a-151"> &para;</a></span></h4>
+
+<p>The macro <b class="b">with-slots</b> <i class="i">establishes</i> a
+<i class="i">lexical environment</i>
+for referring to the <i class="i">slots</i> in the <i class="i">instance</i> 
+named by the given <i class="i">slot-names</i> 
+as though they were <i class="i">variables</i>.  Within such a context
+the value of the <i class="i">slot</i> can be specified by using its slot name, as if
+it were a lexically bound variable.  Both <b class="b">setf</b> and <b class="b">setq</b>
+can be used to set the value of the <i class="i">slot</i>.
+</p>
+<p>The macro <b class="b">with-slots</b> translates an appearance of the slot 
+name as a <i class="i">variable</i> into a call to <b class="b">slot-value</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-107"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-107"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (defclass thing ()
+           ((x :initarg :x :accessor thing-x)
+            (y :initarg :y :accessor thing-y)))
+&rArr;  #&lt;STANDARD-CLASS THING 250020173&gt;
+ (defmethod (setf thing-x) :before (new-x (thing thing))
+   (format t &quot;~&amp;Changing X from ~D to ~D in ~S.~
+           (thing-x thing) new-x thing))
+ (setq thing (make-instance 'thing :x 0 :y 1)) &rArr;  #&lt;THING 62310540&gt;
+ (with-slots (x y) thing (incf x) (incf y)) &rArr;  2
+ (values (thing-x thing) (thing-y thing)) &rArr;  1, 2
+ (setq thing1 (make-instance 'thing :x 1 :y 2)) &rArr;  #&lt;THING 43135676&gt;
+ (setq thing2 (make-instance 'thing :x 7 :y 8)) &rArr;  #&lt;THING 43147374&gt;
+ (with-slots ((x1 x) (y1 y))
+             thing1
+   (with-slots ((x2 x) (y2 y))
+               thing2
+     (list (list x1 (thing-x thing1) y1 (thing-y thing1)
+                 x2 (thing-x thing2) y2 (thing-y thing2))
+           (setq x1 (+ y1 x2))
+           (list x1 (thing-x thing1) y1 (thing-y thing1)
+                 x2 (thing-x thing2) y2 (thing-y thing2))
+           (setf (thing-x thing2) (list x1))
+           (list x1 (thing-x thing1) y1 (thing-y thing1)
+                 x2 (thing-x thing2) y2 (thing-y thing2)))))
+<code class="t"> |&gt; </code> Changing X from 7 to (9) in #&lt;THING 43147374&gt;.
+&rArr;  ((1 1 2 2 7 7 8 8)
+     9
+     (9 9 2 2 7 7 8 8) 
+     (9)
+     (9 9 2 2 (9) (9) 8 8))
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-13"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-13"> &para;</a></span></h4>
+
+<p><b class="b">defclass</b>
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-36"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-36"> &para;</a></span></h4>
+
+<p>The consequences are undefined if any <i class="i">slot-name</i> is not the name
+of a <i class="i">slot</i> in the <i class="i">instance</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-133"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-133"> &para;</a></span></h4>
+
+<p><a class="ref" href="with_002daccessors.html">with-accessors                                                      [Macro]</a>
+,
+<a class="ref" href="slot_002dvalue.html">slot-value                                                       [Function]</a>
+,
+<a class="ref" href="symbol_002dmacrolet.html">symbol-macrolet                                          [Special Operator]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-89"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-89"> &para;</a></span></h4>
+
+<p>A <b class="b">with-slots</b> expression of the form:
+</p>
+<div class="example">
+<pre class="example-preformatted">
+
+<code class="t">(with-slots</code> (<span class="r">slot-entry</span>_1 ...<span class="r">slot-entry</span>_n) <i class="i">instance-form</i> <span class="r">form</span>_1 ...<span class="r">form</span>_k)<!-- /@w -->
+
+</pre></div>
+
+<p>expands into the equivalent of
+</p>
+<div class="example">
+<pre class="example-preformatted">
+
+<code class="t">(</code><code class="t">let ((</code>in <i class="i">instance-form</i><code class="t">))</code><!-- /@w -->
+
+ <code class="t">(symbol-macrolet (</code><span class="r">Q</span>_1... <span class="r">Q</span>_n<code class="t">)</code> <span class="r">form</span>_1 ...<span class="r">form</span>_k<code class="t">))</code><!-- /@w -->
+
+</pre></div>
+
+<p>where <span class="r">Q</span>_i is 
+</p>
+<div class="example">
+<pre class="example-preformatted"><code class="t">(</code><span class="r">slot-entry</span>_i () 
+<code class="t">(slot-value </code>in '<span class="r">slot-entry</span>_i<code class="t">))</code>
+</pre></div>
+
+<p>if <span class="r">slot-entry</span>_i is a <i class="i">symbol</i>
+and is
+</p>
+<div class="example">
+<pre class="example-preformatted"><code class="t">(</code><span class="r">variable-name</span>_i () 
+<code class="t">(slot-value </code>in '<span class="r">slot-name</span>_i<code class="t">))</code>
+</pre></div>
+
+
+<p>if <span class="r">slot-entry</span>_i
+is of the form 
+</p>
+<div class="example">
+<pre class="example-preformatted"><code class="t">(</code><span class="r">variable-name</span>_i 
+<span class="r">slot-name</span>_i<code class="t">)</code>
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="defclass.html">defclass                                                            [Macro]</a>, Previous: <a href="with_002daccessors.html">with-accessors                                                      [Macro]</a>, Up: <a href="Objects-Dictionary.html">Objects Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/with_002dstandard_002dio_002dsyntax.html
@@ -0,0 +1,110 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>with-standard-io-syntax (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="with-standard-io-syntax (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="with-standard-io-syntax (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Reader-Dictionary.html" rel="up" title="Reader Dictionary">
+<link href="_002aread_002dbase_002a.html" rel="next" title="*read-base*">
+<link href="set_002dsyntax_002dfrom_002dchar.html" rel="prev" title="set-syntax-from-char">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="with_002dstandard_002dio_002dsyntax">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aread_002dbase_002a.html" accesskey="n" rel="next">*read-base*                                                      [Variable]</a>, Previous: <a href="set_002dsyntax_002dfrom_002dchar.html" accesskey="p" rel="prev">set-syntax-from-char                                             [Function]</a>, Up: <a href="Reader-Dictionary.html" accesskey="u" rel="up">Reader Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="with_002dstandard_002dio_002dsyntax-_005bMacro_005d"><span>23.2.12 with-standard-io-syntax                                             [Macro]<a class="copiable-link" href="#with_002dstandard_002dio_002dsyntax-_005bMacro_005d"> &para;</a></span></h4>
+
+<p><code class="code">with-standard-io-syntax</code>  <i class="i">{<i class="i">form</i>}*</i> &rArr;  <i class="i">{<i class="i">result</i>}*</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-481"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-481"> &para;</a></span></h4>
+
+<p><i class="i">forms</i>&mdash;an <i class="i">implicit progn</i>.
+</p>
+<p><i class="i">results</i>&mdash;the <i class="i">values</i> returned by the <i class="i">forms</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-631"><span>Description::<a class="copiable-link" href="#Description_003a_003a-631"> &para;</a></span></h4>
+
+<p>Within the dynamic extent of the body of <i class="i">forms</i>, all reader/printer control
+variables, including any <i class="i">implementation-defined</i> ones not specified by
+this standard, are bound to values that produce standard read/print
+behavior.  The values for the variables specified by this standard are listed in 
+Figure 23&ndash;1.
+</p>
+<p>[Reviewer Note by Barrett: *print-pprint-dispatch* should probably be mentioned here, too.]
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Variable                     Value                               <!-- /@w -->
+  <b class="b">*package*</b>                    The <code class="t">CL-USER</code> <i class="i">package</i>                 <!-- /@w -->
+  <b class="b">*print-array*</b>                <b class="b">t</b>                                   <!-- /@w -->
+  <b class="b">*print-base*</b>                 <code class="t">10</code>                                  <!-- /@w -->
+  <b class="b">*print-case*</b>                 <code class="t">:upcase</code>                             <!-- /@w -->
+  <b class="b">*print-circle*</b>               <b class="b">nil</b>                                 <!-- /@w -->
+  <b class="b">*print-escape*</b>               <b class="b">t</b>                                   <!-- /@w -->
+  <b class="b">*print-gensym*</b>               <b class="b">t</b>                                   <!-- /@w -->
+  <b class="b">*print-length*</b>               <b class="b">nil</b>                                 <!-- /@w -->
+  <b class="b">*print-level*</b>                <b class="b">nil</b>                                 <!-- /@w -->
+  <b class="b">*print-lines*</b>                <b class="b">nil</b>                                 <!-- /@w -->
+  <b class="b">*print-miser-width*</b>          <b class="b">nil</b>                                 <!-- /@w -->
+  <b class="b">*print-pprint-dispatch*</b>      The <i class="i">standard pprint dispatch table</i>  <!-- /@w -->
+  <b class="b">*print-pretty*</b>               <b class="b">nil</b>                                 <!-- /@w -->
+  <b class="b">*print-radix*</b>                <b class="b">nil</b>                                 <!-- /@w -->
+  <b class="b">*print-readably*</b>             <b class="b">t</b>                                   <!-- /@w -->
+  <b class="b">*print-right-margin*</b>         <b class="b">nil</b>                                 <!-- /@w -->
+  <b class="b">*read-base*</b>                  <code class="t">10</code>                                  <!-- /@w -->
+  <b class="b">*read-default-float-format*</b>  <b class="b">single-float</b>                        <!-- /@w -->
+  <b class="b">*read-eval*</b>                  <b class="b">t</b>                                   <!-- /@w -->
+  <b class="b">*read-suppress*</b>              <b class="b">nil</b>                                 <!-- /@w -->
+  <b class="b">*readtable*</b>                  The <i class="i">standard readtable</i>              <!-- /@w -->
+
+         Figure 23&ndash;1: Values of standard control variables        <!-- /@w -->
+
+</pre></div></div>
+
+<h4 class="subsubheading" id="Examples_003a_003a-452"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-452"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (with-open-file (file pathname :direction :output)
+   (with-standard-io-syntax
+     (print data file)))
+
+;;; ... Later, in another Lisp:
+
+ (with-open-file (file pathname :direction :input)
+   (with-standard-io-syntax
+     (setq data (read file))))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002aread_002dbase_002a.html">*read-base*                                                      [Variable]</a>, Previous: <a href="set_002dsyntax_002dfrom_002dchar.html">set-syntax-from-char                                             [Function]</a>, Up: <a href="Reader-Dictionary.html">Reader Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/write.html
@@ -0,0 +1,202 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>write (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="write (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="write (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="write_002dto_002dstring.html" rel="next" title="write-to-string">
+<link href="set_002dpprint_002ddispatch.html" rel="prev" title="set-pprint-dispatch">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+pre.format-preformatted {font-family: inherit}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="write">
+<div class="nav-panel">
+<p>
+Next: <a href="write_002dto_002dstring.html" accesskey="n" rel="next">write-to-string, prin1-to-string, princ-to-string                [Function]</a>, Previous: <a href="set_002dpprint_002ddispatch.html" accesskey="p" rel="prev">set-pprint-dispatch                                              [Function]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="write_002c-prin1_002c-print_002c-pprint_002c-princ-_005bFunction_005d"><span>22.4.14 write, prin1, print, pprint, princ                               [Function]<a class="copiable-link" href="#write_002c-prin1_002c-print_002c-pprint_002c-princ-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">write</code>  <i class="i"><i class="i">object</i> <span class="r">&amp;key</span> \writekeys<span class="r">stream</span></i><br>
+   &rArr;  <i class="i">object</i>
+</p>
+<p><code class="code">prin</code>  <i class="i">1</i> &rArr;  <i class="i">object <span class="r">&amp;optional</span> output-stream</i>
+ <span class="r">object</span>
+<code class="code">princ</code>  <i class="i">object <span class="r">&amp;optional</span> output-stream</i> &rArr;  <i class="i">object</i>
+</p>
+<p><code class="code">print</code>  <i class="i">object <span class="r">&amp;optional</span> output-stream</i> &rArr;  <i class="i">object</i>
+</p>
+<p><code class="code">pprint</code>  <i class="i">object <span class="r">&amp;optional</span> output-stream</i> &rArr;  <i class="i">&lt;<i class="i">no <i class="i">values</i></i>&gt;</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-467"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-467"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p><i class="i">output-stream</i>&mdash;an <i class="i">output</i> <i class="i">stream designator</i>.
+		        The default is <i class="i">standard output</i>.
+</p>
+<p>\writekeydescriptions<span class="r"><i class="i">stream</i>&mdash;an <i class="i">output</i> <i class="i">stream designator</i>.
+The default is <i class="i">standard output</i>.</span>
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-602"><span>Description::<a class="copiable-link" href="#Description_003a_003a-602"> &para;</a></span></h4>
+
+<p><b class="b">write</b>, <b class="b">prin1</b>, <b class="b">princ</b>, <b class="b">print</b>, and <b class="b">pprint</b>
+write the printed representation of <i class="i">object</i> to <i class="i">output-stream</i>.
+</p>
+<p><b class="b">write</b> is the general entry point to the <i class="i">Lisp printer</i>.
+For each explicitly supplied <i class="i">keyword parameter</i> named in Figure 22&ndash;6,
+the corresponding <i class="i">printer control variable</i> is dynamically bound to its <i class="i">value</i>
+while printing goes on;
+for each <i class="i">keyword parameter</i> in Figure 22&ndash;6 that is not explicitly supplied,
+the value of the corresponding <i class="i">printer control variable</i> is the same as it was
+at the time <b class="b">write</b> was invoked.
+Once the appropriate <i class="i">bindings</i> are <i class="i">established</i>,
+the <i class="i">object</i> is output by the <i class="i">Lisp printer</i>.
+</p>
+<div class="format">
+<div class="group"><pre class="format-preformatted">  Parameter        Corresponding Dynamic Variable  <!-- /@w -->
+  <i class="i">array</i>            <b class="b">*print-array*</b>                   <!-- /@w -->
+  <i class="i">base</i>             <b class="b">*print-base*</b>                    <!-- /@w -->
+  <i class="i">case</i>             <b class="b">*print-case*</b>                    <!-- /@w -->
+  <i class="i">circle</i>           <b class="b">*print-circle*</b>                  <!-- /@w -->
+  <i class="i">escape</i>           <b class="b">*print-escape*</b>                  <!-- /@w -->
+  <i class="i">gensym</i>           <b class="b">*print-gensym*</b>                  <!-- /@w -->
+  <i class="i">length</i>           <b class="b">*print-length*</b>                  <!-- /@w -->
+  <i class="i">level</i>            <b class="b">*print-level*</b>                   <!-- /@w -->
+  <i class="i">lines</i>            <b class="b">*print-lines*</b>                   <!-- /@w -->
+  <i class="i">miser-width</i>      <b class="b">*print-miser-width*</b>             <!-- /@w -->
+  <i class="i">pprint-dispatch</i>  <b class="b">*print-pprint-dispatch*</b>         <!-- /@w -->
+  <i class="i">pretty</i>           <b class="b">*print-pretty*</b>                  <!-- /@w -->
+  <i class="i">radix</i>            <b class="b">*print-radix*</b>                   <!-- /@w -->
+  <i class="i">readably</i>         <b class="b">*print-readably*</b>                <!-- /@w -->
+  <i class="i">right-margin</i>     <b class="b">*print-right-margin*</b>            <!-- /@w -->
+
+  Figure 22&ndash;6: Argument correspondences for the WRITE function.<!-- /@w -->
+
+</pre></div></div>
+
+<p><b class="b">prin1</b>, <b class="b">princ</b>, <b class="b">print</b>, and <b class="b">pprint</b> implicitly 
+<i class="i">bind</i> certain print parameters to particular values.  The remaining parameter
+values are taken from 
+     <b class="b">*print-array*</b>,
+     <b class="b">*print-base*</b>,
+     <b class="b">*print-case*</b>, 
+     <b class="b">*print-circle*</b>,
+     <b class="b">*print-escape*</b>,
+     <b class="b">*print-gensym*</b>,
+     <b class="b">*print-length*</b>,
+     <b class="b">*print-level*</b>,
+     <b class="b">*print-lines*</b>,
+     <b class="b">*print-miser-width*</b>,
+     <b class="b">*print-pprint-dispatch*</b>,
+     <b class="b">*print-pretty*</b>, 
+     <b class="b">*print-radix*</b>, 
+ and <b class="b">*print-right-margin*</b>.
+</p>
+<p><b class="b">prin1</b> produces output suitable for input to <b class="b">read</b>.  
+It binds <b class="b">*print-escape*</b> to <i class="i">true</i>.
+</p>
+<p><b class="b">princ</b> is just like <b class="b">prin1</b> except that the
+output has no <i class="i">escape</i> <i class="i">characters</i>.
+It binds <b class="b">*print-escape*</b>   to <i class="i">false</i>
+</p>
+<p>and <b class="b">*print-readably*</b> to <i class="i">false</i>.
+</p>
+<p>The general rule is that output from <b class="b">princ</b> is intended to look
+good to people, while output from <b class="b">prin1</b> is intended to
+be acceptable to <b class="b">read</b>.
+</p>
+<p><b class="b">print</b> is just like <b class="b">prin1</b> 
+except that the printed representation
+of <i class="i">object</i> is preceded by a newline 
+and followed by a space.
+</p>
+<p><b class="b">pprint</b> is just like <b class="b">print</b> except that the trailing
+space is omitted and 
+<i class="i">object</i> is printed with the <b class="b">*print-pretty*</b> flag <i class="i">non-nil</i> 
+to produce pretty output.
+</p>
+<p><i class="i">Output-stream</i> specifies the <i class="i">stream</i> to which 
+output is to be sent.  
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-102"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-102"> &para;</a></span></h4>
+
+<p><b class="b">*standard-output*</b>,
+<b class="b">*terminal-io*</b>,
+<b class="b">*print-escape*</b>,
+<b class="b">*print-radix*</b>,
+<b class="b">*print-base*</b>,
+<b class="b">*print-circle*</b>,
+<b class="b">*print-pretty*</b>,
+<b class="b">*print-level*</b>,
+<b class="b">*print-length*</b>,
+<b class="b">*print-case*</b>,
+<b class="b">*print-gensym*</b>,
+<b class="b">*print-array*</b>,
+<b class="b">*read-default-float-format*</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-488"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-488"> &para;</a></span></h4>
+
+<p><a class="ref" href="readtable_002dcase.html">readtable-case                                                   [Accessor]</a>
+,
+<a class="ref" href="FORMAT-Printer-Operations.html">FORMAT Printer Operations</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-303"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-303"> &para;</a></span></h4>
+
+<p>The <i class="i">functions</i> <b class="b">prin1</b> and <b class="b">print</b> do not bind <b class="b">*print-readably*</b>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (prin1 object output-stream)
+&equiv; (write object :stream output-stream :escape t)
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (princ object output-stream)
+&equiv; (write object stream output-stream :escape nil :readably nil)
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (print object output-stream)
+&equiv; (progn (terpri output-stream)
+           (write object :stream output-stream
+                         :escape t)
+           (write-char #\space output-stream))
+</pre></div>
+
+<div class="example">
+<pre class="example-preformatted"> (pprint object output-stream)
+&equiv; (write object :stream output-stream :escape t :pretty t)
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="write_002dto_002dstring.html">write-to-string, prin1-to-string, princ-to-string                [Function]</a>, Previous: <a href="set_002dpprint_002ddispatch.html">set-pprint-dispatch                                              [Function]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/write_002dbyte.html
@@ -0,0 +1,93 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>write-byte (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="write-byte (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="write-byte (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="peek_002dchar.html" rel="next" title="peek-char">
+<link href="read_002dbyte.html" rel="prev" title="read-byte">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="write_002dbyte">
+<div class="nav-panel">
+<p>
+Next: <a href="peek_002dchar.html" accesskey="n" rel="next">peek-char                                                        [Function]</a>, Previous: <a href="read_002dbyte.html" accesskey="p" rel="prev">read-byte                                                        [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="write_002dbyte-_005bFunction_005d"><span>21.2.15 write-byte                                                       [Function]<a class="copiable-link" href="#write_002dbyte-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">write-byte</code>  <i class="i">byte stream</i> &rArr;  <i class="i">byte</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-418"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-418"> &para;</a></span></h4>
+
+<p><i class="i">byte</i>&mdash;an <i class="i">integer</i> of the <i class="i">stream element type</i>
+		  of <i class="i">stream</i>.
+</p>
+<p><i class="i">stream</i>&mdash;a <i class="i">binary</i> <i class="i">output</i> <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-546"><span>Description::<a class="copiable-link" href="#Description_003a_003a-546"> &para;</a></span></h4>
+
+<p><b class="b">write-byte</b> writes one byte, <i class="i">byte</i>, to <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-393"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-393"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (with-open-file (s &quot;temp-bytes&quot; 
+                    :direction :output
+                    :element-type 'unsigned-byte)
+    (write-byte 101 s)) &rArr;  101
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-61"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-61"> &para;</a></span></h4>
+
+<p><i class="i">stream</i> is modified.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-81"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-81"> &para;</a></span></h4>
+
+<p>The <i class="i">element type</i> of the <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-197"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-197"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">stream</i> is not a <i class="i">stream</i>.
+Should signal an error of <i class="i">type</i> <b class="b">error</b> 
+if <i class="i">stream</i> is not  a <i class="i">binary</i> <i class="i">output</i> <i class="i">stream</i>.
+</p>
+<p>Might signal an error of <i class="i">type</i> <b class="b">type-error</b> if <i class="i">byte</i> is not
+an <i class="i">integer</i> of the <i class="i">stream element type</i> of <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-445"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-445"> &para;</a></span></h4>
+
+<p><a class="ref" href="read_002dbyte.html">read-byte                                                        [Function]</a>
+,
+<a class="ref" href="write_002dchar.html">write-char                                                       [Function]</a>
+,
+</p>
+<p><a class="ref" href="write_002dsequence.html">write-sequence                                                   [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/write_002dchar.html
@@ -0,0 +1,88 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>write-char (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="write-char (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="write-char (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="read_002dline.html" rel="next" title="read-line">
+<link href="unread_002dchar.html" rel="prev" title="unread-char">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="write_002dchar">
+<div class="nav-panel">
+<p>
+Next: <a href="read_002dline.html" accesskey="n" rel="next">read-line                                                        [Function]</a>, Previous: <a href="unread_002dchar.html" accesskey="p" rel="prev">unread-char                                                      [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="write_002dchar-_005bFunction_005d"><span>21.2.21 write-char                                                       [Function]<a class="copiable-link" href="#write_002dchar-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">write-char</code>  <i class="i">character <span class="r">&amp;optional</span> output-stream</i> &rArr;  <i class="i">character</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-424"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-424"> &para;</a></span></h4>
+
+<p><i class="i">character</i>&mdash;a <i class="i">character</i>.
+</p>
+<p><i class="i">output-stream</i> &ndash; an <i class="i">output</i> <i class="i">stream designator</i>.
+ The default is <i class="i">standard output</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-552"><span>Description::<a class="copiable-link" href="#Description_003a_003a-552"> &para;</a></span></h4>
+
+<p><b class="b">write-char</b> outputs <i class="i">character</i> to <i class="i">output-stream</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-399"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-399"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (write-char #\a)
+<code class="t"> |&gt; </code> a
+&rArr;  #\a
+ (with-output-to-string (s) 
+   (write-char #\a s)
+   (write-char #\Space s)
+   (write-char #\b s))
+&rArr;  &quot;a b&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-63"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-63"> &para;</a></span></h4>
+
+<p>The <i class="i">output-stream</i> is modified.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-87"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-87"> &para;</a></span></h4>
+
+<p><b class="b">*standard-output*</b>,
+<b class="b">*terminal-io*</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-449"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-449"> &para;</a></span></h4>
+
+<p><a class="ref" href="read_002dchar.html">read-char                                                        [Function]</a>
+,
+<a class="ref" href="write_002dbyte.html">write-byte                                                       [Function]</a>
+,
+</p>
+<p><a class="ref" href="write_002dsequence.html">write-sequence                                                   [Function]</a>
+</p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/write_002dsequence.html
@@ -0,0 +1,107 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>write-sequence (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="write-sequence (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="write-sequence (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="file_002dlength.html" rel="next" title="file-length">
+<link href="read_002dsequence.html" rel="prev" title="read-sequence">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="write_002dsequence">
+<div class="nav-panel">
+<p>
+Next: <a href="file_002dlength.html" accesskey="n" rel="next">file-length                                                      [Function]</a>, Previous: <a href="read_002dsequence.html" accesskey="p" rel="prev">read-sequence                                                    [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="write_002dsequence-_005bFunction_005d"><span>21.2.25 write-sequence                                                   [Function]<a class="copiable-link" href="#write_002dsequence-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">write-sequence</code>  <i class="i">sequence stream <span class="r">&amp;key</span> start end</i> &rArr;  <i class="i">sequence</i>
+</p>
+<p><i class="i">sequence</i>&mdash;a <i class="i">sequence</i>.
+</p>
+<p><i class="i">stream</i>&mdash;an <i class="i">output</i> <i class="i">stream</i>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of
+ <i class="i">sequence</i>.  The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-556"><span>Description::<a class="copiable-link" href="#Description_003a_003a-556"> &para;</a></span></h4>
+
+<p><b class="b">write-sequence</b> writes the <i class="i">elements</i> of the subsequence
+of <i class="i">sequence</i> <i class="i">bounded</i> by <i class="i">start</i> and <i class="i">end</i> to
+<i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-403"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-403"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (write-sequence &quot;bookworms&quot; *standard-output* :end 4)
+ <code class="t"> |&gt; </code> book
+ &rArr;  &quot;bookworms&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-65"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-65"> &para;</a></span></h4>
+
+<p>Modifies <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-204"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-204"> &para;</a></span></h4>
+
+<p>Should be prepared to signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			 if <i class="i">sequence</i> is not a <i class="i">proper sequence</i>.
+Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">start</i> is not a non-negative <i class="i">integer</i>.
+Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">end</i> is not a non-negative <i class="i">integer</i> or <b class="b">nil</b>.
+</p>
+<p>Might signal an error of <i class="i">type</i> <b class="b">type-error</b> if an <i class="i">element</i> of the
+<i class="i">bounded</i> <i class="i">sequence</i> is not a member of the
+<i class="i">stream element type</i> of the <i class="i">stream</i>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-453"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-453"> &para;</a></span></h4>
+
+<p><a class="ref" href="Compiler-Terminology.html">Compiler Terminology</a>,
+<a class="ref" href="read_002dsequence.html">read-sequence                                                    [Function]</a>
+,
+<a class="ref" href="write_002dstring.html">write-string, write-line                                         [Function]</a>
+,
+<b class="b">write-line</b>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-292"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-292"> &para;</a></span></h4>
+
+<p><b class="b">write-sequence</b> is identical in effect to iterating over the indicated
+subsequence and writing one <i class="i">element</i> at a time to <i class="i">stream</i>, but
+may be more efficient than the equivalent loop.  An efficient implementation
+is more likely to exist for the case where the <i class="i">sequence</i> is a
+<i class="i">vector</i> with the same <i class="i">element type</i> as the <i class="i">stream</i>.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="file_002dlength.html">file-length                                                      [Function]</a>, Previous: <a href="read_002dsequence.html">read-sequence                                                    [Function]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/write_002dstring.html
@@ -0,0 +1,109 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>write-string (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="write-string (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="write-string (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="read_002dsequence.html" rel="next" title="read-sequence">
+<link href="read_002dline.html" rel="prev" title="read-line">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="write_002dstring">
+<div class="nav-panel">
+<p>
+Next: <a href="read_002dsequence.html" accesskey="n" rel="next">read-sequence                                                    [Function]</a>, Previous: <a href="read_002dline.html" accesskey="p" rel="prev">read-line                                                        [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="write_002dstring_002c-write_002dline-_005bFunction_005d"><span>21.2.23 write-string, write-line                                         [Function]<a class="copiable-link" href="#write_002dstring_002c-write_002dline-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">write-string</code>  <i class="i">string <span class="r">&amp;optional</span> output-stream <span class="r">&amp;key</span> start end</i> &rArr;  <i class="i">string</i>
+</p>
+<p><code class="code">write-line</code>  <i class="i">string <span class="r">&amp;optional</span> output-stream <span class="r">&amp;key</span> start end</i> &rArr;  <i class="i">string</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-426"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-426"> &para;</a></span></h4>
+
+<p><i class="i">string</i>&mdash;a <i class="i">string</i>.
+</p>
+<p><i class="i">output-stream</i> &ndash; an <i class="i">output</i> <i class="i">stream designator</i>.
+ The default is <i class="i">standard output</i>.
+</p>
+<p><i class="i">start</i>, <i class="i">end</i>&mdash;<i class="i">bounding index designators</i> of <i class="i">string</i>.
+ The defaults for <i class="i">start</i> and <i class="i">end</i> are <code class="t">0</code> and <b class="b">nil</b>, respectively.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-554"><span>Description::<a class="copiable-link" href="#Description_003a_003a-554"> &para;</a></span></h4>
+
+<p><b class="b">write-string</b> writes the <i class="i">characters</i> of 
+the subsequence of <i class="i">string</i> <i class="i">bounded</i> by <i class="i">start</i> and <i class="i">end</i>
+to <i class="i">output-stream</i>.
+<b class="b">write-line</b> does the same thing, 
+but then outputs a newline afterwards.  
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-401"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-401"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (prog1 (write-string &quot;books&quot; nil :end 4) (write-string &quot;worms&quot;))
+<code class="t"> |&gt; </code> bookworms
+&rArr;  &quot;books&quot;
+ (progn (write-char #\*)
+        (write-line &quot;test12&quot; *standard-output* :end 5) 
+        (write-line &quot;*test2&quot;)
+        (write-char #\*)
+        nil)
+<code class="t"> |&gt; </code> *test1
+<code class="t"> |&gt; </code> *test2
+<code class="t"> |&gt; </code> *
+&rArr;  NIL
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-89"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-89"> &para;</a></span></h4>
+
+<p><b class="b">*standard-output*</b>,
+<b class="b">*terminal-io*</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-451"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-451"> &para;</a></span></h4>
+
+<p><a class="ref" href="read_002dline.html">read-line                                                        [Function]</a>
+, 
+<a class="ref" href="write_002dchar.html">write-char                                                       [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-290"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-290"> &para;</a></span></h4>
+
+<p><b class="b">write-line</b> and <b class="b">write-string</b> return <i class="i">string</i>,
+not the substring <i class="i">bounded</i> by <i class="i">start</i> and <i class="i">end</i>.
+</p>
+<div class="example">
+<pre class="example-preformatted"> (write-string string)
+&equiv; (dotimes (i (length string)
+      (write-char (char string i)))
+
+ (write-line string)
+&equiv; (prog1 (write-string string) (terpri))
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/write_002dto_002dstring.html
@@ -0,0 +1,137 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>write-to-string (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="write-to-string (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="write-to-string (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Printer-Dictionary.html" rel="up" title="Printer Dictionary">
+<link href="_002aprint_002darray_002a.html" rel="next" title="*print-array*">
+<link href="write.html" rel="prev" title="write">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="write_002dto_002dstring">
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002darray_002a.html" accesskey="n" rel="next">*print-array*                                                    [Variable]</a>, Previous: <a href="write.html" accesskey="p" rel="prev">write, prin1, print, pprint, princ                               [Function]</a>, Up: <a href="Printer-Dictionary.html" accesskey="u" rel="up">Printer Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="write_002dto_002dstring_002c-prin1_002dto_002dstring_002c-princ_002dto_002dstring-_005bFunction_005d"><span>22.4.15 write-to-string, prin1-to-string, princ-to-string                [Function]<a class="copiable-link" href="#write_002dto_002dstring_002c-prin1_002dto_002dstring_002c-princ_002dto_002dstring-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">write-to-string</code>  <i class="i">object <span class="r">&amp;key</span> \writekeys</i><br>
+   &rArr;  <i class="i">string</i>
+</p>
+<p><code class="code">prin</code>  <i class="i">1</i> &rArr;  <i class="i">-to-string</i>
+ <span class="r">object</span> <span class="r">string</span>
+</p>
+<p><code class="code">princ-to-string</code>  <i class="i">object</i> &rArr;  <i class="i">string</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-468"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-468"> &para;</a></span></h4>
+
+<p><i class="i">object</i>&mdash;an <i class="i">object</i>.
+</p>
+<p>\writekeydescriptions
+</p>
+<p><i class="i">string</i>&mdash;a <i class="i">string</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-603"><span>Description::<a class="copiable-link" href="#Description_003a_003a-603"> &para;</a></span></h4>
+
+<p><b class="b">write-to-string</b>, <b class="b">prin1-to-string</b>, and <b class="b">princ-to-string</b>
+are used to create a <i class="i">string</i> consisting of the printed representation 
+of <i class="i">object</i>.
+<i class="i">Object</i> is effectively printed as if by <b class="b">write</b>,
+<b class="b">prin1</b>, or <b class="b">princ</b>, respectively,
+and the <i class="i">characters</i> that would be output are made 
+into a <i class="i">string</i>.
+</p>
+<p><b class="b">write-to-string</b> is the general output function.
+It has the ability to specify all the parameters applicable 
+to the printing of <i class="i">object</i>.
+</p>
+<p><b class="b">prin1-to-string</b> acts like <b class="b">write-to-string</b> with 
+<code class="t">:escape t</code>, that is, escape characters are written where appropriate.
+</p>
+<p><b class="b">princ-to-string</b> acts like <b class="b">write-to-string</b> with 
+</p>
+<p><code class="t">:escape nil :readably nil</code>.  
+</p>
+<p>Thus no <i class="i">escape</i> <i class="i">characters</i> are written.
+</p>
+<p>All other keywords that would be specified to <b class="b">write-to-string</b> 
+are default values when <b class="b">prin1-to-string</b>
+or <b class="b">princ-to-string</b> is invoked.
+</p>
+<p>The meanings and defaults for the keyword arguments to <b class="b">write-to-string</b>
+are the same as those for <b class="b">write</b>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-432"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-432"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (prin1-to-string &quot;abc&quot;) &rArr;  &quot;\&quot;abc\&quot;&quot;
+ (princ-to-string &quot;abc&quot;) &rArr;  &quot;abc&quot;
+</pre></div>
+
+<h4 class="subsubheading" id="Affected-By_003a_003a-103"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-103"> &para;</a></span></h4>
+
+<p><b class="b">*print-escape*</b>,
+<b class="b">*print-radix*</b>,
+<b class="b">*print-base*</b>,
+<b class="b">*print-circle*</b>,
+<b class="b">*print-pretty*</b>,
+<b class="b">*print-level*</b>,
+<b class="b">*print-length*</b>,
+<b class="b">*print-case*</b>,
+<b class="b">*print-gensym*</b>,
+<b class="b">*print-array*</b>,
+<b class="b">*read-default-float-format*</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-489"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-489"> &para;</a></span></h4>
+
+<p><a class="ref" href="write.html">write, prin1, print, pprint, princ                               [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-304"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-304"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (write-to-string <i class="i">object</i> {<i class="i">key</i> <i class="i">argument</i>}*)
+&equiv; (with-output-to-string (#1=#:string-stream) 
+     (write object :stream #1# {<i class="i">key</i> <i class="i">argument</i>}*))
+
+ (princ-to-string <i class="i">object</i>)
+&equiv; (with-output-to-string (string-stream)
+     (princ <i class="i">object</i> string-stream))
+
+ (prin1-to-string <i class="i">object</i>)
+&equiv; (with-output-to-string (string-stream)
+     (prin1 <i class="i">object</i> string-stream))
+</pre></div>
+
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="_002aprint_002darray_002a.html">*print-array*                                                    [Variable]</a>, Previous: <a href="write.html">write, prin1, print, pprint, princ                               [Function]</a>, Up: <a href="Printer-Dictionary.html">Printer Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/y_002dor_002dn_002dp.html
@@ -0,0 +1,130 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>y-or-n-p (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="y-or-n-p (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="y-or-n-p (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Streams-Dictionary.html" rel="up" title="Streams Dictionary">
+<link href="make_002dsynonym_002dstream.html" rel="next" title="make-synonym-stream">
+<link href="finish_002doutput.html" rel="prev" title="finish-output">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="y_002dor_002dn_002dp">
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dsynonym_002dstream.html" accesskey="n" rel="next">make-synonym-stream                                              [Function]</a>, Previous: <a href="finish_002doutput.html" accesskey="p" rel="prev">finish-output, force-output, clear-output                        [Function]</a>, Up: <a href="Streams-Dictionary.html" accesskey="u" rel="up">Streams Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="y_002dor_002dn_002dp_002c-yes_002dor_002dno_002dp-_005bFunction_005d"><span>21.2.37 y-or-n-p, yes-or-no-p                                            [Function]<a class="copiable-link" href="#y_002dor_002dn_002dp_002c-yes_002dor_002dno_002dp-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">y-or-n-p</code>  <i class="i"><span class="r">&amp;optional</span> control <span class="r">&amp;rest</span> arguments</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<p><code class="code">yes-or-no-p</code>  <i class="i"><span class="r">&amp;optional</span> control <span class="r">&amp;rest</span> arguments</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-438"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-438"> &para;</a></span></h4>
+
+<p><i class="i">control</i>&mdash;a <i class="i">format control</i>.
+</p>
+<p><i class="i">arguments</i>&mdash;<i class="i">format arguments</i> for <i class="i">control</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-568"><span>Description::<a class="copiable-link" href="#Description_003a_003a-568"> &para;</a></span></h4>
+
+<p>These functions ask a question and parse a response from the user.
+They return <i class="i">true</i> if the answer is affirmative,
+or <i class="i">false</i> if the answer is negative.
+</p>
+<p><b class="b">y-or-n-p</b> is for asking the user a question whose answer is either
+&ldquo;yes&rdquo; or &ldquo;no.&rdquo;  
+It is intended that the reply require
+the user to answer a yes-or-no question with a single
+character.
+<b class="b">yes-or-no-p</b> is also for asking the user a question
+whose answer is either &ldquo;Yes&rdquo; or &ldquo;No.&rdquo;  
+It is intended that the reply require
+the user to take more action than just a single keystroke, such as typing
+the full word <code class="t">yes</code> or <code class="t">no</code> followed by a newline.
+</p>
+<p><b class="b">y-or-n-p</b> types out a message (if supplied), reads an answer
+in some <i class="i">implementation-dependent</i> manner (intended to be short and simple,
+such as reading a single character such as <code class="t">Y</code> or <code class="t">N</code>).
+<b class="b">yes-or-no-p</b> types out a message (if supplied), 
+attracts the user&rsquo;s attention (for example, by ringing
+the terminal&rsquo;s bell),
+and reads an answer
+in some <i class="i">implementation-dependent</i> manner (intended to be multiple characters,
+such as <code class="t">YES</code> or <code class="t">NO</code>).
+</p>
+<p>If <i class="i">format-control</i> is supplied and not <b class="b">nil</b>,
+then a <b class="b">fresh-line</b> operation is performed; then
+a message is printed as if <i class="i">format-control</i> and <i class="i">arguments</i>
+were given to <b class="b">format</b>.
+In any case, <b class="b">yes-or-no-p</b> and <b class="b">y-or-n-p</b> will provide 
+a prompt such as &ldquo;<code class="t">(Y or N)</code>&rdquo; or &ldquo;<code class="t">(Yes or No)</code>&rdquo; if appropriate.
+</p>
+<p>All input and output are performed using <i class="i">query I/O</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-414"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-414"> &para;</a></span></h4>
+<div class="example">
+<pre class="example-preformatted"> (y-or-n-p &quot;(t or nil) given by&quot;)
+<code class="t"> |&gt; </code> (t or nil) given by (Y or N) <b class="b">|&gt;&gt;</b><code class="t">Y</code><b class="b">&lt;&lt;|</b>
+&rArr;  <i class="i">true</i>
+ (yes-or-no-p &quot;a ~S message&quot; 'frightening) 
+<code class="t"> |&gt; </code> a FRIGHTENING message (Yes or No) <b class="b">|&gt;&gt;</b><code class="t">no</code><b class="b">&lt;&lt;|</b>
+&rArr;  <i class="i">false</i>
+ (y-or-n-p &quot;Produce listing file?&quot;) 
+<code class="t"> |&gt; </code> Produce listing file?
+<code class="t"> |&gt; </code> Please respond with Y or N. <b class="b">|&gt;&gt;</b><code class="t">n</code><b class="b">&lt;&lt;|</b>
+&rArr;  <i class="i">false</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Side-Effects_003a_003a-71"><span>Side Effects::<a class="copiable-link" href="#Side-Effects_003a_003a-71"> &para;</a></span></h4>
+
+<p>Output to and input from <i class="i">query I/O</i> will occur.
+</p>
+<h4 class="subsubheading" id="Affected-By_003a_003a-96"><span>Affected By::<a class="copiable-link" href="#Affected-By_003a_003a-96"> &para;</a></span></h4>
+
+<p><b class="b">*query-io*</b>.
+</p>
+<h4 class="subsubheading" id="See-Also_003a_003a-464"><span>See Also::<a class="copiable-link" href="#See-Also_003a_003a-464"> &para;</a></span></h4>
+
+<p><a class="ref" href="format.html">format                                                           [Function]</a>
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-296"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-296"> &para;</a></span></h4>
+
+<p><b class="b">yes-or-no-p</b> and <b class="b">yes-or-no-p</b> do not add question marks
+to the end of the prompt string, so any desired question mark or other
+punctuation should be explicitly included in the text query.
+</p>
+</div>
+<hr>
+<div class="nav-panel">
+<p>
+Next: <a href="make_002dsynonym_002dstream.html">make-synonym-stream                                              [Function]</a>, Previous: <a href="finish_002doutput.html">finish-output, force-output, clear-output                        [Function]</a>, Up: <a href="Streams-Dictionary.html">Streams Dictionary</a> &nbsp; </p>
+</div>
+
+
+
+</body>
+</html>
--- /dev/null
+++ gcl27-2.7.0/info/gcl_html/zerop.html
@@ -0,0 +1,87 @@
+<!DOCTYPE html>
+<html>
+<!-- Created by GNU Texinfo 7.1, https://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>zerop (ANSI and GNU Common Lisp Document)</title>
+
+<meta name="description" content="zerop (ANSI and GNU Common Lisp Document)">
+<meta name="keywords" content="zerop (ANSI and GNU Common Lisp Document)">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="makeinfo">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+<link href="index.html" rel="start" title="Top">
+<link href="Numbers-Dictionary.html" rel="up" title="Numbers Dictionary">
+<link href="floor.html" rel="next" title="floor">
+<link href="minusp.html" rel="prev" title="minusp">
+<style type="text/css">
+<!--
+a.copiable-link {visibility: hidden; text-decoration: none; line-height: 0em}
+div.example {margin-left: 3.2em}
+span.r {font-family: initial; font-weight: normal; font-style: normal}
+span:hover a.copiable-link {visibility: visible}
+-->
+</style>
+
+
+</head>
+
+<body lang="en">
+<div class="subsection-level-extent" id="zerop">
+<div class="nav-panel">
+<p>
+Next: <a href="floor.html" accesskey="n" rel="next">floor, ffloor, ceiling, fceiling,</a>, Previous: <a href="minusp.html" accesskey="p" rel="prev">minusp, plusp                                                    [Function]</a>, Up: <a href="Numbers-Dictionary.html" accesskey="u" rel="up">Numbers Dictionary</a> &nbsp; </p>
+</div>
+<hr>
+<h4 class="subsection" id="zerop-_005bFunction_005d"><span>12.2.18 zerop                                                            [Function]<a class="copiable-link" href="#zerop-_005bFunction_005d"> &para;</a></span></h4>
+
+<p><code class="code">zerop</code>  <i class="i">number</i> &rArr;  <i class="i">generalized-boolean</i>
+</p>
+<h4 class="subsubheading" id="Pronunciation_003a_003a-4"><span>Pronunciation::<a class="copiable-link" href="#Pronunciation_003a_003a-4"> &para;</a></span></h4>
+
+<p>pronounced &rsquo;z\=e (, )r\=o<span class="r"></span>(, )p\=e
+</p>
+<h4 class="subsubheading" id="Arguments-and-Values_003a_003a-204"><span>Arguments and Values::<a class="copiable-link" href="#Arguments-and-Values_003a_003a-204"> &para;</a></span></h4>
+
+<p><i class="i">number</i>&mdash;a <i class="i">number</i>.
+</p>
+<p><i class="i">generalized-boolean</i>&mdash;a <i class="i">generalized boolean</i>.
+</p>
+<h4 class="subsubheading" id="Description_003a_003a-283"><span>Description::<a class="copiable-link" href="#Description_003a_003a-283"> &para;</a></span></h4>
+
+<p>Returns <i class="i">true</i> if <i class="i">number</i> is zero (<i class="i">integer</i>, <i class="i">float</i>, or <i class="i">complex</i>);
+otherwise, returns <i class="i">false</i>.
+</p>
+<p>Regardless of whether an <i class="i">implementation</i> provides distinct representations
+for positive and negative floating-point zeros, <code class="t">(zerop -0.0)</code> 
+always returns <i class="i">true</i>.
+</p>
+<h4 class="subsubheading" id="Examples_003a_003a-187"><span>Examples::<a class="copiable-link" href="#Examples_003a_003a-187"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (zerop 0) &rArr;  <i class="i">true</i>
+ (zerop 1) &rArr;  <i class="i">false</i>
+ (zerop -0.0) &rArr;  <i class="i">true</i>
+ (zerop 0/100) &rArr;  <i class="i">true</i>
+ (zerop #c(0 0.0)) &rArr;  <i class="i">true</i>
+</pre></div>
+
+<h4 class="subsubheading" id="Exceptional-Situations_003a_003a-80"><span>Exceptional Situations::<a class="copiable-link" href="#Exceptional-Situations_003a_003a-80"> &para;</a></span></h4>
+
+<p>Should signal an error of <i class="i">type</i> <b class="b">type-error</b>
+			      if <i class="i">number</i> is not a <i class="i">number</i>.
+</p>
+<h4 class="subsubheading" id="Notes_003a_003a-142"><span>Notes::<a class="copiable-link" href="#Notes_003a_003a-142"> &para;</a></span></h4>
+
+<div class="example">
+<pre class="example-preformatted"> (zerop <i class="i">number</i>) &equiv; (= <i class="i">number</i> 0)
+</pre></div>
+
+</div>
+
+
+
+</body>
+</html>
--- gcl27-2.7.0.orig/info/makefile
+++ gcl27-2.7.0/info/makefile
@@ -5,7 +5,7 @@ INFO_DIR=${prefix}/lib/info
 
 GCL_DVI=gcl-tk.dvi gcl-si.dvi gcl.dvi
 #GCL_HTML=gcl-si_toc.html gcl-tk_toc.html gcl_toc.html
-GCL_HTML=gcl-si/index.html gcl-tk/index.html gcl/index.html
+GCL_HTML=gcl-si_html/index.html gcl-tk_html/index.html gcl_html/index.html
 #HTML_CMD=texi2html -split_chapter
 HTML_CMD=makeinfo --html 
 
@@ -84,7 +84,7 @@ install: $(GCL_DVI) $(GCL_HTML)
 	echo "* GCL TK Doc: (gcl-tk.info).	TK window GCL interface." >> $(DESTDIR)${INFO_DIR}/dir
 	grep gcl.info $(DESTDIR)${INFO_DIR}/dir >/dev/null 2>&1 || \
 	echo "* GCL Ansi Doc: (gcl.info).  Ansi Common Lisp Specification." >> $(DESTDIR)${INFO_DIR}/dir
-	-cp *.info* $(DESTDIR)${INFO_DIR}/
+	cp *.info* $(DESTDIR)${INFO_DIR}/
 #	-mkdir -p $(DESTDIR)$(INFO_DIR)/../doc/gcl-doc/gcl.html
 #	-mkdir -p $(DESTDIR)$(INFO_DIR)/../doc/gcl-doc/gcl-si.html
 #	-mkdir -p $(DESTDIR)$(INFO_DIR)/../doc/gcl-doc/gcl-tk.html
@@ -94,9 +94,9 @@ install: $(GCL_DVI) $(GCL_HTML)
 #	-cp gcl/* $(DESTDIR)$(INFO_DIR)/../doc/gcl-doc/gcl.html
 #	-cp gcl-si/* $(DESTDIR)$(INFO_DIR)/../doc/gcl-doc/gcl-si.html
 #	-cp gcl-tk/* $(DESTDIR)$(INFO_DIR)/../doc/gcl-doc/gcl-tk.html
-	-mkdir -p $(DESTDIR)$(INFO_DIR)/../doc
-	-cp -r gcl-si gcl gcl-tk $(DESTDIR)$(INFO_DIR)/../doc
-	-cp *dvi $(DESTDIR)$(INFO_DIR)/../doc
+	mkdir -p $(DESTDIR)$(INFO_DIR)/../doc
+	cp -a gcl-si_html gcl_html gcl-tk_html $(DESTDIR)$(INFO_DIR)/../doc
+#	cp *dvi $(DESTDIR)$(INFO_DIR)/../doc
 
 FILE=gcl-si.texi
 srcs:
--- gcl27-2.7.0.orig/lsp/gcl_fle.lsp
+++ gcl27-2.7.0/lsp/gcl_fle.lsp
@@ -71,10 +71,11 @@
 	 (ss  (if (stringp fas) (open-fasd (make-string-input-stream fas) :input 'eof nil) fas))
 	 (out (if (vectorp ss) (read-fasd-top ss) ss))
 	 (es  (when (eq (car out) 'lambda-closure) (cadr out)))
-	 (env (when es (function-env fun 0))));(*object (c-function-env fun) 0 nil nil)
+	 (env (when es (function-env fun 0))))
     (when env
-;      (assert (= (length env) (length es))) ;FIXME closure var order
-      (setf (cadr out) (mapcar (lambda (x) (list (pop x) (nth (- (length es) (car x)) env))) es)))
+      (setq out (list* (car out)
+		       (mapcar (lambda (x) (list (pop x) (nth (- (length es) (car x)) env))) es)
+		       (cddr out))))
     (when (vectorp ss)
       (close-fasd ss))
     out))
--- gcl27-2.7.0.orig/lsp/gcl_mislib.lsp
+++ gcl27-2.7.0/lsp/gcl_mislib.lsp
@@ -223,31 +223,6 @@
     (heaprep))
   (values))
 
-
-(defvar *call-stack* nil)
-(defvar *prof-list* nil)
-(defvar *profiling* nil)
-(defun in-call (sym)
-  (when *profiling*
-    (push (cons sym (gettimeofday)) *call-stack*)))
-(defun out-call (tm)
-  (when *call-stack*
-    (let* ((r (pop *call-stack*))
-	   (tm (- tm (cdr r)))
-	   (e (car (member (caar *call-stack*) (pushnew (list (caar *call-stack*)) *prof-list* :key 'car) :key 'car)))
-	   (f (car (member (car r) (pushnew (list* (car r) 0 0) (cdr e) :key 'car) :key 'car))))
-      (setf (cadr f) (+ tm (cadr f)) (cddr f) (1+ (cddr f))))))
-(defun prof (v)
-  (print-prof)
-  (setq *call-stack* nil *prof-list* nil *profiling* v))
-(defun print-prof nil
-  (dolist (l *prof-list*)
-    (setf (cdr l) (sort (cdr l) (lambda (x y) (> (cadr x) (cadr y))))))
-  (setq *prof-list* (sort *prof-list* (lambda (x y) (> (reduce (lambda (y x) (+ y (cadr x))) (cdr x) :initial-value 0)
-						       (reduce (lambda (y x) (+ y (cadr x))) (cdr y) :initial-value 0)))))
-  (print *prof-list*))
-
-
 (defun gprof-output (symtab gmon)
   (with-open-file
      (s (format nil "|gprof -S '~a' '~a' '~a'" symtab (kcl-self) gmon))
--- gcl27-2.7.0.orig/lsp/gcl_mnum.lsp
+++ gcl27-2.7.0/lsp/gcl_mnum.lsp
@@ -274,15 +274,15 @@
 
 
 (defdlfun (:fixnum "memcpy") :fixnum :fixnum :fixnum)
-(defun memcpy (a b c)
-  (declare (fixnum a b c))
-  (lit :fixnum "{fixnum f=1;f;}");(side-effects)
-  (|libc|:|memcpy| a b c))
+#.`(defun memcpy (a b c)
+     (declare (fixnum a b c))
+     (lit :fixnum "{fixnum f=1;f;}");(side-effects)
+     (,(mdlsym "memcpy") a b c))
 (declaim (inline memcpy))
 
 (defdlfun (:fixnum "memmove") :fixnum :fixnum :fixnum)
-(defun memmove (a b c)
-  (declare (fixnum a b c))
-  (lit :fixnum "{fixnum f=1;f;}");(side-effects)
-  (|libc|:|memmove| a b c))
+#.`(defun memmove (a b c)
+     (declare (fixnum a b c))
+     (lit :fixnum "{fixnum f=1;f;}");(side-effects)
+     (,(mdlsym "memmove") a b c))
 (declaim (inline memmove))
--- gcl27-2.7.0.orig/lsp/gcl_restart.lsp
+++ gcl27-2.7.0/lsp/gcl_restart.lsp
@@ -64,20 +64,19 @@
     restarts))
 
 (defun compute-restarts (&optional condition)
-  (remove-if-not (lambda (x) (condition-pass condition x)) (remove-duplicates (nconc (mapcar 'car *restarts*) (kcl-top-restarts)))))
+  (remove-if-not (lambda (x) (condition-pass condition x)) (nconc (mapcar 'car *restarts*) (kcl-top-restarts))))
 
 (defun find-restart (name &optional condition &aux (sn (symbolp name)))
   (car (member name (compute-restarts condition) :key (lambda (x) (if sn (restart-name x) x)))))
 
 (defun transform-keywords (&key report interactive test 
 				&aux rr (report (if (stringp report) `(lambda (s) (write-string ,report s)) report)))
-  (macrolet ((do-setf (x) 
+  (macrolet ((do-setf (x y)
 		      `(when ,x 
-			 (setf (getf rr ,(intern (concatenate 'string (symbol-name x) "-FUNCTION") :keyword))
-			       (list 'function ,x)))))
-	    (do-setf report)
-	    (do-setf interactive)
-	    (do-setf test)
+			 (setf (getf rr ,y) (list 'function ,x)))))
+	    (do-setf report :report-function)
+	    (do-setf interactive :interactive-function)
+	    (do-setf test :test-function)
 	    rr))
 
 (defun rewrite-restart-case-clause (r &aux (name (pop r))(ll (pop r)))
--- gcl27-2.7.0.orig/lsp/gcl_seqlib.lsp
+++ gcl27-2.7.0/lsp/gcl_seqlib.lsp
@@ -24,32 +24,6 @@
 (in-package :system)
 
 
-(eval-when
- (compile eval)
-
-  #-pre-gcl (load "../lsp/gcl_defseq.lsp")
-
-  (defmacro comp-key (key);FIXME
-    `(if (eq ,key #'identity) 0 1))
-
-  (defmacro do-key (key n x);FIXME
-    (let ((xx (sgen)))
-      `(let ((,xx ,x)) (case ,n (0 ,xx) (otherwise (funcall ,key ,xx))))))
-
- 
- (defmacro mrotatef (a b &aux (s (sgen "MRF-S"))) `(let ((,s ,a)) (setf ,a ,b ,b ,s)))
- 
- (defmacro raref (a seq i j l) 
-   `(if ,l 
-	(mrotatef (car (aref ,a ,i)) (car (aref ,a ,j)))
-      (set-array ,seq ,i ,seq ,j t)))
- 
- (defmacro garef (a seq i l) `(if ,l (car (aref ,a ,i)) (aref ,seq ,i)))
- 
- 
-)
-
-
 (defun length (x)
   (declare (optimize (safety 1)))
   (check-type x proper-sequence)
@@ -100,6 +74,10 @@
 	(set-array-n (make-array n :element-type (array-element-type s)) 0 s start n))))
 
 
+(eval-when
+ (compile eval)
+  #-pre-gcl (load "../lsp/gcl_defseq.lsp"))
+
 (defseq find ((item) s)
   (labels ((find-loop (i p)
 	     (unless (or (< i start) (>= i end) (when l (endp p)))
@@ -336,11 +314,21 @@
 			:start1 start1 :start2 (if p 0 i) :end1 end1 :end2 (if p n (+ i n)))
 	(return i)))))
 
+(eval-when (compile eval)
+
+  (defmacro mrotatef (a b &aux (s (sgen "MRF-S"))) `(let ((,s ,a)) (setf ,a ,b ,b ,s)))
+
+  (defmacro raref (a seq i j l)
+    `(if ,l
+	 (mrotatef (car (aref ,a ,i)) (car (aref ,a ,j)))
+	 (set-array ,seq ,i ,seq ,j t)))
+
+  (defmacro garef (a seq i l) `(if ,l (car (aref ,a ,i)) (aref ,seq ,i))))
+
 (defun sort (seq pred &key (key 'identity))
   (declare (optimize (safety 1)))
   (check-type seq proper-sequence)
-  (let* ((k (comp-key key))
-	 (ll (length seq))
+  (let* ((ll (length seq))
 	 (list (listp seq))
 	 (a (when list (make-array ll))))
     (when list
@@ -351,13 +339,15 @@
 	  (declare (seqind ls fi))
 	  (do nil ((>= fi (1- ls)))
 	    (let* ((spi (+ fi (random (- ls fi))))
-		   (sp (do-key key k (garef a seq spi list))))
+		   (sp (garef a seq spi list))
+		   (sp (if key (funcall key sp) sp)))
 	      (raref a seq fi spi list)
 	      (do ((lf fi) (rt ls)) ((>= lf rt))
 		(declare (seqind lf rt));FIXME
 		(do ((q t)) 
 		    ((or (>= (if q (incf lf) lf) (if q rt (decf rt)))
-			 (let ((f (do-key key k (garef a seq (if q lf rt) list))))
+			 (let* ((f (garef a seq (if q lf rt) list))
+				(f (if key (funcall key f) f)))
 			   (and (not (funcall pred (if q f sp) (if q sp f)))
 				(setq q (not q)))))))
 		(let* ((r (< lf rt))
@@ -377,35 +367,17 @@
 		  (push ns ii) (push ns1 ii))
 		(setq ls nls fi nfi))))))))
 
-(defun list-merge-sort (l pred key k)
-
-  (let* ((ll (length l)))
-    (if (< ll 2) l
-      (let* ((i (ash ll -1))
-	     (lf l)
-	     (l1 (nthcdr (1- i) l))
-	     (rt (prog1 (cdr l1) (rplacd l1 nil)))
-	     (lf (list-merge-sort lf pred key k))
-	     (rt (list-merge-sort rt pred key k)))
-	(do (l0 l1) ((not (and lf rt)) l0)
-	  (cond ((funcall pred (do-key key k (car rt)) (do-key key k (car lf)))
-		 (setq l1 (if l1 (cdr (rplacd l1 rt)) (setq l0 rt)) rt (cdr rt))
-		 (unless rt (rplacd l1 lf)))
-		(t (setq l1 (if l1 (cdr (rplacd l1 lf)) (setq l0 lf)) lf (cdr lf))
-		   (unless lf (rplacd l1 rt)))))))))
-
-
 
-(defun stable-sort (sequence predicate &key (key #'identity))
+(defun stable-sort (sequence predicate &key key)
   (declare (optimize (safety 1)))
   (check-type sequence proper-sequence)
   (typecase 
    sequence
-   (list (list-merge-sort sequence predicate key (comp-key key)))
+   (list (list-merge-sort sequence predicate key))
    (string (sort sequence predicate :key key))
    (bit-vector (sort sequence predicate :key key))
    (otherwise 
-    (coerce (list-merge-sort (coerce sequence 'list) predicate key (comp-key key))
+    (coerce (list-merge-sort (coerce sequence 'list) predicate key)
 	    (seqtype sequence)))))
 
 (eval-when (compile eval)
--- gcl27-2.7.0.orig/lsp/gcl_top.lsp
+++ gcl27-2.7.0/lsp/gcl_top.lsp
@@ -177,12 +177,12 @@
     (dolist (l '(:unexec :bfd :readline :xgcl))
       (when (member l *features*)
 	(push l gpled-modules)))
-    (format nil "GCL (GNU Common Lisp)  ~a.~a.~a ~a  ~a  ~a~%~a~%~a ~a~%~a~%~a~%~%~a~%" 
-	    *gcl-major-version* *gcl-minor-version* *gcl-extra-version*
+    (format nil "GCL (GNU Common Lisp)  ~a.~a.~a ~a  ~a  ~a  git: ~a~%~a~%~a ~a~%~a~%~a~%~%~a~%"
+	    *gcl-major-version* *gcl-minor-version* *gcl-extra-version* *gcl-release-date*
 	    (if (member :ansi-cl *features*) "ANSI" "CLtL1")
 	    (if (member :gprof *features*) "profiling" "")
-	    (si::gcl-compile-time)
-	    "Source License: LGPL(gcl,gmp,pargcl), GPL(unexec,bfd,xgcl)"
+	    *gcl-git-tag*
+	    "Source License: LGPL(gcl,gmp), GPL(unexec,bfd,xgcl)"
 	    "Binary License: "
 	    (if gpled-modules (format nil "GPL due to GPL'ed components: ~a" gpled-modules)
 	      "LGPL")
--- gcl27-2.7.0.orig/lsp/gcl_type.lsp
+++ gcl27-2.7.0/lsp/gcl_type.lsp
@@ -84,6 +84,9 @@
 
 (defun make-btp (&optional (i 0)) (make-vector 'bit +btp-length+ nil nil nil 0 nil i))
 
+(eval-when (compile eval)
+  (defmacro mbtp-ltv nil `(load-time-value (make-btp))))
+
 (deftype btp nil '(simple-array bit (#.+btp-length+)))
 
 (defun btp-and (x y z)
@@ -153,13 +156,12 @@
 	      ((unless (eql d -1) (ntp-and?c2-nil-p (cadr a) nz nil))
 	       (setf (sbit m i) 1)))))))
 
-(let ((p1 (make-btp))(p2 (make-btp)))
-  (defun tp-mask (m1 x1 &optional (m2 nil m2p)(x2 nil x2p))
+(defun tp-mask (m1 x1 &optional m2 (x2 nil x2p)
+		&aux (p1 (mbtp-ltv))(p2 (mbtp-ltv)))
     (btp-xor m1 x1 p1)
     (if x2p
 	(btp-and p1 (btp-xor m2 x2 p2) p1)
-      p1)))
-
+      p1))
 
 (defun atomic-type (tp)
   (when (consp tp)
@@ -279,11 +281,10 @@
 
 (defvar *atomic-type-hash* (make-hash-table :test 'eql))
 
-(let ((package-list (mapcar 'find-package '(:si :cl :keyword))))
-  (defun hashable-atomp (thing)
-    (cond ((fixnump thing))
-	  ((symbolp thing)
-	   (member (symbol-package thing) package-list)))))
+(defun hashable-atomp (thing &aux (pl (load-time-value (mapcar 'find-package '(:si :cl :keyword)))))
+  (cond ((fixnump thing))
+	((symbolp thing)
+	 (member (symbol-package thing) pl))))
 
 (defun object-tp (x &aux (h (hashable-atomp x)))
   (multiple-value-bind
@@ -294,27 +295,27 @@
        z))))
 
 
-(let ((m (make-btp))(x (make-btp)))
-  (defun comp-tp0 (type &aux (z (nprocess-type (normalize-type type))))
+(defun comp-tp0 (type &aux (z (nprocess-type (normalize-type type)))
+			(m (mbtp-ltv))(x (mbtp-ltv)))
 
-    (when *cmp-verbose* (print (list 'computing type)))
+  (when *cmp-verbose* (print (list 'computing type)))
 
-    (btp-xor m m m)
-    (btp-xor x x x)
+  (btp-xor m m m)
+  (btp-xor x x x)
 
-    (when (cadr z)
-      (btp-not m m)
-      (btp-not x x))
+  (when (cadr z)
+    (btp-not m m)
+    (btp-not x x))
 
-    (if (caddr z)
-	(if (cadr z) (btp-not m m) (btp-not x x))
+  (if (caddr z)
+      (if (cadr z) (btp-not m m) (btp-not x x))
       (dolist (k (car z))
 	(let ((a (cdr (assoc (car k) *k-bv*))))
 	  (if (cadr z)
 	      (btp-andc2 m a m)
-	    (btp-ior x a x)))))
+	      (btp-ior x a x)))))
 
-    (copy-tp x m (new-tp4 (tp-mask m x) x m 0 z) 0)))
+  (copy-tp x m (new-tp4 (tp-mask m x) x m 0 z) 0))
 
 (defvar *typep-defined* nil)
 
@@ -339,9 +340,9 @@
 (defun btp-type1 (x)
   (car (nreconstruct-type (btp-type2 x))))
 
-(let ((nn (make-btp)))
-  (defun btp-type (x &aux (n (>= (btp-count x) #.(ash +btp-length+ -1))))
-    (if n `(not ,(btp-type1 (btp-not x nn))) (btp-type1 x))))
+(defun btp-type (x &aux (n (>= (btp-count x) #.(ash +btp-length+ -1)))
+		     (nn (mbtp-ltv)))
+  (if n `(not ,(btp-type1 (btp-not x nn))) (btp-type1 x)))
 
 ;(defun btp-type (x) (btp-type1 x))
 
@@ -376,26 +377,27 @@
 		`((,i ,(cons (cadr x) (caddr x))))))
 	    +btp-types+)))
 
-(defun list-merge-sort1 (l pred key)
+(defun list-merge-sort (l pred key)
 
-  (let* ((ll (length l)))
-    (if (< ll 2) l
-      (let* ((i (ash ll -1))
-	     (lf l)
-	     (l1 (nthcdr (1- i) l))
-	     (rt (prog1 (cdr l1) (rplacd l1 nil)))
-	     (lf (list-merge-sort1 lf pred key))
-	     (rt (list-merge-sort1 rt pred key)))
-	(do (l0 l1) ((not (and lf rt)) l0)
-	  (cond ((funcall pred (funcall key (car rt)) (funcall key (car lf)))
-		 (setq l1 (if l1 (cdr (rplacd l1 rt)) (setq l0 rt)) rt (cdr rt))
-		 (unless rt (rplacd l1 lf)))
-		(t (setq l1 (if l1 (cdr (rplacd l1 lf)) (setq l0 lf)) lf (cdr lf))
-		   (unless lf (rplacd l1 rt)))))))))
+  (labels ((ky (x) (if key (funcall key x) x)))
+    (let* ((ll (length l)))
+      (if (< ll 2) l
+	  (let* ((i (ash ll -1))
+		 (lf l)
+		 (l1 (nthcdr (1- i) l))
+		 (rt (prog1 (cdr l1) (rplacd l1 nil)))
+		 (lf (list-merge-sort lf pred key))
+		 (rt (list-merge-sort rt pred key)))
+	    (do (l0 l1) ((not (and lf rt)) l0)
+	      (cond ((funcall pred (ky (car rt)) (ky (car lf)))
+		     (setq l1 (if l1 (cdr (rplacd l1 rt)) (setq l0 rt)) rt (cdr rt))
+		     (unless rt (rplacd l1 lf)))
+		    (t (setq l1 (if l1 (cdr (rplacd l1 lf)) (setq l0 lf)) lf (cdr lf))
+		       (unless lf (rplacd l1 rt))))))))))
 
 
-(defvar *btp-bnds<* (list-merge-sort1 (copy-list *btp-bnds*) (lambda (x y) (eq (max-bnd x y '<) x)) 'caadr))
-(defvar *btp-bnds>* (list-merge-sort1 (copy-list *btp-bnds*) (lambda (x y) (eq (max-bnd x y '>) x)) 'cdadr))
+(defvar *btp-bnds<* (list-merge-sort (copy-list *btp-bnds*) (lambda (x y) (eq (max-bnd x y '<) x)) #'caadr))
+(defvar *btp-bnds>* (list-merge-sort (copy-list *btp-bnds*) (lambda (x y) (eq (max-bnd x y '>) x)) #'cdadr))
 
 (defun btp-bnds< (x)
   (dolist (l *btp-bnds<*)
@@ -444,29 +446,27 @@
   (if (< (btp-count x) #.(ash +btp-length+ -1)) (btp-type2 x)
     (ntp-not (btp-type2 (btp-not x x)))))
 
-(let ((tmp (make-btp)))
-  (defun new-tp1 (op t1 t2 xp mp)
-    (cond
-     ((atom t1)
-      (unless (btp-equal xp mp)
-	(if (eq op 'and)
-	    (ntp-and (caddr t2) (min-btp-type2 (btp-orc2 t1 (xtp t2) tmp)))
-	  (ntp-or (caddr t2) (min-btp-type2 (btp-andc2 t1 (mtp t2) tmp))))))
-     ((atom t2) (new-tp1 op t2 t1 xp mp))
-     ((new-tp4 (tp-mask (pop t1) (pop t1) (pop t2) (pop t2)) xp mp (if (eq op 'and) -1 1)
-	       (ntp-op op (car t1) (car t2)))))))
-
-
-(let ((xp (make-btp))(mp (make-btp)))
-  (defun cmp-tp-and (t1 t2)
-    (btp-and (xtp t1) (xtp t2) xp)
-    (cond ((when (atom t1) (btp-equal xp (xtp t2))) t2)
-	  ((when (atom t2) (btp-equal xp (xtp t1))) t1)
-	  ((and (atom t1) (atom t2)) (copy-tp xp xp nil -1))
-	  ((btp-and (mtp t1) (mtp t2) mp)
-	   (cond ((when (atom t1) (btp-equal mp t1)) t1)
-		 ((when (atom t2) (btp-equal mp t2)) t2)
-		 ((copy-tp xp mp (new-tp1 'and t1 t2 xp mp) -1)))))))
+(defun new-tp1 (op t1 t2 xp mp &aux (tmp (mbtp-ltv)))
+  (cond
+    ((atom t1)
+     (unless (btp-equal xp mp)
+       (if (eq op 'and)
+	   (ntp-and (caddr t2) (min-btp-type2 (btp-orc2 t1 (xtp t2) tmp)))
+	   (ntp-or (caddr t2) (min-btp-type2 (btp-andc2 t1 (mtp t2) tmp))))))
+    ((atom t2) (new-tp1 op t2 t1 xp mp))
+    ((new-tp4 (tp-mask (pop t1) (pop t1) (pop t2) (pop t2)) xp mp (if (eq op 'and) -1 1)
+	      (ntp-op op (car t1) (car t2))))))
+
+
+(defun cmp-tp-and (t1 t2 &aux (xp (mbtp-ltv))(mp (mbtp-ltv)))
+  (btp-and (xtp t1) (xtp t2) xp)
+  (cond ((when (atom t1) (btp-equal xp (xtp t2))) t2)
+	((when (atom t2) (btp-equal xp (xtp t1))) t1)
+	((and (atom t1) (atom t2)) (copy-tp xp xp nil -1))
+	((btp-and (mtp t1) (mtp t2) mp)
+	 (cond ((when (atom t1) (btp-equal mp t1)) t1)
+	       ((when (atom t2) (btp-equal mp t2)) t2)
+	       ((copy-tp xp mp (new-tp1 'and t1 t2 xp mp) -1))))))
 
 (defun tp-and (t1 t2)
   (when (and t1 t2)
@@ -474,16 +474,15 @@
 	  ((cmp-tp-and t1 t2)))))
 
 
-(let ((xp (make-btp))(mp (make-btp)))
-  (defun cmp-tp-or (t1 t2)
-    (btp-ior (mtp t1) (mtp t2) mp)
-    (cond ((when (atom t1) (btp-equal mp (mtp t2))) t2)
-	  ((when (atom t2) (btp-equal mp (mtp t1))) t1)
-	  ((and (atom t1) (atom t2)) (copy-tp mp mp nil 1))
-	  ((btp-ior (xtp t1) (xtp t2) xp)
-	   (cond ((when (atom t1) (btp-equal xp t1)) t1)
-		 ((when (atom t2) (btp-equal xp t2)) t2)
-		 ((copy-tp xp mp (new-tp1 'or t1 t2 xp mp) 1)))))))
+(defun cmp-tp-or (t1 t2 &aux (xp (mbtp-ltv))(mp (mbtp-ltv)))
+  (btp-ior (mtp t1) (mtp t2) mp)
+  (cond ((when (atom t1) (btp-equal mp (mtp t2))) t2)
+	((when (atom t2) (btp-equal mp (mtp t1))) t1)
+	((and (atom t1) (atom t2)) (copy-tp mp mp nil 1))
+	((btp-ior (xtp t1) (xtp t2) xp)
+	 (cond ((when (atom t1) (btp-equal xp t1)) t1)
+	       ((when (atom t2) (btp-equal xp t2)) t2)
+	       ((copy-tp xp mp (new-tp1 'or t1 t2 xp mp) 1))))))
 
 (defun tp-or (t1 t2)
   (cond ((eq t1 t))
@@ -504,14 +503,13 @@
 	(cmp-tp-not tp))))
 
 
-(let ((p1 (make-btp))(p2 (make-btp)))
-  (defun tp<= (t1 t2)
-    (cond ((eq t2 t))
-	  ((not t1))
-	  ((or (not t2) (eq t1 t)) nil)
-	  ((btp-equal *nil-tp* (btp-andc2 (xtp t1) (mtp t2) p1)))
-	  ((btp-equal *nil-tp* (btp-andc2 p1 (btp-andc2 (xtp t2) (mtp t1) p2) p1))
-	   (ntp-subtp (caddr t1) (caddr t2))))))
+(defun tp<= (t1 t2 &aux (p1 (mbtp-ltv))(p2 (mbtp-ltv)))
+  (cond ((eq t2 t))
+	((not t1))
+	((or (not t2) (eq t1 t)) nil)
+	((btp-equal *nil-tp* (btp-andc2 (xtp t1) (mtp t2) p1)))
+	((btp-equal *nil-tp* (btp-andc2 p1 (btp-andc2 (xtp t2) (mtp t1) p2) p1))
+	 (ntp-subtp (caddr t1) (caddr t2)))))
 
 (defun tp>= (t1 t2) (tp<= t2 t1))
 
@@ -528,7 +526,7 @@
 (defvar *intindiv-hash* (make-hash-table :test 'equal))
 
 (defun uniq-integer-individuals-type (type)
-  (let ((type `(,(car type) ,@(list-merge-sort1 (copy-list (cdr type)) '< 'identity))))
+  (let ((type `(,(car type) ,@(list-merge-sort (copy-list (cdr type)) #'< nil))))
     (or (gethash type *intindiv-hash*)
 	(setf (gethash type *intindiv-hash*) type))))
 
@@ -716,7 +714,9 @@
 
 (defun best-type-of (c)
   (let* ((r (lreduce 'set-difference c :key 'car :initial-value +kt+))
-	 (tps (nconc (mapcar 'car c) (list r))))
+	 (tps (nconc (mapcar 'car c) (list r)))
+	 (rs +rs+))
+    (declare (special rs));FIXME to prevent unroll of +rs+
     (or (caar (member-if (lambda (x)
 			   (let* ((f (pop x))
 				  (z (mapcan
@@ -725,8 +725,8 @@
 					 (mapcar (lambda (z) (cdr (assoc z x))) y)))
 				      tps)))
 			     (eq z (lremove-duplicates z))))
-			 +rs+))
-	(caar +rs+))))
+			 rs))
+	(caar rs))))
 
 (defun calist2 (a)
   (lreduce (lambda (y x &aux (z (rassoc (cdr x) y :test 'equal)));;aggregate identical subtypes, e.g. undecidable
@@ -782,15 +782,15 @@
 		   ((+ 1 (cons-count (car f)) (cons-count (cdr f))))))
 	   (group-useful-types (tp y)
 	     (cons tp
-		   (list-merge-sort1
+		   (list-merge-sort
 		    (mapcar (lambda (z) (group-useful-types (car z) (cdr z)))
 			    (lreduce (lambda (y x)
 				      (if (member-if (lambda (z) (member (car x) (cdr z))) y) y (cons x y)))
-				    (list-merge-sort1
+				    (list-merge-sort
 				     (mapcar (lambda (z) (cons z (lremove z (lremove-if-not (lambda (x) (type>= z x)) y)))) y)
-				     '> 'length)
+				     #'> #'length)
 				    :initial-value nil))
-		    '> #'cons-count))))
+		    #'> #'cons-count))))
     (cdr (group-useful-types t (mapcan (lambda (x &aux (x (cdr x)))
 					 (when x (unless (eq x t) (list x))))
 				       +useful-types-alist+)))))
--- gcl27-2.7.0.orig/lsp/gcl_typecase.lsp
+++ gcl27-2.7.0/lsp/gcl_typecase.lsp
@@ -1,20 +1,20 @@
 (in-package :si)
 
-(let ((sym (gensym "TYPECASE")))
-  (defmacro typecase (keyform &rest clauses &aux (key (if (symbolp keyform) keyform sym)))
-    (declare (optimize (safety 2)))
-    (labels ((l (x &aux (c (pop x))(tp (pop c))(fm (if (cdr c) (cons 'progn c) (car c)))(y (when x (l x))))
-		(if (or (eq tp t) (eq tp 'otherwise)) fm `(if (typep ,key ',tp) ,fm ,y))))
-	    (let ((x (l clauses)))
-	      (if (eq key keyform) x `(let ((,key ,keyform)) ,x))))))
-
-(let ((sym (gensym "ETYPECASE")))
-  (defmacro etypecase (keyform &rest clauses &aux (key (if (symbolp keyform) keyform sym)))
-    (declare (optimize (safety 2)))
-    (let* ((x `((t (error 'type-error :datum ,key :expected-type '(or ,@(mapcar 'car clauses))))))
-	   (x `(typecase ,key ,@(append clauses x))))
+(defmacro typecase (keyform &rest clauses
+		    &aux (sym (sgen "TYPECASE"))(key (if (symbolp keyform) keyform sym)))
+  (declare (optimize (safety 2)))
+  (labels ((l (x &aux (c (pop x))(tp (pop c))(fm (if (cdr c) (cons 'progn c) (car c)))(y (when x (l x))))
+	     (if (or (eq tp t) (eq tp 'otherwise)) fm `(if (typep ,key ',tp) ,fm ,y))))
+    (let ((x (l clauses)))
       (if (eq key keyform) x `(let ((,key ,keyform)) ,x)))))
 
+(defmacro etypecase (keyform &rest clauses
+		     &aux (sym (sgen "ETYPECASE"))(key (if (symbolp keyform) keyform sym)))
+  (declare (optimize (safety 2)))
+  (let* ((x `((t (error 'type-error :datum ,key :expected-type '(or ,@(mapcar 'car clauses))))))
+	 (x `(typecase ,key ,@(append clauses x))))
+    (if (eq key keyform) x `(let ((,key ,keyform)) ,x))))
+
 (defmacro infer-tp (x y z) (declare (ignore x y)) z)
 
 (defun mib (o l &optional f)
--- gcl27-2.7.0.orig/makefile
+++ gcl27-2.7.0/makefile
@@ -218,7 +218,7 @@ command:
 merge:
 	$(CC) -o merge merge.c
 
-LISP_LIB=clcs/package.lisp clcs/myload1.lisp  cmpnew/gcl_collectfn.o cmpnew/gcl_collectfn.lsp xgcl-2/sysdef.lisp xgcl-2/gcl_dwtest.lsp xgcl-2/gcl_dwtestcases.lsp lsp/gcl_gprof.lsp lsp/gcl_info.o lsp/gcl_profile.lsp lsp/gcl_export.lsp lsp/gcl_autoload.lsp cmpnew/gcl_cmpmain.lsp cmpnew/gcl_cmpopt.lsp cmpnew/gcl_lfun_list.lsp lsp/gcl_auto_new.lsp h/cmpinclude.h  unixport/init_raw.lsp $(shell ls -1 unixport/*.a) gcl-tk/tk-package.lsp $(TK_LISP_LIB) $(RL_LIB) $(FIRST_FILE) $(LAST_FILE) $(addsuffix /sys-proclaim.lisp,lsp cmpnew pcl clcs) unixport/gcl.script unixport/libboot.so lsp/gcl_defmacro.lsp lsp/gcl_evalmacros.lsp lsp/gcl_top.lsp lsp/gcl_module.lsp xgcl-2/sysdef.lisp pcl/package.lisp
+LISP_LIB=cmpnew/gcl_collectfn.o xgcl-2/sysdef.lisp xgcl-2/gcl_dwtest.lsp xgcl-2/gcl_dwtestcases.lsp lsp/gcl_export.lsp lsp/gcl_autoload.lsp cmpnew/gcl_cmpopt.lsp cmpnew/gcl_lfun_list.lsp lsp/gcl_auto_new.lsp h/cmpinclude.h  unixport/init_raw.lsp $(shell ls -1 unixport/*.a) gcl-tk/tk-package.lsp $(TK_LISP_LIB) $(RL_LIB) $(FIRST_FILE) $(LAST_FILE) $(addsuffix /sys-proclaim.lisp,lsp cmpnew pcl clcs xgcl-2) unixport/gcl.script unixport/libboot.so lsp/gcl_defmacro.lsp lsp/gcl_evalmacros.lsp lsp/gcl_top.lsp lsp/gcl_module.lsp xgcl-2/sysdef.lisp pcl/package.lisp clcs/package.lisp
 
 install-command:
 	rm -f bin/$(BINSCPT)
@@ -311,7 +311,7 @@ install_unix:
 #	echo '(load "../tkl.o")(TK::GET-AUTOLOADS (directory "*.lisp"))' | ../../$(PORTDIR)/$(FLISP)$(EXE)) ; fi
 	if test "$(EMACS_SITE_LISP)" != "" ; then (cd elisp ; $(MAKE) install DESTDIR=$(DESTDIR)) ; fi
 	if test "$(INFO_DIR)" != "unknown"; then (cd info ; $(MAKE) ; $(MAKE) install DESTDIR=$(DESTDIR)) ; fi
-	[ "$(X_LIBS)" == "" ] || if test "$(INFO_DIR)" != "unknown"; then (cd xgcl-2 ; $(MAKE) install LISP=../unixport/saved_pre_gcl DESTDIR=$(DESTDIR)) ; fi
+	[ "$(X_LIBS)" == "" ] || if test "$(INFO_DIR)" != "unknown"; then (cd xgcl-2 ; $(MAKE) install LISP=$$(pwd)/../unixport/saved_pre_gcl DESTDIR=$(DESTDIR)) ; fi
 
 install_windows:
 	mkdir -p $(DESTDIR)$(prefix)/lib 
--- /dev/null
+++ gcl27-2.7.0/mod/gcl_ansi_io.c
@@ -0,0 +1,6094 @@
+
+#include "cmpinclude.h"
+#include "gcl_ansi_io.h"
+void init_gcl_ansi_io(){do_init((void *)VV);}
+/*	local entry for function SYSTEM::IN-PACKAGE-INTERNAL	*/
+
+static object LI1__IN_PACKAGE_INTERNAL__ansi_io(VOL object V2)
+{	 VMB1 VMS1 VMV1
+	goto T2;
+T2:;
+	{VOL object V3;
+	VOL object V4;
+	V3= (V2);
+	V4= (fcall.fun=((object)VV[0])->s.s_gfdef,/* COMMON-LISP::FIND-PACKAGE */(*LnkLI36)((V3)));
+	{VOL object V5;
+	if(((V4))==Cnil){
+	goto T6;
+	}
+	V6= (V4);
+	(((object)VV[1])->s.s_dbind)= (V6);
+	V5= (((object)VV[1])->s.s_dbind);
+	goto T5;
+	
+	goto T6;
+T6:;
+	V5= Cnil;
+	goto T5;
+T5:;
+	if(((V5))==Cnil){
+	goto T10;
+	}
+	{object V7 = (V5);
+	VMR1(V7);}
+	goto T10;
+T10:;
+	{VOL object V8;
+	
+	base[0]=make_cons(Cnil,Cnil);
+	V9= list(2,((object)VV[3]),(V3));
+	V8= (fcall.valp=(fixnum)0,fcall.argd=2,/* SYSTEM::PROCESS-ERROR */(*LnkLI37)(((object)VV[4]),(V9)));
+	bds_bind(((object)VV[5]),(V8));
+	base[1]=alloc_frame_id();
+	
+	base[1]=make_cons(base[1],base[0]);
+	frs_push(FRS_CATCH,(base[1]->c.c_car));
+	if(nlj_active){
+	nlj_active=FALSE;
+	if(eql(nlj_tag,((object)VV[6]))) {
+	   
+	vs_top=sup;
+	   goto T16;
+	
+	}
+	FEerror("The GO tag ~s is not established.",1,nlj_tag);
+	}
+	V10= fSinit_function(((object)VV[8]),(void *)LC8__LAMBDA__ansi_io,Cdata,base[1],-1,1,397248);
+	V11= (((object)VV[9])->s.s_gfdef);
+	V12= fSinit_function(((object)VV[10]),(void *)LC9__LAMBDA__ansi_io,Cdata,base[1],-1,0,65);
+	V13= (fcall.argd=8,/* SYSTEM::MAKE-RESTART */(*LnkLI38)(((object)VV[11]),((object)VV[12]),((object)VV[13]),(V10),((object)VV[14]),(V11),((object)VV[15]),(V12)));
+	V14= make_cons((V13),(((object)VV[5])->s.s_dbind));
+	base[2]= make_cons((V14),(((object)VV[16])->s.s_dbind));
+	bds_bind(((object)VV[16]),base[2]);
+	(void)((fcall.argd=1,/* COMMON-LISP::ERROR */(*LnkLI39)((V8))));
+	frs_pop();
+	bds_unwind1;
+	bds_unwind1;
+	goto T13;
+	
+	goto T16;
+T16:;
+	{object V15;
+	object V16;
+	V15= (base[0]->c.c_car);
+	if(((V15))==Cnil){
+	goto T23;
+	}
+	{object V17;
+	V17= V15->c.c_car;
+	V15= V15->c.c_cdr;
+	V16= (V17);
+	goto T22;
+	}
+	goto T23;
+T23:;
+	V18= make_cons(((object)VV[18]),Cnil);
+	V16= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI39)(((object)VV[19]),((object)VV[20]),((object)VV[21]),((object)VV[22]),(V18)));
+	goto T22;
+T22:;
+	if(((V15))==Cnil){
+	goto T33;
+	}
+	goto T32;
+	
+	goto T33;
+T33:;
+	goto T30;
+	
+	goto T32;
+T32:;
+	{object V20;
+	V20= (V15)->c.c_car;
+	V15= (V15)->c.c_cdr;
+	V19= (V20);}
+	V23= make_cons((V19),Cnil);
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI39)(((object)VV[19]),((object)VV[23]),((object)VV[24]),((object)VV[25]),(V23))));
+	goto T29;
+	
+	goto T30;
+T30:;
+	goto T29;
+T29:;
+	V3= (V16);
+	frs_pop();
+	bds_unwind1;
+	goto T13;
+	}}
+	goto T13;
+T13:;
+	{object V24;
+	V24= (V3);
+	V2= (V24);
+	goto T2;
+	}}}
+}
+/*	local function LAMBDA	*/
+
+static object LC9__LAMBDA__ansi_io(object V26)
+{	
+	VMB2 VMS2 VMV2
+	vs_check;
+	{object V27 = (fcall.fun=((object)VV[26])->s.s_gfdef,fcall.argd=2,/* COMMON-LISP::FORMAT */(*LnkLI40)((V26),((object)VV[27])));
+	VMR2(V27);}
+	#undef base0
+}
+/*	local function LAMBDA	*/
+
+static object LC8__LAMBDA__ansi_io(object V29,...)
+{	
+	VMB3 VMS3 VMV3
+	va_list ap;
+	va_start(ap,V29);
+	vs_check;
+	{object V30;
+	fixnum V31;
+	register object V32;
+	register object V33;
+	int8_t V34;
+	register int8_t V35;
+	object V36;
+	V30= fcall.fun;
+	#undef base0
+	#define base0 (V30)->fun.fun_env
+	;
+	V31= fcall.valp;
+	V32= Ct;
+	V33= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V33))==Cnil){
+	goto T46;
+	}
+	V34= -((char)fcall.argd);
+	goto T45;
+	
+	goto T46;
+T46:;
+	V34= fcall.argd;
+	goto T45;
+T45:;
+	V35= (V34)-(0);
+	{register object V37;
+	register object V38;
+	object V39;
+	V37= Cnil;
+	V38= Cnil;
+	V39= Cnil;
+	goto T52;
+T52:;
+	if(!((0)>=(V35))){
+	goto T57;
+	}
+	goto T54;
+	
+	goto T57;
+T57:;
+	V35= (V35)-(1);
+	if(((V32))==Cnil){
+	goto T63;
+	}
+	V32= Cnil;
+	V38= (V29);
+	goto T60;
+	
+	goto T63;
+T63:;
+	V38= va_arg(ap,object);
+	goto T60;
+T60:;
+	if(((V33))==Cnil){
+	goto T73;
+	}
+	if(!((V35)==(0))){
+	goto T70;
+	}
+	goto T72;
+	
+	goto T73;
+T73:;
+	goto T70;
+	
+	goto T72;
+T72:;
+	goto T69;
+	
+	goto T70;
+T70:;
+	V38= make_cons((V38),Cnil);
+	goto T69;
+T69:;
+	if(((V37))==Cnil){
+	goto T78;
+	}
+	(void)((((V37))->c.c_cdr=((V38)),((V37))));
+	V37= (V38);
+	goto T77;
+	
+	goto T78;
+T78:;
+	V39= (V38);
+	V37= (V39);
+	goto T77;
+T77:;
+	goto T52;
+	
+	goto T54;
+T54:;
+	V36= (V39);
+	goto T50;
+	}
+	goto T50;
+T50:;
+	(base0[1])->c.c_car= (V36);
+	{frame_ptr fr;
+	fr=frs_sch((base0[0])->c.c_car);
+	if(fr==NULL)FEerror("The GO tag ~s is missing.",1,((object)VV[6]));
+	vs_base=vs_top;
+	unwind(fr,((object)VV[6]));}
+	{object V40;
+	V40= Cnil;
+	VMRV3(V40,0);}}
+	#undef base0
+	va_end(ap);
+}
+/*	local entry for function COMMON-LISP::IN-PACKAGE	*/
+
+static object LI11__IN_PACKAGE__ansi_io(object V43,object V44)
+{	 VMB4 VMS4 VMV4
+	{object V45;
+	object V46;
+	V45= V43->c.c_cdr;
+	if(((V45))==Cnil){
+	goto T88;
+	}
+	{object V47;
+	V47= V45->c.c_car;
+	V45= V45->c.c_cdr;
+	V46= (V47);
+	goto T87;
+	}
+	goto T88;
+T88:;
+	V48= make_cons(((object)VV[28]),Cnil);
+	V46= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI39)(((object)VV[19]),((object)VV[29]),((object)VV[21]),((object)VV[30]),(V48)));
+	goto T87;
+T87:;
+	if(((V45))==Cnil){
+	goto T98;
+	}
+	goto T97;
+	
+	goto T98;
+T98:;
+	goto T95;
+	
+	goto T97;
+T97:;
+	{object V50;
+	V50= (V45)->c.c_car;
+	V45= (V45)->c.c_cdr;
+	V49= (V50);}
+	V53= make_cons((V49),Cnil);
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI39)(((object)VV[19]),((object)VV[31]),((object)VV[24]),((object)VV[32]),(V53))));
+	goto T94;
+	
+	goto T95;
+T95:;
+	goto T94;
+T94:;
+	{object V54 = list(2,((object)VV[33]),list(2,((object)VV[34]),(V46)));
+	VMR4(V54);}}
+}
+/*	local entry for function SYSTEM::PPRINT-INSERT-CONDITIONAL-NEWLINES	*/
+
+static object LI12__PPRINT_INSERT_CONDITIONAL_NEWLINES__ansi_io(object V56)
+{	 VMB5 VMS5 VMV5
+	V57= (fcall.fun=((object)VV[35])->s.s_gfdef,fcall.argd=2,/* SYSTEM::STRING-MATCH */(*LnkLI41)(((object)VV[36]),(V56)));
+	if(!((V57)>=(0))){
+	goto T104;
+	}
+	{register object V58;
+	object V59;
+	object V60;
+	{fixnum V61;
+	{object V62;
+	V62= (((object)VV[37])->s.s_dbind);
+	{fixnum V63;
+	{fixnum V64;
+	{fixnum V65;
+	{fixnum V67;
+	{fixnum V68;
+	V68= ((fixnum)V62);
+	V67= ((uchar*)V68)[(fixnum)2];}
+	V66= (V67&(fixnum)1);}
+	if(!((V66)==(0))){
+	goto T115;
+	}
+	goto T112;
+	
+	goto T115;
+T115:;
+	{fixnum V69;
+	{fixnum V70;
+	V70= ((fixnum)V62);
+	V69= ((uint*)V70)[(fixnum)4];}
+	V65= (V69&(fixnum)268435455);
+	goto T111;
+	}
+	goto T112;
+T112:;
+	{fixnum V71;
+	{fixnum V72;
+	V72= ((fixnum)V62);
+	V71= ((uint*)V72)[(fixnum)1];}
+	V65= (V71>>(fixnum)4);}
+	goto T111;
+T111:;
+	V64= (V65>>(fixnum)1);}
+	{fixnum V73;
+	V73= (0)+(V64);
+	V63= V73;}}
+	{fixnum V74;
+	{fixnum V75;
+	V75= ((fixnum)V62);
+	V74= ((fixnum*)V75)[(fixnum)1];}
+	V61= ((fixnum*)V74)[V63];}}}
+	V76= tp2(V56);
+	if(!((V76)==(0))){
+	goto T130;
+	}
+	goto T129;
+	
+	goto T130;
+T130:;
+	goto T127;
+	
+	goto T129;
+T129:;
+	{object V77;
+	if(((V56))==Cnil){
+	goto T134;
+	}
+	V77= (V56);
+	goto T133;
+	
+	goto T134;
+T134:;
+	V77= Cnil;
+	goto T133;
+T133:;
+	{fixnum V79;
+	{fixnum V80;
+	V80= (V61)-(0);
+	V79= V80;}
+	if(((V77))==Cnil){
+	goto T140;
+	}
+	if(!((V79)<=(0))){
+	goto T146;
+	}
+	goto T145;
+	
+	goto T146;
+T146:;
+	goto T143;
+	
+	goto T145;
+T145:;
+	V78= (V77);
+	goto T137;
+	
+	goto T143;
+T143:;
+	{register object V81;
+	register fixnum V82;
+	V81= V77->c.c_cdr;
+	{fixnum V83;
+	V83= (V79)-(1);
+	V82= V83;}
+	goto T152;
+T152:;
+	if(!((V82)<=(0))){
+	goto T157;
+	}
+	goto T156;
+	
+	goto T157;
+T157:;
+	if(((V81))==Cnil){
+	goto T160;
+	}
+	goto T154;
+	
+	goto T160;
+T160:;
+	goto T156;
+T156:;
+	V78= (V81);
+	goto T137;
+	
+	goto T154;
+T154:;
+	{object V85;
+	fixnum V86;
+	V85= (V81)->c.c_cdr;
+	{fixnum V88;
+	V88= V82;
+	{fixnum V89;
+	V89= (V88)-(1);
+	V86= V89;}}
+	V81= (V85);
+	V82= V86;
+	goto T152;
+	}}
+	goto T140;
+T140:;
+	V78= Cnil;}
+	goto T137;
+T137:;
+	V58= (/* COMMON-LISP::LDIFF */(*LnkLI42)((V77),(V78)));
+	goto T107;
+	}
+	goto T127;
+T127:;
+	{fixnum V90;
+	fixnum V91;
+	V92= tp4(V56);
+	switch(V92){
+	case 8:
+	goto T176;
+T176:;
+	case 11:
+	goto T177;
+T177:;
+	case 13:
+	goto T178;
+T178:;
+	{fixnum V94;
+	{fixnum V95;
+	V95= ((fixnum)V56);
+	V94= ((uchar*)V95)[(fixnum)2];}
+	V93= (V94&(fixnum)1);}
+	if(!((V93)==(0))){
+	goto T180;
+	}
+	goto T171;
+	
+	goto T180;
+T180:;
+	goto T173;
+	
+	default:
+	goto T179;
+T179:;
+	goto T171;
+	}
+	goto T171;
+	
+	goto T173;
+T173:;
+	{fixnum V96;
+	{fixnum V97;
+	V97= ((fixnum)V56);
+	V96= ((uint*)V97)[(fixnum)4];}
+	V90= (V96&(fixnum)268435455);
+	goto T170;
+	}
+	goto T171;
+T171:;
+	{fixnum V98;
+	{fixnum V99;
+	V99= ((fixnum)V56);
+	V98= ((uint*)V99)[(fixnum)1];}
+	V90= (V98>>(fixnum)4);}
+	goto T170;
+T170:;
+	{fixnum V100;
+	if(!((V61)<(V90))){
+	goto T192;
+	}
+	V100= V61;
+	goto T191;
+	
+	goto T192;
+T192:;
+	V100= V90;
+	goto T191;
+T191:;
+	{fixnum V101;
+	V101= (V100)-(0);
+	V91= V101;}}
+	{object V102;
+	{object V103;
+	object V104;
+	V103= Cnil;
+	V104= (/* COMMON-LISP::ARRAY-ELEMENT-TYPE */(*LnkLI43)((V56)));
+	V103= (V104);
+	{object V105;
+	if(!(((V103))==(Ct))){
+	goto T202;
+	}
+	V105= (V103);
+	goto T201;
+	
+	goto T202;
+T202:;
+	if(!(((V103))==(((object)VV[40])))){
+	goto T205;
+	}
+	V105= (V103);
+	goto T201;
+	
+	goto T205;
+T205:;
+	if(!(((V103))==(((object)VV[41])))){
+	goto T208;
+	}
+	V105= (V103);
+	goto T201;
+	
+	goto T208;
+T208:;
+	if(!(((V103))==(((object)VV[42])))){
+	goto T211;
+	}
+	V105= (V103);
+	goto T201;
+	
+	goto T211;
+T211:;
+	if(!(((V103))==(((object)VV[43])))){
+	goto T214;
+	}
+	V105= (V103);
+	goto T201;
+	
+	goto T214;
+T214:;
+	if(!(((V103))==(((object)VV[44])))){
+	goto T217;
+	}
+	V105= (V103);
+	goto T201;
+	
+	goto T217;
+T217:;
+	if(!(((V103))==(((object)VV[45])))){
+	goto T220;
+	}
+	V105= (V103);
+	goto T201;
+	
+	goto T220;
+T220:;
+	if(!(((V103))==(((object)VV[46])))){
+	goto T223;
+	}
+	V105= (V103);
+	goto T201;
+	
+	goto T223;
+T223:;
+	if(!(((V103))==(((object)VV[47])))){
+	goto T226;
+	}
+	V105= (V103);
+	goto T201;
+	
+	goto T226;
+T226:;
+	if(!(((V103))==(((object)VV[48])))){
+	goto T229;
+	}
+	V105= (V103);
+	goto T201;
+	
+	goto T229;
+T229:;
+	if(!(((V103))==(((object)VV[49])))){
+	goto T232;
+	}
+	V105= (V103);
+	goto T201;
+	
+	goto T232;
+T232:;
+	if(!(((V103))==(((object)VV[50])))){
+	goto T235;
+	}
+	V105= (V103);
+	goto T201;
+	
+	goto T235;
+T235:;
+	if(!(((V103))==(((object)VV[51])))){
+	goto T238;
+	}
+	V105= (V103);
+	goto T201;
+	
+	goto T238;
+T238:;
+	if(!(((V103))==(((object)VV[52])))){
+	goto T241;
+	}
+	V105= (V103);
+	goto T201;
+	
+	goto T241;
+T241:;
+	if(!(((V103))==(((object)VV[53])))){
+	goto T244;
+	}
+	V105= (V103);
+	goto T201;
+	
+	goto T244;
+T244:;
+	if(!(((V103))==(((object)VV[54])))){
+	goto T247;
+	}
+	V105= (V103);
+	goto T201;
+	
+	goto T247;
+T247:;
+	V105= (/* SYSTEM::EXPAND-ARRAY-ELEMENT-TYPE */(*LnkLI44)((V103)));
+	goto T201;
+T201:;
+	{object V106;
+	V106= (fcall.fun=((object)VV[56])->s.s_gfdef,/* SYSTEM::MAKE-VECTOR */(*LnkLI45)((V105),V91,Cnil,Cnil,Cnil,(fixnum)0,Cnil,Cnil));
+	V102= (V106);}}}
+	{int8_t V107;
+	{fixnum V108;
+	{fixnum V109;
+	{fixnum V110;
+	V110= ((fixnum)V102);
+	V109= ((ushort*)V110)[(fixnum)1];}
+	V108= (V109>>(fixnum)6);}
+	V107= (V108&(fixnum)15);}
+	if(!((V107)==(0))){
+	goto T256;
+	}
+	V111= CMPmake_fixnum(V91);
+	(void)((/* SYSTEM::COPY-BIT-VECTOR */(*LnkLI46)((V102),make_fixnum(0),(V56),make_fixnum(0),(V111))));
+	goto T251;
+	
+	goto T256;
+T256:;
+	{fixnum V112;
+	fixnum V113;
+	{fixnum V114;
+	V114= ((fixnum)V102);
+	V112= ((fixnum*)V114)[(fixnum)1];}
+	if(!(((V102))==((V56)))){
+	goto T262;
+	}
+	V113= V112;
+	goto T261;
+	
+	goto T262;
+T262:;
+	{fixnum V115;
+	V115= ((fixnum)V56);
+	V113= ((fixnum*)V115)[(fixnum)1];}
+	goto T261;
+T261:;
+	{fixnum V116;
+	fixnum V117;
+	fixnum V118;
+	V116= (V112+(fixnum)0);
+	V117= (V113+(fixnum)0);
+	{int8_t V119;
+	{int8_t V120;
+	V120= (V107)-(1);
+	V119= V120;}
+	V118= (V91<<(fixnum)V119);}
+	(void)({fixnum f=1;f;});
+	(void)(((fixnum(*)(fixnum,fixnum,fixnum))(dlmemmove))(V116,V117,V118));}}}
+	goto T251;
+T251:;
+	V58= (V102);}}}
+	goto T107;
+T107:;
+	{object V122;
+	V122= (((object)VV[37])->s.s_dbind);
+	{fixnum V123;
+	{fixnum V124;
+	{fixnum V125;
+	{fixnum V127;
+	{fixnum V128;
+	V128= ((fixnum)V122);
+	V127= ((uchar*)V128)[(fixnum)2];}
+	V126= (V127&(fixnum)1);}
+	if(!((V126)==(0))){
+	goto T281;
+	}
+	goto T278;
+	
+	goto T281;
+T281:;
+	{fixnum V129;
+	{fixnum V130;
+	V130= ((fixnum)V122);
+	V129= ((uint*)V130)[(fixnum)4];}
+	V125= (V129&(fixnum)268435455);
+	goto T277;
+	}
+	goto T278;
+T278:;
+	{fixnum V131;
+	{fixnum V132;
+	V132= ((fixnum)V122);
+	V131= ((uint*)V132)[(fixnum)1];}
+	V125= (V131>>(fixnum)4);}
+	goto T277;
+T277:;
+	V124= (V125>>(fixnum)1);}
+	{fixnum V133;
+	V133= (0)+(V124);
+	V123= V133;}}
+	{fixnum V134;
+	{fixnum V135;
+	V135= ((fixnum)V122);
+	V134= ((fixnum*)V135)[(fixnum)1];}
+	V121= ((fixnum*)V134)[V123];}}}
+	V136= (fcall.argd=2,/* COMMON-LISP::SUBSEQ */(*LnkLI48)((V56),V121));
+	V59= (/* SYSTEM::PPRINT-INSERT-CONDITIONAL-NEWLINES */(*LnkLI47)((V136)));
+	V60= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(3*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V58);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=((object)VV[60]);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V59);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{register object V137;
+	register object V138;
+	{fixnum V139;
+	{fixnum V140;
+	{fixnum V141;
+	V142= tp2(V58);
+	if(!((V142)==(0))){
+	goto T301;
+	}
+	goto T300;
+	
+	goto T301;
+T301:;
+	goto T298;
+	
+	goto T300;
+T300:;
+	{register object V143;
+	register fixnum V144;
+	V143= (V58);
+	V144= 0;
+	goto T306;
+T306:;
+	if(((V143))==Cnil){
+	goto T308;
+	}
+	{object V145;
+	fixnum V146;
+	V145= (V143)->c.c_cdr;
+	{fixnum V148;
+	V148= V144;
+	{fixnum V149;
+	V149= (V148)+(1);
+	V146= V149;}}
+	V143= (V145);
+	V144= V146;
+	goto T306;
+	}
+	goto T308;
+T308:;
+	V141= V144;
+	goto T297;
+	}
+	goto T298;
+T298:;
+	V150= tp4(V58);
+	switch(V150){
+	case 13:
+	goto T324;
+T324:;
+	{fixnum V152;
+	{fixnum V153;
+	V153= ((fixnum)V58);
+	V152= ((uchar*)V153)[(fixnum)2];}
+	V151= (V152&(fixnum)1);}
+	if(!((V151)==(0))){
+	goto T326;
+	}
+	goto T319;
+	
+	goto T326;
+T326:;
+	goto T321;
+	
+	default:
+	goto T325;
+T325:;
+	goto T319;
+	}
+	goto T319;
+	
+	goto T321;
+T321:;
+	{fixnum V154;
+	{fixnum V155;
+	V155= ((fixnum)V58);
+	V154= ((uint*)V155)[(fixnum)4];}
+	V141= (V154&(fixnum)268435455);
+	goto T297;
+	}
+	goto T319;
+T319:;
+	{fixnum V156;
+	{fixnum V157;
+	V157= ((fixnum)V58);
+	V156= ((uint*)V157)[(fixnum)1];}
+	V141= (V156>>(fixnum)4);}
+	goto T297;
+T297:;
+	{fixnum V158;
+	V158= (0)+(V141);
+	V140= V158;}}
+	{fixnum V159;
+	{fixnum V160;
+	V160= (V140)+(3);
+	V159= V160;}
+	{fixnum V161;
+	{fixnum V162;
+	V162= length((V59));
+	{fixnum V163;
+	V163= (V159)+(V162);
+	V161= V163;}}
+	V139= V161;}}}
+	(void)((/* SYSTEM::MAKE-SEQUENCE-ELEMENT-TYPE */(*LnkLI49)(((object)VV[62]))));
+	(void)((/* SYSTEM::SEQUENCE-TP-LENGTHS */(*LnkLI50)(((object)VV[62]))));
+	V164= (/* SYSTEM::SEQUENCE-TP-NONSIMPLE-P */(*LnkLI51)(((object)VV[62])));
+	V137= (fcall.fun=((object)VV[56])->s.s_gfdef,/* SYSTEM::MAKE-VECTOR */(*LnkLI45)(((object)VV[40]),V139,(V164),Cnil,Cnil,(fixnum)0,Cnil,Cnil));}
+	V138= make_fixnum(0);
+	{register object V165;
+	register object V166;
+	V165= (V60);
+	V166= (V58);
+	goto T345;
+T345:;
+	if(((V165))==Cnil){
+	goto T352;
+	}
+	goto T350;
+	
+	goto T352;
+T352:;
+	goto T347;
+	
+	goto T350;
+T350:;
+	{register object V168;
+	register object V169;
+	register fixnum V170;
+	register fixnum V171;
+	V173= tp2((V166));
+	if(!((V173)==(0))){
+	goto T361;
+	}
+	goto T360;
+	
+	goto T361;
+T361:;
+	goto T359;
+	
+	goto T360;
+T360:;
+	goto T356;
+	
+	goto T359;
+T359:;
+	V168= (/* COMMON-LISP::ARRAY-ELEMENT-TYPE */(*LnkLI43)((V166)));
+	goto T355;
+	
+	goto T356;
+T356:;
+	V168= Cnil;
+	goto T355;
+T355:;
+	V169= (V166);
+	V170= 0;
+	if(((V168))==Cnil){
+	goto T366;
+	}
+	V171= length((V166));
+	goto T365;
+	
+	goto T366;
+T366:;
+	V171= 268435456;
+	goto T365;
+T365:;
+	if(!((((object)VV[40]))==((V168)))){
+	goto T369;
+	}
+	{fixnum V174;
+	{object V176;
+	V176= (V138);
+	{fixnum V178;
+	V178= V171;
+	{object V179;
+	V180= CMPmake_fixnum(V178);
+	V179= immnum_plus((V138),(V180));
+	V138= (V179);}}
+	V174= fix((V176));}
+	{fixnum V181;
+	V181= V171;
+	{fixnum V182;
+	V182= (0)+(V181);
+	V170= V182;}}
+	{fixnum V183;
+	fixnum V184;
+	{fixnum V185;
+	V185= ((fixnum)V137);
+	V183= ((fixnum*)V185)[(fixnum)1];}
+	if(!(((V137))==((V166)))){
+	goto T388;
+	}
+	V184= V183;
+	goto T387;
+	
+	goto T388;
+T388:;
+	{fixnum V186;
+	V186= ((fixnum)(V166));
+	V184= ((fixnum*)V186)[(fixnum)1];}
+	goto T387;
+T387:;
+	{fixnum V187;
+	fixnum V188;
+	fixnum V189;
+	{fixnum V190;
+	V190= (V174<<(fixnum)0);
+	V187= (V183+V190);}
+	V188= (V184+(fixnum)0);
+	V189= (V171<<(fixnum)0);
+	(void)({fixnum f=1;f;});
+	(void)(((fixnum(*)(fixnum,fixnum,fixnum))(dlmemmove))(V187,V188,V189));}}
+	goto T354;
+	}
+	goto T369;
+T369:;
+	goto T399;
+T399:;
+	if(!((V170)>=(V171))){
+	goto T406;
+	}
+	goto T405;
+	
+	goto T406;
+T406:;
+	if(((V168))==Cnil){
+	goto T412;
+	}
+	goto T409;
+	
+	goto T412;
+T412:;
+	if(((V169))==Cnil){
+	goto T414;
+	}
+	goto T404;
+	
+	goto T414;
+T414:;
+	goto T405;
+	
+	goto T409;
+T409:;
+	goto T404;
+	
+	goto T405;
+T405:;
+	goto T401;
+	
+	goto T404;
+T404:;
+	{object V192;
+	if(((V168))==Cnil){
+	goto T418;
+	}
+	{fixnum V194;
+	{fixnum V195;
+	V195= V170;
+	{fixnum V196;
+	V196= V170;
+	{fixnum V197;
+	V197= (V196)+(1);
+	V170= V197;}}
+	V194= V195;}
+	V192= (/* COMMON-LISP::ROW-MAJOR-AREF */(*LnkLI52)((V166),V194));
+	goto T417;
+	}
+	goto T418;
+T418:;
+	{object V198;
+	V198= (V169)->c.c_car;
+	V169= (V169)->c.c_cdr;
+	V192= (V198);}
+	goto T417;
+T417:;
+	{object V201;
+	{object V202;
+	V202= (V138);
+	{object V204;
+	V204= immnum_plus((V138),make_fixnum(1));
+	V138= (V204);}
+	V201= (V202);}
+	{object V205;
+	V205= (V192);
+	V206= tp4(V192);
+	if(!((V206)==(18))){
+	goto T441;
+	}
+	goto T440;
+	
+	goto T441;
+T441:;
+	goto T439;
+	
+	goto T440;
+T440:;
+	goto T438;
+	
+	goto T439;
+T439:;
+	goto T436;
+	
+	goto T438;
+T438:;
+	V205= (V192);
+	goto T435;
+	
+	goto T436;
+T436:;
+	V205= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[18]),(V192),((object)VV[40]),Cnil));
+	goto T435;
+T435:;
+	{fixnum V207;
+	fixnum V208;
+	{fixnum V209;
+	V209= ((fixnum)V137);
+	V207= ((fixnum*)V209)[(fixnum)1];}
+	{fixnum V210;
+	V210= ((fixnum)V205);
+	V208= ((uchar*)V210)[(fixnum)24];}
+	(void)(((uchar*)V207)[fix(V201)]=(uchar)V208);}}}}
+	goto T399;
+	
+	goto T401;
+T401:;
+	goto T354;
+	}
+	goto T354;
+T354:;
+	V165= (V165)->c.c_cdr;
+	V166= V165->c.c_car;
+	goto T345;
+	
+	goto T347;
+T347:;
+	{object V212 = (V137);
+	VMR5(V212);}}}}
+	goto T104;
+T104:;
+	{object V213 = (V56);
+	VMR5(V213);}
+}
+/*	local entry for function SYSTEM::PPRINT-CHECK-FORMAT-STRING	*/
+
+static object LI13__PPRINT_CHECK_FORMAT_STRING__ansi_io(object V215)
+{	 VMB6 VMS6 VMV6
+	{object V216;
+	V217= (fcall.fun=((object)VV[35])->s.s_gfdef,fcall.argd=2,/* SYSTEM::STRING-MATCH */(*LnkLI41)(((object)VV[67]),(V215)));
+	V216= ((V217)>=(0)?Ct:Cnil);
+	V218= (fcall.fun=((object)VV[35])->s.s_gfdef,fcall.argd=2,/* SYSTEM::STRING-MATCH */(*LnkLI41)(((object)VV[68]),(V215)));
+	(void)((V218)>=(0));
+	{object V219 = (V216);
+	VMR6(V219);}}
+}
+/*	local entry for function SYSTEM::PPRINT-QUIT	*/
+
+static object LI14__PPRINT_QUIT__ansi_io(object V224,object V225,object V226,object V227)
+{	 VMB7 VMS7 VMV7
+	if(((V224))==Cnil){
+	goto T464;
+	}
+	V228= tp2(V224);
+	if(!((V228)==(0))){
+	goto T469;
+	}
+	goto T468;
+	
+	goto T469;
+T469:;
+	goto T467;
+	
+	goto T468;
+T468:;
+	goto T461;
+	
+	goto T467;
+T467:;
+	goto T463;
+	
+	goto T464;
+T464:;
+	goto T461;
+	
+	goto T463;
+T463:;
+	goto T460;
+	
+	goto T461;
+T461:;
+	if(((((object)VV[69])->s.s_dbind))==Cnil){
+	goto T472;
+	}
+	if(((V225))==Cnil){
+	goto T475;
+	}
+	{fixnum V229;
+	V229= (fcall.fun=((object)VV[70])->s.s_gfdef,/* SYSTEM::GETHASH-INT */(*LnkLI54)((V224),(V225)));
+	V230= ((fixnum*)V229)[(fixnum)0];
+	if(!((0)==(V230))){
+	goto T479;
+	}
+	if((({object  _t0=Cnil;object  _t1=Cnil;
+	(void)((_t1));_t0;}))==Cnil){
+	goto T458;
+	}
+	goto T460;
+	
+	goto T479;
+T479:;
+	V231= ((object*)V229)[(fixnum)1];
+	if((({object  _t0=(V231);object  _t1=Ct;
+	(void)((_t1));_t0;}))==Cnil){
+	goto T458;
+	}
+	goto T460;
+	}
+	goto T475;
+T475:;
+	goto T458;
+	
+	goto T472;
+T472:;
+	goto T458;
+	
+	goto T460;
+T460:;
+	if(!(immnum_ge((V227),make_fixnum(0)))){
+	goto T485;
+	}
+	(void)((fcall.fun=((object)VV[71])->s.s_gfdef,fcall.valp=(fixnum)0,fcall.argd=2,/* COMMON-LISP::WRITE-STRING */(*LnkLI55)(((object)VV[72]),(V226))));
+	goto T484;
+	
+	goto T485;
+T485:;
+	goto T484;
+T484:;
+	bds_bind(((object)VV[73]),(((object)VV[73])->s.s_dbind));
+	bds_bind(((object)VV[74]),(((object)VV[74])->s.s_dbind));
+	bds_bind(((object)VV[75]),(((object)VV[75])->s.s_dbind));
+	bds_bind(((object)VV[69]),(((object)VV[69])->s.s_dbind));
+	bds_bind(((object)VV[76]),(((object)VV[76])->s.s_dbind));
+	bds_bind(((object)VV[77]),(((object)VV[77])->s.s_dbind));
+	bds_bind(((object)VV[78]),(((object)VV[78])->s.s_dbind));
+	bds_bind(((object)VV[79]),(((object)VV[79])->s.s_dbind));
+	bds_bind(((object)VV[80]),(((object)VV[80])->s.s_dbind));
+	bds_bind(((object)VV[81]),(((object)VV[81])->s.s_dbind));
+	bds_bind(((object)VV[82]),(((object)VV[82])->s.s_dbind));
+	bds_bind(((object)VV[83]),(((object)VV[83])->s.s_dbind));
+	bds_bind(((object)VV[84]),(((object)VV[84])->s.s_dbind));
+	bds_bind(((object)VV[85]),(((object)VV[85])->s.s_dbind));
+	bds_bind(((object)VV[86]),(((object)VV[86])->s.s_dbind));
+	(void)((fcall.fun=((object)VV[87])->s.s_gfdef,/* SYSTEM::WRITE-INT */(*LnkLI56)((V224),(V226))));
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	{object V232 = Ct;
+	VMR7(V232);}
+	goto T458;
+T458:;
+	if(((((object)VV[78])->s.s_dbind))==Cnil){
+	goto T492;
+	}
+	if(!(immnum_ge((V227),(((object)VV[78])->s.s_dbind)))){
+	goto T495;
+	}
+	if(!(immnum_ge((((object)VV[78])->s.s_dbind),make_fixnum(0)))){
+	goto T489;
+	}
+	goto T491;
+	
+	goto T495;
+T495:;
+	goto T489;
+	
+	goto T492;
+T492:;
+	goto T489;
+	
+	goto T491;
+T491:;
+	(void)((fcall.fun=((object)VV[71])->s.s_gfdef,fcall.valp=(fixnum)0,fcall.argd=2,/* COMMON-LISP::WRITE-STRING */(*LnkLI55)(((object)VV[88]),(V226))));
+	{object V233 = Ct;
+	VMR7(V233);}
+	goto T489;
+T489:;
+	if(!(immnum_lt((V227),make_fixnum(0)))){
+	goto T502;
+	}
+	if(((((object)VV[79])->s.s_dbind))==Cnil){
+	goto T505;
+	}
+	if(!(immnum_gt((((object)VV[89])->s.s_dbind),(((object)VV[79])->s.s_dbind)))){
+	goto T499;
+	}
+	goto T501;
+	
+	goto T505;
+T505:;
+	goto T499;
+	
+	goto T502;
+T502:;
+	goto T499;
+	
+	goto T501;
+T501:;
+	(void)((fcall.fun=((object)VV[71])->s.s_gfdef,fcall.valp=(fixnum)0,fcall.argd=2,/* COMMON-LISP::WRITE-STRING */(*LnkLI55)(((object)VV[90]),(V226))));
+	{object V234 = Ct;
+	VMR7(V234);}
+	goto T499;
+T499:;
+	{object V235 = Cnil;
+	VMR7(V235);}
+}
+/*	local entry for function COMMON-LISP::PPRINT-LOGICAL-BLOCK	*/
+
+static object LI15__PPRINT_LOGICAL_BLOCK__ansi_io(object V238,object V239)
+{	 VMB8 VMS8 VMV8
+	{object V240;
+	object V241;
+	object V242;
+	object V243;
+	object V244;
+	register object V245;
+	object V246;
+	register object V247;
+	object V248;
+	register object V249;
+	object V250;
+	register object V251;
+	object V252;
+	register object V253;
+	object V254;
+	object V255;
+	object V256;
+	object V257;
+	object V258;
+	object V259;
+	object V260;
+	V240= V238->c.c_cdr;
+	if(((V240))==Cnil){
+	goto T511;
+	}
+	{object V261;
+	V261= V240->c.c_car;
+	V240= V240->c.c_cdr;
+	V241= (V261);
+	goto T510;
+	}
+	goto T511;
+T511:;
+	V262= make_cons(((object)VV[91]),Cnil);
+	V241= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI39)(((object)VV[19]),((object)VV[92]),((object)VV[21]),((object)VV[93]),(V262)));
+	goto T510;
+T510:;
+	V242= (V241);
+	if(((V241))==Cnil){
+	goto T518;
+	}
+	{object V263;
+	V263= V241->c.c_car;
+	V242= V241->c.c_cdr;
+	V243= (V263);
+	goto T517;
+	}
+	goto T518;
+T518:;
+	V264= make_cons(((object)VV[94]),Cnil);
+	V243= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI39)(((object)VV[19]),((object)VV[95]),((object)VV[21]),((object)VV[96]),(V264)));
+	goto T517;
+T517:;
+	if(((V242))==Cnil){
+	goto T525;
+	}
+	{object V265;
+	V265= (V242)->c.c_car;
+	V242= (V242)->c.c_cdr;
+	V244= (V265);
+	goto T524;
+	}
+	goto T525;
+T525:;
+	V268= make_cons(((object)VV[97]),Cnil);
+	V244= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI39)(((object)VV[19]),((object)VV[98]),((object)VV[21]),((object)VV[99]),(V268)));
+	goto T524;
+T524:;
+	V245= Cnil;
+	V246= Cnil;
+	V247= Cnil;
+	V248= Cnil;
+	V249= Cnil;
+	V250= Cnil;
+	V251= Cnil;
+	V252= Cnil;
+	V253= Cnil;
+	V254= Cnil;
+	V255= Cnil;
+	{register object V269;
+	V269= (V242);
+	goto T534;
+T534:;
+	if(((V269))==Cnil){
+	goto T536;
+	}
+	{object V270;
+	object V271;
+	V270= (V269)->c.c_car;
+	if(((V269)->c.c_cdr)==Cnil){
+	goto T542;
+	}
+	{object V275;
+	V275= (V269)->c.c_cdr;
+	V271= V275->c.c_car;
+	goto T541;
+	}
+	goto T542;
+T542:;
+	V276= (V269)->c.c_car;
+	V278= make_cons((V276),Cnil);
+	V271= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI39)(((object)VV[19]),((object)VV[100]),((object)VV[101]),((object)VV[102]),(V278)));
+	goto T541;
+T541:;
+	if(!(((V270))==(((object)VV[103])))){
+	goto T547;
+	}
+	if(((V245))==Cnil){
+	goto T553;
+	}
+	goto T550;
+	
+	goto T553;
+T553:;
+	V246= (V271);
+	V245= Ct;
+	goto T539;
+	
+	goto T550;
+T550:;
+	goto T539;
+	
+	goto T547;
+T547:;
+	if(!(((V270))==(((object)VV[104])))){
+	goto T558;
+	}
+	if(((V247))==Cnil){
+	goto T564;
+	}
+	goto T561;
+	
+	goto T564;
+T564:;
+	V248= (V271);
+	V247= Ct;
+	goto T539;
+	
+	goto T561;
+T561:;
+	goto T539;
+	
+	goto T558;
+T558:;
+	if(!(((V270))==(((object)VV[105])))){
+	goto T569;
+	}
+	if(((V249))==Cnil){
+	goto T575;
+	}
+	goto T572;
+	
+	goto T575;
+T575:;
+	V250= (V271);
+	V249= Ct;
+	goto T539;
+	
+	goto T572;
+T572:;
+	goto T539;
+	
+	goto T569;
+T569:;
+	if(!(((V270))==(((object)VV[106])))){
+	goto T580;
+	}
+	if(((V251))==Cnil){
+	goto T586;
+	}
+	goto T583;
+	
+	goto T586;
+T586:;
+	V252= (V271);
+	V251= Ct;
+	goto T539;
+	
+	goto T583;
+T583:;
+	goto T539;
+	
+	goto T580;
+T580:;
+	if(((V253))==Cnil){
+	goto T594;
+	}
+	goto T591;
+	
+	goto T594;
+T594:;
+	V254= (V271);
+	V253= Ct;
+	V255= (V270);
+	goto T539;
+	
+	goto T591;
+T591:;}
+	goto T539;
+T539:;
+	{object V279;
+	{object V281;
+	V281= (V269)->c.c_cdr;
+	V279= V281->c.c_cdr;}
+	V269= (V279);
+	goto T534;
+	}
+	goto T536;
+T536:;
+	goto T532;
+	}
+	goto T532;
+T532:;
+	if(((V245))==Cnil){
+	goto T605;
+	}
+	V256= (V246);
+	goto T531;
+	
+	goto T605;
+T605:;
+	V256= ((object)VV[107]);
+	goto T531;
+T531:;
+	if(((V247))==Cnil){
+	goto T609;
+	}
+	V257= (V248);
+	goto T608;
+	
+	goto T609;
+T609:;
+	V257= ((object)VV[108]);
+	goto T608;
+T608:;
+	if(((V249))==Cnil){
+	goto T613;
+	}
+	V258= (V250);
+	goto T612;
+	
+	goto T613;
+T613:;
+	V258= ((object)VV[109]);
+	goto T612;
+T612:;
+	if(((V252))==Cnil){
+	goto T621;
+	}
+	goto T618;
+	
+	goto T621;
+T621:;
+	if(((V253))==Cnil){
+	goto T623;
+	}
+	V282= list(2,(V255),(V254));
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI39)(((object)VV[19]),((object)VV[110]),((object)VV[111]),((object)VV[112]),(V282))));
+	goto T617;
+	
+	goto T623;
+T623:;
+	goto T617;
+	
+	goto T618;
+T618:;
+	goto T617;
+T617:;
+	V259= (V240);
+	V260= fSgensym0();
+	V283= list(2,list(2,((object)VV[113]),(V257)),((object)VV[114]));
+	V284= list(5,((object)VV[115]),((object)VV[97]),((object)VV[116]),(V243),make_fixnum(-1));
+	V285= list(3,((object)VV[117]),((object)VV[118]),list(4,((object)VV[119]),(V284),((object)VV[120]),list(3,((object)VV[71]),(V256),(V243))));
+	V286= list(3,((object)VV[121]),((object)VV[122]),list(3,((object)VV[71]),(V258),(V243)));
+	V287= list(4,((object)VV[97]),((object)VV[116]),((object)VV[123]),list(2,(V260),make_fixnum(0)));
+	V288= list(5,((object)VV[115]),((object)VV[97]),((object)VV[116]),(V243),(V260));
+	V289= list(3,(V285),(V286),list(3,((object)VV[124]),(V287),listA(3,((object)VV[125]),list(2,list(3,((object)VV[126]),Cnil,list(2,((object)VV[34]),list(4,((object)VV[119]),(V288),((object)VV[127]),list(3,((object)VV[128]),list(2,((object)VV[129]),(V260)),((object)VV[130]))))),((object)VV[131])),(V259))));
+	{object V290 = list(4,((object)VV[132]),(V283),((object)VV[133]),list(3,((object)VV[134]),(V289),listA(4,((object)VV[135]),(V244),(V243),((object)VV[136]))));
+	VMR8(V290);}}
+}
+/*	local entry for function COMMON-LISP::PPRINT-FILL	*/
+
+static object LI16__PPRINT_FILL__ansi_io(object V293,object V294,...)
+{	 VMB9 VMS9 VMV9
+	va_list ap;
+	va_start(ap,V294);
+	{object V295;
+	int8_t V296;
+	int8_t V297;
+	object V298;
+	object V299;
+	V295= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V295))==Cnil){
+	goto T629;
+	}
+	V296= -((char)fcall.argd);
+	goto T628;
+	
+	goto T629;
+T629:;
+	V296= fcall.argd;
+	goto T628;
+T628:;
+	V297= (V296)-(2);
+	V298= Cnil;
+	if(((V295))==Cnil){
+	goto T635;
+	}
+	if(!((V297)==(1))){
+	goto T638;
+	}
+	V297= 0;
+	V298= va_arg(ap,object);
+	if(((V298))==Cnil){
+	goto T641;
+	}
+	goto T634;
+	
+	goto T641;
+T641:;
+	goto T634;
+	
+	goto T638;
+T638:;
+	goto T634;
+	
+	goto T635;
+T635:;
+	goto T634;
+T634:;
+	if(!((V297)>(0))){
+	goto T647;
+	}
+	V297= (V297)-(1);
+	V299= va_arg(ap,object);
+	goto T633;
+	
+	goto T647;
+T647:;
+	if(((V298))==Cnil){
+	goto T652;
+	}
+	{object V300;
+	V300= (V298)->c.c_car;
+	V298= (V298)->c.c_cdr;
+	V299= (V300);
+	goto T633;
+	}
+	goto T652;
+T652:;
+	V299= Ct;
+	goto T633;
+T633:;
+	if(((V295))==Cnil){
+	goto T660;
+	}
+	if(!((V297)==(1))){
+	goto T663;
+	}
+	V297= 0;
+	V298= va_arg(ap,object);
+	if(((V298))==Cnil){
+	goto T666;
+	}
+	goto T659;
+	
+	goto T666;
+T666:;
+	goto T659;
+	
+	goto T663;
+T663:;
+	goto T659;
+	
+	goto T660;
+T660:;
+	goto T659;
+T659:;
+	if(!((V297)>(0))){
+	goto T672;
+	}
+	V297= (V297)-(1);
+	(void)(va_arg(ap,object));
+	goto T658;
+	
+	goto T672;
+T672:;
+	if(((V298))==Cnil){
+	goto T677;
+	}
+	{object V303;
+	V303= (V298)->c.c_car;
+	V298= (V298)->c.c_cdr;
+	goto T658;
+	}
+	goto T677;
+T677:;
+	goto T658;
+T658:;
+	
+	base[0]=make_cons((V293),Cnil);
+	
+	base[1]=make_cons((V299),base[0]);
+	V306= tp2(V294);
+	if(!((V306)==(0))){
+	goto T689;
+	}
+	goto T688;
+	
+	goto T689;
+T689:;
+	goto T687;
+	
+	goto T688;
+T688:;
+	goto T684;
+	
+	goto T687;
+T687:;
+	(base[1]->c.c_car)= Cnil;
+	goto T683;
+	
+	goto T684;
+T684:;
+	goto T683;
+T683:;
+	bds_bind(((object)VV[113]),((object)VV[137]));
+	{object V308;
+	V308= (((object)VV[89])->s.s_dbind);
+	{object V309;
+	V309= immnum_plus((V308),make_fixnum(1));
+	V307= (V309);}}
+	bds_bind(((object)VV[89]),(V307));
+	base[2]=make_cons(base[2],base[1]);
+	base[3]=make_cons(base[3],base[2]);
+	base[4]=make_cons(base[4],base[3]);
+	(base[2]->c.c_car)=fSinit_function(((object)VV[138]),(void *)LC18__DO_PREF__ansi_io,Cdata,base[1],-1,0,258178);
+	
+	(base[3]->c.c_car)=fSinit_function(((object)VV[139]),(void *)LC19__DO_SUF__ansi_io,Cdata,base[1],-1,0,258178);
+	
+	(base[4]->c.c_car)=fSinit_function(((object)VV[140]),(void *)LC17__DO_PPRINT__ansi_io,Cdata,base[1],-1,0,130);
+	
+	V310= (base[4]->c.c_car);
+	V311= (base[2]->c.c_car);
+	V312= (base[3]->c.c_car);
+	{object V313 = (fcall.fun=((object)VV[135])->s.s_gfdef,/* SYSTEM::WRITE-INT1 */(*LnkLI57)((V294),(V293),(V310),(V311),(V312)));
+	bds_unwind1;
+	bds_unwind1;
+	VMR9(V313);}}
+	va_end(ap);
+}
+/*	local function DO-PPRINT	*/
+
+static object LC17__DO_PPRINT__ansi_io(object V316,register object V317)
+{	
+	VMB10 VMS10 VMV10
+	vs_check;
+	{register object V318;
+	V318= fcall.fun;
+	#undef base0
+	#define base0 (V318)->fun.fun_env
+	;
+	{register object V319;
+	register object V320;
+	V319= (V316);
+	V320= make_fixnum(0);
+	if(((V316))==Cnil){
+	goto T703;
+	}
+	goto T700;
+	
+	goto T703;
+T703:;
+	{object V321 = Cnil;
+	VMR10(V321);}
+	goto T700;
+T700:;
+	goto T706;
+T706:;
+	{object V322;
+	object V323;
+	object V324;
+	if(((/* SYSTEM::PPRINT-QUIT */(*LnkLI58)((V319),(V317),(base0[1])->c.c_car,(V320))))==Cnil){
+	goto T710;
+	}
+	{object V325 = Cnil;
+	VMR10(V325);}
+	goto T710;
+T710:;
+	{object V327;
+	V327= immnum_plus((V320),make_fixnum(1));
+	V320= (V327);}
+	{object V328;
+	V328= (V319)->c.c_car;
+	V319= (V319)->c.c_cdr;
+	V322= (V328);}
+	V323= Cnil;
+	V324= (base0[1])->c.c_car;
+	V323= (V324);
+	V331= (((object)VV[73])->s.s_dbind);
+	bds_bind(((object)VV[73]),(V331));
+	bds_bind(((object)VV[74]),(((object)VV[74])->s.s_dbind));
+	bds_bind(((object)VV[75]),(((object)VV[75])->s.s_dbind));
+	bds_bind(((object)VV[69]),(((object)VV[69])->s.s_dbind));
+	bds_bind(((object)VV[76]),(((object)VV[76])->s.s_dbind));
+	bds_bind(((object)VV[77]),(((object)VV[77])->s.s_dbind));
+	bds_bind(((object)VV[78]),(((object)VV[78])->s.s_dbind));
+	bds_bind(((object)VV[79]),(((object)VV[79])->s.s_dbind));
+	bds_bind(((object)VV[80]),(((object)VV[80])->s.s_dbind));
+	bds_bind(((object)VV[81]),(((object)VV[81])->s.s_dbind));
+	bds_bind(((object)VV[82]),(((object)VV[82])->s.s_dbind));
+	bds_bind(((object)VV[83]),(((object)VV[83])->s.s_dbind));
+	bds_bind(((object)VV[84]),(((object)VV[84])->s.s_dbind));
+	bds_bind(((object)VV[85]),(((object)VV[85])->s.s_dbind));
+	bds_bind(((object)VV[86]),(((object)VV[86])->s.s_dbind));
+	(void)((fcall.fun=((object)VV[87])->s.s_gfdef,/* SYSTEM::WRITE-INT */(*LnkLI56)((V322),(V323))));
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;}
+	if(((V319))==Cnil){
+	goto T727;
+	}
+	goto T724;
+	
+	goto T727;
+T727:;
+	{object V332 = Cnil;
+	VMR10(V332);}
+	goto T724;
+T724:;
+	if(!((type_of((base0[1])->c.c_car)==t_stream? (((base0[1])->c.c_car)->sm.sm_fp)!=0: 0 ))){
+	goto T733;
+	}
+	goto T732;
+	
+	goto T733;
+T733:;
+	goto T730;
+	
+	goto T732;
+T732:;
+	(void)((putc(char_code(code_char(32)),((base0[1])->c.c_car)->sm.sm_fp)));
+	goto T729;
+	
+	goto T730;
+T730:;
+	(void)((fcall.fun=((object)VV[141])->s.s_gfdef,fcall.valp=(fixnum)0,fcall.argd=2,/* COMMON-LISP::WRITE-CHAR */(*LnkLI59)(code_char(32),(base0[1])->c.c_car)));
+	goto T729;
+T729:;
+	{object V333;
+	V333= (base0[1])->c.c_car;
+	if(((((object)VV[83])->s.s_dbind))==Cnil){
+	goto T736;
+	}
+	{object V334;
+	V334= (/* SYSTEM::COERCE-TO-STREAM */(*LnkLI60)((V333)));
+	{object V336;
+	if(((fcall.fun=((object)VV[144])->s.s_gfdef,/* SYSTEM::PPRINT-MISER-STYLE */(*LnkLI62)((V334))))==Cnil){
+	goto T742;
+	}
+	V336= ((object)VV[145]);
+	goto T741;
+	
+	goto T742;
+T742:;
+	V336= ((object)VV[146]);
+	goto T741;
+T741:;
+	{fixnum V338;
+	V338= ((fixnum)V336);
+	V337= ((object*)V338)[(fixnum)5];}
+	V335= (fcall.argd=3,/* COMMON-LISP::GETF */(*LnkLI63)((V337),((object)VV[54]),Cnil));}
+	(void)((fcall.fun=((object)VV[143])->s.s_gfdef,fcall.argd=2,/* SYSTEM::PPRINT-QUEUE-CODES */(*LnkLI61)((V334),(V335))));
+	goto T707;
+	}
+	goto T736;
+T736:;}
+	goto T707;
+T707:;
+	goto T706;
+	}}
+	#undef base0
+}
+/*	local function DO-SUF	*/
+
+static object LC19__DO_SUF__ansi_io(object V341,object V342)
+{	
+	VMB11 VMS11 VMV11
+	vs_check;
+	{object V343;
+	fixnum V344;
+	V343= fcall.fun;
+	#undef base0
+	#define base0 (V343)->fun.fun_env
+	;
+	V344= fcall.valp;
+	if(((base0[0])->c.c_car)==Cnil){
+	goto T751;
+	}
+	V345= ((object)VV[148]);
+	goto T750;
+	
+	goto T751;
+T751:;
+	V345= ((object)VV[149]);
+	goto T750;
+T750:;
+	{object V346;
+	V346= (fcall.fun=((object)VV[71])->s.s_gfdef,fcall.valp=(fixnum)V344,fcall.argd=2,/* COMMON-LISP::WRITE-STRING */(*LnkLI55)((V345),(base0[1])->c.c_car));
+	VMRV11(V346,-2);}}
+	#undef base0
+}
+/*	local function DO-PREF	*/
+
+static object LC18__DO_PREF__ansi_io(object V349,object V350)
+{	
+	VMB12 VMS12 VMV12
+	vs_check;
+	{object V351;
+	fixnum V352;
+	V351= fcall.fun;
+	#undef base0
+	#define base0 (V351)->fun.fun_env
+	;
+	V352= fcall.valp;
+	if(((/* SYSTEM::PPRINT-QUIT */(*LnkLI58)((V349),(V350),(base0[1])->c.c_car,make_fixnum(-1))))==Cnil){
+	goto T756;
+	}
+	{object V353;
+	V353= Cnil;
+	VMRV12(V353,0);}
+	goto T756;
+T756:;
+	if(((base0[0])->c.c_car)==Cnil){
+	goto T760;
+	}
+	V354= ((object)VV[150]);
+	goto T759;
+	
+	goto T760;
+T760:;
+	V354= ((object)VV[151]);
+	goto T759;
+T759:;
+	{object V355;
+	V355= (fcall.fun=((object)VV[71])->s.s_gfdef,fcall.valp=(fixnum)V352,fcall.argd=2,/* COMMON-LISP::WRITE-STRING */(*LnkLI55)((V354),(base0[1])->c.c_car));
+	VMRV12(V355,-2);}}
+	#undef base0
+}
+/*	local entry for function COMMON-LISP::PPRINT-TABULAR	*/
+
+static object LI20__PPRINT_TABULAR__ansi_io(object V358,object V359,...)
+{	 VMB13 VMS13 VMV13
+	va_list ap;
+	va_start(ap,V359);
+	{register object V360;
+	int8_t V361;
+	int8_t V362;
+	object V363;
+	object V364;
+	object V365;
+	V360= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V360))==Cnil){
+	goto T765;
+	}
+	V361= -((char)fcall.argd);
+	goto T764;
+	
+	goto T765;
+T765:;
+	V361= fcall.argd;
+	goto T764;
+T764:;
+	V362= (V361)-(2);
+	V363= Cnil;
+	if(((V360))==Cnil){
+	goto T771;
+	}
+	if(!((V362)==(1))){
+	goto T774;
+	}
+	V362= 0;
+	V363= va_arg(ap,object);
+	if(((V363))==Cnil){
+	goto T777;
+	}
+	goto T770;
+	
+	goto T777;
+T777:;
+	goto T770;
+	
+	goto T774;
+T774:;
+	goto T770;
+	
+	goto T771;
+T771:;
+	goto T770;
+T770:;
+	if(!((V362)>(0))){
+	goto T783;
+	}
+	V362= (V362)-(1);
+	V364= va_arg(ap,object);
+	goto T769;
+	
+	goto T783;
+T783:;
+	if(((V363))==Cnil){
+	goto T788;
+	}
+	{object V366;
+	V366= (V363)->c.c_car;
+	V363= (V363)->c.c_cdr;
+	V364= (V366);
+	goto T769;
+	}
+	goto T788;
+T788:;
+	V364= Ct;
+	goto T769;
+T769:;
+	if(((V360))==Cnil){
+	goto T797;
+	}
+	if(!((V362)==(1))){
+	goto T800;
+	}
+	V362= 0;
+	V363= va_arg(ap,object);
+	if(((V363))==Cnil){
+	goto T803;
+	}
+	goto T796;
+	
+	goto T803;
+T803:;
+	goto T796;
+	
+	goto T800;
+T800:;
+	goto T796;
+	
+	goto T797;
+T797:;
+	goto T796;
+T796:;
+	if(!((V362)>(0))){
+	goto T809;
+	}
+	V362= (V362)-(1);
+	(void)(va_arg(ap,object));
+	goto T795;
+	
+	goto T809;
+T809:;
+	if(((V363))==Cnil){
+	goto T814;
+	}
+	{object V369;
+	V369= (V363)->c.c_car;
+	V363= (V363)->c.c_cdr;
+	goto T795;
+	}
+	goto T814;
+T814:;
+	goto T795;
+T795:;
+	if(((V360))==Cnil){
+	goto T821;
+	}
+	if(!((V362)==(1))){
+	goto T824;
+	}
+	V362= 0;
+	V363= va_arg(ap,object);
+	if(((V363))==Cnil){
+	goto T827;
+	}
+	goto T820;
+	
+	goto T827;
+T827:;
+	goto T820;
+	
+	goto T824;
+T824:;
+	goto T820;
+	
+	goto T821;
+T821:;
+	goto T820;
+T820:;
+	if(!((V362)>(0))){
+	goto T833;
+	}
+	V362= (V362)-(1);
+	V365= va_arg(ap,object);
+	goto T794;
+	
+	goto T833;
+T833:;
+	if(((V363))==Cnil){
+	goto T838;
+	}
+	{object V372;
+	V372= (V363)->c.c_car;
+	V363= (V363)->c.c_cdr;
+	V365= (V372);
+	goto T794;
+	}
+	goto T838;
+T838:;
+	V365= Cnil;
+	goto T794;
+T794:;
+	
+	base[0]=make_cons((V358),Cnil);
+	
+	base[1]=make_cons((V364),base[0]);
+	
+	base[2]=make_cons((V365),base[1]);
+	if(((V365))==Cnil){
+	goto T848;
+	}
+	goto T845;
+	
+	goto T848;
+T848:;
+	(base[2]->c.c_car)= make_fixnum(16);
+	goto T844;
+	
+	goto T845;
+T845:;
+	goto T844;
+T844:;
+	bds_bind(((object)VV[113]),((object)VV[137]));
+	{object V376;
+	V376= (((object)VV[89])->s.s_dbind);
+	{object V377;
+	V377= immnum_plus((V376),make_fixnum(1));
+	V375= (V377);}}
+	bds_bind(((object)VV[89]),(V375));
+	base[3]=make_cons(base[3],base[2]);
+	base[4]=make_cons(base[4],base[3]);
+	base[5]=make_cons(base[5],base[4]);
+	(base[3]->c.c_car)=fSinit_function(((object)VV[152]),(void *)LC22__DO_PREF__ansi_io,Cdata,base[2],-1,0,258178);
+	
+	(base[4]->c.c_car)=fSinit_function(((object)VV[153]),(void *)LC23__DO_SUF__ansi_io,Cdata,base[2],-1,0,258178);
+	
+	(base[5]->c.c_car)=fSinit_function(((object)VV[154]),(void *)LC21__DO_PPRINT__ansi_io,Cdata,base[2],-1,0,130);
+	
+	V378= (base[5]->c.c_car);
+	V379= (base[3]->c.c_car);
+	V380= (base[4]->c.c_car);
+	{object V381 = (fcall.fun=((object)VV[135])->s.s_gfdef,/* SYSTEM::WRITE-INT1 */(*LnkLI57)((V359),(V358),(V378),(V379),(V380)));
+	bds_unwind1;
+	bds_unwind1;
+	VMR13(V381);}}
+	va_end(ap);
+}
+/*	local function DO-PPRINT	*/
+
+static object LC21__DO_PPRINT__ansi_io(object V384,register object V385)
+{	
+	VMB14 VMS14 VMV14
+	vs_check;
+	{register object V386;
+	V386= fcall.fun;
+	#undef base0
+	#define base0 (V386)->fun.fun_env
+	;
+	{register object V387;
+	register object V388;
+	V387= (V384);
+	V388= make_fixnum(0);
+	if(((V384))==Cnil){
+	goto T861;
+	}
+	goto T858;
+	
+	goto T861;
+T861:;
+	{object V389 = Cnil;
+	VMR14(V389);}
+	goto T858;
+T858:;
+	goto T864;
+T864:;
+	{object V390;
+	object V391;
+	object V392;
+	if(((/* SYSTEM::PPRINT-QUIT */(*LnkLI58)((V387),(V385),(base0[2])->c.c_car,(V388))))==Cnil){
+	goto T868;
+	}
+	{object V393 = Cnil;
+	VMR14(V393);}
+	goto T868;
+T868:;
+	{object V395;
+	V395= immnum_plus((V388),make_fixnum(1));
+	V388= (V395);}
+	{object V396;
+	V396= (V387)->c.c_car;
+	V387= (V387)->c.c_cdr;
+	V390= (V396);}
+	V391= Cnil;
+	V392= (base0[2])->c.c_car;
+	V391= (V392);
+	V399= (((object)VV[73])->s.s_dbind);
+	bds_bind(((object)VV[73]),(V399));
+	bds_bind(((object)VV[74]),(((object)VV[74])->s.s_dbind));
+	bds_bind(((object)VV[75]),(((object)VV[75])->s.s_dbind));
+	bds_bind(((object)VV[69]),(((object)VV[69])->s.s_dbind));
+	bds_bind(((object)VV[76]),(((object)VV[76])->s.s_dbind));
+	bds_bind(((object)VV[77]),(((object)VV[77])->s.s_dbind));
+	bds_bind(((object)VV[78]),(((object)VV[78])->s.s_dbind));
+	bds_bind(((object)VV[79]),(((object)VV[79])->s.s_dbind));
+	bds_bind(((object)VV[80]),(((object)VV[80])->s.s_dbind));
+	bds_bind(((object)VV[81]),(((object)VV[81])->s.s_dbind));
+	bds_bind(((object)VV[82]),(((object)VV[82])->s.s_dbind));
+	bds_bind(((object)VV[83]),(((object)VV[83])->s.s_dbind));
+	bds_bind(((object)VV[84]),(((object)VV[84])->s.s_dbind));
+	bds_bind(((object)VV[85]),(((object)VV[85])->s.s_dbind));
+	bds_bind(((object)VV[86]),(((object)VV[86])->s.s_dbind));
+	(void)((fcall.fun=((object)VV[87])->s.s_gfdef,/* SYSTEM::WRITE-INT */(*LnkLI56)((V390),(V391))));
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;}
+	if(((V387))==Cnil){
+	goto T885;
+	}
+	goto T882;
+	
+	goto T885;
+T885:;
+	{object V400 = Cnil;
+	VMR14(V400);}
+	goto T882;
+T882:;
+	if(!((type_of((base0[2])->c.c_car)==t_stream? (((base0[2])->c.c_car)->sm.sm_fp)!=0: 0 ))){
+	goto T891;
+	}
+	goto T890;
+	
+	goto T891;
+T891:;
+	goto T888;
+	
+	goto T890;
+T890:;
+	(void)((putc(char_code(code_char(32)),((base0[2])->c.c_car)->sm.sm_fp)));
+	goto T887;
+	
+	goto T888;
+T888:;
+	(void)((fcall.fun=((object)VV[141])->s.s_gfdef,fcall.valp=(fixnum)0,fcall.argd=2,/* COMMON-LISP::WRITE-CHAR */(*LnkLI59)(code_char(32),(base0[2])->c.c_car)));
+	goto T887;
+T887:;
+	{object V401;
+	object V402;
+	V401= (base0[0])->c.c_car;
+	V402= (base0[2])->c.c_car;
+	if(((((object)VV[83])->s.s_dbind))==Cnil){
+	goto T895;
+	}
+	V403= (/* SYSTEM::COERCE-TO-STREAM */(*LnkLI60)((V402)));
+	{fixnum V406;
+	V406= ((fixnum)((object)VV[155]));
+	V405= ((object*)V406)[(fixnum)5];}
+	V404= (fcall.argd=3,/* COMMON-LISP::GETF */(*LnkLI63)((V405),((object)VV[54]),Cnil));
+	(void)((fcall.fun=((object)VV[143])->s.s_gfdef,fcall.argd=4,/* SYSTEM::PPRINT-QUEUE-CODES */(*LnkLI61)((V403),(V404),make_fixnum(0),(V401))));
+	goto T894;
+	
+	goto T895;
+T895:;}
+	goto T894;
+T894:;
+	{object V407;
+	V407= (base0[2])->c.c_car;
+	if(((((object)VV[83])->s.s_dbind))==Cnil){
+	goto T901;
+	}
+	{object V408;
+	V408= (/* SYSTEM::COERCE-TO-STREAM */(*LnkLI60)((V407)));
+	{object V410;
+	if(((fcall.fun=((object)VV[144])->s.s_gfdef,/* SYSTEM::PPRINT-MISER-STYLE */(*LnkLI62)((V408))))==Cnil){
+	goto T907;
+	}
+	V410= ((object)VV[156]);
+	goto T906;
+	
+	goto T907;
+T907:;
+	V410= ((object)VV[146]);
+	goto T906;
+T906:;
+	{fixnum V412;
+	V412= ((fixnum)V410);
+	V411= ((object*)V412)[(fixnum)5];}
+	V409= (fcall.argd=3,/* COMMON-LISP::GETF */(*LnkLI63)((V411),((object)VV[54]),Cnil));}
+	(void)((fcall.fun=((object)VV[143])->s.s_gfdef,fcall.argd=2,/* SYSTEM::PPRINT-QUEUE-CODES */(*LnkLI61)((V408),(V409))));
+	goto T865;
+	}
+	goto T901;
+T901:;}
+	goto T865;
+T865:;
+	goto T864;
+	}}
+	#undef base0
+}
+/*	local function DO-SUF	*/
+
+static object LC23__DO_SUF__ansi_io(object V415,object V416)
+{	
+	VMB15 VMS15 VMV15
+	vs_check;
+	{object V417;
+	fixnum V418;
+	V417= fcall.fun;
+	#undef base0
+	#define base0 (V417)->fun.fun_env
+	;
+	V418= fcall.valp;
+	if(((base0[1])->c.c_car)==Cnil){
+	goto T916;
+	}
+	V419= ((object)VV[157]);
+	goto T915;
+	
+	goto T916;
+T916:;
+	V419= ((object)VV[158]);
+	goto T915;
+T915:;
+	{object V420;
+	V420= (fcall.fun=((object)VV[71])->s.s_gfdef,fcall.valp=(fixnum)V418,fcall.argd=2,/* COMMON-LISP::WRITE-STRING */(*LnkLI55)((V419),(base0[2])->c.c_car));
+	VMRV15(V420,-2);}}
+	#undef base0
+}
+/*	local function DO-PREF	*/
+
+static object LC22__DO_PREF__ansi_io(object V423,object V424)
+{	
+	VMB16 VMS16 VMV16
+	vs_check;
+	{object V425;
+	fixnum V426;
+	V425= fcall.fun;
+	#undef base0
+	#define base0 (V425)->fun.fun_env
+	;
+	V426= fcall.valp;
+	if(((/* SYSTEM::PPRINT-QUIT */(*LnkLI58)((V423),(V424),(base0[2])->c.c_car,make_fixnum(-1))))==Cnil){
+	goto T921;
+	}
+	{object V427;
+	V427= Cnil;
+	VMRV16(V427,0);}
+	goto T921;
+T921:;
+	if(((base0[1])->c.c_car)==Cnil){
+	goto T925;
+	}
+	V428= ((object)VV[159]);
+	goto T924;
+	
+	goto T925;
+T925:;
+	V428= ((object)VV[160]);
+	goto T924;
+T924:;
+	{object V429;
+	V429= (fcall.fun=((object)VV[71])->s.s_gfdef,fcall.valp=(fixnum)V426,fcall.argd=2,/* COMMON-LISP::WRITE-STRING */(*LnkLI55)((V428),(base0[2])->c.c_car));
+	VMRV16(V429,-2);}}
+	#undef base0
+}
+/*	local entry for function COMMON-LISP::PPRINT-LINEAR	*/
+
+static object LI24__PPRINT_LINEAR__ansi_io(object V432,object V433,...)
+{	 VMB17 VMS17 VMV17
+	va_list ap;
+	va_start(ap,V433);
+	{object V434;
+	int8_t V435;
+	int8_t V436;
+	object V437;
+	object V438;
+	V434= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V434))==Cnil){
+	goto T930;
+	}
+	V435= -((char)fcall.argd);
+	goto T929;
+	
+	goto T930;
+T930:;
+	V435= fcall.argd;
+	goto T929;
+T929:;
+	V436= (V435)-(2);
+	V437= Cnil;
+	if(((V434))==Cnil){
+	goto T936;
+	}
+	if(!((V436)==(1))){
+	goto T939;
+	}
+	V436= 0;
+	V437= va_arg(ap,object);
+	if(((V437))==Cnil){
+	goto T942;
+	}
+	goto T935;
+	
+	goto T942;
+T942:;
+	goto T935;
+	
+	goto T939;
+T939:;
+	goto T935;
+	
+	goto T936;
+T936:;
+	goto T935;
+T935:;
+	if(!((V436)>(0))){
+	goto T948;
+	}
+	V436= (V436)-(1);
+	V438= va_arg(ap,object);
+	goto T934;
+	
+	goto T948;
+T948:;
+	if(((V437))==Cnil){
+	goto T953;
+	}
+	{object V439;
+	V439= (V437)->c.c_car;
+	V437= (V437)->c.c_cdr;
+	V438= (V439);
+	goto T934;
+	}
+	goto T953;
+T953:;
+	V438= Ct;
+	goto T934;
+T934:;
+	if(((V434))==Cnil){
+	goto T961;
+	}
+	if(!((V436)==(1))){
+	goto T964;
+	}
+	V436= 0;
+	V437= va_arg(ap,object);
+	if(((V437))==Cnil){
+	goto T967;
+	}
+	goto T960;
+	
+	goto T967;
+T967:;
+	goto T960;
+	
+	goto T964;
+T964:;
+	goto T960;
+	
+	goto T961;
+T961:;
+	goto T960;
+T960:;
+	if(!((V436)>(0))){
+	goto T973;
+	}
+	V436= (V436)-(1);
+	(void)(va_arg(ap,object));
+	goto T959;
+	
+	goto T973;
+T973:;
+	if(((V437))==Cnil){
+	goto T978;
+	}
+	{object V442;
+	V442= (V437)->c.c_car;
+	V437= (V437)->c.c_cdr;
+	goto T959;
+	}
+	goto T978;
+T978:;
+	goto T959;
+T959:;
+	
+	base[0]=make_cons((V432),Cnil);
+	
+	base[1]=make_cons((V438),base[0]);
+	V445= tp2(V433);
+	if(!((V445)==(0))){
+	goto T990;
+	}
+	goto T989;
+	
+	goto T990;
+T990:;
+	goto T988;
+	
+	goto T989;
+T989:;
+	goto T985;
+	
+	goto T988;
+T988:;
+	(base[1]->c.c_car)= Cnil;
+	goto T984;
+	
+	goto T985;
+T985:;
+	goto T984;
+T984:;
+	bds_bind(((object)VV[113]),((object)VV[137]));
+	{object V447;
+	V447= (((object)VV[89])->s.s_dbind);
+	{object V448;
+	V448= immnum_plus((V447),make_fixnum(1));
+	V446= (V448);}}
+	bds_bind(((object)VV[89]),(V446));
+	base[2]=make_cons(base[2],base[1]);
+	base[3]=make_cons(base[3],base[2]);
+	base[4]=make_cons(base[4],base[3]);
+	(base[2]->c.c_car)=fSinit_function(((object)VV[161]),(void *)LC26__DO_PREF__ansi_io,Cdata,base[1],-1,0,258178);
+	
+	(base[3]->c.c_car)=fSinit_function(((object)VV[162]),(void *)LC27__DO_SUF__ansi_io,Cdata,base[1],-1,0,258178);
+	
+	(base[4]->c.c_car)=fSinit_function(((object)VV[163]),(void *)LC25__DO_PPRINT__ansi_io,Cdata,base[1],-1,0,130);
+	
+	V449= (base[4]->c.c_car);
+	V450= (base[2]->c.c_car);
+	V451= (base[3]->c.c_car);
+	{object V452 = (fcall.fun=((object)VV[135])->s.s_gfdef,/* SYSTEM::WRITE-INT1 */(*LnkLI57)((V433),(V432),(V449),(V450),(V451)));
+	bds_unwind1;
+	bds_unwind1;
+	VMR17(V452);}}
+	va_end(ap);
+}
+/*	local function DO-PPRINT	*/
+
+static object LC25__DO_PPRINT__ansi_io(object V455,register object V456)
+{	
+	VMB18 VMS18 VMV18
+	vs_check;
+	{register object V457;
+	V457= fcall.fun;
+	#undef base0
+	#define base0 (V457)->fun.fun_env
+	;
+	{register object V458;
+	register object V459;
+	V458= (V455);
+	V459= make_fixnum(0);
+	if(((V455))==Cnil){
+	goto T1004;
+	}
+	goto T1001;
+	
+	goto T1004;
+T1004:;
+	{object V460 = Cnil;
+	VMR18(V460);}
+	goto T1001;
+T1001:;
+	goto T1007;
+T1007:;
+	{object V461;
+	object V462;
+	object V463;
+	if(((/* SYSTEM::PPRINT-QUIT */(*LnkLI58)((V458),(V456),(base0[1])->c.c_car,(V459))))==Cnil){
+	goto T1011;
+	}
+	{object V464 = Cnil;
+	VMR18(V464);}
+	goto T1011;
+T1011:;
+	{object V466;
+	V466= immnum_plus((V459),make_fixnum(1));
+	V459= (V466);}
+	{object V467;
+	V467= (V458)->c.c_car;
+	V458= (V458)->c.c_cdr;
+	V461= (V467);}
+	V462= Cnil;
+	V463= (base0[1])->c.c_car;
+	V462= (V463);
+	V470= (((object)VV[73])->s.s_dbind);
+	bds_bind(((object)VV[73]),(V470));
+	bds_bind(((object)VV[74]),(((object)VV[74])->s.s_dbind));
+	bds_bind(((object)VV[75]),(((object)VV[75])->s.s_dbind));
+	bds_bind(((object)VV[69]),(((object)VV[69])->s.s_dbind));
+	bds_bind(((object)VV[76]),(((object)VV[76])->s.s_dbind));
+	bds_bind(((object)VV[77]),(((object)VV[77])->s.s_dbind));
+	bds_bind(((object)VV[78]),(((object)VV[78])->s.s_dbind));
+	bds_bind(((object)VV[79]),(((object)VV[79])->s.s_dbind));
+	bds_bind(((object)VV[80]),(((object)VV[80])->s.s_dbind));
+	bds_bind(((object)VV[81]),(((object)VV[81])->s.s_dbind));
+	bds_bind(((object)VV[82]),(((object)VV[82])->s.s_dbind));
+	bds_bind(((object)VV[83]),(((object)VV[83])->s.s_dbind));
+	bds_bind(((object)VV[84]),(((object)VV[84])->s.s_dbind));
+	bds_bind(((object)VV[85]),(((object)VV[85])->s.s_dbind));
+	bds_bind(((object)VV[86]),(((object)VV[86])->s.s_dbind));
+	(void)((fcall.fun=((object)VV[87])->s.s_gfdef,/* SYSTEM::WRITE-INT */(*LnkLI56)((V461),(V462))));
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;}
+	if(((V458))==Cnil){
+	goto T1028;
+	}
+	goto T1025;
+	
+	goto T1028;
+T1028:;
+	{object V471 = Cnil;
+	VMR18(V471);}
+	goto T1025;
+T1025:;
+	if(!((type_of((base0[1])->c.c_car)==t_stream? (((base0[1])->c.c_car)->sm.sm_fp)!=0: 0 ))){
+	goto T1034;
+	}
+	goto T1033;
+	
+	goto T1034;
+T1034:;
+	goto T1031;
+	
+	goto T1033;
+T1033:;
+	(void)((putc(char_code(code_char(32)),((base0[1])->c.c_car)->sm.sm_fp)));
+	goto T1030;
+	
+	goto T1031;
+T1031:;
+	(void)((fcall.fun=((object)VV[141])->s.s_gfdef,fcall.valp=(fixnum)0,fcall.argd=2,/* COMMON-LISP::WRITE-CHAR */(*LnkLI59)(code_char(32),(base0[1])->c.c_car)));
+	goto T1030;
+T1030:;
+	{object V472;
+	V472= (base0[1])->c.c_car;
+	if(((((object)VV[83])->s.s_dbind))==Cnil){
+	goto T1037;
+	}
+	{object V473;
+	V473= (/* SYSTEM::COERCE-TO-STREAM */(*LnkLI60)((V472)));
+	{fixnum V476;
+	V476= ((fixnum)((object)VV[164]));
+	V475= ((object*)V476)[(fixnum)5];}
+	V474= (fcall.argd=3,/* COMMON-LISP::GETF */(*LnkLI63)((V475),((object)VV[54]),Cnil));
+	(void)((fcall.fun=((object)VV[143])->s.s_gfdef,fcall.argd=2,/* SYSTEM::PPRINT-QUEUE-CODES */(*LnkLI61)((V473),(V474))));
+	goto T1008;
+	}
+	goto T1037;
+T1037:;}
+	goto T1008;
+T1008:;
+	goto T1007;
+	}}
+	#undef base0
+}
+/*	local function DO-SUF	*/
+
+static object LC27__DO_SUF__ansi_io(object V479,object V480)
+{	
+	VMB19 VMS19 VMV19
+	vs_check;
+	{object V481;
+	fixnum V482;
+	V481= fcall.fun;
+	#undef base0
+	#define base0 (V481)->fun.fun_env
+	;
+	V482= fcall.valp;
+	if(((base0[0])->c.c_car)==Cnil){
+	goto T1048;
+	}
+	V483= ((object)VV[165]);
+	goto T1047;
+	
+	goto T1048;
+T1048:;
+	V483= ((object)VV[166]);
+	goto T1047;
+T1047:;
+	{object V484;
+	V484= (fcall.fun=((object)VV[71])->s.s_gfdef,fcall.valp=(fixnum)V482,fcall.argd=2,/* COMMON-LISP::WRITE-STRING */(*LnkLI55)((V483),(base0[1])->c.c_car));
+	VMRV19(V484,-2);}}
+	#undef base0
+}
+/*	local function DO-PREF	*/
+
+static object LC26__DO_PREF__ansi_io(object V487,object V488)
+{	
+	VMB20 VMS20 VMV20
+	vs_check;
+	{object V489;
+	fixnum V490;
+	V489= fcall.fun;
+	#undef base0
+	#define base0 (V489)->fun.fun_env
+	;
+	V490= fcall.valp;
+	if(((/* SYSTEM::PPRINT-QUIT */(*LnkLI58)((V487),(V488),(base0[1])->c.c_car,make_fixnum(-1))))==Cnil){
+	goto T1053;
+	}
+	{object V491;
+	V491= Cnil;
+	VMRV20(V491,0);}
+	goto T1053;
+T1053:;
+	if(((base0[0])->c.c_car)==Cnil){
+	goto T1057;
+	}
+	V492= ((object)VV[167]);
+	goto T1056;
+	
+	goto T1057;
+T1057:;
+	V492= ((object)VV[168]);
+	goto T1056;
+T1056:;
+	{object V493;
+	V493= (fcall.fun=((object)VV[71])->s.s_gfdef,fcall.valp=(fixnum)V490,fcall.argd=2,/* COMMON-LISP::WRITE-STRING */(*LnkLI55)((V492),(base0[1])->c.c_car));
+	VMRV20(V493,-2);}}
+	#undef base0
+}
+/*	local entry for function SYSTEM::COERCE-TO-STREAM	*/
+
+static object LI28__COERCE_TO_STREAM__ansi_io(object V495)
+{	 VMB21 VMS21 VMV21
+	if(!(((V495))==(Cnil))){
+	goto T1060;
+	}
+	{object V496 = (((object)VV[169])->s.s_dbind);
+	VMR21(V496);}
+	goto T1060;
+T1060:;
+	if(!(((V495))==(Ct))){
+	goto T1063;
+	}
+	{object V497 = (((object)VV[170])->s.s_dbind);
+	VMR21(V497);}
+	goto T1063;
+T1063:;
+	{object V498 = (V495);
+	VMR21(V498);}
+}
+/*	local entry for function COMMON-LISP::PPRINT-TAB	*/
+
+static object LI29__PPRINT_TAB__ansi_io(object V502,object V503,object V504,...)
+{	 VMB22 VMS22 VMV22
+	va_list ap;
+	va_start(ap,V504);
+	{object V505;
+	int8_t V506;
+	int8_t V507;
+	object V508;
+	object V509;
+	V505= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V505))==Cnil){
+	goto T1068;
+	}
+	V506= -((char)fcall.argd);
+	goto T1067;
+	
+	goto T1068;
+T1068:;
+	V506= fcall.argd;
+	goto T1067;
+T1067:;
+	V507= (V506)-(3);
+	V508= Cnil;
+	if(((V505))==Cnil){
+	goto T1074;
+	}
+	if(!((V507)==(1))){
+	goto T1077;
+	}
+	V507= 0;
+	V508= va_arg(ap,object);
+	if(((V508))==Cnil){
+	goto T1080;
+	}
+	goto T1073;
+	
+	goto T1080;
+T1080:;
+	goto T1073;
+	
+	goto T1077;
+T1077:;
+	goto T1073;
+	
+	goto T1074;
+T1074:;
+	goto T1073;
+T1073:;
+	if(!((V507)>(0))){
+	goto T1086;
+	}
+	V507= 0;
+	V509= va_arg(ap,object);
+	goto T1072;
+	
+	goto T1086;
+T1086:;
+	if(((V508))==Cnil){
+	goto T1091;
+	}
+	{object V510;
+	V510= (V508)->c.c_car;
+	V508= (V508)->c.c_cdr;
+	V509= (V510);
+	goto T1072;
+	}
+	goto T1091;
+T1091:;
+	V509= Cnil;
+	goto T1072;
+T1072:;
+	{fixnum V513;
+	V513= 1;
+	V514= tp4(V502);
+	switch(V514){
+	case -1:
+	goto T1113;
+T1113:;
+	goto T1110;
+	
+	case 1:
+	goto T1114;
+T1114:;
+	case 2:
+	goto T1115;
+T1115:;
+	case 3:
+	goto T1116;
+T1116:;
+	case 4:
+	goto T1117;
+T1117:;
+	case 5:
+	goto T1118;
+T1118:;
+	case 6:
+	goto T1119;
+T1119:;
+	goto T1108;
+	
+	default:
+	goto T1120;
+T1120:;
+	goto T1110;
+	}
+	goto T1108;
+	
+	goto T1110;
+T1110:;
+	V513= 0;
+	goto T1107;
+	
+	goto T1108;
+T1108:;
+	goto T1107;
+T1107:;
+	switch(V513){
+	case 0:
+	goto T1132;
+T1132:;
+	if(!(((V502))==(((object)VV[171])))){
+	goto T1129;
+	}
+	goto T1130;
+	
+	case 1:
+	goto T1133;
+T1133:;
+	if(!(((V502))==(((object)VV[171])))){
+	goto T1129;
+	}
+	goto T1130;
+	}
+	goto T1129;
+	
+	goto T1130;
+T1130:;
+	goto T1128;
+	
+	goto T1129;
+T1129:;
+	goto T1126;
+	
+	goto T1128;
+T1128:;
+	goto T1105;
+	
+	goto T1126;
+T1126:;
+	switch(V513){
+	case 0:
+	goto T1142;
+T1142:;
+	if(!(((V502))==(((object)VV[172])))){
+	goto T1139;
+	}
+	goto T1140;
+	
+	case 1:
+	goto T1143;
+T1143:;
+	if(!(((V502))==(((object)VV[172])))){
+	goto T1139;
+	}
+	goto T1140;
+	}
+	goto T1139;
+	
+	goto T1140;
+T1140:;
+	goto T1138;
+	
+	goto T1139;
+T1139:;
+	goto T1136;
+	
+	goto T1138;
+T1138:;
+	goto T1105;
+	
+	goto T1136;
+T1136:;
+	switch(V513){
+	case 0:
+	goto T1152;
+T1152:;
+	if(!(((V502))==(((object)VV[173])))){
+	goto T1149;
+	}
+	goto T1150;
+	
+	case 1:
+	goto T1153;
+T1153:;
+	if(!(((V502))==(((object)VV[173])))){
+	goto T1149;
+	}
+	goto T1150;
+	}
+	goto T1149;
+	
+	goto T1150;
+T1150:;
+	goto T1148;
+	
+	goto T1149;
+T1149:;
+	goto T1146;
+	
+	goto T1148;
+T1148:;
+	goto T1105;
+	
+	goto T1146;
+T1146:;
+	switch(V513){
+	case 0:
+	goto T1162;
+T1162:;
+	if(!(((V502))==(((object)VV[155])))){
+	goto T1159;
+	}
+	goto T1160;
+	
+	case 1:
+	goto T1163;
+T1163:;
+	if(!(((V502))==(((object)VV[155])))){
+	goto T1159;
+	}
+	goto T1160;
+	}
+	goto T1159;
+	
+	goto T1160;
+T1160:;
+	goto T1158;
+	
+	goto T1159;
+T1159:;
+	goto T1156;
+	
+	goto T1158;
+T1158:;
+	goto T1105;
+	
+	goto T1156;
+T1156:;
+	goto T1104;
+	}
+	goto T1105;
+T1105:;
+	goto T1103;
+	
+	goto T1104;
+T1104:;
+	goto T1102;
+	
+	goto T1103;
+T1103:;
+	goto T1101;
+	
+	goto T1102;
+T1102:;
+	goto T1099;
+	
+	goto T1101;
+T1101:;
+	goto T1098;
+	
+	goto T1099;
+T1099:;
+	V502= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[174]),(V502),((object)VV[175]),Cnil));
+	goto T1098;
+T1098:;
+	V515= tp4(V503);
+	switch(V515){
+	case -1:
+	goto T1179;
+T1179:;
+	case 1:
+	goto T1180;
+T1180:;
+	case 2:
+	goto T1181;
+T1181:;
+	goto T1176;
+	
+	default:
+	goto T1182;
+T1182:;
+	goto T1174;
+	}
+	goto T1174;
+	
+	goto T1176;
+T1176:;
+	if(!(immnum_le(make_fixnum(0),(V503)))){
+	goto T1184;
+	}
+	goto T1173;
+	
+	goto T1184;
+T1184:;
+	goto T1172;
+	
+	goto T1174;
+T1174:;
+	goto T1172;
+	
+	goto T1173;
+T1173:;
+	goto T1171;
+	
+	goto T1172;
+T1172:;
+	goto T1169;
+	
+	goto T1171;
+T1171:;
+	goto T1168;
+	
+	goto T1169;
+T1169:;
+	V503= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[176]),(V503),((object)VV[177]),Cnil));
+	goto T1168;
+T1168:;
+	V516= tp4(V504);
+	switch(V516){
+	case -1:
+	goto T1199;
+T1199:;
+	case 1:
+	goto T1200;
+T1200:;
+	case 2:
+	goto T1201;
+T1201:;
+	goto T1196;
+	
+	default:
+	goto T1202;
+T1202:;
+	goto T1194;
+	}
+	goto T1194;
+	
+	goto T1196;
+T1196:;
+	if(!(immnum_le(make_fixnum(0),(V504)))){
+	goto T1204;
+	}
+	goto T1193;
+	
+	goto T1204;
+T1204:;
+	goto T1192;
+	
+	goto T1194;
+T1194:;
+	goto T1192;
+	
+	goto T1193;
+T1193:;
+	goto T1191;
+	
+	goto T1192;
+T1192:;
+	goto T1189;
+	
+	goto T1191;
+T1191:;
+	goto T1188;
+	
+	goto T1189;
+T1189:;
+	V504= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[178]),(V504),((object)VV[179]),Cnil));
+	goto T1188;
+T1188:;
+	V517= tp7(V509);
+	switch(V517){
+	case 672:
+	goto T1214;
+T1214:;
+	case 673:
+	goto T1215;
+T1215:;
+	case 674:
+	goto T1216;
+T1216:;
+	case 675:
+	goto T1217;
+T1217:;
+	case 676:
+	goto T1218;
+T1218:;
+	case 677:
+	goto T1219;
+T1219:;
+	case 678:
+	goto T1220;
+T1220:;
+	case 679:
+	goto T1221;
+T1221:;
+	case 680:
+	goto T1222;
+T1222:;
+	case 681:
+	goto T1223;
+T1223:;
+	case 682:
+	goto T1224;
+T1224:;
+	case 683:
+	goto T1225;
+T1225:;
+	case -2:
+	goto T1226;
+T1226:;
+	case 609:
+	goto T1227;
+T1227:;
+	goto T1211;
+	
+	default:
+	goto T1228;
+T1228:;
+	goto T1209;
+	}
+	goto T1209;
+	
+	goto T1211;
+T1211:;
+	goto T1208;
+	
+	goto T1209;
+T1209:;
+	V509= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[180]),(V509),((object)VV[181]),Cnil));
+	goto T1208;
+T1208:;
+	if(((((object)VV[83])->s.s_dbind))==Cnil){
+	goto T1231;
+	}
+	V518= (/* SYSTEM::COERCE-TO-STREAM */(*LnkLI60)((V509)));
+	{register object V520;
+	{fixnum V521;
+	V521= ((fixnum)V502);
+	V520= ((object*)V521)[(fixnum)5];}
+	goto T1238;
+T1238:;
+	if(((V520))==Cnil){
+	goto T1243;
+	}
+	goto T1240;
+	
+	goto T1243;
+T1243:;
+	V519= Cnil;
+	goto T1234;
+	
+	goto T1240;
+T1240:;
+	V523= (V520)->c.c_car;
+	if(!(((V523))==(((object)VV[54])))){
+	goto T1245;
+	}
+	{object V526;
+	V526= (V520)->c.c_cdr;
+	V519= V526->c.c_car;
+	goto T1234;
+	}
+	goto T1245;
+T1245:;
+	{object V527;
+	V527= (V520)->c.c_cdr;
+	{object V529;
+	V529= V527->c.c_cdr;
+	V520= (V529);
+	goto T1238;
+	}}}
+	goto T1234;
+T1234:;
+	{object V530 = (fcall.fun=((object)VV[143])->s.s_gfdef,fcall.argd=4,/* SYSTEM::PPRINT-QUEUE-CODES */(*LnkLI61)((V518),(V519),(V503),(V504)));
+	VMR22(V530);}
+	goto T1231;
+T1231:;
+	{object V531 = Cnil;
+	VMR22(V531);}}
+	va_end(ap);
+}
+/*	local entry for function COMMON-LISP::PPRINT-INDENT	*/
+
+static object LI30__PPRINT_INDENT__ansi_io(object V534,object V535,...)
+{	 VMB23 VMS23 VMV23
+	va_list ap;
+	va_start(ap,V535);
+	{object V536;
+	int8_t V537;
+	int8_t V538;
+	object V539;
+	object V540;
+	V536= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V536))==Cnil){
+	goto T1258;
+	}
+	V537= -((char)fcall.argd);
+	goto T1257;
+	
+	goto T1258;
+T1258:;
+	V537= fcall.argd;
+	goto T1257;
+T1257:;
+	V538= (V537)-(2);
+	V539= Cnil;
+	if(((V536))==Cnil){
+	goto T1264;
+	}
+	if(!((V538)==(1))){
+	goto T1267;
+	}
+	V538= 0;
+	V539= va_arg(ap,object);
+	if(((V539))==Cnil){
+	goto T1270;
+	}
+	goto T1263;
+	
+	goto T1270;
+T1270:;
+	goto T1263;
+	
+	goto T1267;
+T1267:;
+	goto T1263;
+	
+	goto T1264;
+T1264:;
+	goto T1263;
+T1263:;
+	if(!((V538)>(0))){
+	goto T1276;
+	}
+	V538= 0;
+	V540= va_arg(ap,object);
+	goto T1262;
+	
+	goto T1276;
+T1276:;
+	if(((V539))==Cnil){
+	goto T1281;
+	}
+	{object V541;
+	V541= (V539)->c.c_car;
+	V539= (V539)->c.c_cdr;
+	V540= (V541);
+	goto T1262;
+	}
+	goto T1281;
+T1281:;
+	V540= Cnil;
+	goto T1262;
+T1262:;
+	{fixnum V544;
+	V544= 1;
+	V545= tp4(V534);
+	switch(V545){
+	case -1:
+	goto T1303;
+T1303:;
+	goto T1300;
+	
+	case 1:
+	goto T1304;
+T1304:;
+	case 2:
+	goto T1305;
+T1305:;
+	case 3:
+	goto T1306;
+T1306:;
+	case 4:
+	goto T1307;
+T1307:;
+	case 5:
+	goto T1308;
+T1308:;
+	case 6:
+	goto T1309;
+T1309:;
+	goto T1298;
+	
+	default:
+	goto T1310;
+T1310:;
+	goto T1300;
+	}
+	goto T1298;
+	
+	goto T1300;
+T1300:;
+	V544= 0;
+	goto T1297;
+	
+	goto T1298;
+T1298:;
+	goto T1297;
+T1297:;
+	switch(V544){
+	case 0:
+	goto T1322;
+T1322:;
+	if(!(((V534))==(((object)VV[182])))){
+	goto T1319;
+	}
+	goto T1320;
+	
+	case 1:
+	goto T1323;
+T1323:;
+	if(!(((V534))==(((object)VV[182])))){
+	goto T1319;
+	}
+	goto T1320;
+	}
+	goto T1319;
+	
+	goto T1320;
+T1320:;
+	goto T1318;
+	
+	goto T1319;
+T1319:;
+	goto T1316;
+	
+	goto T1318;
+T1318:;
+	goto T1295;
+	
+	goto T1316;
+T1316:;
+	switch(V544){
+	case 0:
+	goto T1332;
+T1332:;
+	if(!(((V534))==(((object)VV[183])))){
+	goto T1329;
+	}
+	goto T1330;
+	
+	case 1:
+	goto T1333;
+T1333:;
+	if(!(((V534))==(((object)VV[183])))){
+	goto T1329;
+	}
+	goto T1330;
+	}
+	goto T1329;
+	
+	goto T1330;
+T1330:;
+	goto T1328;
+	
+	goto T1329;
+T1329:;
+	goto T1326;
+	
+	goto T1328;
+T1328:;
+	goto T1295;
+	
+	goto T1326;
+T1326:;
+	goto T1294;
+	}
+	goto T1295;
+T1295:;
+	goto T1293;
+	
+	goto T1294;
+T1294:;
+	goto T1292;
+	
+	goto T1293;
+T1293:;
+	goto T1291;
+	
+	goto T1292;
+T1292:;
+	goto T1289;
+	
+	goto T1291;
+T1291:;
+	goto T1288;
+	
+	goto T1289;
+T1289:;
+	V534= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[174]),(V534),((object)VV[184]),Cnil));
+	goto T1288;
+T1288:;
+	V546= tp4(V535);
+	switch(V546){
+	case -1:
+	goto T1346;
+T1346:;
+	case 1:
+	goto T1347;
+T1347:;
+	case 2:
+	goto T1348;
+T1348:;
+	case 3:
+	goto T1349;
+T1349:;
+	case 4:
+	goto T1350;
+T1350:;
+	case 5:
+	goto T1351;
+T1351:;
+	goto T1343;
+	
+	default:
+	goto T1352;
+T1352:;
+	goto T1342;
+	}
+	goto T1342;
+	
+	goto T1343;
+T1343:;
+	goto T1341;
+	
+	goto T1342;
+T1342:;
+	goto T1339;
+	
+	goto T1341;
+T1341:;
+	goto T1338;
+	
+	goto T1339;
+T1339:;
+	V535= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[185]),(V535),((object)VV[186]),Cnil));
+	goto T1338;
+T1338:;
+	V547= tp7(V540);
+	switch(V547){
+	case 672:
+	goto T1362;
+T1362:;
+	case 673:
+	goto T1363;
+T1363:;
+	case 674:
+	goto T1364;
+T1364:;
+	case 675:
+	goto T1365;
+T1365:;
+	case 676:
+	goto T1366;
+T1366:;
+	case 677:
+	goto T1367;
+T1367:;
+	case 678:
+	goto T1368;
+T1368:;
+	case 679:
+	goto T1369;
+T1369:;
+	case 680:
+	goto T1370;
+T1370:;
+	case 681:
+	goto T1371;
+T1371:;
+	case 682:
+	goto T1372;
+T1372:;
+	case 683:
+	goto T1373;
+T1373:;
+	case -2:
+	goto T1374;
+T1374:;
+	case 609:
+	goto T1375;
+T1375:;
+	goto T1359;
+	
+	default:
+	goto T1376;
+T1376:;
+	goto T1357;
+	}
+	goto T1357;
+	
+	goto T1359;
+T1359:;
+	goto T1356;
+	
+	goto T1357;
+T1357:;
+	V540= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[187]),(V540),((object)VV[188]),Cnil));
+	goto T1356;
+T1356:;
+	if(((((object)VV[83])->s.s_dbind))==Cnil){
+	goto T1379;
+	}
+	{object V548;
+	V548= (/* SYSTEM::COERCE-TO-STREAM */(*LnkLI60)((V540)));
+	if(((fcall.fun=((object)VV[144])->s.s_gfdef,/* SYSTEM::PPRINT-MISER-STYLE */(*LnkLI62)((V548))))==Cnil){
+	goto T1386;
+	}
+	goto T1383;
+	
+	goto T1386;
+T1386:;
+	{register object V550;
+	{fixnum V551;
+	V551= ((fixnum)V534);
+	V550= ((object*)V551)[(fixnum)5];}
+	goto T1392;
+T1392:;
+	if(((V550))==Cnil){
+	goto T1397;
+	}
+	goto T1394;
+	
+	goto T1397;
+T1397:;
+	V549= Cnil;
+	goto T1388;
+	
+	goto T1394;
+T1394:;
+	V553= (V550)->c.c_car;
+	if(!(((V553))==(((object)VV[54])))){
+	goto T1399;
+	}
+	{object V556;
+	V556= (V550)->c.c_cdr;
+	V549= V556->c.c_car;
+	goto T1388;
+	}
+	goto T1399;
+T1399:;
+	{object V557;
+	V557= (V550)->c.c_cdr;
+	{object V559;
+	V559= V557->c.c_cdr;
+	V550= (V559);
+	goto T1392;
+	}}}
+	goto T1388;
+T1388:;
+	V560= (fcall.fun=((object)VV[189])->s.s_gfdef,fcall.valp=(fixnum)0,fcall.argd=1,/* COMMON-LISP::ROUND */(*LnkLI64)((V535)));
+	{object V561 = (fcall.fun=((object)VV[143])->s.s_gfdef,fcall.argd=3,/* SYSTEM::PPRINT-QUEUE-CODES */(*LnkLI61)((V548),(V549),(V560)));
+	VMR23(V561);}
+	goto T1383;
+T1383:;
+	{object V562 = Cnil;
+	VMR23(V562);}}
+	goto T1379;
+T1379:;
+	{object V563 = Cnil;
+	VMR23(V563);}}
+	va_end(ap);
+}
+/*	local entry for function COMMON-LISP::PPRINT-NEWLINE	*/
+
+static object LI31__PPRINT_NEWLINE__ansi_io(object V565,...)
+{	 VMB24 VMS24 VMV24
+	va_list ap;
+	va_start(ap,V565);
+	{object V566;
+	int8_t V567;
+	int8_t V568;
+	object V569;
+	object V570;
+	V566= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V566))==Cnil){
+	goto T1412;
+	}
+	V567= -((char)fcall.argd);
+	goto T1411;
+	
+	goto T1412;
+T1412:;
+	V567= fcall.argd;
+	goto T1411;
+T1411:;
+	V568= (V567)-(1);
+	V569= Cnil;
+	if(((V566))==Cnil){
+	goto T1418;
+	}
+	if(!((V568)==(1))){
+	goto T1421;
+	}
+	V568= 0;
+	V569= va_arg(ap,object);
+	if(((V569))==Cnil){
+	goto T1424;
+	}
+	goto T1417;
+	
+	goto T1424;
+T1424:;
+	goto T1417;
+	
+	goto T1421;
+T1421:;
+	goto T1417;
+	
+	goto T1418;
+T1418:;
+	goto T1417;
+T1417:;
+	if(!((V568)>(0))){
+	goto T1430;
+	}
+	V568= 0;
+	V570= va_arg(ap,object);
+	goto T1416;
+	
+	goto T1430;
+T1430:;
+	if(((V569))==Cnil){
+	goto T1435;
+	}
+	{object V571;
+	V571= (V569)->c.c_car;
+	V569= (V569)->c.c_cdr;
+	V570= (V571);
+	goto T1416;
+	}
+	goto T1435;
+T1435:;
+	V570= Cnil;
+	goto T1416;
+T1416:;
+	{fixnum V574;
+	V574= 1;
+	V575= tp4(V565);
+	switch(V575){
+	case -1:
+	goto T1457;
+T1457:;
+	goto T1454;
+	
+	case 1:
+	goto T1458;
+T1458:;
+	case 2:
+	goto T1459;
+T1459:;
+	case 3:
+	goto T1460;
+T1460:;
+	case 4:
+	goto T1461;
+T1461:;
+	case 5:
+	goto T1462;
+T1462:;
+	case 6:
+	goto T1463;
+T1463:;
+	goto T1452;
+	
+	default:
+	goto T1464;
+T1464:;
+	goto T1454;
+	}
+	goto T1452;
+	
+	goto T1454;
+T1454:;
+	V574= 0;
+	goto T1451;
+	
+	goto T1452;
+T1452:;
+	goto T1451;
+T1451:;
+	switch(V574){
+	case 0:
+	goto T1476;
+T1476:;
+	if(!(((V565))==(((object)VV[164])))){
+	goto T1473;
+	}
+	goto T1474;
+	
+	case 1:
+	goto T1477;
+T1477:;
+	if(!(((V565))==(((object)VV[164])))){
+	goto T1473;
+	}
+	goto T1474;
+	}
+	goto T1473;
+	
+	goto T1474;
+T1474:;
+	goto T1472;
+	
+	goto T1473;
+T1473:;
+	goto T1470;
+	
+	goto T1472;
+T1472:;
+	goto T1449;
+	
+	goto T1470;
+T1470:;
+	switch(V574){
+	case 0:
+	goto T1486;
+T1486:;
+	if(!(((V565))==(((object)VV[190])))){
+	goto T1483;
+	}
+	goto T1484;
+	
+	case 1:
+	goto T1487;
+T1487:;
+	if(!(((V565))==(((object)VV[190])))){
+	goto T1483;
+	}
+	goto T1484;
+	}
+	goto T1483;
+	
+	goto T1484;
+T1484:;
+	goto T1482;
+	
+	goto T1483;
+T1483:;
+	goto T1480;
+	
+	goto T1482;
+T1482:;
+	goto T1449;
+	
+	goto T1480;
+T1480:;
+	switch(V574){
+	case 0:
+	goto T1496;
+T1496:;
+	if(!(((V565))==(((object)VV[146])))){
+	goto T1493;
+	}
+	goto T1494;
+	
+	case 1:
+	goto T1497;
+T1497:;
+	if(!(((V565))==(((object)VV[146])))){
+	goto T1493;
+	}
+	goto T1494;
+	}
+	goto T1493;
+	
+	goto T1494;
+T1494:;
+	goto T1492;
+	
+	goto T1493;
+T1493:;
+	goto T1490;
+	
+	goto T1492;
+T1492:;
+	goto T1449;
+	
+	goto T1490;
+T1490:;
+	switch(V574){
+	case 0:
+	goto T1506;
+T1506:;
+	if(!(((V565))==(((object)VV[191])))){
+	goto T1503;
+	}
+	goto T1504;
+	
+	case 1:
+	goto T1507;
+T1507:;
+	if(!(((V565))==(((object)VV[191])))){
+	goto T1503;
+	}
+	goto T1504;
+	}
+	goto T1503;
+	
+	goto T1504;
+T1504:;
+	goto T1502;
+	
+	goto T1503;
+T1503:;
+	goto T1500;
+	
+	goto T1502;
+T1502:;
+	goto T1449;
+	
+	goto T1500;
+T1500:;
+	goto T1448;
+	}
+	goto T1449;
+T1449:;
+	goto T1447;
+	
+	goto T1448;
+T1448:;
+	goto T1446;
+	
+	goto T1447;
+T1447:;
+	goto T1445;
+	
+	goto T1446;
+T1446:;
+	goto T1443;
+	
+	goto T1445;
+T1445:;
+	goto T1442;
+	
+	goto T1443;
+T1443:;
+	V565= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[174]),(V565),((object)VV[192]),Cnil));
+	goto T1442;
+T1442:;
+	V576= tp7(V570);
+	switch(V576){
+	case 672:
+	goto T1518;
+T1518:;
+	case 673:
+	goto T1519;
+T1519:;
+	case 674:
+	goto T1520;
+T1520:;
+	case 675:
+	goto T1521;
+T1521:;
+	case 676:
+	goto T1522;
+T1522:;
+	case 677:
+	goto T1523;
+T1523:;
+	case 678:
+	goto T1524;
+T1524:;
+	case 679:
+	goto T1525;
+T1525:;
+	case 680:
+	goto T1526;
+T1526:;
+	case 681:
+	goto T1527;
+T1527:;
+	case 682:
+	goto T1528;
+T1528:;
+	case 683:
+	goto T1529;
+T1529:;
+	case -2:
+	goto T1530;
+T1530:;
+	case 609:
+	goto T1531;
+T1531:;
+	goto T1515;
+	
+	default:
+	goto T1532;
+T1532:;
+	goto T1513;
+	}
+	goto T1513;
+	
+	goto T1515;
+T1515:;
+	goto T1512;
+	
+	goto T1513;
+T1513:;
+	V570= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[187]),(V570),((object)VV[193]),Cnil));
+	goto T1512;
+T1512:;
+	if(((((object)VV[83])->s.s_dbind))==Cnil){
+	goto T1535;
+	}
+	{object V577;
+	V577= (/* SYSTEM::COERCE-TO-STREAM */(*LnkLI60)((V570)));
+	{object V579;
+	if(!(((V565))==(((object)VV[190])))){
+	goto T1541;
+	}
+	if(((fcall.fun=((object)VV[144])->s.s_gfdef,/* SYSTEM::PPRINT-MISER-STYLE */(*LnkLI62)((V577))))==Cnil){
+	goto T1544;
+	}
+	V579= ((object)VV[194]);
+	goto T1540;
+	
+	goto T1544;
+T1544:;
+	{object V580 = Cnil;
+	VMR24(V580);}
+	goto T1541;
+T1541:;
+	if(!(((V565))==(((object)VV[146])))){
+	goto T1547;
+	}
+	if(((fcall.fun=((object)VV[144])->s.s_gfdef,/* SYSTEM::PPRINT-MISER-STYLE */(*LnkLI62)((V577))))==Cnil){
+	goto T1550;
+	}
+	V579= ((object)VV[195]);
+	goto T1540;
+	
+	goto T1550;
+T1550:;
+	V579= (V565);
+	goto T1540;
+	
+	goto T1547;
+T1547:;
+	V579= (V565);
+	goto T1540;
+T1540:;
+	{register object V581;
+	{fixnum V582;
+	V582= ((fixnum)V579);
+	V581= ((object*)V582)[(fixnum)5];}
+	goto T1556;
+T1556:;
+	if(((V581))==Cnil){
+	goto T1561;
+	}
+	goto T1558;
+	
+	goto T1561;
+T1561:;
+	V578= Cnil;
+	goto T1539;
+	
+	goto T1558;
+T1558:;
+	V584= (V581)->c.c_car;
+	if(!(((V584))==(((object)VV[54])))){
+	goto T1563;
+	}
+	{object V587;
+	V587= (V581)->c.c_cdr;
+	V578= V587->c.c_car;
+	goto T1539;
+	}
+	goto T1563;
+T1563:;
+	{object V588;
+	V588= (V581)->c.c_cdr;
+	{object V590;
+	V590= V588->c.c_cdr;
+	V581= (V590);
+	goto T1556;
+	}}}}
+	goto T1539;
+T1539:;
+	{object V591 = (fcall.fun=((object)VV[143])->s.s_gfdef,fcall.argd=2,/* SYSTEM::PPRINT-QUEUE-CODES */(*LnkLI61)((V577),(V578)));
+	VMR24(V591);}}
+	goto T1535;
+T1535:;
+	{object V592 = Cnil;
+	VMR24(V592);}}
+	va_end(ap);
+}
+/*	local entry for function SYSTEM::PPRINT-MAKE-DISPATCH	*/
+
+static object LI32__PPRINT_MAKE_DISPATCH__ansi_io(object V594)
+{	 VMB25 VMS25 VMV25
+	{object V596;
+	object V597;
+	{object V598;
+	register object V599;
+	V598= Cnil;
+	V599= Cnil;
+	{register object V600;
+	V600= (V594);
+	goto T1579;
+T1579:;
+	if(((V600))==Cnil){
+	goto T1581;
+	}
+	{object V602;
+	V602= (V600)->c.c_car;
+	{object V603;
+	V605= V602->c.c_car;
+	{object V607;
+	V607= V602->c.c_cdr;
+	V606= V607->c.c_car;}
+	V604= list(2,(V605),list(3,((object)VV[196]),list(2,((object)VV[34]),(V606)),Ct));
+	V603= make_cons((V604),Cnil);
+	if(((V599))==Cnil){
+	goto T1592;
+	}
+	{object V608;
+	V608= (((V599))->c.c_cdr=((V603)),((V599)));
+	V599= V608->c.c_cdr;
+	goto T1591;
+	}
+	goto T1592;
+T1592:;
+	V598= (V603);
+	V599= (V598);
+	goto T1591;
+T1591:;}}
+	{object V609;
+	V609= (V600)->c.c_cdr;
+	V600= (V609);
+	goto T1579;
+	}
+	goto T1581;
+T1581:;
+	goto T1577;
+	}
+	goto T1577;
+T1577:;
+	V596= (V598);}
+	V597= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V596);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=((object)VV[197]);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V611;
+	register object V612;
+	V611= Cnil;
+	V612= Cnil;
+	{register object V613;
+	V613= (V596);
+	goto T1606;
+T1606:;
+	if(((V613))==Cnil){
+	goto T1608;
+	}
+	{object V615;
+	V615= (V613)->c.c_car;
+	{object V616;
+	V616= make_cons((V615),Cnil);
+	if(((V612))==Cnil){
+	goto T1615;
+	}
+	(void)((((V612))->c.c_cdr=((V616)),((V612))));
+	V612= (V616);
+	goto T1614;
+	
+	goto T1615;
+T1615:;
+	V611= (V616);
+	V612= (V611);
+	goto T1614;
+T1614:;}}
+	{object V617;
+	V617= (V613)->c.c_cdr;
+	V613= (V617);
+	goto T1606;
+	}
+	goto T1608;
+T1608:;
+	goto T1604;
+	}
+	goto T1604;
+T1604:;
+	{object V619;
+	V619= V597->c.c_cdr;
+	{object V620;
+	V620= V619->c.c_car;
+	if(((V612))==Cnil){
+	goto T1627;
+	}
+	(void)((((V612))->c.c_cdr=((V620)),((V612))));
+	V612= (V620);
+	goto T1626;
+	
+	goto T1627;
+T1627:;
+	V611= (V620);
+	V612= (V611);
+	goto T1626;
+T1626:;}}
+	V595= (V611);}}
+	{object V621 = list(3,((object)VV[198]),((object)VV[199]),listA(3,((object)VV[200]),((object)VV[97]),(V595)));
+	VMR25(V621);}
+}
+/*	local entry for function COMMON-LISP::SET-PPRINT-DISPATCH	*/
+
+static object LI33__SET_PPRINT_DISPATCH__ansi_io(register object V624,object V625,...)
+{	 VMB26 VMS26 VMV26
+	va_list ap;
+	va_start(ap,V625);
+	{object V626;
+	int8_t V627;
+	int8_t V628;
+	object V629;
+	object V630;
+	object V631;
+	V626= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V626))==Cnil){
+	goto T1634;
+	}
+	V627= -((char)fcall.argd);
+	goto T1633;
+	
+	goto T1634;
+T1634:;
+	V627= fcall.argd;
+	goto T1633;
+T1633:;
+	V628= (V627)-(2);
+	V629= Cnil;
+	if(((V626))==Cnil){
+	goto T1640;
+	}
+	if(!((V628)==(1))){
+	goto T1643;
+	}
+	V628= 0;
+	V629= va_arg(ap,object);
+	if(((V629))==Cnil){
+	goto T1646;
+	}
+	goto T1639;
+	
+	goto T1646;
+T1646:;
+	goto T1639;
+	
+	goto T1643;
+T1643:;
+	goto T1639;
+	
+	goto T1640;
+T1640:;
+	goto T1639;
+T1639:;
+	if(!((V628)>(0))){
+	goto T1652;
+	}
+	V628= (V628)-(1);
+	V630= va_arg(ap,object);
+	goto T1638;
+	
+	goto T1652;
+T1652:;
+	if(((V629))==Cnil){
+	goto T1657;
+	}
+	{object V632;
+	V632= (V629)->c.c_car;
+	V629= (V629)->c.c_cdr;
+	V630= (V632);
+	goto T1638;
+	}
+	goto T1657;
+T1657:;
+	V630= make_fixnum(0);
+	goto T1638;
+T1638:;
+	if(((V626))==Cnil){
+	goto T1665;
+	}
+	if(!((V628)==(1))){
+	goto T1668;
+	}
+	V628= 0;
+	V629= va_arg(ap,object);
+	if(((V629))==Cnil){
+	goto T1671;
+	}
+	goto T1664;
+	
+	goto T1671;
+T1671:;
+	goto T1664;
+	
+	goto T1668;
+T1668:;
+	goto T1664;
+	
+	goto T1665;
+T1665:;
+	goto T1664;
+T1664:;
+	if(!((V628)>(0))){
+	goto T1677;
+	}
+	V628= (V628)-(1);
+	V631= va_arg(ap,object);
+	goto T1663;
+	
+	goto T1677;
+T1677:;
+	if(((V629))==Cnil){
+	goto T1682;
+	}
+	{object V635;
+	V635= (V629)->c.c_car;
+	V629= (V629)->c.c_cdr;
+	V631= (V635);
+	goto T1663;
+	}
+	goto T1682;
+T1682:;
+	if(((((object)VV[82])->s.s_dbind))==Cnil){
+	goto T1688;
+	}
+	V631= (((object)VV[82])->s.s_dbind);
+	goto T1663;
+	
+	goto T1688;
+T1688:;
+	V631= Cnil;
+	goto T1663;
+T1663:;
+	V638= tp7(V624);
+	switch(V638){
+	case 545:
+	goto T1700;
+T1700:;
+	if(((fcall.fun=((object)VV[201])->s.s_gfdef,/* SYSTEM::SI-CLASSP */(*LnkLI65)((V624))))==Cnil){
+	goto T1707;
+	}
+	goto T1697;
+	
+	goto T1707;
+T1707:;
+	goto T1696;
+	
+	case 0:
+	goto T1701;
+T1701:;
+	{object V639;
+	V639= V624->c.c_car;
+	V640= tp7(V639);
+	switch(V640){
+	case 610:
+	goto T1717;
+T1717:;
+	case -2:
+	goto T1718;
+T1718:;
+	case 609:
+	goto T1719;
+T1719:;
+	goto T1713;
+	
+	case 608:
+	goto T1720;
+T1720:;
+	if(!(((V639))==(((object)VV[196])))){
+	goto T1733;
+	}
+	goto T1732;
+	
+	goto T1733;
+T1733:;
+	goto T1730;
+	
+	goto T1732;
+T1732:;
+	goto T1725;
+	
+	goto T1730;
+T1730:;
+	if(!(((V639))==(((object)VV[202])))){
+	goto T1739;
+	}
+	goto T1738;
+	
+	goto T1739;
+T1739:;
+	goto T1736;
+	
+	goto T1738;
+T1738:;
+	goto T1725;
+	
+	goto T1736;
+T1736:;
+	goto T1724;
+	
+	goto T1725;
+T1725:;
+	goto T1722;
+	
+	goto T1724;
+T1724:;
+	goto T1713;
+	
+	goto T1722;
+T1722:;
+	goto T1711;
+	
+	default:
+	goto T1721;
+T1721:;
+	goto T1711;
+	}
+	goto T1711;
+	}
+	goto T1713;
+T1713:;
+	if(((fcall.argd=1,/* SYSTEM::IMPROPER-CONSP */(*LnkLI66)((V624))))==Cnil){
+	goto T1743;
+	}
+	goto T1709;
+	
+	goto T1743;
+T1743:;
+	goto T1710;
+	
+	goto T1711;
+T1711:;
+	goto T1709;
+	
+	goto T1710;
+T1710:;
+	goto T1697;
+	
+	goto T1709;
+T1709:;
+	goto T1696;
+	
+	case 610:
+	goto T1702;
+T1702:;
+	case -2:
+	goto T1703;
+T1703:;
+	case 609:
+	goto T1704;
+T1704:;
+	goto T1697;
+	
+	case 608:
+	goto T1705;
+T1705:;
+	if(!(((V624))==(((object)VV[196])))){
+	goto T1747;
+	}
+	goto T1745;
+	
+	goto T1747;
+T1747:;
+	goto T1697;
+	
+	goto T1745;
+T1745:;
+	goto T1696;
+	
+	default:
+	goto T1706;
+T1706:;
+	goto T1696;
+	}
+	goto T1696;
+	
+	goto T1697;
+T1697:;
+	goto T1695;
+	
+	goto T1696;
+T1696:;
+	goto T1693;
+	
+	goto T1695;
+T1695:;
+	goto T1692;
+	
+	goto T1693;
+T1693:;
+	V624= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[204]),(V624),((object)VV[205]),Cnil));
+	goto T1692;
+T1692:;
+	V641= tp5(V625);
+	switch(V641){
+	case 0:
+	goto T1758;
+T1758:;
+	{object V642;
+	V642= V625->c.c_car;
+	V643= tp6(V642);
+	if(!((V643)==((fixnum)608))){
+	goto T1769;
+	}
+	if(!(((V642))==(((object)VV[206])))){
+	goto T1773;
+	}
+	goto T1767;
+	
+	goto T1773;
+T1773:;
+	goto T1765;
+	
+	goto T1769;
+T1769:;
+	goto T1765;
+	}
+	goto T1767;
+T1767:;
+	{object V644;
+	V644= V625->c.c_cdr;
+	V645= tp3(V644);
+	if(!((V645)==(0))){
+	goto T1776;
+	}
+	{object V646;
+	V646= V644->c.c_car;
+	V647= tp5(V646);
+	switch(V647){
+	case -2:
+	goto T1788;
+T1788:;
+	case 19:
+	goto T1789;
+T1789:;
+	goto T1784;
+	
+	default:
+	goto T1790;
+T1790:;
+	goto T1782;
+	}
+	goto T1782;
+	}
+	goto T1784;
+T1784:;
+	{object V648;
+	V648= V644->c.c_cdr;
+	V649= tp1(V648);
+	if(!((V649)==(1))){
+	goto T1793;
+	}
+	goto T1781;
+	
+	goto T1793;
+T1793:;
+	goto T1780;
+	}
+	goto T1782;
+T1782:;
+	goto T1780;
+	
+	goto T1781;
+T1781:;
+	goto T1764;
+	
+	goto T1780;
+T1780:;
+	goto T1763;
+	
+	goto T1776;
+T1776:;
+	goto T1763;
+	}
+	goto T1765;
+T1765:;
+	goto T1763;
+	
+	goto T1764;
+T1764:;
+	goto T1755;
+	
+	goto T1763;
+T1763:;
+	goto T1753;
+	
+	case 24:
+	goto T1759;
+T1759:;
+	case -2:
+	goto T1760;
+T1760:;
+	case 19:
+	goto T1761;
+T1761:;
+	goto T1755;
+	
+	default:
+	goto T1762;
+T1762:;
+	goto T1753;
+	}
+	goto T1753;
+	
+	goto T1755;
+T1755:;
+	goto T1752;
+	
+	goto T1753;
+T1753:;
+	V625= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[207]),(V625),((object)VV[208]),Cnil));
+	goto T1752;
+T1752:;
+	V650= tp4(V630);
+	switch(V650){
+	case -1:
+	goto T1807;
+T1807:;
+	case 1:
+	goto T1808;
+T1808:;
+	case 2:
+	goto T1809;
+T1809:;
+	case 3:
+	goto T1810;
+T1810:;
+	case 4:
+	goto T1811;
+T1811:;
+	case 5:
+	goto T1812;
+T1812:;
+	goto T1804;
+	
+	default:
+	goto T1813;
+T1813:;
+	goto T1803;
+	}
+	goto T1803;
+	
+	goto T1804;
+T1804:;
+	goto T1802;
+	
+	goto T1803;
+T1803:;
+	goto T1800;
+	
+	goto T1802;
+T1802:;
+	goto T1799;
+	
+	goto T1800;
+T1800:;
+	V630= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[209]),(V630),((object)VV[186]),Cnil));
+	goto T1799;
+T1799:;
+	V651= tp3(V631);
+	if(!((V651)==(0))){
+	goto T1826;
+	}
+	goto T1825;
+	
+	goto T1826;
+T1826:;
+	goto T1823;
+	
+	goto T1825;
+T1825:;
+	{object V652;
+	V652= V631->c.c_car;
+	V653= tp2(V652);
+	if(!((V653)==(0))){
+	goto T1835;
+	}
+	goto T1834;
+	
+	goto T1835;
+T1835:;
+	goto T1833;
+	
+	goto T1834;
+T1834:;
+	goto T1831;
+	
+	goto T1833;
+T1833:;
+	goto T1829;
+	}
+	goto T1831;
+T1831:;
+	{object V654;
+	V654= V631->c.c_cdr;
+	V655= tp5(V654);
+	switch(V655){
+	case 24:
+	goto T1841;
+T1841:;
+	case -2:
+	goto T1842;
+T1842:;
+	goto T1822;
+	
+	default:
+	goto T1843;
+T1843:;
+	goto T1821;
+	}
+	goto T1821;
+	}
+	goto T1829;
+T1829:;
+	goto T1821;
+	
+	goto T1823;
+T1823:;
+	goto T1821;
+	
+	goto T1822;
+T1822:;
+	goto T1820;
+	
+	goto T1821;
+T1821:;
+	goto T1818;
+	
+	goto T1820;
+T1820:;
+	goto T1817;
+	
+	goto T1818;
+T1818:;
+	V631= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[210]),(V631),((object)VV[211]),Cnil));
+	goto T1817;
+T1817:;
+	{object V656;
+	object V657;
+	V656= (V624);
+	{object V658;
+	V658= V631->c.c_car;
+	{register fixnum V659;
+	V659= 2;
+	if(!(equal_is_eq((V624)))){
+	goto T1850;
+	}
+	V659= 0;
+	goto T1849;
+	
+	goto T1850;
+T1850:;
+	goto T1849;
+T1849:;
+	{register object V660;
+	V660= (V658);
+	goto T1861;
+T1861:;
+	if(((V660))==Cnil){
+	goto T1863;
+	}
+	{object V662;
+	V662= (V660)->c.c_car;
+	V663= tp2(V662);
+	if(!((V663)==(0))){
+	goto T1874;
+	}
+	goto T1873;
+	
+	goto T1874;
+T1874:;
+	goto T1872;
+	
+	goto T1873;
+T1873:;
+	goto T1869;
+	
+	goto T1872;
+T1872:;
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI39)(((object)VV[212]),((object)VV[213]),(V662),((object)VV[214]),((object)VV[215]))));
+	goto T1868;
+	
+	goto T1869;
+T1869:;
+	goto T1868;
+T1868:;
+	if(((V662))==Cnil){
+	goto T1880;
+	}
+	{object V664;
+	V664= V662->c.c_car;
+	switch(V659){
+	case 0:
+	goto T1887;
+T1887:;
+	if(!(((V624))==((V664)))){
+	goto T1884;
+	}
+	goto T1885;
+	
+	case 2:
+	goto T1888;
+T1888:;
+	if(!(equal((V624),(V664)))){
+	goto T1884;
+	}
+	goto T1885;
+	}
+	goto T1884;
+	
+	goto T1885;
+T1885:;
+	goto T1879;
+	
+	goto T1884;
+T1884:;
+	goto T1877;
+	}
+	goto T1880;
+T1880:;
+	goto T1877;
+	
+	goto T1879;
+T1879:;
+	V657= (V662);
+	goto T1846;
+	
+	goto T1877;
+T1877:;}
+	{object V665;
+	V665= (V660)->c.c_cdr;
+	V660= (V665);
+	goto T1861;
+	}
+	goto T1863;
+T1863:;
+	goto T1859;
+	}
+	goto T1859;
+T1859:;
+	if(((V658))==Cnil){
+	goto T1857;
+	}
+	goto T1854;
+	
+	goto T1857;
+T1857:;
+	V657= Cnil;
+	goto T1846;
+	
+	goto T1854;
+T1854:;
+	V657= Cnil;}}
+	goto T1846;
+T1846:;
+	V667= tp7(V624);
+	switch(V667){
+	case 545:
+	goto T1902;
+T1902:;
+	if(((fcall.fun=((object)VV[201])->s.s_gfdef,/* SYSTEM::SI-CLASSP */(*LnkLI65)((V624))))==Cnil){
+	goto T1908;
+	}
+	goto T1899;
+	
+	goto T1908;
+T1908:;
+	goto T1898;
+	
+	case 0:
+	goto T1903;
+T1903:;
+	{object V668;
+	V668= V624->c.c_car;
+	V669= tp7(V668);
+	switch(V669){
+	case 610:
+	goto T1917;
+T1917:;
+	case -2:
+	goto T1918;
+T1918:;
+	case 609:
+	goto T1919;
+T1919:;
+	goto T1913;
+	
+	case 608:
+	goto T1920;
+T1920:;
+	if(!(((V668))==(((object)VV[196])))){
+	goto T1933;
+	}
+	goto T1932;
+	
+	goto T1933;
+T1933:;
+	goto T1930;
+	
+	goto T1932;
+T1932:;
+	goto T1925;
+	
+	goto T1930;
+T1930:;
+	if(!(((V668))==(((object)VV[202])))){
+	goto T1939;
+	}
+	goto T1938;
+	
+	goto T1939;
+T1939:;
+	goto T1936;
+	
+	goto T1938;
+T1938:;
+	goto T1925;
+	
+	goto T1936;
+T1936:;
+	goto T1924;
+	
+	goto T1925;
+T1925:;
+	goto T1922;
+	
+	goto T1924;
+T1924:;
+	goto T1913;
+	
+	goto T1922;
+T1922:;
+	goto T1912;
+	
+	default:
+	goto T1921;
+T1921:;
+	goto T1912;
+	}
+	goto T1912;
+	}
+	goto T1913;
+T1913:;
+	goto T1911;
+	
+	goto T1912;
+T1912:;
+	goto T1910;
+	
+	goto T1911;
+T1911:;
+	goto T1899;
+	
+	goto T1910;
+T1910:;
+	goto T1898;
+	
+	case 610:
+	goto T1904;
+T1904:;
+	case -2:
+	goto T1905;
+T1905:;
+	case 609:
+	goto T1906;
+T1906:;
+	goto T1899;
+	
+	case 608:
+	goto T1907;
+T1907:;
+	if(!(((V624))==(((object)VV[196])))){
+	goto T1946;
+	}
+	goto T1944;
+	
+	goto T1946;
+T1946:;
+	goto T1899;
+	
+	goto T1944;
+T1944:;
+	goto T1898;
+	}
+	goto T1898;
+	
+	goto T1899;
+T1899:;
+	goto T1897;
+	
+	goto T1898;
+T1898:;
+	goto T1895;
+	
+	goto T1897;
+T1897:;
+	V656= (V624);
+	goto T1894;
+	
+	goto T1895;
+T1895:;
+	V656= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[204]),(V624),((object)VV[205]),Cnil));
+	goto T1894;
+T1894:;
+	if(((V657))==Cnil){
+	goto T1950;
+	}
+	V670= V657->c.c_cdr;
+	(void)((((V670))->c.c_car=((V625)),((V670))));
+	{object V672;
+	V672= V657->c.c_cdr;
+	V671= V672->c.c_cdr;}
+	(void)((((V671))->c.c_car=((V630)),((V671))));
+	goto T1949;
+	
+	goto T1950;
+T1950:;
+	{object V673;
+	object V674;
+	V673= list(3,(V656),(V625),(V630));
+	V675= V631->c.c_car;
+	V674= make_cons((V673),(V675));
+	(void)((((V631))->c.c_car=((V674)),((V631))));}
+	goto T1949;
+T1949:;
+	{register object V676;
+	V676= V631->c.c_car;
+	{register fixnum V677;
+	register object V678;
+	register object V679;
+	V677= length((V676));
+	V680= tp2(V676);
+	if(!((V680)==(0))){
+	goto T1967;
+	}
+	V678= Ct;
+	goto T1966;
+	
+	goto T1967;
+T1967:;
+	V678= Cnil;
+	goto T1966;
+T1966:;
+	if(((V678))==Cnil){
+	goto T1972;
+	}
+	{object V681;
+	V681= (fcall.fun=((object)VV[56])->s.s_gfdef,/* SYSTEM::MAKE-VECTOR */(*LnkLI45)(Ct,V677,Cnil,Cnil,Cnil,(fixnum)0,Cnil,Cnil));
+	V679= (V681);
+	goto T1971;
+	}
+	goto T1972;
+T1972:;
+	V679= Cnil;
+	goto T1971;
+T1971:;
+	if(((V678))==Cnil){
+	goto T1977;
+	}
+	{register fixnum V682;
+	register object V683;
+	V682= 0;
+	V683= (V676);
+	goto T1982;
+T1982:;
+	if(!((V682)>=(V677))){
+	goto T1987;
+	}
+	goto T1984;
+	
+	goto T1987;
+T1987:;
+	{fixnum V684;
+	V684= V682;
+	{fixnum V686;
+	{fixnum V687;
+	V687= ((fixnum)V679);
+	V686= ((fixnum*)V687)[(fixnum)1];}
+	(void)(((object*)V686)[V684]=(V683));}}
+	{fixnum V688;
+	object V689;
+	{fixnum V690;
+	V690= V682;
+	{fixnum V691;
+	V691= (V690)+(1);
+	V688= V691;}}
+	V689= (V683)->c.c_cdr;
+	V682= V688;
+	V683= (V689);}
+	goto T1982;
+	
+	goto T1984;
+T1984:;
+	goto T1976;
+	}
+	goto T1977;
+T1977:;
+	goto T1976;
+T1976:;
+	{register object V693;
+	V694= CMPmake_fixnum(V677);
+	V693= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V694);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=make_fixnum(0);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	goto T2005;
+T2005:;
+	if(((V693))==Cnil){
+	goto T2012;
+	}
+	goto T2010;
+	
+	goto T2012;
+T2012:;
+	goto T2007;
+	
+	goto T2010;
+T2010:;
+	{register fixnum V695;
+	register fixnum V696;
+	{object V697;
+	V697= (V693)->c.c_car;
+	V693= (V693)->c.c_cdr;
+	V695= fix((V697));}
+	{object V700;
+	V700= V693->c.c_car;
+	V693= V693->c.c_cdr;
+	V696= fix((V700));}
+	goto T2024;
+T2024:;
+	{fixnum V702;
+	V702= V695;
+	{fixnum V703;
+	V703= (V702)-(1);
+	V701= V703;}}
+	if(!((V696)>=(V701))){
+	goto T2029;
+	}
+	goto T2026;
+	
+	goto T2029;
+T2029:;
+	{fixnum V704;
+	register object V705;
+	{fixnum V706;
+	fixnum V707;
+	V706= V696;
+	{fixnum V709;
+	fixnum V710;
+	V709= V695;
+	V710= V696;
+	{fixnum V711;
+	V711= (V709)-(V710);
+	V708= CMPmake_fixnum(V711);}}
+	V707= fix((fcall.fun=((object)VV[216])->s.s_gfdef,fcall.valp=(fixnum)0,fcall.argd=1,/* COMMON-LISP::RANDOM */(*LnkLI67)((V708))));
+	{fixnum V712;
+	V712= (V706)+(V707);
+	V704= V712;}}
+	{object V713;
+	if(((V678))==Cnil){
+	goto T2045;
+	}
+	{object V714;
+	{fixnum V715;
+	{fixnum V716;
+	V716= ((fixnum)V679);
+	V715= ((fixnum*)V716)[(fixnum)1];}
+	V714= ((object*)V715)[V704];}
+	V713= V714->c.c_car;
+	goto T2044;
+	}
+	goto T2045;
+T2045:;
+	V713= (/* COMMON-LISP::ROW-MAJOR-AREF */(*LnkLI52)((V676),V704));
+	goto T2044;
+T2044:;
+	{object V717;
+	{object V718;
+	V718= V713->c.c_cdr;
+	V717= V718->c.c_cdr;}
+	V705= V717->c.c_car;}}
+	if(((V678))==Cnil){
+	goto T2054;
+	}
+	{object V719;
+	{object V720;
+	{fixnum V721;
+	V721= V696;
+	{fixnum V722;
+	{fixnum V723;
+	V723= ((fixnum)V679);
+	V722= ((fixnum*)V723)[(fixnum)1];}
+	V720= ((object*)V722)[V721];}}
+	V719= V720->c.c_car;}
+	{object V724;
+	object V725;
+	{fixnum V726;
+	V726= V696;
+	{fixnum V727;
+	{fixnum V728;
+	V728= ((fixnum)V679);
+	V727= ((fixnum*)V728)[(fixnum)1];}
+	V724= ((object*)V727)[V726];}}
+	{object V729;
+	{fixnum V730;
+	{fixnum V731;
+	V731= ((fixnum)V679);
+	V730= ((fixnum*)V731)[(fixnum)1];}
+	V729= ((object*)V730)[V704];}
+	V725= V729->c.c_car;}
+	(void)((((V724))->c.c_car=((V725)),((V724))));}
+	{object V732;
+	{fixnum V733;
+	{fixnum V734;
+	V734= ((fixnum)V679);
+	V733= ((fixnum*)V734)[(fixnum)1];}
+	V732= ((object*)V733)[V704];}
+	(void)((((V732))->c.c_car=((V719)),((V732))));
+	goto T2053;
+	}}
+	goto T2054;
+T2054:;
+	(void)((fcall.argd=5,/* SYSTEM::SET-ARRAY */(*LnkLI68)((V676),V696,(V676),V704,Ct)));
+	goto T2053;
+T2053:;
+	{register fixnum V735;
+	register fixnum V736;
+	V735= V696;
+	V736= V695;
+	goto T2080;
+T2080:;
+	if(!((V735)>=(V736))){
+	goto T2085;
+	}
+	goto T2082;
+	
+	goto T2085;
+T2085:;
+	{register object V737;
+	V737= Ct;
+	goto T2089;
+T2089:;
+	if(((V737))==Cnil){
+	goto T2100;
+	}
+	{fixnum V739;
+	V739= V735;
+	{fixnum V740;
+	V740= (V739)+(1);
+	V735= V740;}}
+	V738= V735;
+	goto T2099;
+	
+	goto T2100;
+T2100:;
+	V738= V735;
+	goto T2099;
+T2099:;
+	if(((V737))==Cnil){
+	goto T2107;
+	}
+	V741= V736;
+	goto T2106;
+	
+	goto T2107;
+T2107:;
+	{fixnum V742;
+	V742= V736;
+	{fixnum V743;
+	V743= (V742)-(1);
+	V736= V743;}}
+	V741= V736;
+	goto T2106;
+T2106:;
+	if(!((V738)>=(V741))){
+	goto T2096;
+	}
+	goto T2095;
+	
+	goto T2096;
+T2096:;
+	{object V744;
+	{object V745;
+	if(((V678))==Cnil){
+	goto T2115;
+	}
+	{object V746;
+	{fixnum V747;
+	if(((V737))==Cnil){
+	goto T2120;
+	}
+	V747= V735;
+	goto T2119;
+	
+	goto T2120;
+T2120:;
+	V747= V736;
+	goto T2119;
+T2119:;
+	{fixnum V748;
+	{fixnum V749;
+	V749= ((fixnum)V679);
+	V748= ((fixnum*)V749)[(fixnum)1];}
+	V746= ((object*)V748)[V747];}}
+	V745= V746->c.c_car;
+	goto T2114;
+	}
+	goto T2115;
+T2115:;
+	{fixnum V750;
+	if(((V737))==Cnil){
+	goto T2126;
+	}
+	V750= V735;
+	goto T2125;
+	
+	goto T2126;
+T2126:;
+	V750= V736;
+	goto T2125;
+T2125:;
+	V745= (/* COMMON-LISP::ROW-MAJOR-AREF */(*LnkLI52)((V676),V750));}
+	goto T2114;
+T2114:;
+	{object V751;
+	{object V752;
+	V752= V745->c.c_cdr;
+	V751= V752->c.c_cdr;}
+	V744= V751->c.c_car;}}
+	{object V753;
+	object V754;
+	if(((V737))==Cnil){
+	goto T2137;
+	}
+	V753= (V744);
+	goto T2136;
+	
+	goto T2137;
+T2137:;
+	V753= (V705);
+	goto T2136;
+T2136:;
+	if(((V737))==Cnil){
+	goto T2141;
+	}
+	V754= (V705);
+	goto T2140;
+	
+	goto T2141;
+T2141:;
+	V754= (V744);
+	goto T2140;
+T2140:;
+	if(((fcall.fun=((object)VV[218])->s.s_gfdef,/* SYSTEM::>2 */(*LnkLI69)((V753),(V754))))==Cnil){
+	goto T2146;
+	}
+	goto T2144;
+	
+	goto T2146;
+T2146:;
+	goto T2134;
+	
+	goto T2144;
+T2144:;}
+	goto T2131;
+	
+	goto T2134;
+T2134:;
+	if(((V737))==Cnil){
+	goto T2149;
+	}
+	V737= Cnil;
+	goto T2148;
+	
+	goto T2149;
+T2149:;
+	V737= Ct;
+	goto T2148;
+T2148:;
+	if(((V737))==Cnil){
+	goto T2094;
+	}
+	goto T2095;
+	
+	goto T2131;
+T2131:;
+	goto T2094;
+	}
+	goto T2095;
+T2095:;
+	goto T2091;
+	
+	goto T2094;
+T2094:;
+	goto T2089;
+	
+	goto T2091;
+T2091:;
+	goto T2087;
+	}
+	goto T2087;
+T2087:;
+	{object V755;
+	fixnum V756;
+	fixnum V757;
+	V755= ((V735)<(V736)?Ct:Cnil);
+	if(((V755))==Cnil){
+	goto T2156;
+	}
+	V756= V735;
+	goto T2155;
+	
+	goto T2156;
+T2156:;
+	V756= V696;
+	goto T2155;
+T2155:;
+	if(((V755))==Cnil){
+	goto T2160;
+	}
+	V757= V736;
+	goto T2159;
+	
+	goto T2160;
+T2160:;
+	{fixnum V758;
+	V758= V735;
+	{fixnum V759;
+	V759= (V758)-(1);
+	V704= V759;}}
+	V757= V704;
+	goto T2159;
+T2159:;
+	if(((V678))==Cnil){
+	goto T2166;
+	}
+	{object V760;
+	{object V761;
+	{fixnum V762;
+	{fixnum V763;
+	V763= ((fixnum)V679);
+	V762= ((fixnum*)V763)[(fixnum)1];}
+	V761= ((object*)V762)[V756];}
+	V760= V761->c.c_car;}
+	{object V764;
+	object V765;
+	{fixnum V766;
+	{fixnum V767;
+	V767= ((fixnum)V679);
+	V766= ((fixnum*)V767)[(fixnum)1];}
+	V764= ((object*)V766)[V756];}
+	{object V768;
+	{fixnum V769;
+	{fixnum V770;
+	V770= ((fixnum)V679);
+	V769= ((fixnum*)V770)[(fixnum)1];}
+	V768= ((object*)V769)[V757];}
+	V765= V768->c.c_car;}
+	(void)((((V764))->c.c_car=((V765)),((V764))));}
+	{object V771;
+	{fixnum V772;
+	{fixnum V773;
+	V773= ((fixnum)V679);
+	V772= ((fixnum*)V773)[(fixnum)1];}
+	V771= ((object*)V772)[V757];}
+	(void)((((V771))->c.c_car=((V760)),((V771))));
+	goto T2153;
+	}}
+	goto T2166;
+T2166:;
+	(void)((fcall.argd=5,/* SYSTEM::SET-ARRAY */(*LnkLI68)((V676),V756,(V676),V757,Ct)));}
+	goto T2153;
+T2153:;
+	goto T2080;
+	
+	goto T2082;
+T2082:;
+	goto T2076;
+	}
+	goto T2076;
+T2076:;
+	{fixnum V774;
+	register object V775;
+	fixnum V776;
+	fixnum V777;
+	object V778;
+	fixnum V779;
+	fixnum V780;
+	fixnum V781;
+	fixnum V782;
+	{fixnum V783;
+	V783= V704;
+	{fixnum V784;
+	V784= (V783)+(1);
+	V774= V784;}}
+	{fixnum V786;
+	V786= V695;
+	{fixnum V787;
+	V787= (V786)-(V774);
+	V785= V787;}}
+	{fixnum V789;
+	fixnum V790;
+	V789= V704;
+	V790= V696;
+	{fixnum V791;
+	V791= (V789)-(V790);
+	V788= V791;}}
+	V775= ((V785)<(V788)?Ct:Cnil);
+	if(((V775))==Cnil){
+	goto T2200;
+	}
+	V776= V774;
+	goto T2199;
+	
+	goto T2200;
+T2200:;
+	V776= 0;
+	goto T2199;
+T2199:;
+	if(((V775))==Cnil){
+	goto T2204;
+	}
+	V777= 0;
+	goto T2203;
+	
+	goto T2204;
+T2204:;
+	V777= V704;
+	goto T2203;
+T2203:;
+	if(((V775))==Cnil){
+	goto T2208;
+	}
+	{fixnum V793;
+	V793= V695;
+	{fixnum V794;
+	V794= (V793)-(V776);
+	V792= V794;}}
+	V778= ((V792)>(1)?Ct:Cnil);
+	goto T2207;
+	
+	goto T2208;
+T2208:;
+	{fixnum V796;
+	V796= V696;
+	{fixnum V797;
+	V797= (V777)-(V796);
+	V795= V797;}}
+	V778= ((V795)>(1)?Ct:Cnil);
+	goto T2207;
+T2207:;
+	if(((V775))==Cnil){
+	goto T2218;
+	}
+	V779= V776;
+	goto T2217;
+	
+	goto T2218;
+T2218:;
+	V779= V696;
+	goto T2217;
+T2217:;
+	if(((V775))==Cnil){
+	goto T2222;
+	}
+	V780= V695;
+	goto T2221;
+	
+	goto T2222;
+T2222:;
+	V780= V777;
+	goto T2221;
+T2221:;
+	if(((V775))==Cnil){
+	goto T2226;
+	}
+	V781= V704;
+	goto T2225;
+	
+	goto T2226;
+T2226:;
+	V781= V695;
+	goto T2225;
+T2225:;
+	if(((V775))==Cnil){
+	goto T2230;
+	}
+	V782= V696;
+	goto T2229;
+	
+	goto T2230;
+T2230:;
+	V782= V774;
+	goto T2229;
+T2229:;
+	if(((V778))==Cnil){
+	goto T2234;
+	}
+	V798= CMPmake_fixnum(V779);
+	V693= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(1*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V798);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=(V693);_b;});
+	V799= CMPmake_fixnum(V780);
+	V693= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(1*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V799);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=(V693);_b;});
+	goto T2233;
+	
+	goto T2234;
+T2234:;
+	goto T2233;
+T2233:;
+	V695= V781;
+	V696= V782;}}
+	goto T2024;
+	
+	goto T2026;
+T2026:;
+	goto T2014;
+	}
+	goto T2014;
+T2014:;
+	goto T2005;
+	
+	goto T2007;
+T2007:;
+	goto T1963;
+	}}}
+	goto T1963;
+T1963:;
+	{object V800;
+	V801= V631->c.c_car;
+	V802= (/* SYSTEM::PPRINT-MAKE-DISPATCH */(*LnkLI71)((V801)));
+	V800= (fcall.valp=(fixnum)0,fcall.argd=2,/* COMMON-LISP::COMPILE */(*LnkLI70)(Cnil,(V802)));
+	(void)((((V631))->c.c_cdr=((V800)),((V631))));}
+	{object V803 = Cnil;
+	VMR26(V803);}}}
+	va_end(ap);
+}
+/*	local entry for function COMMON-LISP::PPRINT-DISPATCH	*/
+
+static object LI34__PPRINT_DISPATCH__ansi_io(object V805,...)
+{	 VMB27 VMS27 VMV27
+	va_list ap;
+	va_start(ap,V805);
+	{fixnum V806;
+	object V807;
+	int8_t V808;
+	int8_t V809;
+	object V810;
+	object V811;
+	V806= fcall.valp;
+	V807= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V807))==Cnil){
+	goto T2252;
+	}
+	V808= -((char)fcall.argd);
+	goto T2251;
+	
+	goto T2252;
+T2252:;
+	V808= fcall.argd;
+	goto T2251;
+T2251:;
+	V809= (V808)-(1);
+	V810= Cnil;
+	if(((V807))==Cnil){
+	goto T2258;
+	}
+	if(!((V809)==(1))){
+	goto T2261;
+	}
+	V809= 0;
+	V810= va_arg(ap,object);
+	if(((V810))==Cnil){
+	goto T2264;
+	}
+	goto T2257;
+	
+	goto T2264;
+T2264:;
+	goto T2257;
+	
+	goto T2261;
+T2261:;
+	goto T2257;
+	
+	goto T2258;
+T2258:;
+	goto T2257;
+T2257:;
+	if(!((V809)>(0))){
+	goto T2270;
+	}
+	V809= 0;
+	V811= va_arg(ap,object);
+	goto T2256;
+	
+	goto T2270;
+T2270:;
+	if(((V810))==Cnil){
+	goto T2275;
+	}
+	{object V812;
+	V812= (V810)->c.c_car;
+	V810= (V810)->c.c_cdr;
+	V811= (V812);
+	goto T2256;
+	}
+	goto T2275;
+T2275:;
+	if(((((object)VV[82])->s.s_dbind))==Cnil){
+	goto T2281;
+	}
+	V811= (((object)VV[82])->s.s_dbind);
+	goto T2256;
+	
+	goto T2281;
+T2281:;
+	V811= Cnil;
+	goto T2256;
+T2256:;
+	V815= tp3(V811);
+	if(!((V815)==(0))){
+	goto T2294;
+	}
+	goto T2293;
+	
+	goto T2294;
+T2294:;
+	goto T2291;
+	
+	goto T2293;
+T2293:;
+	{object V816;
+	V816= V811->c.c_car;
+	V817= tp2(V816);
+	if(!((V817)==(0))){
+	goto T2303;
+	}
+	goto T2302;
+	
+	goto T2303;
+T2303:;
+	goto T2301;
+	
+	goto T2302;
+T2302:;
+	goto T2299;
+	
+	goto T2301;
+T2301:;
+	goto T2297;
+	}
+	goto T2299;
+T2299:;
+	{object V818;
+	V818= V811->c.c_cdr;
+	V819= tp5(V818);
+	switch(V819){
+	case 24:
+	goto T2309;
+T2309:;
+	case -2:
+	goto T2310;
+T2310:;
+	goto T2290;
+	
+	default:
+	goto T2311;
+T2311:;
+	goto T2289;
+	}
+	goto T2289;
+	}
+	goto T2297;
+T2297:;
+	goto T2289;
+	
+	goto T2291;
+T2291:;
+	goto T2289;
+	
+	goto T2290;
+T2290:;
+	goto T2288;
+	
+	goto T2289;
+T2289:;
+	goto T2286;
+	
+	goto T2288;
+T2288:;
+	goto T2285;
+	
+	goto T2286;
+T2286:;
+	V811= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[221]),(V811),((object)VV[222]),Cnil));
+	goto T2285;
+T2285:;
+	if((V811->c.c_cdr)==Cnil){
+	goto T2314;
+	}
+	{object V820;
+	V820= V811->c.c_cdr;
+	V822= tp4(V820);
+	if(!((V822)==(24))){
+	goto T2322;
+	}
+	goto T2321;
+	
+	goto T2322;
+T2322:;
+	goto T2319;
+	
+	goto T2321;
+T2321:;
+	V821= (V820);
+	goto T2318;
+	
+	goto T2319;
+T2319:;
+	V821= (V820)->s.s_gfdef;
+	goto T2318;
+T2318:;
+	{object V823;
+	V823= ({object _z;fixnum _v=(fixnum)V806;
+        fcall.fun=(V821);fcall.valp=_v;fcall.argd=2-1;
+        _z=Rset && !((V821))->fun.fun_argd && 
+        fcall.argd>=((V821))->fun.fun_minarg && fcall.argd<=(((V821))->fun.fun_maxarg) ? 
+        ((V821))->fun.fun_self((V805)) : call_proc_cs2((V805));
+           if (!((V821))->fun.fun_neval && !((V821))->fun.fun_vv) vs_top=_v ? (object *)_v : sup;
+           _z;});
+	VMRV27(V823,-2);}}
+	goto T2314;
+T2314:;
+	{object V824;
+	if (V806) {
+	#define V825 ((object *)V806)[0]
+	V824= ({object  _t0=Cnil;object  _t1=Cnil;
+	V825= (_t1);_t0;});
+	#undef V825
+	} else {
+	V824= ({object  _t0=Cnil;object  _t1=Cnil;
+	(void)((_t1));_t0;});
+	}
+	VMRV27(V824,1);}}
+	va_end(ap);
+}
+/*	local entry for function COMMON-LISP::COPY-PPRINT-DISPATCH	*/
+
+static object LI35__COPY_PPRINT_DISPATCH__ansi_io(object V827,...)
+{	 VMB28 VMS28 VMV28
+	va_list ap;
+	va_start(ap,V827);
+	{object V828;
+	object V829;
+	int8_t V830;
+	int8_t V831;
+	object V832;
+	object V833;
+	V828= Ct;
+	V829= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V829))==Cnil){
+	goto T2327;
+	}
+	V830= -((char)fcall.argd);
+	goto T2326;
+	
+	goto T2327;
+T2327:;
+	V830= fcall.argd;
+	goto T2326;
+T2326:;
+	V831= (V830)-(0);
+	V832= Cnil;
+	if(((V829))==Cnil){
+	goto T2333;
+	}
+	if(!((V831)==(1))){
+	goto T2336;
+	}
+	V831= 0;
+	V828= Cnil;
+	V832= (V827);
+	if(((V832))==Cnil){
+	goto T2339;
+	}
+	goto T2332;
+	
+	goto T2339;
+T2339:;
+	goto T2332;
+	
+	goto T2336;
+T2336:;
+	goto T2332;
+	
+	goto T2333;
+T2333:;
+	goto T2332;
+T2332:;
+	if(!((V831)>(0))){
+	goto T2347;
+	}
+	V831= 0;
+	if(((V828))==Cnil){
+	goto T2352;
+	}
+	V828= Cnil;
+	V833= (V827);
+	goto T2331;
+	
+	goto T2352;
+T2352:;
+	V833= va_arg(ap,object);
+	goto T2331;
+	
+	goto T2347;
+T2347:;
+	if(((V832))==Cnil){
+	goto T2357;
+	}
+	{object V834;
+	V834= (V832)->c.c_car;
+	V832= (V832)->c.c_cdr;
+	V833= (V834);
+	goto T2331;
+	}
+	goto T2357;
+T2357:;
+	if(((((object)VV[82])->s.s_dbind))==Cnil){
+	goto T2363;
+	}
+	V833= (((object)VV[82])->s.s_dbind);
+	goto T2331;
+	
+	goto T2363;
+T2363:;
+	V833= Cnil;
+	goto T2331;
+T2331:;
+	V837= tp3(V833);
+	switch(V837){
+	case 0:
+	goto T2373;
+T2373:;
+	{object V838;
+	V838= V833->c.c_car;
+	V839= tp2(V838);
+	if(!((V839)==(0))){
+	goto T2385;
+	}
+	goto T2383;
+	
+	goto T2385;
+T2385:;
+	goto T2381;
+	}
+	goto T2383;
+T2383:;
+	{object V840;
+	V840= V833->c.c_cdr;
+	V841= tp1(V840);
+	if(!((V841)==(1))){
+	goto T2389;
+	}
+	goto T2380;
+	
+	goto T2389;
+T2389:;
+	goto T2378;
+	}
+	goto T2381;
+T2381:;
+	goto T2378;
+	
+	goto T2380;
+T2380:;
+	goto T2377;
+	
+	goto T2378;
+T2378:;
+	{object V842;
+	V842= V833->c.c_car;
+	V843= tp2(V842);
+	if(!((V843)==(0))){
+	goto T2396;
+	}
+	goto T2394;
+	
+	goto T2396;
+T2396:;
+	goto T2392;
+	}
+	goto T2394;
+T2394:;
+	{object V844;
+	V844= V833->c.c_cdr;
+	V845= tp4(V844);
+	if(!((V845)==(24))){
+	goto T2400;
+	}
+	goto T2377;
+	
+	goto T2400;
+T2400:;
+	goto T2376;
+	}
+	goto T2392;
+T2392:;
+	goto T2376;
+	
+	goto T2377;
+T2377:;
+	goto T2370;
+	
+	goto T2376;
+T2376:;
+	goto T2368;
+	
+	case 2:
+	goto T2374;
+T2374:;
+	goto T2370;
+	
+	default:
+	goto T2375;
+T2375:;
+	goto T2368;
+	}
+	goto T2368;
+	
+	goto T2370;
+T2370:;
+	goto T2367;
+	
+	goto T2368;
+T2368:;
+	V833= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI53)(((object)VV[210]),(V833),((object)VV[223]),Cnil));
+	goto T2367;
+T2367:;
+	V846= V833->c.c_car;
+	V847= V833->c.c_cdr;
+	{object V848 = make_cons((V846),(V847));
+	VMR28(V848);}}
+	va_end(ap);
+}
+static object  LnkTLI71(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[220]),0,1,(void **)(void *)&LnkLI71,0,first,ap);va_end(ap);return V1;} /* SYSTEM::PPRINT-MAKE-DISPATCH */
+static object  LnkTLI70(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[219]),0,401409,(void **)(void *)&LnkLI70,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::COMPILE */
+static object  LnkTLI69(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[218]),1,2,(void **)(void *)&LnkLI69,0,first,ap);va_end(ap);return V1;} /* SYSTEM::>2 */
+static object  LnkTLI68(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[217]),0,262148,(void **)(void *)&LnkLI68,272,first,ap);va_end(ap);return V1;} /* SYSTEM::SET-ARRAY */
+static object  LnkTLI67(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[216]),1,520192,(void **)(void *)&LnkLI67,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::RANDOM */
+static object  LnkTLI66(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[203]),0,262145,(void **)(void *)&LnkLI66,0,first,ap);va_end(ap);return V1;} /* SYSTEM::IMPROPER-CONSP */
+static object  LnkTLI65(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[201]),1,1,(void **)(void *)&LnkLI65,0,first,ap);va_end(ap);return V1;} /* SYSTEM::SI-CLASSP */
+static object  LnkTLI64(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[189]),1,266241,(void **)(void *)&LnkLI64,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::ROUND */
+static object  LnkTLI63(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[147]),0,262146,(void **)(void *)&LnkLI63,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::GETF */
+static object  LnkTLI62(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[144]),1,1,(void **)(void *)&LnkLI62,0,first,ap);va_end(ap);return V1;} /* SYSTEM::PPRINT-MISER-STYLE */
+static object  LnkTLI61(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[143]),1,262146,(void **)(void *)&LnkLI61,0,first,ap);va_end(ap);return V1;} /* SYSTEM::PPRINT-QUEUE-CODES */
+static object  LnkTLI60(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[142]),0,1,(void **)(void *)&LnkLI60,0,first,ap);va_end(ap);return V1;} /* SYSTEM::COERCE-TO-STREAM */
+static object  LnkTLI59(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[141]),1,520192,(void **)(void *)&LnkLI59,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::WRITE-CHAR */
+static object  LnkTLI58(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[115]),0,4,(void **)(void *)&LnkLI58,0,first,ap);va_end(ap);return V1;} /* SYSTEM::PPRINT-QUIT */
+static object  LnkTLI57(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[135]),1,5,(void **)(void *)&LnkLI57,0,first,ap);va_end(ap);return V1;} /* SYSTEM::WRITE-INT1 */
+static object  LnkTLI56(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[87]),1,2,(void **)(void *)&LnkLI56,0,first,ap);va_end(ap);return V1;} /* SYSTEM::WRITE-INT */
+static object  LnkTLI55(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[71]),1,520192,(void **)(void *)&LnkLI55,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::WRITE-STRING */
+static fixnum  LnkTLI54(object first,...){fixnum V1;va_list ap;va_start(ap,first);V1=(fixnum )call_proc_new(((object)VV[70]),1,2,(void **)(void *)&LnkLI54,1,first,ap);va_end(ap);return V1;} /* SYSTEM::GETHASH-INT */
+static object  LnkTLI53(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[66]),0,262147,(void **)(void *)&LnkLI53,0,first,ap);va_end(ap);return V1;} /* SYSTEM::CHECK-TYPE-SYMBOL */
+static object  LnkTLI52(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[65]),0,2,(void **)(void *)&LnkLI52,16,first,ap);va_end(ap);return V1;} /* COMMON-LISP::ROW-MAJOR-AREF */
+static object  LnkTLI51(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[64]),0,1,(void **)(void *)&LnkLI51,0,first,ap);va_end(ap);return V1;} /* SYSTEM::SEQUENCE-TP-NONSIMPLE-P */
+static object  LnkTLI50(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[63]),0,1,(void **)(void *)&LnkLI50,0,first,ap);va_end(ap);return V1;} /* SYSTEM::SEQUENCE-TP-LENGTHS */
+static object  LnkTLI49(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[61]),0,1,(void **)(void *)&LnkLI49,0,first,ap);va_end(ap);return V1;} /* SYSTEM::MAKE-SEQUENCE-ELEMENT-TYPE */
+static object  LnkTLI48(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[59]),0,262146,(void **)(void *)&LnkLI48,16,first,ap);va_end(ap);return V1;} /* COMMON-LISP::SUBSEQ */
+static object  LnkTLI47(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[58]),0,1,(void **)(void *)&LnkLI47,0,first,ap);va_end(ap);return V1;} /* SYSTEM::PPRINT-INSERT-CONDITIONAL-NEWLINES */
+static object  LnkTLI46(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[57]),0,5,(void **)(void *)&LnkLI46,0,first,ap);va_end(ap);return V1;} /* SYSTEM::COPY-BIT-VECTOR */
+static object  LnkTLI45(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[56]),1,8,(void **)(void *)&LnkLI45,4112,first,ap);va_end(ap);return V1;} /* SYSTEM::MAKE-VECTOR */
+static object  LnkTLI44(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[55]),0,1,(void **)(void *)&LnkLI44,0,first,ap);va_end(ap);return V1;} /* SYSTEM::EXPAND-ARRAY-ELEMENT-TYPE */
+static object  LnkTLI43(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[39]),0,1,(void **)(void *)&LnkLI43,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::ARRAY-ELEMENT-TYPE */
+static object  LnkTLI42(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[38]),0,2,(void **)(void *)&LnkLI42,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::LDIFF */
+static fixnum  LnkTLI41(object first,...){fixnum V1;va_list ap;va_start(ap,first);V1=(fixnum )call_proc_new(((object)VV[35]),1,262146,(void **)(void *)&LnkLI41,1,first,ap);va_end(ap);return V1;} /* SYSTEM::STRING-MATCH */
+static object  LnkTLI40(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[26]),1,262146,(void **)(void *)&LnkLI40,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::FORMAT */
+static object  LnkTLI39(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[17]),0,262145,(void **)(void *)&LnkLI39,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::ERROR */
+static object  LnkTLI38(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[7]),0,262144,(void **)(void *)&LnkLI38,0,first,ap);va_end(ap);return V1;} /* SYSTEM::MAKE-RESTART */
+static object  LnkTLI37(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[2]),0,520194,(void **)(void *)&LnkLI37,0,first,ap);va_end(ap);return V1;} /* SYSTEM::PROCESS-ERROR */
+static object  LnkTLI36(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[0]),1,1,(void **)(void *)&LnkLI36,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::FIND-PACKAGE */
+	
+	#ifdef SYSTEM_SPECIAL_INIT
+	SYSTEM_SPECIAL_INIT
+	#endif
--- /dev/null
+++ gcl27-2.7.0/mod/gcl_ansi_io.h
@@ -0,0 +1,324 @@
+
+static object LI1__IN_PACKAGE_INTERNAL__ansi_io(VOL object V2)
+;
+static void *dlsetjmp;
+#define VMB1 register object * VOL  base=vs_top; bds_ptr VOL  old_bds_top=bds_top; frame_ptr VOL  old_frs_top=frs_top; VOL  object  V23 ,V19 ,V18 ,V14 ,V13 ,V12 ,V11 ,V10 ,V9 ,V6;
+#define VMS1 register object *VOL sup=vs_top+3;vs_top=sup;
+#define VMV1 vs_check;
+#define VMRV1(a_,b_) vs_top=base; for (;bds_top>old_bds_top;) bds_unwind1; for (;frs_top>old_frs_top;) frs_pop(); return(a_);
+#define VMR1(a_) VMRV1(a_,0);
+static object LC9__LAMBDA__ansi_io(object V26)
+;
+#define VMB2
+#define VMS2
+#define VMV2
+#define VMRV2(a_,b_) return(a_);
+#define VMR2(a_) VMRV2(a_,0);
+static object LC8__LAMBDA__ansi_io(object V29,...)
+;
+#define VMB3 register object *  base=vs_top;
+#define VMS3
+#define VMV3
+#define VMRV3(a_,b_) if ((b_)>=-1) vs_top=V31 ? (object *)V31+(b_) : base; return(a_);
+#define VMR3(a_) VMRV3(a_,0);
+static object LI11__IN_PACKAGE__ansi_io(object V43,object V44)
+;
+#define VMB4  object  V53 ,V49 ,V48;
+#define VMS4
+#define VMV4
+#define VMRV4(a_,b_) return(a_);
+#define VMR4(a_) VMRV4(a_,0);
+static object LI12__PPRINT_INSERT_CONDITIONAL_NEWLINES__ansi_io(object V56)
+;
+static void *dlmemmove;
+#define VMB5  int8_t  V206;  object  V180;  int8_t  V173;  object  V164;  int8_t  V151;  fixnum  V150;  int8_t  V142;  object  V136;  int8_t  V126;  fixnum  V121;  object  V111;  int8_t  V93;  fixnum  V92;  object  V78;  int8_t  V76;  int8_t  V66;  fixnum  V57;
+#define VMS5
+#define VMV5
+#define VMRV5(a_,b_) return(a_);
+#define VMR5(a_) VMRV5(a_,0);
+static object LI13__PPRINT_CHECK_FORMAT_STRING__ansi_io(object V215)
+;
+#define VMB6  fixnum  V218;  fixnum  V217;
+#define VMS6
+#define VMV6
+#define VMRV6(a_,b_) return(a_);
+#define VMR6(a_) VMRV6(a_,0);
+static object LI14__PPRINT_QUIT__ansi_io(object V224,object V225,object V226,object V227)
+;
+#define VMB7 bds_ptr  old_bds_top=bds_top;  object  V231;  fixnum  V230;  int8_t  V228;
+#define VMS7
+#define VMV7
+#define VMRV7(a_,b_) for (;bds_top>old_bds_top;) bds_unwind1; return(a_);
+#define VMR7(a_) VMRV7(a_,0);
+static object LI15__PPRINT_LOGICAL_BLOCK__ansi_io(object V238,object V239)
+;
+#define VMB8  object  V289 ,V288 ,V287 ,V286 ,V285 ,V284 ,V283 ,V282 ,V278 ,V276 ,V268 ,V264 ,V262;
+#define VMS8
+#define VMV8
+#define VMRV8(a_,b_) return(a_);
+#define VMR8(a_) VMRV8(a_,0);
+static object LI16__PPRINT_FILL__ansi_io(object V293,object V294,...)
+;
+#define VMB9 register object *  base=vs_top; bds_ptr  old_bds_top=bds_top;  object  V312 ,V311 ,V310 ,V307;  int8_t  V306;
+#define VMS9 vs_top += 5;
+#define VMV9 vs_check;
+#define VMRV9(a_,b_) vs_top=base; for (;bds_top>old_bds_top;) bds_unwind1; return(a_);
+#define VMR9(a_) VMRV9(a_,0);
+static object LC17__DO_PPRINT__ansi_io(object V316,register object V317)
+;
+static void *dlputc;
+#define VMB10 bds_ptr  old_bds_top=bds_top;  object  V337 ,V335 ,V331;
+#define VMS10
+#define VMV10
+#define VMRV10(a_,b_) for (;bds_top>old_bds_top;) bds_unwind1; return(a_);
+#define VMR10(a_) VMRV10(a_,0);
+static object LC19__DO_SUF__ansi_io(object V341,object V342)
+;
+#define VMB11 register object *  base=vs_top;  object  V345;
+#define VMS11
+#define VMV11
+#define VMRV11(a_,b_) if ((b_)>=-1) vs_top=V344 ? (object *)V344+(b_) : base; return(a_);
+#define VMR11(a_) VMRV11(a_,0);
+static object LC18__DO_PREF__ansi_io(object V349,object V350)
+;
+#define VMB12 register object *  base=vs_top;  object  V354;
+#define VMS12
+#define VMV12
+#define VMRV12(a_,b_) if ((b_)>=-1) vs_top=V352 ? (object *)V352+(b_) : base; return(a_);
+#define VMR12(a_) VMRV12(a_,0);
+static object LI20__PPRINT_TABULAR__ansi_io(object V358,object V359,...)
+;
+#define VMB13 register object *  base=vs_top; bds_ptr  old_bds_top=bds_top;  object  V380 ,V379 ,V378 ,V375;
+#define VMS13 vs_top += 6;
+#define VMV13 vs_check;
+#define VMRV13(a_,b_) vs_top=base; for (;bds_top>old_bds_top;) bds_unwind1; return(a_);
+#define VMR13(a_) VMRV13(a_,0);
+static object LC21__DO_PPRINT__ansi_io(object V384,register object V385)
+;
+#define VMB14 bds_ptr  old_bds_top=bds_top;  object  V411 ,V409 ,V405 ,V404 ,V403 ,V399;
+#define VMS14
+#define VMV14
+#define VMRV14(a_,b_) for (;bds_top>old_bds_top;) bds_unwind1; return(a_);
+#define VMR14(a_) VMRV14(a_,0);
+static object LC23__DO_SUF__ansi_io(object V415,object V416)
+;
+#define VMB15 register object *  base=vs_top;  object  V419;
+#define VMS15
+#define VMV15
+#define VMRV15(a_,b_) if ((b_)>=-1) vs_top=V418 ? (object *)V418+(b_) : base; return(a_);
+#define VMR15(a_) VMRV15(a_,0);
+static object LC22__DO_PREF__ansi_io(object V423,object V424)
+;
+#define VMB16 register object *  base=vs_top;  object  V428;
+#define VMS16
+#define VMV16
+#define VMRV16(a_,b_) if ((b_)>=-1) vs_top=V426 ? (object *)V426+(b_) : base; return(a_);
+#define VMR16(a_) VMRV16(a_,0);
+static object LI24__PPRINT_LINEAR__ansi_io(object V432,object V433,...)
+;
+#define VMB17 register object *  base=vs_top; bds_ptr  old_bds_top=bds_top;  object  V451 ,V450 ,V449 ,V446;  int8_t  V445;
+#define VMS17 vs_top += 5;
+#define VMV17 vs_check;
+#define VMRV17(a_,b_) vs_top=base; for (;bds_top>old_bds_top;) bds_unwind1; return(a_);
+#define VMR17(a_) VMRV17(a_,0);
+static object LC25__DO_PPRINT__ansi_io(object V455,register object V456)
+;
+#define VMB18 bds_ptr  old_bds_top=bds_top;  object  V475 ,V474 ,V470;
+#define VMS18
+#define VMV18
+#define VMRV18(a_,b_) for (;bds_top>old_bds_top;) bds_unwind1; return(a_);
+#define VMR18(a_) VMRV18(a_,0);
+static object LC27__DO_SUF__ansi_io(object V479,object V480)
+;
+#define VMB19 register object *  base=vs_top;  object  V483;
+#define VMS19
+#define VMV19
+#define VMRV19(a_,b_) if ((b_)>=-1) vs_top=V482 ? (object *)V482+(b_) : base; return(a_);
+#define VMR19(a_) VMRV19(a_,0);
+static object LC26__DO_PREF__ansi_io(object V487,object V488)
+;
+#define VMB20 register object *  base=vs_top;  object  V492;
+#define VMS20
+#define VMV20
+#define VMRV20(a_,b_) if ((b_)>=-1) vs_top=V490 ? (object *)V490+(b_) : base; return(a_);
+#define VMR20(a_) VMRV20(a_,0);
+static object LI28__COERCE_TO_STREAM__ansi_io(object V495)
+;
+#define VMB21
+#define VMS21
+#define VMV21
+#define VMRV21(a_,b_) return(a_);
+#define VMR21(a_) VMRV21(a_,0);
+static object LI29__PPRINT_TAB__ansi_io(object V502,object V503,object V504,...)
+;
+#define VMB22  object  V523 ,V519 ,V518;  fixnum  V517 ,V516 ,V515 ,V514;
+#define VMS22
+#define VMV22
+#define VMRV22(a_,b_) return(a_);
+#define VMR22(a_) VMRV22(a_,0);
+static object LI30__PPRINT_INDENT__ansi_io(object V534,object V535,...)
+;
+#define VMB23  object  V560;  object  V553 ,V549;  fixnum  V547 ,V546 ,V545;
+#define VMS23
+#define VMV23
+#define VMRV23(a_,b_) return(a_);
+#define VMR23(a_) VMRV23(a_,0);
+static object LI31__PPRINT_NEWLINE__ansi_io(object V565,...)
+;
+#define VMB24  object  V584 ,V578;  fixnum  V576 ,V575;
+#define VMS24
+#define VMV24
+#define VMRV24(a_,b_) return(a_);
+#define VMR24(a_) VMRV24(a_,0);
+static object LI32__PPRINT_MAKE_DISPATCH__ansi_io(object V594)
+;
+#define VMB25  object  V606 ,V605 ,V604 ,V595;
+#define VMS25
+#define VMV25
+#define VMRV25(a_,b_) return(a_);
+#define VMR25(a_) VMRV25(a_,0);
+static object LI33__SET_PPRINT_DISPATCH__ansi_io(register object V624,object V625,...)
+;
+#define VMB26  object  V802;  object  V801 ,V799 ,V798;  fixnum  V795;  fixnum  V792;  fixnum  V788;  fixnum  V785;  fixnum  V741 ,V738;  object  V708;  fixnum  V701;  object  V694;  int8_t  V680;  object  V675 ,V671 ,V670;  fixnum  V669 ,V667;  int8_t  V663;  fixnum  V655;  int8_t  V653;  int8_t  V651;  fixnum  V650;  int8_t  V649;  fixnum  V647;  int8_t  V645;  fixnum  V643;  fixnum  V641 ,V640 ,V638;
+#define VMS26
+#define VMV26
+#define VMRV26(a_,b_) return(a_);
+#define VMR26(a_) VMRV26(a_,0);
+static object LI34__PPRINT_DISPATCH__ansi_io(object V805,...)
+;
+#define VMB27 register object *  base=vs_top;  int8_t  V822;  object  V821;  fixnum  V819;  int8_t  V817;  int8_t  V815;
+#define VMS27 register object *sup=vs_top+0;vs_top=sup;
+#define VMV27
+#define VMRV27(a_,b_) if ((b_)>=-1) vs_top=V806 ? (object *)V806+(b_) : base; return(a_);
+#define VMR27(a_) VMRV27(a_,0);
+static object LI35__COPY_PPRINT_DISPATCH__ansi_io(object V827,...)
+;
+#define VMB28  object  V847 ,V846;  int8_t  V845;  int8_t  V843;  int8_t  V841;  int8_t  V839;  fixnum  V837;
+#define VMS28
+#define VMV28
+#define VMRV28(a_,b_) return(a_);
+#define VMR28(a_) VMRV28(a_,0);
+#define VM28 0
+#define VM27 0
+#define VM26 0
+#define VM25 0
+#define VM24 0
+#define VM23 0
+#define VM22 0
+#define VM21 0
+#define VM20 0
+#define VM19 0
+#define VM18 0
+#define VM17 5
+#define VM16 0
+#define VM15 0
+#define VM14 0
+#define VM13 6
+#define VM12 0
+#define VM11 0
+#define VM10 0
+#define VM9 5
+#define VM8 0
+#define VM7 0
+#define VM6 0
+#define VM5 0
+#define VM4 0
+#define VM3 0
+#define VM2 0
+#define VM1 3
+static void * VVi[225]={
+#define Cdata VV[224]
+(void *)(&dlsetjmp),
+(void *)(LI1__IN_PACKAGE_INTERNAL__ansi_io),
+(void *)(LI11__IN_PACKAGE__ansi_io),
+(void *)(&dlmemmove),
+(void *)(LI12__PPRINT_INSERT_CONDITIONAL_NEWLINES__ansi_io),
+(void *)(LI13__PPRINT_CHECK_FORMAT_STRING__ansi_io),
+(void *)(LI14__PPRINT_QUIT__ansi_io),
+(void *)(LI15__PPRINT_LOGICAL_BLOCK__ansi_io),
+(void *)(LI16__PPRINT_FILL__ansi_io),
+(void *)(&dlputc),
+(void *)(LI20__PPRINT_TABULAR__ansi_io),
+(void *)(LI24__PPRINT_LINEAR__ansi_io),
+(void *)(LI28__COERCE_TO_STREAM__ansi_io),
+(void *)(LI29__PPRINT_TAB__ansi_io),
+(void *)(LI30__PPRINT_INDENT__ansi_io),
+(void *)(LI31__PPRINT_NEWLINE__ansi_io),
+(void *)(LI32__PPRINT_MAKE_DISPATCH__ansi_io),
+(void *)(LI33__SET_PPRINT_DISPATCH__ansi_io),
+(void *)(LI34__PPRINT_DISPATCH__ansi_io),
+(void *)(LI35__COPY_PPRINT_DISPATCH__ansi_io)
+};
+#define VV (VVi)
+static object  LnkTLI71(object,...);
+static object  (*LnkLI71)() = (object (*)()) LnkTLI71;
+static object  LnkTLI70(object,...);
+static object  (*LnkLI70)() = (object (*)()) LnkTLI70;
+static object  LnkTLI69(object,...);
+static object  (*LnkLI69)() = (object (*)()) LnkTLI69;
+static object  LnkTLI68(object,...);
+static object  (*LnkLI68)() = (object (*)()) LnkTLI68;
+static object  LnkTLI67(object,...);
+static object  (*LnkLI67)() = (object (*)()) LnkTLI67;
+static object  LnkTLI66(object,...);
+static object  (*LnkLI66)() = (object (*)()) LnkTLI66;
+static object  LnkTLI65(object,...);
+static object  (*LnkLI65)() = (object (*)()) LnkTLI65;
+static object  LnkTLI64(object,...);
+static object  (*LnkLI64)() = (object (*)()) LnkTLI64;
+static object  LnkTLI63(object,...);
+static object  (*LnkLI63)() = (object (*)()) LnkTLI63;
+static object  LnkTLI62(object,...);
+static object  (*LnkLI62)() = (object (*)()) LnkTLI62;
+static object  LnkTLI61(object,...);
+static object  (*LnkLI61)() = (object (*)()) LnkTLI61;
+static object  LnkTLI60(object,...);
+static object  (*LnkLI60)() = (object (*)()) LnkTLI60;
+static object  LnkTLI59(object,...);
+static object  (*LnkLI59)() = (object (*)()) LnkTLI59;
+static object  LnkTLI58(object,...);
+static object  (*LnkLI58)() = (object (*)()) LnkTLI58;
+static object  LnkTLI57(object,...);
+static object  (*LnkLI57)() = (object (*)()) LnkTLI57;
+static object  LnkTLI56(object,...);
+static object  (*LnkLI56)() = (object (*)()) LnkTLI56;
+static object  LnkTLI55(object,...);
+static object  (*LnkLI55)() = (object (*)()) LnkTLI55;
+static fixnum  LnkTLI54(object,...);
+static fixnum  (*LnkLI54)() = (fixnum (*)()) LnkTLI54;
+static object  LnkTLI53(object,...);
+static object  (*LnkLI53)() = (object (*)()) LnkTLI53;
+static object  LnkTLI52(object,...);
+static object  (*LnkLI52)() = (object (*)()) LnkTLI52;
+static object  LnkTLI51(object,...);
+static object  (*LnkLI51)() = (object (*)()) LnkTLI51;
+static object  LnkTLI50(object,...);
+static object  (*LnkLI50)() = (object (*)()) LnkTLI50;
+static object  LnkTLI49(object,...);
+static object  (*LnkLI49)() = (object (*)()) LnkTLI49;
+static object  LnkTLI48(object,...);
+static object  (*LnkLI48)() = (object (*)()) LnkTLI48;
+static object  LnkTLI47(object,...);
+static object  (*LnkLI47)() = (object (*)()) LnkTLI47;
+static object  LnkTLI46(object,...);
+static object  (*LnkLI46)() = (object (*)()) LnkTLI46;
+static object  LnkTLI45(object,...);
+static object  (*LnkLI45)() = (object (*)()) LnkTLI45;
+static object  LnkTLI44(object,...);
+static object  (*LnkLI44)() = (object (*)()) LnkTLI44;
+static object  LnkTLI43(object,...);
+static object  (*LnkLI43)() = (object (*)()) LnkTLI43;
+static object  LnkTLI42(object,...);
+static object  (*LnkLI42)() = (object (*)()) LnkTLI42;
+static fixnum  LnkTLI41(object,...);
+static fixnum  (*LnkLI41)() = (fixnum (*)()) LnkTLI41;
+static object  LnkTLI40(object,...);
+static object  (*LnkLI40)() = (object (*)()) LnkTLI40;
+static object  LnkTLI39(object,...);
+static object  (*LnkLI39)() = (object (*)()) LnkTLI39;
+static object  LnkTLI38(object,...);
+static object  (*LnkLI38)() = (object (*)()) LnkTLI38;
+static object  LnkTLI37(object,...);
+static object  (*LnkLI37)() = (object (*)()) LnkTLI37;
+static object  LnkTLI36(object,...);
+static object  (*LnkLI36)() = (object (*)()) LnkTLI36;
--- /dev/null
+++ gcl27-2.7.0/mod/gcl_defpackage.c
@@ -0,0 +1,6508 @@
+
+#include "cmpinclude.h"
+#include "gcl_defpackage.h"
+void init_gcl_defpackage(){do_init((void *)VV);}
+/*	local entry for function COMMON-LISP::DEFPACKAGE	*/
+
+static object LI1__DEFPACKAGE__defpackage(object V3,object V4)
+{	 VMB1 VMS1 VMV1
+	{object V5;
+	object V6;
+	V5= V3->c.c_cdr;
+	if(((V5))==Cnil){
+	goto T3;
+	}
+	{object V8;
+	V8= V5->c.c_car;
+	V5= V5->c.c_cdr;
+	V6= (V8);
+	goto T2;
+	}
+	goto T3;
+T3:;
+	V9= make_cons(((object)VV[1]),Cnil);
+	V6= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI2)(((object)VV[2]),((object)VV[3]),((object)VV[4]),((object)VV[5]),(V9)));
+	goto T2;
+T2:;
+	{register object V10;
+	register object V11;
+	V10= Cnil;
+	V11= (V5);
+	goto T11;
+T11:;
+	if(((V11))==Cnil){
+	goto T17;
+	}
+	goto T14;
+	
+	goto T17;
+T17:;
+	goto T12;
+	
+	goto T14;
+T14:;
+	{object V12;
+	V12= (V11)->c.c_car;
+	V10= (V12);}
+	{object V14;
+	V14= V10->c.c_car;
+	{fixnum V15;
+	V15= 1;
+	V16= tp4(V14);
+	switch(V16){
+	case -1:
+	goto T36;
+T36:;
+	goto T33;
+	
+	case 1:
+	goto T37;
+T37:;
+	case 2:
+	goto T38;
+T38:;
+	case 3:
+	goto T39;
+T39:;
+	case 4:
+	goto T40;
+T40:;
+	case 5:
+	goto T41;
+T41:;
+	case 6:
+	goto T42;
+T42:;
+	goto T31;
+	
+	default:
+	goto T43;
+T43:;
+	goto T33;
+	}
+	goto T31;
+	
+	goto T33;
+T33:;
+	V15= 0;
+	goto T30;
+	
+	goto T31;
+T31:;
+	goto T30;
+T30:;
+	switch(V15){
+	case 0:
+	goto T55;
+T55:;
+	if(!(((V14))==(((object)VV[6])))){
+	goto T52;
+	}
+	goto T53;
+	
+	case 1:
+	goto T56;
+T56:;
+	if(!(((V14))==(((object)VV[6])))){
+	goto T52;
+	}
+	goto T53;
+	}
+	goto T52;
+	
+	goto T53;
+T53:;
+	goto T51;
+	
+	goto T52;
+T52:;
+	goto T49;
+	
+	goto T51;
+T51:;
+	goto T27;
+	
+	goto T49;
+T49:;
+	switch(V15){
+	case 0:
+	goto T65;
+T65:;
+	if(!(((V14))==(((object)VV[7])))){
+	goto T62;
+	}
+	goto T63;
+	
+	case 1:
+	goto T66;
+T66:;
+	if(!(((V14))==(((object)VV[7])))){
+	goto T62;
+	}
+	goto T63;
+	}
+	goto T62;
+	
+	goto T63;
+T63:;
+	goto T61;
+	
+	goto T62;
+T62:;
+	goto T59;
+	
+	goto T61;
+T61:;
+	goto T27;
+	
+	goto T59;
+T59:;
+	switch(V15){
+	case 0:
+	goto T75;
+T75:;
+	if(!(((V14))==(((object)VV[8])))){
+	goto T72;
+	}
+	goto T73;
+	
+	case 1:
+	goto T76;
+T76:;
+	if(!(((V14))==(((object)VV[8])))){
+	goto T72;
+	}
+	goto T73;
+	}
+	goto T72;
+	
+	goto T73;
+T73:;
+	goto T71;
+	
+	goto T72;
+T72:;
+	goto T69;
+	
+	goto T71;
+T71:;
+	goto T27;
+	
+	goto T69;
+T69:;
+	switch(V15){
+	case 0:
+	goto T85;
+T85:;
+	if(!(((V14))==(((object)VV[9])))){
+	goto T82;
+	}
+	goto T83;
+	
+	case 1:
+	goto T86;
+T86:;
+	if(!(((V14))==(((object)VV[9])))){
+	goto T82;
+	}
+	goto T83;
+	}
+	goto T82;
+	
+	goto T83;
+T83:;
+	goto T81;
+	
+	goto T82;
+T82:;
+	goto T79;
+	
+	goto T81;
+T81:;
+	goto T27;
+	
+	goto T79;
+T79:;
+	switch(V15){
+	case 0:
+	goto T95;
+T95:;
+	if(!(((V14))==(((object)VV[10])))){
+	goto T92;
+	}
+	goto T93;
+	
+	case 1:
+	goto T96;
+T96:;
+	if(!(((V14))==(((object)VV[10])))){
+	goto T92;
+	}
+	goto T93;
+	}
+	goto T92;
+	
+	goto T93;
+T93:;
+	goto T91;
+	
+	goto T92;
+T92:;
+	goto T89;
+	
+	goto T91;
+T91:;
+	goto T27;
+	
+	goto T89;
+T89:;
+	switch(V15){
+	case 0:
+	goto T105;
+T105:;
+	if(!(((V14))==(((object)VV[11])))){
+	goto T102;
+	}
+	goto T103;
+	
+	case 1:
+	goto T106;
+T106:;
+	if(!(((V14))==(((object)VV[11])))){
+	goto T102;
+	}
+	goto T103;
+	}
+	goto T102;
+	
+	goto T103;
+T103:;
+	goto T101;
+	
+	goto T102;
+T102:;
+	goto T99;
+	
+	goto T101;
+T101:;
+	goto T27;
+	
+	goto T99;
+T99:;
+	switch(V15){
+	case 0:
+	goto T115;
+T115:;
+	if(!(((V14))==(((object)VV[12])))){
+	goto T112;
+	}
+	goto T113;
+	
+	case 1:
+	goto T116;
+T116:;
+	if(!(((V14))==(((object)VV[12])))){
+	goto T112;
+	}
+	goto T113;
+	}
+	goto T112;
+	
+	goto T113;
+T113:;
+	goto T111;
+	
+	goto T112;
+T112:;
+	goto T109;
+	
+	goto T111;
+T111:;
+	goto T27;
+	
+	goto T109;
+T109:;
+	switch(V15){
+	case 0:
+	goto T125;
+T125:;
+	if(!(((V14))==(((object)VV[13])))){
+	goto T122;
+	}
+	goto T123;
+	
+	case 1:
+	goto T126;
+T126:;
+	if(!(((V14))==(((object)VV[13])))){
+	goto T122;
+	}
+	goto T123;
+	}
+	goto T122;
+	
+	goto T123;
+T123:;
+	goto T121;
+	
+	goto T122;
+T122:;
+	goto T119;
+	
+	goto T121;
+T121:;
+	goto T27;
+	
+	goto T119;
+T119:;
+	switch(V15){
+	case 0:
+	goto T135;
+T135:;
+	if(!(((V14))==(((object)VV[14])))){
+	goto T132;
+	}
+	goto T133;
+	
+	case 1:
+	goto T136;
+T136:;
+	if(!(((V14))==(((object)VV[14])))){
+	goto T132;
+	}
+	goto T133;
+	}
+	goto T132;
+	
+	goto T133;
+T133:;
+	goto T131;
+	
+	goto T132;
+T132:;
+	goto T129;
+	
+	goto T131;
+T131:;
+	goto T27;
+	
+	goto T129;
+T129:;
+	switch(V15){
+	case 0:
+	goto T145;
+T145:;
+	if(!(((V14))==(((object)VV[15])))){
+	goto T142;
+	}
+	goto T143;
+	
+	case 1:
+	goto T146;
+T146:;
+	if(!(((V14))==(((object)VV[15])))){
+	goto T142;
+	}
+	goto T143;
+	}
+	goto T142;
+	
+	goto T143;
+T143:;
+	goto T141;
+	
+	goto T142;
+T142:;
+	goto T139;
+	
+	goto T141;
+T141:;
+	goto T27;
+	
+	goto T139;
+T139:;
+	goto T26;
+	}}
+	goto T27;
+T27:;
+	goto T23;
+	
+	goto T26;
+T26:;
+	(void)((fcall.argd=3,/* COMMON-LISP::CERROR */(*LnkLI3)(((object)VV[17]),((object)VV[18]),(V10))));
+	goto T22;
+	
+	goto T23;
+T23:;
+	goto T22;
+T22:;
+	V11= (V11)->c.c_cdr;
+	goto T11;
+	
+	goto T12;
+T12:;
+	goto T9;
+	}
+	goto T9;
+T9:;
+	{object V18;
+	V18= coerce_to_string((V6));
+	{register object V19;
+	register object V20;
+	V19= Cnil;
+	V20= ((object)VV[19]);
+	goto T155;
+T155:;
+	if(((V20))==Cnil){
+	goto T161;
+	}
+	goto T158;
+	
+	goto T161;
+T161:;
+	goto T156;
+	
+	goto T158;
+T158:;
+	{object V21;
+	V21= (V20)->c.c_car;
+	V19= (V21);}
+	{register fixnum V24;
+	register object V25;
+	V24= 1;
+	V26= tp2((V5));
+	if(!((V26)==(0))){
+	goto T173;
+	}
+	V25= Ct;
+	goto T172;
+	
+	goto T173;
+T173:;
+	V25= Cnil;
+	goto T172;
+T172:;
+	{register fixnum V27;
+	register object V28;
+	if(((V25))==Cnil){
+	goto T178;
+	}
+	V27= 268435455;
+	goto T177;
+	
+	goto T178;
+T178:;
+	V27= length((V5));
+	goto T177;
+T177:;
+	if(((V25))==Cnil){
+	goto T182;
+	}
+	if(((V5))==Cnil){
+	goto T185;
+	}
+	V28= (V5);
+	goto T181;
+	
+	goto T185;
+T185:;
+	V28= Cnil;
+	goto T181;
+	
+	goto T182;
+T182:;
+	V28= (V5);
+	goto T181;
+T181:;
+	if(((V25))==Cnil){
+	goto T198;
+	}
+	goto T195;
+	
+	goto T198;
+T198:;
+	{fixnum V30;
+	{fixnum V31;
+	V31= ((fixnum)V28);
+	V30= ((uchar*)V31)[(fixnum)0];}
+	V29= (V30>>(fixnum)3);}
+	switch(V29){
+	case 0:
+	goto T204;
+T204:;
+	case 1:
+	goto T205;
+T205:;
+	case 2:
+	goto T206;
+T206:;
+	case 3:
+	goto T207;
+T207:;
+	case 4:
+	goto T208;
+T208:;
+	case 5:
+	goto T209;
+T209:;
+	case 6:
+	goto T210;
+T210:;
+	case 7:
+	goto T211;
+T211:;
+	case 9:
+	goto T212;
+T212:;
+	case 10:
+	goto T213;
+T213:;
+	case 11:
+	goto T214;
+T214:;
+	goto T194;
+	
+	default:
+	goto T215;
+T215:;
+	goto T192;
+	}
+	goto T192;
+	
+	goto T195;
+T195:;
+	goto T192;
+	
+	goto T194;
+T194:;
+	goto T191;
+	
+	goto T192;
+T192:;
+	V32= tp4(V19);
+	switch(V32){
+	case -1:
+	goto T219;
+T219:;
+	goto T191;
+	
+	case 1:
+	goto T220;
+T220:;
+	case 2:
+	goto T221;
+T221:;
+	case 3:
+	goto T222;
+T222:;
+	case 4:
+	goto T223;
+T223:;
+	case 5:
+	goto T224;
+T224:;
+	case 6:
+	goto T225;
+T225:;
+	goto T189;
+	
+	default:
+	goto T226;
+T226:;
+	goto T191;
+	}
+	goto T189;
+	
+	goto T191;
+T191:;
+	V24= 0;
+	goto T188;
+	
+	goto T189;
+T189:;
+	goto T188;
+T188:;
+	{object V33;
+	if(((V25))==Cnil){
+	goto T230;
+	}
+	V33= (V28);
+	goto T229;
+	
+	goto T230;
+T230:;
+	V33= Cnil;
+	goto T229;
+T229:;
+	if(!((0)>=(V27))){
+	goto T236;
+	}
+	goto T235;
+	
+	goto T236;
+T236:;
+	if(((V25))==Cnil){
+	goto T239;
+	}
+	if(((V33))==Cnil){
+	goto T242;
+	}
+	goto T233;
+	
+	goto T242;
+T242:;
+	goto T235;
+	
+	goto T239;
+T239:;
+	goto T233;
+	
+	goto T235;
+T235:;
+	V23= 0;
+	goto T170;
+	
+	goto T233;
+T233:;
+	{register fixnum V34;
+	register object V35;
+	register fixnum V36;
+	if(((V25))==Cnil){
+	goto T245;
+	}
+	V34= 0;
+	goto T244;
+	
+	goto T245;
+T245:;
+	V34= 1;
+	goto T244;
+T244:;
+	V35= V33->c.c_cdr;
+	{int8_t V37;
+	{object V38;
+	if(((V25))==Cnil){
+	goto T255;
+	}
+	V38= V33->c.c_car;
+	goto T254;
+	
+	goto T255;
+T255:;
+	V38= (/* COMMON-LISP::ROW-MAJOR-AREF */(*LnkLI4)((V28),(fixnum)0));
+	goto T254;
+T254:;
+	{object V39;
+	V39= V38->c.c_car;
+	switch(V24){
+	case 0:
+	goto T262;
+T262:;
+	if(!(((V19))==((V39)))){
+	goto T259;
+	}
+	goto T260;
+	
+	case 1:
+	goto T263;
+T263:;
+	if(!(eql((V19),(V39)))){
+	goto T259;
+	}
+	goto T260;
+	}
+	goto T259;
+	
+	goto T260;
+T260:;
+	goto T253;
+	
+	goto T259;
+T259:;
+	goto T251;
+	}}
+	goto T253;
+T253:;
+	V37= 1;
+	goto T250;
+	
+	goto T251;
+T251:;
+	V37= 0;
+	goto T250;
+T250:;
+	{int8_t V40;
+	V40= (0)+(V37);
+	V36= V40;}}
+	goto T267;
+T267:;
+	if(!((V34)>=(V27))){
+	goto T272;
+	}
+	goto T271;
+	
+	goto T272;
+T272:;
+	if(!((V36)>=(V27))){
+	goto T275;
+	}
+	goto T271;
+	
+	goto T275;
+T275:;
+	if(((V25))==Cnil){
+	goto T278;
+	}
+	if(((V35))==Cnil){
+	goto T281;
+	}
+	goto T269;
+	
+	goto T281;
+T281:;
+	goto T271;
+	
+	goto T278;
+T278:;
+	goto T269;
+	
+	goto T271;
+T271:;
+	V23= V36;
+	goto T170;
+	
+	goto T269;
+T269:;
+	{fixnum V42;
+	object V43;
+	fixnum V44;
+	if(((V25))==Cnil){
+	goto T284;
+	}
+	V42= V34;
+	goto T283;
+	
+	goto T284;
+T284:;
+	{fixnum V45;
+	V45= V34;
+	{fixnum V46;
+	V46= (V45)+(1);
+	V42= V46;}}
+	goto T283;
+T283:;
+	V43= (V35)->c.c_cdr;
+	{fixnum V48;
+	int8_t V49;
+	V48= V36;
+	{object V50;
+	{fixnum V52;
+	V52= V34;
+	if(((V25))==Cnil){
+	goto T298;
+	}
+	V50= (V35)->c.c_car;
+	goto T296;
+	
+	goto T298;
+T298:;
+	V50= (/* COMMON-LISP::ROW-MAJOR-AREF */(*LnkLI4)((V28),V52));}
+	goto T296;
+T296:;
+	{object V53;
+	V53= V50->c.c_car;
+	switch(V24){
+	case 0:
+	goto T305;
+T305:;
+	if(!(((V19))==((V53)))){
+	goto T302;
+	}
+	goto T303;
+	
+	case 1:
+	goto T306;
+T306:;
+	if(!(eql((V19),(V53)))){
+	goto T302;
+	}
+	goto T303;
+	}
+	goto T302;
+	
+	goto T303;
+T303:;
+	goto T295;
+	
+	goto T302;
+T302:;
+	goto T293;
+	}}
+	goto T295;
+T295:;
+	V49= 1;
+	goto T292;
+	
+	goto T293;
+T293:;
+	V49= 0;
+	goto T292;
+T292:;
+	{fixnum V54;
+	V54= (V48)+(V49);
+	V44= V54;}}
+	V34= V42;
+	V35= (V43);
+	V36= V44;
+	goto T267;
+	}}}}}
+	goto T170;
+T170:;
+	if(!((2)<=(V23))){
+	goto T167;
+	}
+	V55= make_cons((V19),Cnil);
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI2)(((object)VV[2]),((object)VV[21]),((object)VV[22]),((object)VV[23]),(V55))));
+	goto T166;
+	
+	goto T167;
+T167:;
+	goto T166;
+T166:;
+	V20= (V20)->c.c_cdr;
+	goto T155;
+	
+	goto T156;
+T156:;
+	goto T153;
+	}
+	goto T153;
+T153:;
+	V18= coerce_to_string((V18));
+	{object V57;
+	object V58;
+	object V59;
+	object V60;
+	object V61;
+	object V62;
+	object V63;
+	object V64;
+	{object V65;
+	{register object V66;
+	V66= Cnil;
+	{object V67;
+	register object V68;
+	register object V69;
+	V67= Cnil;
+	V68= Cnil;
+	V69= Cnil;
+	{object V70;
+	{register object V71;
+	V71= (V5);
+	goto T333;
+T333:;
+	if(((V71))==Cnil){
+	goto T335;
+	}
+	{object V73;
+	V73= (V71)->c.c_car;
+	if(((V73))==Cnil){
+	goto T348;
+	}
+	V74= tp2(V73);
+	if(!((V74)==(0))){
+	goto T351;
+	}
+	goto T347;
+	
+	goto T351;
+T351:;
+	goto T345;
+	
+	goto T348;
+T348:;
+	goto T345;
+	
+	goto T347;
+T347:;
+	V75= V73->c.c_car;
+	if(!(((V75))==(((object)VV[8])))){
+	goto T343;
+	}
+	goto T344;
+	
+	goto T345;
+T345:;
+	goto T343;
+	
+	goto T344;
+T344:;
+	goto T341;
+	
+	goto T343;
+T343:;
+	goto T339;
+	}
+	goto T341;
+T341:;
+	V70= (V71);
+	goto T325;
+	
+	goto T339;
+T339:;
+	{object V76;
+	V76= (V71)->c.c_cdr;
+	V71= (V76);
+	goto T333;
+	}
+	goto T335;
+T335:;
+	goto T331;
+	}
+	goto T331;
+T331:;
+	if(((V5))==Cnil){
+	goto T329;
+	}
+	goto T326;
+	
+	goto T329;
+T329:;
+	V70= Cnil;
+	goto T325;
+	
+	goto T326;
+T326:;
+	V70= Cnil;
+	goto T325;
+T325:;
+	V66= (V70);}
+	goto T323;
+T323:;
+	if(((V66))==Cnil){
+	goto T363;
+	}
+	goto T360;
+	
+	goto T363;
+T363:;
+	goto T324;
+	
+	goto T360;
+T360:;
+	{object V79;
+	V79= (V66)->c.c_car;
+	V78= V79->c.c_cdr;}
+	V69= (/* COMMON-LISP::COPY-LIST */(*LnkLI5)((V78)));
+	if(((V68))==Cnil){
+	goto T370;
+	}
+	(void)((((V68))->c.c_cdr=((V69)),((V68))));
+	if(((V69))==Cnil){
+	goto T373;
+	}
+	{object V82;
+	V82= (V68)->c.c_cdr;
+	{object V84;
+	V84= V82->c.c_cdr;
+	{register object V85;
+	register object V86;
+	V85= (V82);
+	V86= (V84);
+	goto T381;
+T381:;
+	if(((V86))==Cnil){
+	goto T390;
+	}
+	goto T389;
+	
+	goto T390;
+T390:;
+	goto T388;
+	
+	goto T389;
+T389:;
+	goto T386;
+	
+	goto T388;
+T388:;
+	goto T383;
+	
+	goto T386;
+T386:;
+	{object V88;
+	object V89;
+	V88= (V85)->c.c_cdr;
+	V89= (V86)->c.c_cdr;
+	V85= (V88);
+	V86= (V89);}
+	goto T381;
+	
+	goto T383;
+T383:;
+	V68= (V85);
+	goto T377;
+	}}}
+	goto T377;
+T377:;
+	goto T365;
+	
+	goto T373;
+T373:;
+	goto T365;
+	
+	goto T370;
+T370:;
+	{object V92;
+	V67= (V69);
+	V92= (V67);
+	{object V93;
+	V93= V92->c.c_cdr;
+	{register object V94;
+	register object V95;
+	V94= (V92);
+	V95= (V93);
+	goto T405;
+T405:;
+	if(((V95))==Cnil){
+	goto T414;
+	}
+	goto T413;
+	
+	goto T414;
+T414:;
+	goto T412;
+	
+	goto T413;
+T413:;
+	goto T410;
+	
+	goto T412;
+T412:;
+	goto T407;
+	
+	goto T410;
+T410:;
+	{object V97;
+	object V98;
+	V97= (V94)->c.c_cdr;
+	V98= (V95)->c.c_cdr;
+	V94= (V97);
+	V95= (V98);}
+	goto T405;
+	
+	goto T407;
+T407:;
+	V68= (V94);
+	goto T400;
+	}}}
+	goto T400;
+T400:;
+	goto T365;
+T365:;
+	{object V101;
+	{object V102;
+	V102= (V66)->c.c_cdr;
+	{register object V104;
+	V104= (V102);
+	goto T434;
+T434:;
+	if(((V104))==Cnil){
+	goto T436;
+	}
+	{object V106;
+	V106= (V104)->c.c_car;
+	if(((V106))==Cnil){
+	goto T449;
+	}
+	V107= tp2(V106);
+	if(!((V107)==(0))){
+	goto T452;
+	}
+	goto T448;
+	
+	goto T452;
+T452:;
+	goto T446;
+	
+	goto T449;
+T449:;
+	goto T446;
+	
+	goto T448;
+T448:;
+	V108= V106->c.c_car;
+	if(!(((V108))==(((object)VV[8])))){
+	goto T444;
+	}
+	goto T445;
+	
+	goto T446;
+T446:;
+	goto T444;
+	
+	goto T445;
+T445:;
+	goto T442;
+	
+	goto T444;
+T444:;
+	goto T440;
+	}
+	goto T442;
+T442:;
+	V101= (V104);
+	goto T425;
+	
+	goto T440;
+T440:;
+	{object V109;
+	V109= (V104)->c.c_cdr;
+	V104= (V109);
+	goto T434;
+	}
+	goto T436;
+T436:;
+	goto T432;
+	}
+	goto T432;
+T432:;
+	if(((V102))==Cnil){
+	goto T430;
+	}
+	goto T427;
+	
+	goto T430;
+T430:;
+	V101= Cnil;
+	goto T425;
+	
+	goto T427;
+T427:;
+	V101= Cnil;}
+	goto T425;
+T425:;
+	V66= (V101);}
+	goto T323;
+	
+	goto T324;
+T324:;
+	V65= (V67);
+	goto T321;
+	
+	V65= Cnil;
+	goto T321;
+	}}
+	goto T321;
+T321:;
+	{object V111;
+	register object V112;
+	V111= Cnil;
+	V112= Cnil;
+	{register object V113;
+	V113= (V65);
+	goto T465;
+T465:;
+	if(((V113))==Cnil){
+	goto T467;
+	}
+	{object V115;
+	V115= (V113)->c.c_car;
+	{object V116;
+	V117= coerce_to_string((V115));
+	V116= make_cons((V117),Cnil);
+	if(((V112))==Cnil){
+	goto T474;
+	}
+	{object V118;
+	V118= (((V112))->c.c_cdr=((V116)),((V112)));
+	V112= V118->c.c_cdr;
+	goto T473;
+	}
+	goto T474;
+T474:;
+	V111= (V116);
+	V112= (V111);
+	goto T473;
+T473:;}}
+	{object V119;
+	V119= (V113)->c.c_cdr;
+	V113= (V119);
+	goto T465;
+	}
+	goto T467;
+T467:;
+	goto T463;
+	}
+	goto T463;
+T463:;
+	V57= (V111);}}
+	{object V121;
+	{register object V122;
+	V122= Cnil;
+	{object V123;
+	register object V124;
+	register object V125;
+	V123= Cnil;
+	V124= Cnil;
+	V125= Cnil;
+	{object V126;
+	{register object V127;
+	V127= (V5);
+	goto T495;
+T495:;
+	if(((V127))==Cnil){
+	goto T497;
+	}
+	{object V129;
+	V129= (V127)->c.c_car;
+	if(((V129))==Cnil){
+	goto T510;
+	}
+	V130= tp2(V129);
+	if(!((V130)==(0))){
+	goto T513;
+	}
+	goto T509;
+	
+	goto T513;
+T513:;
+	goto T507;
+	
+	goto T510;
+T510:;
+	goto T507;
+	
+	goto T509;
+T509:;
+	V131= V129->c.c_car;
+	if(!(((V131))==(((object)VV[6])))){
+	goto T505;
+	}
+	goto T506;
+	
+	goto T507;
+T507:;
+	goto T505;
+	
+	goto T506;
+T506:;
+	goto T503;
+	
+	goto T505;
+T505:;
+	goto T501;
+	}
+	goto T503;
+T503:;
+	V126= (V127);
+	goto T487;
+	
+	goto T501;
+T501:;
+	{object V132;
+	V132= (V127)->c.c_cdr;
+	V127= (V132);
+	goto T495;
+	}
+	goto T497;
+T497:;
+	goto T493;
+	}
+	goto T493;
+T493:;
+	if(((V5))==Cnil){
+	goto T491;
+	}
+	goto T488;
+	
+	goto T491;
+T491:;
+	V126= Cnil;
+	goto T487;
+	
+	goto T488;
+T488:;
+	V126= Cnil;
+	goto T487;
+T487:;
+	V122= (V126);}
+	goto T485;
+T485:;
+	if(((V122))==Cnil){
+	goto T525;
+	}
+	goto T522;
+	
+	goto T525;
+T525:;
+	goto T486;
+	
+	goto T522;
+T522:;
+	{object V135;
+	V135= (V122)->c.c_car;
+	V134= V135->c.c_cdr;}
+	V125= (/* COMMON-LISP::COPY-LIST */(*LnkLI5)((V134)));
+	if(((V124))==Cnil){
+	goto T532;
+	}
+	(void)((((V124))->c.c_cdr=((V125)),((V124))));
+	if(((V125))==Cnil){
+	goto T535;
+	}
+	{object V138;
+	V138= (V124)->c.c_cdr;
+	{object V140;
+	V140= V138->c.c_cdr;
+	{register object V141;
+	register object V142;
+	V141= (V138);
+	V142= (V140);
+	goto T543;
+T543:;
+	if(((V142))==Cnil){
+	goto T552;
+	}
+	goto T551;
+	
+	goto T552;
+T552:;
+	goto T550;
+	
+	goto T551;
+T551:;
+	goto T548;
+	
+	goto T550;
+T550:;
+	goto T545;
+	
+	goto T548;
+T548:;
+	{object V144;
+	object V145;
+	V144= (V141)->c.c_cdr;
+	V145= (V142)->c.c_cdr;
+	V141= (V144);
+	V142= (V145);}
+	goto T543;
+	
+	goto T545;
+T545:;
+	V124= (V141);
+	goto T539;
+	}}}
+	goto T539;
+T539:;
+	goto T527;
+	
+	goto T535;
+T535:;
+	goto T527;
+	
+	goto T532;
+T532:;
+	{object V148;
+	V123= (V125);
+	V148= (V123);
+	{object V149;
+	V149= V148->c.c_cdr;
+	{register object V150;
+	register object V151;
+	V150= (V148);
+	V151= (V149);
+	goto T567;
+T567:;
+	if(((V151))==Cnil){
+	goto T576;
+	}
+	goto T575;
+	
+	goto T576;
+T576:;
+	goto T574;
+	
+	goto T575;
+T575:;
+	goto T572;
+	
+	goto T574;
+T574:;
+	goto T569;
+	
+	goto T572;
+T572:;
+	{object V153;
+	object V154;
+	V153= (V150)->c.c_cdr;
+	V154= (V151)->c.c_cdr;
+	V150= (V153);
+	V151= (V154);}
+	goto T567;
+	
+	goto T569;
+T569:;
+	V124= (V150);
+	goto T562;
+	}}}
+	goto T562;
+T562:;
+	goto T527;
+T527:;
+	{object V157;
+	{object V158;
+	V158= (V122)->c.c_cdr;
+	{register object V160;
+	V160= (V158);
+	goto T596;
+T596:;
+	if(((V160))==Cnil){
+	goto T598;
+	}
+	{object V162;
+	V162= (V160)->c.c_car;
+	if(((V162))==Cnil){
+	goto T611;
+	}
+	V163= tp2(V162);
+	if(!((V163)==(0))){
+	goto T614;
+	}
+	goto T610;
+	
+	goto T614;
+T614:;
+	goto T608;
+	
+	goto T611;
+T611:;
+	goto T608;
+	
+	goto T610;
+T610:;
+	V164= V162->c.c_car;
+	if(!(((V164))==(((object)VV[6])))){
+	goto T606;
+	}
+	goto T607;
+	
+	goto T608;
+T608:;
+	goto T606;
+	
+	goto T607;
+T607:;
+	goto T604;
+	
+	goto T606;
+T606:;
+	goto T602;
+	}
+	goto T604;
+T604:;
+	V157= (V160);
+	goto T587;
+	
+	goto T602;
+T602:;
+	{object V165;
+	V165= (V160)->c.c_cdr;
+	V160= (V165);
+	goto T596;
+	}
+	goto T598;
+T598:;
+	goto T594;
+	}
+	goto T594;
+T594:;
+	if(((V158))==Cnil){
+	goto T592;
+	}
+	goto T589;
+	
+	goto T592;
+T592:;
+	V157= Cnil;
+	goto T587;
+	
+	goto T589;
+T589:;
+	V157= Cnil;}
+	goto T587;
+T587:;
+	V122= (V157);}
+	goto T485;
+	
+	goto T486;
+T486:;
+	V121= (V123);
+	goto T483;
+	
+	V121= Cnil;
+	goto T483;
+	}}
+	goto T483;
+T483:;
+	V58= V121->c.c_car;}
+	{object V167;
+	{register object V168;
+	V168= Cnil;
+	{object V169;
+	register object V170;
+	register object V171;
+	V169= Cnil;
+	V170= Cnil;
+	V171= Cnil;
+	{object V172;
+	{register object V173;
+	V173= (V5);
+	goto T637;
+T637:;
+	if(((V173))==Cnil){
+	goto T639;
+	}
+	{object V175;
+	V175= (V173)->c.c_car;
+	if(((V175))==Cnil){
+	goto T652;
+	}
+	V176= tp2(V175);
+	if(!((V176)==(0))){
+	goto T655;
+	}
+	goto T651;
+	
+	goto T655;
+T655:;
+	goto T649;
+	
+	goto T652;
+T652:;
+	goto T649;
+	
+	goto T651;
+T651:;
+	V177= V175->c.c_car;
+	if(!(((V177))==(((object)VV[9])))){
+	goto T647;
+	}
+	goto T648;
+	
+	goto T649;
+T649:;
+	goto T647;
+	
+	goto T648;
+T648:;
+	goto T645;
+	
+	goto T647;
+T647:;
+	goto T643;
+	}
+	goto T645;
+T645:;
+	V172= (V173);
+	goto T629;
+	
+	goto T643;
+T643:;
+	{object V178;
+	V178= (V173)->c.c_cdr;
+	V173= (V178);
+	goto T637;
+	}
+	goto T639;
+T639:;
+	goto T635;
+	}
+	goto T635;
+T635:;
+	if(((V5))==Cnil){
+	goto T633;
+	}
+	goto T630;
+	
+	goto T633;
+T633:;
+	V172= Cnil;
+	goto T629;
+	
+	goto T630;
+T630:;
+	V172= Cnil;
+	goto T629;
+T629:;
+	V168= (V172);}
+	goto T627;
+T627:;
+	if(((V168))==Cnil){
+	goto T667;
+	}
+	goto T664;
+	
+	goto T667;
+T667:;
+	goto T628;
+	
+	goto T664;
+T664:;
+	{object V181;
+	V181= (V168)->c.c_car;
+	V180= V181->c.c_cdr;}
+	V171= (/* COMMON-LISP::COPY-LIST */(*LnkLI5)((V180)));
+	if(((V170))==Cnil){
+	goto T674;
+	}
+	(void)((((V170))->c.c_cdr=((V171)),((V170))));
+	if(((V171))==Cnil){
+	goto T677;
+	}
+	{object V184;
+	V184= (V170)->c.c_cdr;
+	{object V186;
+	V186= V184->c.c_cdr;
+	{register object V187;
+	register object V188;
+	V187= (V184);
+	V188= (V186);
+	goto T685;
+T685:;
+	if(((V188))==Cnil){
+	goto T694;
+	}
+	goto T693;
+	
+	goto T694;
+T694:;
+	goto T692;
+	
+	goto T693;
+T693:;
+	goto T690;
+	
+	goto T692;
+T692:;
+	goto T687;
+	
+	goto T690;
+T690:;
+	{object V190;
+	object V191;
+	V190= (V187)->c.c_cdr;
+	V191= (V188)->c.c_cdr;
+	V187= (V190);
+	V188= (V191);}
+	goto T685;
+	
+	goto T687;
+T687:;
+	V170= (V187);
+	goto T681;
+	}}}
+	goto T681;
+T681:;
+	goto T669;
+	
+	goto T677;
+T677:;
+	goto T669;
+	
+	goto T674;
+T674:;
+	{object V194;
+	V169= (V171);
+	V194= (V169);
+	{object V195;
+	V195= V194->c.c_cdr;
+	{register object V196;
+	register object V197;
+	V196= (V194);
+	V197= (V195);
+	goto T709;
+T709:;
+	if(((V197))==Cnil){
+	goto T718;
+	}
+	goto T717;
+	
+	goto T718;
+T718:;
+	goto T716;
+	
+	goto T717;
+T717:;
+	goto T714;
+	
+	goto T716;
+T716:;
+	goto T711;
+	
+	goto T714;
+T714:;
+	{object V199;
+	object V200;
+	V199= (V196)->c.c_cdr;
+	V200= (V197)->c.c_cdr;
+	V196= (V199);
+	V197= (V200);}
+	goto T709;
+	
+	goto T711;
+T711:;
+	V170= (V196);
+	goto T704;
+	}}}
+	goto T704;
+T704:;
+	goto T669;
+T669:;
+	{object V203;
+	{object V204;
+	V204= (V168)->c.c_cdr;
+	{register object V206;
+	V206= (V204);
+	goto T738;
+T738:;
+	if(((V206))==Cnil){
+	goto T740;
+	}
+	{object V208;
+	V208= (V206)->c.c_car;
+	if(((V208))==Cnil){
+	goto T753;
+	}
+	V209= tp2(V208);
+	if(!((V209)==(0))){
+	goto T756;
+	}
+	goto T752;
+	
+	goto T756;
+T756:;
+	goto T750;
+	
+	goto T753;
+T753:;
+	goto T750;
+	
+	goto T752;
+T752:;
+	V210= V208->c.c_car;
+	if(!(((V210))==(((object)VV[9])))){
+	goto T748;
+	}
+	goto T749;
+	
+	goto T750;
+T750:;
+	goto T748;
+	
+	goto T749;
+T749:;
+	goto T746;
+	
+	goto T748;
+T748:;
+	goto T744;
+	}
+	goto T746;
+T746:;
+	V203= (V206);
+	goto T729;
+	
+	goto T744;
+T744:;
+	{object V211;
+	V211= (V206)->c.c_cdr;
+	V206= (V211);
+	goto T738;
+	}
+	goto T740;
+T740:;
+	goto T736;
+	}
+	goto T736;
+T736:;
+	if(((V204))==Cnil){
+	goto T734;
+	}
+	goto T731;
+	
+	goto T734;
+T734:;
+	V203= Cnil;
+	goto T729;
+	
+	goto T731;
+T731:;
+	V203= Cnil;}
+	goto T729;
+T729:;
+	V168= (V203);}
+	goto T627;
+	
+	goto T628;
+T628:;
+	V167= (V169);
+	goto T625;
+	
+	V167= Cnil;
+	goto T625;
+	}}
+	goto T625;
+T625:;
+	{object V213;
+	register object V214;
+	V213= Cnil;
+	V214= Cnil;
+	{register object V215;
+	V215= (V167);
+	goto T769;
+T769:;
+	if(((V215))==Cnil){
+	goto T771;
+	}
+	{object V217;
+	V217= (V215)->c.c_car;
+	{object V218;
+	V219= coerce_to_string((V217));
+	V218= make_cons((V219),Cnil);
+	if(((V214))==Cnil){
+	goto T778;
+	}
+	{object V220;
+	V220= (((V214))->c.c_cdr=((V218)),((V214)));
+	V214= V220->c.c_cdr;
+	goto T777;
+	}
+	goto T778;
+T778:;
+	V213= (V218);
+	V214= (V213);
+	goto T777;
+T777:;}}
+	{object V221;
+	V221= (V215)->c.c_cdr;
+	V215= (V221);
+	goto T769;
+	}
+	goto T771;
+T771:;
+	goto T767;
+	}
+	goto T767;
+T767:;
+	V59= (V213);}}
+	{object V223;
+	{register object V224;
+	V224= Cnil;
+	{object V225;
+	register object V226;
+	register object V227;
+	V225= Cnil;
+	V226= Cnil;
+	V227= Cnil;
+	{object V228;
+	{register object V229;
+	V229= (V5);
+	goto T799;
+T799:;
+	if(((V229))==Cnil){
+	goto T801;
+	}
+	{object V231;
+	V231= (V229)->c.c_car;
+	if(((V231))==Cnil){
+	goto T814;
+	}
+	V232= tp2(V231);
+	if(!((V232)==(0))){
+	goto T817;
+	}
+	goto T813;
+	
+	goto T817;
+T817:;
+	goto T811;
+	
+	goto T814;
+T814:;
+	goto T811;
+	
+	goto T813;
+T813:;
+	V233= V231->c.c_car;
+	if(!(((V233))==(((object)VV[13])))){
+	goto T809;
+	}
+	goto T810;
+	
+	goto T811;
+T811:;
+	goto T809;
+	
+	goto T810;
+T810:;
+	goto T807;
+	
+	goto T809;
+T809:;
+	goto T805;
+	}
+	goto T807;
+T807:;
+	V228= (V229);
+	goto T791;
+	
+	goto T805;
+T805:;
+	{object V234;
+	V234= (V229)->c.c_cdr;
+	V229= (V234);
+	goto T799;
+	}
+	goto T801;
+T801:;
+	goto T797;
+	}
+	goto T797;
+T797:;
+	if(((V5))==Cnil){
+	goto T795;
+	}
+	goto T792;
+	
+	goto T795;
+T795:;
+	V228= Cnil;
+	goto T791;
+	
+	goto T792;
+T792:;
+	V228= Cnil;
+	goto T791;
+T791:;
+	V224= (V228);}
+	goto T789;
+T789:;
+	if(((V224))==Cnil){
+	goto T829;
+	}
+	goto T826;
+	
+	goto T829;
+T829:;
+	goto T790;
+	
+	goto T826;
+T826:;
+	{object V237;
+	V237= (V224)->c.c_car;
+	V236= V237->c.c_cdr;}
+	V227= (/* COMMON-LISP::COPY-LIST */(*LnkLI5)((V236)));
+	if(((V226))==Cnil){
+	goto T836;
+	}
+	(void)((((V226))->c.c_cdr=((V227)),((V226))));
+	if(((V227))==Cnil){
+	goto T839;
+	}
+	{object V240;
+	V240= (V226)->c.c_cdr;
+	{object V242;
+	V242= V240->c.c_cdr;
+	{register object V243;
+	register object V244;
+	V243= (V240);
+	V244= (V242);
+	goto T847;
+T847:;
+	if(((V244))==Cnil){
+	goto T856;
+	}
+	goto T855;
+	
+	goto T856;
+T856:;
+	goto T854;
+	
+	goto T855;
+T855:;
+	goto T852;
+	
+	goto T854;
+T854:;
+	goto T849;
+	
+	goto T852;
+T852:;
+	{object V246;
+	object V247;
+	V246= (V243)->c.c_cdr;
+	V247= (V244)->c.c_cdr;
+	V243= (V246);
+	V244= (V247);}
+	goto T847;
+	
+	goto T849;
+T849:;
+	V226= (V243);
+	goto T843;
+	}}}
+	goto T843;
+T843:;
+	goto T831;
+	
+	goto T839;
+T839:;
+	goto T831;
+	
+	goto T836;
+T836:;
+	{object V250;
+	V225= (V227);
+	V250= (V225);
+	{object V251;
+	V251= V250->c.c_cdr;
+	{register object V252;
+	register object V253;
+	V252= (V250);
+	V253= (V251);
+	goto T871;
+T871:;
+	if(((V253))==Cnil){
+	goto T880;
+	}
+	goto T879;
+	
+	goto T880;
+T880:;
+	goto T878;
+	
+	goto T879;
+T879:;
+	goto T876;
+	
+	goto T878;
+T878:;
+	goto T873;
+	
+	goto T876;
+T876:;
+	{object V255;
+	object V256;
+	V255= (V252)->c.c_cdr;
+	V256= (V253)->c.c_cdr;
+	V252= (V255);
+	V253= (V256);}
+	goto T871;
+	
+	goto T873;
+T873:;
+	V226= (V252);
+	goto T866;
+	}}}
+	goto T866;
+T866:;
+	goto T831;
+T831:;
+	{object V259;
+	{object V260;
+	V260= (V224)->c.c_cdr;
+	{register object V262;
+	V262= (V260);
+	goto T900;
+T900:;
+	if(((V262))==Cnil){
+	goto T902;
+	}
+	{object V264;
+	V264= (V262)->c.c_car;
+	if(((V264))==Cnil){
+	goto T915;
+	}
+	V265= tp2(V264);
+	if(!((V265)==(0))){
+	goto T918;
+	}
+	goto T914;
+	
+	goto T918;
+T918:;
+	goto T912;
+	
+	goto T915;
+T915:;
+	goto T912;
+	
+	goto T914;
+T914:;
+	V266= V264->c.c_car;
+	if(!(((V266))==(((object)VV[13])))){
+	goto T910;
+	}
+	goto T911;
+	
+	goto T912;
+T912:;
+	goto T910;
+	
+	goto T911;
+T911:;
+	goto T908;
+	
+	goto T910;
+T910:;
+	goto T906;
+	}
+	goto T908;
+T908:;
+	V259= (V262);
+	goto T891;
+	
+	goto T906;
+T906:;
+	{object V267;
+	V267= (V262)->c.c_cdr;
+	V262= (V267);
+	goto T900;
+	}
+	goto T902;
+T902:;
+	goto T898;
+	}
+	goto T898;
+T898:;
+	if(((V260))==Cnil){
+	goto T896;
+	}
+	goto T893;
+	
+	goto T896;
+T896:;
+	V259= Cnil;
+	goto T891;
+	
+	goto T893;
+T893:;
+	V259= Cnil;}
+	goto T891;
+T891:;
+	V224= (V259);}
+	goto T789;
+	
+	goto T790;
+T790:;
+	V223= (V225);
+	goto T787;
+	
+	V223= Cnil;
+	goto T787;
+	}}
+	goto T787;
+T787:;
+	{object V269;
+	register object V270;
+	V269= Cnil;
+	V270= Cnil;
+	{register object V271;
+	V271= (V223);
+	goto T931;
+T931:;
+	if(((V271))==Cnil){
+	goto T933;
+	}
+	{object V273;
+	V273= (V271)->c.c_car;
+	{object V274;
+	V275= coerce_to_string((V273));
+	V274= make_cons((V275),Cnil);
+	if(((V270))==Cnil){
+	goto T940;
+	}
+	{object V276;
+	V276= (((V270))->c.c_cdr=((V274)),((V270)));
+	V270= V276->c.c_cdr;
+	goto T939;
+	}
+	goto T940;
+T940:;
+	V269= (V274);
+	V270= (V269);
+	goto T939;
+T939:;}}
+	{object V277;
+	V277= (V271)->c.c_cdr;
+	V271= (V277);
+	goto T931;
+	}
+	goto T933;
+T933:;
+	goto T929;
+	}
+	goto T929;
+T929:;
+	V60= (V269);}}
+	{object V279;
+	{register object V280;
+	V280= Cnil;
+	{object V281;
+	register object V282;
+	register object V283;
+	V281= Cnil;
+	V282= Cnil;
+	V283= Cnil;
+	{object V284;
+	{register object V285;
+	V285= (V5);
+	goto T961;
+T961:;
+	if(((V285))==Cnil){
+	goto T963;
+	}
+	{object V287;
+	V287= (V285)->c.c_car;
+	if(((V287))==Cnil){
+	goto T976;
+	}
+	V288= tp2(V287);
+	if(!((V288)==(0))){
+	goto T979;
+	}
+	goto T975;
+	
+	goto T979;
+T979:;
+	goto T973;
+	
+	goto T976;
+T976:;
+	goto T973;
+	
+	goto T975;
+T975:;
+	V289= V287->c.c_car;
+	if(!(((V289))==(((object)VV[14])))){
+	goto T971;
+	}
+	goto T972;
+	
+	goto T973;
+T973:;
+	goto T971;
+	
+	goto T972;
+T972:;
+	goto T969;
+	
+	goto T971;
+T971:;
+	goto T967;
+	}
+	goto T969;
+T969:;
+	V284= (V285);
+	goto T953;
+	
+	goto T967;
+T967:;
+	{object V290;
+	V290= (V285)->c.c_cdr;
+	V285= (V290);
+	goto T961;
+	}
+	goto T963;
+T963:;
+	goto T959;
+	}
+	goto T959;
+T959:;
+	if(((V5))==Cnil){
+	goto T957;
+	}
+	goto T954;
+	
+	goto T957;
+T957:;
+	V284= Cnil;
+	goto T953;
+	
+	goto T954;
+T954:;
+	V284= Cnil;
+	goto T953;
+T953:;
+	V280= (V284);}
+	goto T951;
+T951:;
+	if(((V280))==Cnil){
+	goto T991;
+	}
+	goto T988;
+	
+	goto T991;
+T991:;
+	goto T952;
+	
+	goto T988;
+T988:;
+	{object V293;
+	V293= (V280)->c.c_car;
+	V292= V293->c.c_cdr;}
+	V283= (/* COMMON-LISP::COPY-LIST */(*LnkLI5)((V292)));
+	if(((V282))==Cnil){
+	goto T998;
+	}
+	(void)((((V282))->c.c_cdr=((V283)),((V282))));
+	if(((V283))==Cnil){
+	goto T1001;
+	}
+	{object V296;
+	V296= (V282)->c.c_cdr;
+	{object V298;
+	V298= V296->c.c_cdr;
+	{register object V299;
+	register object V300;
+	V299= (V296);
+	V300= (V298);
+	goto T1009;
+T1009:;
+	if(((V300))==Cnil){
+	goto T1018;
+	}
+	goto T1017;
+	
+	goto T1018;
+T1018:;
+	goto T1016;
+	
+	goto T1017;
+T1017:;
+	goto T1014;
+	
+	goto T1016;
+T1016:;
+	goto T1011;
+	
+	goto T1014;
+T1014:;
+	{object V302;
+	object V303;
+	V302= (V299)->c.c_cdr;
+	V303= (V300)->c.c_cdr;
+	V299= (V302);
+	V300= (V303);}
+	goto T1009;
+	
+	goto T1011;
+T1011:;
+	V282= (V299);
+	goto T1005;
+	}}}
+	goto T1005;
+T1005:;
+	goto T993;
+	
+	goto T1001;
+T1001:;
+	goto T993;
+	
+	goto T998;
+T998:;
+	{object V306;
+	V281= (V283);
+	V306= (V281);
+	{object V307;
+	V307= V306->c.c_cdr;
+	{register object V308;
+	register object V309;
+	V308= (V306);
+	V309= (V307);
+	goto T1033;
+T1033:;
+	if(((V309))==Cnil){
+	goto T1042;
+	}
+	goto T1041;
+	
+	goto T1042;
+T1042:;
+	goto T1040;
+	
+	goto T1041;
+T1041:;
+	goto T1038;
+	
+	goto T1040;
+T1040:;
+	goto T1035;
+	
+	goto T1038;
+T1038:;
+	{object V311;
+	object V312;
+	V311= (V308)->c.c_cdr;
+	V312= (V309)->c.c_cdr;
+	V308= (V311);
+	V309= (V312);}
+	goto T1033;
+	
+	goto T1035;
+T1035:;
+	V282= (V308);
+	goto T1028;
+	}}}
+	goto T1028;
+T1028:;
+	goto T993;
+T993:;
+	{object V315;
+	{object V316;
+	V316= (V280)->c.c_cdr;
+	{register object V318;
+	V318= (V316);
+	goto T1062;
+T1062:;
+	if(((V318))==Cnil){
+	goto T1064;
+	}
+	{object V320;
+	V320= (V318)->c.c_car;
+	if(((V320))==Cnil){
+	goto T1077;
+	}
+	V321= tp2(V320);
+	if(!((V321)==(0))){
+	goto T1080;
+	}
+	goto T1076;
+	
+	goto T1080;
+T1080:;
+	goto T1074;
+	
+	goto T1077;
+T1077:;
+	goto T1074;
+	
+	goto T1076;
+T1076:;
+	V322= V320->c.c_car;
+	if(!(((V322))==(((object)VV[14])))){
+	goto T1072;
+	}
+	goto T1073;
+	
+	goto T1074;
+T1074:;
+	goto T1072;
+	
+	goto T1073;
+T1073:;
+	goto T1070;
+	
+	goto T1072;
+T1072:;
+	goto T1068;
+	}
+	goto T1070;
+T1070:;
+	V315= (V318);
+	goto T1053;
+	
+	goto T1068;
+T1068:;
+	{object V323;
+	V323= (V318)->c.c_cdr;
+	V318= (V323);
+	goto T1062;
+	}
+	goto T1064;
+T1064:;
+	goto T1060;
+	}
+	goto T1060;
+T1060:;
+	if(((V316))==Cnil){
+	goto T1058;
+	}
+	goto T1055;
+	
+	goto T1058;
+T1058:;
+	V315= Cnil;
+	goto T1053;
+	
+	goto T1055;
+T1055:;
+	V315= Cnil;}
+	goto T1053;
+T1053:;
+	V280= (V315);}
+	goto T951;
+	
+	goto T952;
+T952:;
+	V279= (V281);
+	goto T949;
+	
+	V279= Cnil;
+	goto T949;
+	}}
+	goto T949;
+T949:;
+	{object V325;
+	register object V326;
+	V325= Cnil;
+	V326= Cnil;
+	{register object V327;
+	V327= (V279);
+	goto T1093;
+T1093:;
+	if(((V327))==Cnil){
+	goto T1095;
+	}
+	{object V329;
+	V329= (V327)->c.c_car;
+	{object V330;
+	V331= coerce_to_string((V329));
+	V330= make_cons((V331),Cnil);
+	if(((V326))==Cnil){
+	goto T1102;
+	}
+	{object V332;
+	V332= (((V326))->c.c_cdr=((V330)),((V326)));
+	V326= V332->c.c_cdr;
+	goto T1101;
+	}
+	goto T1102;
+T1102:;
+	V325= (V330);
+	V326= (V325);
+	goto T1101;
+T1101:;}}
+	{object V333;
+	V333= (V327)->c.c_cdr;
+	V327= (V333);
+	goto T1093;
+	}
+	goto T1095;
+T1095:;
+	goto T1091;
+	}
+	goto T1091;
+T1091:;
+	V61= (V325);}}
+	{register object V335;
+	register object V336;
+	{register object V337;
+	V337= Cnil;
+	{object V338;
+	register object V339;
+	register object V340;
+	V338= Cnil;
+	V339= Cnil;
+	V340= Cnil;
+	{object V341;
+	{register object V342;
+	V342= (V5);
+	goto T1123;
+T1123:;
+	if(((V342))==Cnil){
+	goto T1125;
+	}
+	{object V344;
+	V344= (V342)->c.c_car;
+	if(((V344))==Cnil){
+	goto T1138;
+	}
+	V345= tp2(V344);
+	if(!((V345)==(0))){
+	goto T1141;
+	}
+	goto T1137;
+	
+	goto T1141;
+T1141:;
+	goto T1135;
+	
+	goto T1138;
+T1138:;
+	goto T1135;
+	
+	goto T1137;
+T1137:;
+	V346= V344->c.c_car;
+	if(!(((V346))==(((object)VV[10])))){
+	goto T1133;
+	}
+	goto T1134;
+	
+	goto T1135;
+T1135:;
+	goto T1133;
+	
+	goto T1134;
+T1134:;
+	goto T1131;
+	
+	goto T1133;
+T1133:;
+	goto T1129;
+	}
+	goto T1131;
+T1131:;
+	V341= (V342);
+	goto T1115;
+	
+	goto T1129;
+T1129:;
+	{object V347;
+	V347= (V342)->c.c_cdr;
+	V342= (V347);
+	goto T1123;
+	}
+	goto T1125;
+T1125:;
+	goto T1121;
+	}
+	goto T1121;
+T1121:;
+	if(((V5))==Cnil){
+	goto T1119;
+	}
+	goto T1116;
+	
+	goto T1119;
+T1119:;
+	V341= Cnil;
+	goto T1115;
+	
+	goto T1116;
+T1116:;
+	V341= Cnil;
+	goto T1115;
+T1115:;
+	V337= (V341);}
+	goto T1113;
+T1113:;
+	if(((V337))==Cnil){
+	goto T1153;
+	}
+	goto T1150;
+	
+	goto T1153;
+T1153:;
+	goto T1114;
+	
+	goto T1150;
+T1150:;
+	{object V349;
+	V349= (V337)->c.c_car;
+	V340= V349->c.c_cdr;}
+	if(((V339))==Cnil){
+	goto T1159;
+	}
+	{object V351;
+	object V352;
+	V351= (V339);
+	V339= make_cons((V340),Cnil);
+	V352= (V339);
+	(void)((((V351))->c.c_cdr=((V352)),((V351))));
+	goto T1155;
+	}
+	goto T1159;
+T1159:;
+	V339= make_cons((V340),Cnil);
+	V338= (V339);
+	goto T1155;
+T1155:;
+	{object V353;
+	{object V354;
+	V354= (V337)->c.c_cdr;
+	{register object V356;
+	V356= (V354);
+	goto T1177;
+T1177:;
+	if(((V356))==Cnil){
+	goto T1179;
+	}
+	{object V358;
+	V358= (V356)->c.c_car;
+	if(((V358))==Cnil){
+	goto T1192;
+	}
+	V359= tp2(V358);
+	if(!((V359)==(0))){
+	goto T1195;
+	}
+	goto T1191;
+	
+	goto T1195;
+T1195:;
+	goto T1189;
+	
+	goto T1192;
+T1192:;
+	goto T1189;
+	
+	goto T1191;
+T1191:;
+	V360= V358->c.c_car;
+	if(!(((V360))==(((object)VV[10])))){
+	goto T1187;
+	}
+	goto T1188;
+	
+	goto T1189;
+T1189:;
+	goto T1187;
+	
+	goto T1188;
+T1188:;
+	goto T1185;
+	
+	goto T1187;
+T1187:;
+	goto T1183;
+	}
+	goto T1185;
+T1185:;
+	V353= (V356);
+	goto T1168;
+	
+	goto T1183;
+T1183:;
+	{object V361;
+	V361= (V356)->c.c_cdr;
+	V356= (V361);
+	goto T1177;
+	}
+	goto T1179;
+T1179:;
+	goto T1175;
+	}
+	goto T1175;
+T1175:;
+	if(((V354))==Cnil){
+	goto T1173;
+	}
+	goto T1170;
+	
+	goto T1173;
+T1173:;
+	V353= Cnil;
+	goto T1168;
+	
+	goto T1170;
+T1170:;
+	V353= Cnil;}
+	goto T1168;
+T1168:;
+	V337= (V353);}
+	goto T1113;
+	
+	goto T1114;
+T1114:;
+	V336= (V338);
+	goto T1111;
+	
+	V336= Cnil;
+	goto T1111;
+	}}
+	goto T1111;
+T1111:;
+	V335= Cnil;
+	{object V363;
+	register object V364;
+	register object V365;
+	V363= Cnil;
+	V364= Cnil;
+	V365= Cnil;
+	goto T1206;
+T1206:;
+	if(((V336))==Cnil){
+	goto T1212;
+	}
+	goto T1209;
+	
+	goto T1212;
+T1212:;
+	goto T1207;
+	
+	goto T1209;
+T1209:;
+	{object V366;
+	V366= (V336)->c.c_car;
+	V335= (V366);}
+	V368= V335->c.c_car;
+	V369= coerce_to_string((V368));
+	{object V371;
+	V371= V335->c.c_cdr;
+	{object V372;
+	register object V373;
+	V372= Cnil;
+	V373= Cnil;
+	{register object V374;
+	V374= (V371);
+	goto T1225;
+T1225:;
+	if(((V374))==Cnil){
+	goto T1227;
+	}
+	{object V376;
+	V376= (V374)->c.c_car;
+	{object V377;
+	V378= coerce_to_string((V376));
+	V377= make_cons((V378),Cnil);
+	if(((V373))==Cnil){
+	goto T1234;
+	}
+	{object V379;
+	V379= (((V373))->c.c_cdr=((V377)),((V373)));
+	V373= V379->c.c_cdr;
+	goto T1233;
+	}
+	goto T1234;
+T1234:;
+	V372= (V377);
+	V373= (V372);
+	goto T1233;
+T1233:;}}
+	{object V380;
+	V380= (V374)->c.c_cdr;
+	V374= (V380);
+	goto T1225;
+	}
+	goto T1227;
+T1227:;
+	goto T1223;
+	}
+	goto T1223;
+T1223:;
+	V370= (V372);}}
+	V365= make_cons((V369),(V370));
+	if(((V364))==Cnil){
+	goto T1243;
+	}
+	{object V382;
+	object V383;
+	V382= (V364);
+	V364= make_cons((V365),Cnil);
+	V383= (V364);
+	(void)((((V382))->c.c_cdr=((V383)),((V382))));
+	goto T1242;
+	}
+	goto T1243;
+T1243:;
+	V364= make_cons((V365),Cnil);
+	V363= (V364);
+	goto T1242;
+T1242:;
+	V336= (V336)->c.c_cdr;
+	goto T1206;
+	
+	goto T1207;
+T1207:;
+	V62= (V363);
+	goto T1110;
+	
+	V62= Cnil;
+	goto T1110;
+	}}
+	goto T1110;
+T1110:;
+	{register object V385;
+	register object V386;
+	{register object V387;
+	V387= Cnil;
+	{object V388;
+	register object V389;
+	register object V390;
+	V388= Cnil;
+	V389= Cnil;
+	V390= Cnil;
+	{object V391;
+	{register object V392;
+	V392= (V5);
+	goto T1268;
+T1268:;
+	if(((V392))==Cnil){
+	goto T1270;
+	}
+	{object V394;
+	V394= (V392)->c.c_car;
+	if(((V394))==Cnil){
+	goto T1283;
+	}
+	V395= tp2(V394);
+	if(!((V395)==(0))){
+	goto T1286;
+	}
+	goto T1282;
+	
+	goto T1286;
+T1286:;
+	goto T1280;
+	
+	goto T1283;
+T1283:;
+	goto T1280;
+	
+	goto T1282;
+T1282:;
+	V396= V394->c.c_car;
+	if(!(((V396))==(((object)VV[12])))){
+	goto T1278;
+	}
+	goto T1279;
+	
+	goto T1280;
+T1280:;
+	goto T1278;
+	
+	goto T1279;
+T1279:;
+	goto T1276;
+	
+	goto T1278;
+T1278:;
+	goto T1274;
+	}
+	goto T1276;
+T1276:;
+	V391= (V392);
+	goto T1260;
+	
+	goto T1274;
+T1274:;
+	{object V397;
+	V397= (V392)->c.c_cdr;
+	V392= (V397);
+	goto T1268;
+	}
+	goto T1270;
+T1270:;
+	goto T1266;
+	}
+	goto T1266;
+T1266:;
+	if(((V5))==Cnil){
+	goto T1264;
+	}
+	goto T1261;
+	
+	goto T1264;
+T1264:;
+	V391= Cnil;
+	goto T1260;
+	
+	goto T1261;
+T1261:;
+	V391= Cnil;
+	goto T1260;
+T1260:;
+	V387= (V391);}
+	goto T1258;
+T1258:;
+	if(((V387))==Cnil){
+	goto T1298;
+	}
+	goto T1295;
+	
+	goto T1298;
+T1298:;
+	goto T1259;
+	
+	goto T1295;
+T1295:;
+	{object V399;
+	V399= (V387)->c.c_car;
+	V390= V399->c.c_cdr;}
+	if(((V389))==Cnil){
+	goto T1304;
+	}
+	{object V401;
+	object V402;
+	V401= (V389);
+	V389= make_cons((V390),Cnil);
+	V402= (V389);
+	(void)((((V401))->c.c_cdr=((V402)),((V401))));
+	goto T1300;
+	}
+	goto T1304;
+T1304:;
+	V389= make_cons((V390),Cnil);
+	V388= (V389);
+	goto T1300;
+T1300:;
+	{object V403;
+	{object V404;
+	V404= (V387)->c.c_cdr;
+	{register object V406;
+	V406= (V404);
+	goto T1322;
+T1322:;
+	if(((V406))==Cnil){
+	goto T1324;
+	}
+	{object V408;
+	V408= (V406)->c.c_car;
+	if(((V408))==Cnil){
+	goto T1337;
+	}
+	V409= tp2(V408);
+	if(!((V409)==(0))){
+	goto T1340;
+	}
+	goto T1336;
+	
+	goto T1340;
+T1340:;
+	goto T1334;
+	
+	goto T1337;
+T1337:;
+	goto T1334;
+	
+	goto T1336;
+T1336:;
+	V410= V408->c.c_car;
+	if(!(((V410))==(((object)VV[12])))){
+	goto T1332;
+	}
+	goto T1333;
+	
+	goto T1334;
+T1334:;
+	goto T1332;
+	
+	goto T1333;
+T1333:;
+	goto T1330;
+	
+	goto T1332;
+T1332:;
+	goto T1328;
+	}
+	goto T1330;
+T1330:;
+	V403= (V406);
+	goto T1313;
+	
+	goto T1328;
+T1328:;
+	{object V411;
+	V411= (V406)->c.c_cdr;
+	V406= (V411);
+	goto T1322;
+	}
+	goto T1324;
+T1324:;
+	goto T1320;
+	}
+	goto T1320;
+T1320:;
+	if(((V404))==Cnil){
+	goto T1318;
+	}
+	goto T1315;
+	
+	goto T1318;
+T1318:;
+	V403= Cnil;
+	goto T1313;
+	
+	goto T1315;
+T1315:;
+	V403= Cnil;}
+	goto T1313;
+T1313:;
+	V387= (V403);}
+	goto T1258;
+	
+	goto T1259;
+T1259:;
+	V386= (V388);
+	goto T1256;
+	
+	V386= Cnil;
+	goto T1256;
+	}}
+	goto T1256;
+T1256:;
+	V385= Cnil;
+	{object V413;
+	register object V414;
+	register object V415;
+	V413= Cnil;
+	V414= Cnil;
+	V415= Cnil;
+	goto T1351;
+T1351:;
+	if(((V386))==Cnil){
+	goto T1357;
+	}
+	goto T1354;
+	
+	goto T1357;
+T1357:;
+	goto T1352;
+	
+	goto T1354;
+T1354:;
+	{object V416;
+	V416= (V386)->c.c_car;
+	V385= (V416);}
+	V418= V385->c.c_car;
+	V419= coerce_to_string((V418));
+	{object V421;
+	V421= V385->c.c_cdr;
+	{object V422;
+	register object V423;
+	V422= Cnil;
+	V423= Cnil;
+	{register object V424;
+	V424= (V421);
+	goto T1370;
+T1370:;
+	if(((V424))==Cnil){
+	goto T1372;
+	}
+	{object V426;
+	V426= (V424)->c.c_car;
+	{object V427;
+	V428= coerce_to_string((V426));
+	V427= make_cons((V428),Cnil);
+	if(((V423))==Cnil){
+	goto T1379;
+	}
+	{object V429;
+	V429= (((V423))->c.c_cdr=((V427)),((V423)));
+	V423= V429->c.c_cdr;
+	goto T1378;
+	}
+	goto T1379;
+T1379:;
+	V422= (V427);
+	V423= (V422);
+	goto T1378;
+T1378:;}}
+	{object V430;
+	V430= (V424)->c.c_cdr;
+	V424= (V430);
+	goto T1370;
+	}
+	goto T1372;
+T1372:;
+	goto T1368;
+	}
+	goto T1368;
+T1368:;
+	V420= (V422);}}
+	V415= make_cons((V419),(V420));
+	if(((V414))==Cnil){
+	goto T1388;
+	}
+	{object V432;
+	object V433;
+	V432= (V414);
+	V414= make_cons((V415),Cnil);
+	V433= (V414);
+	(void)((((V432))->c.c_cdr=((V433)),((V432))));
+	goto T1387;
+	}
+	goto T1388;
+T1388:;
+	V414= make_cons((V415),Cnil);
+	V413= (V414);
+	goto T1387;
+T1387:;
+	V386= (V386)->c.c_cdr;
+	goto T1351;
+	
+	goto T1352;
+T1352:;
+	V63= (V413);
+	goto T1255;
+	
+	V63= Cnil;
+	goto T1255;
+	}}
+	goto T1255;
+T1255:;
+	{object V435;
+	{register object V436;
+	V436= Cnil;
+	{object V437;
+	register object V438;
+	register object V439;
+	V437= Cnil;
+	V438= Cnil;
+	V439= Cnil;
+	{object V440;
+	{register object V441;
+	V441= (V5);
+	goto T1413;
+T1413:;
+	if(((V441))==Cnil){
+	goto T1415;
+	}
+	{object V443;
+	V443= (V441)->c.c_car;
+	if(((V443))==Cnil){
+	goto T1428;
+	}
+	V444= tp2(V443);
+	if(!((V444)==(0))){
+	goto T1431;
+	}
+	goto T1427;
+	
+	goto T1431;
+T1431:;
+	goto T1425;
+	
+	goto T1428;
+T1428:;
+	goto T1425;
+	
+	goto T1427;
+T1427:;
+	V445= V443->c.c_car;
+	if(!(((V445))==(((object)VV[15])))){
+	goto T1423;
+	}
+	goto T1424;
+	
+	goto T1425;
+T1425:;
+	goto T1423;
+	
+	goto T1424;
+T1424:;
+	goto T1421;
+	
+	goto T1423;
+T1423:;
+	goto T1419;
+	}
+	goto T1421;
+T1421:;
+	V440= (V441);
+	goto T1405;
+	
+	goto T1419;
+T1419:;
+	{object V446;
+	V446= (V441)->c.c_cdr;
+	V441= (V446);
+	goto T1413;
+	}
+	goto T1415;
+T1415:;
+	goto T1411;
+	}
+	goto T1411;
+T1411:;
+	if(((V5))==Cnil){
+	goto T1409;
+	}
+	goto T1406;
+	
+	goto T1409;
+T1409:;
+	V440= Cnil;
+	goto T1405;
+	
+	goto T1406;
+T1406:;
+	V440= Cnil;
+	goto T1405;
+T1405:;
+	V436= (V440);}
+	goto T1403;
+T1403:;
+	if(((V436))==Cnil){
+	goto T1443;
+	}
+	goto T1440;
+	
+	goto T1443;
+T1443:;
+	goto T1404;
+	
+	goto T1440;
+T1440:;
+	{object V449;
+	V449= (V436)->c.c_car;
+	V448= V449->c.c_cdr;}
+	V439= (/* COMMON-LISP::COPY-LIST */(*LnkLI5)((V448)));
+	if(((V438))==Cnil){
+	goto T1450;
+	}
+	(void)((((V438))->c.c_cdr=((V439)),((V438))));
+	if(((V439))==Cnil){
+	goto T1453;
+	}
+	{object V452;
+	V452= (V438)->c.c_cdr;
+	{object V454;
+	V454= V452->c.c_cdr;
+	{register object V455;
+	register object V456;
+	V455= (V452);
+	V456= (V454);
+	goto T1461;
+T1461:;
+	if(((V456))==Cnil){
+	goto T1470;
+	}
+	goto T1469;
+	
+	goto T1470;
+T1470:;
+	goto T1468;
+	
+	goto T1469;
+T1469:;
+	goto T1466;
+	
+	goto T1468;
+T1468:;
+	goto T1463;
+	
+	goto T1466;
+T1466:;
+	{object V458;
+	object V459;
+	V458= (V455)->c.c_cdr;
+	V459= (V456)->c.c_cdr;
+	V455= (V458);
+	V456= (V459);}
+	goto T1461;
+	
+	goto T1463;
+T1463:;
+	V438= (V455);
+	goto T1457;
+	}}}
+	goto T1457;
+T1457:;
+	goto T1445;
+	
+	goto T1453;
+T1453:;
+	goto T1445;
+	
+	goto T1450;
+T1450:;
+	{object V462;
+	V437= (V439);
+	V462= (V437);
+	{object V463;
+	V463= V462->c.c_cdr;
+	{register object V464;
+	register object V465;
+	V464= (V462);
+	V465= (V463);
+	goto T1485;
+T1485:;
+	if(((V465))==Cnil){
+	goto T1494;
+	}
+	goto T1493;
+	
+	goto T1494;
+T1494:;
+	goto T1492;
+	
+	goto T1493;
+T1493:;
+	goto T1490;
+	
+	goto T1492;
+T1492:;
+	goto T1487;
+	
+	goto T1490;
+T1490:;
+	{object V467;
+	object V468;
+	V467= (V464)->c.c_cdr;
+	V468= (V465)->c.c_cdr;
+	V464= (V467);
+	V465= (V468);}
+	goto T1485;
+	
+	goto T1487;
+T1487:;
+	V438= (V464);
+	goto T1480;
+	}}}
+	goto T1480;
+T1480:;
+	goto T1445;
+T1445:;
+	{object V471;
+	{object V472;
+	V472= (V436)->c.c_cdr;
+	{register object V474;
+	V474= (V472);
+	goto T1514;
+T1514:;
+	if(((V474))==Cnil){
+	goto T1516;
+	}
+	{object V476;
+	V476= (V474)->c.c_car;
+	if(((V476))==Cnil){
+	goto T1529;
+	}
+	V477= tp2(V476);
+	if(!((V477)==(0))){
+	goto T1532;
+	}
+	goto T1528;
+	
+	goto T1532;
+T1532:;
+	goto T1526;
+	
+	goto T1529;
+T1529:;
+	goto T1526;
+	
+	goto T1528;
+T1528:;
+	V478= V476->c.c_car;
+	if(!(((V478))==(((object)VV[15])))){
+	goto T1524;
+	}
+	goto T1525;
+	
+	goto T1526;
+T1526:;
+	goto T1524;
+	
+	goto T1525;
+T1525:;
+	goto T1522;
+	
+	goto T1524;
+T1524:;
+	goto T1520;
+	}
+	goto T1522;
+T1522:;
+	V471= (V474);
+	goto T1505;
+	
+	goto T1520;
+T1520:;
+	{object V479;
+	V479= (V474)->c.c_cdr;
+	V474= (V479);
+	goto T1514;
+	}
+	goto T1516;
+T1516:;
+	goto T1512;
+	}
+	goto T1512;
+T1512:;
+	if(((V472))==Cnil){
+	goto T1510;
+	}
+	goto T1507;
+	
+	goto T1510;
+T1510:;
+	V471= Cnil;
+	goto T1505;
+	
+	goto T1507;
+T1507:;
+	V471= Cnil;}
+	goto T1505;
+T1505:;
+	V436= (V471);}
+	goto T1403;
+	
+	goto T1404;
+T1404:;
+	V435= (V437);
+	goto T1401;
+	
+	V435= Cnil;
+	goto T1401;
+	}}
+	goto T1401;
+T1401:;
+	{object V481;
+	register object V482;
+	V481= Cnil;
+	V482= Cnil;
+	{register object V483;
+	V483= (V435);
+	goto T1545;
+T1545:;
+	if(((V483))==Cnil){
+	goto T1547;
+	}
+	{object V485;
+	V485= (V483)->c.c_car;
+	{object V486;
+	V487= coerce_to_string((V485));
+	V486= make_cons((V487),Cnil);
+	if(((V482))==Cnil){
+	goto T1554;
+	}
+	{object V488;
+	V488= (((V482))->c.c_cdr=((V486)),((V482)));
+	V482= V488->c.c_cdr;
+	goto T1553;
+	}
+	goto T1554;
+T1554:;
+	V481= (V486);
+	V482= (V481);
+	goto T1553;
+T1553:;}}
+	{object V489;
+	V489= (V483)->c.c_cdr;
+	V483= (V489);
+	goto T1545;
+	}
+	goto T1547;
+T1547:;
+	goto T1543;
+	}
+	goto T1543;
+T1543:;
+	V64= (V481);}}
+	{register object V491;
+	register object V492;
+	{object V493;
+	object V494;
+	object V495;
+	{register object V496;
+	register object V497;
+	V496= Cnil;
+	V497= (V62);
+	{object V498;
+	register object V499;
+	register object V500;
+	V498= Cnil;
+	V499= Cnil;
+	V500= Cnil;
+	goto T1566;
+T1566:;
+	if(((V497))==Cnil){
+	goto T1572;
+	}
+	goto T1569;
+	
+	goto T1572;
+T1572:;
+	goto T1567;
+	
+	goto T1569;
+T1569:;
+	{object V501;
+	V501= (V497)->c.c_car;
+	V496= (V501);}
+	V503= V496->c.c_cdr;
+	V500= (/* COMMON-LISP::COPY-LIST */(*LnkLI5)((V503)));
+	if(((V499))==Cnil){
+	goto T1581;
+	}
+	(void)((((V499))->c.c_cdr=((V500)),((V499))));
+	if(((V500))==Cnil){
+	goto T1584;
+	}
+	{object V505;
+	V505= (V499)->c.c_cdr;
+	{object V507;
+	V507= V505->c.c_cdr;
+	{register object V508;
+	register object V509;
+	V508= (V505);
+	V509= (V507);
+	goto T1592;
+T1592:;
+	if(((V509))==Cnil){
+	goto T1601;
+	}
+	goto T1600;
+	
+	goto T1601;
+T1601:;
+	goto T1599;
+	
+	goto T1600;
+T1600:;
+	goto T1597;
+	
+	goto T1599;
+T1599:;
+	goto T1594;
+	
+	goto T1597;
+T1597:;
+	{object V511;
+	object V512;
+	V511= (V508)->c.c_cdr;
+	V512= (V509)->c.c_cdr;
+	V508= (V511);
+	V509= (V512);}
+	goto T1592;
+	
+	goto T1594;
+T1594:;
+	V499= (V508);
+	goto T1588;
+	}}}
+	goto T1588;
+T1588:;
+	goto T1580;
+	
+	goto T1584;
+T1584:;
+	goto T1580;
+	
+	goto T1581;
+T1581:;
+	{object V515;
+	V498= (V500);
+	V515= (V498);
+	{object V516;
+	V516= V515->c.c_cdr;
+	{register object V517;
+	register object V518;
+	V517= (V515);
+	V518= (V516);
+	goto T1616;
+T1616:;
+	if(((V518))==Cnil){
+	goto T1625;
+	}
+	goto T1624;
+	
+	goto T1625;
+T1625:;
+	goto T1623;
+	
+	goto T1624;
+T1624:;
+	goto T1621;
+	
+	goto T1623;
+T1623:;
+	goto T1618;
+	
+	goto T1621;
+T1621:;
+	{object V520;
+	object V521;
+	V520= (V517)->c.c_cdr;
+	V521= (V518)->c.c_cdr;
+	V517= (V520);
+	V518= (V521);}
+	goto T1616;
+	
+	goto T1618;
+T1618:;
+	V499= (V517);
+	goto T1611;
+	}}}
+	goto T1611;
+T1611:;
+	goto T1580;
+T1580:;
+	V497= (V497)->c.c_cdr;
+	goto T1566;
+	
+	goto T1567;
+T1567:;
+	V493= (V498);
+	goto T1564;
+	
+	V493= Cnil;
+	goto T1564;
+	}}
+	goto T1564;
+T1564:;
+	{register object V525;
+	register object V526;
+	V525= Cnil;
+	V526= (V63);
+	{object V527;
+	register object V528;
+	register object V529;
+	V527= Cnil;
+	V528= Cnil;
+	V529= Cnil;
+	goto T1641;
+T1641:;
+	if(((V526))==Cnil){
+	goto T1647;
+	}
+	goto T1644;
+	
+	goto T1647;
+T1647:;
+	goto T1642;
+	
+	goto T1644;
+T1644:;
+	{object V530;
+	V530= (V526)->c.c_car;
+	V525= (V530);}
+	V532= V525->c.c_cdr;
+	V529= (/* COMMON-LISP::COPY-LIST */(*LnkLI5)((V532)));
+	if(((V528))==Cnil){
+	goto T1656;
+	}
+	(void)((((V528))->c.c_cdr=((V529)),((V528))));
+	if(((V529))==Cnil){
+	goto T1659;
+	}
+	{object V534;
+	V534= (V528)->c.c_cdr;
+	{object V536;
+	V536= V534->c.c_cdr;
+	{register object V537;
+	register object V538;
+	V537= (V534);
+	V538= (V536);
+	goto T1667;
+T1667:;
+	if(((V538))==Cnil){
+	goto T1676;
+	}
+	goto T1675;
+	
+	goto T1676;
+T1676:;
+	goto T1674;
+	
+	goto T1675;
+T1675:;
+	goto T1672;
+	
+	goto T1674;
+T1674:;
+	goto T1669;
+	
+	goto T1672;
+T1672:;
+	{object V540;
+	object V541;
+	V540= (V537)->c.c_cdr;
+	V541= (V538)->c.c_cdr;
+	V537= (V540);
+	V538= (V541);}
+	goto T1667;
+	
+	goto T1669;
+T1669:;
+	V528= (V537);
+	goto T1663;
+	}}}
+	goto T1663;
+T1663:;
+	goto T1655;
+	
+	goto T1659;
+T1659:;
+	goto T1655;
+	
+	goto T1656;
+T1656:;
+	{object V544;
+	V527= (V529);
+	V544= (V527);
+	{object V545;
+	V545= V544->c.c_cdr;
+	{register object V546;
+	register object V547;
+	V546= (V544);
+	V547= (V545);
+	goto T1691;
+T1691:;
+	if(((V547))==Cnil){
+	goto T1700;
+	}
+	goto T1699;
+	
+	goto T1700;
+T1700:;
+	goto T1698;
+	
+	goto T1699;
+T1699:;
+	goto T1696;
+	
+	goto T1698;
+T1698:;
+	goto T1693;
+	
+	goto T1696;
+T1696:;
+	{object V549;
+	object V550;
+	V549= (V546)->c.c_cdr;
+	V550= (V547)->c.c_cdr;
+	V546= (V549);
+	V547= (V550);}
+	goto T1691;
+	
+	goto T1693;
+T1693:;
+	V528= (V546);
+	goto T1686;
+	}}}
+	goto T1686;
+T1686:;
+	goto T1655;
+T1655:;
+	V526= (V526)->c.c_cdr;
+	goto T1641;
+	
+	goto T1642;
+T1642:;
+	V494= (V527);
+	goto T1639;
+	
+	V494= Cnil;
+	goto T1639;
+	}}
+	goto T1639;
+T1639:;
+	V495= listA(5,(V59),(V60),(V493),(V494),Cnil);
+	{register object V554;
+	V554= Cnil;
+	{register object V555;
+	register object V556;
+	V555= Cnil;
+	V556= (V495);
+	{register object V557;
+	V557= V495->c.c_cdr;
+	{register fixnum V558;
+	V558= 1;
+	goto T1719;
+T1719:;
+	if(((V557))==Cnil){
+	goto T1725;
+	}
+	goto T1722;
+	
+	goto T1725;
+T1725:;
+	goto T1720;
+	
+	goto T1722;
+T1722:;
+	if(((V556))==Cnil){
+	goto T1731;
+	}
+	goto T1728;
+	
+	goto T1731;
+T1731:;
+	goto T1720;
+	
+	goto T1728;
+T1728:;
+	{object V559;
+	V559= (V556)->c.c_car;
+	V555= (V559);}
+	{register object V561;
+	register object V562;
+	V561= Cnil;
+	V562= (V555);
+	{register object V563;
+	V563= Cnil;
+	goto T1738;
+T1738:;
+	if(((V562))==Cnil){
+	goto T1744;
+	}
+	goto T1741;
+	
+	goto T1744;
+T1744:;
+	goto T1739;
+	
+	goto T1741;
+T1741:;
+	{object V564;
+	V564= (V562)->c.c_car;
+	V561= (V564);}
+	{object V566;
+	{object V568;
+	if(((V554))==Cnil){
+	goto T1752;
+	}
+	V568= (V554);
+	goto T1751;
+	
+	goto T1752;
+T1752:;
+	V568= Cnil;
+	goto T1751;
+T1751:;
+	{register fixnum V569;
+	register object V570;
+	V569= 0;
+	V570= (V568);
+	goto T1757;
+T1757:;
+	if(!((V569)>=((fixnum)268435455))){
+	goto T1764;
+	}
+	goto T1763;
+	
+	goto T1764;
+T1764:;
+	if(((V570))==Cnil){
+	goto T1767;
+	}
+	goto T1762;
+	
+	goto T1767;
+T1767:;
+	goto T1763;
+T1763:;
+	goto T1759;
+	
+	goto T1762;
+T1762:;
+	{object V572;
+	V572= (V570)->c.c_car;
+	{object V574;
+	V574= V572->c.c_car;
+	{register object V575;
+	register object V576;
+	register fixnum V577;
+	register fixnum V578;
+	V575= coerce_to_string((V561));
+	V576= coerce_to_string((V574));
+	V577= length((V575));
+	V578= length((V576));
+	{register fixnum V579;
+	register fixnum V580;
+	V579= 0;
+	V580= 0;
+	goto T1784;
+T1784:;
+	if(!((V579)>=(V577))){
+	goto T1791;
+	}
+	goto T1790;
+	
+	goto T1791;
+T1791:;
+	if(!((V580)>=(V578))){
+	goto T1794;
+	}
+	goto T1790;
+	
+	goto T1794;
+T1794:;
+	{fixnum V581;
+	fixnum V582;
+	{fixnum V583;
+	V583= V579;
+	{fixnum V584;
+	{fixnum V585;
+	V585= ((fixnum)V575);
+	V584= ((fixnum*)V585)[(fixnum)1];}
+	V581= ((uchar*)V584)[V583];}}
+	{fixnum V586;
+	V586= V580;
+	{fixnum V587;
+	{fixnum V588;
+	V588= ((fixnum)V576);
+	V587= ((fixnum*)V588)[(fixnum)1];}
+	V582= ((uchar*)V587)[V586];}}
+	if(!((V581)==(V582))){
+	goto T1797;
+	}}
+	goto T1789;
+	
+	goto T1797;
+T1797:;
+	goto T1790;
+T1790:;
+	goto T1786;
+	
+	goto T1789;
+T1789:;
+	{fixnum V589;
+	fixnum V590;
+	{fixnum V591;
+	V591= V579;
+	{fixnum V592;
+	V592= (V591)+(1);
+	V589= V592;}}
+	{fixnum V593;
+	V593= V580;
+	{fixnum V594;
+	V594= (V593)+(1);
+	V590= V594;}}
+	V579= V589;
+	V580= V590;}
+	goto T1784;
+	
+	goto T1786;
+T1786:;
+	if(!((V579)>=(V577))){
+	goto T1819;
+	}
+	if(!((V580)>=(V578))){
+	goto T1775;
+	}
+	goto T1776;
+	
+	goto T1819;
+T1819:;
+	goto T1775;
+	}}
+	goto T1776;
+T1776:;
+	goto T1773;
+	
+	goto T1775;
+T1775:;
+	goto T1771;
+	}
+	goto T1773;
+T1773:;
+	V566= (V572);
+	goto T1750;
+	
+	goto T1771;
+T1771:;}
+	{fixnum V595;
+	object V596;
+	V595= V569;
+	V596= (V570)->c.c_cdr;
+	V569= V595;
+	V570= (V596);
+	goto T1757;
+	}
+	goto T1759;
+T1759:;
+	V566= Cnil;
+	goto T1750;
+	}}
+	goto T1750;
+T1750:;
+	V563= (V566);}
+	{register fixnum V598;
+	V598= V558;
+	{register fixnum V599;
+	V599= 1;
+	V600= tp4(make_fixnum(V598));
+	switch(V600){
+	case -1:
+	goto T1843;
+T1843:;
+	goto T1840;
+	
+	case 1:
+	goto T1844;
+T1844:;
+	goto T1838;
+	}
+	goto T1838;
+	
+	goto T1840;
+T1840:;
+	V599= 0;
+	goto T1837;
+	
+	goto T1838;
+T1838:;
+	goto T1837;
+T1837:;
+	{register object V601;
+	V601= (V563);
+	goto T1854;
+T1854:;
+	if(((V601))==Cnil){
+	goto T1856;
+	}
+	{object V603;
+	V603= (V601)->c.c_car;
+	switch(V599){
+	case 0:
+	goto T1867;
+T1867:;
+	V604= CMPmake_fixnum(V598);
+	if(!(((V604))==((V603)))){
+	goto T1864;
+	}
+	goto T1865;
+	
+	case 1:
+	goto T1868;
+T1868:;
+	V605= CMPmake_fixnum(V598);
+	if(!(eql((V605),(V603)))){
+	goto T1864;
+	}
+	goto T1865;
+	}
+	goto T1864;
+	
+	goto T1865;
+T1865:;
+	goto T1862;
+	
+	goto T1864;
+T1864:;
+	goto T1860;
+	}
+	goto T1862;
+T1862:;
+	goto T1834;
+	
+	goto T1860;
+T1860:;
+	{object V606;
+	V606= (V601)->c.c_cdr;
+	V601= (V606);
+	goto T1854;
+	}
+	goto T1856;
+T1856:;
+	goto T1852;
+	}
+	goto T1852;
+T1852:;
+	if(((V563))==Cnil){
+	goto T1850;
+	}
+	goto T1847;
+	
+	goto T1850;
+T1850:;
+	goto T1833;
+	
+	goto T1847;
+T1847:;
+	goto T1833;
+	}}
+	goto T1834;
+T1834:;
+	goto T1830;
+	
+	goto T1833;
+T1833:;
+	{register object V608;
+	register object V609;
+	V608= Cnil;
+	V609= (V557);
+	{register fixnum V610;
+	{object V611;
+	{fixnum V612;
+	V612= V558;
+	{object V613;
+	V614= CMPmake_fixnum(V612);
+	V613= immnum_plus((V614),make_fixnum(1));
+	V611= (V613);}}
+	V615= tp4(V611);
+	switch(V615){
+	case -1:
+	goto T1885;
+T1885:;
+	case 1:
+	goto T1886;
+T1886:;
+	goto T1882;
+	
+	default:
+	goto T1887;
+T1887:;
+	goto T1881;
+	}
+	goto T1881;
+	
+	goto T1882;
+T1882:;
+	goto T1880;
+	
+	goto T1881;
+T1881:;
+	goto T1878;
+	
+	goto T1880;
+T1880:;
+	goto T1877;
+	
+	goto T1878;
+T1878:;
+	(void)((/* SLOOP::SLOOP-TYPE-ERROR */(*LnkLI6)()));
+	goto T1877;
+T1877:;
+	V610= fix((V611));}
+	goto T1890;
+T1890:;
+	if(((V609))==Cnil){
+	goto T1896;
+	}
+	goto T1893;
+	
+	goto T1896;
+T1896:;
+	goto T1891;
+	
+	goto T1893;
+T1893:;
+	{object V616;
+	V616= (V609)->c.c_car;
+	V608= (V616);}
+	{register object V618;
+	V618= (V608);
+	goto T1912;
+T1912:;
+	if(((V618))==Cnil){
+	goto T1914;
+	}
+	{object V620;
+	V620= (V618)->c.c_car;
+	{register object V621;
+	register object V622;
+	register fixnum V623;
+	register fixnum V624;
+	V621= coerce_to_string((V561));
+	V622= coerce_to_string((V620));
+	V623= length((V621));
+	V624= length((V622));
+	{register fixnum V625;
+	register fixnum V626;
+	V625= 0;
+	V626= 0;
+	goto T1931;
+T1931:;
+	if(!((V625)>=(V623))){
+	goto T1938;
+	}
+	goto T1937;
+	
+	goto T1938;
+T1938:;
+	if(!((V626)>=(V624))){
+	goto T1941;
+	}
+	goto T1937;
+	
+	goto T1941;
+T1941:;
+	{fixnum V627;
+	fixnum V628;
+	{fixnum V629;
+	V629= V625;
+	{fixnum V630;
+	{fixnum V631;
+	V631= ((fixnum)V621);
+	V630= ((fixnum*)V631)[(fixnum)1];}
+	V627= ((uchar*)V630)[V629];}}
+	{fixnum V632;
+	V632= V626;
+	{fixnum V633;
+	{fixnum V634;
+	V634= ((fixnum)V622);
+	V633= ((fixnum*)V634)[(fixnum)1];}
+	V628= ((uchar*)V633)[V632];}}
+	if(!((V627)==(V628))){
+	goto T1944;
+	}}
+	goto T1936;
+	
+	goto T1944;
+T1944:;
+	goto T1937;
+T1937:;
+	goto T1933;
+	
+	goto T1936;
+T1936:;
+	{fixnum V635;
+	fixnum V636;
+	{fixnum V637;
+	V637= V625;
+	{fixnum V638;
+	V638= (V637)+(1);
+	V635= V638;}}
+	{fixnum V639;
+	V639= V626;
+	{fixnum V640;
+	V640= (V639)+(1);
+	V636= V640;}}
+	V625= V635;
+	V626= V636;}
+	goto T1931;
+	
+	goto T1933;
+T1933:;
+	if(!((V625)>=(V623))){
+	goto T1966;
+	}
+	if(!((V626)>=(V624))){
+	goto T1922;
+	}
+	goto T1923;
+	
+	goto T1966;
+T1966:;
+	goto T1922;
+	}}
+	goto T1923;
+T1923:;
+	goto T1920;
+	
+	goto T1922;
+T1922:;
+	goto T1918;
+	}
+	goto T1920;
+T1920:;
+	goto T1904;
+	
+	goto T1918;
+T1918:;
+	{object V641;
+	V641= (V618)->c.c_cdr;
+	V618= (V641);
+	goto T1912;
+	}
+	goto T1914;
+T1914:;
+	goto T1910;
+	}
+	goto T1910;
+T1910:;
+	if(((V608))==Cnil){
+	goto T1908;
+	}
+	goto T1905;
+	
+	goto T1908;
+T1908:;
+	goto T1902;
+	
+	goto T1905;
+T1905:;
+	goto T1902;
+	
+	goto T1904;
+T1904:;
+	if(((V563))==Cnil){
+	goto T1972;
+	}
+	{object V644;
+	object V645;
+	V646= CMPmake_fixnum(V610);
+	V644= make_cons((V646),Cnil);
+	V645= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V563);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V644);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V647;
+	object V648;
+	V647= Cnil;
+	V648= Cnil;
+	V647= (V563);
+	V649= tp2((V563));
+	if(!((V649)==(0))){
+	goto T1985;
+	}
+	goto T1984;
+	
+	goto T1985;
+T1985:;
+	goto T1982;
+	
+	goto T1984;
+T1984:;
+	{object V650;
+	V650= (V563)->c.c_cdr;
+	{register object V651;
+	register object V652;
+	V651= (V563);
+	V652= (V650);
+	goto T1991;
+T1991:;
+	if(((V652))==Cnil){
+	goto T2000;
+	}
+	V654= tp2((V652));
+	if(!((V654)==(0))){
+	goto T2003;
+	}
+	goto T1999;
+	
+	goto T2003;
+T2003:;
+	goto T1998;
+	
+	goto T2000;
+T2000:;
+	goto T1998;
+	
+	goto T1999;
+T1999:;
+	goto T1996;
+	
+	goto T1998;
+T1998:;
+	goto T1993;
+	
+	goto T1996;
+T1996:;
+	{object V655;
+	object V656;
+	V655= (V651)->c.c_cdr;
+	V656= (V652)->c.c_cdr;
+	V651= (V655);
+	V652= (V656);}
+	goto T1991;
+	
+	goto T1993;
+T1993:;
+	V648= (V651);
+	goto T1988;
+	}}
+	goto T1988;
+T1988:;
+	goto T1979;
+	
+	goto T1982;
+T1982:;
+	goto T1979;
+T1979:;
+	{object V659;
+	V659= V645->c.c_cdr;
+	{object V660;
+	V660= V659->c.c_car;
+	if(((V648))==Cnil){
+	goto T2018;
+	}
+	(void)((((V648))->c.c_cdr=((V660)),((V648))));
+	goto T2017;
+	
+	goto T2018;
+T2018:;
+	V647= (V660);
+	goto T2017;
+T2017:;}}
+	goto T1901;
+	}}
+	goto T1972;
+T1972:;
+	{object V661;
+	{object V662;
+	V663= CMPmake_fixnum(V558);
+	V664= CMPmake_fixnum(V610);
+	V662= list(3,(V561),(V663),(V664));
+	V554= make_cons((V662),(V554));
+	V661= (V554);}
+	V563= V661->c.c_car;}
+	goto T1901;
+	
+	goto T1902;
+T1902:;
+	goto T1901;
+T1901:;
+	V609= (V609)->c.c_cdr;
+	if(!((V610)<((fixnum)9223372036854775806))){
+	goto T2029;
+	}
+	goto T2028;
+	
+	goto T2029;
+T2029:;
+	(void)((/* SLOOP::SLOOP-TYPE-ERROR */(*LnkLI6)()));
+	goto T2028;
+T2028:;
+	{fixnum V666;
+	V666= V610;
+	{fixnum V667;
+	V667= (V666)+(1);
+	V610= V667;}}
+	goto T1890;
+	
+	goto T1891;
+T1891:;
+	goto T1829;
+	}}
+	goto T1830;
+T1830:;
+	goto T1829;
+T1829:;
+	V562= (V562)->c.c_cdr;
+	goto T1738;
+	
+	goto T1739;
+T1739:;
+	goto T1736;
+	}}
+	goto T1736;
+T1736:;
+	V556= (V556)->c.c_cdr;
+	V557= (V557)->c.c_cdr;
+	if(!((V558)<((fixnum)9223372036854775806))){
+	goto T2045;
+	}
+	goto T2044;
+	
+	goto T2045;
+T2045:;
+	(void)((/* SLOOP::SLOOP-TYPE-ERROR */(*LnkLI6)()));
+	goto T2044;
+T2044:;
+	{fixnum V671;
+	V671= V558;
+	{fixnum V672;
+	V672= (V671)+(1);
+	V558= V672;}}
+	goto T1719;
+	
+	goto T1720;
+T1720:;
+	goto T1715;
+	}}}
+	goto T1715;
+T1715:;
+	V492= (V554);}}
+	V491= Cnil;
+	goto T2054;
+T2054:;
+	if(((V492))==Cnil){
+	goto T2060;
+	}
+	goto T2057;
+	
+	goto T2060;
+T2060:;
+	goto T2055;
+	
+	goto T2057;
+T2057:;
+	{object V673;
+	V673= (V492)->c.c_car;
+	V491= (V673);}
+	V675= V491->c.c_car;
+	{register object V677;
+	register object V678;
+	V678= V491->c.c_cdr;
+	V677= Cnil;
+	{object V679;
+	register object V680;
+	register object V681;
+	V679= Cnil;
+	V680= Cnil;
+	V681= Cnil;
+	goto T2070;
+T2070:;
+	if(((V678))==Cnil){
+	goto T2076;
+	}
+	goto T2073;
+	
+	goto T2076;
+T2076:;
+	goto T2071;
+	
+	goto T2073;
+T2073:;
+	{object V682;
+	V682= (V678)->c.c_car;
+	V677= (V682);}
+	if(!(((V677))==(make_fixnum(1)))){
+	goto T2083;
+	}
+	V681= ((object)VV[26]);
+	goto T2082;
+	
+	goto T2083;
+T2083:;
+	if(!(((V677))==(make_fixnum(2)))){
+	goto T2086;
+	}
+	V681= ((object)VV[27]);
+	goto T2082;
+	
+	goto T2086;
+T2086:;
+	if(!(((V677))==(make_fixnum(3)))){
+	goto T2089;
+	}
+	V681= ((object)VV[28]);
+	goto T2082;
+	
+	goto T2089;
+T2089:;
+	if(!(((V677))==(make_fixnum(4)))){
+	goto T2092;
+	}
+	V681= ((object)VV[29]);
+	goto T2082;
+	
+	goto T2092;
+T2092:;
+	V681= Cnil;
+	goto T2082;
+T2082:;
+	if(((V680))==Cnil){
+	goto T2096;
+	}
+	{object V684;
+	object V685;
+	V684= (V680);
+	V680= make_cons((V681),Cnil);
+	V685= (V680);
+	(void)((((V684))->c.c_cdr=((V685)),((V684))));
+	goto T2095;
+	}
+	goto T2096;
+T2096:;
+	V680= make_cons((V681),Cnil);
+	V679= (V680);
+	goto T2095;
+T2095:;
+	V678= (V678)->c.c_cdr;
+	goto T2070;
+	
+	goto T2071;
+T2071:;
+	V676= (V679);
+	goto T2067;
+	
+	V676= Cnil;
+	goto T2067;
+	}}
+	goto T2067;
+T2067:;
+	V687= list(2,(V675),(V676));
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI2)(((object)VV[2]),((object)VV[30]),((object)VV[31]),((object)VV[32]),(V687))));
+	V492= (V492)->c.c_cdr;
+	goto T2054;
+	
+	goto T2055;
+T2055:;
+	goto T1562;
+	}
+	goto T1562;
+T1562:;
+	{register object V689;
+	register object V690;
+	{object V691;
+	V691= listA(3,(V61),(V60),Cnil);
+	{register object V692;
+	V692= Cnil;
+	{register object V693;
+	register object V694;
+	V693= Cnil;
+	V694= (V691);
+	{register object V695;
+	V695= V691->c.c_cdr;
+	{register fixnum V696;
+	V696= 1;
+	goto T2118;
+T2118:;
+	if(((V695))==Cnil){
+	goto T2124;
+	}
+	goto T2121;
+	
+	goto T2124;
+T2124:;
+	goto T2119;
+	
+	goto T2121;
+T2121:;
+	if(((V694))==Cnil){
+	goto T2130;
+	}
+	goto T2127;
+	
+	goto T2130;
+T2130:;
+	goto T2119;
+	
+	goto T2127;
+T2127:;
+	{object V697;
+	V697= (V694)->c.c_car;
+	V693= (V697);}
+	{register object V699;
+	register object V700;
+	V699= Cnil;
+	V700= (V693);
+	{register object V701;
+	V701= Cnil;
+	goto T2137;
+T2137:;
+	if(((V700))==Cnil){
+	goto T2143;
+	}
+	goto T2140;
+	
+	goto T2143;
+T2143:;
+	goto T2138;
+	
+	goto T2140;
+T2140:;
+	{object V702;
+	V702= (V700)->c.c_car;
+	V699= (V702);}
+	{object V704;
+	{object V706;
+	if(((V692))==Cnil){
+	goto T2151;
+	}
+	V706= (V692);
+	goto T2150;
+	
+	goto T2151;
+T2151:;
+	V706= Cnil;
+	goto T2150;
+T2150:;
+	{register fixnum V707;
+	register object V708;
+	V707= 0;
+	V708= (V706);
+	goto T2156;
+T2156:;
+	if(!((V707)>=((fixnum)268435455))){
+	goto T2163;
+	}
+	goto T2162;
+	
+	goto T2163;
+T2163:;
+	if(((V708))==Cnil){
+	goto T2166;
+	}
+	goto T2161;
+	
+	goto T2166;
+T2166:;
+	goto T2162;
+T2162:;
+	goto T2158;
+	
+	goto T2161;
+T2161:;
+	{object V710;
+	V710= (V708)->c.c_car;
+	{object V712;
+	V712= V710->c.c_car;
+	{register object V713;
+	register object V714;
+	register fixnum V715;
+	register fixnum V716;
+	V713= coerce_to_string((V699));
+	V714= coerce_to_string((V712));
+	V715= length((V713));
+	V716= length((V714));
+	{register fixnum V717;
+	register fixnum V718;
+	V717= 0;
+	V718= 0;
+	goto T2183;
+T2183:;
+	if(!((V717)>=(V715))){
+	goto T2190;
+	}
+	goto T2189;
+	
+	goto T2190;
+T2190:;
+	if(!((V718)>=(V716))){
+	goto T2193;
+	}
+	goto T2189;
+	
+	goto T2193;
+T2193:;
+	{fixnum V719;
+	fixnum V720;
+	{fixnum V721;
+	V721= V717;
+	{fixnum V722;
+	{fixnum V723;
+	V723= ((fixnum)V713);
+	V722= ((fixnum*)V723)[(fixnum)1];}
+	V719= ((uchar*)V722)[V721];}}
+	{fixnum V724;
+	V724= V718;
+	{fixnum V725;
+	{fixnum V726;
+	V726= ((fixnum)V714);
+	V725= ((fixnum*)V726)[(fixnum)1];}
+	V720= ((uchar*)V725)[V724];}}
+	if(!((V719)==(V720))){
+	goto T2196;
+	}}
+	goto T2188;
+	
+	goto T2196;
+T2196:;
+	goto T2189;
+T2189:;
+	goto T2185;
+	
+	goto T2188;
+T2188:;
+	{fixnum V727;
+	fixnum V728;
+	{fixnum V729;
+	V729= V717;
+	{fixnum V730;
+	V730= (V729)+(1);
+	V727= V730;}}
+	{fixnum V731;
+	V731= V718;
+	{fixnum V732;
+	V732= (V731)+(1);
+	V728= V732;}}
+	V717= V727;
+	V718= V728;}
+	goto T2183;
+	
+	goto T2185;
+T2185:;
+	if(!((V717)>=(V715))){
+	goto T2218;
+	}
+	if(!((V718)>=(V716))){
+	goto T2174;
+	}
+	goto T2175;
+	
+	goto T2218;
+T2218:;
+	goto T2174;
+	}}
+	goto T2175;
+T2175:;
+	goto T2172;
+	
+	goto T2174;
+T2174:;
+	goto T2170;
+	}
+	goto T2172;
+T2172:;
+	V704= (V710);
+	goto T2149;
+	
+	goto T2170;
+T2170:;}
+	{fixnum V733;
+	object V734;
+	V733= V707;
+	V734= (V708)->c.c_cdr;
+	V707= V733;
+	V708= (V734);
+	goto T2156;
+	}
+	goto T2158;
+T2158:;
+	V704= Cnil;
+	goto T2149;
+	}}
+	goto T2149;
+T2149:;
+	V701= (V704);}
+	{register fixnum V736;
+	V736= V696;
+	{register fixnum V737;
+	V737= 1;
+	V738= tp4(make_fixnum(V736));
+	switch(V738){
+	case -1:
+	goto T2242;
+T2242:;
+	goto T2239;
+	
+	case 1:
+	goto T2243;
+T2243:;
+	goto T2237;
+	}
+	goto T2237;
+	
+	goto T2239;
+T2239:;
+	V737= 0;
+	goto T2236;
+	
+	goto T2237;
+T2237:;
+	goto T2236;
+T2236:;
+	{register object V739;
+	V739= (V701);
+	goto T2253;
+T2253:;
+	if(((V739))==Cnil){
+	goto T2255;
+	}
+	{object V741;
+	V741= (V739)->c.c_car;
+	switch(V737){
+	case 0:
+	goto T2266;
+T2266:;
+	V742= CMPmake_fixnum(V736);
+	if(!(((V742))==((V741)))){
+	goto T2263;
+	}
+	goto T2264;
+	
+	case 1:
+	goto T2267;
+T2267:;
+	V743= CMPmake_fixnum(V736);
+	if(!(eql((V743),(V741)))){
+	goto T2263;
+	}
+	goto T2264;
+	}
+	goto T2263;
+	
+	goto T2264;
+T2264:;
+	goto T2261;
+	
+	goto T2263;
+T2263:;
+	goto T2259;
+	}
+	goto T2261;
+T2261:;
+	goto T2233;
+	
+	goto T2259;
+T2259:;
+	{object V744;
+	V744= (V739)->c.c_cdr;
+	V739= (V744);
+	goto T2253;
+	}
+	goto T2255;
+T2255:;
+	goto T2251;
+	}
+	goto T2251;
+T2251:;
+	if(((V701))==Cnil){
+	goto T2249;
+	}
+	goto T2246;
+	
+	goto T2249;
+T2249:;
+	goto T2232;
+	
+	goto T2246;
+T2246:;
+	goto T2232;
+	}}
+	goto T2233;
+T2233:;
+	goto T2229;
+	
+	goto T2232;
+T2232:;
+	{register object V746;
+	register object V747;
+	V746= Cnil;
+	V747= (V695);
+	{register fixnum V748;
+	{object V749;
+	{fixnum V750;
+	V750= V696;
+	{object V751;
+	V752= CMPmake_fixnum(V750);
+	V751= immnum_plus((V752),make_fixnum(1));
+	V749= (V751);}}
+	V753= tp4(V749);
+	switch(V753){
+	case -1:
+	goto T2284;
+T2284:;
+	case 1:
+	goto T2285;
+T2285:;
+	goto T2281;
+	
+	default:
+	goto T2286;
+T2286:;
+	goto T2280;
+	}
+	goto T2280;
+	
+	goto T2281;
+T2281:;
+	goto T2279;
+	
+	goto T2280;
+T2280:;
+	goto T2277;
+	
+	goto T2279;
+T2279:;
+	goto T2276;
+	
+	goto T2277;
+T2277:;
+	(void)((/* SLOOP::SLOOP-TYPE-ERROR */(*LnkLI6)()));
+	goto T2276;
+T2276:;
+	V748= fix((V749));}
+	goto T2289;
+T2289:;
+	if(((V747))==Cnil){
+	goto T2295;
+	}
+	goto T2292;
+	
+	goto T2295;
+T2295:;
+	goto T2290;
+	
+	goto T2292;
+T2292:;
+	{object V754;
+	V754= (V747)->c.c_car;
+	V746= (V754);}
+	{register object V756;
+	V756= (V746);
+	goto T2311;
+T2311:;
+	if(((V756))==Cnil){
+	goto T2313;
+	}
+	{object V758;
+	V758= (V756)->c.c_car;
+	{register object V759;
+	register object V760;
+	register fixnum V761;
+	register fixnum V762;
+	V759= coerce_to_string((V699));
+	V760= coerce_to_string((V758));
+	V761= length((V759));
+	V762= length((V760));
+	{register fixnum V763;
+	register fixnum V764;
+	V763= 0;
+	V764= 0;
+	goto T2330;
+T2330:;
+	if(!((V763)>=(V761))){
+	goto T2337;
+	}
+	goto T2336;
+	
+	goto T2337;
+T2337:;
+	if(!((V764)>=(V762))){
+	goto T2340;
+	}
+	goto T2336;
+	
+	goto T2340;
+T2340:;
+	{fixnum V765;
+	fixnum V766;
+	{fixnum V767;
+	V767= V763;
+	{fixnum V768;
+	{fixnum V769;
+	V769= ((fixnum)V759);
+	V768= ((fixnum*)V769)[(fixnum)1];}
+	V765= ((uchar*)V768)[V767];}}
+	{fixnum V770;
+	V770= V764;
+	{fixnum V771;
+	{fixnum V772;
+	V772= ((fixnum)V760);
+	V771= ((fixnum*)V772)[(fixnum)1];}
+	V766= ((uchar*)V771)[V770];}}
+	if(!((V765)==(V766))){
+	goto T2343;
+	}}
+	goto T2335;
+	
+	goto T2343;
+T2343:;
+	goto T2336;
+T2336:;
+	goto T2332;
+	
+	goto T2335;
+T2335:;
+	{fixnum V773;
+	fixnum V774;
+	{fixnum V775;
+	V775= V763;
+	{fixnum V776;
+	V776= (V775)+(1);
+	V773= V776;}}
+	{fixnum V777;
+	V777= V764;
+	{fixnum V778;
+	V778= (V777)+(1);
+	V774= V778;}}
+	V763= V773;
+	V764= V774;}
+	goto T2330;
+	
+	goto T2332;
+T2332:;
+	if(!((V763)>=(V761))){
+	goto T2365;
+	}
+	if(!((V764)>=(V762))){
+	goto T2321;
+	}
+	goto T2322;
+	
+	goto T2365;
+T2365:;
+	goto T2321;
+	}}
+	goto T2322;
+T2322:;
+	goto T2319;
+	
+	goto T2321;
+T2321:;
+	goto T2317;
+	}
+	goto T2319;
+T2319:;
+	goto T2303;
+	
+	goto T2317;
+T2317:;
+	{object V779;
+	V779= (V756)->c.c_cdr;
+	V756= (V779);
+	goto T2311;
+	}
+	goto T2313;
+T2313:;
+	goto T2309;
+	}
+	goto T2309;
+T2309:;
+	if(((V746))==Cnil){
+	goto T2307;
+	}
+	goto T2304;
+	
+	goto T2307;
+T2307:;
+	goto T2301;
+	
+	goto T2304;
+T2304:;
+	goto T2301;
+	
+	goto T2303;
+T2303:;
+	if(((V701))==Cnil){
+	goto T2371;
+	}
+	{object V782;
+	object V783;
+	V784= CMPmake_fixnum(V748);
+	V782= make_cons((V784),Cnil);
+	V783= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V701);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V782);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V785;
+	object V786;
+	V785= Cnil;
+	V786= Cnil;
+	V785= (V701);
+	V787= tp2((V701));
+	if(!((V787)==(0))){
+	goto T2384;
+	}
+	goto T2383;
+	
+	goto T2384;
+T2384:;
+	goto T2381;
+	
+	goto T2383;
+T2383:;
+	{object V788;
+	V788= (V701)->c.c_cdr;
+	{register object V789;
+	register object V790;
+	V789= (V701);
+	V790= (V788);
+	goto T2390;
+T2390:;
+	if(((V790))==Cnil){
+	goto T2399;
+	}
+	V792= tp2((V790));
+	if(!((V792)==(0))){
+	goto T2402;
+	}
+	goto T2398;
+	
+	goto T2402;
+T2402:;
+	goto T2397;
+	
+	goto T2399;
+T2399:;
+	goto T2397;
+	
+	goto T2398;
+T2398:;
+	goto T2395;
+	
+	goto T2397;
+T2397:;
+	goto T2392;
+	
+	goto T2395;
+T2395:;
+	{object V793;
+	object V794;
+	V793= (V789)->c.c_cdr;
+	V794= (V790)->c.c_cdr;
+	V789= (V793);
+	V790= (V794);}
+	goto T2390;
+	
+	goto T2392;
+T2392:;
+	V786= (V789);
+	goto T2387;
+	}}
+	goto T2387;
+T2387:;
+	goto T2378;
+	
+	goto T2381;
+T2381:;
+	goto T2378;
+T2378:;
+	{object V797;
+	V797= V783->c.c_cdr;
+	{object V798;
+	V798= V797->c.c_car;
+	if(((V786))==Cnil){
+	goto T2417;
+	}
+	(void)((((V786))->c.c_cdr=((V798)),((V786))));
+	goto T2416;
+	
+	goto T2417;
+T2417:;
+	V785= (V798);
+	goto T2416;
+T2416:;}}
+	goto T2300;
+	}}
+	goto T2371;
+T2371:;
+	{object V799;
+	{object V800;
+	V801= CMPmake_fixnum(V696);
+	V802= CMPmake_fixnum(V748);
+	V800= list(3,(V699),(V801),(V802));
+	V692= make_cons((V800),(V692));
+	V799= (V692);}
+	V701= V799->c.c_car;}
+	goto T2300;
+	
+	goto T2301;
+T2301:;
+	goto T2300;
+T2300:;
+	V747= (V747)->c.c_cdr;
+	if(!((V748)<((fixnum)9223372036854775806))){
+	goto T2428;
+	}
+	goto T2427;
+	
+	goto T2428;
+T2428:;
+	(void)((/* SLOOP::SLOOP-TYPE-ERROR */(*LnkLI6)()));
+	goto T2427;
+T2427:;
+	{fixnum V804;
+	V804= V748;
+	{fixnum V805;
+	V805= (V804)+(1);
+	V748= V805;}}
+	goto T2289;
+	
+	goto T2290;
+T2290:;
+	goto T2228;
+	}}
+	goto T2229;
+T2229:;
+	goto T2228;
+T2228:;
+	V700= (V700)->c.c_cdr;
+	goto T2137;
+	
+	goto T2138;
+T2138:;
+	goto T2135;
+	}}
+	goto T2135;
+T2135:;
+	V694= (V694)->c.c_cdr;
+	V695= (V695)->c.c_cdr;
+	if(!((V696)<((fixnum)9223372036854775806))){
+	goto T2444;
+	}
+	goto T2443;
+	
+	goto T2444;
+T2444:;
+	(void)((/* SLOOP::SLOOP-TYPE-ERROR */(*LnkLI6)()));
+	goto T2443;
+T2443:;
+	{fixnum V809;
+	V809= V696;
+	{fixnum V810;
+	V810= (V809)+(1);
+	V696= V810;}}
+	goto T2118;
+	
+	goto T2119;
+T2119:;
+	goto T2114;
+	}}}
+	goto T2114;
+T2114:;
+	V690= (V692);}}
+	V689= Cnil;
+	goto T2453;
+T2453:;
+	if(((V690))==Cnil){
+	goto T2459;
+	}
+	goto T2456;
+	
+	goto T2459;
+T2459:;
+	goto T2454;
+	
+	goto T2456;
+T2456:;
+	{object V811;
+	V811= (V690)->c.c_car;
+	V689= (V811);}
+	V813= V689->c.c_car;
+	{register object V815;
+	register object V816;
+	V816= V689->c.c_cdr;
+	V815= Cnil;
+	{object V817;
+	register object V818;
+	register object V819;
+	V817= Cnil;
+	V818= Cnil;
+	V819= Cnil;
+	goto T2469;
+T2469:;
+	if(((V816))==Cnil){
+	goto T2475;
+	}
+	goto T2472;
+	
+	goto T2475;
+T2475:;
+	goto T2470;
+	
+	goto T2472;
+T2472:;
+	{object V820;
+	V820= (V816)->c.c_car;
+	V815= (V820);}
+	if(!(((V815))==(make_fixnum(1)))){
+	goto T2482;
+	}
+	V819= ((object)VV[33]);
+	goto T2481;
+	
+	goto T2482;
+T2482:;
+	if(!(((V815))==(make_fixnum(2)))){
+	goto T2485;
+	}
+	V819= ((object)VV[34]);
+	goto T2481;
+	
+	goto T2485;
+T2485:;
+	V819= Cnil;
+	goto T2481;
+T2481:;
+	if(((V818))==Cnil){
+	goto T2489;
+	}
+	{object V822;
+	object V823;
+	V822= (V818);
+	V818= make_cons((V819),Cnil);
+	V823= (V818);
+	(void)((((V822))->c.c_cdr=((V823)),((V822))));
+	goto T2488;
+	}
+	goto T2489;
+T2489:;
+	V818= make_cons((V819),Cnil);
+	V817= (V818);
+	goto T2488;
+T2488:;
+	V816= (V816)->c.c_cdr;
+	goto T2469;
+	
+	goto T2470;
+T2470:;
+	V814= (V817);
+	goto T2466;
+	
+	V814= Cnil;
+	goto T2466;
+	}}
+	goto T2466;
+T2466:;
+	V825= list(2,(V813),(V814));
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI2)(((object)VV[2]),((object)VV[35]),((object)VV[36]),((object)VV[37]),(V825))));
+	V690= (V690)->c.c_cdr;
+	goto T2453;
+	
+	goto T2454;
+T2454:;
+	goto T2111;
+	}
+	goto T2111;
+T2111:;
+	V827= list(2,((object)VV[38]),(V18));
+	V828= list(3,((object)VV[39]),(V18),(V18));
+	{object V830;
+	object V831;
+	object V832;
+	if(((V57))==Cnil){
+	goto T2506;
+	}
+	V830= make_cons(list(4,((object)VV[39]),(V18),(V18),list(2,((object)VV[40]),(V57))),Cnil);
+	goto T2505;
+	
+	goto T2506;
+T2506:;
+	V830= Cnil;
+	goto T2505;
+T2505:;
+	{register object V833;
+	V833= (V5);
+	goto T2525;
+T2525:;
+	if(((V833))==Cnil){
+	goto T2527;
+	}
+	{object V835;
+	V835= (V833)->c.c_car;
+	{object V836;
+	V836= V835->c.c_car;
+	if(!((((object)VV[11]))==((V836)))){
+	goto T2536;
+	}
+	goto T2533;
+	
+	goto T2536;
+T2536:;
+	goto T2531;
+	}}
+	goto T2533;
+T2533:;
+	goto T2516;
+	
+	goto T2531;
+T2531:;
+	{object V837;
+	V837= (V833)->c.c_cdr;
+	V833= (V837);
+	goto T2525;
+	}
+	goto T2527;
+T2527:;
+	goto T2523;
+	}
+	goto T2523;
+T2523:;
+	if(((V5))==Cnil){
+	goto T2521;
+	}
+	goto T2518;
+	
+	goto T2521;
+T2521:;
+	goto T2515;
+	
+	goto T2518;
+T2518:;
+	goto T2515;
+	
+	goto T2516;
+T2516:;
+	goto T2513;
+	
+	goto T2515;
+T2515:;
+	goto T2510;
+	
+	goto T2513;
+T2513:;
+	V831= make_cons(list(3,((object)VV[41]),list(2,((object)VV[42]),list(2,((object)VV[38]),(V18))),(V18)),Cnil);
+	goto T2509;
+	
+	goto T2510;
+T2510:;
+	V831= Cnil;
+	goto T2509;
+T2509:;
+	V832= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V830);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V831);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V839;
+	object V840;
+	V839= Cnil;
+	V840= Cnil;
+	if(((V830))==Cnil){
+	goto T2546;
+	}
+	{object V841;
+	V841= V830->c.c_car;
+	{object V842;
+	V842= make_cons((V841),Cnil);
+	V839= (V842);
+	V840= (V839);}}
+	goto T2545;
+	
+	goto T2546;
+T2546:;
+	goto T2545;
+T2545:;
+	if(((V840))==Cnil){
+	goto T2556;
+	}
+	(void)((((V840))->c.c_cdr=((V831)),((V840))));
+	V840= (V831);
+	goto T2555;
+	
+	goto T2556;
+T2556:;
+	V839= (V831);
+	V840= (V839);
+	goto T2555;
+T2555:;
+	V829= (V839);}}
+	V843= listA(3,((object)VV[43]),(V828),(V829));
+	V844= list(4,((object)VV[44]),(V827),(V843),list(6,((object)VV[45]),(V18),((object)VV[46]),((object)VV[47]),((object)VV[48]),list(2,((object)VV[40]),(V57))));
+	{object V846;
+	object V847;
+	object V848;
+	V846= make_cons(list(3,((object)VV[50]),list(3,((object)VV[51]),list(2,((object)VV[40]),(fcall.fun=((object)VV[49])->s.s_gfdef,fcall.valp=(fixnum)0,fcall.argd=2,/* COMMON-LISP::INTERN */(*LnkLI7)((V18),((object)VV[52])))),((object)VV[53])),(V58)),Cnil);
+	V849= make_cons(list(2,((object)VV[54]),list(2,((object)VV[38]),(V18))),Cnil);
+	{object V851;
+	object V852;
+	object V853;
+	object V854;
+	if(((V59))==Cnil){
+	goto T2566;
+	}
+	V851= make_cons(list(2,((object)VV[55]),list(3,((object)VV[56]),((object)VV[57]),list(2,((object)VV[40]),(V59)))),Cnil);
+	goto T2565;
+	
+	goto T2566;
+T2566:;
+	V851= Cnil;
+	goto T2565;
+T2565:;
+	if(((V62))==Cnil){
+	goto T2570;
+	}
+	{object V855;
+	register object V856;
+	V855= Cnil;
+	V856= Cnil;
+	{object V857;
+	V857= V62->c.c_car;
+	{object V858;
+	V860= V857->c.c_car;
+	V861= list(3,((object)VV[58]),((object)VV[59]),(V860));
+	V862= V857->c.c_car;
+	V863= list(3,((object)VV[60]),((object)VV[61]),list(5,((object)VV[62]),((object)VV[63]),((object)VV[64]),(V862),((object)VV[65])));
+	V864= V857->c.c_car;
+	V865= list(3,((object)VV[66]),((object)VV[67]),list(5,((object)VV[68]),((object)VV[69]),(V861),(V863),list(3,((object)VV[49]),((object)VV[59]),(V864))));
+	V866= V857->c.c_cdr;
+	V859= list(2,((object)VV[70]),list(3,((object)VV[56]),(V865),list(2,((object)VV[40]),(V866))));
+	V858= make_cons((V859),Cnil);
+	V855= (V858);
+	V856= (V855);}}
+	{register object V867;
+	V867= V62->c.c_cdr;
+	goto T2587;
+T2587:;
+	if(((V867))==Cnil){
+	goto T2589;
+	}
+	{object V869;
+	V869= (V867)->c.c_car;
+	{object V870;
+	V872= V869->c.c_car;
+	V873= list(3,((object)VV[58]),((object)VV[59]),(V872));
+	V874= V869->c.c_car;
+	V875= list(3,((object)VV[60]),((object)VV[61]),list(5,((object)VV[62]),((object)VV[71]),((object)VV[64]),(V874),((object)VV[65])));
+	V876= V869->c.c_car;
+	V877= list(3,((object)VV[66]),((object)VV[67]),list(5,((object)VV[68]),((object)VV[69]),(V873),(V875),list(3,((object)VV[49]),((object)VV[59]),(V876))));
+	V878= V869->c.c_cdr;
+	V871= list(2,((object)VV[70]),list(3,((object)VV[56]),(V877),list(2,((object)VV[40]),(V878))));
+	V870= make_cons((V871),Cnil);
+	if(((V856))==Cnil){
+	goto T2601;
+	}
+	{object V879;
+	V879= (((V856))->c.c_cdr=((V870)),((V856)));
+	V856= V879->c.c_cdr;
+	goto T2600;
+	}
+	goto T2601;
+T2601:;
+	V855= (V870);
+	V856= (V855);
+	goto T2600;
+T2600:;}}
+	{object V880;
+	V880= (V867)->c.c_cdr;
+	V867= (V880);
+	goto T2587;
+	}
+	goto T2589;
+T2589:;
+	goto T2574;
+	}
+	goto T2574;
+T2574:;
+	V852= (V855);
+	goto T2569;
+	}
+	goto T2570;
+T2570:;
+	V852= Cnil;
+	goto T2569;
+T2569:;
+	{register object V883;
+	V883= (V5);
+	goto T2621;
+T2621:;
+	if(((V883))==Cnil){
+	goto T2623;
+	}
+	{object V885;
+	V885= (V883)->c.c_car;
+	if(((V885))==Cnil){
+	goto T2636;
+	}
+	V886= tp2(V885);
+	if(!((V886)==(0))){
+	goto T2639;
+	}
+	goto T2635;
+	
+	goto T2639;
+T2639:;
+	goto T2633;
+	
+	goto T2636;
+T2636:;
+	goto T2633;
+	
+	goto T2635;
+T2635:;
+	V887= V885->c.c_car;
+	if(!(((V887))==(((object)VV[11])))){
+	goto T2631;
+	}
+	goto T2632;
+	
+	goto T2633;
+T2633:;
+	goto T2631;
+	
+	goto T2632;
+T2632:;
+	goto T2629;
+	
+	goto T2631;
+T2631:;
+	goto T2627;
+	}
+	goto T2629;
+T2629:;
+	goto T2613;
+	
+	goto T2627;
+T2627:;
+	{object V888;
+	V888= (V883)->c.c_cdr;
+	V883= (V888);
+	goto T2621;
+	}
+	goto T2623;
+T2623:;
+	goto T2619;
+	}
+	goto T2619;
+T2619:;
+	if(((V5))==Cnil){
+	goto T2617;
+	}
+	goto T2614;
+	
+	goto T2617;
+T2617:;
+	goto T2611;
+	
+	goto T2614;
+T2614:;
+	goto T2611;
+	
+	goto T2613;
+T2613:;
+	{object V890;
+	{register object V891;
+	V891= Cnil;
+	{object V892;
+	register object V893;
+	register object V894;
+	V892= Cnil;
+	V893= Cnil;
+	V894= Cnil;
+	{object V895;
+	{register object V896;
+	V896= (V5);
+	goto T2658;
+T2658:;
+	if(((V896))==Cnil){
+	goto T2660;
+	}
+	{object V898;
+	V898= (V896)->c.c_car;
+	if(((V898))==Cnil){
+	goto T2673;
+	}
+	V899= tp2(V898);
+	if(!((V899)==(0))){
+	goto T2676;
+	}
+	goto T2672;
+	
+	goto T2676;
+T2676:;
+	goto T2670;
+	
+	goto T2673;
+T2673:;
+	goto T2670;
+	
+	goto T2672;
+T2672:;
+	V900= V898->c.c_car;
+	if(!(((V900))==(((object)VV[11])))){
+	goto T2668;
+	}
+	goto T2669;
+	
+	goto T2670;
+T2670:;
+	goto T2668;
+	
+	goto T2669;
+T2669:;
+	goto T2666;
+	
+	goto T2668;
+T2668:;
+	goto T2664;
+	}
+	goto T2666;
+T2666:;
+	V895= (V896);
+	goto T2650;
+	
+	goto T2664;
+T2664:;
+	{object V901;
+	V901= (V896)->c.c_cdr;
+	V896= (V901);
+	goto T2658;
+	}
+	goto T2660;
+T2660:;
+	goto T2656;
+	}
+	goto T2656;
+T2656:;
+	if(((V5))==Cnil){
+	goto T2654;
+	}
+	goto T2651;
+	
+	goto T2654;
+T2654:;
+	V895= Cnil;
+	goto T2650;
+	
+	goto T2651;
+T2651:;
+	V895= Cnil;
+	goto T2650;
+T2650:;
+	V891= (V895);}
+	goto T2648;
+T2648:;
+	if(((V891))==Cnil){
+	goto T2688;
+	}
+	goto T2685;
+	
+	goto T2688;
+T2688:;
+	goto T2649;
+	
+	goto T2685;
+T2685:;
+	{object V904;
+	V904= (V891)->c.c_car;
+	V903= V904->c.c_cdr;}
+	V894= (/* COMMON-LISP::COPY-LIST */(*LnkLI5)((V903)));
+	if(((V893))==Cnil){
+	goto T2695;
+	}
+	(void)((((V893))->c.c_cdr=((V894)),((V893))));
+	if(((V894))==Cnil){
+	goto T2698;
+	}
+	{object V907;
+	V907= (V893)->c.c_cdr;
+	{object V909;
+	V909= V907->c.c_cdr;
+	{register object V910;
+	register object V911;
+	V910= (V907);
+	V911= (V909);
+	goto T2706;
+T2706:;
+	if(((V911))==Cnil){
+	goto T2715;
+	}
+	goto T2714;
+	
+	goto T2715;
+T2715:;
+	goto T2713;
+	
+	goto T2714;
+T2714:;
+	goto T2711;
+	
+	goto T2713;
+T2713:;
+	goto T2708;
+	
+	goto T2711;
+T2711:;
+	{object V913;
+	object V914;
+	V913= (V910)->c.c_cdr;
+	V914= (V911)->c.c_cdr;
+	V910= (V913);
+	V911= (V914);}
+	goto T2706;
+	
+	goto T2708;
+T2708:;
+	V893= (V910);
+	goto T2702;
+	}}}
+	goto T2702;
+T2702:;
+	goto T2690;
+	
+	goto T2698;
+T2698:;
+	goto T2690;
+	
+	goto T2695;
+T2695:;
+	{object V917;
+	V892= (V894);
+	V917= (V892);
+	{object V918;
+	V918= V917->c.c_cdr;
+	{register object V919;
+	register object V920;
+	V919= (V917);
+	V920= (V918);
+	goto T2730;
+T2730:;
+	if(((V920))==Cnil){
+	goto T2739;
+	}
+	goto T2738;
+	
+	goto T2739;
+T2739:;
+	goto T2737;
+	
+	goto T2738;
+T2738:;
+	goto T2735;
+	
+	goto T2737;
+T2737:;
+	goto T2732;
+	
+	goto T2735;
+T2735:;
+	{object V922;
+	object V923;
+	V922= (V919)->c.c_cdr;
+	V923= (V920)->c.c_cdr;
+	V919= (V922);
+	V920= (V923);}
+	goto T2730;
+	
+	goto T2732;
+T2732:;
+	V893= (V919);
+	goto T2725;
+	}}}
+	goto T2725;
+T2725:;
+	goto T2690;
+T2690:;
+	{object V926;
+	{object V927;
+	V927= (V891)->c.c_cdr;
+	{register object V929;
+	V929= (V927);
+	goto T2759;
+T2759:;
+	if(((V929))==Cnil){
+	goto T2761;
+	}
+	{object V931;
+	V931= (V929)->c.c_car;
+	if(((V931))==Cnil){
+	goto T2774;
+	}
+	V932= tp2(V931);
+	if(!((V932)==(0))){
+	goto T2777;
+	}
+	goto T2773;
+	
+	goto T2777;
+T2777:;
+	goto T2771;
+	
+	goto T2774;
+T2774:;
+	goto T2771;
+	
+	goto T2773;
+T2773:;
+	V933= V931->c.c_car;
+	if(!(((V933))==(((object)VV[11])))){
+	goto T2769;
+	}
+	goto T2770;
+	
+	goto T2771;
+T2771:;
+	goto T2769;
+	
+	goto T2770;
+T2770:;
+	goto T2767;
+	
+	goto T2769;
+T2769:;
+	goto T2765;
+	}
+	goto T2767;
+T2767:;
+	V926= (V929);
+	goto T2750;
+	
+	goto T2765;
+T2765:;
+	{object V934;
+	V934= (V929)->c.c_cdr;
+	V929= (V934);
+	goto T2759;
+	}
+	goto T2761;
+T2761:;
+	goto T2757;
+	}
+	goto T2757;
+T2757:;
+	if(((V927))==Cnil){
+	goto T2755;
+	}
+	goto T2752;
+	
+	goto T2755;
+T2755:;
+	V926= Cnil;
+	goto T2750;
+	
+	goto T2752;
+T2752:;
+	V926= Cnil;}
+	goto T2750;
+T2750:;
+	V891= (V926);}
+	goto T2648;
+	
+	goto T2649;
+T2649:;
+	V890= (V892);
+	goto T2646;
+	
+	V890= Cnil;
+	goto T2646;
+	}}
+	goto T2646;
+T2646:;
+	{object V936;
+	register object V937;
+	V936= Cnil;
+	V937= Cnil;
+	{register object V938;
+	V938= (V890);
+	goto T2790;
+T2790:;
+	if(((V938))==Cnil){
+	goto T2792;
+	}
+	{object V940;
+	V940= (V938)->c.c_car;
+	{object V941;
+	V942= coerce_to_string((V940));
+	V941= make_cons((V942),Cnil);
+	if(((V937))==Cnil){
+	goto T2799;
+	}
+	{object V943;
+	V943= (((V937))->c.c_cdr=((V941)),((V937)));
+	V937= V943->c.c_cdr;
+	goto T2798;
+	}
+	goto T2799;
+T2799:;
+	V936= (V941);
+	V937= (V936);
+	goto T2798;
+T2798:;}}
+	{object V944;
+	V944= (V938)->c.c_cdr;
+	V938= (V944);
+	goto T2790;
+	}
+	goto T2792;
+T2792:;
+	goto T2788;
+	}
+	goto T2788;
+T2788:;
+	V882= (V936);
+	goto T2610;
+	}}
+	goto T2611;
+T2611:;
+	V882= ((object)VV[72]);
+	goto T2610;
+T2610:;
+	V946= list(2,((object)VV[73]),list(2,((object)VV[40]),(V882)));
+	{object V948;
+	object V949;
+	object V950;
+	object V951;
+	object V952;
+	if(((V63))==Cnil){
+	goto T2809;
+	}
+	{object V953;
+	register object V954;
+	V953= Cnil;
+	V954= Cnil;
+	{object V955;
+	V955= V63->c.c_car;
+	{object V956;
+	V958= V955->c.c_car;
+	V959= list(3,((object)VV[58]),((object)VV[59]),(V958));
+	V960= V955->c.c_car;
+	V961= list(3,((object)VV[60]),((object)VV[61]),list(5,((object)VV[62]),((object)VV[74]),((object)VV[75]),(V960),((object)VV[76])));
+	V962= V955->c.c_car;
+	V963= list(3,((object)VV[66]),((object)VV[77]),list(5,((object)VV[68]),((object)VV[78]),(V959),(V961),list(3,((object)VV[49]),((object)VV[59]),(V962))));
+	V964= V955->c.c_cdr;
+	V957= list(2,((object)VV[79]),list(3,((object)VV[56]),(V963),list(2,((object)VV[40]),(V964))));
+	V956= make_cons((V957),Cnil);
+	V953= (V956);
+	V954= (V953);}}
+	{register object V965;
+	V965= V63->c.c_cdr;
+	goto T2826;
+T2826:;
+	if(((V965))==Cnil){
+	goto T2828;
+	}
+	{object V967;
+	V967= (V965)->c.c_car;
+	{object V968;
+	V970= V967->c.c_car;
+	V971= list(3,((object)VV[58]),((object)VV[59]),(V970));
+	V972= V967->c.c_car;
+	V973= list(3,((object)VV[60]),((object)VV[61]),list(5,((object)VV[62]),((object)VV[80]),((object)VV[75]),(V972),((object)VV[76])));
+	V974= V967->c.c_car;
+	V975= list(3,((object)VV[66]),((object)VV[77]),list(5,((object)VV[68]),((object)VV[78]),(V971),(V973),list(3,((object)VV[49]),((object)VV[59]),(V974))));
+	V976= V967->c.c_cdr;
+	V969= list(2,((object)VV[79]),list(3,((object)VV[56]),(V975),list(2,((object)VV[40]),(V976))));
+	V968= make_cons((V969),Cnil);
+	if(((V954))==Cnil){
+	goto T2840;
+	}
+	{object V977;
+	V977= (((V954))->c.c_cdr=((V968)),((V954)));
+	V954= V977->c.c_cdr;
+	goto T2839;
+	}
+	goto T2840;
+T2840:;
+	V953= (V968);
+	V954= (V953);
+	goto T2839;
+T2839:;}}
+	{object V978;
+	V978= (V965)->c.c_cdr;
+	V965= (V978);
+	goto T2826;
+	}
+	goto T2828;
+T2828:;
+	goto T2813;
+	}
+	goto T2813;
+T2813:;
+	V948= (V953);
+	goto T2808;
+	}
+	goto T2809;
+T2809:;
+	V948= Cnil;
+	goto T2808;
+T2808:;
+	if(((V60))==Cnil){
+	goto T2849;
+	}
+	V949= make_cons(list(3,((object)VV[56]),((object)VV[81]),list(2,((object)VV[40]),(V60))),Cnil);
+	goto T2848;
+	
+	goto T2849;
+T2849:;
+	V949= Cnil;
+	goto T2848;
+T2848:;
+	if(((V61))==Cnil){
+	goto T2853;
+	}
+	V950= make_cons(list(2,((object)VV[82]),list(3,((object)VV[56]),((object)VV[83]),list(2,((object)VV[40]),(V61)))),Cnil);
+	goto T2852;
+	
+	goto T2853;
+T2853:;
+	V950= Cnil;
+	goto T2852;
+T2852:;
+	if(((V64))==Cnil){
+	goto T2857;
+	}
+	V951= make_cons(list(3,((object)VV[84]),list(2,((object)VV[85]),list(2,((object)VV[40]),(V64))),((object)VV[86])),Cnil);
+	goto T2856;
+	
+	goto T2857;
+T2857:;
+	V951= Cnil;
+	goto T2856;
+T2856:;
+	V952= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(4*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V948);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V949);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V950);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V951);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V980;
+	register object V981;
+	V980= Cnil;
+	V981= Cnil;
+	{register object V982;
+	V982= (V948);
+	goto T2866;
+T2866:;
+	if(((V982))==Cnil){
+	goto T2868;
+	}
+	{object V984;
+	V984= (V982)->c.c_car;
+	{object V985;
+	V985= make_cons((V984),Cnil);
+	if(((V981))==Cnil){
+	goto T2875;
+	}
+	(void)((((V981))->c.c_cdr=((V985)),((V981))));
+	V981= (V985);
+	goto T2874;
+	
+	goto T2875;
+T2875:;
+	V980= (V985);
+	V981= (V980);
+	goto T2874;
+T2874:;}}
+	{object V986;
+	V986= (V982)->c.c_cdr;
+	V982= (V986);
+	goto T2866;
+	}
+	goto T2868;
+T2868:;
+	goto T2864;
+	}
+	goto T2864;
+T2864:;
+	if(((V949))==Cnil){
+	goto T2885;
+	}
+	{object V988;
+	V988= V949->c.c_car;
+	{object V989;
+	V989= make_cons((V988),Cnil);
+	if(((V981))==Cnil){
+	goto T2892;
+	}
+	(void)((((V981))->c.c_cdr=((V989)),((V981))));
+	V981= (V989);
+	goto T2891;
+	
+	goto T2892;
+T2892:;
+	V980= (V989);
+	V981= (V980);
+	goto T2891;
+T2891:;}}
+	goto T2884;
+	
+	goto T2885;
+T2885:;
+	goto T2884;
+T2884:;
+	if(((V950))==Cnil){
+	goto T2899;
+	}
+	{object V990;
+	V990= V950->c.c_car;
+	{object V991;
+	V991= make_cons((V990),Cnil);
+	if(((V981))==Cnil){
+	goto T2906;
+	}
+	(void)((((V981))->c.c_cdr=((V991)),((V981))));
+	V981= (V991);
+	goto T2905;
+	
+	goto T2906;
+T2906:;
+	V980= (V991);
+	V981= (V980);
+	goto T2905;
+T2905:;}}
+	goto T2898;
+	
+	goto T2899;
+T2899:;
+	goto T2898;
+T2898:;
+	if(((V981))==Cnil){
+	goto T2913;
+	}
+	(void)((((V981))->c.c_cdr=((V951)),((V981))));
+	V981= (V951);
+	goto T2912;
+	
+	goto T2913;
+T2913:;
+	V980= (V951);
+	V981= (V980);
+	goto T2912;
+T2912:;
+	V947= (V980);}}
+	V853= make_cons((V946),(V947));
+	V854= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(3*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V851);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V852);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V853);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V992;
+	register object V993;
+	V992= Cnil;
+	V993= Cnil;
+	if(((V851))==Cnil){
+	goto T2923;
+	}
+	{object V994;
+	V994= V851->c.c_car;
+	{object V995;
+	V995= make_cons((V994),Cnil);
+	V992= (V995);
+	V993= (V992);}}
+	goto T2922;
+	
+	goto T2923;
+T2923:;
+	goto T2922;
+T2922:;
+	{register object V996;
+	V996= (V852);
+	goto T2934;
+T2934:;
+	if(((V996))==Cnil){
+	goto T2936;
+	}
+	{object V998;
+	V998= (V996)->c.c_car;
+	{object V999;
+	V999= make_cons((V998),Cnil);
+	if(((V993))==Cnil){
+	goto T2943;
+	}
+	(void)((((V993))->c.c_cdr=((V999)),((V993))));
+	V993= (V999);
+	goto T2942;
+	
+	goto T2943;
+T2943:;
+	V992= (V999);
+	V993= (V992);
+	goto T2942;
+T2942:;}}
+	{object V1000;
+	V1000= (V996)->c.c_cdr;
+	V996= (V1000);
+	goto T2934;
+	}
+	goto T2936;
+T2936:;
+	goto T2932;
+	}
+	goto T2932;
+T2932:;
+	if(((V993))==Cnil){
+	goto T2953;
+	}
+	(void)((((V993))->c.c_cdr=((V853)),((V993))));
+	V993= (V853);
+	goto T2952;
+	
+	goto T2953;
+T2953:;
+	V992= (V853);
+	V993= (V992);
+	goto T2952;
+T2952:;
+	V850= (V992);}}
+	V1002= listA(3,((object)VV[87]),(V849),(V850));
+	V847= list(2,(V1002),list(2,((object)VV[38]),(V18)));
+	V848= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V846);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V847);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V1003;
+	object V1004;
+	V1003= Cnil;
+	V1004= Cnil;
+	{object V1005;
+	V1005= V848->c.c_car;
+	{object V1006;
+	V1006= V1005->c.c_car;
+	{object V1007;
+	V1007= make_cons((V1006),Cnil);
+	V1003= (V1007);
+	V1004= (V1003);}}}
+	{object V1008;
+	V1008= V848->c.c_cdr;
+	{object V1009;
+	V1009= V1008->c.c_car;
+	(void)((((V1004))->c.c_cdr=((V1009)),((V1004))));
+	V1004= (V1009);}}
+	V845= (V1003);}}
+	{object V1010 = listA(4,((object)VV[88]),((object)VV[89]),(V844),(V845));
+	VMR1(V1010);}}}}
+}
+static object  LnkTLI7(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[49]),1,520192,(void **)(void *)&LnkLI7,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::INTERN */
+static object  LnkTLI6(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[25]),0,0,(void **)(void *)&LnkLI6,0,first,ap);va_end(ap);return V1;} /* SLOOP::SLOOP-TYPE-ERROR */
+static object  LnkTLI5(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[24]),0,1,(void **)(void *)&LnkLI5,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::COPY-LIST */
+static object  LnkTLI4(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[20]),0,2,(void **)(void *)&LnkLI4,16,first,ap);va_end(ap);return V1;} /* COMMON-LISP::ROW-MAJOR-AREF */
+static object  LnkTLI3(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[16]),0,262146,(void **)(void *)&LnkLI3,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::CERROR */
+static object  LnkTLI2(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[0]),0,262145,(void **)(void *)&LnkLI2,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::ERROR */
+	
+	#ifdef SYSTEM_SPECIAL_INIT
+	SYSTEM_SPECIAL_INIT
+	#endif
--- /dev/null
+++ gcl27-2.7.0/mod/gcl_defpackage.h
@@ -0,0 +1,26 @@
+
+static object LI1__DEFPACKAGE__defpackage(object V3,object V4)
+;
+#define VMB1  object  V1002 ,V976 ,V975 ,V974 ,V973 ,V972 ,V971 ,V970 ,V969 ,V964 ,V963 ,V962 ,V961 ,V960 ,V959 ,V958 ,V957 ,V947 ,V946 ,V942 ,V933;  int8_t  V932;  object  V903 ,V900;  int8_t  V899;  object  V887;  int8_t  V886;  object  V882 ,V878 ,V877 ,V876 ,V875 ,V874 ,V873 ,V872 ,V871 ,V866 ,V865 ,V864 ,V863 ,V862 ,V861 ,V860 ,V859 ,V850 ,V849 ,V845 ,V844 ,V843 ,V829 ,V828 ,V827 ,V825 ,V814 ,V813 ,V802 ,V801;  int8_t  V792 ,V787;  object  V784;  fixnum  V753;  object  V752 ,V743 ,V742;  fixnum  V738;  object  V687 ,V676 ,V675 ,V664 ,V663;  int8_t  V654 ,V649;  object  V646;  fixnum  V615;  object  V614 ,V605 ,V604;  fixnum  V600;  object  V532 ,V503 ,V487 ,V478;  int8_t  V477;  object  V448 ,V445;  int8_t  V444;  object  V428 ,V420 ,V419 ,V418 ,V410;  int8_t  V409;  object  V396;  int8_t  V395;  object  V378 ,V370 ,V369 ,V368 ,V360;  int8_t  V359;  object  V346;  int8_t  V345;  object  V331 ,V322;  int8_t  V321;  object  V292 ,V289;  int8_t  V288;  object  V275 ,V266;  int8_t  V265;  object  V236 ,V233;  int8_t  V232;  object  V219 ,V210;  int8_t  V209;  object  V180 ,V177;  int8_t  V176;  object  V164;  int8_t  V163;  object  V134 ,V131;  int8_t  V130;  object  V117 ,V108;  int8_t  V107;  object  V78 ,V75;  int8_t  V74;  object  V55;  fixnum  V32 ,V29;  int8_t  V26;  fixnum  V23;  fixnum  V16;  object  V9;
+#define VMS1
+#define VMV1
+#define VMRV1(a_,b_) return(a_);
+#define VMR1(a_) VMRV1(a_,0);
+#define VM1 0
+static void * VVi[91]={
+#define Cdata VV[90]
+(void *)(LI1__DEFPACKAGE__defpackage)
+};
+#define VV (VVi)
+static object  LnkTLI7(object,...);
+static object  (*LnkLI7)() = (object (*)()) LnkTLI7;
+static object  LnkTLI6(object,...);
+static object  (*LnkLI6)() = (object (*)()) LnkTLI6;
+static object  LnkTLI5(object,...);
+static object  (*LnkLI5)() = (object (*)()) LnkTLI5;
+static object  LnkTLI4(object,...);
+static object  (*LnkLI4)() = (object (*)()) LnkTLI4;
+static object  LnkTLI3(object,...);
+static object  (*LnkLI3)() = (object (*)()) LnkTLI3;
+static object  LnkTLI2(object,...);
+static object  (*LnkLI2)() = (object (*)()) LnkTLI2;
--- /dev/null
+++ gcl27-2.7.0/mod/gcl_destructuring_bind.c
@@ -0,0 +1,51 @@
+
+#include "cmpinclude.h"
+#include "gcl_destructuring_bind.h"
+void init_gcl_destructuring_bind(){do_init((void *)VV);}
+/*	local entry for function COMMON-LISP::DESTRUCTURING-BIND	*/
+
+static object LI1__DESTRUCTURING_BIND__destructuring_bind(object V3,object V4)
+{	 VMB1 VMS1 VMV1
+	{object V5;
+	object V6;
+	object V7;
+	V5= V3->c.c_cdr;
+	if(((V5))==Cnil){
+	goto T3;
+	}
+	{object V9;
+	V9= V5->c.c_car;
+	V5= V5->c.c_cdr;
+	V6= (V9);
+	goto T2;
+	}
+	goto T3;
+T3:;
+	V10= make_cons(((object)VV[1]),Cnil);
+	V6= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI2)(((object)VV[2]),((object)VV[3]),((object)VV[4]),((object)VV[5]),(V10)));
+	goto T2;
+T2:;
+	if(((V5))==Cnil){
+	goto T10;
+	}
+	{object V11;
+	V11= (V5)->c.c_car;
+	V5= (V5)->c.c_cdr;
+	V7= (V11);
+	goto T9;
+	}
+	goto T10;
+T10:;
+	V14= make_cons(((object)VV[6]),Cnil);
+	V7= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI2)(((object)VV[2]),((object)VV[7]),((object)VV[4]),((object)VV[8]),(V14)));
+	goto T9;
+T9:;
+	{object V15 = (fcall.argd=4,/* SYSTEM::BLLA */(*LnkLI3)((V6),Cnil,(V7),(V5)));
+	VMR1(V15);}}
+}
+static object  LnkTLI3(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[9]),0,262148,(void **)(void *)&LnkLI3,0,first,ap);va_end(ap);return V1;} /* SYSTEM::BLLA */
+static object  LnkTLI2(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[0]),0,262145,(void **)(void *)&LnkLI2,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::ERROR */
+	
+	#ifdef SYSTEM_SPECIAL_INIT
+	SYSTEM_SPECIAL_INIT
+	#endif
--- /dev/null
+++ gcl27-2.7.0/mod/gcl_destructuring_bind.h
@@ -0,0 +1,18 @@
+
+static object LI1__DESTRUCTURING_BIND__destructuring_bind(object V3,object V4)
+;
+#define VMB1  object  V14 ,V10;
+#define VMS1
+#define VMV1
+#define VMRV1(a_,b_) return(a_);
+#define VMR1(a_) VMRV1(a_,0);
+#define VM1 0
+static void * VVi[11]={
+#define Cdata VV[10]
+(void *)(LI1__DESTRUCTURING_BIND__destructuring_bind)
+};
+#define VV (VVi)
+static object  LnkTLI3(object,...);
+static object  (*LnkLI3)() = (object (*)()) LnkTLI3;
+static object  LnkTLI2(object,...);
+static object  (*LnkLI2)() = (object (*)()) LnkTLI2;
--- /dev/null
+++ gcl27-2.7.0/mod/gcl_loop.c
@@ -0,0 +1,29023 @@
+
+#include "cmpinclude.h"
+#include "gcl_loop.h"
+void init_gcl_loop(){do_init((void *)VV);}
+/*	local entry for function ANSI-LOOP::LOOP-COPYLIST*	*/
+
+static object LI1__LOOP_COPYLISTA__loop(object V3,object V4)
+{	 VMB1 VMS1 VMV1
+	{object V5;
+	object V6;
+	V5= V3->c.c_cdr;
+	if(((V5))==Cnil){
+	goto T3;
+	}
+	{object V7;
+	V7= V5->c.c_car;
+	V5= V5->c.c_cdr;
+	V6= (V7);
+	goto T2;
+	}
+	goto T3;
+T3:;
+	V8= make_cons(((object)VV[1]),Cnil);
+	V6= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[3]),((object)VV[4]),((object)VV[5]),(V8)));
+	goto T2;
+T2:;
+	if(((V5))==Cnil){
+	goto T13;
+	}
+	goto T12;
+	
+	goto T13;
+T13:;
+	goto T10;
+	
+	goto T12;
+T12:;
+	{object V10;
+	V10= (V5)->c.c_car;
+	V5= (V5)->c.c_cdr;
+	V9= (V10);}
+	V13= make_cons((V9),Cnil);
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[6]),((object)VV[7]),((object)VV[8]),(V13))));
+	goto T9;
+	
+	goto T10;
+T10:;
+	goto T9;
+T9:;
+	{object V14 = list(2,((object)VV[9]),(V6));
+	VMR1(V14);}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-GENTEMP	*/
+
+static object LI2__LOOP_GENTEMP__loop(object V16,...)
+{	 VMB2 VMS2 VMV2
+	va_list ap;
+	va_start(ap,V16);
+	{object V17;
+	object V18;
+	int8_t V19;
+	int8_t V20;
+	object V21;
+	object V22;
+	V17= Ct;
+	V18= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V18))==Cnil){
+	goto T21;
+	}
+	V19= -((char)fcall.argd);
+	goto T20;
+	
+	goto T21;
+T21:;
+	V19= fcall.argd;
+	goto T20;
+T20:;
+	V20= (V19)-(0);
+	V21= Cnil;
+	if(((V18))==Cnil){
+	goto T27;
+	}
+	if(!((V20)==(1))){
+	goto T30;
+	}
+	V20= 0;
+	V17= Cnil;
+	V21= (V16);
+	if(((V21))==Cnil){
+	goto T33;
+	}
+	goto T26;
+	
+	goto T33;
+T33:;
+	goto T26;
+	
+	goto T30;
+T30:;
+	goto T26;
+	
+	goto T27;
+T27:;
+	goto T26;
+T26:;
+	if(!((V20)>(0))){
+	goto T41;
+	}
+	V20= 0;
+	if(((V17))==Cnil){
+	goto T46;
+	}
+	V17= Cnil;
+	V22= (V16);
+	goto T25;
+	
+	goto T46;
+T46:;
+	V22= va_arg(ap,object);
+	goto T25;
+	
+	goto T41;
+T41:;
+	if(((V21))==Cnil){
+	goto T51;
+	}
+	{object V23;
+	V23= (V21)->c.c_car;
+	V21= (V21)->c.c_cdr;
+	V22= (V23);
+	goto T25;
+	}
+	goto T51;
+T51:;
+	V22= ((object)VV[10]);
+	goto T25;
+T25:;
+	if(((((object)VV[11])->s.s_dbind))==Cnil){
+	goto T57;
+	}
+	{object V26;
+	V26= coerce_to_string((V22));
+	{int8_t V27;
+	V27= tp4(V26);
+	if(!((8)<=(V27))){
+	goto T67;
+	}
+	if(!((V27)<=(9))){
+	goto T64;
+	}
+	goto T65;
+	
+	goto T67;
+T67:;
+	goto T64;
+	}
+	goto T65;
+T65:;
+	goto T63;
+	
+	goto T64;
+T64:;
+	goto T61;
+	
+	goto T63;
+T63:;
+	{object V28 = fSgensym1s((V26));
+	VMR2(V28);}
+	goto T61;
+T61:;
+	{object V29 = fSgensym1ig((V26));
+	VMR2(V29);}}
+	goto T57;
+T57:;
+	{object V30 = fSgensym0();
+	VMR2(V30);}}
+	va_end(ap);
+}
+/*	local entry for function ANSI-LOOP::LOOP-OPTIMIZATION-QUANTITIES	*/
+
+static fixnum LI3__LOOP_OPTIMIZATION_QUANTITIES__loop(object V32)
+{	 VMB3 VMS3 VMV3
+	{fixnum V33;
+	V33= fcall.valp;
+	{fixnum V34;
+	if (V33) {
+	#define V35 ((object *)V33)[0]
+	#define V36 ((object *)V33)[1]
+	#define V37 ((object *)V33)[2]
+	#define V38 ((object *)V33)[3]
+	V34= ({int8_t  _t0=1;int8_t  _t1=1;int8_t  _t2=1;int8_t  _t3=1;int8_t  _t4=1;
+	V35= make_fixnum((_t1));
+	V36= make_fixnum((_t2));
+	V37= make_fixnum((_t3));
+	V38= make_fixnum((_t4));_t0;});
+	#undef V35
+	#undef V36
+	#undef V37
+	#undef V38
+	} else {
+	V34= ({int8_t  _t0=1;int8_t  _t1=1;int8_t  _t2=1;int8_t  _t3=1;int8_t  _t4=1;
+	(void)((_t1));
+	(void)((_t2));
+	(void)((_t3));
+	(void)((_t4));_t0;});
+	}
+	VMRV3(V34,4);}}
+}
+/*	local entry for function ANSI-LOOP::HIDE-VARIABLE-REFERENCES	*/
+
+static object LI4__HIDE_VARIABLE_REFERENCES__loop(object V41,object V42)
+{	 VMB4 VMS4 VMV4
+	{object V43 = (V42);
+	VMR4(V43);}
+}
+/*	local entry for function ANSI-LOOP::HIDE-VARIABLE-REFERENCE	*/
+
+static object LI5__HIDE_VARIABLE_REFERENCE__loop(object V47,object V48,object V49)
+{	 VMB5 VMS5 VMV5
+	{object V50 = (V49);
+	VMR5(V50);}
+}
+/*	local entry for function ANSI-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD	*/
+
+static object LI6__WITH_LOOP_LIST_COLLECTION_HEAD__loop(object V53,object V54)
+{	 VMB6 VMS6 VMV6
+	{object V55;
+	object V56;
+	object V57;
+	object V58;
+	object V59;
+	object V60;
+	object V61;
+	V55= V53->c.c_cdr;
+	if(((V55))==Cnil){
+	goto T73;
+	}
+	{object V62;
+	V62= V55->c.c_car;
+	V55= V55->c.c_cdr;
+	V56= (V62);
+	goto T72;
+	}
+	goto T73;
+T73:;
+	V63= make_cons(((object)VV[12]),Cnil);
+	V56= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[13]),((object)VV[4]),((object)VV[14]),(V63)));
+	goto T72;
+T72:;
+	V57= (V56);
+	if(((V56))==Cnil){
+	goto T80;
+	}
+	{object V64;
+	V64= V56->c.c_car;
+	V57= V56->c.c_cdr;
+	V58= (V64);
+	goto T79;
+	}
+	goto T80;
+T80:;
+	V65= make_cons(((object)VV[15]),Cnil);
+	V58= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[16]),((object)VV[4]),((object)VV[17]),(V65)));
+	goto T79;
+T79:;
+	if(((V57))==Cnil){
+	goto T87;
+	}
+	{object V66;
+	V66= (V57)->c.c_car;
+	V57= (V57)->c.c_cdr;
+	V59= (V66);
+	goto T86;
+	}
+	goto T87;
+T87:;
+	V69= make_cons(((object)VV[18]),Cnil);
+	V59= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[19]),((object)VV[4]),((object)VV[20]),(V69)));
+	goto T86;
+T86:;
+	if(((V57))==Cnil){
+	goto T94;
+	}
+	{object V70;
+	V70= (V57)->c.c_car;
+	V57= (V57)->c.c_cdr;
+	V60= (V70);
+	goto T93;
+	}
+	goto T94;
+T94:;
+	V60= Cnil;
+	goto T93;
+T93:;
+	if(((V57))==Cnil){
+	goto T105;
+	}
+	goto T104;
+	
+	goto T105;
+T105:;
+	goto T102;
+	
+	goto T104;
+T104:;
+	{object V74;
+	V74= (V57)->c.c_car;
+	V57= (V57)->c.c_cdr;
+	V73= (V74);}
+	V77= make_cons((V73),Cnil);
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[21]),((object)VV[7]),((object)VV[22]),(V77))));
+	goto T101;
+	
+	goto T102;
+T102:;
+	goto T101;
+T101:;
+	V61= (V55);
+	{object V78;
+	if(((V60))==Cnil){
+	goto T112;
+	}
+	V78= make_cons(list(2,(V60),Cnil),Cnil);
+	goto T111;
+	
+	goto T112;
+T112:;
+	V78= Cnil;
+	goto T111;
+T111:;
+	V79= list(2,(V58),((object)VV[23]));
+	{object V80 = listA(3,((object)VV[24]),listA(3,(V79),list(2,(V59),(V58)),(V78)),(V61));
+	VMR6(V80);}}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-COLLECT-RPLACD	*/
+
+static object LI7__LOOP_COLLECT_RPLACD__loop(object V83,object V84)
+{	 VMB7 VMS7 VMV7
+	{object V85;
+	object V86;
+	object V87;
+	object V88;
+	object V89;
+	object V90;
+	object V91;
+	V85= V83->c.c_cdr;
+	if(((V85))==Cnil){
+	goto T117;
+	}
+	{object V92;
+	V92= V85->c.c_car;
+	V85= V85->c.c_cdr;
+	V86= (V92);
+	goto T116;
+	}
+	goto T117;
+T117:;
+	V93= make_cons(((object)VV[25]),Cnil);
+	V86= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[26]),((object)VV[4]),((object)VV[27]),(V93)));
+	goto T116;
+T116:;
+	V87= (V86);
+	if(((V86))==Cnil){
+	goto T124;
+	}
+	{object V94;
+	V94= V86->c.c_car;
+	V87= V86->c.c_cdr;
+	V88= (V94);
+	goto T123;
+	}
+	goto T124;
+T124:;
+	V95= make_cons(((object)VV[15]),Cnil);
+	V88= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[28]),((object)VV[4]),((object)VV[29]),(V95)));
+	goto T123;
+T123:;
+	if(((V87))==Cnil){
+	goto T131;
+	}
+	{object V96;
+	V96= (V87)->c.c_car;
+	V87= (V87)->c.c_cdr;
+	V89= (V96);
+	goto T130;
+	}
+	goto T131;
+T131:;
+	V99= make_cons(((object)VV[18]),Cnil);
+	V89= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[30]),((object)VV[4]),((object)VV[31]),(V99)));
+	goto T130;
+T130:;
+	if(((V87))==Cnil){
+	goto T138;
+	}
+	{object V100;
+	V100= (V87)->c.c_car;
+	V87= (V87)->c.c_cdr;
+	V90= (V100);
+	goto T137;
+	}
+	goto T138;
+T138:;
+	V90= Cnil;
+	goto T137;
+T137:;
+	if(((V87))==Cnil){
+	goto T149;
+	}
+	goto T148;
+	
+	goto T149;
+T149:;
+	goto T146;
+	
+	goto T148;
+T148:;
+	{object V104;
+	V104= (V87)->c.c_car;
+	V87= (V87)->c.c_cdr;
+	V103= (V104);}
+	V107= make_cons((V103),Cnil);
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[32]),((object)VV[7]),((object)VV[33]),(V107))));
+	goto T145;
+	
+	goto T146;
+T146:;
+	goto T145;
+T145:;
+	if(((V85))==Cnil){
+	goto T155;
+	}
+	{object V108;
+	V108= (V85)->c.c_car;
+	V85= (V85)->c.c_cdr;
+	V91= (V108);
+	goto T144;
+	}
+	goto T155;
+T155:;
+	V111= make_cons(((object)VV[34]),Cnil);
+	V91= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[35]),((object)VV[4]),((object)VV[36]),(V111)));
+	goto T144;
+T144:;
+	if(((V85))==Cnil){
+	goto T165;
+	}
+	goto T164;
+	
+	goto T165;
+T165:;
+	goto T162;
+	
+	goto T164;
+T164:;
+	{object V113;
+	V113= (V85)->c.c_car;
+	V85= (V85)->c.c_cdr;
+	V112= (V113);}
+	V116= make_cons((V112),Cnil);
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[37]),((object)VV[7]),((object)VV[38]),(V116))));
+	goto T161;
+	
+	goto T162;
+T162:;
+	goto T161;
+T161:;
+	V91= (fcall.fun=((object)VV[39])->s.s_gfdef,fcall.valp=(fixnum)0,fcall.argd=2,/* COMMON-LISP::MACROEXPAND */(*LnkLI163)((V91),(V84)));
+	{object V117;
+	V117= Cnil;
+	if(((V91))==Cnil){
+	goto T177;
+	}
+	V118= tp2(V91);
+	if(!((V118)==(0))){
+	goto T180;
+	}
+	goto T176;
+	
+	goto T180;
+T180:;
+	goto T174;
+	
+	goto T177;
+T177:;
+	goto T174;
+	
+	goto T176;
+T176:;
+	V119= V91->c.c_car;
+	if(!(((V119))==(((object)VV[40])))){
+	goto T183;
+	}
+	{fixnum V120;
+	V121= V91->c.c_cdr;
+	V120= length((V121));
+	{fixnum V122;
+	V122= (V120)-(1);
+	V117= CMPmake_fixnum(V122);}}
+	goto T173;
+	
+	goto T183;
+T183:;
+	{object V123;
+	V123= V91->c.c_car;
+	{fixnum V124;
+	V124= 1;
+	V125= tp4(V123);
+	switch(V125){
+	case -1:
+	goto T202;
+T202:;
+	goto T199;
+	
+	case 1:
+	goto T203;
+T203:;
+	case 2:
+	goto T204;
+T204:;
+	case 3:
+	goto T205;
+T205:;
+	case 4:
+	goto T206;
+T206:;
+	case 5:
+	goto T207;
+T207:;
+	case 6:
+	goto T208;
+T208:;
+	goto T197;
+	
+	default:
+	goto T209;
+T209:;
+	goto T199;
+	}
+	goto T197;
+	
+	goto T199;
+T199:;
+	V124= 0;
+	goto T196;
+	
+	goto T197;
+T197:;
+	goto T196;
+T196:;
+	switch(V124){
+	case 0:
+	goto T221;
+T221:;
+	if(!(((V123))==(((object)VV[41])))){
+	goto T218;
+	}
+	goto T219;
+	
+	case 1:
+	goto T222;
+T222:;
+	if(!(((V123))==(((object)VV[41])))){
+	goto T218;
+	}
+	goto T219;
+	}
+	goto T218;
+	
+	goto T219;
+T219:;
+	goto T217;
+	
+	goto T218;
+T218:;
+	goto T215;
+	
+	goto T217;
+T217:;
+	goto T193;
+	
+	goto T215;
+T215:;
+	switch(V124){
+	case 0:
+	goto T231;
+T231:;
+	if(!(((V123))==(((object)VV[42])))){
+	goto T228;
+	}
+	goto T229;
+	
+	case 1:
+	goto T232;
+T232:;
+	if(!(((V123))==(((object)VV[42])))){
+	goto T228;
+	}
+	goto T229;
+	}
+	goto T228;
+	
+	goto T229;
+T229:;
+	goto T227;
+	
+	goto T228;
+T228:;
+	goto T225;
+	
+	goto T227;
+T227:;
+	goto T193;
+	
+	goto T225;
+T225:;
+	goto T191;
+	}}
+	goto T193;
+T193:;
+	{object V126;
+	V126= V91->c.c_cdr;
+	if((V126->c.c_cdr)==Cnil){
+	goto T238;
+	}}
+	{object V127;
+	{object V128;
+	{object V129;
+	V129= V91->c.c_cdr;
+	{register object V130;
+	register object V131;
+	V130= (V91);
+	V131= (V129);
+	goto T246;
+T246:;
+	if(((V131))==Cnil){
+	goto T255;
+	}
+	V133= tp2((V131));
+	if(!((V133)==(0))){
+	goto T258;
+	}
+	goto T254;
+	
+	goto T258;
+T258:;
+	goto T253;
+	
+	goto T255;
+T255:;
+	goto T253;
+	
+	goto T254;
+T254:;
+	goto T251;
+	
+	goto T253;
+T253:;
+	goto T248;
+	
+	goto T251;
+T251:;
+	{object V134;
+	object V135;
+	V134= (V130)->c.c_cdr;
+	V135= (V131)->c.c_cdr;
+	V130= (V134);
+	V131= (V135);}
+	goto T246;
+	
+	goto T248;
+T248:;
+	V128= (V130);
+	goto T243;
+	}}
+	goto T243;
+T243:;
+	V127= V128->c.c_car;}
+	{fixnum V138;
+	V138= 1;
+	V139= tp4(V127);
+	switch(V139){
+	case -1:
+	goto T276;
+T276:;
+	goto T273;
+	
+	case 1:
+	goto T277;
+T277:;
+	case 2:
+	goto T278;
+T278:;
+	case 3:
+	goto T279;
+T279:;
+	case 4:
+	goto T280;
+T280:;
+	case 5:
+	goto T281;
+T281:;
+	case 6:
+	goto T282;
+T282:;
+	goto T271;
+	
+	default:
+	goto T283;
+T283:;
+	goto T273;
+	}
+	goto T271;
+	
+	goto T273;
+T273:;
+	V138= 0;
+	goto T270;
+	
+	goto T271;
+T271:;
+	goto T270;
+T270:;
+	switch(V138){
+	case 0:
+	goto T295;
+T295:;
+	if(!(((V127))==(Cnil))){
+	goto T292;
+	}
+	goto T293;
+	
+	case 1:
+	goto T296;
+T296:;
+	if(!(((V127))==(Cnil))){
+	goto T292;
+	}
+	goto T293;
+	}
+	goto T292;
+	
+	goto T293;
+T293:;
+	goto T291;
+	
+	goto T292;
+T292:;
+	goto T289;
+	
+	goto T291;
+T291:;
+	goto T237;
+	
+	goto T289;
+T289:;
+	{object V140;
+	V140= ((object)VV[43])->c.c_cdr;
+	{object V141;
+	V141= V140->c.c_car;
+	switch(V138){
+	case 0:
+	goto T307;
+T307:;
+	if(!(((V127))==((V141)))){
+	goto T304;
+	}
+	goto T305;
+	
+	case 1:
+	goto T308;
+T308:;
+	if(!(((V127))==((V141)))){
+	goto T304;
+	}
+	goto T305;
+	}
+	goto T304;
+	
+	goto T305;
+T305:;
+	goto T302;
+	
+	goto T304;
+T304:;
+	goto T300;
+	}
+	goto T302;
+T302:;
+	goto T237;
+	
+	goto T300;
+T300:;}
+	goto T235;
+	}}
+	goto T238;
+T238:;
+	goto T235;
+	
+	goto T237;
+T237:;
+	{fixnum V142;
+	V143= V91->c.c_cdr;
+	V142= length((V143));
+	{fixnum V144;
+	V144= (V142)-(2);
+	V117= CMPmake_fixnum(V144);}}
+	goto T173;
+	
+	goto T235;
+T235:;
+	goto T173;
+	
+	goto T191;
+T191:;
+	goto T173;
+	
+	goto T174;
+T174:;
+	goto T173;
+T173:;
+	{object V145;
+	if(((V117))==Cnil){
+	goto T319;
+	}
+	goto T316;
+	
+	goto T319;
+T319:;
+	V146= list(3,((object)VV[44]),list(2,((object)VV[45]),(V89)),(V91));
+	V145= list(3,((object)VV[46]),(V146),list(3,((object)VV[47]),(V89),list(2,((object)VV[48]),list(2,((object)VV[45]),(V89)))));
+	goto T315;
+	
+	goto T316;
+T316:;
+	if(!((fix(V117))<(0))){
+	goto T321;
+	}
+	{object V147 = Cnil;
+	VMR7(V147);}
+	goto T321;
+T321:;
+	if(!((fix(V117))==(0))){
+	goto T324;
+	}
+	V145= list(3,((object)VV[49]),(V89),list(3,((object)VV[47]),(V89),(V91)));
+	goto T315;
+	
+	goto T324;
+T324:;
+	{register object V149;
+	register fixnum V150;
+	V149= list(3,((object)VV[44]),list(2,((object)VV[45]),(V89)),(V91));
+	V150= fix((V117));
+	goto T331;
+T331:;
+	if(!((V150)<=(4))){
+	goto T336;
+	}
+	goto T333;
+	
+	goto T336;
+T336:;
+	V149= list(2,((object)VV[50]),(V149));
+	{fixnum V151;
+	V151= V150;
+	{fixnum V152;
+	V152= (V151)-(4);
+	V150= V152;}}
+	goto T331;
+	
+	goto T333;
+T333:;
+	switch(V150){
+	case 1:
+	goto T348;
+T348:;
+	V153= ((object)VV[45]);
+	goto T346;
+	
+	case 2:
+	goto T349;
+T349:;
+	V153= ((object)VV[51]);
+	goto T346;
+	
+	case 3:
+	goto T350;
+T350:;
+	V153= ((object)VV[52]);
+	goto T346;
+	
+	case 4:
+	goto T351;
+T351:;
+	V153= ((object)VV[50]);
+	goto T346;
+	}
+	V153= Cnil;
+	goto T346;
+T346:;
+	V149= list(2,(V153),(V149));
+	V148= (V149);
+	goto T327;
+	}
+	goto T327;
+T327:;
+	V145= list(3,((object)VV[47]),(V89),(V148));
+	goto T315;
+T315:;
+	if(((V90))==Cnil){
+	goto T354;
+	}
+	V145= list(3,((object)VV[53]),(V145),list(3,((object)VV[47]),(V90),list(2,((object)VV[45]),(V88))));
+	goto T353;
+	
+	goto T354;
+T354:;
+	goto T353;
+T353:;
+	{object V154 = (V145);
+	VMR7(V154);}}}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-COLLECT-ANSWER	*/
+
+static object LI8__LOOP_COLLECT_ANSWER__loop(object V157,object V158)
+{	 VMB8 VMS8 VMV8
+	{object V159;
+	object V160;
+	object V161;
+	V159= V157->c.c_cdr;
+	if(((V159))==Cnil){
+	goto T360;
+	}
+	{object V162;
+	V162= V159->c.c_car;
+	V159= V159->c.c_cdr;
+	V160= (V162);
+	goto T359;
+	}
+	goto T360;
+T360:;
+	V163= make_cons(((object)VV[15]),Cnil);
+	V160= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[54]),((object)VV[4]),((object)VV[55]),(V163)));
+	goto T359;
+T359:;
+	if(((V159))==Cnil){
+	goto T367;
+	}
+	{object V164;
+	V164= (V159)->c.c_car;
+	V159= (V159)->c.c_cdr;
+	V161= (V164);
+	goto T366;
+	}
+	goto T367;
+T367:;
+	V161= Cnil;
+	goto T366;
+T366:;
+	if(((V159))==Cnil){
+	goto T377;
+	}
+	goto T376;
+	
+	goto T377;
+T377:;
+	goto T374;
+	
+	goto T376;
+T376:;
+	{object V168;
+	V168= (V159)->c.c_car;
+	V159= (V159)->c.c_cdr;
+	V167= (V168);}
+	V171= make_cons((V167),Cnil);
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[56]),((object)VV[7]),((object)VV[57]),(V171))));
+	goto T373;
+	
+	goto T374;
+T374:;
+	goto T373;
+T373:;
+	if(((V161))==Cnil){
+	goto T383;
+	}
+	{object V172 = (V161);
+	VMR8(V172);}
+	goto T383;
+T383:;
+	{object V173 = list(2,((object)VV[45]),(V160));
+	VMR8(V173);}}
+}
+/*	local entry for function ANSI-LOOP::MAKE-LOOP-MINIMAX-INTERNAL	*/
+
+static object LI9__MAKE_LOOP_MINIMAX_INTERNAL__loop(object V175,...)
+{	 VMB9 VMS9 VMV9
+	va_list ap;
+	va_start(ap,V175);
+	{register object V176;
+	object V177;
+	register object V178;
+	object V179;
+	register object V180;
+	object V181;
+	register object V182;
+	object V183;
+	register object V184;
+	object V185;
+	register object V186;
+	object V187;
+	register object V188;
+	register object V189;
+	int8_t V190;
+	register int8_t V191;
+	register object V192;
+	register object V193;
+	object V194;
+	register object V195;
+	object V196;
+	object V197;
+	object V198;
+	object V199;
+	object V200;
+	object V201;
+	object V202;
+	object V203;
+	V176= Cnil;
+	V177= Cnil;
+	V178= Cnil;
+	V179= Cnil;
+	V180= Cnil;
+	V181= Cnil;
+	V182= Cnil;
+	V183= Cnil;
+	V184= Cnil;
+	V185= Cnil;
+	V186= Cnil;
+	V187= Cnil;
+	V188= Ct;
+	V189= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V189))==Cnil){
+	goto T388;
+	}
+	V190= -((char)fcall.argd);
+	goto T387;
+	
+	goto T388;
+T388:;
+	V190= fcall.argd;
+	goto T387;
+T387:;
+	V191= (V190)-(0);
+	V192= Cnil;
+	V193= Cnil;
+	V194= Cnil;
+	V195= Cnil;
+	V196= Cnil;
+	V197= Cnil;
+	{register object V204;
+	register object V205;
+	V204= Cnil;
+	V205= Cnil;
+	goto T395;
+T395:;
+	{object V206;
+	if(((V189))==Cnil){
+	goto T405;
+	}
+	if(!((V191)==(1))){
+	goto T408;
+	}
+	V191= 0;
+	if(((V188))==Cnil){
+	goto T414;
+	}
+	V188= Cnil;
+	V192= (V175);
+	goto T411;
+	
+	goto T414;
+T414:;
+	V192= va_arg(ap,object);
+	goto T411;
+T411:;
+	V206= (V192);
+	goto T404;
+	
+	goto T408;
+T408:;
+	V206= Cnil;
+	goto T404;
+	
+	goto T405;
+T405:;
+	V206= Cnil;
+	goto T404;
+T404:;
+	if(((V206))==Cnil){
+	goto T419;
+	}
+	goto T403;
+	
+	goto T419;
+T419:;
+	{object V207;
+	V207= ((V191)>(0)?Ct:Cnil);
+	if(((V207))==Cnil){
+	goto T423;
+	}
+	goto T403;
+	
+	goto T423;
+T423:;
+	if(((V192))==Cnil){
+	goto T426;
+	}
+	goto T403;
+	
+	goto T426;
+T426:;
+	goto T402;
+	}}
+	goto T403;
+T403:;
+	goto T400;
+	
+	goto T402;
+T402:;
+	goto T397;
+	
+	goto T400;
+T400:;
+	if(((V189))==Cnil){
+	goto T432;
+	}
+	if(!((V191)==(1))){
+	goto T435;
+	}
+	V191= 0;
+	if(((V188))==Cnil){
+	goto T444;
+	}
+	V188= Cnil;
+	V192= (V175);
+	goto T441;
+	
+	goto T444;
+T444:;
+	V192= va_arg(ap,object);
+	goto T441;
+T441:;
+	if(((V192))==Cnil){
+	goto T438;
+	}
+	goto T431;
+	
+	goto T438;
+T438:;
+	goto T431;
+	
+	goto T435;
+T435:;
+	goto T431;
+	
+	goto T432;
+T432:;
+	goto T431;
+T431:;
+	if(!((V191)>(0))){
+	goto T449;
+	}
+	V191= (V191)-(1);
+	if(((V188))==Cnil){
+	goto T454;
+	}
+	V188= Cnil;
+	V204= (V175);
+	goto T430;
+	
+	goto T454;
+T454:;
+	V204= va_arg(ap,object);
+	goto T430;
+	
+	goto T449;
+T449:;
+	if(((V192))==Cnil){
+	goto T459;
+	}
+	{object V208;
+	V208= (V192)->c.c_car;
+	V192= (V192)->c.c_cdr;
+	V204= (V208);
+	goto T430;
+	}
+	goto T459;
+T459:;
+	V204= Cnil;
+	goto T430;
+T430:;
+	if(((V189))==Cnil){
+	goto T467;
+	}
+	if(!((V191)==(1))){
+	goto T470;
+	}
+	V191= 0;
+	if(((V188))==Cnil){
+	goto T479;
+	}
+	V188= Cnil;
+	V192= (V175);
+	goto T476;
+	
+	goto T479;
+T479:;
+	V192= va_arg(ap,object);
+	goto T476;
+T476:;
+	if(((V192))==Cnil){
+	goto T473;
+	}
+	goto T466;
+	
+	goto T473;
+T473:;
+	goto T466;
+	
+	goto T470;
+T470:;
+	goto T466;
+	
+	goto T467;
+T467:;
+	goto T466;
+T466:;
+	if(!((V191)>(0))){
+	goto T484;
+	}
+	V191= (V191)-(1);
+	if(((V188))==Cnil){
+	goto T489;
+	}
+	V188= Cnil;
+	V205= (V175);
+	goto T465;
+	
+	goto T489;
+T489:;
+	V205= va_arg(ap,object);
+	goto T465;
+	
+	goto T484;
+T484:;
+	if(((V192))==Cnil){
+	goto T494;
+	}
+	{object V211;
+	V211= (V192)->c.c_car;
+	V192= (V192)->c.c_cdr;
+	V205= (V211);
+	goto T465;
+	}
+	goto T494;
+T494:;
+	V214= make_cons((V204),Cnil);
+	V205= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[58]),((object)VV[59]),((object)VV[60]),(V214)));
+	goto T465;
+T465:;
+	if(!(((V204))==(((object)VV[61])))){
+	goto T501;
+	}
+	if(((V176))==Cnil){
+	goto T507;
+	}
+	goto T504;
+	
+	goto T507;
+T507:;
+	V177= (V205);
+	V176= Ct;
+	goto T500;
+	
+	goto T504;
+T504:;
+	goto T500;
+	
+	goto T501;
+T501:;
+	if(!(((V204))==(((object)VV[62])))){
+	goto T512;
+	}
+	if(((V178))==Cnil){
+	goto T518;
+	}
+	goto T515;
+	
+	goto T518;
+T518:;
+	V179= (V205);
+	V178= Ct;
+	goto T500;
+	
+	goto T515;
+T515:;
+	goto T500;
+	
+	goto T512;
+T512:;
+	if(!(((V204))==(((object)VV[63])))){
+	goto T523;
+	}
+	if(((V180))==Cnil){
+	goto T529;
+	}
+	goto T526;
+	
+	goto T529;
+T529:;
+	V181= (V205);
+	V180= Ct;
+	goto T500;
+	
+	goto T526;
+T526:;
+	goto T500;
+	
+	goto T523;
+T523:;
+	if(!(((V204))==(((object)VV[64])))){
+	goto T534;
+	}
+	if(((V182))==Cnil){
+	goto T540;
+	}
+	goto T537;
+	
+	goto T540;
+T540:;
+	V183= (V205);
+	V182= Ct;
+	goto T500;
+	
+	goto T537;
+T537:;
+	goto T500;
+	
+	goto T534;
+T534:;
+	if(!(((V204))==(((object)VV[65])))){
+	goto T545;
+	}
+	if(((V184))==Cnil){
+	goto T551;
+	}
+	goto T548;
+	
+	goto T551;
+T551:;
+	V185= (V205);
+	V184= Ct;
+	goto T500;
+	
+	goto T548;
+T548:;
+	goto T500;
+	
+	goto T545;
+T545:;
+	if(!(((V204))==(((object)VV[66])))){
+	goto T556;
+	}
+	if(((V186))==Cnil){
+	goto T562;
+	}
+	goto T559;
+	
+	goto T562;
+T562:;
+	V187= (V205);
+	V186= Ct;
+	goto T500;
+	
+	goto T559;
+T559:;
+	goto T500;
+	
+	goto T556;
+T556:;
+	if(!(((V204))==(((object)VV[67])))){
+	goto T567;
+	}
+	if(((V193))==Cnil){
+	goto T573;
+	}
+	goto T570;
+	
+	goto T573;
+T573:;
+	V194= (V205);
+	V193= Ct;
+	goto T500;
+	
+	goto T570;
+T570:;
+	goto T500;
+	
+	goto T567;
+T567:;
+	if(((V195))==Cnil){
+	goto T581;
+	}
+	goto T578;
+	
+	goto T581;
+T581:;
+	V196= (V205);
+	V195= Ct;
+	V197= (V204);
+	goto T500;
+	
+	goto T578;
+T578:;
+	goto T500;
+T500:;
+	goto T395;
+	
+	goto T397;
+T397:;
+	goto T393;
+	}
+	goto T393;
+T393:;
+	if(((V176))==Cnil){
+	goto T590;
+	}
+	V198= (V177);
+	goto T392;
+	
+	goto T590;
+T590:;
+	V198= Cnil;
+	goto T392;
+T392:;
+	if(((V178))==Cnil){
+	goto T594;
+	}
+	V199= (V179);
+	goto T593;
+	
+	goto T594;
+T594:;
+	V199= Cnil;
+	goto T593;
+T593:;
+	if(((V180))==Cnil){
+	goto T598;
+	}
+	V200= (V181);
+	goto T597;
+	
+	goto T598;
+T598:;
+	V200= Cnil;
+	goto T597;
+T597:;
+	if(((V182))==Cnil){
+	goto T602;
+	}
+	V201= (V183);
+	goto T601;
+	
+	goto T602;
+T602:;
+	V201= Cnil;
+	goto T601;
+T601:;
+	if(((V184))==Cnil){
+	goto T606;
+	}
+	V202= (V185);
+	goto T605;
+	
+	goto T606;
+T606:;
+	V202= Cnil;
+	goto T605;
+T605:;
+	if(((V186))==Cnil){
+	goto T610;
+	}
+	V203= (V187);
+	goto T609;
+	
+	goto T610;
+T610:;
+	V203= Cnil;
+	goto T609;
+T609:;
+	if(((V194))==Cnil){
+	goto T617;
+	}
+	goto T614;
+	
+	goto T617;
+T617:;
+	if(((V195))==Cnil){
+	goto T619;
+	}
+	V215= list(2,(V197),(V196));
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[68]),((object)VV[69]),((object)VV[70]),(V215))));
+	goto T613;
+	
+	goto T619;
+T619:;
+	goto T613;
+	
+	goto T614;
+T614:;
+	goto T613;
+T613:;
+	{object V216 = (fcall.fun=((object)VV[71])->s.s_gfdef,fcall.argd=7,/* SYSTEM::MAKE-STRUCTURE */(*LnkLI164)(((object)VV[72]),(V198),(V199),(V200),(V201),(V202),(V203)));
+	VMR9(V216);}}
+	va_end(ap);
+}
+/*	local entry for function ANSI-LOOP::LOOP-MINIMAX-ANSWER-VARIABLE	*/
+
+static object LI10__LOOP_MINIMAX_ANSWER_VARIABLE__loop(object V218)
+{	 VMB10 VMS10 VMV10
+	V219= tp6(V218);
+	if(!((V219)==((fixnum)544))){
+	goto T632;
+	}
+	goto T631;
+	
+	goto T632;
+T632:;
+	goto T629;
+	
+	goto T631;
+T631:;
+	{object V220;
+	{fixnum V221;
+	V221= ((fixnum)V218);
+	V220= ((object*)V221)[(fixnum)1];}
+	{fixnum V223;
+	{fixnum V224;
+	V224= ((fixnum)V220);
+	V223= ((fixnum*)V224)[(fixnum)2];}
+	V222= ((object*)V223)[(fixnum)0];}
+	if(!(((V222))==(((object)VV[72])))){
+	goto T637;
+	}
+	goto T628;
+	
+	goto T637;
+T637:;
+	{register object V225;
+	{fixnum V226;
+	{fixnum V227;
+	V227= ((fixnum)V220);
+	V226= ((fixnum*)V227)[(fixnum)2];}
+	V225= ((object*)V226)[(fixnum)4];}
+	goto T647;
+T647:;
+	if(((V225))==Cnil){
+	goto T649;
+	}
+	{fixnum V230;
+	{fixnum V231;
+	V231= ((fixnum)(V225));
+	V230= ((fixnum*)V231)[(fixnum)2];}
+	V228= ((object*)V230)[(fixnum)0];}
+	if(!(((V228))==(((object)VV[72])))){
+	goto T651;
+	}
+	goto T628;
+	
+	goto T651;
+T651:;
+	{object V232;
+	{fixnum V234;
+	{fixnum V235;
+	V235= ((fixnum)(V225));
+	V234= ((fixnum*)V235)[(fixnum)2];}
+	V232= ((object*)V234)[(fixnum)4];}
+	V225= (V232);
+	goto T647;
+	}
+	goto T649;
+T649:;
+	goto T627;
+	}}
+	goto T629;
+T629:;
+	goto T627;
+	
+	goto T628;
+T628:;
+	goto T626;
+	
+	goto T627;
+T627:;
+	goto T624;
+	
+	goto T626;
+T626:;
+	goto T623;
+	
+	goto T624;
+T624:;
+	V218= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V218),((object)VV[72]),Cnil));
+	goto T623;
+T623:;
+	{object V236 = STREF(object ,(V218),0);
+	VMR10(V236);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-MINIMAX-TYPE	*/
+
+static object LI11__LOOP_MINIMAX_TYPE__loop(object V238)
+{	 VMB11 VMS11 VMV11
+	V239= tp6(V238);
+	if(!((V239)==((fixnum)544))){
+	goto T673;
+	}
+	goto T672;
+	
+	goto T673;
+T673:;
+	goto T670;
+	
+	goto T672;
+T672:;
+	{object V240;
+	{fixnum V241;
+	V241= ((fixnum)V238);
+	V240= ((object*)V241)[(fixnum)1];}
+	{fixnum V243;
+	{fixnum V244;
+	V244= ((fixnum)V240);
+	V243= ((fixnum*)V244)[(fixnum)2];}
+	V242= ((object*)V243)[(fixnum)0];}
+	if(!(((V242))==(((object)VV[72])))){
+	goto T678;
+	}
+	goto T669;
+	
+	goto T678;
+T678:;
+	{register object V245;
+	{fixnum V246;
+	{fixnum V247;
+	V247= ((fixnum)V240);
+	V246= ((fixnum*)V247)[(fixnum)2];}
+	V245= ((object*)V246)[(fixnum)4];}
+	goto T688;
+T688:;
+	if(((V245))==Cnil){
+	goto T690;
+	}
+	{fixnum V250;
+	{fixnum V251;
+	V251= ((fixnum)(V245));
+	V250= ((fixnum*)V251)[(fixnum)2];}
+	V248= ((object*)V250)[(fixnum)0];}
+	if(!(((V248))==(((object)VV[72])))){
+	goto T692;
+	}
+	goto T669;
+	
+	goto T692;
+T692:;
+	{object V252;
+	{fixnum V254;
+	{fixnum V255;
+	V255= ((fixnum)(V245));
+	V254= ((fixnum*)V255)[(fixnum)2];}
+	V252= ((object*)V254)[(fixnum)4];}
+	V245= (V252);
+	goto T688;
+	}
+	goto T690;
+T690:;
+	goto T668;
+	}}
+	goto T670;
+T670:;
+	goto T668;
+	
+	goto T669;
+T669:;
+	goto T667;
+	
+	goto T668;
+T668:;
+	goto T665;
+	
+	goto T667;
+T667:;
+	goto T664;
+	
+	goto T665;
+T665:;
+	V238= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V238),((object)VV[72]),Cnil));
+	goto T664;
+T664:;
+	{object V256 = STREF(object ,(V238),8);
+	VMR11(V256);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-MINIMAX-TEMP-VARIABLE	*/
+
+static object LI12__LOOP_MINIMAX_TEMP_VARIABLE__loop(object V258)
+{	 VMB12 VMS12 VMV12
+	V259= tp6(V258);
+	if(!((V259)==((fixnum)544))){
+	goto T714;
+	}
+	goto T713;
+	
+	goto T714;
+T714:;
+	goto T711;
+	
+	goto T713;
+T713:;
+	{object V260;
+	{fixnum V261;
+	V261= ((fixnum)V258);
+	V260= ((object*)V261)[(fixnum)1];}
+	{fixnum V263;
+	{fixnum V264;
+	V264= ((fixnum)V260);
+	V263= ((fixnum*)V264)[(fixnum)2];}
+	V262= ((object*)V263)[(fixnum)0];}
+	if(!(((V262))==(((object)VV[72])))){
+	goto T719;
+	}
+	goto T710;
+	
+	goto T719;
+T719:;
+	{register object V265;
+	{fixnum V266;
+	{fixnum V267;
+	V267= ((fixnum)V260);
+	V266= ((fixnum*)V267)[(fixnum)2];}
+	V265= ((object*)V266)[(fixnum)4];}
+	goto T729;
+T729:;
+	if(((V265))==Cnil){
+	goto T731;
+	}
+	{fixnum V270;
+	{fixnum V271;
+	V271= ((fixnum)(V265));
+	V270= ((fixnum*)V271)[(fixnum)2];}
+	V268= ((object*)V270)[(fixnum)0];}
+	if(!(((V268))==(((object)VV[72])))){
+	goto T733;
+	}
+	goto T710;
+	
+	goto T733;
+T733:;
+	{object V272;
+	{fixnum V274;
+	{fixnum V275;
+	V275= ((fixnum)(V265));
+	V274= ((fixnum*)V275)[(fixnum)2];}
+	V272= ((object*)V274)[(fixnum)4];}
+	V265= (V272);
+	goto T729;
+	}
+	goto T731;
+T731:;
+	goto T709;
+	}}
+	goto T711;
+T711:;
+	goto T709;
+	
+	goto T710;
+T710:;
+	goto T708;
+	
+	goto T709;
+T709:;
+	goto T706;
+	
+	goto T708;
+T708:;
+	goto T705;
+	
+	goto T706;
+T706:;
+	V258= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V258),((object)VV[72]),Cnil));
+	goto T705;
+T705:;
+	{object V276 = STREF(object ,(V258),16);
+	VMR12(V276);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-MINIMAX-FLAG-VARIABLE	*/
+
+static object LI13__LOOP_MINIMAX_FLAG_VARIABLE__loop(object V278)
+{	 VMB13 VMS13 VMV13
+	V279= tp6(V278);
+	if(!((V279)==((fixnum)544))){
+	goto T755;
+	}
+	goto T754;
+	
+	goto T755;
+T755:;
+	goto T752;
+	
+	goto T754;
+T754:;
+	{object V280;
+	{fixnum V281;
+	V281= ((fixnum)V278);
+	V280= ((object*)V281)[(fixnum)1];}
+	{fixnum V283;
+	{fixnum V284;
+	V284= ((fixnum)V280);
+	V283= ((fixnum*)V284)[(fixnum)2];}
+	V282= ((object*)V283)[(fixnum)0];}
+	if(!(((V282))==(((object)VV[72])))){
+	goto T760;
+	}
+	goto T751;
+	
+	goto T760;
+T760:;
+	{register object V285;
+	{fixnum V286;
+	{fixnum V287;
+	V287= ((fixnum)V280);
+	V286= ((fixnum*)V287)[(fixnum)2];}
+	V285= ((object*)V286)[(fixnum)4];}
+	goto T770;
+T770:;
+	if(((V285))==Cnil){
+	goto T772;
+	}
+	{fixnum V290;
+	{fixnum V291;
+	V291= ((fixnum)(V285));
+	V290= ((fixnum*)V291)[(fixnum)2];}
+	V288= ((object*)V290)[(fixnum)0];}
+	if(!(((V288))==(((object)VV[72])))){
+	goto T774;
+	}
+	goto T751;
+	
+	goto T774;
+T774:;
+	{object V292;
+	{fixnum V294;
+	{fixnum V295;
+	V295= ((fixnum)(V285));
+	V294= ((fixnum*)V295)[(fixnum)2];}
+	V292= ((object*)V294)[(fixnum)4];}
+	V285= (V292);
+	goto T770;
+	}
+	goto T772;
+T772:;
+	goto T750;
+	}}
+	goto T752;
+T752:;
+	goto T750;
+	
+	goto T751;
+T751:;
+	goto T749;
+	
+	goto T750;
+T750:;
+	goto T747;
+	
+	goto T749;
+T749:;
+	goto T746;
+	
+	goto T747;
+T747:;
+	V278= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V278),((object)VV[72]),Cnil));
+	goto T746;
+T746:;
+	{object V296 = STREF(object ,(V278),24);
+	VMR13(V296);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-MINIMAX-OPERATIONS	*/
+
+static object LI14__LOOP_MINIMAX_OPERATIONS__loop(object V298)
+{	 VMB14 VMS14 VMV14
+	V299= tp6(V298);
+	if(!((V299)==((fixnum)544))){
+	goto T796;
+	}
+	goto T795;
+	
+	goto T796;
+T796:;
+	goto T793;
+	
+	goto T795;
+T795:;
+	{object V300;
+	{fixnum V301;
+	V301= ((fixnum)V298);
+	V300= ((object*)V301)[(fixnum)1];}
+	{fixnum V303;
+	{fixnum V304;
+	V304= ((fixnum)V300);
+	V303= ((fixnum*)V304)[(fixnum)2];}
+	V302= ((object*)V303)[(fixnum)0];}
+	if(!(((V302))==(((object)VV[72])))){
+	goto T801;
+	}
+	goto T792;
+	
+	goto T801;
+T801:;
+	{register object V305;
+	{fixnum V306;
+	{fixnum V307;
+	V307= ((fixnum)V300);
+	V306= ((fixnum*)V307)[(fixnum)2];}
+	V305= ((object*)V306)[(fixnum)4];}
+	goto T811;
+T811:;
+	if(((V305))==Cnil){
+	goto T813;
+	}
+	{fixnum V310;
+	{fixnum V311;
+	V311= ((fixnum)(V305));
+	V310= ((fixnum*)V311)[(fixnum)2];}
+	V308= ((object*)V310)[(fixnum)0];}
+	if(!(((V308))==(((object)VV[72])))){
+	goto T815;
+	}
+	goto T792;
+	
+	goto T815;
+T815:;
+	{object V312;
+	{fixnum V314;
+	{fixnum V315;
+	V315= ((fixnum)(V305));
+	V314= ((fixnum*)V315)[(fixnum)2];}
+	V312= ((object*)V314)[(fixnum)4];}
+	V305= (V312);
+	goto T811;
+	}
+	goto T813;
+T813:;
+	goto T791;
+	}}
+	goto T793;
+T793:;
+	goto T791;
+	
+	goto T792;
+T792:;
+	goto T790;
+	
+	goto T791;
+T791:;
+	goto T788;
+	
+	goto T790;
+T790:;
+	goto T787;
+	
+	goto T788;
+T788:;
+	V298= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V298),((object)VV[72]),Cnil));
+	goto T787;
+T787:;
+	{object V316 = STREF(object ,(V298),32);
+	VMR14(V316);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-MINIMAX-INFINITY-DATA	*/
+
+static object LI15__LOOP_MINIMAX_INFINITY_DATA__loop(object V318)
+{	 VMB15 VMS15 VMV15
+	V319= tp6(V318);
+	if(!((V319)==((fixnum)544))){
+	goto T837;
+	}
+	goto T836;
+	
+	goto T837;
+T837:;
+	goto T834;
+	
+	goto T836;
+T836:;
+	{object V320;
+	{fixnum V321;
+	V321= ((fixnum)V318);
+	V320= ((object*)V321)[(fixnum)1];}
+	{fixnum V323;
+	{fixnum V324;
+	V324= ((fixnum)V320);
+	V323= ((fixnum*)V324)[(fixnum)2];}
+	V322= ((object*)V323)[(fixnum)0];}
+	if(!(((V322))==(((object)VV[72])))){
+	goto T842;
+	}
+	goto T833;
+	
+	goto T842;
+T842:;
+	{register object V325;
+	{fixnum V326;
+	{fixnum V327;
+	V327= ((fixnum)V320);
+	V326= ((fixnum*)V327)[(fixnum)2];}
+	V325= ((object*)V326)[(fixnum)4];}
+	goto T852;
+T852:;
+	if(((V325))==Cnil){
+	goto T854;
+	}
+	{fixnum V330;
+	{fixnum V331;
+	V331= ((fixnum)(V325));
+	V330= ((fixnum*)V331)[(fixnum)2];}
+	V328= ((object*)V330)[(fixnum)0];}
+	if(!(((V328))==(((object)VV[72])))){
+	goto T856;
+	}
+	goto T833;
+	
+	goto T856;
+T856:;
+	{object V332;
+	{fixnum V334;
+	{fixnum V335;
+	V335= ((fixnum)(V325));
+	V334= ((fixnum*)V335)[(fixnum)2];}
+	V332= ((object*)V334)[(fixnum)4];}
+	V325= (V332);
+	goto T852;
+	}
+	goto T854;
+T854:;
+	goto T832;
+	}}
+	goto T834;
+T834:;
+	goto T832;
+	
+	goto T833;
+T833:;
+	goto T831;
+	
+	goto T832;
+T832:;
+	goto T829;
+	
+	goto T831;
+T831:;
+	goto T828;
+	
+	goto T829;
+T829:;
+	V318= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V318),((object)VV[72]),Cnil));
+	goto T828;
+T828:;
+	{object V336 = STREF(object ,(V318),40);
+	VMR15(V336);}
+}
+/*	local entry for function ::G5	*/
+
+static object LI16__G5__loop(object V338)
+{	 VMB16 VMS16 VMV16
+	V339= tp6(V338);
+	if(!((V339)==((fixnum)544))){
+	goto T868;
+	}
+	{object V340;
+	{fixnum V341;
+	V341= ((fixnum)V338);
+	V340= ((object*)V341)[(fixnum)1];}
+	{fixnum V343;
+	{fixnum V344;
+	V344= ((fixnum)V340);
+	V343= ((fixnum*)V344)[(fixnum)2];}
+	V342= ((object*)V343)[(fixnum)0];}
+	if(!(((V342))==(((object)VV[72])))){
+	goto T877;
+	}
+	goto T874;
+	
+	goto T877;
+T877:;
+	{register object V345;
+	{fixnum V346;
+	{fixnum V347;
+	V347= ((fixnum)V340);
+	V346= ((fixnum*)V347)[(fixnum)2];}
+	V345= ((object*)V346)[(fixnum)4];}
+	goto T887;
+T887:;
+	if(((V345))==Cnil){
+	goto T889;
+	}
+	{fixnum V350;
+	{fixnum V351;
+	V351= ((fixnum)(V345));
+	V350= ((fixnum*)V351)[(fixnum)2];}
+	V348= ((object*)V350)[(fixnum)0];}
+	if(!(((V348))==(((object)VV[72])))){
+	goto T891;
+	}
+	goto T874;
+	
+	goto T891;
+T891:;
+	{object V352;
+	{fixnum V354;
+	{fixnum V355;
+	V355= ((fixnum)(V345));
+	V354= ((fixnum*)V355)[(fixnum)2];}
+	V352= ((object*)V354)[(fixnum)4];}
+	V345= (V352);
+	goto T887;
+	}
+	goto T889;
+T889:;
+	goto T872;
+	}}
+	goto T874;
+T874:;
+	{object V356 = Ct;
+	VMR16(V356);}
+	goto T872;
+T872:;
+	{object V357 = Cnil;
+	VMR16(V357);}
+	goto T868;
+T868:;
+	{object V358 = Cnil;
+	VMR16(V358);}
+}
+/*	local entry for function ANSI-LOOP::MAKE-LOOP-MINIMAX	*/
+
+static object LI17__MAKE_LOOP_MINIMAX__loop(object V361,register object V362)
+{	 VMB17 VMS17 VMV17
+	{object V363;
+	{object V364;
+	{object V365;
+	V365= (((object)VV[75])->s.s_dbind);
+	{register object V366;
+	V366= (V365);
+	goto T911;
+T911:;
+	if(((V366))==Cnil){
+	goto T913;
+	}
+	{object V368;
+	V368= (V366)->c.c_car;
+	V369= tp2(V368);
+	if(!((V369)==(0))){
+	goto T924;
+	}
+	goto T923;
+	
+	goto T924;
+T924:;
+	goto T922;
+	
+	goto T923;
+T923:;
+	goto T919;
+	
+	goto T922;
+T922:;
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[76]),((object)VV[77]),(V368),((object)VV[78]),((object)VV[40]))));
+	goto T918;
+	
+	goto T919;
+T919:;
+	goto T918;
+T918:;
+	if(((V368))==Cnil){
+	goto T930;
+	}
+	{object V370;
+	V370= V368->c.c_car;
+	{object V371;
+	object V372;
+	V371= (V362);
+	V372= (V370);
+	V373= tp7(V362);
+	switch(V373){
+	case 545:
+	goto T945;
+T945:;
+	if(((fcall.fun=((object)VV[79])->s.s_gfdef,/* SYSTEM::SI-CLASSP */(*LnkLI166)((V362))))==Cnil){
+	goto T951;
+	}
+	goto T942;
+	
+	goto T951;
+T951:;
+	goto T941;
+	
+	case 0:
+	goto T946;
+T946:;
+	{object V374;
+	V374= V362->c.c_car;
+	V375= tp6(V374);
+	if(!((V375)==((fixnum)608))){
+	goto T962;
+	}
+	if(!(((V374))==(((object)VV[80])))){
+	goto T966;
+	}
+	goto T960;
+	
+	goto T966;
+T966:;
+	goto T958;
+	
+	goto T962;
+T962:;
+	goto T958;
+	}
+	goto T960;
+T960:;
+	if(((fcall.argd=1,/* SYSTEM::IMPROPER-CONSP */(*LnkLI167)((V362))))==Cnil){
+	goto T955;
+	}
+	goto T957;
+	
+	goto T958;
+T958:;
+	goto T955;
+	
+	goto T957;
+T957:;
+	goto T954;
+	
+	goto T955;
+T955:;
+	{object V376;
+	V376= V362->c.c_car;
+	V377= tp7(V376);
+	switch(V377){
+	case 610:
+	goto T974;
+T974:;
+	case -2:
+	goto T975;
+T975:;
+	case 609:
+	goto T976;
+T976:;
+	goto T970;
+	
+	case 608:
+	goto T977;
+T977:;
+	if(!(((V376))==(((object)VV[82])))){
+	goto T981;
+	}
+	goto T979;
+	
+	goto T981;
+T981:;
+	goto T970;
+	
+	goto T979;
+T979:;
+	goto T968;
+	
+	default:
+	goto T978;
+T978:;
+	goto T968;
+	}
+	goto T968;
+	}
+	goto T970;
+T970:;
+	if(((fcall.argd=1,/* SYSTEM::IMPROPER-CONSP */(*LnkLI167)((V362))))==Cnil){
+	goto T984;
+	}
+	goto T953;
+	
+	goto T984;
+T984:;
+	goto T954;
+	
+	goto T968;
+T968:;
+	goto T953;
+	
+	goto T954;
+T954:;
+	goto T942;
+	
+	goto T953;
+T953:;
+	goto T941;
+	
+	case 610:
+	goto T947;
+T947:;
+	case -2:
+	goto T948;
+T948:;
+	case 609:
+	goto T949;
+T949:;
+	goto T942;
+	
+	case 608:
+	goto T950;
+T950:;
+	if(!(((V362))==(((object)VV[82])))){
+	goto T989;
+	}
+	goto T987;
+	
+	goto T989;
+T989:;
+	goto T942;
+	
+	goto T987;
+T987:;
+	goto T941;
+	}
+	goto T941;
+	
+	goto T942;
+T942:;
+	goto T940;
+	
+	goto T941;
+T941:;
+	goto T938;
+	
+	goto T940;
+T940:;
+	V371= (V362);
+	goto T937;
+	
+	goto T938;
+T938:;
+	V371= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[83]),(V362),((object)VV[84]),Cnil));
+	goto T937;
+T937:;
+	V378= tp7(V370);
+	switch(V378){
+	case 545:
+	goto T1001;
+T1001:;
+	if(((fcall.fun=((object)VV[79])->s.s_gfdef,/* SYSTEM::SI-CLASSP */(*LnkLI166)((V370))))==Cnil){
+	goto T1007;
+	}
+	goto T998;
+	
+	goto T1007;
+T1007:;
+	goto T997;
+	
+	case 0:
+	goto T1002;
+T1002:;
+	{object V379;
+	V379= V370->c.c_car;
+	V380= tp6(V379);
+	if(!((V380)==((fixnum)608))){
+	goto T1018;
+	}
+	if(!(((V379))==(((object)VV[80])))){
+	goto T1022;
+	}
+	goto T1016;
+	
+	goto T1022;
+T1022:;
+	goto T1014;
+	
+	goto T1018;
+T1018:;
+	goto T1014;
+	}
+	goto T1016;
+T1016:;
+	if(((fcall.argd=1,/* SYSTEM::IMPROPER-CONSP */(*LnkLI167)((V370))))==Cnil){
+	goto T1011;
+	}
+	goto T1013;
+	
+	goto T1014;
+T1014:;
+	goto T1011;
+	
+	goto T1013;
+T1013:;
+	goto T1010;
+	
+	goto T1011;
+T1011:;
+	{object V381;
+	V381= V370->c.c_car;
+	V382= tp7(V381);
+	switch(V382){
+	case 610:
+	goto T1030;
+T1030:;
+	case -2:
+	goto T1031;
+T1031:;
+	case 609:
+	goto T1032;
+T1032:;
+	goto T1026;
+	
+	case 608:
+	goto T1033;
+T1033:;
+	if(!(((V381))==(((object)VV[82])))){
+	goto T1037;
+	}
+	goto T1035;
+	
+	goto T1037;
+T1037:;
+	goto T1026;
+	
+	goto T1035;
+T1035:;
+	goto T1024;
+	
+	default:
+	goto T1034;
+T1034:;
+	goto T1024;
+	}
+	goto T1024;
+	}
+	goto T1026;
+T1026:;
+	if(((fcall.argd=1,/* SYSTEM::IMPROPER-CONSP */(*LnkLI167)((V370))))==Cnil){
+	goto T1040;
+	}
+	goto T1009;
+	
+	goto T1040;
+T1040:;
+	goto T1010;
+	
+	goto T1024;
+T1024:;
+	goto T1009;
+	
+	goto T1010;
+T1010:;
+	goto T998;
+	
+	goto T1009;
+T1009:;
+	goto T997;
+	
+	case 610:
+	goto T1003;
+T1003:;
+	case -2:
+	goto T1004;
+T1004:;
+	case 609:
+	goto T1005;
+T1005:;
+	goto T998;
+	
+	case 608:
+	goto T1006;
+T1006:;
+	if(!(((V370))==(((object)VV[82])))){
+	goto T1045;
+	}
+	goto T1043;
+	
+	goto T1045;
+T1045:;
+	goto T998;
+	
+	goto T1043;
+T1043:;
+	goto T997;
+	}
+	goto T997;
+	
+	goto T998;
+T998:;
+	goto T996;
+	
+	goto T997;
+T997:;
+	goto T994;
+	
+	goto T996;
+T996:;
+	V372= (V370);
+	goto T993;
+	
+	goto T994;
+T994:;
+	V372= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[85]),(V370),((object)VV[84]),Cnil));
+	goto T993;
+T993:;
+	if(((V371))==Cnil){
+	goto T1054;
+	}
+	goto T1051;
+	
+	goto T1054;
+T1054:;
+	goto T1050;
+	
+	goto T1051;
+T1051:;
+	if(!(((V372))==(Ct))){
+	goto T1048;
+	}
+	goto T1050;
+T1050:;
+	if((({object  _t0=Ct;object  _t1=Ct;
+	(void)((_t1));_t0;}))==Cnil){
+	goto T934;
+	}
+	goto T935;
+	
+	goto T1048;
+T1048:;
+	{object V383;
+	object V384;
+	V385= (fcall.valp=(fixnum)0,/* SYSTEM::NORMALIZE-TYPE */(*LnkLI169)((V371)));
+	V383= (/* SYSTEM::NPROCESS-TYPE */(*LnkLI168)((V385)));
+	V386= (fcall.valp=(fixnum)0,/* SYSTEM::NORMALIZE-TYPE */(*LnkLI169)((V372)));
+	V384= (/* SYSTEM::NPROCESS-TYPE */(*LnkLI168)((V386)));
+	V387= (/* SYSTEM::NTP-SUBTP */(*LnkLI170)((V383),(V384)));
+	{object V389;
+	{object V390;
+	V390= V383->c.c_cdr;
+	V389= V390->c.c_cdr;}
+	if((V389->c.c_car)==Cnil){
+	goto T1062;
+	}}
+	goto T1061;
+	
+	goto T1062;
+T1062:;
+	{object V391;
+	{object V392;
+	V392= V384->c.c_cdr;
+	V391= V392->c.c_cdr;}
+	if((V391->c.c_car)==Cnil){
+	goto T1059;
+	}}
+	goto T1061;
+T1061:;
+	V388= Cnil;
+	goto T1058;
+	
+	goto T1059;
+T1059:;
+	V388= Ct;
+	goto T1058;
+T1058:;
+	if((({object  _t0=(V387);object  _t1=(V388);
+	(void)((_t1));_t0;}))==Cnil){
+	goto T934;
+	}}}
+	goto T935;
+T935:;
+	goto T929;
+	
+	goto T934;
+T934:;
+	goto T927;
+	}
+	goto T930;
+T930:;
+	goto T927;
+	
+	goto T929;
+T929:;
+	V364= (V368);
+	goto T903;
+	
+	goto T927;
+T927:;}
+	{object V393;
+	V393= (V366)->c.c_cdr;
+	V366= (V393);
+	goto T911;
+	}
+	goto T913;
+T913:;
+	goto T909;
+	}
+	goto T909;
+T909:;
+	if(((V365))==Cnil){
+	goto T907;
+	}
+	goto T904;
+	
+	goto T907;
+T907:;
+	V364= Cnil;
+	goto T903;
+	
+	goto T904;
+T904:;
+	V364= Cnil;}
+	goto T903;
+T903:;
+	V363= V364->c.c_cdr;}
+	V395= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[91])));
+	if(((V363))==Cnil){
+	goto T1076;
+	}
+	goto T1073;
+	
+	goto T1076;
+T1076:;
+	V396= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[92])));
+	goto T1072;
+	
+	goto T1073;
+T1073:;
+	V396= Cnil;
+	goto T1072;
+T1072:;
+	{object V397 = (fcall.argd=12,/* ANSI-LOOP::MAKE-LOOP-MINIMAX-INTERNAL */(*LnkLI171)(((object)VV[93]),(V361),((object)VV[94]),(V362),((object)VV[95]),(V395),((object)VV[96]),(V396),((object)VV[97]),Cnil,((object)VV[98]),(V363)));
+	VMR17(V397);}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-NOTE-MINIMAX-OPERATION	*/
+
+static object LI18__LOOP_NOTE_MINIMAX_OPERATION__loop(register object V400,object V401)
+{	 VMB18 VMS18 VMV18
+	{object V402;
+	{object V403;
+	V403= STREF(object ,(V401),32);
+	{register object V404;
+	V404= (V403);
+	goto T1092;
+T1092:;
+	if(((V404))==Cnil){
+	goto T1094;
+	}
+	{object V406;
+	V406= (V404)->c.c_car;
+	if(!(((V400))==((V406)))){
+	goto T1104;
+	}
+	goto T1103;
+	
+	goto T1104;
+T1104:;
+	goto T1102;
+	
+	goto T1103;
+T1103:;
+	goto T1100;
+	
+	goto T1102;
+T1102:;
+	goto T1098;
+	}
+	goto T1100;
+T1100:;
+	goto T1084;
+	
+	goto T1098;
+T1098:;
+	{object V407;
+	V407= (V404)->c.c_cdr;
+	V404= (V407);
+	goto T1092;
+	}
+	goto T1094;
+T1094:;
+	goto T1090;
+	}
+	goto T1090;
+T1090:;
+	if(((V403))==Cnil){
+	goto T1088;
+	}
+	goto T1085;
+	
+	goto T1088;
+T1088:;
+	goto T1082;
+	
+	goto T1085;
+T1085:;
+	goto T1082;
+	
+	goto T1084;
+T1084:;
+	V402= (V403);
+	goto T1079;
+	
+	goto T1082;
+T1082:;
+	V402= make_cons((V400),(V403));}
+	goto T1079;
+T1079:;
+	STSET(object ,(V401),32, (V402));
+	(void)((V402));}
+	{object V409;
+	V409= STREF(object ,(V401),32);
+	if((V409->c.c_cdr)==Cnil){
+	goto T1113;
+	}}
+	if((STREF(object ,(V401),24))==Cnil){
+	goto T1119;
+	}
+	goto T1118;
+	
+	goto T1119;
+T1119:;
+	goto T1117;
+	
+	goto T1118;
+T1118:;
+	goto T1110;
+	
+	goto T1117;
+T1117:;
+	goto T1112;
+	
+	goto T1113;
+T1113:;
+	goto T1110;
+	
+	goto T1112;
+T1112:;
+	V410= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[92])));
+	STSET(object ,(V401),24, (V410));
+	(void)((V410));
+	goto T1109;
+	
+	goto T1110;
+T1110:;
+	goto T1109;
+T1109:;
+	{object V411 = (V400);
+	VMR18(V411);}
+}
+/*	local entry for function ANSI-LOOP::WITH-MINIMAX-VALUE	*/
+
+static object LI19__WITH_MINIMAX_VALUE__loop(object V414,object V415)
+{	 VMB19 VMS19 VMV19
+	{object V416;
+	object V417;
+	V416= V414->c.c_cdr;
+	if(((V416))==Cnil){
+	goto T1123;
+	}
+	{object V419;
+	V419= V416->c.c_car;
+	V416= V416->c.c_cdr;
+	V417= (V419);
+	goto T1122;
+	}
+	goto T1123;
+T1123:;
+	V420= make_cons(((object)VV[99]),Cnil);
+	V417= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[100]),((object)VV[4]),((object)VV[101]),(V420)));
+	goto T1122;
+T1122:;
+	{object V421;
+	object V422;
+	object V423;
+	object V424;
+	object V425;
+	object V426;
+	object V427;
+	V428= STREF(object ,(V417),8);
+	V421= (/* ANSI-LOOP::LOOP-TYPED-INIT */(*LnkLI173)((V428)));
+	{object V429;
+	V429= STREF(object ,(V417),32);
+	V422= V429->c.c_car;}
+	V423= STREF(object ,(V417),40);
+	V424= STREF(object ,(V417),0);
+	V425= STREF(object ,(V417),16);
+	V426= STREF(object ,(V417),24);
+	V427= STREF(object ,(V417),8);
+	if(((V426))==Cnil){
+	goto T1138;
+	}
+	V430= list(2,(V424),(V421));
+	V431= list(2,(V425),(V421));
+	V432= list(3,(V430),(V431),list(2,(V426),Cnil));
+	{object V433 = listA(4,((object)VV[103]),(V432),list(2,((object)VV[104]),list(4,((object)VV[105]),(V427),(V424),(V425))),(V416));
+	VMR19(V433);}
+	goto T1138;
+T1138:;
+	if(!(((V422))==(((object)VV[106])))){
+	goto T1142;
+	}
+	V434= V423->c.c_car;
+	goto T1141;
+	
+	goto T1142;
+T1142:;
+	{object V435;
+	V435= V423->c.c_cdr;
+	V434= V435->c.c_car;}
+	goto T1141;
+T1141:;
+	V436= list(2,(V424),(V434));
+	V437= list(2,(V436),list(2,(V425),(V421)));
+	{object V438 = listA(4,((object)VV[103]),(V437),list(2,((object)VV[104]),list(4,((object)VV[105]),(V427),(V424),(V425))),(V416));
+	VMR19(V438);}}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-ACCUMULATE-MINIMAX-VALUE	*/
+
+static object LI20__LOOP_ACCUMULATE_MINIMAX_VALUE__loop(object V441,object V442)
+{	 VMB20 VMS20 VMV20
+	{register object V443;
+	object V444;
+	object V445;
+	object V446;
+	V443= V441->c.c_cdr;
+	if(((V443))==Cnil){
+	goto T1148;
+	}
+	{object V447;
+	V447= V443->c.c_car;
+	V443= V443->c.c_cdr;
+	V444= (V447);
+	goto T1147;
+	}
+	goto T1148;
+T1148:;
+	V448= make_cons(((object)VV[99]),Cnil);
+	V444= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[107]),((object)VV[4]),((object)VV[108]),(V448)));
+	goto T1147;
+T1147:;
+	if(((V443))==Cnil){
+	goto T1155;
+	}
+	{object V449;
+	V449= (V443)->c.c_car;
+	V443= (V443)->c.c_cdr;
+	V445= (V449);
+	goto T1154;
+	}
+	goto T1155;
+T1155:;
+	V452= make_cons(((object)VV[109]),Cnil);
+	V445= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[110]),((object)VV[4]),((object)VV[111]),(V452)));
+	goto T1154;
+T1154:;
+	if(((V443))==Cnil){
+	goto T1162;
+	}
+	{object V453;
+	V453= (V443)->c.c_car;
+	V443= (V443)->c.c_cdr;
+	V446= (V453);
+	goto T1161;
+	}
+	goto T1162;
+T1162:;
+	V456= make_cons(((object)VV[34]),Cnil);
+	V446= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[112]),((object)VV[4]),((object)VV[113]),(V456)));
+	goto T1161;
+T1161:;
+	if(((V443))==Cnil){
+	goto T1172;
+	}
+	goto T1171;
+	
+	goto T1172;
+T1172:;
+	goto T1169;
+	
+	goto T1171;
+T1171:;
+	{object V458;
+	V458= (V443)->c.c_car;
+	V443= (V443)->c.c_cdr;
+	V457= (V458);}
+	V461= make_cons((V457),Cnil);
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[114]),((object)VV[7]),((object)VV[115]),(V461))));
+	goto T1168;
+	
+	goto T1169;
+T1169:;
+	goto T1168;
+T1168:;
+	{object V462;
+	object V463;
+	object V464;
+	object V465;
+	V462= STREF(object ,(V444),0);
+	V463= STREF(object ,(V444),16);
+	V464= STREF(object ,(V444),24);
+	V466= STREF(object ,(V444),0);
+	if(!(((V445))==(((object)VV[106])))){
+	goto T1184;
+	}
+	V467= ((object)VV[117]);
+	goto T1183;
+	
+	goto T1184;
+T1184:;
+	if(!(((V445))==(((object)VV[118])))){
+	goto T1187;
+	}
+	V467= ((object)VV[119]);
+	goto T1183;
+	
+	goto T1187;
+T1187:;
+	V467= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[76]),((object)VV[120]),(V445),((object)VV[121]),((object)VV[122])));
+	goto T1183;
+T1183:;
+	V468= list(3,(V467),(V463),(V462));
+	V465= (/* ANSI-LOOP::HIDE-VARIABLE-REFERENCE */(*LnkLI174)(Ct,(V466),(V468)));
+	V469= list(3,((object)VV[47]),(V463),(V446));
+	if(((V464))==Cnil){
+	goto T1191;
+	}
+	V470= list(3,((object)VV[123]),list(2,((object)VV[124]),(V464)),(V465));
+	goto T1190;
+	
+	goto T1191;
+T1191:;
+	V470= (V465);
+	goto T1190;
+T1190:;
+	{object V472;
+	object V473;
+	object V474;
+	if(((V464))==Cnil){
+	goto T1196;
+	}
+	V472= list(2,(V464),Ct);
+	goto T1195;
+	
+	goto T1196;
+T1196:;
+	V472= Cnil;
+	goto T1195;
+T1195:;
+	V473= list(2,(V462),(V463));
+	V474= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V472);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V473);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V475;
+	object V476;
+	V475= Cnil;
+	V476= Cnil;
+	if(((V472))==Cnil){
+	goto T1205;
+	}
+	{object V477;
+	V477= make_cons((V464),Cnil);
+	V475= (V477);
+	V476= (V475);}
+	{object V478;
+	V478= make_cons(Ct,Cnil);
+	(void)((((V476))->c.c_cdr=((V478)),((V476))));
+	V476= (V478);}
+	goto T1204;
+	
+	goto T1205;
+T1205:;
+	goto T1204;
+T1204:;
+	{object V479;
+	V479= V474->c.c_cdr;
+	{object V480;
+	V480= V479->c.c_car;
+	if(((V476))==Cnil){
+	goto T1220;
+	}
+	(void)((((V476))->c.c_cdr=((V480)),((V476))));
+	V476= (V480);
+	goto T1219;
+	
+	goto T1220;
+T1220:;
+	V475= (V480);
+	V476= (V475);
+	goto T1219;
+T1219:;}}
+	V471= (V475);}}
+	{object V481 = list(3,((object)VV[53]),(V469),list(3,((object)VV[46]),(V470),make_cons(((object)VV[47]),(V471))));
+	VMR20(V481);}}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-TEQUAL	*/
+
+static object LI21__LOOP_TEQUAL__loop(object V484,object V485)
+{	 VMB21 VMS21 VMV21
+	if(((V484))==Cnil){
+	goto T1228;
+	}
+	V486= tp5(V484);
+	switch(V486){
+	case 19:
+	goto T1233;
+T1233:;
+	goto T1227;
+	
+	default:
+	goto T1234;
+T1234:;
+	goto T1225;
+	}
+	goto T1225;
+	
+	goto T1228;
+T1228:;
+	goto T1227;
+T1227:;
+	{register object V487;
+	register object V488;
+	register fixnum V489;
+	register fixnum V490;
+	{fixnum V491;
+	V491= ((fixnum)V484);
+	V487= ((object*)V491)[(fixnum)3];}
+	V488= coerce_to_string((V485));
+	V492= tp4(V487);
+	switch(V492){
+	case 8:
+	goto T1245;
+T1245:;
+	{fixnum V494;
+	{fixnum V495;
+	V495= ((fixnum)V487);
+	V494= ((uchar*)V495)[(fixnum)2];}
+	V493= (V494&(fixnum)1);}
+	if(!((V493)==(0))){
+	goto T1247;
+	}
+	goto T1240;
+	
+	goto T1247;
+T1247:;
+	goto T1242;
+	
+	default:
+	goto T1246;
+T1246:;
+	goto T1240;
+	}
+	goto T1240;
+	
+	goto T1242;
+T1242:;
+	{fixnum V496;
+	{fixnum V497;
+	V497= ((fixnum)V487);
+	V496= ((uint*)V497)[(fixnum)4];}
+	V489= (V496&(fixnum)268435455);
+	goto T1239;
+	}
+	goto T1240;
+T1240:;
+	{fixnum V498;
+	{fixnum V499;
+	V499= ((fixnum)V487);
+	V498= ((uint*)V499)[(fixnum)1];}
+	V489= (V498>>(fixnum)4);}
+	goto T1239;
+T1239:;
+	V490= length((V488));
+	{register fixnum V500;
+	register fixnum V501;
+	V500= 0;
+	V501= 0;
+	goto T1261;
+T1261:;
+	if(!((V500)>=(V489))){
+	goto T1268;
+	}
+	goto T1267;
+	
+	goto T1268;
+T1268:;
+	if(!((V501)>=(V490))){
+	goto T1271;
+	}
+	goto T1267;
+	
+	goto T1271;
+T1271:;
+	{fixnum V502;
+	fixnum V503;
+	{fixnum V504;
+	V504= V500;
+	{fixnum V505;
+	{fixnum V506;
+	V506= ((fixnum)V487);
+	V505= ((fixnum*)V506)[(fixnum)1];}
+	V502= ((uchar*)V505)[V504];}}
+	{fixnum V507;
+	V507= V501;
+	{fixnum V508;
+	{fixnum V509;
+	V509= ((fixnum)V488);
+	V508= ((fixnum*)V509)[(fixnum)1];}
+	V503= ((uchar*)V508)[V507];}}
+	if(!((V502)==(V503))){
+	goto T1274;
+	}}
+	goto T1266;
+	
+	goto T1274;
+T1274:;
+	goto T1267;
+T1267:;
+	goto T1263;
+	
+	goto T1266;
+T1266:;
+	{fixnum V510;
+	fixnum V511;
+	{fixnum V512;
+	V512= V500;
+	{fixnum V513;
+	V513= (V512)+(1);
+	V510= V513;}}
+	{fixnum V514;
+	V514= V501;
+	{fixnum V515;
+	V515= (V514)+(1);
+	V511= V515;}}
+	V500= V510;
+	V501= V511;}
+	goto T1261;
+	
+	goto T1263;
+T1263:;
+	if(!((V500)>=(V489))){
+	goto T1296;
+	}
+	{object V516 = ((V501)>=(V490)?Ct:Cnil);
+	VMR21(V516);}
+	goto T1296;
+T1296:;
+	{object V517 = Cnil;
+	VMR21(V517);}}}
+	goto T1225;
+T1225:;
+	{object V518 = Cnil;
+	VMR21(V518);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-TASSOC	*/
+
+static object LI22__LOOP_TASSOC__loop(register object V521,object V522)
+{	 VMB22 VMS22 VMV22
+	if(((V521))==Cnil){
+	goto T1302;
+	}
+	V523= tp5(V521);
+	switch(V523){
+	case 19:
+	goto T1307;
+T1307:;
+	goto T1301;
+	
+	default:
+	goto T1308;
+T1308:;
+	goto T1299;
+	}
+	goto T1299;
+	
+	goto T1302;
+T1302:;
+	goto T1301;
+T1301:;
+	{register object V524;
+	V524= (V522);
+	goto T1317;
+T1317:;
+	if(((V524))==Cnil){
+	goto T1319;
+	}
+	{object V526;
+	V526= (V524)->c.c_car;
+	V527= tp2(V526);
+	if(!((V527)==(0))){
+	goto T1330;
+	}
+	goto T1329;
+	
+	goto T1330;
+T1330:;
+	goto T1328;
+	
+	goto T1329;
+T1329:;
+	goto T1325;
+	
+	goto T1328;
+T1328:;
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[76]),((object)VV[125]),(V526),((object)VV[126]),((object)VV[40]))));
+	goto T1324;
+	
+	goto T1325;
+T1325:;
+	goto T1324;
+T1324:;
+	if(((V526))==Cnil){
+	goto T1336;
+	}
+	{object V528;
+	V528= V526->c.c_car;
+	{register object V529;
+	register object V530;
+	register fixnum V531;
+	register fixnum V532;
+	{fixnum V533;
+	V533= ((fixnum)V521);
+	V529= ((object*)V533)[(fixnum)3];}
+	V530= coerce_to_string((V528));
+	V534= tp4(V529);
+	switch(V534){
+	case 8:
+	goto T1359;
+T1359:;
+	{fixnum V536;
+	{fixnum V537;
+	V537= ((fixnum)V529);
+	V536= ((uchar*)V537)[(fixnum)2];}
+	V535= (V536&(fixnum)1);}
+	if(!((V535)==(0))){
+	goto T1361;
+	}
+	goto T1354;
+	
+	goto T1361;
+T1361:;
+	goto T1356;
+	
+	default:
+	goto T1360;
+T1360:;
+	goto T1354;
+	}
+	goto T1354;
+	
+	goto T1356;
+T1356:;
+	{fixnum V538;
+	{fixnum V539;
+	V539= ((fixnum)V529);
+	V538= ((uint*)V539)[(fixnum)4];}
+	V531= (V538&(fixnum)268435455);
+	goto T1353;
+	}
+	goto T1354;
+T1354:;
+	{fixnum V540;
+	{fixnum V541;
+	V541= ((fixnum)V529);
+	V540= ((uint*)V541)[(fixnum)1];}
+	V531= (V540>>(fixnum)4);}
+	goto T1353;
+T1353:;
+	V532= length((V530));
+	{register fixnum V542;
+	register fixnum V543;
+	V542= 0;
+	V543= 0;
+	goto T1375;
+T1375:;
+	if(!((V542)>=(V531))){
+	goto T1382;
+	}
+	goto T1381;
+	
+	goto T1382;
+T1382:;
+	if(!((V543)>=(V532))){
+	goto T1385;
+	}
+	goto T1381;
+	
+	goto T1385;
+T1385:;
+	{fixnum V544;
+	fixnum V545;
+	{fixnum V546;
+	V546= V542;
+	{fixnum V547;
+	{fixnum V548;
+	V548= ((fixnum)V529);
+	V547= ((fixnum*)V548)[(fixnum)1];}
+	V544= ((uchar*)V547)[V546];}}
+	{fixnum V549;
+	V549= V543;
+	{fixnum V550;
+	{fixnum V551;
+	V551= ((fixnum)V530);
+	V550= ((fixnum*)V551)[(fixnum)1];}
+	V545= ((uchar*)V550)[V549];}}
+	if(!((V544)==(V545))){
+	goto T1388;
+	}}
+	goto T1380;
+	
+	goto T1388;
+T1388:;
+	goto T1381;
+T1381:;
+	goto T1377;
+	
+	goto T1380;
+T1380:;
+	{fixnum V552;
+	fixnum V553;
+	{fixnum V554;
+	V554= V542;
+	{fixnum V555;
+	V555= (V554)+(1);
+	V552= V555;}}
+	{fixnum V556;
+	V556= V543;
+	{fixnum V557;
+	V557= (V556)+(1);
+	V553= V557;}}
+	V542= V552;
+	V543= V553;}
+	goto T1375;
+	
+	goto T1377;
+T1377:;
+	if(!((V542)>=(V531))){
+	goto T1410;
+	}
+	if(!((V543)>=(V532))){
+	goto T1340;
+	}
+	goto T1341;
+	
+	goto T1410;
+T1410:;
+	goto T1340;
+	}}
+	goto T1341;
+T1341:;
+	goto T1335;
+	
+	goto T1340;
+T1340:;
+	goto T1333;
+	}
+	goto T1336;
+T1336:;
+	goto T1333;
+	
+	goto T1335;
+T1335:;
+	{object V558 = (V526);
+	VMR22(V558);}
+	goto T1333;
+T1333:;}
+	{object V559;
+	V559= (V524)->c.c_cdr;
+	V524= (V559);
+	goto T1317;
+	}
+	goto T1319;
+T1319:;
+	goto T1315;
+	}
+	goto T1315;
+T1315:;
+	if(((V522))==Cnil){
+	goto T1313;
+	}
+	goto T1310;
+	
+	goto T1313;
+T1313:;
+	{object V561 = Cnil;
+	VMR22(V561);}
+	goto T1310;
+T1310:;
+	{object V562 = Cnil;
+	VMR22(V562);}
+	goto T1299;
+T1299:;
+	{object V563 = Cnil;
+	VMR22(V563);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-TMEMBER	*/
+
+static object LI23__LOOP_TMEMBER__loop(register object V566,object V567)
+{	 VMB23 VMS23 VMV23
+	if(((V566))==Cnil){
+	goto T1419;
+	}
+	V568= tp5(V566);
+	switch(V568){
+	case 19:
+	goto T1424;
+T1424:;
+	goto T1418;
+	
+	default:
+	goto T1425;
+T1425:;
+	goto T1416;
+	}
+	goto T1416;
+	
+	goto T1419;
+T1419:;
+	goto T1418;
+T1418:;
+	{register object V569;
+	V569= (V567);
+	goto T1434;
+T1434:;
+	if(((V569))==Cnil){
+	goto T1436;
+	}
+	{object V571;
+	V571= (V569)->c.c_car;
+	{register object V572;
+	register object V573;
+	register fixnum V574;
+	register fixnum V575;
+	{fixnum V576;
+	V576= ((fixnum)V566);
+	V572= ((object*)V576)[(fixnum)3];}
+	V573= coerce_to_string((V571));
+	V577= tp4(V572);
+	switch(V577){
+	case 8:
+	goto T1455;
+T1455:;
+	{fixnum V579;
+	{fixnum V580;
+	V580= ((fixnum)V572);
+	V579= ((uchar*)V580)[(fixnum)2];}
+	V578= (V579&(fixnum)1);}
+	if(!((V578)==(0))){
+	goto T1457;
+	}
+	goto T1450;
+	
+	goto T1457;
+T1457:;
+	goto T1452;
+	
+	default:
+	goto T1456;
+T1456:;
+	goto T1450;
+	}
+	goto T1450;
+	
+	goto T1452;
+T1452:;
+	{fixnum V581;
+	{fixnum V582;
+	V582= ((fixnum)V572);
+	V581= ((uint*)V582)[(fixnum)4];}
+	V574= (V581&(fixnum)268435455);
+	goto T1449;
+	}
+	goto T1450;
+T1450:;
+	{fixnum V583;
+	{fixnum V584;
+	V584= ((fixnum)V572);
+	V583= ((uint*)V584)[(fixnum)1];}
+	V574= (V583>>(fixnum)4);}
+	goto T1449;
+T1449:;
+	V575= length((V573));
+	{register fixnum V585;
+	register fixnum V586;
+	V585= 0;
+	V586= 0;
+	goto T1471;
+T1471:;
+	if(!((V585)>=(V574))){
+	goto T1478;
+	}
+	goto T1477;
+	
+	goto T1478;
+T1478:;
+	if(!((V586)>=(V575))){
+	goto T1481;
+	}
+	goto T1477;
+	
+	goto T1481;
+T1481:;
+	{fixnum V587;
+	fixnum V588;
+	{fixnum V589;
+	V589= V585;
+	{fixnum V590;
+	{fixnum V591;
+	V591= ((fixnum)V572);
+	V590= ((fixnum*)V591)[(fixnum)1];}
+	V587= ((uchar*)V590)[V589];}}
+	{fixnum V592;
+	V592= V586;
+	{fixnum V593;
+	{fixnum V594;
+	V594= ((fixnum)V573);
+	V593= ((fixnum*)V594)[(fixnum)1];}
+	V588= ((uchar*)V593)[V592];}}
+	if(!((V587)==(V588))){
+	goto T1484;
+	}}
+	goto T1476;
+	
+	goto T1484;
+T1484:;
+	goto T1477;
+T1477:;
+	goto T1473;
+	
+	goto T1476;
+T1476:;
+	{fixnum V595;
+	fixnum V596;
+	{fixnum V597;
+	V597= V585;
+	{fixnum V598;
+	V598= (V597)+(1);
+	V595= V598;}}
+	{fixnum V599;
+	V599= V586;
+	{fixnum V600;
+	V600= (V599)+(1);
+	V596= V600;}}
+	V585= V595;
+	V586= V596;}
+	goto T1471;
+	
+	goto T1473;
+T1473:;
+	if(!((V585)>=(V574))){
+	goto T1506;
+	}
+	if(!((V586)>=(V575))){
+	goto T1444;
+	}
+	goto T1445;
+	
+	goto T1506;
+T1506:;
+	goto T1444;
+	}}
+	goto T1445;
+T1445:;
+	goto T1442;
+	
+	goto T1444;
+T1444:;
+	goto T1440;
+	}
+	goto T1442;
+T1442:;
+	{object V601 = (V569);
+	VMR23(V601);}
+	goto T1440;
+T1440:;
+	{object V602;
+	V602= (V569)->c.c_cdr;
+	V569= (V602);
+	goto T1434;
+	}
+	goto T1436;
+T1436:;
+	goto T1432;
+	}
+	goto T1432;
+T1432:;
+	if(((V567))==Cnil){
+	goto T1430;
+	}
+	goto T1427;
+	
+	goto T1430;
+T1430:;
+	{object V604 = Cnil;
+	VMR23(V604);}
+	goto T1427;
+T1427:;
+	{object V605 = Cnil;
+	VMR23(V605);}
+	goto T1416;
+T1416:;
+	{object V606 = Cnil;
+	VMR23(V606);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-LOOKUP-KEYWORD	*/
+
+static object LI24__LOOP_LOOKUP_KEYWORD__loop(object V609,object V610)
+{	 VMB24 VMS24 VMV24
+	if(((V609))==Cnil){
+	goto T1515;
+	}
+	V611= tp5(V609);
+	switch(V611){
+	case 19:
+	goto T1520;
+T1520:;
+	goto T1514;
+	
+	default:
+	goto T1521;
+T1521:;
+	goto T1512;
+	}
+	goto T1512;
+	
+	goto T1515;
+T1515:;
+	goto T1514;
+T1514:;
+	{object V612;
+	{fixnum V613;
+	V613= ((fixnum)V609);
+	V612= ((object*)V613)[(fixnum)3];}
+	{fixnum V614;
+	V614= (fcall.fun=((object)VV[127])->s.s_gfdef,/* SYSTEM::GETHASH-INT */(*LnkLI175)((V612),(V610)));
+	V615= ((fixnum*)V614)[(fixnum)0];
+	if(!((0)==(V615))){
+	goto T1526;
+	}
+	{object V616 = ({object  _t0=Cnil;object  _t1=Cnil;
+	(void)((_t1));_t0;});
+	VMR24(V616);}
+	goto T1526;
+T1526:;
+	V617= ((object*)V614)[(fixnum)1];
+	{object V618 = ({object  _t0=(V617);object  _t1=Ct;
+	(void)((_t1));_t0;});
+	VMR24(V618);}}}
+	goto T1512;
+T1512:;
+	{object V619 = Cnil;
+	VMR24(V619);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-STORE-TABLE-DATA	*/
+
+static object LI25__LOOP_STORE_TABLE_DATA__loop(object V622,object V623)
+{	 VMB25 VMS25 VMV25
+	{register object V624;
+	object V625;
+	object V626;
+	object V627;
+	V624= V622->c.c_cdr;
+	if(((V624))==Cnil){
+	goto T1533;
+	}
+	{object V628;
+	V628= V624->c.c_car;
+	V624= V624->c.c_cdr;
+	V625= (V628);
+	goto T1532;
+	}
+	goto T1533;
+T1533:;
+	V629= make_cons(((object)VV[128]),Cnil);
+	V625= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[129]),((object)VV[4]),((object)VV[130]),(V629)));
+	goto T1532;
+T1532:;
+	if(((V624))==Cnil){
+	goto T1540;
+	}
+	{object V630;
+	V630= (V624)->c.c_car;
+	V624= (V624)->c.c_cdr;
+	V626= (V630);
+	goto T1539;
+	}
+	goto T1540;
+T1540:;
+	V633= make_cons(((object)VV[131]),Cnil);
+	V626= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[132]),((object)VV[4]),((object)VV[133]),(V633)));
+	goto T1539;
+T1539:;
+	if(((V624))==Cnil){
+	goto T1547;
+	}
+	{object V634;
+	V634= (V624)->c.c_car;
+	V624= (V624)->c.c_cdr;
+	V627= (V634);
+	goto T1546;
+	}
+	goto T1547;
+T1547:;
+	V637= make_cons(((object)VV[134]),Cnil);
+	V627= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[135]),((object)VV[4]),((object)VV[136]),(V637)));
+	goto T1546;
+T1546:;
+	if(((V624))==Cnil){
+	goto T1557;
+	}
+	goto T1556;
+	
+	goto T1557;
+T1557:;
+	goto T1554;
+	
+	goto T1556;
+T1556:;
+	{object V639;
+	V639= (V624)->c.c_car;
+	V624= (V624)->c.c_cdr;
+	V638= (V639);}
+	V642= make_cons((V638),Cnil);
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[137]),((object)VV[7]),((object)VV[138]),(V642))));
+	goto T1553;
+	
+	goto T1554;
+T1554:;
+	goto T1553;
+T1553:;
+	{object V643 = list(3,((object)VV[44]),list(3,((object)VV[139]),list(2,((object)VV[140]),(V625)),(V626)),(V627));
+	VMR25(V643);}}
+}
+/*	local entry for function ANSI-LOOP::MAKE-LOOP-UNIVERSE	*/
+
+static object LI26__MAKE_LOOP_UNIVERSE__loop(object V645,...)
+{	 VMB26 VMS26 VMV26
+	va_list ap;
+	va_start(ap,V645);
+	{register object V646;
+	object V647;
+	register object V648;
+	object V649;
+	register object V650;
+	object V651;
+	register object V652;
+	object V653;
+	register object V654;
+	object V655;
+	register object V656;
+	object V657;
+	register object V658;
+	object V659;
+	register object V660;
+	object V661;
+	register object V662;
+	register object V663;
+	int8_t V664;
+	register int8_t V665;
+	register object V666;
+	register object V667;
+	object V668;
+	register object V669;
+	object V670;
+	object V671;
+	object V672;
+	object V673;
+	object V674;
+	object V675;
+	object V676;
+	object V677;
+	object V678;
+	object V679;
+	V646= Cnil;
+	V647= Cnil;
+	V648= Cnil;
+	V649= Cnil;
+	V650= Cnil;
+	V651= Cnil;
+	V652= Cnil;
+	V653= Cnil;
+	V654= Cnil;
+	V655= Cnil;
+	V656= Cnil;
+	V657= Cnil;
+	V658= Cnil;
+	V659= Cnil;
+	V660= Cnil;
+	V661= Cnil;
+	V662= Ct;
+	V663= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V663))==Cnil){
+	goto T1565;
+	}
+	V664= -((char)fcall.argd);
+	goto T1564;
+	
+	goto T1565;
+T1565:;
+	V664= fcall.argd;
+	goto T1564;
+T1564:;
+	V665= (V664)-(0);
+	V666= Cnil;
+	V667= Cnil;
+	V668= Cnil;
+	V669= Cnil;
+	V670= Cnil;
+	V671= Cnil;
+	{register object V680;
+	register object V681;
+	V680= Cnil;
+	V681= Cnil;
+	goto T1572;
+T1572:;
+	{object V682;
+	if(((V663))==Cnil){
+	goto T1582;
+	}
+	if(!((V665)==(1))){
+	goto T1585;
+	}
+	V665= 0;
+	if(((V662))==Cnil){
+	goto T1591;
+	}
+	V662= Cnil;
+	V666= (V645);
+	goto T1588;
+	
+	goto T1591;
+T1591:;
+	V666= va_arg(ap,object);
+	goto T1588;
+T1588:;
+	V682= (V666);
+	goto T1581;
+	
+	goto T1585;
+T1585:;
+	V682= Cnil;
+	goto T1581;
+	
+	goto T1582;
+T1582:;
+	V682= Cnil;
+	goto T1581;
+T1581:;
+	if(((V682))==Cnil){
+	goto T1596;
+	}
+	goto T1580;
+	
+	goto T1596;
+T1596:;
+	{object V683;
+	V683= ((V665)>(0)?Ct:Cnil);
+	if(((V683))==Cnil){
+	goto T1600;
+	}
+	goto T1580;
+	
+	goto T1600;
+T1600:;
+	if(((V666))==Cnil){
+	goto T1603;
+	}
+	goto T1580;
+	
+	goto T1603;
+T1603:;
+	goto T1579;
+	}}
+	goto T1580;
+T1580:;
+	goto T1577;
+	
+	goto T1579;
+T1579:;
+	goto T1574;
+	
+	goto T1577;
+T1577:;
+	if(((V663))==Cnil){
+	goto T1609;
+	}
+	if(!((V665)==(1))){
+	goto T1612;
+	}
+	V665= 0;
+	if(((V662))==Cnil){
+	goto T1621;
+	}
+	V662= Cnil;
+	V666= (V645);
+	goto T1618;
+	
+	goto T1621;
+T1621:;
+	V666= va_arg(ap,object);
+	goto T1618;
+T1618:;
+	if(((V666))==Cnil){
+	goto T1615;
+	}
+	goto T1608;
+	
+	goto T1615;
+T1615:;
+	goto T1608;
+	
+	goto T1612;
+T1612:;
+	goto T1608;
+	
+	goto T1609;
+T1609:;
+	goto T1608;
+T1608:;
+	if(!((V665)>(0))){
+	goto T1626;
+	}
+	V665= (V665)-(1);
+	if(((V662))==Cnil){
+	goto T1631;
+	}
+	V662= Cnil;
+	V680= (V645);
+	goto T1607;
+	
+	goto T1631;
+T1631:;
+	V680= va_arg(ap,object);
+	goto T1607;
+	
+	goto T1626;
+T1626:;
+	if(((V666))==Cnil){
+	goto T1636;
+	}
+	{object V684;
+	V684= (V666)->c.c_car;
+	V666= (V666)->c.c_cdr;
+	V680= (V684);
+	goto T1607;
+	}
+	goto T1636;
+T1636:;
+	V680= Cnil;
+	goto T1607;
+T1607:;
+	if(((V663))==Cnil){
+	goto T1644;
+	}
+	if(!((V665)==(1))){
+	goto T1647;
+	}
+	V665= 0;
+	if(((V662))==Cnil){
+	goto T1656;
+	}
+	V662= Cnil;
+	V666= (V645);
+	goto T1653;
+	
+	goto T1656;
+T1656:;
+	V666= va_arg(ap,object);
+	goto T1653;
+T1653:;
+	if(((V666))==Cnil){
+	goto T1650;
+	}
+	goto T1643;
+	
+	goto T1650;
+T1650:;
+	goto T1643;
+	
+	goto T1647;
+T1647:;
+	goto T1643;
+	
+	goto T1644;
+T1644:;
+	goto T1643;
+T1643:;
+	if(!((V665)>(0))){
+	goto T1661;
+	}
+	V665= (V665)-(1);
+	if(((V662))==Cnil){
+	goto T1666;
+	}
+	V662= Cnil;
+	V681= (V645);
+	goto T1642;
+	
+	goto T1666;
+T1666:;
+	V681= va_arg(ap,object);
+	goto T1642;
+	
+	goto T1661;
+T1661:;
+	if(((V666))==Cnil){
+	goto T1671;
+	}
+	{object V687;
+	V687= (V666)->c.c_car;
+	V666= (V666)->c.c_cdr;
+	V681= (V687);
+	goto T1642;
+	}
+	goto T1671;
+T1671:;
+	V690= make_cons((V680),Cnil);
+	V681= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[141]),((object)VV[59]),((object)VV[142]),(V690)));
+	goto T1642;
+T1642:;
+	if(!(((V680))==(((object)VV[143])))){
+	goto T1678;
+	}
+	if(((V646))==Cnil){
+	goto T1684;
+	}
+	goto T1681;
+	
+	goto T1684;
+T1684:;
+	V647= (V681);
+	V646= Ct;
+	goto T1677;
+	
+	goto T1681;
+T1681:;
+	goto T1677;
+	
+	goto T1678;
+T1678:;
+	if(!(((V680))==(((object)VV[144])))){
+	goto T1689;
+	}
+	if(((V648))==Cnil){
+	goto T1695;
+	}
+	goto T1692;
+	
+	goto T1695;
+T1695:;
+	V649= (V681);
+	V648= Ct;
+	goto T1677;
+	
+	goto T1692;
+T1692:;
+	goto T1677;
+	
+	goto T1689;
+T1689:;
+	if(!(((V680))==(((object)VV[145])))){
+	goto T1700;
+	}
+	if(((V650))==Cnil){
+	goto T1706;
+	}
+	goto T1703;
+	
+	goto T1706;
+T1706:;
+	V651= (V681);
+	V650= Ct;
+	goto T1677;
+	
+	goto T1703;
+T1703:;
+	goto T1677;
+	
+	goto T1700;
+T1700:;
+	if(!(((V680))==(((object)VV[146])))){
+	goto T1711;
+	}
+	if(((V652))==Cnil){
+	goto T1717;
+	}
+	goto T1714;
+	
+	goto T1717;
+T1717:;
+	V653= (V681);
+	V652= Ct;
+	goto T1677;
+	
+	goto T1714;
+T1714:;
+	goto T1677;
+	
+	goto T1711;
+T1711:;
+	if(!(((V680))==(((object)VV[147])))){
+	goto T1722;
+	}
+	if(((V654))==Cnil){
+	goto T1728;
+	}
+	goto T1725;
+	
+	goto T1728;
+T1728:;
+	V655= (V681);
+	V654= Ct;
+	goto T1677;
+	
+	goto T1725;
+T1725:;
+	goto T1677;
+	
+	goto T1722;
+T1722:;
+	if(!(((V680))==(((object)VV[148])))){
+	goto T1733;
+	}
+	if(((V656))==Cnil){
+	goto T1739;
+	}
+	goto T1736;
+	
+	goto T1739;
+T1739:;
+	V657= (V681);
+	V656= Ct;
+	goto T1677;
+	
+	goto T1736;
+T1736:;
+	goto T1677;
+	
+	goto T1733;
+T1733:;
+	if(!(((V680))==(((object)VV[149])))){
+	goto T1744;
+	}
+	if(((V658))==Cnil){
+	goto T1750;
+	}
+	goto T1747;
+	
+	goto T1750;
+T1750:;
+	V659= (V681);
+	V658= Ct;
+	goto T1677;
+	
+	goto T1747;
+T1747:;
+	goto T1677;
+	
+	goto T1744;
+T1744:;
+	if(!(((V680))==(((object)VV[150])))){
+	goto T1755;
+	}
+	if(((V660))==Cnil){
+	goto T1761;
+	}
+	goto T1758;
+	
+	goto T1761;
+T1761:;
+	V661= (V681);
+	V660= Ct;
+	goto T1677;
+	
+	goto T1758;
+T1758:;
+	goto T1677;
+	
+	goto T1755;
+T1755:;
+	if(!(((V680))==(((object)VV[67])))){
+	goto T1766;
+	}
+	if(((V667))==Cnil){
+	goto T1772;
+	}
+	goto T1769;
+	
+	goto T1772;
+T1772:;
+	V668= (V681);
+	V667= Ct;
+	goto T1677;
+	
+	goto T1769;
+T1769:;
+	goto T1677;
+	
+	goto T1766;
+T1766:;
+	if(((V669))==Cnil){
+	goto T1780;
+	}
+	goto T1777;
+	
+	goto T1780;
+T1780:;
+	V670= (V681);
+	V669= Ct;
+	V671= (V680);
+	goto T1677;
+	
+	goto T1777;
+T1777:;
+	goto T1677;
+T1677:;
+	goto T1572;
+	
+	goto T1574;
+T1574:;
+	goto T1570;
+	}
+	goto T1570;
+T1570:;
+	if(((V646))==Cnil){
+	goto T1789;
+	}
+	V672= (V647);
+	goto T1569;
+	
+	goto T1789;
+T1789:;
+	V672= Cnil;
+	goto T1569;
+T1569:;
+	if(((V648))==Cnil){
+	goto T1793;
+	}
+	V673= (V649);
+	goto T1792;
+	
+	goto T1793;
+T1793:;
+	V673= Cnil;
+	goto T1792;
+T1792:;
+	if(((V650))==Cnil){
+	goto T1797;
+	}
+	V674= (V651);
+	goto T1796;
+	
+	goto T1797;
+T1797:;
+	V674= Cnil;
+	goto T1796;
+T1796:;
+	if(((V652))==Cnil){
+	goto T1801;
+	}
+	V675= (V653);
+	goto T1800;
+	
+	goto T1801;
+T1801:;
+	V675= Cnil;
+	goto T1800;
+T1800:;
+	if(((V654))==Cnil){
+	goto T1805;
+	}
+	V676= (V655);
+	goto T1804;
+	
+	goto T1805;
+T1805:;
+	V676= Cnil;
+	goto T1804;
+T1804:;
+	if(((V656))==Cnil){
+	goto T1809;
+	}
+	V677= (V657);
+	goto T1808;
+	
+	goto T1809;
+T1809:;
+	V677= Cnil;
+	goto T1808;
+T1808:;
+	if(((V658))==Cnil){
+	goto T1813;
+	}
+	V678= (V659);
+	goto T1812;
+	
+	goto T1813;
+T1813:;
+	V678= Cnil;
+	goto T1812;
+T1812:;
+	if(((V660))==Cnil){
+	goto T1817;
+	}
+	V679= (V661);
+	goto T1816;
+	
+	goto T1817;
+T1817:;
+	V679= Cnil;
+	goto T1816;
+T1816:;
+	if(((V668))==Cnil){
+	goto T1824;
+	}
+	goto T1821;
+	
+	goto T1824;
+T1824:;
+	if(((V669))==Cnil){
+	goto T1826;
+	}
+	V691= list(2,(V671),(V670));
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[151]),((object)VV[69]),((object)VV[152]),(V691))));
+	goto T1820;
+	
+	goto T1826;
+T1826:;
+	goto T1820;
+	
+	goto T1821;
+T1821:;
+	goto T1820;
+T1820:;
+	{object V692 = (fcall.fun=((object)VV[71])->s.s_gfdef,fcall.argd=9,/* SYSTEM::MAKE-STRUCTURE */(*LnkLI164)(((object)VV[153]),(V672),(V673),(V674),(V675),(V676),(V677),(V678),(V679)));
+	VMR26(V692);}}
+	va_end(ap);
+}
+/*	local entry for function ANSI-LOOP::LOOP-UNIVERSE-KEYWORDS	*/
+
+static object LI27__LOOP_UNIVERSE_KEYWORDS__loop(object V694)
+{	 VMB27 VMS27 VMV27
+	V695= tp6(V694);
+	if(!((V695)==((fixnum)544))){
+	goto T1839;
+	}
+	goto T1838;
+	
+	goto T1839;
+T1839:;
+	goto T1836;
+	
+	goto T1838;
+T1838:;
+	{object V696;
+	{fixnum V697;
+	V697= ((fixnum)V694);
+	V696= ((object*)V697)[(fixnum)1];}
+	{fixnum V699;
+	{fixnum V700;
+	V700= ((fixnum)V696);
+	V699= ((fixnum*)V700)[(fixnum)2];}
+	V698= ((object*)V699)[(fixnum)0];}
+	if(!(((V698))==(((object)VV[153])))){
+	goto T1844;
+	}
+	goto T1835;
+	
+	goto T1844;
+T1844:;
+	{register object V701;
+	{fixnum V702;
+	{fixnum V703;
+	V703= ((fixnum)V696);
+	V702= ((fixnum*)V703)[(fixnum)2];}
+	V701= ((object*)V702)[(fixnum)4];}
+	goto T1854;
+T1854:;
+	if(((V701))==Cnil){
+	goto T1856;
+	}
+	{fixnum V706;
+	{fixnum V707;
+	V707= ((fixnum)(V701));
+	V706= ((fixnum*)V707)[(fixnum)2];}
+	V704= ((object*)V706)[(fixnum)0];}
+	if(!(((V704))==(((object)VV[153])))){
+	goto T1858;
+	}
+	goto T1835;
+	
+	goto T1858;
+T1858:;
+	{object V708;
+	{fixnum V710;
+	{fixnum V711;
+	V711= ((fixnum)(V701));
+	V710= ((fixnum*)V711)[(fixnum)2];}
+	V708= ((object*)V710)[(fixnum)4];}
+	V701= (V708);
+	goto T1854;
+	}
+	goto T1856;
+T1856:;
+	goto T1834;
+	}}
+	goto T1836;
+T1836:;
+	goto T1834;
+	
+	goto T1835;
+T1835:;
+	goto T1833;
+	
+	goto T1834;
+T1834:;
+	goto T1831;
+	
+	goto T1833;
+T1833:;
+	goto T1830;
+	
+	goto T1831;
+T1831:;
+	V694= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V694),((object)VV[153]),Cnil));
+	goto T1830;
+T1830:;
+	{object V712 = STREF(object ,(V694),0);
+	VMR27(V712);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-UNIVERSE-ITERATION-KEYWORDS	*/
+
+static object LI28__LOOP_UNIVERSE_ITERATION_KEYWORDS__loop(object V714)
+{	 VMB28 VMS28 VMV28
+	V715= tp6(V714);
+	if(!((V715)==((fixnum)544))){
+	goto T1880;
+	}
+	goto T1879;
+	
+	goto T1880;
+T1880:;
+	goto T1877;
+	
+	goto T1879;
+T1879:;
+	{object V716;
+	{fixnum V717;
+	V717= ((fixnum)V714);
+	V716= ((object*)V717)[(fixnum)1];}
+	{fixnum V719;
+	{fixnum V720;
+	V720= ((fixnum)V716);
+	V719= ((fixnum*)V720)[(fixnum)2];}
+	V718= ((object*)V719)[(fixnum)0];}
+	if(!(((V718))==(((object)VV[153])))){
+	goto T1885;
+	}
+	goto T1876;
+	
+	goto T1885;
+T1885:;
+	{register object V721;
+	{fixnum V722;
+	{fixnum V723;
+	V723= ((fixnum)V716);
+	V722= ((fixnum*)V723)[(fixnum)2];}
+	V721= ((object*)V722)[(fixnum)4];}
+	goto T1895;
+T1895:;
+	if(((V721))==Cnil){
+	goto T1897;
+	}
+	{fixnum V726;
+	{fixnum V727;
+	V727= ((fixnum)(V721));
+	V726= ((fixnum*)V727)[(fixnum)2];}
+	V724= ((object*)V726)[(fixnum)0];}
+	if(!(((V724))==(((object)VV[153])))){
+	goto T1899;
+	}
+	goto T1876;
+	
+	goto T1899;
+T1899:;
+	{object V728;
+	{fixnum V730;
+	{fixnum V731;
+	V731= ((fixnum)(V721));
+	V730= ((fixnum*)V731)[(fixnum)2];}
+	V728= ((object*)V730)[(fixnum)4];}
+	V721= (V728);
+	goto T1895;
+	}
+	goto T1897;
+T1897:;
+	goto T1875;
+	}}
+	goto T1877;
+T1877:;
+	goto T1875;
+	
+	goto T1876;
+T1876:;
+	goto T1874;
+	
+	goto T1875;
+T1875:;
+	goto T1872;
+	
+	goto T1874;
+T1874:;
+	goto T1871;
+	
+	goto T1872;
+T1872:;
+	V714= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V714),((object)VV[153]),Cnil));
+	goto T1871;
+T1871:;
+	{object V732 = STREF(object ,(V714),8);
+	VMR28(V732);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-UNIVERSE-FOR-KEYWORDS	*/
+
+static object LI29__LOOP_UNIVERSE_FOR_KEYWORDS__loop(object V734)
+{	 VMB29 VMS29 VMV29
+	V735= tp6(V734);
+	if(!((V735)==((fixnum)544))){
+	goto T1921;
+	}
+	goto T1920;
+	
+	goto T1921;
+T1921:;
+	goto T1918;
+	
+	goto T1920;
+T1920:;
+	{object V736;
+	{fixnum V737;
+	V737= ((fixnum)V734);
+	V736= ((object*)V737)[(fixnum)1];}
+	{fixnum V739;
+	{fixnum V740;
+	V740= ((fixnum)V736);
+	V739= ((fixnum*)V740)[(fixnum)2];}
+	V738= ((object*)V739)[(fixnum)0];}
+	if(!(((V738))==(((object)VV[153])))){
+	goto T1926;
+	}
+	goto T1917;
+	
+	goto T1926;
+T1926:;
+	{register object V741;
+	{fixnum V742;
+	{fixnum V743;
+	V743= ((fixnum)V736);
+	V742= ((fixnum*)V743)[(fixnum)2];}
+	V741= ((object*)V742)[(fixnum)4];}
+	goto T1936;
+T1936:;
+	if(((V741))==Cnil){
+	goto T1938;
+	}
+	{fixnum V746;
+	{fixnum V747;
+	V747= ((fixnum)(V741));
+	V746= ((fixnum*)V747)[(fixnum)2];}
+	V744= ((object*)V746)[(fixnum)0];}
+	if(!(((V744))==(((object)VV[153])))){
+	goto T1940;
+	}
+	goto T1917;
+	
+	goto T1940;
+T1940:;
+	{object V748;
+	{fixnum V750;
+	{fixnum V751;
+	V751= ((fixnum)(V741));
+	V750= ((fixnum*)V751)[(fixnum)2];}
+	V748= ((object*)V750)[(fixnum)4];}
+	V741= (V748);
+	goto T1936;
+	}
+	goto T1938;
+T1938:;
+	goto T1916;
+	}}
+	goto T1918;
+T1918:;
+	goto T1916;
+	
+	goto T1917;
+T1917:;
+	goto T1915;
+	
+	goto T1916;
+T1916:;
+	goto T1913;
+	
+	goto T1915;
+T1915:;
+	goto T1912;
+	
+	goto T1913;
+T1913:;
+	V734= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V734),((object)VV[153]),Cnil));
+	goto T1912;
+T1912:;
+	{object V752 = STREF(object ,(V734),16);
+	VMR29(V752);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-UNIVERSE-PATH-KEYWORDS	*/
+
+static object LI30__LOOP_UNIVERSE_PATH_KEYWORDS__loop(object V754)
+{	 VMB30 VMS30 VMV30
+	V755= tp6(V754);
+	if(!((V755)==((fixnum)544))){
+	goto T1962;
+	}
+	goto T1961;
+	
+	goto T1962;
+T1962:;
+	goto T1959;
+	
+	goto T1961;
+T1961:;
+	{object V756;
+	{fixnum V757;
+	V757= ((fixnum)V754);
+	V756= ((object*)V757)[(fixnum)1];}
+	{fixnum V759;
+	{fixnum V760;
+	V760= ((fixnum)V756);
+	V759= ((fixnum*)V760)[(fixnum)2];}
+	V758= ((object*)V759)[(fixnum)0];}
+	if(!(((V758))==(((object)VV[153])))){
+	goto T1967;
+	}
+	goto T1958;
+	
+	goto T1967;
+T1967:;
+	{register object V761;
+	{fixnum V762;
+	{fixnum V763;
+	V763= ((fixnum)V756);
+	V762= ((fixnum*)V763)[(fixnum)2];}
+	V761= ((object*)V762)[(fixnum)4];}
+	goto T1977;
+T1977:;
+	if(((V761))==Cnil){
+	goto T1979;
+	}
+	{fixnum V766;
+	{fixnum V767;
+	V767= ((fixnum)(V761));
+	V766= ((fixnum*)V767)[(fixnum)2];}
+	V764= ((object*)V766)[(fixnum)0];}
+	if(!(((V764))==(((object)VV[153])))){
+	goto T1981;
+	}
+	goto T1958;
+	
+	goto T1981;
+T1981:;
+	{object V768;
+	{fixnum V770;
+	{fixnum V771;
+	V771= ((fixnum)(V761));
+	V770= ((fixnum*)V771)[(fixnum)2];}
+	V768= ((object*)V770)[(fixnum)4];}
+	V761= (V768);
+	goto T1977;
+	}
+	goto T1979;
+T1979:;
+	goto T1957;
+	}}
+	goto T1959;
+T1959:;
+	goto T1957;
+	
+	goto T1958;
+T1958:;
+	goto T1956;
+	
+	goto T1957;
+T1957:;
+	goto T1954;
+	
+	goto T1956;
+T1956:;
+	goto T1953;
+	
+	goto T1954;
+T1954:;
+	V754= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V754),((object)VV[153]),Cnil));
+	goto T1953;
+T1953:;
+	{object V772 = STREF(object ,(V754),24);
+	VMR30(V772);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-UNIVERSE-TYPE-SYMBOLS	*/
+
+static object LI31__LOOP_UNIVERSE_TYPE_SYMBOLS__loop(object V774)
+{	 VMB31 VMS31 VMV31
+	V775= tp6(V774);
+	if(!((V775)==((fixnum)544))){
+	goto T2003;
+	}
+	goto T2002;
+	
+	goto T2003;
+T2003:;
+	goto T2000;
+	
+	goto T2002;
+T2002:;
+	{object V776;
+	{fixnum V777;
+	V777= ((fixnum)V774);
+	V776= ((object*)V777)[(fixnum)1];}
+	{fixnum V779;
+	{fixnum V780;
+	V780= ((fixnum)V776);
+	V779= ((fixnum*)V780)[(fixnum)2];}
+	V778= ((object*)V779)[(fixnum)0];}
+	if(!(((V778))==(((object)VV[153])))){
+	goto T2008;
+	}
+	goto T1999;
+	
+	goto T2008;
+T2008:;
+	{register object V781;
+	{fixnum V782;
+	{fixnum V783;
+	V783= ((fixnum)V776);
+	V782= ((fixnum*)V783)[(fixnum)2];}
+	V781= ((object*)V782)[(fixnum)4];}
+	goto T2018;
+T2018:;
+	if(((V781))==Cnil){
+	goto T2020;
+	}
+	{fixnum V786;
+	{fixnum V787;
+	V787= ((fixnum)(V781));
+	V786= ((fixnum*)V787)[(fixnum)2];}
+	V784= ((object*)V786)[(fixnum)0];}
+	if(!(((V784))==(((object)VV[153])))){
+	goto T2022;
+	}
+	goto T1999;
+	
+	goto T2022;
+T2022:;
+	{object V788;
+	{fixnum V790;
+	{fixnum V791;
+	V791= ((fixnum)(V781));
+	V790= ((fixnum*)V791)[(fixnum)2];}
+	V788= ((object*)V790)[(fixnum)4];}
+	V781= (V788);
+	goto T2018;
+	}
+	goto T2020;
+T2020:;
+	goto T1998;
+	}}
+	goto T2000;
+T2000:;
+	goto T1998;
+	
+	goto T1999;
+T1999:;
+	goto T1997;
+	
+	goto T1998;
+T1998:;
+	goto T1995;
+	
+	goto T1997;
+T1997:;
+	goto T1994;
+	
+	goto T1995;
+T1995:;
+	V774= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V774),((object)VV[153]),Cnil));
+	goto T1994;
+T1994:;
+	{object V792 = STREF(object ,(V774),32);
+	VMR31(V792);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-UNIVERSE-TYPE-KEYWORDS	*/
+
+static object LI32__LOOP_UNIVERSE_TYPE_KEYWORDS__loop(object V794)
+{	 VMB32 VMS32 VMV32
+	V795= tp6(V794);
+	if(!((V795)==((fixnum)544))){
+	goto T2044;
+	}
+	goto T2043;
+	
+	goto T2044;
+T2044:;
+	goto T2041;
+	
+	goto T2043;
+T2043:;
+	{object V796;
+	{fixnum V797;
+	V797= ((fixnum)V794);
+	V796= ((object*)V797)[(fixnum)1];}
+	{fixnum V799;
+	{fixnum V800;
+	V800= ((fixnum)V796);
+	V799= ((fixnum*)V800)[(fixnum)2];}
+	V798= ((object*)V799)[(fixnum)0];}
+	if(!(((V798))==(((object)VV[153])))){
+	goto T2049;
+	}
+	goto T2040;
+	
+	goto T2049;
+T2049:;
+	{register object V801;
+	{fixnum V802;
+	{fixnum V803;
+	V803= ((fixnum)V796);
+	V802= ((fixnum*)V803)[(fixnum)2];}
+	V801= ((object*)V802)[(fixnum)4];}
+	goto T2059;
+T2059:;
+	if(((V801))==Cnil){
+	goto T2061;
+	}
+	{fixnum V806;
+	{fixnum V807;
+	V807= ((fixnum)(V801));
+	V806= ((fixnum*)V807)[(fixnum)2];}
+	V804= ((object*)V806)[(fixnum)0];}
+	if(!(((V804))==(((object)VV[153])))){
+	goto T2063;
+	}
+	goto T2040;
+	
+	goto T2063;
+T2063:;
+	{object V808;
+	{fixnum V810;
+	{fixnum V811;
+	V811= ((fixnum)(V801));
+	V810= ((fixnum*)V811)[(fixnum)2];}
+	V808= ((object*)V810)[(fixnum)4];}
+	V801= (V808);
+	goto T2059;
+	}
+	goto T2061;
+T2061:;
+	goto T2039;
+	}}
+	goto T2041;
+T2041:;
+	goto T2039;
+	
+	goto T2040;
+T2040:;
+	goto T2038;
+	
+	goto T2039;
+T2039:;
+	goto T2036;
+	
+	goto T2038;
+T2038:;
+	goto T2035;
+	
+	goto T2036;
+T2036:;
+	V794= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V794),((object)VV[153]),Cnil));
+	goto T2035;
+T2035:;
+	{object V812 = STREF(object ,(V794),40);
+	VMR32(V812);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-UNIVERSE-ANSI	*/
+
+static object LI33__LOOP_UNIVERSE_ANSI__loop(object V814)
+{	 VMB33 VMS33 VMV33
+	V815= tp6(V814);
+	if(!((V815)==((fixnum)544))){
+	goto T2085;
+	}
+	goto T2084;
+	
+	goto T2085;
+T2085:;
+	goto T2082;
+	
+	goto T2084;
+T2084:;
+	{object V816;
+	{fixnum V817;
+	V817= ((fixnum)V814);
+	V816= ((object*)V817)[(fixnum)1];}
+	{fixnum V819;
+	{fixnum V820;
+	V820= ((fixnum)V816);
+	V819= ((fixnum*)V820)[(fixnum)2];}
+	V818= ((object*)V819)[(fixnum)0];}
+	if(!(((V818))==(((object)VV[153])))){
+	goto T2090;
+	}
+	goto T2081;
+	
+	goto T2090;
+T2090:;
+	{register object V821;
+	{fixnum V822;
+	{fixnum V823;
+	V823= ((fixnum)V816);
+	V822= ((fixnum*)V823)[(fixnum)2];}
+	V821= ((object*)V822)[(fixnum)4];}
+	goto T2100;
+T2100:;
+	if(((V821))==Cnil){
+	goto T2102;
+	}
+	{fixnum V826;
+	{fixnum V827;
+	V827= ((fixnum)(V821));
+	V826= ((fixnum*)V827)[(fixnum)2];}
+	V824= ((object*)V826)[(fixnum)0];}
+	if(!(((V824))==(((object)VV[153])))){
+	goto T2104;
+	}
+	goto T2081;
+	
+	goto T2104;
+T2104:;
+	{object V828;
+	{fixnum V830;
+	{fixnum V831;
+	V831= ((fixnum)(V821));
+	V830= ((fixnum*)V831)[(fixnum)2];}
+	V828= ((object*)V830)[(fixnum)4];}
+	V821= (V828);
+	goto T2100;
+	}
+	goto T2102;
+T2102:;
+	goto T2080;
+	}}
+	goto T2082;
+T2082:;
+	goto T2080;
+	
+	goto T2081;
+T2081:;
+	goto T2079;
+	
+	goto T2080;
+T2080:;
+	goto T2077;
+	
+	goto T2079;
+T2079:;
+	goto T2076;
+	
+	goto T2077;
+T2077:;
+	V814= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V814),((object)VV[153]),Cnil));
+	goto T2076;
+T2076:;
+	{object V832 = STREF(object ,(V814),48);
+	VMR33(V832);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-UNIVERSE-IMPLICIT-FOR-REQUIRED	*/
+
+static object LI34__LOOP_UNIVERSE_IMPLICIT_FOR_REQUIRED__loop(object V834)
+{	 VMB34 VMS34 VMV34
+	V835= tp6(V834);
+	if(!((V835)==((fixnum)544))){
+	goto T2126;
+	}
+	goto T2125;
+	
+	goto T2126;
+T2126:;
+	goto T2123;
+	
+	goto T2125;
+T2125:;
+	{object V836;
+	{fixnum V837;
+	V837= ((fixnum)V834);
+	V836= ((object*)V837)[(fixnum)1];}
+	{fixnum V839;
+	{fixnum V840;
+	V840= ((fixnum)V836);
+	V839= ((fixnum*)V840)[(fixnum)2];}
+	V838= ((object*)V839)[(fixnum)0];}
+	if(!(((V838))==(((object)VV[153])))){
+	goto T2131;
+	}
+	goto T2122;
+	
+	goto T2131;
+T2131:;
+	{register object V841;
+	{fixnum V842;
+	{fixnum V843;
+	V843= ((fixnum)V836);
+	V842= ((fixnum*)V843)[(fixnum)2];}
+	V841= ((object*)V842)[(fixnum)4];}
+	goto T2141;
+T2141:;
+	if(((V841))==Cnil){
+	goto T2143;
+	}
+	{fixnum V846;
+	{fixnum V847;
+	V847= ((fixnum)(V841));
+	V846= ((fixnum*)V847)[(fixnum)2];}
+	V844= ((object*)V846)[(fixnum)0];}
+	if(!(((V844))==(((object)VV[153])))){
+	goto T2145;
+	}
+	goto T2122;
+	
+	goto T2145;
+T2145:;
+	{object V848;
+	{fixnum V850;
+	{fixnum V851;
+	V851= ((fixnum)(V841));
+	V850= ((fixnum*)V851)[(fixnum)2];}
+	V848= ((object*)V850)[(fixnum)4];}
+	V841= (V848);
+	goto T2141;
+	}
+	goto T2143;
+T2143:;
+	goto T2121;
+	}}
+	goto T2123;
+T2123:;
+	goto T2121;
+	
+	goto T2122;
+T2122:;
+	goto T2120;
+	
+	goto T2121;
+T2121:;
+	goto T2118;
+	
+	goto T2120;
+T2120:;
+	goto T2117;
+	
+	goto T2118;
+T2118:;
+	V834= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V834),((object)VV[153]),Cnil));
+	goto T2117;
+T2117:;
+	{object V852 = STREF(object ,(V834),56);
+	VMR34(V852);}
+}
+/*	local entry for function ::G63	*/
+
+static object LI35__G63__loop(object V854)
+{	 VMB35 VMS35 VMV35
+	V855= tp6(V854);
+	if(!((V855)==((fixnum)544))){
+	goto T2157;
+	}
+	{object V856;
+	{fixnum V857;
+	V857= ((fixnum)V854);
+	V856= ((object*)V857)[(fixnum)1];}
+	{fixnum V859;
+	{fixnum V860;
+	V860= ((fixnum)V856);
+	V859= ((fixnum*)V860)[(fixnum)2];}
+	V858= ((object*)V859)[(fixnum)0];}
+	if(!(((V858))==(((object)VV[153])))){
+	goto T2166;
+	}
+	goto T2163;
+	
+	goto T2166;
+T2166:;
+	{register object V861;
+	{fixnum V862;
+	{fixnum V863;
+	V863= ((fixnum)V856);
+	V862= ((fixnum*)V863)[(fixnum)2];}
+	V861= ((object*)V862)[(fixnum)4];}
+	goto T2176;
+T2176:;
+	if(((V861))==Cnil){
+	goto T2178;
+	}
+	{fixnum V866;
+	{fixnum V867;
+	V867= ((fixnum)(V861));
+	V866= ((fixnum*)V867)[(fixnum)2];}
+	V864= ((object*)V866)[(fixnum)0];}
+	if(!(((V864))==(((object)VV[153])))){
+	goto T2180;
+	}
+	goto T2163;
+	
+	goto T2180;
+T2180:;
+	{object V868;
+	{fixnum V870;
+	{fixnum V871;
+	V871= ((fixnum)(V861));
+	V870= ((fixnum*)V871)[(fixnum)2];}
+	V868= ((object*)V870)[(fixnum)4];}
+	V861= (V868);
+	goto T2176;
+	}
+	goto T2178;
+T2178:;
+	goto T2161;
+	}}
+	goto T2163;
+T2163:;
+	{object V872 = Ct;
+	VMR35(V872);}
+	goto T2161;
+T2161:;
+	{object V873 = Cnil;
+	VMR35(V873);}
+	goto T2157;
+T2157:;
+	{object V874 = Cnil;
+	VMR35(V874);}
+}
+/*	local entry for function ANSI-LOOP::PRINT-LOOP-UNIVERSE	*/
+
+static object LI36__PRINT_LOOP_UNIVERSE__loop(object V878,object V879,object V880)
+{	 VMB36 VMS36 VMV36
+	{object V881;
+	{object V882;
+	V882= STREF(object ,(V878),48);
+	if(!(((V882))==(Cnil))){
+	goto T2193;
+	}
+	V881= ((object)VV[154]);
+	goto T2191;
+	
+	goto T2193;
+T2193:;
+	if(!(((V882))==(Ct))){
+	goto T2196;
+	}
+	V881= ((object)VV[155]);
+	goto T2191;
+	
+	goto T2196;
+T2196:;
+	if(!(((V882))==(((object)VV[156])))){
+	goto T2199;
+	}
+	V881= ((object)VV[157]);
+	goto T2191;
+	
+	goto T2199;
+T2199:;
+	V881= STREF(object ,(V878),48);}
+	goto T2191;
+T2191:;
+	{object V884;
+	{fixnum V885;
+	{fixnum V886;
+	V886= ((fixnum)((object)VV[159]));
+	V885= ((fixnum*)V886)[(fixnum)1];}
+	V884= ((object*)V885)[(fixnum)546];}
+	V887= tp4(V884);
+	if(!((V887)==(24))){
+	goto T2209;
+	}
+	goto T2208;
+	
+	goto T2209;
+T2209:;
+	goto T2206;
+	
+	goto T2208;
+T2208:;
+	V883= ({object _z;fixnum _v=(fixnum)0;
+        fcall.fun=(V884);fcall.valp=_v;fcall.argd=2-1;
+        _z=Rset && !((V884))->fun.fun_argd && 
+        fcall.argd>=((V884))->fun.fun_minarg && fcall.argd<=(((V884))->fun.fun_maxarg) ? 
+        ((V884))->fun.fun_self((V878)) : call_proc_cs2((V878));
+           if (!((V884))->fun.fun_neval && !((V884))->fun.fun_vv) vs_top=_v ? (object *)_v : sup;
+           _z;});
+	goto T2202;
+	
+	goto T2206;
+T2206:;
+	V883= (V884);}
+	goto T2202;
+T2202:;
+	{object V888 = (fcall.fun=((object)VV[158])->s.s_gfdef,fcall.argd=4,/* COMMON-LISP::FORMAT */(*LnkLI176)((V879),((object)VV[160]),(V883),(V881)));
+	VMR36(V888);}}
+}
+/*	local entry for function ANSI-LOOP::MAKE-STANDARD-LOOP-UNIVERSE	*/
+
+static object LI37__MAKE_STANDARD_LOOP_UNIVERSE__loop(object V890,...)
+{	 VMB37 VMS37 VMV37
+	va_list ap;
+	va_start(ap,V890);
+	{register object V891;
+	object V892;
+	register object V893;
+	object V894;
+	register object V895;
+	object V896;
+	register object V897;
+	object V898;
+	register object V899;
+	object V900;
+	register object V901;
+	object V902;
+	register object V903;
+	object V904;
+	register object V905;
+	register object V906;
+	int8_t V907;
+	register int8_t V908;
+	register object V909;
+	register object V910;
+	object V911;
+	register object V912;
+	object V913;
+	object V914;
+	object V915;
+	object V916;
+	object V917;
+	object V918;
+	object V919;
+	object V920;
+	object V921;
+	V891= Cnil;
+	V892= Cnil;
+	V893= Cnil;
+	V894= Cnil;
+	V895= Cnil;
+	V896= Cnil;
+	V897= Cnil;
+	V898= Cnil;
+	V899= Cnil;
+	V900= Cnil;
+	V901= Cnil;
+	V902= Cnil;
+	V903= Cnil;
+	V904= Cnil;
+	V905= Ct;
+	V906= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V906))==Cnil){
+	goto T2214;
+	}
+	V907= -((char)fcall.argd);
+	goto T2213;
+	
+	goto T2214;
+T2214:;
+	V907= fcall.argd;
+	goto T2213;
+T2213:;
+	V908= (V907)-(0);
+	V909= Cnil;
+	V910= Cnil;
+	V911= Cnil;
+	V912= Cnil;
+	V913= Cnil;
+	V914= Cnil;
+	{register object V922;
+	register object V923;
+	V922= Cnil;
+	V923= Cnil;
+	goto T2221;
+T2221:;
+	{object V924;
+	if(((V906))==Cnil){
+	goto T2231;
+	}
+	if(!((V908)==(1))){
+	goto T2234;
+	}
+	V908= 0;
+	if(((V905))==Cnil){
+	goto T2240;
+	}
+	V905= Cnil;
+	V909= (V890);
+	goto T2237;
+	
+	goto T2240;
+T2240:;
+	V909= va_arg(ap,object);
+	goto T2237;
+T2237:;
+	V924= (V909);
+	goto T2230;
+	
+	goto T2234;
+T2234:;
+	V924= Cnil;
+	goto T2230;
+	
+	goto T2231;
+T2231:;
+	V924= Cnil;
+	goto T2230;
+T2230:;
+	if(((V924))==Cnil){
+	goto T2245;
+	}
+	goto T2229;
+	
+	goto T2245;
+T2245:;
+	{object V925;
+	V925= ((V908)>(0)?Ct:Cnil);
+	if(((V925))==Cnil){
+	goto T2249;
+	}
+	goto T2229;
+	
+	goto T2249;
+T2249:;
+	if(((V909))==Cnil){
+	goto T2252;
+	}
+	goto T2229;
+	
+	goto T2252;
+T2252:;
+	goto T2228;
+	}}
+	goto T2229;
+T2229:;
+	goto T2226;
+	
+	goto T2228;
+T2228:;
+	goto T2223;
+	
+	goto T2226;
+T2226:;
+	if(((V906))==Cnil){
+	goto T2258;
+	}
+	if(!((V908)==(1))){
+	goto T2261;
+	}
+	V908= 0;
+	if(((V905))==Cnil){
+	goto T2270;
+	}
+	V905= Cnil;
+	V909= (V890);
+	goto T2267;
+	
+	goto T2270;
+T2270:;
+	V909= va_arg(ap,object);
+	goto T2267;
+T2267:;
+	if(((V909))==Cnil){
+	goto T2264;
+	}
+	goto T2257;
+	
+	goto T2264;
+T2264:;
+	goto T2257;
+	
+	goto T2261;
+T2261:;
+	goto T2257;
+	
+	goto T2258;
+T2258:;
+	goto T2257;
+T2257:;
+	if(!((V908)>(0))){
+	goto T2275;
+	}
+	V908= (V908)-(1);
+	if(((V905))==Cnil){
+	goto T2280;
+	}
+	V905= Cnil;
+	V922= (V890);
+	goto T2256;
+	
+	goto T2280;
+T2280:;
+	V922= va_arg(ap,object);
+	goto T2256;
+	
+	goto T2275;
+T2275:;
+	if(((V909))==Cnil){
+	goto T2285;
+	}
+	{object V926;
+	V926= (V909)->c.c_car;
+	V909= (V909)->c.c_cdr;
+	V922= (V926);
+	goto T2256;
+	}
+	goto T2285;
+T2285:;
+	V922= Cnil;
+	goto T2256;
+T2256:;
+	if(((V906))==Cnil){
+	goto T2293;
+	}
+	if(!((V908)==(1))){
+	goto T2296;
+	}
+	V908= 0;
+	if(((V905))==Cnil){
+	goto T2305;
+	}
+	V905= Cnil;
+	V909= (V890);
+	goto T2302;
+	
+	goto T2305;
+T2305:;
+	V909= va_arg(ap,object);
+	goto T2302;
+T2302:;
+	if(((V909))==Cnil){
+	goto T2299;
+	}
+	goto T2292;
+	
+	goto T2299;
+T2299:;
+	goto T2292;
+	
+	goto T2296;
+T2296:;
+	goto T2292;
+	
+	goto T2293;
+T2293:;
+	goto T2292;
+T2292:;
+	if(!((V908)>(0))){
+	goto T2310;
+	}
+	V908= (V908)-(1);
+	if(((V905))==Cnil){
+	goto T2315;
+	}
+	V905= Cnil;
+	V923= (V890);
+	goto T2291;
+	
+	goto T2315;
+T2315:;
+	V923= va_arg(ap,object);
+	goto T2291;
+	
+	goto T2310;
+T2310:;
+	if(((V909))==Cnil){
+	goto T2320;
+	}
+	{object V929;
+	V929= (V909)->c.c_car;
+	V909= (V909)->c.c_cdr;
+	V923= (V929);
+	goto T2291;
+	}
+	goto T2320;
+T2320:;
+	V932= make_cons((V922),Cnil);
+	V923= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[161]),((object)VV[59]),((object)VV[162]),(V932)));
+	goto T2291;
+T2291:;
+	if(!(((V922))==(((object)VV[143])))){
+	goto T2327;
+	}
+	if(((V891))==Cnil){
+	goto T2333;
+	}
+	goto T2330;
+	
+	goto T2333;
+T2333:;
+	V892= (V923);
+	V891= Ct;
+	goto T2326;
+	
+	goto T2330;
+T2330:;
+	goto T2326;
+	
+	goto T2327;
+T2327:;
+	if(!(((V922))==(((object)VV[145])))){
+	goto T2338;
+	}
+	if(((V893))==Cnil){
+	goto T2344;
+	}
+	goto T2341;
+	
+	goto T2344;
+T2344:;
+	V894= (V923);
+	V893= Ct;
+	goto T2326;
+	
+	goto T2341;
+T2341:;
+	goto T2326;
+	
+	goto T2338;
+T2338:;
+	if(!(((V922))==(((object)VV[144])))){
+	goto T2349;
+	}
+	if(((V895))==Cnil){
+	goto T2355;
+	}
+	goto T2352;
+	
+	goto T2355;
+T2355:;
+	V896= (V923);
+	V895= Ct;
+	goto T2326;
+	
+	goto T2352;
+T2352:;
+	goto T2326;
+	
+	goto T2349;
+T2349:;
+	if(!(((V922))==(((object)VV[146])))){
+	goto T2360;
+	}
+	if(((V897))==Cnil){
+	goto T2366;
+	}
+	goto T2363;
+	
+	goto T2366;
+T2366:;
+	V898= (V923);
+	V897= Ct;
+	goto T2326;
+	
+	goto T2363;
+T2363:;
+	goto T2326;
+	
+	goto T2360;
+T2360:;
+	if(!(((V922))==(((object)VV[148])))){
+	goto T2371;
+	}
+	if(((V899))==Cnil){
+	goto T2377;
+	}
+	goto T2374;
+	
+	goto T2377;
+T2377:;
+	V900= (V923);
+	V899= Ct;
+	goto T2326;
+	
+	goto T2374;
+T2374:;
+	goto T2326;
+	
+	goto T2371;
+T2371:;
+	if(!(((V922))==(((object)VV[147])))){
+	goto T2382;
+	}
+	if(((V901))==Cnil){
+	goto T2388;
+	}
+	goto T2385;
+	
+	goto T2388;
+T2388:;
+	V902= (V923);
+	V901= Ct;
+	goto T2326;
+	
+	goto T2385;
+T2385:;
+	goto T2326;
+	
+	goto T2382;
+T2382:;
+	if(!(((V922))==(((object)VV[149])))){
+	goto T2393;
+	}
+	if(((V903))==Cnil){
+	goto T2399;
+	}
+	goto T2396;
+	
+	goto T2399;
+T2399:;
+	V904= (V923);
+	V903= Ct;
+	goto T2326;
+	
+	goto T2396;
+T2396:;
+	goto T2326;
+	
+	goto T2393;
+T2393:;
+	if(!(((V922))==(((object)VV[67])))){
+	goto T2404;
+	}
+	if(((V910))==Cnil){
+	goto T2410;
+	}
+	goto T2407;
+	
+	goto T2410;
+T2410:;
+	V911= (V923);
+	V910= Ct;
+	goto T2326;
+	
+	goto T2407;
+T2407:;
+	goto T2326;
+	
+	goto T2404;
+T2404:;
+	if(((V912))==Cnil){
+	goto T2418;
+	}
+	goto T2415;
+	
+	goto T2418;
+T2418:;
+	V913= (V923);
+	V912= Ct;
+	V914= (V922);
+	goto T2326;
+	
+	goto T2415;
+T2415:;
+	goto T2326;
+T2326:;
+	goto T2221;
+	
+	goto T2223;
+T2223:;
+	goto T2219;
+	}
+	goto T2219;
+T2219:;
+	if(((V891))==Cnil){
+	goto T2427;
+	}
+	V915= (V892);
+	goto T2218;
+	
+	goto T2427;
+T2427:;
+	V915= Cnil;
+	goto T2218;
+T2218:;
+	if(((V893))==Cnil){
+	goto T2431;
+	}
+	V916= (V894);
+	goto T2430;
+	
+	goto T2431;
+T2431:;
+	V916= Cnil;
+	goto T2430;
+T2430:;
+	if(((V895))==Cnil){
+	goto T2435;
+	}
+	V917= (V896);
+	goto T2434;
+	
+	goto T2435;
+T2435:;
+	V917= Cnil;
+	goto T2434;
+T2434:;
+	if(((V897))==Cnil){
+	goto T2439;
+	}
+	V918= (V898);
+	goto T2438;
+	
+	goto T2439;
+T2439:;
+	V918= Cnil;
+	goto T2438;
+T2438:;
+	if(((V899))==Cnil){
+	goto T2443;
+	}
+	V919= (V900);
+	goto T2442;
+	
+	goto T2443;
+T2443:;
+	V919= Cnil;
+	goto T2442;
+T2442:;
+	if(((V901))==Cnil){
+	goto T2447;
+	}
+	V920= (V902);
+	goto T2446;
+	
+	goto T2447;
+T2447:;
+	V920= Cnil;
+	goto T2446;
+T2446:;
+	if(((V903))==Cnil){
+	goto T2451;
+	}
+	V921= (V904);
+	goto T2450;
+	
+	goto T2451;
+T2451:;
+	V921= Cnil;
+	goto T2450;
+T2450:;
+	if(((V911))==Cnil){
+	goto T2458;
+	}
+	goto T2455;
+	
+	goto T2458;
+T2458:;
+	if(((V912))==Cnil){
+	goto T2460;
+	}
+	V933= list(2,(V914),(V913));
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[163]),((object)VV[69]),((object)VV[164]),(V933))));
+	goto T2454;
+	
+	goto T2460;
+T2460:;
+	goto T2454;
+	
+	goto T2455;
+T2455:;
+	goto T2454;
+T2454:;
+	{fixnum V935;
+	register object V936;
+	V935= length((V915));
+	{object V937;
+	object V938;
+	fixnum V939;
+	object V940;
+	object V941;
+	object V942;
+	V937= Cnil;
+	V938= Cnil;
+	if(!((V935)<(10))){
+	goto T2467;
+	}
+	V939= 10;
+	goto T2466;
+	
+	goto T2467;
+T2467:;
+	V939= V935;
+	goto T2466;
+T2466:;
+	V938= CMPmake_fixnum(V939);
+	V940= (((object)VV[166])->s.s_gfdef);
+	V937= (V940);
+	V941= (((object)VV[167])->s.s_dbind);
+	V942= (((object)VV[168])->s.s_dbind);
+	V936= (fcall.fun=((object)VV[169])->s.s_gfdef,/* SYSTEM::MAKE-HASH-TABLE-INT */(*LnkLI178)((V937),(V938),(V941),(V942),Cnil));}
+	{register object V943;
+	register object V944;
+	V943= (V915);
+	V944= V915->c.c_car;
+	goto T2481;
+T2481:;
+	if(((V943))==Cnil){
+	goto T2488;
+	}
+	goto T2486;
+	
+	goto T2488;
+T2488:;
+	goto T2483;
+	
+	goto T2486;
+T2486:;
+	{object V946;
+	object V947;
+	{object V948;
+	V948= (V944)->c.c_car;
+	{fixnum V950;
+	V950= ((fixnum)V948);
+	V946= ((object*)V950)[(fixnum)3];}}
+	{object V952;
+	V952= (V944)->c.c_cdr;
+	V947= V952->c.c_car;}
+	{fixnum V953;
+	{fixnum V954;
+	{fixnum V955;
+	V955= ((fixnum)V936);
+	V954= ((long*)V955)[(fixnum)4];}
+	V953= (V954>>(fixnum)4);}
+	{fixnum V957;
+	V957= (V953)+(1);
+	V956= V957;}
+	{fixnum V959;
+	{fixnum V960;
+	V960= ((fixnum)V936);
+	V959= ((long*)V960)[(fixnum)7];}
+	V958= (V959>>(fixnum)4);}
+	if(!((V956)>=(V958))){
+	goto T2500;
+	}
+	(void)((fcall.fun=((object)VV[170])->s.s_gfdef,/* SYSTEM::EXTEND-HASHTABLE */(*LnkLI179)((V936))));
+	goto T2499;
+	
+	goto T2500;
+T2500:;
+	goto T2499;
+T2499:;
+	{fixnum V961;
+	V961= (fcall.fun=((object)VV[127])->s.s_gfdef,/* SYSTEM::GETHASH-INT */(*LnkLI175)((V946),(V936)));
+	V962= ((fixnum*)V961)[(fixnum)0];
+	if(!((0)==(V962))){
+	goto T2510;
+	}
+	{fixnum V963;
+	{fixnum V964;
+	V964= (V953)+(1);
+	V963= V964;}
+	{fixnum V965;
+	fixnum V966;
+	V965= ((fixnum)V936);
+	{fixnum V967;
+	int8_t V968;
+	V967= (V963<<(fixnum)4);
+	{fixnum V969;
+	{fixnum V970;
+	V970= ((fixnum)V936);
+	V969= ((long*)V970)[(fixnum)4];}
+	V968= (V969&(fixnum)15);}
+	V966= (V967|(fixnum)V968);}
+	(void)(((long*)V965)[(fixnum)4]=V966);}
+	goto T2509;
+	}
+	goto T2510;
+T2510:;
+	goto T2509;
+T2509:;
+	{fixnum V971;
+	V971= ((fixnum)V946);
+	(void)(((fixnum*)V961)[(fixnum)0]=V971);}
+	(void)(((object*)V961)[(fixnum)1]=V947);}}}
+	V943= (V943)->c.c_cdr;
+	V944= V943->c.c_car;
+	goto T2481;
+	
+	goto T2483;
+T2483:;
+	goto T2478;
+	}
+	goto T2478;
+T2478:;
+	V934= (V936);}
+	{fixnum V974;
+	register object V975;
+	V974= length((V916));
+	{object V976;
+	object V977;
+	fixnum V978;
+	object V979;
+	object V980;
+	object V981;
+	V976= Cnil;
+	V977= Cnil;
+	if(!((V974)<(10))){
+	goto T2534;
+	}
+	V978= 10;
+	goto T2533;
+	
+	goto T2534;
+T2534:;
+	V978= V974;
+	goto T2533;
+T2533:;
+	V977= CMPmake_fixnum(V978);
+	V979= (((object)VV[166])->s.s_gfdef);
+	V976= (V979);
+	V980= (((object)VV[167])->s.s_dbind);
+	V981= (((object)VV[168])->s.s_dbind);
+	V975= (fcall.fun=((object)VV[169])->s.s_gfdef,/* SYSTEM::MAKE-HASH-TABLE-INT */(*LnkLI178)((V976),(V977),(V980),(V981),Cnil));}
+	{register object V982;
+	register object V983;
+	V982= (V916);
+	V983= V916->c.c_car;
+	goto T2548;
+T2548:;
+	if(((V982))==Cnil){
+	goto T2555;
+	}
+	goto T2553;
+	
+	goto T2555;
+T2555:;
+	goto T2550;
+	
+	goto T2553;
+T2553:;
+	{object V985;
+	object V986;
+	{object V987;
+	V987= (V983)->c.c_car;
+	{fixnum V989;
+	V989= ((fixnum)V987);
+	V985= ((object*)V989)[(fixnum)3];}}
+	{object V991;
+	V991= (V983)->c.c_cdr;
+	V986= V991->c.c_car;}
+	{fixnum V992;
+	{fixnum V993;
+	{fixnum V994;
+	V994= ((fixnum)V975);
+	V993= ((long*)V994)[(fixnum)4];}
+	V992= (V993>>(fixnum)4);}
+	{fixnum V996;
+	V996= (V992)+(1);
+	V995= V996;}
+	{fixnum V998;
+	{fixnum V999;
+	V999= ((fixnum)V975);
+	V998= ((long*)V999)[(fixnum)7];}
+	V997= (V998>>(fixnum)4);}
+	if(!((V995)>=(V997))){
+	goto T2567;
+	}
+	(void)((fcall.fun=((object)VV[170])->s.s_gfdef,/* SYSTEM::EXTEND-HASHTABLE */(*LnkLI179)((V975))));
+	goto T2566;
+	
+	goto T2567;
+T2567:;
+	goto T2566;
+T2566:;
+	{fixnum V1000;
+	V1000= (fcall.fun=((object)VV[127])->s.s_gfdef,/* SYSTEM::GETHASH-INT */(*LnkLI175)((V985),(V975)));
+	V1001= ((fixnum*)V1000)[(fixnum)0];
+	if(!((0)==(V1001))){
+	goto T2577;
+	}
+	{fixnum V1002;
+	{fixnum V1003;
+	V1003= (V992)+(1);
+	V1002= V1003;}
+	{fixnum V1004;
+	fixnum V1005;
+	V1004= ((fixnum)V975);
+	{fixnum V1006;
+	int8_t V1007;
+	V1006= (V1002<<(fixnum)4);
+	{fixnum V1008;
+	{fixnum V1009;
+	V1009= ((fixnum)V975);
+	V1008= ((long*)V1009)[(fixnum)4];}
+	V1007= (V1008&(fixnum)15);}
+	V1005= (V1006|(fixnum)V1007);}
+	(void)(((long*)V1004)[(fixnum)4]=V1005);}
+	goto T2576;
+	}
+	goto T2577;
+T2577:;
+	goto T2576;
+T2576:;
+	{fixnum V1010;
+	V1010= ((fixnum)V985);
+	(void)(((fixnum*)V1000)[(fixnum)0]=V1010);}
+	(void)(((object*)V1000)[(fixnum)1]=V986);}}}
+	V982= (V982)->c.c_cdr;
+	V983= V982->c.c_car;
+	goto T2548;
+	
+	goto T2550;
+T2550:;
+	goto T2545;
+	}
+	goto T2545;
+T2545:;
+	V973= (V975);}
+	{fixnum V1013;
+	register object V1014;
+	V1013= length((V917));
+	{object V1015;
+	object V1016;
+	fixnum V1017;
+	object V1018;
+	object V1019;
+	object V1020;
+	V1015= Cnil;
+	V1016= Cnil;
+	if(!((V1013)<(10))){
+	goto T2601;
+	}
+	V1017= 10;
+	goto T2600;
+	
+	goto T2601;
+T2601:;
+	V1017= V1013;
+	goto T2600;
+T2600:;
+	V1016= CMPmake_fixnum(V1017);
+	V1018= (((object)VV[166])->s.s_gfdef);
+	V1015= (V1018);
+	V1019= (((object)VV[167])->s.s_dbind);
+	V1020= (((object)VV[168])->s.s_dbind);
+	V1014= (fcall.fun=((object)VV[169])->s.s_gfdef,/* SYSTEM::MAKE-HASH-TABLE-INT */(*LnkLI178)((V1015),(V1016),(V1019),(V1020),Cnil));}
+	{register object V1021;
+	register object V1022;
+	V1021= (V917);
+	V1022= V917->c.c_car;
+	goto T2615;
+T2615:;
+	if(((V1021))==Cnil){
+	goto T2622;
+	}
+	goto T2620;
+	
+	goto T2622;
+T2622:;
+	goto T2617;
+	
+	goto T2620;
+T2620:;
+	{object V1024;
+	object V1025;
+	{object V1026;
+	V1026= (V1022)->c.c_car;
+	{fixnum V1028;
+	V1028= ((fixnum)V1026);
+	V1024= ((object*)V1028)[(fixnum)3];}}
+	{object V1030;
+	V1030= (V1022)->c.c_cdr;
+	V1025= V1030->c.c_car;}
+	{fixnum V1031;
+	{fixnum V1032;
+	{fixnum V1033;
+	V1033= ((fixnum)V1014);
+	V1032= ((long*)V1033)[(fixnum)4];}
+	V1031= (V1032>>(fixnum)4);}
+	{fixnum V1035;
+	V1035= (V1031)+(1);
+	V1034= V1035;}
+	{fixnum V1037;
+	{fixnum V1038;
+	V1038= ((fixnum)V1014);
+	V1037= ((long*)V1038)[(fixnum)7];}
+	V1036= (V1037>>(fixnum)4);}
+	if(!((V1034)>=(V1036))){
+	goto T2634;
+	}
+	(void)((fcall.fun=((object)VV[170])->s.s_gfdef,/* SYSTEM::EXTEND-HASHTABLE */(*LnkLI179)((V1014))));
+	goto T2633;
+	
+	goto T2634;
+T2634:;
+	goto T2633;
+T2633:;
+	{fixnum V1039;
+	V1039= (fcall.fun=((object)VV[127])->s.s_gfdef,/* SYSTEM::GETHASH-INT */(*LnkLI175)((V1024),(V1014)));
+	V1040= ((fixnum*)V1039)[(fixnum)0];
+	if(!((0)==(V1040))){
+	goto T2644;
+	}
+	{fixnum V1041;
+	{fixnum V1042;
+	V1042= (V1031)+(1);
+	V1041= V1042;}
+	{fixnum V1043;
+	fixnum V1044;
+	V1043= ((fixnum)V1014);
+	{fixnum V1045;
+	int8_t V1046;
+	V1045= (V1041<<(fixnum)4);
+	{fixnum V1047;
+	{fixnum V1048;
+	V1048= ((fixnum)V1014);
+	V1047= ((long*)V1048)[(fixnum)4];}
+	V1046= (V1047&(fixnum)15);}
+	V1044= (V1045|(fixnum)V1046);}
+	(void)(((long*)V1043)[(fixnum)4]=V1044);}
+	goto T2643;
+	}
+	goto T2644;
+T2644:;
+	goto T2643;
+T2643:;
+	{fixnum V1049;
+	V1049= ((fixnum)V1024);
+	(void)(((fixnum*)V1039)[(fixnum)0]=V1049);}
+	(void)(((object*)V1039)[(fixnum)1]=V1025);}}}
+	V1021= (V1021)->c.c_cdr;
+	V1022= V1021->c.c_car;
+	goto T2615;
+	
+	goto T2617;
+T2617:;
+	goto T2612;
+	}
+	goto T2612;
+T2612:;
+	V1012= (V1014);}
+	{fixnum V1052;
+	register object V1053;
+	V1052= length((V918));
+	{object V1054;
+	object V1055;
+	fixnum V1056;
+	object V1057;
+	object V1058;
+	object V1059;
+	V1054= Cnil;
+	V1055= Cnil;
+	if(!((V1052)<(10))){
+	goto T2668;
+	}
+	V1056= 10;
+	goto T2667;
+	
+	goto T2668;
+T2668:;
+	V1056= V1052;
+	goto T2667;
+T2667:;
+	V1055= CMPmake_fixnum(V1056);
+	V1057= (((object)VV[166])->s.s_gfdef);
+	V1054= (V1057);
+	V1058= (((object)VV[167])->s.s_dbind);
+	V1059= (((object)VV[168])->s.s_dbind);
+	V1053= (fcall.fun=((object)VV[169])->s.s_gfdef,/* SYSTEM::MAKE-HASH-TABLE-INT */(*LnkLI178)((V1054),(V1055),(V1058),(V1059),Cnil));}
+	{register object V1060;
+	register object V1061;
+	V1060= (V918);
+	V1061= V918->c.c_car;
+	goto T2682;
+T2682:;
+	if(((V1060))==Cnil){
+	goto T2689;
+	}
+	goto T2687;
+	
+	goto T2689;
+T2689:;
+	goto T2684;
+	
+	goto T2687;
+T2687:;
+	{object V1063;
+	object V1064;
+	{object V1065;
+	V1065= (V1061)->c.c_car;
+	{fixnum V1067;
+	V1067= ((fixnum)V1065);
+	V1063= ((object*)V1067)[(fixnum)3];}}
+	{object V1069;
+	V1069= (V1061)->c.c_cdr;
+	V1064= V1069->c.c_car;}
+	{fixnum V1070;
+	{fixnum V1071;
+	{fixnum V1072;
+	V1072= ((fixnum)V1053);
+	V1071= ((long*)V1072)[(fixnum)4];}
+	V1070= (V1071>>(fixnum)4);}
+	{fixnum V1074;
+	V1074= (V1070)+(1);
+	V1073= V1074;}
+	{fixnum V1076;
+	{fixnum V1077;
+	V1077= ((fixnum)V1053);
+	V1076= ((long*)V1077)[(fixnum)7];}
+	V1075= (V1076>>(fixnum)4);}
+	if(!((V1073)>=(V1075))){
+	goto T2701;
+	}
+	(void)((fcall.fun=((object)VV[170])->s.s_gfdef,/* SYSTEM::EXTEND-HASHTABLE */(*LnkLI179)((V1053))));
+	goto T2700;
+	
+	goto T2701;
+T2701:;
+	goto T2700;
+T2700:;
+	{fixnum V1078;
+	V1078= (fcall.fun=((object)VV[127])->s.s_gfdef,/* SYSTEM::GETHASH-INT */(*LnkLI175)((V1063),(V1053)));
+	V1079= ((fixnum*)V1078)[(fixnum)0];
+	if(!((0)==(V1079))){
+	goto T2711;
+	}
+	{fixnum V1080;
+	{fixnum V1081;
+	V1081= (V1070)+(1);
+	V1080= V1081;}
+	{fixnum V1082;
+	fixnum V1083;
+	V1082= ((fixnum)V1053);
+	{fixnum V1084;
+	int8_t V1085;
+	V1084= (V1080<<(fixnum)4);
+	{fixnum V1086;
+	{fixnum V1087;
+	V1087= ((fixnum)V1053);
+	V1086= ((long*)V1087)[(fixnum)4];}
+	V1085= (V1086&(fixnum)15);}
+	V1083= (V1084|(fixnum)V1085);}
+	(void)(((long*)V1082)[(fixnum)4]=V1083);}
+	goto T2710;
+	}
+	goto T2711;
+T2711:;
+	goto T2710;
+T2710:;
+	{fixnum V1088;
+	V1088= ((fixnum)V1063);
+	(void)(((fixnum*)V1078)[(fixnum)0]=V1088);}
+	(void)(((object*)V1078)[(fixnum)1]=V1064);}}}
+	V1060= (V1060)->c.c_cdr;
+	V1061= V1060->c.c_car;
+	goto T2682;
+	
+	goto T2684;
+T2684:;
+	goto T2679;
+	}
+	goto T2679;
+T2679:;
+	V1051= (V1053);}
+	if(((V921))==Cnil){
+	goto T2735;
+	}
+	goto T2732;
+	
+	goto T2735;
+T2735:;
+	V1090= Cnil;
+	goto T2731;
+	
+	goto T2732;
+T2732:;
+	V1090= Ct;
+	goto T2731;
+T2731:;
+	{fixnum V1092;
+	register object V1093;
+	V1092= length((V919));
+	{object V1094;
+	object V1095;
+	fixnum V1096;
+	object V1097;
+	object V1098;
+	object V1099;
+	V1094= Cnil;
+	V1095= Cnil;
+	if(!((V1092)<(10))){
+	goto T2741;
+	}
+	V1096= 10;
+	goto T2740;
+	
+	goto T2741;
+T2741:;
+	V1096= V1092;
+	goto T2740;
+T2740:;
+	V1095= CMPmake_fixnum(V1096);
+	V1097= (((object)VV[166])->s.s_gfdef);
+	V1094= (V1097);
+	V1098= (((object)VV[167])->s.s_dbind);
+	V1099= (((object)VV[168])->s.s_dbind);
+	V1093= (fcall.fun=((object)VV[169])->s.s_gfdef,/* SYSTEM::MAKE-HASH-TABLE-INT */(*LnkLI178)((V1094),(V1095),(V1098),(V1099),Cnil));}
+	{register object V1100;
+	register object V1101;
+	V1100= (V919);
+	V1101= V919->c.c_car;
+	goto T2755;
+T2755:;
+	if(((V1100))==Cnil){
+	goto T2762;
+	}
+	goto T2760;
+	
+	goto T2762;
+T2762:;
+	goto T2757;
+	
+	goto T2760;
+T2760:;
+	{object V1103;
+	object V1104;
+	{object V1105;
+	V1105= (V1101)->c.c_car;
+	{fixnum V1107;
+	V1107= ((fixnum)V1105);
+	V1103= ((object*)V1107)[(fixnum)3];}}
+	{object V1109;
+	V1109= (V1101)->c.c_cdr;
+	V1104= V1109->c.c_car;}
+	{fixnum V1110;
+	{fixnum V1111;
+	{fixnum V1112;
+	V1112= ((fixnum)V1093);
+	V1111= ((long*)V1112)[(fixnum)4];}
+	V1110= (V1111>>(fixnum)4);}
+	{fixnum V1114;
+	V1114= (V1110)+(1);
+	V1113= V1114;}
+	{fixnum V1116;
+	{fixnum V1117;
+	V1117= ((fixnum)V1093);
+	V1116= ((long*)V1117)[(fixnum)7];}
+	V1115= (V1116>>(fixnum)4);}
+	if(!((V1113)>=(V1115))){
+	goto T2774;
+	}
+	(void)((fcall.fun=((object)VV[170])->s.s_gfdef,/* SYSTEM::EXTEND-HASHTABLE */(*LnkLI179)((V1093))));
+	goto T2773;
+	
+	goto T2774;
+T2774:;
+	goto T2773;
+T2773:;
+	{fixnum V1118;
+	V1118= (fcall.fun=((object)VV[127])->s.s_gfdef,/* SYSTEM::GETHASH-INT */(*LnkLI175)((V1103),(V1093)));
+	V1119= ((fixnum*)V1118)[(fixnum)0];
+	if(!((0)==(V1119))){
+	goto T2784;
+	}
+	{fixnum V1120;
+	{fixnum V1121;
+	V1121= (V1110)+(1);
+	V1120= V1121;}
+	{fixnum V1122;
+	fixnum V1123;
+	V1122= ((fixnum)V1093);
+	{fixnum V1124;
+	int8_t V1125;
+	V1124= (V1120<<(fixnum)4);
+	{fixnum V1126;
+	{fixnum V1127;
+	V1127= ((fixnum)V1093);
+	V1126= ((long*)V1127)[(fixnum)4];}
+	V1125= (V1126&(fixnum)15);}
+	V1123= (V1124|(fixnum)V1125);}
+	(void)(((long*)V1122)[(fixnum)4]=V1123);}
+	goto T2783;
+	}
+	goto T2784;
+T2784:;
+	goto T2783;
+T2783:;
+	{fixnum V1128;
+	V1128= ((fixnum)V1103);
+	(void)(((fixnum*)V1118)[(fixnum)0]=V1128);}
+	(void)(((object*)V1118)[(fixnum)1]=V1104);}}}
+	V1100= (V1100)->c.c_cdr;
+	V1101= V1100->c.c_car;
+	goto T2755;
+	
+	goto T2757;
+T2757:;
+	goto T2752;
+	}
+	goto T2752;
+T2752:;
+	V1091= (V1093);}
+	{fixnum V1131;
+	register object V1132;
+	V1131= length((V920));
+	{object V1133;
+	object V1134;
+	fixnum V1135;
+	object V1136;
+	object V1137;
+	object V1138;
+	V1133= Cnil;
+	V1134= Cnil;
+	if(!((V1131)<(10))){
+	goto T2808;
+	}
+	V1135= 10;
+	goto T2807;
+	
+	goto T2808;
+T2808:;
+	V1135= V1131;
+	goto T2807;
+T2807:;
+	V1134= CMPmake_fixnum(V1135);
+	V1136= (((object)VV[171])->s.s_gfdef);
+	V1133= (V1136);
+	V1137= (((object)VV[167])->s.s_dbind);
+	V1138= (((object)VV[168])->s.s_dbind);
+	V1132= (fcall.fun=((object)VV[169])->s.s_gfdef,/* SYSTEM::MAKE-HASH-TABLE-INT */(*LnkLI178)((V1133),(V1134),(V1137),(V1138),Cnil));}
+	{register object V1139;
+	register object V1140;
+	V1139= (V920);
+	V1140= V920->c.c_car;
+	goto T2822;
+T2822:;
+	if(((V1139))==Cnil){
+	goto T2829;
+	}
+	goto T2827;
+	
+	goto T2829;
+T2829:;
+	goto T2824;
+	
+	goto T2827;
+T2827:;
+	if(((V1140))==Cnil){
+	goto T2837;
+	}
+	V1143= tp2((V1140));
+	if(!((V1143)==(0))){
+	goto T2840;
+	}
+	goto T2836;
+	
+	goto T2840;
+T2840:;
+	goto T2835;
+	
+	goto T2837;
+T2837:;
+	goto T2835;
+	
+	goto T2836;
+T2836:;
+	goto T2832;
+	
+	goto T2835;
+T2835:;
+	(void)((sethash((V1140),(V1132),(V1140)),(V1140)));
+	goto T2831;
+	
+	goto T2832;
+T2832:;
+	{object V1146;
+	object V1147;
+	V1146= (V1140)->c.c_car;
+	{object V1150;
+	V1150= (V1140)->c.c_cdr;
+	V1147= V1150->c.c_car;}
+	(void)((sethash((V1146),(V1132),(V1147)),(V1147)));}
+	goto T2831;
+T2831:;
+	V1139= (V1139)->c.c_cdr;
+	V1140= V1139->c.c_car;
+	goto T2822;
+	
+	goto T2824;
+T2824:;
+	goto T2819;
+	}
+	goto T2819;
+T2819:;
+	V1130= (V1132);}
+	{object V1152 = (fcall.argd=16,/* ANSI-LOOP::MAKE-LOOP-UNIVERSE */(*LnkLI177)(((object)VV[172]),(V934),((object)VV[173]),(V973),((object)VV[174]),(V1012),((object)VV[175]),(V1051),((object)VV[176]),(V921),((object)VV[177]),(V1090),((object)VV[178]),(V1091),((object)VV[179]),(V1130)));
+	VMR37(V1152);}}
+	va_end(ap);
+}
+/*	local entry for function ANSI-LOOP::LOOP-MAKE-PSETQ	*/
+
+static object LI38__LOOP_MAKE_PSETQ__loop(object V1154)
+{	 VMB38 VMS38 VMV38
+	if(((V1154))==Cnil){
+	goto T2851;
+	}
+	V1155= V1154->c.c_car;
+	{object V1157;
+	V1157= V1154->c.c_cdr;
+	if((V1157->c.c_cdr)==Cnil){
+	goto T2859;
+	}}
+	goto T2856;
+	
+	goto T2859;
+T2859:;
+	{object V1158;
+	V1158= V1154->c.c_cdr;
+	V1156= V1158->c.c_car;
+	goto T2855;
+	}
+	goto T2856;
+T2856:;
+	{object V1160;
+	V1160= V1154->c.c_cdr;
+	V1159= V1160->c.c_car;}
+	{object V1162;
+	V1162= V1154->c.c_cdr;
+	V1161= V1162->c.c_cdr;}
+	V1156= list(3,((object)VV[182]),(V1159),(/* ANSI-LOOP::LOOP-MAKE-PSETQ */(*LnkLI181)((V1161))));
+	goto T2855;
+T2855:;
+	V1163= list(2,(V1155),(V1156));
+	{object V1164 = (/* ANSI-LOOP::LOOP-MAKE-DESETQ */(*LnkLI180)((V1163)));
+	VMR38(V1164);}
+	goto T2851;
+T2851:;
+	{object V1165 = Cnil;
+	VMR38(V1165);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-MAKE-DESETQ	*/
+
+static object LI39__LOOP_MAKE_DESETQ__loop(object V1167)
+{	 VMB39 VMS39 VMV39
+	if(((V1167))==Cnil){
+	goto T2870;
+	}
+	goto T2867;
+	
+	goto T2870;
+T2870:;
+	{object V1168 = Cnil;
+	VMR39(V1168);}
+	goto T2867;
+T2867:;
+	if(((((object)VV[183])->s.s_dbind))==Cnil){
+	goto T2873;
+	}
+	{object V1170;
+	V1170= (((object)VV[183])->s.s_dbind);
+	{object V1171;
+	V1171= V1170->c.c_cdr;
+	V1169= V1171->c.c_car;
+	goto T2872;
+	}}
+	goto T2873;
+T2873:;
+	V1169= ((object)VV[184]);
+	goto T2872;
+T2872:;
+	{object V1172 = make_cons((V1169),(V1167));
+	VMR39(V1172);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-REALLY-DESETQ	*/
+
+static object LI40__LOOP_REALLY_DESETQ__loop(object V1175,object V1176)
+{	 VMB40 VMS40 VMV40
+	base[0]= (V1176);
+	{object V1177;
+	register object V1178;
+	V1177= V1175->c.c_cdr;
+	V1178= (V1177);
+	{register object V1179;
+	V1179= Cnil;
+	goto T2879;
+T2879:;
+	if(((V1178))==Cnil){
+	goto T2886;
+	}
+	goto T2884;
+	
+	goto T2886;
+T2886:;
+	goto T2881;
+	
+	goto T2884;
+T2884:;
+	{object V1180;
+	register object V1181;
+	{object V1183;
+	V1183= (V1178)->c.c_car;
+	V1178= (V1178)->c.c_cdr;
+	V1182= (V1183);}
+	{object V1187;
+	V1187= V1178->c.c_car;
+	V1178= V1178->c.c_cdr;
+	V1186= (V1187);}
+	V1180= (fcall.argd=2,L44__LOOP_DESETQ_INTERNAL__loop(base,(V1182),(V1186)));
+	V1181= (V1179);
+	{register object V1188;
+	V1188= (V1180);
+	goto T2902;
+T2902:;
+	if(((V1188))==Cnil){
+	goto T2904;
+	}
+	{object V1190;
+	V1190= (V1188)->c.c_car;
+	V1181= make_cons((V1190),(V1181));}
+	{object V1191;
+	V1191= (V1188)->c.c_cdr;
+	V1188= (V1191);
+	goto T2902;
+	}
+	goto T2904;
+T2904:;
+	goto T2900;
+	}
+	goto T2900;
+T2900:;
+	V1179= (V1181);}
+	goto T2879;
+	
+	goto T2881;
+T2881:;
+	if(((V1179)->c.c_cdr)==Cnil){
+	goto T2917;
+	}
+	goto T2914;
+	
+	goto T2917;
+T2917:;
+	{object V1195 = (V1179)->c.c_car;
+	VMR40(V1195);}
+	goto T2914;
+T2914:;
+	if(((V1179))==Cnil){
+	goto T2920;
+	}
+	{register object V1198;
+	register object V1199;
+	V1198= (V1179)->c.c_cdr;
+	V1199= (((V1179))->c.c_cdr=(Cnil),((V1179)));
+	goto T2926;
+T2926:;
+	if(((V1198))==Cnil){
+	goto T2928;
+	}
+	{object V1200;
+	object V1201;
+	V1200= (V1198)->c.c_cdr;
+	V1201= (((V1198))->c.c_cdr=((V1199)),((V1198)));
+	V1198= (V1200);
+	V1199= (V1201);
+	goto T2926;
+	}
+	goto T2928;
+T2928:;
+	V1196= (V1199);
+	goto T2919;
+	}
+	goto T2920;
+T2920:;
+	V1196= Cnil;
+	goto T2919;
+T2919:;
+	{object V1203 = make_cons(((object)VV[53]),(V1196));
+	VMR40(V1203);}}}
+}
+/*	local function LOOP-DESETQ-INTERNAL	*/
+
+static object L44__LOOP_DESETQ_INTERNAL__loop(object *base0,object V1206,object V1207,...)
+{	
+	VMB41 VMS41 VMV41
+	va_list ap;
+	va_start(ap,V1207);
+	vs_check;
+	{object V1208;
+	int8_t V1209;
+	int8_t V1210;
+	object V1211;
+	object V1212;
+	V1208= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V1208))==Cnil){
+	goto T2939;
+	}
+	V1209= -((char)fcall.argd);
+	goto T2938;
+	
+	goto T2939;
+T2939:;
+	V1209= fcall.argd;
+	goto T2938;
+T2938:;
+	V1210= (V1209)-(2);
+	V1211= Cnil;
+	if(((V1208))==Cnil){
+	goto T2945;
+	}
+	if(!((V1210)==(1))){
+	goto T2948;
+	}
+	V1210= 0;
+	V1211= va_arg(ap,object);
+	if(((V1211))==Cnil){
+	goto T2951;
+	}
+	goto T2944;
+	
+	goto T2951;
+T2951:;
+	goto T2944;
+	
+	goto T2948;
+T2948:;
+	goto T2944;
+	
+	goto T2945;
+T2945:;
+	goto T2944;
+T2944:;
+	if(!((V1210)>(0))){
+	goto T2957;
+	}
+	V1210= 0;
+	V1212= va_arg(ap,object);
+	goto T2943;
+	
+	goto T2957;
+T2957:;
+	if(((V1211))==Cnil){
+	goto T2962;
+	}
+	{object V1213;
+	V1213= (V1211)->c.c_car;
+	V1211= (V1211)->c.c_cdr;
+	V1212= (V1213);
+	goto T2943;
+	}
+	goto T2962;
+T2962:;
+	V1212= Cnil;
+	goto T2943;
+T2943:;
+	V1216= tp3(V1206);
+	switch(V1216){
+	case 2:
+	goto T2970;
+T2970:;
+	if(((V1207))==Cnil){
+	goto T2976;
+	}
+	V1217= tp2(V1207);
+	if(!((V1217)==(0))){
+	goto T2979;
+	}
+	goto T2975;
+	
+	goto T2979;
+T2979:;
+	goto T2973;
+	
+	goto T2976;
+T2976:;
+	goto T2973;
+	
+	goto T2975;
+T2975:;
+	V1218= V1207->c.c_car;
+	if(!(((V1218))==(((object)VV[182])))){
+	goto T2982;
+	}
+	{object V1219;
+	V1219= V1207->c.c_cdr;
+	{object V1220;
+	register object V1221;
+	V1220= Cnil;
+	V1221= Cnil;
+	{register object V1222;
+	V1222= (V1219);
+	goto T2990;
+T2990:;
+	if(((V1222))==Cnil){
+	goto T2992;
+	}
+	{object V1224;
+	V1224= (V1222)->c.c_car;
+	{object V1225;
+	{object V1226;
+	V1226= (V1224);
+	if(((V1224))==Cnil){
+	goto T3001;
+	}
+	V1227= tp2(V1224);
+	if(!((V1227)==(0))){
+	goto T3004;
+	}
+	goto T3000;
+	
+	goto T3004;
+T3004:;
+	goto T2998;
+	
+	goto T3001;
+T3001:;
+	goto T2998;
+	
+	goto T3000;
+T3000:;
+	V1228= V1224->c.c_car;
+	if(!(((V1228))==(((object)VV[185])))){
+	goto T3013;
+	}
+	goto T3010;
+	
+	goto T3013;
+T3013:;
+	goto T3009;
+	
+	goto T3010;
+T3010:;
+	{object V1229;
+	{object V1230;
+	V1230= V1224->c.c_cdr;
+	V1229= V1230->c.c_car;}
+	if(((V1229))==Cnil){
+	goto T3023;
+	}
+	V1231= tp5(V1229);
+	switch(V1231){
+	case 19:
+	goto T3028;
+T3028:;
+	goto T3020;
+	
+	default:
+	goto T3029;
+T3029:;
+	goto T3019;
+	}
+	goto T3019;
+	
+	goto T3023;
+T3023:;}
+	goto T3020;
+T3020:;
+	goto T3016;
+	
+	goto T3019;
+T3019:;
+	goto T3009;
+	
+	goto T3016;
+T3016:;
+	{object V1232;
+	V1226= (fcall.fun=((object)VV[39])->s.s_gfdef,fcall.valp=(fixnum)0,fcall.argd=2,/* COMMON-LISP::MACROEXPAND */(*LnkLI163)((V1224),base0[0]));
+	V1232= (V1226);
+	if(((V1232))==Cnil){
+	goto T3035;
+	}
+	V1233= tp5(V1232);
+	switch(V1233){
+	case 19:
+	goto T3040;
+T3040:;
+	goto T3032;
+	
+	default:
+	goto T3041;
+T3041:;
+	goto T3031;
+	}
+	goto T3031;
+	
+	goto T3035;
+T3035:;}
+	goto T3032;
+T3032:;
+	goto T3007;
+	
+	goto T3031;
+T3031:;
+	goto T3009;
+T3009:;
+	V1225= make_cons((V1226),Cnil);
+	goto T2997;
+	
+	goto T3007;
+T3007:;
+	V1225= Cnil;
+	goto T2997;
+	
+	goto T2998;
+T2998:;
+	V1225= Cnil;}
+	goto T2997;
+T2997:;
+	if(((V1221))==Cnil){
+	goto T3044;
+	}
+	(void)((((V1221))->c.c_cdr=((V1225)),((V1221))));
+	goto T3043;
+	
+	goto T3044;
+T3044:;
+	V1220= (V1225);
+	goto T3043;
+T3043:;
+	if(((V1225))==Cnil){
+	goto T3051;
+	}
+	goto T3050;
+	
+	goto T3051;
+T3051:;
+	goto T3048;
+	
+	goto T3050;
+T3050:;
+	V1221= (V1225);
+	goto T2995;
+	
+	goto T3048;
+T3048:;}}
+	goto T2995;
+T2995:;
+	{object V1234;
+	V1234= (V1222)->c.c_cdr;
+	V1222= (V1234);
+	goto T2990;
+	}
+	goto T2992;
+T2992:;
+	goto T2988;
+	}
+	goto T2988;
+T2988:;
+	{object V1236 = (V1220);
+	VMR41(V1236);}}}
+	goto T2982;
+T2982:;
+	{object V1237 = make_cons((V1207),Cnil);
+	VMR41(V1237);}
+	goto T2973;
+T2973:;
+	{object V1238 = Cnil;
+	VMR41(V1238);}
+	case 0:
+	goto T2971;
+T2971:;
+	{object V1239;
+	object V1240;
+	object V1241;
+	object V1242;
+	V1239= V1206->c.c_car;
+	V1240= V1206->c.c_cdr;
+	V1241= (L42__FIND_NON_NULL__loop(base0,(V1239)));
+	V1242= (L42__FIND_NON_NULL__loop(base0,(V1240)));
+	if(((V1241))==Cnil){
+	goto T3065;
+	}
+	goto T3064;
+	
+	goto T3065;
+T3065:;
+	if(((V1242))==Cnil){
+	goto T3062;
+	}
+	goto T3064;
+T3064:;
+	if(((V1242))==Cnil){
+	goto T3068;
+	}
+	{object V1243;
+	object V1244;
+	if(((V1212))==Cnil){
+	goto T3072;
+	}
+	V1243= (V1212);
+	goto T3071;
+	
+	goto T3072;
+T3072:;
+	V1243= (((object)VV[186])->s.s_dbind);
+	goto T3071;
+T3071:;
+	{object V1245;
+	object V1246;
+	object V1247;
+	V1248= list(2,((object)VV[185]),(V1243));
+	V1245= (fcall.argd=2,L44__LOOP_DESETQ_INTERNAL__loop(base0,(V1239),(V1248)));
+	V1249= list(3,((object)VV[47]),(V1243),list(2,((object)VV[45]),(V1243)));
+	V1250= (fcall.argd=3,L44__LOOP_DESETQ_INTERNAL__loop(base0,(V1240),(V1243),(V1243)));
+	V1246= make_cons((V1249),(V1250));
+	V1247= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V1245);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V1246);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V1251;
+	register object V1252;
+	V1251= Cnil;
+	V1252= Cnil;
+	{register object V1253;
+	V1253= (V1245);
+	goto T3085;
+T3085:;
+	if(((V1253))==Cnil){
+	goto T3087;
+	}
+	{object V1255;
+	V1255= (V1253)->c.c_car;
+	{object V1256;
+	V1256= make_cons((V1255),Cnil);
+	if(((V1252))==Cnil){
+	goto T3094;
+	}
+	(void)((((V1252))->c.c_cdr=((V1256)),((V1252))));
+	V1252= (V1256);
+	goto T3093;
+	
+	goto T3094;
+T3094:;
+	V1251= (V1256);
+	V1252= (V1251);
+	goto T3093;
+T3093:;}}
+	{object V1257;
+	V1257= (V1253)->c.c_cdr;
+	V1253= (V1257);
+	goto T3085;
+	}
+	goto T3087;
+T3087:;
+	goto T3083;
+	}
+	goto T3083;
+T3083:;
+	if(((V1252))==Cnil){
+	goto T3104;
+	}
+	(void)((((V1252))->c.c_cdr=((V1246)),((V1252))));
+	V1252= (V1246);
+	goto T3103;
+	
+	goto T3104;
+T3104:;
+	V1251= (V1246);
+	V1252= (V1251);
+	goto T3103;
+T3103:;
+	V1244= (V1251);}}
+	if(((V1212))==Cnil){
+	goto T3109;
+	}
+	{object V1259;
+	object V1260;
+	if(!(((V1243))==((V1207)))){
+	goto T3116;
+	}
+	goto T3113;
+	
+	goto T3116;
+T3116:;
+	V1259= make_cons(list(3,((object)VV[47]),(V1243),(V1207)),Cnil);
+	goto T3112;
+	
+	goto T3113;
+T3113:;
+	V1259= Cnil;
+	goto T3112;
+T3112:;
+	V1260= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V1259);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V1244);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V1261;
+	object V1262;
+	V1261= Cnil;
+	V1262= Cnil;
+	if(((V1259))==Cnil){
+	goto T3123;
+	}
+	{object V1263;
+	V1263= V1259->c.c_car;
+	{object V1264;
+	V1264= make_cons((V1263),Cnil);
+	V1261= (V1264);
+	V1262= (V1261);}}
+	goto T3122;
+	
+	goto T3123;
+T3123:;
+	goto T3122;
+T3122:;
+	if(((V1262))==Cnil){
+	goto T3133;
+	}
+	(void)((((V1262))->c.c_cdr=((V1244)),((V1262))));
+	V1262= (V1244);
+	goto T3132;
+	
+	goto T3133;
+T3133:;
+	V1261= (V1244);
+	V1262= (V1261);
+	goto T3132;
+T3132:;
+	{object V1265 = (V1261);
+	VMR41(V1265);}}}
+	goto T3109;
+T3109:;
+	{object V1266 = make_cons(listA(3,((object)VV[103]),make_cons(list(2,(V1243),(V1207)),Cnil),(V1244)),Cnil);
+	VMR41(V1266);}}
+	goto T3068;
+T3068:;
+	V1267= list(2,((object)VV[185]),(V1207));
+	{object V1268 = (fcall.argd=3,L44__LOOP_DESETQ_INTERNAL__loop(base0,(V1239),(V1267),(V1212)));
+	VMR41(V1268);}
+	goto T3062;
+T3062:;
+	{object V1269 = Cnil;
+	VMR41(V1269);}}
+	default:
+	goto T2972;
+T2972:;
+	if(!(((V1206))==((V1207)))){
+	goto T3142;
+	}
+	goto T3139;
+	
+	goto T3142;
+T3142:;
+	{object V1270 = make_cons(list(3,((object)VV[47]),(V1206),(V1207)),Cnil);
+	VMR41(V1270);}
+	goto T3139;
+T3139:;
+	{object V1271 = Cnil;
+	VMR41(V1271);}}
+	{object V1272 = Cnil;
+	VMR41(V1272);}}
+	#undef base0
+	va_end(ap);
+}
+/*	local function FIND-NON-NULL	*/
+
+static object L42__FIND_NON_NULL__loop(object *base0,object V1274)
+{	
+	VMB42 VMS42 VMV42
+	vs_check;
+	{register object V1275;
+	V1275= (V1274);
+	goto T3145;
+T3145:;
+	if(((V1275))==Cnil){
+	goto T3154;
+	}
+	V1277= tp2((V1275));
+	if(!((V1277)==(0))){
+	goto T3157;
+	}
+	goto T3153;
+	
+	goto T3157;
+T3157:;
+	goto T3152;
+	
+	goto T3154;
+T3154:;
+	goto T3152;
+	
+	goto T3153;
+T3153:;
+	goto T3150;
+	
+	goto T3152;
+T3152:;
+	goto T3147;
+	
+	goto T3150;
+T3150:;
+	{object V1279;
+	V1279= (V1275)->c.c_car;
+	V1275= (V1275)->c.c_cdr;
+	V1278= (V1279);}
+	if(((L42__FIND_NON_NULL__loop(base0,(V1278))))==Cnil){
+	goto T3161;
+	}
+	{object V1282 = Ct;
+	VMR42(V1282);}
+	goto T3161;
+T3161:;
+	goto T3145;
+	
+	goto T3147;
+T3147:;
+	{object V1283 = (V1275);
+	VMR42(V1283);}}
+	#undef base0
+}
+/*	local entry for function ANSI-LOOP::LOOP-CONSTANT-FOLD-IF-POSSIBLE	*/
+
+static object LI45__LOOP_CONSTANT_FOLD_IF_POSSIBLE__loop(object V1285,...)
+{	 VMB43 VMS43 VMV43
+	va_list ap;
+	va_start(ap,V1285);
+	{fixnum V1286;
+	object V1287;
+	int8_t V1288;
+	int8_t V1289;
+	object V1290;
+	object V1291;
+	V1286= fcall.valp;
+	V1287= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V1287))==Cnil){
+	goto T3172;
+	}
+	V1288= -((char)fcall.argd);
+	goto T3171;
+	
+	goto T3172;
+T3172:;
+	V1288= fcall.argd;
+	goto T3171;
+T3171:;
+	V1289= (V1288)-(1);
+	V1290= Cnil;
+	if(((V1287))==Cnil){
+	goto T3178;
+	}
+	if(!((V1289)==(1))){
+	goto T3181;
+	}
+	V1289= 0;
+	V1290= va_arg(ap,object);
+	if(((V1290))==Cnil){
+	goto T3184;
+	}
+	goto T3177;
+	
+	goto T3184;
+T3184:;
+	goto T3177;
+	
+	goto T3181;
+T3181:;
+	goto T3177;
+	
+	goto T3178;
+T3178:;
+	goto T3177;
+T3177:;
+	if(!((V1289)>(0))){
+	goto T3190;
+	}
+	V1289= 0;
+	V1291= va_arg(ap,object);
+	goto T3176;
+	
+	goto T3190;
+T3190:;
+	if(((V1290))==Cnil){
+	goto T3195;
+	}
+	{object V1292;
+	V1292= (V1290)->c.c_car;
+	V1290= (V1290)->c.c_cdr;
+	V1291= (V1292);
+	goto T3176;
+	}
+	goto T3195;
+T3195:;
+	V1291= Cnil;
+	goto T3176;
+T3176:;
+	{object V1295;
+	object V1296;
+	V1295= Cnil;
+	V1296= Cnil;
+	V1295= (fcall.argd=1,/* COMMON-LISP::CONSTANTP */(*LnkLI182)((V1285)));
+	if(((V1295))==Cnil){
+	goto T3202;
+	}
+	V1296= (fcall.fun=((object)VV[188])->s.s_gfdef,fcall.valp=(fixnum)0,/* COMMON-LISP::EVAL */(*LnkLI183)((V1285)));
+	goto T3201;
+	
+	goto T3202;
+T3202:;
+	goto T3201;
+T3201:;
+	if(((V1295))==Cnil){
+	goto T3211;
+	}
+	if(((V1291))==Cnil){
+	goto T3208;
+	}
+	goto T3210;
+	
+	goto T3211;
+T3211:;
+	goto T3208;
+	
+	goto T3210;
+T3210:;
+	if(((fcall.argd=2,/* COMMON-LISP::TYPEP */(*LnkLI184)((V1296),(V1291))))==Cnil){
+	goto T3217;
+	}
+	goto T3214;
+	
+	goto T3217;
+T3217:;
+	(void)((fcall.argd=4,/* ANSI-LOOP::LOOP-WARN */(*LnkLI185)(((object)VV[191]),(V1285),(V1296),(V1291))));
+	V1295= Cnil;
+	V1296= Cnil;
+	goto T3207;
+	
+	goto T3214;
+T3214:;
+	goto T3207;
+	
+	goto T3208;
+T3208:;
+	goto T3207;
+T3207:;
+	{object V1297;
+	if (V1286) {
+	#define V1298 ((object *)V1286)[0]
+	#define V1299 ((object *)V1286)[1]
+	V1297= ({object  _t0=(V1285);object  _t1=(V1295);object  _t2=(V1296);
+	V1298= (_t1);
+	V1299= (_t2);_t0;});
+	#undef V1298
+	#undef V1299
+	} else {
+	V1297= ({object  _t0=(V1285);object  _t1=(V1295);object  _t2=(V1296);
+	(void)((_t1));
+	(void)((_t2));_t0;});
+	}
+	VMRV43(V1297,2);}}}
+	va_end(ap);
+}
+/*	local entry for function ANSI-LOOP::LOOP-CONSTANTP	*/
+
+static object LI46__LOOP_CONSTANTP__loop(object V1301)
+{	 VMB44 VMS44 VMV44
+	{object V1302 = (fcall.argd=1,/* COMMON-LISP::CONSTANTP */(*LnkLI182)((V1301)));
+	VMR44(V1302);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-CODE-DUPLICATION-THRESHOLD	*/
+
+static fixnum LI47__LOOP_CODE_DUPLICATION_THRESHOLD__loop(object V1304)
+{	 VMB45 VMS45 VMV45
+	register int8_t  V1306;
+	object V1305[4];
+	#define V1307 V1305[0]
+	
+	{
+	V1306= (fcall.valp=(fixnum)V1305,/* ANSI-LOOP::LOOP-OPTIMIZATION-QUANTITIES */(*LnkLI186)((V1304)));
+	
+	vs_top=sup;
+	{fixnum V1308 = 40;
+	VMR45(V1308);}
+	#undef V1307
+	
+	}
+}
+/*	local entry for function ANSI-LOOP::LOOP-BODY	*/
+
+static object LI48__LOOP_BODY__loop(object V1311,register object V1312)
+{	 VMB46 VMS46 VMV46
+	{register object V1313;
+	register object V1314;
+	register object V1315;
+	register object V1316;
+	register object V1317;
+	register object V1318;
+	register object V1319;
+	register object V1320;
+	register object V1321;
+	V1313= V1311->c.c_cdr;
+	if(((V1313))==Cnil){
+	goto T3229;
+	}
+	{object V1322;
+	V1322= V1313->c.c_car;
+	V1313= V1313->c.c_cdr;
+	V1314= (V1322);
+	goto T3228;
+	}
+	goto T3229;
+T3229:;
+	V1323= make_cons(((object)VV[193]),Cnil);
+	V1314= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[194]),((object)VV[4]),((object)VV[195]),(V1323)));
+	goto T3228;
+T3228:;
+	if(((V1313))==Cnil){
+	goto T3236;
+	}
+	{object V1324;
+	V1324= (V1313)->c.c_car;
+	V1313= (V1313)->c.c_cdr;
+	V1315= (V1324);
+	goto T3235;
+	}
+	goto T3236;
+T3236:;
+	V1327= make_cons(((object)VV[196]),Cnil);
+	V1315= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[197]),((object)VV[4]),((object)VV[198]),(V1327)));
+	goto T3235;
+T3235:;
+	if(((V1313))==Cnil){
+	goto T3243;
+	}
+	{object V1328;
+	V1328= (V1313)->c.c_car;
+	V1313= (V1313)->c.c_cdr;
+	V1316= (V1328);
+	goto T3242;
+	}
+	goto T3243;
+T3243:;
+	V1331= make_cons(((object)VV[199]),Cnil);
+	V1316= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[200]),((object)VV[4]),((object)VV[201]),(V1331)));
+	goto T3242;
+T3242:;
+	if(((V1313))==Cnil){
+	goto T3250;
+	}
+	{object V1332;
+	V1332= (V1313)->c.c_car;
+	V1313= (V1313)->c.c_cdr;
+	V1317= (V1332);
+	goto T3249;
+	}
+	goto T3250;
+T3250:;
+	V1335= make_cons(((object)VV[202]),Cnil);
+	V1317= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[203]),((object)VV[4]),((object)VV[204]),(V1335)));
+	goto T3249;
+T3249:;
+	if(((V1313))==Cnil){
+	goto T3257;
+	}
+	{object V1336;
+	V1336= (V1313)->c.c_car;
+	V1313= (V1313)->c.c_cdr;
+	V1318= (V1336);
+	goto T3256;
+	}
+	goto T3257;
+T3257:;
+	V1339= make_cons(((object)VV[205]),Cnil);
+	V1318= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[206]),((object)VV[4]),((object)VV[207]),(V1339)));
+	goto T3256;
+T3256:;
+	if(((V1313))==Cnil){
+	goto T3268;
+	}
+	goto T3267;
+	
+	goto T3268;
+T3268:;
+	goto T3265;
+	
+	goto T3267;
+T3267:;
+	{object V1341;
+	V1341= (V1313)->c.c_car;
+	V1313= (V1313)->c.c_cdr;
+	V1340= (V1341);}
+	V1344= make_cons((V1340),Cnil);
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[208]),((object)VV[7]),((object)VV[209]),(V1344))));
+	goto T3264;
+	
+	goto T3265;
+T3265:;
+	goto T3264;
+T3264:;
+	V1319= Cnil;
+	V1320= Cnil;
+	V1321= Cnil;
+	if(!((length((V1315)))==(length((V1317))))){
+	goto T3278;
+	}
+	goto T3275;
+	
+	goto T3278;
+T3278:;
+	(void)((fcall.argd=1,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[210]))));
+	goto T3274;
+	
+	goto T3275;
+T3275:;
+	goto T3274;
+T3274:;
+	V1345= tp2(V1315);
+	if(!((V1345)==(0))){
+	goto T3285;
+	}
+	goto T3284;
+	
+	goto T3285;
+T3285:;
+	goto T3282;
+	
+	goto T3284;
+T3284:;
+	if(((V1315))==Cnil){
+	goto T3288;
+	}
+	{object V1346;
+	object V1347;
+	V1346= V1315->c.c_cdr;
+	V1348= V1315->c.c_car;
+	V1347= make_cons((V1348),Cnil);
+	if(((V1346))==Cnil){
+	goto T3294;
+	}
+	{register object V1349;
+	register object V1350;
+	V1349= (V1346)->c.c_cdr;
+	V1352= (V1346)->c.c_car;
+	V1350= make_cons((V1352),(V1347));
+	goto T3301;
+T3301:;
+	if(((V1349))==Cnil){
+	goto T3303;
+	}
+	{object V1354;
+	object V1355;
+	V1354= (V1349)->c.c_cdr;
+	V1357= (V1349)->c.c_car;
+	V1355= make_cons((V1357),(V1350));
+	V1349= (V1354);
+	V1350= (V1355);
+	goto T3301;
+	}
+	goto T3303;
+T3303:;
+	V1319= (V1350);
+	goto T3281;
+	}
+	goto T3294;
+T3294:;
+	V1319= (V1347);
+	goto T3281;
+	}
+	goto T3288;
+T3288:;
+	V1319= Cnil;
+	goto T3281;
+	
+	goto T3282;
+T3282:;
+	{register fixnum V1359;
+	register object V1360;
+	fixnum V1361;
+	V1362= tp4(V1315);
+	switch(V1362){
+	case 8:
+	goto T3319;
+T3319:;
+	case 11:
+	goto T3320;
+T3320:;
+	case 13:
+	goto T3321;
+T3321:;
+	{fixnum V1364;
+	{fixnum V1365;
+	V1365= ((fixnum)V1315);
+	V1364= ((uchar*)V1365)[(fixnum)2];}
+	V1363= (V1364&(fixnum)1);}
+	if(!((V1363)==(0))){
+	goto T3323;
+	}
+	goto T3314;
+	
+	goto T3323;
+T3323:;
+	goto T3316;
+	
+	default:
+	goto T3322;
+T3322:;
+	goto T3314;
+	}
+	goto T3314;
+	
+	goto T3316;
+T3316:;
+	{fixnum V1366;
+	{fixnum V1367;
+	V1367= ((fixnum)V1315);
+	V1366= ((uint*)V1367)[(fixnum)4];}
+	V1359= (V1366&(fixnum)268435455);
+	goto T3313;
+	}
+	goto T3314;
+T3314:;
+	{fixnum V1368;
+	{fixnum V1369;
+	V1369= ((fixnum)V1315);
+	V1368= ((uint*)V1369)[(fixnum)1];}
+	V1359= (V1368>>(fixnum)4);}
+	goto T3313;
+T3313:;
+	{object V1370;
+	object V1371;
+	V1370= Cnil;
+	V1371= (/* COMMON-LISP::ARRAY-ELEMENT-TYPE */(*LnkLI187)((V1315)));
+	V1370= (V1371);
+	{object V1372;
+	if(!(((V1370))==(Ct))){
+	goto T3339;
+	}
+	V1372= (V1370);
+	goto T3338;
+	
+	goto T3339;
+T3339:;
+	if(!(((V1370))==(((object)VV[212])))){
+	goto T3342;
+	}
+	V1372= (V1370);
+	goto T3338;
+	
+	goto T3342;
+T3342:;
+	if(!(((V1370))==(((object)VV[213])))){
+	goto T3345;
+	}
+	V1372= (V1370);
+	goto T3338;
+	
+	goto T3345;
+T3345:;
+	if(!(((V1370))==(((object)VV[214])))){
+	goto T3348;
+	}
+	V1372= (V1370);
+	goto T3338;
+	
+	goto T3348;
+T3348:;
+	if(!(((V1370))==(((object)VV[215])))){
+	goto T3351;
+	}
+	V1372= (V1370);
+	goto T3338;
+	
+	goto T3351;
+T3351:;
+	if(!(((V1370))==(((object)VV[216])))){
+	goto T3354;
+	}
+	V1372= (V1370);
+	goto T3338;
+	
+	goto T3354;
+T3354:;
+	if(!(((V1370))==(((object)VV[217])))){
+	goto T3357;
+	}
+	V1372= (V1370);
+	goto T3338;
+	
+	goto T3357;
+T3357:;
+	if(!(((V1370))==(((object)VV[218])))){
+	goto T3360;
+	}
+	V1372= (V1370);
+	goto T3338;
+	
+	goto T3360;
+T3360:;
+	if(!(((V1370))==(((object)VV[219])))){
+	goto T3363;
+	}
+	V1372= (V1370);
+	goto T3338;
+	
+	goto T3363;
+T3363:;
+	if(!(((V1370))==(((object)VV[220])))){
+	goto T3366;
+	}
+	V1372= (V1370);
+	goto T3338;
+	
+	goto T3366;
+T3366:;
+	if(!(((V1370))==(((object)VV[221])))){
+	goto T3369;
+	}
+	V1372= (V1370);
+	goto T3338;
+	
+	goto T3369;
+T3369:;
+	if(!(((V1370))==(((object)VV[222])))){
+	goto T3372;
+	}
+	V1372= (V1370);
+	goto T3338;
+	
+	goto T3372;
+T3372:;
+	if(!(((V1370))==(((object)VV[223])))){
+	goto T3375;
+	}
+	V1372= (V1370);
+	goto T3338;
+	
+	goto T3375;
+T3375:;
+	if(!(((V1370))==(((object)VV[224])))){
+	goto T3378;
+	}
+	V1372= (V1370);
+	goto T3338;
+	
+	goto T3378;
+T3378:;
+	if(!(((V1370))==(((object)VV[225])))){
+	goto T3381;
+	}
+	V1372= (V1370);
+	goto T3338;
+	
+	goto T3381;
+T3381:;
+	if(!(((V1370))==(((object)VV[226])))){
+	goto T3384;
+	}
+	V1372= (V1370);
+	goto T3338;
+	
+	goto T3384;
+T3384:;
+	V1372= (/* SYSTEM::EXPAND-ARRAY-ELEMENT-TYPE */(*LnkLI188)((V1370)));
+	goto T3338;
+T3338:;
+	{object V1373;
+	V1373= (fcall.fun=((object)VV[228])->s.s_gfdef,/* SYSTEM::MAKE-VECTOR */(*LnkLI189)((V1372),V1359,Cnil,Cnil,Cnil,(fixnum)0,Cnil,Cnil));
+	V1360= (V1373);}}}
+	{fixnum V1374;
+	V1374= (V1359)-(1);
+	V1361= V1374;}
+	if(!((0)<(V1359))){
+	goto T3393;
+	}
+	if(!((V1361)>=(0))){
+	goto T3390;
+	}
+	goto T3392;
+	
+	goto T3393;
+T3393:;
+	goto T3390;
+	
+	goto T3392;
+T3392:;
+	{fixnum V1376;
+	{fixnum V1377;
+	{fixnum V1378;
+	V1378= ((fixnum)V1360);
+	V1377= ((ushort*)V1378)[(fixnum)1];}
+	V1376= (V1377>>(fixnum)6);}
+	V1375= (V1376&(fixnum)15);}
+	switch(V1375){
+	case 4:
+	goto T3402;
+T3402:;
+	{fixnum V1379;
+	fixnum V1380;
+	{fixnum V1381;
+	V1381= ((fixnum)V1360);
+	V1379= ((fixnum*)V1381)[(fixnum)1];}
+	if(!(((V1360))==((V1315)))){
+	goto T3410;
+	}
+	V1380= V1379;
+	goto T3409;
+	
+	goto T3410;
+T3410:;
+	{fixnum V1382;
+	V1382= ((fixnum)V1315);
+	V1380= ((fixnum*)V1382)[(fixnum)1];}
+	goto T3409;
+T3409:;
+	{fixnum V1383;
+	V1383= ((fixnum*)V1380)[V1361];
+	(void)(((fixnum*)V1379)[(fixnum)0]=V1383);}
+	goto T3396;
+	}
+	case 3:
+	goto T3403;
+T3403:;
+	{fixnum V1384;
+	fixnum V1385;
+	{fixnum V1386;
+	V1386= ((fixnum)V1360);
+	V1384= ((fixnum*)V1386)[(fixnum)1];}
+	if(!(((V1360))==((V1315)))){
+	goto T3419;
+	}
+	V1385= V1384;
+	goto T3418;
+	
+	goto T3419;
+T3419:;
+	{fixnum V1387;
+	V1387= ((fixnum)V1315);
+	V1385= ((fixnum*)V1387)[(fixnum)1];}
+	goto T3418;
+T3418:;
+	{fixnum V1388;
+	V1388= ((int*)V1385)[V1361];
+	(void)(((int*)V1384)[(fixnum)0]=(int)V1388);}
+	goto T3396;
+	}
+	case 2:
+	goto T3404;
+T3404:;
+	{fixnum V1389;
+	fixnum V1390;
+	{fixnum V1391;
+	V1391= ((fixnum)V1360);
+	V1389= ((fixnum*)V1391)[(fixnum)1];}
+	if(!(((V1360))==((V1315)))){
+	goto T3428;
+	}
+	V1390= V1389;
+	goto T3427;
+	
+	goto T3428;
+T3428:;
+	{fixnum V1392;
+	V1392= ((fixnum)V1315);
+	V1390= ((fixnum*)V1392)[(fixnum)1];}
+	goto T3427;
+T3427:;
+	{fixnum V1393;
+	V1393= ((short*)V1390)[V1361];
+	(void)(((short*)V1389)[(fixnum)0]=(short)V1393);}
+	goto T3396;
+	}
+	case 0:
+	goto T3405;
+T3405:;
+	{int8_t V1394;
+	{fixnum V1395;
+	fixnum V1396;
+	fixnum V1397;
+	int8_t V1398;
+	{int8_t V1399;
+	V1400= tp6(V1315);
+	switch(V1400){
+	case 353:
+	goto T3440;
+T3440:;
+	{int8_t V1401;
+	{fixnum V1402;
+	{fixnum V1403;
+	V1403= ((fixnum)V1315);
+	V1402= ((uchar*)V1403)[(fixnum)2];}
+	V1401= (V1402>>(fixnum)3);}
+	V1399= ((fixnum)V1401&(fixnum)7);
+	goto T3437;
+	}
+	default:
+	goto T3441;
+T3441:;
+	V1399= 0;
+	goto T3437;
+	}
+	V1399= fix(Cnil);
+	goto T3437;
+T3437:;
+	{fixnum V1404;
+	V1404= (V1361)+(V1399);
+	V1395= V1404;}}
+	V1396= (V1395>>(fixnum)6);
+	{fixnum V1405;
+	{fixnum V1406;
+	V1406= ((fixnum)V1315);
+	V1405= ((fixnum*)V1406)[(fixnum)1];}
+	V1397= ((fixnum*)V1405)[V1396];}
+	V1398= (V1395&(fixnum)63);
+	{fixnum V1407;
+	V1407= (V1397>>(fixnum)V1398);
+	V1394= (V1407&(fixnum)1);}}
+	{fixnum V1408;
+	{fixnum V1409;
+	{fixnum V1410;
+	V1410= ((fixnum)V1360);
+	V1409= ((fixnum*)V1410)[(fixnum)1];}
+	V1408= ((fixnum*)V1409)[(fixnum)0];}
+	{fixnum V1411;
+	fixnum V1412;
+	{fixnum V1413;
+	V1413= ((fixnum)V1360);
+	V1411= ((fixnum*)V1413)[(fixnum)1];}
+	if(!((V1394)==(0))){
+	goto T3460;
+	}
+	{int8_t V1414;
+	V1414= (~(fixnum)1);
+	V1412= (V1408&(fixnum)V1414);
+	goto T3459;
+	}
+	goto T3460;
+T3460:;
+	V1412= (V1408|(fixnum)1);
+	goto T3459;
+T3459:;
+	(void)(((fixnum*)V1411)[(fixnum)0]=V1412);}}}
+	goto T3396;
+	
+	case 1:
+	goto T3406;
+T3406:;
+	{fixnum V1415;
+	fixnum V1416;
+	{fixnum V1417;
+	V1417= ((fixnum)V1360);
+	V1415= ((fixnum*)V1417)[(fixnum)1];}
+	if(!(((V1360))==((V1315)))){
+	goto T3468;
+	}
+	V1416= V1415;
+	goto T3467;
+	
+	goto T3468;
+T3468:;
+	{fixnum V1418;
+	V1418= ((fixnum)V1315);
+	V1416= ((fixnum*)V1418)[(fixnum)1];}
+	goto T3467;
+T3467:;
+	{int8_t V1419;
+	V1419= ((char*)V1416)[V1361];
+	(void)(((char*)V1415)[(fixnum)0]=V1419);}
+	goto T3396;
+	}}
+	goto T3396;
+T3396:;
+	{register fixnum V1420;
+	register fixnum V1421;
+	V1420= 1;
+	{fixnum V1422;
+	V1422= (V1361)-(1);
+	V1421= V1422;}
+	goto T3478;
+T3478:;
+	if(!((V1420)<(V1359))){
+	goto T3483;
+	}
+	if(!((V1421)>=(0))){
+	goto T3480;
+	}
+	goto T3482;
+	
+	goto T3483;
+T3483:;
+	goto T3480;
+	
+	goto T3482;
+T3482:;
+	{fixnum V1423;
+	fixnum V1424;
+	V1423= V1420;
+	V1424= V1421;
+	{fixnum V1426;
+	{fixnum V1427;
+	{fixnum V1428;
+	V1428= ((fixnum)V1360);
+	V1427= ((ushort*)V1428)[(fixnum)1];}
+	V1426= (V1427>>(fixnum)6);}
+	V1425= (V1426&(fixnum)15);}
+	switch(V1425){
+	case 4:
+	goto T3494;
+T3494:;
+	{fixnum V1429;
+	fixnum V1430;
+	{fixnum V1431;
+	V1431= ((fixnum)V1360);
+	V1429= ((fixnum*)V1431)[(fixnum)1];}
+	if(!(((V1360))==((V1315)))){
+	goto T3502;
+	}
+	V1430= V1429;
+	goto T3501;
+	
+	goto T3502;
+T3502:;
+	{fixnum V1432;
+	V1432= ((fixnum)V1315);
+	V1430= ((fixnum*)V1432)[(fixnum)1];}
+	goto T3501;
+T3501:;
+	{fixnum V1433;
+	V1433= ((fixnum*)V1430)[V1424];
+	(void)(((fixnum*)V1429)[V1423]=V1433);}
+	goto T3486;
+	}
+	case 3:
+	goto T3495;
+T3495:;
+	{fixnum V1434;
+	fixnum V1435;
+	{fixnum V1436;
+	V1436= ((fixnum)V1360);
+	V1434= ((fixnum*)V1436)[(fixnum)1];}
+	if(!(((V1360))==((V1315)))){
+	goto T3511;
+	}
+	V1435= V1434;
+	goto T3510;
+	
+	goto T3511;
+T3511:;
+	{fixnum V1437;
+	V1437= ((fixnum)V1315);
+	V1435= ((fixnum*)V1437)[(fixnum)1];}
+	goto T3510;
+T3510:;
+	{fixnum V1438;
+	V1438= ((int*)V1435)[V1424];
+	(void)(((int*)V1434)[V1423]=(int)V1438);}
+	goto T3486;
+	}
+	case 2:
+	goto T3496;
+T3496:;
+	{fixnum V1439;
+	fixnum V1440;
+	{fixnum V1441;
+	V1441= ((fixnum)V1360);
+	V1439= ((fixnum*)V1441)[(fixnum)1];}
+	if(!(((V1360))==((V1315)))){
+	goto T3520;
+	}
+	V1440= V1439;
+	goto T3519;
+	
+	goto T3520;
+T3520:;
+	{fixnum V1442;
+	V1442= ((fixnum)V1315);
+	V1440= ((fixnum*)V1442)[(fixnum)1];}
+	goto T3519;
+T3519:;
+	{fixnum V1443;
+	V1443= ((short*)V1440)[V1424];
+	(void)(((short*)V1439)[V1423]=(short)V1443);}
+	goto T3486;
+	}
+	case 0:
+	goto T3497;
+T3497:;
+	{int8_t V1444;
+	{fixnum V1445;
+	fixnum V1446;
+	fixnum V1447;
+	int8_t V1448;
+	{int8_t V1449;
+	V1450= tp6(V1315);
+	switch(V1450){
+	case 353:
+	goto T3532;
+T3532:;
+	{int8_t V1451;
+	{fixnum V1452;
+	{fixnum V1453;
+	V1453= ((fixnum)V1315);
+	V1452= ((uchar*)V1453)[(fixnum)2];}
+	V1451= (V1452>>(fixnum)3);}
+	V1449= ((fixnum)V1451&(fixnum)7);
+	goto T3529;
+	}
+	default:
+	goto T3533;
+T3533:;
+	V1449= 0;
+	goto T3529;
+	}
+	V1449= fix(Cnil);
+	goto T3529;
+T3529:;
+	{fixnum V1454;
+	V1454= (V1424)+(V1449);
+	V1445= V1454;}}
+	V1446= (V1445>>(fixnum)6);
+	{fixnum V1455;
+	{fixnum V1456;
+	V1456= ((fixnum)V1315);
+	V1455= ((fixnum*)V1456)[(fixnum)1];}
+	V1447= ((fixnum*)V1455)[V1446];}
+	V1448= (V1445&(fixnum)63);
+	{fixnum V1457;
+	V1457= (V1447>>(fixnum)V1448);
+	V1444= (V1457&(fixnum)1);}}
+	{fixnum V1458;
+	fixnum V1459;
+	fixnum V1460;
+	int8_t V1461;
+	fixnum V1462;
+	{fixnum V1463;
+	V1463= (V1423)+(0);
+	V1458= V1463;}
+	V1459= (V1458>>(fixnum)6);
+	{fixnum V1464;
+	{fixnum V1465;
+	V1465= ((fixnum)V1360);
+	V1464= ((fixnum*)V1465)[(fixnum)1];}
+	V1460= ((fixnum*)V1464)[V1459];}
+	V1461= (V1458&(fixnum)63);
+	V1462= ((fixnum)1<<(fixnum)V1461);
+	{fixnum V1466;
+	fixnum V1467;
+	{fixnum V1468;
+	V1468= ((fixnum)V1360);
+	V1466= ((fixnum*)V1468)[(fixnum)1];}
+	if(!((V1444)==(0))){
+	goto T3557;
+	}
+	{fixnum V1469;
+	V1469= (~V1462);
+	V1467= (V1460&V1469);
+	goto T3556;
+	}
+	goto T3557;
+T3557:;
+	V1467= (V1460|V1462);
+	goto T3556;
+T3556:;
+	(void)(((fixnum*)V1466)[V1459]=V1467);}}}
+	goto T3486;
+	
+	case 1:
+	goto T3498;
+T3498:;
+	{fixnum V1470;
+	fixnum V1471;
+	{fixnum V1472;
+	V1472= ((fixnum)V1360);
+	V1470= ((fixnum*)V1472)[(fixnum)1];}
+	if(!(((V1360))==((V1315)))){
+	goto T3565;
+	}
+	V1471= V1470;
+	goto T3564;
+	
+	goto T3565;
+T3565:;
+	{fixnum V1473;
+	V1473= ((fixnum)V1315);
+	V1471= ((fixnum*)V1473)[(fixnum)1];}
+	goto T3564;
+T3564:;
+	{int8_t V1474;
+	V1474= ((char*)V1471)[V1424];
+	(void)(((char*)V1470)[V1423]=V1474);}
+	goto T3486;
+	}}}
+	goto T3486;
+T3486:;
+	{fixnum V1475;
+	fixnum V1476;
+	{fixnum V1477;
+	V1477= V1420;
+	{fixnum V1478;
+	V1478= (V1477)+(1);
+	V1475= V1478;}}
+	{fixnum V1479;
+	V1479= V1421;
+	{fixnum V1480;
+	V1480= (V1479)-(1);
+	V1476= V1480;}}
+	V1420= V1475;
+	V1421= V1476;
+	goto T3478;
+	}
+	goto T3480;
+T3480:;
+	V1319= (V1360);
+	goto T3281;
+	}
+	goto T3390;
+T3390:;
+	V1319= (V1360);}
+	goto T3281;
+T3281:;
+	V1481= tp2(V1317);
+	if(!((V1481)==(0))){
+	goto T3586;
+	}
+	goto T3585;
+	
+	goto T3586;
+T3586:;
+	goto T3583;
+	
+	goto T3585;
+T3585:;
+	if(((V1317))==Cnil){
+	goto T3589;
+	}
+	{object V1482;
+	object V1483;
+	V1482= V1317->c.c_cdr;
+	V1484= V1317->c.c_car;
+	V1483= make_cons((V1484),Cnil);
+	if(((V1482))==Cnil){
+	goto T3595;
+	}
+	{register object V1485;
+	register object V1486;
+	V1485= (V1482)->c.c_cdr;
+	V1488= (V1482)->c.c_car;
+	V1486= make_cons((V1488),(V1483));
+	goto T3602;
+T3602:;
+	if(((V1485))==Cnil){
+	goto T3604;
+	}
+	{object V1490;
+	object V1491;
+	V1490= (V1485)->c.c_cdr;
+	V1493= (V1485)->c.c_car;
+	V1491= make_cons((V1493),(V1486));
+	V1485= (V1490);
+	V1486= (V1491);
+	goto T3602;
+	}
+	goto T3604;
+T3604:;
+	V1320= (V1486);
+	goto T3582;
+	}
+	goto T3595;
+T3595:;
+	V1320= (V1483);
+	goto T3582;
+	}
+	goto T3589;
+T3589:;
+	V1320= Cnil;
+	goto T3582;
+	
+	goto T3583;
+T3583:;
+	{register fixnum V1495;
+	register object V1496;
+	fixnum V1497;
+	V1498= tp4(V1317);
+	switch(V1498){
+	case 8:
+	goto T3620;
+T3620:;
+	case 11:
+	goto T3621;
+T3621:;
+	case 13:
+	goto T3622;
+T3622:;
+	{fixnum V1500;
+	{fixnum V1501;
+	V1501= ((fixnum)V1317);
+	V1500= ((uchar*)V1501)[(fixnum)2];}
+	V1499= (V1500&(fixnum)1);}
+	if(!((V1499)==(0))){
+	goto T3624;
+	}
+	goto T3615;
+	
+	goto T3624;
+T3624:;
+	goto T3617;
+	
+	default:
+	goto T3623;
+T3623:;
+	goto T3615;
+	}
+	goto T3615;
+	
+	goto T3617;
+T3617:;
+	{fixnum V1502;
+	{fixnum V1503;
+	V1503= ((fixnum)V1317);
+	V1502= ((uint*)V1503)[(fixnum)4];}
+	V1495= (V1502&(fixnum)268435455);
+	goto T3614;
+	}
+	goto T3615;
+T3615:;
+	{fixnum V1504;
+	{fixnum V1505;
+	V1505= ((fixnum)V1317);
+	V1504= ((uint*)V1505)[(fixnum)1];}
+	V1495= (V1504>>(fixnum)4);}
+	goto T3614;
+T3614:;
+	{object V1506;
+	object V1507;
+	V1506= Cnil;
+	V1507= (/* COMMON-LISP::ARRAY-ELEMENT-TYPE */(*LnkLI187)((V1317)));
+	V1506= (V1507);
+	{object V1508;
+	if(!(((V1506))==(Ct))){
+	goto T3640;
+	}
+	V1508= (V1506);
+	goto T3639;
+	
+	goto T3640;
+T3640:;
+	if(!(((V1506))==(((object)VV[212])))){
+	goto T3643;
+	}
+	V1508= (V1506);
+	goto T3639;
+	
+	goto T3643;
+T3643:;
+	if(!(((V1506))==(((object)VV[213])))){
+	goto T3646;
+	}
+	V1508= (V1506);
+	goto T3639;
+	
+	goto T3646;
+T3646:;
+	if(!(((V1506))==(((object)VV[214])))){
+	goto T3649;
+	}
+	V1508= (V1506);
+	goto T3639;
+	
+	goto T3649;
+T3649:;
+	if(!(((V1506))==(((object)VV[215])))){
+	goto T3652;
+	}
+	V1508= (V1506);
+	goto T3639;
+	
+	goto T3652;
+T3652:;
+	if(!(((V1506))==(((object)VV[216])))){
+	goto T3655;
+	}
+	V1508= (V1506);
+	goto T3639;
+	
+	goto T3655;
+T3655:;
+	if(!(((V1506))==(((object)VV[217])))){
+	goto T3658;
+	}
+	V1508= (V1506);
+	goto T3639;
+	
+	goto T3658;
+T3658:;
+	if(!(((V1506))==(((object)VV[218])))){
+	goto T3661;
+	}
+	V1508= (V1506);
+	goto T3639;
+	
+	goto T3661;
+T3661:;
+	if(!(((V1506))==(((object)VV[219])))){
+	goto T3664;
+	}
+	V1508= (V1506);
+	goto T3639;
+	
+	goto T3664;
+T3664:;
+	if(!(((V1506))==(((object)VV[220])))){
+	goto T3667;
+	}
+	V1508= (V1506);
+	goto T3639;
+	
+	goto T3667;
+T3667:;
+	if(!(((V1506))==(((object)VV[221])))){
+	goto T3670;
+	}
+	V1508= (V1506);
+	goto T3639;
+	
+	goto T3670;
+T3670:;
+	if(!(((V1506))==(((object)VV[222])))){
+	goto T3673;
+	}
+	V1508= (V1506);
+	goto T3639;
+	
+	goto T3673;
+T3673:;
+	if(!(((V1506))==(((object)VV[223])))){
+	goto T3676;
+	}
+	V1508= (V1506);
+	goto T3639;
+	
+	goto T3676;
+T3676:;
+	if(!(((V1506))==(((object)VV[224])))){
+	goto T3679;
+	}
+	V1508= (V1506);
+	goto T3639;
+	
+	goto T3679;
+T3679:;
+	if(!(((V1506))==(((object)VV[225])))){
+	goto T3682;
+	}
+	V1508= (V1506);
+	goto T3639;
+	
+	goto T3682;
+T3682:;
+	if(!(((V1506))==(((object)VV[226])))){
+	goto T3685;
+	}
+	V1508= (V1506);
+	goto T3639;
+	
+	goto T3685;
+T3685:;
+	V1508= (/* SYSTEM::EXPAND-ARRAY-ELEMENT-TYPE */(*LnkLI188)((V1506)));
+	goto T3639;
+T3639:;
+	{object V1509;
+	V1509= (fcall.fun=((object)VV[228])->s.s_gfdef,/* SYSTEM::MAKE-VECTOR */(*LnkLI189)((V1508),V1495,Cnil,Cnil,Cnil,(fixnum)0,Cnil,Cnil));
+	V1496= (V1509);}}}
+	{fixnum V1510;
+	V1510= (V1495)-(1);
+	V1497= V1510;}
+	if(!((0)<(V1495))){
+	goto T3694;
+	}
+	if(!((V1497)>=(0))){
+	goto T3691;
+	}
+	goto T3693;
+	
+	goto T3694;
+T3694:;
+	goto T3691;
+	
+	goto T3693;
+T3693:;
+	{fixnum V1512;
+	{fixnum V1513;
+	{fixnum V1514;
+	V1514= ((fixnum)V1496);
+	V1513= ((ushort*)V1514)[(fixnum)1];}
+	V1512= (V1513>>(fixnum)6);}
+	V1511= (V1512&(fixnum)15);}
+	switch(V1511){
+	case 4:
+	goto T3703;
+T3703:;
+	{fixnum V1515;
+	fixnum V1516;
+	{fixnum V1517;
+	V1517= ((fixnum)V1496);
+	V1515= ((fixnum*)V1517)[(fixnum)1];}
+	if(!(((V1496))==((V1317)))){
+	goto T3711;
+	}
+	V1516= V1515;
+	goto T3710;
+	
+	goto T3711;
+T3711:;
+	{fixnum V1518;
+	V1518= ((fixnum)V1317);
+	V1516= ((fixnum*)V1518)[(fixnum)1];}
+	goto T3710;
+T3710:;
+	{fixnum V1519;
+	V1519= ((fixnum*)V1516)[V1497];
+	(void)(((fixnum*)V1515)[(fixnum)0]=V1519);}
+	goto T3697;
+	}
+	case 3:
+	goto T3704;
+T3704:;
+	{fixnum V1520;
+	fixnum V1521;
+	{fixnum V1522;
+	V1522= ((fixnum)V1496);
+	V1520= ((fixnum*)V1522)[(fixnum)1];}
+	if(!(((V1496))==((V1317)))){
+	goto T3720;
+	}
+	V1521= V1520;
+	goto T3719;
+	
+	goto T3720;
+T3720:;
+	{fixnum V1523;
+	V1523= ((fixnum)V1317);
+	V1521= ((fixnum*)V1523)[(fixnum)1];}
+	goto T3719;
+T3719:;
+	{fixnum V1524;
+	V1524= ((int*)V1521)[V1497];
+	(void)(((int*)V1520)[(fixnum)0]=(int)V1524);}
+	goto T3697;
+	}
+	case 2:
+	goto T3705;
+T3705:;
+	{fixnum V1525;
+	fixnum V1526;
+	{fixnum V1527;
+	V1527= ((fixnum)V1496);
+	V1525= ((fixnum*)V1527)[(fixnum)1];}
+	if(!(((V1496))==((V1317)))){
+	goto T3729;
+	}
+	V1526= V1525;
+	goto T3728;
+	
+	goto T3729;
+T3729:;
+	{fixnum V1528;
+	V1528= ((fixnum)V1317);
+	V1526= ((fixnum*)V1528)[(fixnum)1];}
+	goto T3728;
+T3728:;
+	{fixnum V1529;
+	V1529= ((short*)V1526)[V1497];
+	(void)(((short*)V1525)[(fixnum)0]=(short)V1529);}
+	goto T3697;
+	}
+	case 0:
+	goto T3706;
+T3706:;
+	{int8_t V1530;
+	{fixnum V1531;
+	fixnum V1532;
+	fixnum V1533;
+	int8_t V1534;
+	{int8_t V1535;
+	V1536= tp6(V1317);
+	switch(V1536){
+	case 353:
+	goto T3741;
+T3741:;
+	{int8_t V1537;
+	{fixnum V1538;
+	{fixnum V1539;
+	V1539= ((fixnum)V1317);
+	V1538= ((uchar*)V1539)[(fixnum)2];}
+	V1537= (V1538>>(fixnum)3);}
+	V1535= ((fixnum)V1537&(fixnum)7);
+	goto T3738;
+	}
+	default:
+	goto T3742;
+T3742:;
+	V1535= 0;
+	goto T3738;
+	}
+	V1535= fix(Cnil);
+	goto T3738;
+T3738:;
+	{fixnum V1540;
+	V1540= (V1497)+(V1535);
+	V1531= V1540;}}
+	V1532= (V1531>>(fixnum)6);
+	{fixnum V1541;
+	{fixnum V1542;
+	V1542= ((fixnum)V1317);
+	V1541= ((fixnum*)V1542)[(fixnum)1];}
+	V1533= ((fixnum*)V1541)[V1532];}
+	V1534= (V1531&(fixnum)63);
+	{fixnum V1543;
+	V1543= (V1533>>(fixnum)V1534);
+	V1530= (V1543&(fixnum)1);}}
+	{fixnum V1544;
+	{fixnum V1545;
+	{fixnum V1546;
+	V1546= ((fixnum)V1496);
+	V1545= ((fixnum*)V1546)[(fixnum)1];}
+	V1544= ((fixnum*)V1545)[(fixnum)0];}
+	{fixnum V1547;
+	fixnum V1548;
+	{fixnum V1549;
+	V1549= ((fixnum)V1496);
+	V1547= ((fixnum*)V1549)[(fixnum)1];}
+	if(!((V1530)==(0))){
+	goto T3761;
+	}
+	{int8_t V1550;
+	V1550= (~(fixnum)1);
+	V1548= (V1544&(fixnum)V1550);
+	goto T3760;
+	}
+	goto T3761;
+T3761:;
+	V1548= (V1544|(fixnum)1);
+	goto T3760;
+T3760:;
+	(void)(((fixnum*)V1547)[(fixnum)0]=V1548);}}}
+	goto T3697;
+	
+	case 1:
+	goto T3707;
+T3707:;
+	{fixnum V1551;
+	fixnum V1552;
+	{fixnum V1553;
+	V1553= ((fixnum)V1496);
+	V1551= ((fixnum*)V1553)[(fixnum)1];}
+	if(!(((V1496))==((V1317)))){
+	goto T3769;
+	}
+	V1552= V1551;
+	goto T3768;
+	
+	goto T3769;
+T3769:;
+	{fixnum V1554;
+	V1554= ((fixnum)V1317);
+	V1552= ((fixnum*)V1554)[(fixnum)1];}
+	goto T3768;
+T3768:;
+	{int8_t V1555;
+	V1555= ((char*)V1552)[V1497];
+	(void)(((char*)V1551)[(fixnum)0]=V1555);}
+	goto T3697;
+	}}
+	goto T3697;
+T3697:;
+	{register fixnum V1556;
+	register fixnum V1557;
+	V1556= 1;
+	{fixnum V1558;
+	V1558= (V1497)-(1);
+	V1557= V1558;}
+	goto T3779;
+T3779:;
+	if(!((V1556)<(V1495))){
+	goto T3784;
+	}
+	if(!((V1557)>=(0))){
+	goto T3781;
+	}
+	goto T3783;
+	
+	goto T3784;
+T3784:;
+	goto T3781;
+	
+	goto T3783;
+T3783:;
+	{fixnum V1559;
+	fixnum V1560;
+	V1559= V1556;
+	V1560= V1557;
+	{fixnum V1562;
+	{fixnum V1563;
+	{fixnum V1564;
+	V1564= ((fixnum)V1496);
+	V1563= ((ushort*)V1564)[(fixnum)1];}
+	V1562= (V1563>>(fixnum)6);}
+	V1561= (V1562&(fixnum)15);}
+	switch(V1561){
+	case 4:
+	goto T3795;
+T3795:;
+	{fixnum V1565;
+	fixnum V1566;
+	{fixnum V1567;
+	V1567= ((fixnum)V1496);
+	V1565= ((fixnum*)V1567)[(fixnum)1];}
+	if(!(((V1496))==((V1317)))){
+	goto T3803;
+	}
+	V1566= V1565;
+	goto T3802;
+	
+	goto T3803;
+T3803:;
+	{fixnum V1568;
+	V1568= ((fixnum)V1317);
+	V1566= ((fixnum*)V1568)[(fixnum)1];}
+	goto T3802;
+T3802:;
+	{fixnum V1569;
+	V1569= ((fixnum*)V1566)[V1560];
+	(void)(((fixnum*)V1565)[V1559]=V1569);}
+	goto T3787;
+	}
+	case 3:
+	goto T3796;
+T3796:;
+	{fixnum V1570;
+	fixnum V1571;
+	{fixnum V1572;
+	V1572= ((fixnum)V1496);
+	V1570= ((fixnum*)V1572)[(fixnum)1];}
+	if(!(((V1496))==((V1317)))){
+	goto T3812;
+	}
+	V1571= V1570;
+	goto T3811;
+	
+	goto T3812;
+T3812:;
+	{fixnum V1573;
+	V1573= ((fixnum)V1317);
+	V1571= ((fixnum*)V1573)[(fixnum)1];}
+	goto T3811;
+T3811:;
+	{fixnum V1574;
+	V1574= ((int*)V1571)[V1560];
+	(void)(((int*)V1570)[V1559]=(int)V1574);}
+	goto T3787;
+	}
+	case 2:
+	goto T3797;
+T3797:;
+	{fixnum V1575;
+	fixnum V1576;
+	{fixnum V1577;
+	V1577= ((fixnum)V1496);
+	V1575= ((fixnum*)V1577)[(fixnum)1];}
+	if(!(((V1496))==((V1317)))){
+	goto T3821;
+	}
+	V1576= V1575;
+	goto T3820;
+	
+	goto T3821;
+T3821:;
+	{fixnum V1578;
+	V1578= ((fixnum)V1317);
+	V1576= ((fixnum*)V1578)[(fixnum)1];}
+	goto T3820;
+T3820:;
+	{fixnum V1579;
+	V1579= ((short*)V1576)[V1560];
+	(void)(((short*)V1575)[V1559]=(short)V1579);}
+	goto T3787;
+	}
+	case 0:
+	goto T3798;
+T3798:;
+	{int8_t V1580;
+	{fixnum V1581;
+	fixnum V1582;
+	fixnum V1583;
+	int8_t V1584;
+	{int8_t V1585;
+	V1586= tp6(V1317);
+	switch(V1586){
+	case 353:
+	goto T3833;
+T3833:;
+	{int8_t V1587;
+	{fixnum V1588;
+	{fixnum V1589;
+	V1589= ((fixnum)V1317);
+	V1588= ((uchar*)V1589)[(fixnum)2];}
+	V1587= (V1588>>(fixnum)3);}
+	V1585= ((fixnum)V1587&(fixnum)7);
+	goto T3830;
+	}
+	default:
+	goto T3834;
+T3834:;
+	V1585= 0;
+	goto T3830;
+	}
+	V1585= fix(Cnil);
+	goto T3830;
+T3830:;
+	{fixnum V1590;
+	V1590= (V1560)+(V1585);
+	V1581= V1590;}}
+	V1582= (V1581>>(fixnum)6);
+	{fixnum V1591;
+	{fixnum V1592;
+	V1592= ((fixnum)V1317);
+	V1591= ((fixnum*)V1592)[(fixnum)1];}
+	V1583= ((fixnum*)V1591)[V1582];}
+	V1584= (V1581&(fixnum)63);
+	{fixnum V1593;
+	V1593= (V1583>>(fixnum)V1584);
+	V1580= (V1593&(fixnum)1);}}
+	{fixnum V1594;
+	fixnum V1595;
+	fixnum V1596;
+	int8_t V1597;
+	fixnum V1598;
+	{fixnum V1599;
+	V1599= (V1559)+(0);
+	V1594= V1599;}
+	V1595= (V1594>>(fixnum)6);
+	{fixnum V1600;
+	{fixnum V1601;
+	V1601= ((fixnum)V1496);
+	V1600= ((fixnum*)V1601)[(fixnum)1];}
+	V1596= ((fixnum*)V1600)[V1595];}
+	V1597= (V1594&(fixnum)63);
+	V1598= ((fixnum)1<<(fixnum)V1597);
+	{fixnum V1602;
+	fixnum V1603;
+	{fixnum V1604;
+	V1604= ((fixnum)V1496);
+	V1602= ((fixnum*)V1604)[(fixnum)1];}
+	if(!((V1580)==(0))){
+	goto T3858;
+	}
+	{fixnum V1605;
+	V1605= (~V1598);
+	V1603= (V1596&V1605);
+	goto T3857;
+	}
+	goto T3858;
+T3858:;
+	V1603= (V1596|V1598);
+	goto T3857;
+T3857:;
+	(void)(((fixnum*)V1602)[V1595]=V1603);}}}
+	goto T3787;
+	
+	case 1:
+	goto T3799;
+T3799:;
+	{fixnum V1606;
+	fixnum V1607;
+	{fixnum V1608;
+	V1608= ((fixnum)V1496);
+	V1606= ((fixnum*)V1608)[(fixnum)1];}
+	if(!(((V1496))==((V1317)))){
+	goto T3866;
+	}
+	V1607= V1606;
+	goto T3865;
+	
+	goto T3866;
+T3866:;
+	{fixnum V1609;
+	V1609= ((fixnum)V1317);
+	V1607= ((fixnum*)V1609)[(fixnum)1];}
+	goto T3865;
+T3865:;
+	{int8_t V1610;
+	V1610= ((char*)V1607)[V1560];
+	(void)(((char*)V1606)[V1559]=V1610);}
+	goto T3787;
+	}}}
+	goto T3787;
+T3787:;
+	{fixnum V1611;
+	fixnum V1612;
+	{fixnum V1613;
+	V1613= V1556;
+	{fixnum V1614;
+	V1614= (V1613)+(1);
+	V1611= V1614;}}
+	{fixnum V1615;
+	V1615= V1557;
+	{fixnum V1616;
+	V1616= (V1615)-(1);
+	V1612= V1616;}}
+	V1556= V1611;
+	V1557= V1612;
+	goto T3779;
+	}
+	goto T3781;
+T3781:;
+	V1320= (V1496);
+	goto T3582;
+	}
+	goto T3691;
+T3691:;
+	V1320= (V1496);}
+	goto T3582;
+T3582:;
+	if(((((object)VV[229])->s.s_dbind))==Cnil){
+	goto T3886;
+	}
+	goto T3885;
+	
+	goto T3886;
+T3886:;
+	if(((V1319))==Cnil){
+	goto T3889;
+	}
+	goto T3883;
+	
+	goto T3889;
+T3889:;
+	goto T3885;
+T3885:;
+	{object V1617;
+	{object V1619;
+	object V1620;
+	object V1621;
+	{object V1622;
+	{object V1623;
+	object V1624;
+	V1625= tp2(V1319);
+	if(!((V1625)==(0))){
+	goto T3899;
+	}
+	goto T3898;
+	
+	goto T3899;
+T3899:;
+	goto T3896;
+	
+	goto T3898;
+T3898:;
+	if(((V1319))==Cnil){
+	goto T3902;
+	}
+	{register object V1626;
+	register object V1627;
+	V1626= V1319->c.c_cdr;
+	V1627= (((V1319))->c.c_cdr=(Cnil),((V1319)));
+	goto T3908;
+T3908:;
+	if(((V1626))==Cnil){
+	goto T3910;
+	}
+	{object V1628;
+	object V1629;
+	V1628= (V1626)->c.c_cdr;
+	V1629= (((V1626))->c.c_cdr=((V1627)),((V1626)));
+	V1626= (V1628);
+	V1627= (V1629);
+	goto T3908;
+	}
+	goto T3910;
+T3910:;
+	V1623= (V1627);
+	goto T3895;
+	}
+	goto T3902;
+T3902:;
+	V1623= Cnil;
+	goto T3895;
+	
+	goto T3896;
+T3896:;
+	{fixnum V1631;
+	{fixnum V1632;
+	V1633= tp4(V1319);
+	switch(V1633){
+	case 13:
+	goto T3926;
+T3926:;
+	{fixnum V1635;
+	{fixnum V1636;
+	V1636= ((fixnum)V1319);
+	V1635= ((uchar*)V1636)[(fixnum)2];}
+	V1634= (V1635&(fixnum)1);}
+	if(!((V1634)==(0))){
+	goto T3928;
+	}
+	goto T3921;
+	
+	goto T3928;
+T3928:;
+	goto T3923;
+	
+	default:
+	goto T3927;
+T3927:;
+	goto T3921;
+	}
+	goto T3921;
+	
+	goto T3923;
+T3923:;
+	{fixnum V1637;
+	{fixnum V1638;
+	V1638= ((fixnum)V1319);
+	V1637= ((uint*)V1638)[(fixnum)4];}
+	V1632= (V1637&(fixnum)268435455);
+	goto T3920;
+	}
+	goto T3921;
+T3921:;
+	{fixnum V1639;
+	{fixnum V1640;
+	V1640= ((fixnum)V1319);
+	V1639= ((uint*)V1640)[(fixnum)1];}
+	V1632= (V1639>>(fixnum)4);}
+	goto T3920;
+T3920:;
+	{fixnum V1641;
+	V1641= (V1632)-(1);
+	V1631= V1641;}}
+	if(!((0)<(V1631))){
+	goto T3939;
+	}
+	{fixnum V1643;
+	{fixnum V1644;
+	{fixnum V1645;
+	V1645= ((fixnum)V1319);
+	V1644= ((ushort*)V1645)[(fixnum)1];}
+	V1643= (V1644>>(fixnum)6);}
+	V1642= (V1643&(fixnum)15);}
+	switch(V1642){
+	case 4:
+	goto T3948;
+T3948:;
+	{fixnum V1646;
+	{fixnum V1647;
+	V1647= ((fixnum)V1319);
+	V1646= ((fixnum*)V1647)[(fixnum)1];}
+	{fixnum V1648;
+	V1648= ((fixnum*)V1646)[(fixnum)0];
+	{fixnum V1649;
+	V1649= ((fixnum*)V1646)[V1631];
+	(void)(((fixnum*)V1646)[(fixnum)0]=V1649);}
+	(void)(((fixnum*)V1646)[V1631]=V1648);
+	goto T3942;
+	}}
+	case 3:
+	goto T3949;
+T3949:;
+	{fixnum V1650;
+	{fixnum V1651;
+	V1651= ((fixnum)V1319);
+	V1650= ((fixnum*)V1651)[(fixnum)1];}
+	{fixnum V1652;
+	V1652= ((int*)V1650)[(fixnum)0];
+	{fixnum V1653;
+	V1653= ((int*)V1650)[V1631];
+	(void)(((int*)V1650)[(fixnum)0]=(int)V1653);}
+	(void)(((int*)V1650)[V1631]=(int)V1652);
+	goto T3942;
+	}}
+	case 2:
+	goto T3950;
+T3950:;
+	{fixnum V1654;
+	{fixnum V1655;
+	V1655= ((fixnum)V1319);
+	V1654= ((fixnum*)V1655)[(fixnum)1];}
+	{fixnum V1656;
+	V1656= ((short*)V1654)[(fixnum)0];
+	{fixnum V1657;
+	V1657= ((short*)V1654)[V1631];
+	(void)(((short*)V1654)[(fixnum)0]=(short)V1657);}
+	(void)(((short*)V1654)[V1631]=(short)V1656);
+	goto T3942;
+	}}
+	case 0:
+	goto T3951;
+T3951:;
+	{int8_t V1658;
+	{fixnum V1659;
+	{fixnum V1660;
+	{fixnum V1661;
+	V1661= ((fixnum)V1319);
+	V1660= ((fixnum*)V1661)[(fixnum)1];}
+	V1659= ((fixnum*)V1660)[(fixnum)0];}
+	{fixnum V1662;
+	V1662= (V1659>>(fixnum)0);
+	V1658= (V1662&(fixnum)1);}}
+	{int8_t V1663;
+	{fixnum V1664;
+	fixnum V1665;
+	fixnum V1666;
+	int8_t V1667;
+	{fixnum V1668;
+	V1668= (V1631)+(0);
+	V1664= V1668;}
+	V1665= (V1664>>(fixnum)6);
+	{fixnum V1669;
+	{fixnum V1670;
+	V1670= ((fixnum)V1319);
+	V1669= ((fixnum*)V1670)[(fixnum)1];}
+	V1666= ((fixnum*)V1669)[V1665];}
+	V1667= (V1664&(fixnum)63);
+	{fixnum V1671;
+	V1671= (V1666>>(fixnum)V1667);
+	V1663= (V1671&(fixnum)1);}}
+	{fixnum V1672;
+	{fixnum V1673;
+	{fixnum V1674;
+	V1674= ((fixnum)V1319);
+	V1673= ((fixnum*)V1674)[(fixnum)1];}
+	V1672= ((fixnum*)V1673)[(fixnum)0];}
+	{fixnum V1675;
+	fixnum V1676;
+	{fixnum V1677;
+	V1677= ((fixnum)V1319);
+	V1675= ((fixnum*)V1677)[(fixnum)1];}
+	if(!((V1663)==(0))){
+	goto T3990;
+	}
+	{int8_t V1678;
+	V1678= (~(fixnum)1);
+	V1676= (V1672&(fixnum)V1678);
+	goto T3989;
+	}
+	goto T3990;
+T3990:;
+	V1676= (V1672|(fixnum)1);
+	goto T3989;
+T3989:;
+	(void)(((fixnum*)V1675)[(fixnum)0]=V1676);}}}
+	{fixnum V1679;
+	fixnum V1680;
+	fixnum V1681;
+	int8_t V1682;
+	fixnum V1683;
+	{fixnum V1684;
+	V1684= (V1631)+(0);
+	V1679= V1684;}
+	V1680= (V1679>>(fixnum)6);
+	{fixnum V1685;
+	{fixnum V1686;
+	V1686= ((fixnum)V1319);
+	V1685= ((fixnum*)V1686)[(fixnum)1];}
+	V1681= ((fixnum*)V1685)[V1680];}
+	V1682= (V1679&(fixnum)63);
+	V1683= ((fixnum)1<<(fixnum)V1682);
+	{fixnum V1687;
+	fixnum V1688;
+	{fixnum V1689;
+	V1689= ((fixnum)V1319);
+	V1687= ((fixnum*)V1689)[(fixnum)1];}
+	if(!((V1658)==(0))){
+	goto T4006;
+	}
+	{fixnum V1690;
+	V1690= (~V1683);
+	V1688= (V1681&V1690);
+	goto T4005;
+	}
+	goto T4006;
+T4006:;
+	V1688= (V1681|V1683);
+	goto T4005;
+T4005:;
+	(void)(((fixnum*)V1687)[V1680]=V1688);}
+	goto T3942;
+	}}
+	case 1:
+	goto T3952;
+T3952:;
+	{fixnum V1691;
+	{fixnum V1692;
+	V1692= ((fixnum)V1319);
+	V1691= ((fixnum*)V1692)[(fixnum)1];}
+	{int8_t V1693;
+	V1693= ((char*)V1691)[(fixnum)0];
+	{int8_t V1694;
+	V1694= ((char*)V1691)[V1631];
+	(void)(((char*)V1691)[(fixnum)0]=V1694);}
+	(void)(((char*)V1691)[V1631]=V1693);
+	goto T3942;
+	}}}
+	goto T3942;
+T3942:;
+	{register fixnum V1695;
+	register fixnum V1696;
+	V1695= 1;
+	{fixnum V1697;
+	V1697= (V1631)-(1);
+	V1696= V1697;}
+	goto T4020;
+T4020:;
+	if(!((V1695)<(V1696))){
+	goto T4022;
+	}
+	{fixnum V1698;
+	fixnum V1699;
+	V1698= V1695;
+	V1699= V1696;
+	{fixnum V1701;
+	{fixnum V1702;
+	{fixnum V1703;
+	V1703= ((fixnum)V1319);
+	V1702= ((ushort*)V1703)[(fixnum)1];}
+	V1701= (V1702>>(fixnum)6);}
+	V1700= (V1701&(fixnum)15);}
+	switch(V1700){
+	case 4:
+	goto T4033;
+T4033:;
+	{fixnum V1704;
+	{fixnum V1705;
+	V1705= ((fixnum)V1319);
+	V1704= ((fixnum*)V1705)[(fixnum)1];}
+	{fixnum V1706;
+	V1706= ((fixnum*)V1704)[V1698];
+	{fixnum V1707;
+	V1707= ((fixnum*)V1704)[V1699];
+	(void)(((fixnum*)V1704)[V1698]=V1707);}
+	(void)(((fixnum*)V1704)[V1699]=V1706);
+	goto T4025;
+	}}
+	case 3:
+	goto T4034;
+T4034:;
+	{fixnum V1708;
+	{fixnum V1709;
+	V1709= ((fixnum)V1319);
+	V1708= ((fixnum*)V1709)[(fixnum)1];}
+	{fixnum V1710;
+	V1710= ((int*)V1708)[V1698];
+	{fixnum V1711;
+	V1711= ((int*)V1708)[V1699];
+	(void)(((int*)V1708)[V1698]=(int)V1711);}
+	(void)(((int*)V1708)[V1699]=(int)V1710);
+	goto T4025;
+	}}
+	case 2:
+	goto T4035;
+T4035:;
+	{fixnum V1712;
+	{fixnum V1713;
+	V1713= ((fixnum)V1319);
+	V1712= ((fixnum*)V1713)[(fixnum)1];}
+	{fixnum V1714;
+	V1714= ((short*)V1712)[V1698];
+	{fixnum V1715;
+	V1715= ((short*)V1712)[V1699];
+	(void)(((short*)V1712)[V1698]=(short)V1715);}
+	(void)(((short*)V1712)[V1699]=(short)V1714);
+	goto T4025;
+	}}
+	case 0:
+	goto T4036;
+T4036:;
+	{int8_t V1716;
+	{fixnum V1717;
+	fixnum V1718;
+	fixnum V1719;
+	int8_t V1720;
+	{fixnum V1721;
+	V1721= (V1698)+(0);
+	V1717= V1721;}
+	V1718= (V1717>>(fixnum)6);
+	{fixnum V1722;
+	{fixnum V1723;
+	V1723= ((fixnum)V1319);
+	V1722= ((fixnum*)V1723)[(fixnum)1];}
+	V1719= ((fixnum*)V1722)[V1718];}
+	V1720= (V1717&(fixnum)63);
+	{fixnum V1724;
+	V1724= (V1719>>(fixnum)V1720);
+	V1716= (V1724&(fixnum)1);}}
+	{int8_t V1725;
+	{fixnum V1726;
+	fixnum V1727;
+	fixnum V1728;
+	int8_t V1729;
+	{fixnum V1730;
+	V1730= (V1699)+(0);
+	V1726= V1730;}
+	V1727= (V1726>>(fixnum)6);
+	{fixnum V1731;
+	{fixnum V1732;
+	V1732= ((fixnum)V1319);
+	V1731= ((fixnum*)V1732)[(fixnum)1];}
+	V1728= ((fixnum*)V1731)[V1727];}
+	V1729= (V1726&(fixnum)63);
+	{fixnum V1733;
+	V1733= (V1728>>(fixnum)V1729);
+	V1725= (V1733&(fixnum)1);}}
+	{fixnum V1734;
+	fixnum V1735;
+	fixnum V1736;
+	int8_t V1737;
+	fixnum V1738;
+	{fixnum V1739;
+	V1739= (V1698)+(0);
+	V1734= V1739;}
+	V1735= (V1734>>(fixnum)6);
+	{fixnum V1740;
+	{fixnum V1741;
+	V1741= ((fixnum)V1319);
+	V1740= ((fixnum*)V1741)[(fixnum)1];}
+	V1736= ((fixnum*)V1740)[V1735];}
+	V1737= (V1734&(fixnum)63);
+	V1738= ((fixnum)1<<(fixnum)V1737);
+	{fixnum V1742;
+	fixnum V1743;
+	{fixnum V1744;
+	V1744= ((fixnum)V1319);
+	V1742= ((fixnum*)V1744)[(fixnum)1];}
+	if(!((V1725)==(0))){
+	goto T4084;
+	}
+	{fixnum V1745;
+	V1745= (~V1738);
+	V1743= (V1736&V1745);
+	goto T4083;
+	}
+	goto T4084;
+T4084:;
+	V1743= (V1736|V1738);
+	goto T4083;
+T4083:;
+	(void)(((fixnum*)V1742)[V1735]=V1743);}}}
+	{fixnum V1746;
+	fixnum V1747;
+	fixnum V1748;
+	int8_t V1749;
+	fixnum V1750;
+	{fixnum V1751;
+	V1751= (V1699)+(0);
+	V1746= V1751;}
+	V1747= (V1746>>(fixnum)6);
+	{fixnum V1752;
+	{fixnum V1753;
+	V1753= ((fixnum)V1319);
+	V1752= ((fixnum*)V1753)[(fixnum)1];}
+	V1748= ((fixnum*)V1752)[V1747];}
+	V1749= (V1746&(fixnum)63);
+	V1750= ((fixnum)1<<(fixnum)V1749);
+	{fixnum V1754;
+	fixnum V1755;
+	{fixnum V1756;
+	V1756= ((fixnum)V1319);
+	V1754= ((fixnum*)V1756)[(fixnum)1];}
+	if(!((V1716)==(0))){
+	goto T4100;
+	}
+	{fixnum V1757;
+	V1757= (~V1750);
+	V1755= (V1748&V1757);
+	goto T4099;
+	}
+	goto T4100;
+T4100:;
+	V1755= (V1748|V1750);
+	goto T4099;
+T4099:;
+	(void)(((fixnum*)V1754)[V1747]=V1755);}
+	goto T4025;
+	}}
+	case 1:
+	goto T4037;
+T4037:;
+	{fixnum V1758;
+	{fixnum V1759;
+	V1759= ((fixnum)V1319);
+	V1758= ((fixnum*)V1759)[(fixnum)1];}
+	{int8_t V1760;
+	V1760= ((char*)V1758)[V1698];
+	{int8_t V1761;
+	V1761= ((char*)V1758)[V1699];
+	(void)(((char*)V1758)[V1698]=V1761);}
+	(void)(((char*)V1758)[V1699]=V1760);
+	goto T4025;
+	}}}}
+	goto T4025;
+T4025:;
+	{fixnum V1762;
+	fixnum V1763;
+	{fixnum V1764;
+	V1764= V1695;
+	{fixnum V1765;
+	V1765= (V1764)+(1);
+	V1762= V1765;}}
+	{fixnum V1766;
+	V1766= V1696;
+	{fixnum V1767;
+	V1767= (V1766)-(1);
+	V1763= V1767;}}
+	V1695= V1762;
+	V1696= V1763;
+	goto T4020;
+	}
+	goto T4022;
+T4022:;
+	V1623= (V1319);
+	goto T3895;
+	}
+	goto T3939;
+T3939:;
+	V1623= (V1319);}
+	goto T3895;
+T3895:;
+	V1624= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V1314);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V1623);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V1768;
+	register object V1769;
+	V1768= Cnil;
+	V1769= Cnil;
+	{register object V1770;
+	V1770= (V1314);
+	goto T4126;
+T4126:;
+	if(((V1770))==Cnil){
+	goto T4128;
+	}
+	{object V1772;
+	V1772= (V1770)->c.c_car;
+	{object V1773;
+	V1773= make_cons((V1772),Cnil);
+	if(((V1769))==Cnil){
+	goto T4135;
+	}
+	(void)((((V1769))->c.c_cdr=((V1773)),((V1769))));
+	V1769= (V1773);
+	goto T4134;
+	
+	goto T4135;
+T4135:;
+	V1768= (V1773);
+	V1769= (V1768);
+	goto T4134;
+T4134:;}}
+	{object V1774;
+	V1774= (V1770)->c.c_cdr;
+	V1770= (V1774);
+	goto T4126;
+	}
+	goto T4128;
+T4128:;
+	goto T4124;
+	}
+	goto T4124;
+T4124:;
+	if(((V1769))==Cnil){
+	goto T4145;
+	}
+	(void)((((V1769))->c.c_cdr=((V1623)),((V1769))));
+	V1769= (V1623);
+	goto T4144;
+	
+	goto T4145;
+T4145:;
+	V1768= (V1623);
+	V1769= (V1768);
+	goto T4144;
+T4144:;
+	V1622= (V1768);}}
+	{register object V1776;
+	V1776= Cnil;
+	{register object V1777;
+	register object V1778;
+	V1777= (V1622);
+	V1778= V1622->c.c_car;
+	goto T4153;
+T4153:;
+	if(((V1777))==Cnil){
+	goto T4160;
+	}
+	goto T4158;
+	
+	goto T4160;
+T4160:;
+	goto T4155;
+	
+	goto T4158;
+T4158:;
+	if(((V1778))==Cnil){
+	goto T4163;
+	}
+	V1776= make_cons((V1778),(V1776));
+	V1782= tp2((V1778));
+	if(!((V1782)==(0))){
+	goto T4174;
+	}
+	goto T4173;
+	
+	goto T4174;
+T4174:;
+	goto T4171;
+	
+	goto T4173;
+T4173:;
+	{object V1783;
+	V1783= (V1778)->c.c_car;
+	{fixnum V1785;
+	V1785= 1;
+	V1786= tp4(V1783);
+	switch(V1786){
+	case -1:
+	goto T4185;
+T4185:;
+	goto T4182;
+	
+	case 1:
+	goto T4186;
+T4186:;
+	case 2:
+	goto T4187;
+T4187:;
+	case 3:
+	goto T4188;
+T4188:;
+	case 4:
+	goto T4189;
+T4189:;
+	case 5:
+	goto T4190;
+T4190:;
+	case 6:
+	goto T4191;
+T4191:;
+	goto T4180;
+	
+	default:
+	goto T4192;
+T4192:;
+	goto T4182;
+	}
+	goto T4180;
+	
+	goto T4182;
+T4182:;
+	V1785= 0;
+	goto T4179;
+	
+	goto T4180;
+T4180:;
+	goto T4179;
+T4179:;
+	switch(V1785){
+	case 0:
+	goto T4204;
+T4204:;
+	if(!(((V1783))==(((object)VV[230])))){
+	goto T4201;
+	}
+	goto T4202;
+	
+	case 1:
+	goto T4205;
+T4205:;
+	if(!(((V1783))==(((object)VV[230])))){
+	goto T4201;
+	}
+	goto T4202;
+	}
+	goto T4201;
+	
+	goto T4202;
+T4202:;
+	goto T4200;
+	
+	goto T4201;
+T4201:;
+	goto T4198;
+	
+	goto T4200;
+T4200:;
+	goto T4170;
+	
+	goto T4198;
+T4198:;
+	switch(V1785){
+	case 0:
+	goto T4214;
+T4214:;
+	if(!(((V1783))==(((object)VV[231])))){
+	goto T4211;
+	}
+	goto T4212;
+	
+	case 1:
+	goto T4215;
+T4215:;
+	if(!(((V1783))==(((object)VV[231])))){
+	goto T4211;
+	}
+	goto T4212;
+	}
+	goto T4211;
+	
+	goto T4212;
+T4212:;
+	goto T4210;
+	
+	goto T4211;
+T4211:;
+	goto T4208;
+	
+	goto T4210;
+T4210:;
+	goto T4170;
+	
+	goto T4208;
+T4208:;
+	switch(V1785){
+	case 0:
+	goto T4224;
+T4224:;
+	if(!(((V1783))==(((object)VV[232])))){
+	goto T4221;
+	}
+	goto T4222;
+	
+	case 1:
+	goto T4225;
+T4225:;
+	if(!(((V1783))==(((object)VV[232])))){
+	goto T4221;
+	}
+	goto T4222;
+	}
+	goto T4221;
+	
+	goto T4222;
+T4222:;
+	goto T4220;
+	
+	goto T4221;
+T4221:;
+	goto T4218;
+	
+	goto T4220;
+T4220:;
+	goto T4170;
+	
+	goto T4218;
+T4218:;
+	goto T4168;
+	}}
+	goto T4171;
+T4171:;
+	goto T4168;
+	
+	goto T4170;
+T4170:;
+	goto T4150;
+	
+	goto T4168;
+T4168:;
+	goto T4162;
+	
+	goto T4163;
+T4163:;
+	goto T4162;
+T4162:;
+	V1777= (V1777)->c.c_cdr;
+	V1778= V1777->c.c_car;
+	goto T4153;
+	
+	goto T4155;
+T4155:;
+	goto T4150;
+	}
+	goto T4150;
+T4150:;
+	if(((V1776))==Cnil){
+	goto T4233;
+	}
+	{register object V1789;
+	register object V1790;
+	V1789= (V1776)->c.c_cdr;
+	V1790= (((V1776))->c.c_cdr=(Cnil),((V1776)));
+	goto T4239;
+T4239:;
+	if(((V1789))==Cnil){
+	goto T4241;
+	}
+	{object V1791;
+	object V1792;
+	V1791= (V1789)->c.c_cdr;
+	V1792= (((V1789))->c.c_cdr=((V1790)),((V1789)));
+	V1789= (V1791);
+	V1790= (V1792);
+	goto T4239;
+	}
+	goto T4241;
+T4241:;
+	V1619= (V1790);
+	goto T3893;
+	}
+	goto T4233;
+T4233:;
+	V1619= Cnil;}}
+	goto T3893;
+T3893:;
+	{object V1795;
+	object V1796;
+	object V1797;
+	{object V1798;
+	{object V1799;
+	object V1800;
+	{register object V1801;
+	V1801= ((object)VV[233]);
+	{register object V1802;
+	V1802= Cnil;
+	{register object V1803;
+	V1803= (V1320);
+	goto T4258;
+T4258:;
+	if(((V1803))==Cnil){
+	goto T4260;
+	}
+	if(((V1802))==Cnil){
+	goto T4265;
+	}
+	V1801= (((V1802))->c.c_cdr=((V1801)),((V1802)));
+	goto T4264;
+	
+	goto T4265;
+T4265:;
+	goto T4264;
+T4264:;
+	V1802= (V1803);
+	{object V1805;
+	V1805= (V1803)->c.c_cdr;
+	V1803= (V1805);
+	goto T4258;
+	}
+	goto T4260;
+T4260:;
+	goto T4256;
+	}
+	goto T4256;
+T4256:;
+	if(((V1802))==Cnil){
+	goto T4273;
+	}
+	V1799= (((V1802))->c.c_cdr=((V1801)),((V1802)));
+	goto T4254;
+	
+	goto T4273;
+T4273:;
+	V1799= (V1801);}}
+	goto T4254;
+T4254:;
+	V1800= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V1316);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V1799);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V1807;
+	register object V1808;
+	V1807= Cnil;
+	V1808= Cnil;
+	{register object V1809;
+	V1809= (V1316);
+	goto T4282;
+T4282:;
+	if(((V1809))==Cnil){
+	goto T4284;
+	}
+	{object V1811;
+	V1811= (V1809)->c.c_car;
+	{object V1812;
+	V1812= make_cons((V1811),Cnil);
+	if(((V1808))==Cnil){
+	goto T4291;
+	}
+	(void)((((V1808))->c.c_cdr=((V1812)),((V1808))));
+	V1808= (V1812);
+	goto T4290;
+	
+	goto T4291;
+T4291:;
+	V1807= (V1812);
+	V1808= (V1807);
+	goto T4290;
+T4290:;}}
+	{object V1813;
+	V1813= (V1809)->c.c_cdr;
+	V1809= (V1813);
+	goto T4282;
+	}
+	goto T4284;
+T4284:;
+	goto T4280;
+	}
+	goto T4280;
+T4280:;
+	if(((V1808))==Cnil){
+	goto T4301;
+	}
+	(void)((((V1808))->c.c_cdr=((V1799)),((V1808))));
+	V1808= (V1799);
+	goto T4300;
+	
+	goto T4301;
+T4301:;
+	V1807= (V1799);
+	V1808= (V1807);
+	goto T4300;
+T4300:;
+	V1798= (V1807);}}
+	{register object V1815;
+	V1815= Cnil;
+	{register object V1816;
+	register object V1817;
+	V1816= (V1798);
+	V1817= V1798->c.c_car;
+	goto T4309;
+T4309:;
+	if(((V1816))==Cnil){
+	goto T4316;
+	}
+	goto T4314;
+	
+	goto T4316;
+T4316:;
+	goto T4311;
+	
+	goto T4314;
+T4314:;
+	if(((V1817))==Cnil){
+	goto T4319;
+	}
+	V1815= make_cons((V1817),(V1815));
+	V1821= tp2((V1817));
+	if(!((V1821)==(0))){
+	goto T4330;
+	}
+	goto T4329;
+	
+	goto T4330;
+T4330:;
+	goto T4327;
+	
+	goto T4329;
+T4329:;
+	{object V1822;
+	V1822= (V1817)->c.c_car;
+	{fixnum V1824;
+	V1824= 1;
+	V1825= tp4(V1822);
+	switch(V1825){
+	case -1:
+	goto T4341;
+T4341:;
+	goto T4338;
+	
+	case 1:
+	goto T4342;
+T4342:;
+	case 2:
+	goto T4343;
+T4343:;
+	case 3:
+	goto T4344;
+T4344:;
+	case 4:
+	goto T4345;
+T4345:;
+	case 5:
+	goto T4346;
+T4346:;
+	case 6:
+	goto T4347;
+T4347:;
+	goto T4336;
+	
+	default:
+	goto T4348;
+T4348:;
+	goto T4338;
+	}
+	goto T4336;
+	
+	goto T4338;
+T4338:;
+	V1824= 0;
+	goto T4335;
+	
+	goto T4336;
+T4336:;
+	goto T4335;
+T4335:;
+	switch(V1824){
+	case 0:
+	goto T4360;
+T4360:;
+	if(!(((V1822))==(((object)VV[230])))){
+	goto T4357;
+	}
+	goto T4358;
+	
+	case 1:
+	goto T4361;
+T4361:;
+	if(!(((V1822))==(((object)VV[230])))){
+	goto T4357;
+	}
+	goto T4358;
+	}
+	goto T4357;
+	
+	goto T4358;
+T4358:;
+	goto T4356;
+	
+	goto T4357;
+T4357:;
+	goto T4354;
+	
+	goto T4356;
+T4356:;
+	goto T4326;
+	
+	goto T4354;
+T4354:;
+	switch(V1824){
+	case 0:
+	goto T4370;
+T4370:;
+	if(!(((V1822))==(((object)VV[231])))){
+	goto T4367;
+	}
+	goto T4368;
+	
+	case 1:
+	goto T4371;
+T4371:;
+	if(!(((V1822))==(((object)VV[231])))){
+	goto T4367;
+	}
+	goto T4368;
+	}
+	goto T4367;
+	
+	goto T4368;
+T4368:;
+	goto T4366;
+	
+	goto T4367;
+T4367:;
+	goto T4364;
+	
+	goto T4366;
+T4366:;
+	goto T4326;
+	
+	goto T4364;
+T4364:;
+	switch(V1824){
+	case 0:
+	goto T4380;
+T4380:;
+	if(!(((V1822))==(((object)VV[232])))){
+	goto T4377;
+	}
+	goto T4378;
+	
+	case 1:
+	goto T4381;
+T4381:;
+	if(!(((V1822))==(((object)VV[232])))){
+	goto T4377;
+	}
+	goto T4378;
+	}
+	goto T4377;
+	
+	goto T4378;
+T4378:;
+	goto T4376;
+	
+	goto T4377;
+T4377:;
+	goto T4374;
+	
+	goto T4376;
+T4376:;
+	goto T4326;
+	
+	goto T4374;
+T4374:;
+	goto T4324;
+	}}
+	goto T4327;
+T4327:;
+	goto T4324;
+	
+	goto T4326;
+T4326:;
+	goto T4306;
+	
+	goto T4324;
+T4324:;
+	goto T4318;
+	
+	goto T4319;
+T4319:;
+	goto T4318;
+T4318:;
+	V1816= (V1816)->c.c_cdr;
+	V1817= V1816->c.c_car;
+	goto T4309;
+	
+	goto T4311;
+T4311:;
+	goto T4306;
+	}
+	goto T4306;
+T4306:;
+	if(((V1815))==Cnil){
+	goto T4389;
+	}
+	{register object V1828;
+	register object V1829;
+	V1828= (V1815)->c.c_cdr;
+	V1829= (((V1815))->c.c_cdr=(Cnil),((V1815)));
+	goto T4395;
+T4395:;
+	if(((V1828))==Cnil){
+	goto T4397;
+	}
+	{object V1830;
+	object V1831;
+	V1830= (V1828)->c.c_cdr;
+	V1831= (((V1828))->c.c_cdr=((V1829)),((V1828)));
+	V1828= (V1830);
+	V1829= (V1831);
+	goto T4395;
+	}
+	goto T4397;
+T4397:;
+	V1795= (V1829);
+	goto T4252;
+	}
+	goto T4389;
+T4389:;
+	V1795= Cnil;}}
+	goto T4252;
+T4252:;
+	{register object V1834;
+	V1834= Cnil;
+	{register object V1835;
+	register object V1836;
+	V1835= (V1318);
+	V1836= V1318->c.c_car;
+	goto T4411;
+T4411:;
+	if(((V1835))==Cnil){
+	goto T4418;
+	}
+	goto T4416;
+	
+	goto T4418;
+T4418:;
+	goto T4413;
+	
+	goto T4416;
+T4416:;
+	if(((V1836))==Cnil){
+	goto T4421;
+	}
+	V1834= make_cons((V1836),(V1834));
+	V1840= tp2((V1836));
+	if(!((V1840)==(0))){
+	goto T4432;
+	}
+	goto T4431;
+	
+	goto T4432;
+T4432:;
+	goto T4429;
+	
+	goto T4431;
+T4431:;
+	{object V1841;
+	V1841= (V1836)->c.c_car;
+	{fixnum V1843;
+	V1843= 1;
+	V1844= tp4(V1841);
+	switch(V1844){
+	case -1:
+	goto T4443;
+T4443:;
+	goto T4440;
+	
+	case 1:
+	goto T4444;
+T4444:;
+	case 2:
+	goto T4445;
+T4445:;
+	case 3:
+	goto T4446;
+T4446:;
+	case 4:
+	goto T4447;
+T4447:;
+	case 5:
+	goto T4448;
+T4448:;
+	case 6:
+	goto T4449;
+T4449:;
+	goto T4438;
+	
+	default:
+	goto T4450;
+T4450:;
+	goto T4440;
+	}
+	goto T4438;
+	
+	goto T4440;
+T4440:;
+	V1843= 0;
+	goto T4437;
+	
+	goto T4438;
+T4438:;
+	goto T4437;
+T4437:;
+	switch(V1843){
+	case 0:
+	goto T4462;
+T4462:;
+	if(!(((V1841))==(((object)VV[230])))){
+	goto T4459;
+	}
+	goto T4460;
+	
+	case 1:
+	goto T4463;
+T4463:;
+	if(!(((V1841))==(((object)VV[230])))){
+	goto T4459;
+	}
+	goto T4460;
+	}
+	goto T4459;
+	
+	goto T4460;
+T4460:;
+	goto T4458;
+	
+	goto T4459;
+T4459:;
+	goto T4456;
+	
+	goto T4458;
+T4458:;
+	goto T4428;
+	
+	goto T4456;
+T4456:;
+	switch(V1843){
+	case 0:
+	goto T4472;
+T4472:;
+	if(!(((V1841))==(((object)VV[231])))){
+	goto T4469;
+	}
+	goto T4470;
+	
+	case 1:
+	goto T4473;
+T4473:;
+	if(!(((V1841))==(((object)VV[231])))){
+	goto T4469;
+	}
+	goto T4470;
+	}
+	goto T4469;
+	
+	goto T4470;
+T4470:;
+	goto T4468;
+	
+	goto T4469;
+T4469:;
+	goto T4466;
+	
+	goto T4468;
+T4468:;
+	goto T4428;
+	
+	goto T4466;
+T4466:;
+	switch(V1843){
+	case 0:
+	goto T4482;
+T4482:;
+	if(!(((V1841))==(((object)VV[232])))){
+	goto T4479;
+	}
+	goto T4480;
+	
+	case 1:
+	goto T4483;
+T4483:;
+	if(!(((V1841))==(((object)VV[232])))){
+	goto T4479;
+	}
+	goto T4480;
+	}
+	goto T4479;
+	
+	goto T4480;
+T4480:;
+	goto T4478;
+	
+	goto T4479;
+T4479:;
+	goto T4476;
+	
+	goto T4478;
+T4478:;
+	goto T4428;
+	
+	goto T4476;
+T4476:;
+	goto T4426;
+	}}
+	goto T4429;
+T4429:;
+	goto T4426;
+	
+	goto T4428;
+T4428:;
+	goto T4408;
+	
+	goto T4426;
+T4426:;
+	goto T4420;
+	
+	goto T4421;
+T4421:;
+	goto T4420;
+T4420:;
+	V1835= (V1835)->c.c_cdr;
+	V1836= V1835->c.c_car;
+	goto T4411;
+	
+	goto T4413;
+T4413:;
+	goto T4408;
+	}
+	goto T4408;
+T4408:;
+	if(((V1834))==Cnil){
+	goto T4491;
+	}
+	{register object V1847;
+	register object V1848;
+	V1847= (V1834)->c.c_cdr;
+	V1848= (((V1834))->c.c_cdr=(Cnil),((V1834)));
+	goto T4497;
+T4497:;
+	if(((V1847))==Cnil){
+	goto T4499;
+	}
+	{object V1849;
+	object V1850;
+	V1849= (V1847)->c.c_cdr;
+	V1850= (((V1847))->c.c_cdr=((V1848)),((V1847)));
+	V1847= (V1849);
+	V1848= (V1850);
+	goto T4497;
+	}
+	goto T4499;
+T4499:;
+	V1833= (V1848);
+	goto T4407;
+	}
+	goto T4491;
+T4491:;
+	V1833= Cnil;}
+	goto T4407;
+T4407:;
+	V1796= make_cons(((object)VV[234]),(V1833));
+	V1797= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V1795);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V1796);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V1852;
+	register object V1853;
+	V1852= Cnil;
+	V1853= Cnil;
+	{register object V1854;
+	V1854= (V1795);
+	goto T4514;
+T4514:;
+	if(((V1854))==Cnil){
+	goto T4516;
+	}
+	{object V1856;
+	V1856= (V1854)->c.c_car;
+	{object V1857;
+	V1857= make_cons((V1856),Cnil);
+	if(((V1853))==Cnil){
+	goto T4523;
+	}
+	(void)((((V1853))->c.c_cdr=((V1857)),((V1853))));
+	V1853= (V1857);
+	goto T4522;
+	
+	goto T4523;
+T4523:;
+	V1852= (V1857);
+	V1853= (V1852);
+	goto T4522;
+T4522:;}}
+	{object V1858;
+	V1858= (V1854)->c.c_cdr;
+	V1854= (V1858);
+	goto T4514;
+	}
+	goto T4516;
+T4516:;
+	goto T4512;
+	}
+	goto T4512;
+T4512:;
+	if(((V1853))==Cnil){
+	goto T4533;
+	}
+	(void)((((V1853))->c.c_cdr=((V1796)),((V1853))));
+	V1853= (V1796);
+	goto T4532;
+	
+	goto T4533;
+T4533:;
+	V1852= (V1796);
+	V1853= (V1852);
+	goto T4532;
+T4532:;
+	V1794= (V1852);}}
+	V1620= make_cons(((object)VV[235]),(V1794));
+	V1621= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V1619);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V1620);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V1860;
+	register object V1861;
+	V1860= Cnil;
+	V1861= Cnil;
+	{register object V1862;
+	V1862= (V1619);
+	goto T4544;
+T4544:;
+	if(((V1862))==Cnil){
+	goto T4546;
+	}
+	{object V1864;
+	V1864= (V1862)->c.c_car;
+	{object V1865;
+	V1865= make_cons((V1864),Cnil);
+	if(((V1861))==Cnil){
+	goto T4553;
+	}
+	(void)((((V1861))->c.c_cdr=((V1865)),((V1861))));
+	V1861= (V1865);
+	goto T4552;
+	
+	goto T4553;
+T4553:;
+	V1860= (V1865);
+	V1861= (V1860);
+	goto T4552;
+T4552:;}}
+	{object V1866;
+	V1866= (V1862)->c.c_cdr;
+	V1862= (V1866);
+	goto T4544;
+	}
+	goto T4546;
+T4546:;
+	goto T4542;
+	}
+	goto T4542;
+T4542:;
+	if(((V1861))==Cnil){
+	goto T4563;
+	}
+	(void)((((V1861))->c.c_cdr=((V1620)),((V1861))));
+	V1861= (V1620);
+	goto T4562;
+	
+	goto T4563;
+T4563:;
+	V1860= (V1620);
+	V1861= (V1860);
+	goto T4562;
+T4562:;
+	V1618= (V1860);}}
+	V1617= make_cons(((object)VV[236]),(V1618));
+	{object V1868 = (V1617);
+	VMR46(V1868);}}
+	goto T3883;
+T3883:;
+	(void)((/* ANSI-LOOP::LOOP-CODE-DUPLICATION-THRESHOLD */(*LnkLI190)((V1312))));
+	goto T4570;
+T4570:;
+	goto T4574;
+T4574:;
+	if(((V1319))==Cnil){
+	goto T4584;
+	}
+	goto T4581;
+	
+	goto T4584;
+T4584:;
+	goto T4580;
+	
+	goto T4581;
+T4581:;
+	V1869= (V1319)->c.c_car;
+	V1871= (V1320)->c.c_car;
+	if(!(equal((V1869),(V1871)))){
+	goto T4586;
+	}
+	goto T4579;
+	
+	goto T4586;
+T4586:;
+	goto T4580;
+T4580:;
+	goto T4576;
+	
+	goto T4579;
+T4579:;
+	{object V1873;
+	{object V1874;
+	V1874= (V1319)->c.c_car;
+	V1319= (V1319)->c.c_cdr;
+	V1873= (V1874);}
+	V1316= make_cons((V1873),(V1316));}
+	{object V1877;
+	V1877= (V1320)->c.c_car;
+	V1320= (V1320)->c.c_cdr;}
+	goto T4574;
+	
+	goto T4576;
+T4576:;
+	goto T4572;
+	
+	goto T4572;
+T4572:;
+	if(((V1319))==Cnil){
+	goto T4606;
+	}
+	goto T4603;
+	
+	goto T4606;
+T4606:;
+	{object V1880;
+	{object V1882;
+	object V1883;
+	object V1884;
+	{object V1885;
+	{object V1886;
+	V1886= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V1314);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=Cnil;_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V1887;
+	register object V1888;
+	V1887= Cnil;
+	V1888= Cnil;
+	{register object V1889;
+	V1889= (V1314);
+	goto T4618;
+T4618:;
+	if(((V1889))==Cnil){
+	goto T4620;
+	}
+	{object V1891;
+	V1891= (V1889)->c.c_car;
+	{object V1892;
+	V1892= make_cons((V1891),Cnil);
+	if(((V1888))==Cnil){
+	goto T4627;
+	}
+	(void)((((V1888))->c.c_cdr=((V1892)),((V1888))));
+	V1888= (V1892);
+	goto T4626;
+	
+	goto T4627;
+T4627:;
+	V1887= (V1892);
+	V1888= (V1887);
+	goto T4626;
+T4626:;}}
+	{object V1893;
+	V1893= (V1889)->c.c_cdr;
+	V1889= (V1893);
+	goto T4618;
+	}
+	goto T4620;
+T4620:;
+	goto T4616;
+	}
+	goto T4616;
+T4616:;
+	if(((V1888))==Cnil){
+	goto T4637;
+	}
+	(void)((((V1888))->c.c_cdr=(Cnil),((V1888))));
+	V1888= Cnil;
+	goto T4636;
+	
+	goto T4637;
+T4637:;
+	V1887= Cnil;
+	V1888= Cnil;
+	goto T4636;
+T4636:;
+	V1885= (V1887);}}
+	{register object V1895;
+	V1895= Cnil;
+	{register object V1896;
+	register object V1897;
+	V1896= (V1885);
+	V1897= V1885->c.c_car;
+	goto T4645;
+T4645:;
+	if(((V1896))==Cnil){
+	goto T4652;
+	}
+	goto T4650;
+	
+	goto T4652;
+T4652:;
+	goto T4647;
+	
+	goto T4650;
+T4650:;
+	if(((V1897))==Cnil){
+	goto T4655;
+	}
+	V1895= make_cons((V1897),(V1895));
+	V1901= tp2((V1897));
+	if(!((V1901)==(0))){
+	goto T4666;
+	}
+	goto T4665;
+	
+	goto T4666;
+T4666:;
+	goto T4663;
+	
+	goto T4665;
+T4665:;
+	{object V1902;
+	V1902= (V1897)->c.c_car;
+	{fixnum V1904;
+	V1904= 1;
+	V1905= tp4(V1902);
+	switch(V1905){
+	case -1:
+	goto T4677;
+T4677:;
+	goto T4674;
+	
+	case 1:
+	goto T4678;
+T4678:;
+	case 2:
+	goto T4679;
+T4679:;
+	case 3:
+	goto T4680;
+T4680:;
+	case 4:
+	goto T4681;
+T4681:;
+	case 5:
+	goto T4682;
+T4682:;
+	case 6:
+	goto T4683;
+T4683:;
+	goto T4672;
+	
+	default:
+	goto T4684;
+T4684:;
+	goto T4674;
+	}
+	goto T4672;
+	
+	goto T4674;
+T4674:;
+	V1904= 0;
+	goto T4671;
+	
+	goto T4672;
+T4672:;
+	goto T4671;
+T4671:;
+	switch(V1904){
+	case 0:
+	goto T4696;
+T4696:;
+	if(!(((V1902))==(((object)VV[230])))){
+	goto T4693;
+	}
+	goto T4694;
+	
+	case 1:
+	goto T4697;
+T4697:;
+	if(!(((V1902))==(((object)VV[230])))){
+	goto T4693;
+	}
+	goto T4694;
+	}
+	goto T4693;
+	
+	goto T4694;
+T4694:;
+	goto T4692;
+	
+	goto T4693;
+T4693:;
+	goto T4690;
+	
+	goto T4692;
+T4692:;
+	goto T4662;
+	
+	goto T4690;
+T4690:;
+	switch(V1904){
+	case 0:
+	goto T4706;
+T4706:;
+	if(!(((V1902))==(((object)VV[231])))){
+	goto T4703;
+	}
+	goto T4704;
+	
+	case 1:
+	goto T4707;
+T4707:;
+	if(!(((V1902))==(((object)VV[231])))){
+	goto T4703;
+	}
+	goto T4704;
+	}
+	goto T4703;
+	
+	goto T4704;
+T4704:;
+	goto T4702;
+	
+	goto T4703;
+T4703:;
+	goto T4700;
+	
+	goto T4702;
+T4702:;
+	goto T4662;
+	
+	goto T4700;
+T4700:;
+	switch(V1904){
+	case 0:
+	goto T4716;
+T4716:;
+	if(!(((V1902))==(((object)VV[232])))){
+	goto T4713;
+	}
+	goto T4714;
+	
+	case 1:
+	goto T4717;
+T4717:;
+	if(!(((V1902))==(((object)VV[232])))){
+	goto T4713;
+	}
+	goto T4714;
+	}
+	goto T4713;
+	
+	goto T4714;
+T4714:;
+	goto T4712;
+	
+	goto T4713;
+T4713:;
+	goto T4710;
+	
+	goto T4712;
+T4712:;
+	goto T4662;
+	
+	goto T4710;
+T4710:;
+	goto T4660;
+	}}
+	goto T4663;
+T4663:;
+	goto T4660;
+	
+	goto T4662;
+T4662:;
+	goto T4642;
+	
+	goto T4660;
+T4660:;
+	goto T4654;
+	
+	goto T4655;
+T4655:;
+	goto T4654;
+T4654:;
+	V1896= (V1896)->c.c_cdr;
+	V1897= V1896->c.c_car;
+	goto T4645;
+	
+	goto T4647;
+T4647:;
+	goto T4642;
+	}
+	goto T4642;
+T4642:;
+	if(((V1895))==Cnil){
+	goto T4725;
+	}
+	{register object V1908;
+	register object V1909;
+	V1908= (V1895)->c.c_cdr;
+	V1909= (((V1895))->c.c_cdr=(Cnil),((V1895)));
+	goto T4731;
+T4731:;
+	if(((V1908))==Cnil){
+	goto T4733;
+	}
+	{object V1910;
+	object V1911;
+	V1910= (V1908)->c.c_cdr;
+	V1911= (((V1908))->c.c_cdr=((V1909)),((V1908)));
+	V1908= (V1910);
+	V1909= (V1911);
+	goto T4731;
+	}
+	goto T4733;
+T4733:;
+	V1882= (V1909);
+	goto T4610;
+	}
+	goto T4725;
+T4725:;
+	V1882= Cnil;}}
+	goto T4610;
+T4610:;
+	{object V1914;
+	object V1915;
+	object V1916;
+	{object V1917;
+	{object V1919;
+	object V1920;
+	{register object V1922;
+	V1922= ((object)VV[233]);
+	{register object V1923;
+	V1923= Cnil;
+	{register object V1924;
+	V1924= (V1320);
+	goto T4750;
+T4750:;
+	if(((V1924))==Cnil){
+	goto T4752;
+	}
+	if(((V1923))==Cnil){
+	goto T4757;
+	}
+	V1922= (((V1923))->c.c_cdr=((V1922)),((V1923)));
+	goto T4756;
+	
+	goto T4757;
+T4757:;
+	goto T4756;
+T4756:;
+	V1923= (V1924);
+	{object V1926;
+	V1926= (V1924)->c.c_cdr;
+	V1924= (V1926);
+	goto T4750;
+	}
+	goto T4752;
+T4752:;
+	goto T4748;
+	}
+	goto T4748;
+T4748:;
+	if(((V1923))==Cnil){
+	goto T4765;
+	}
+	V1919= (((V1923))->c.c_cdr=((V1922)),((V1923)));
+	goto T4746;
+	
+	goto T4765;
+T4765:;
+	V1919= (V1922);}}
+	goto T4746;
+T4746:;
+	V1920= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V1316);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V1919);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V1928;
+	register object V1929;
+	V1928= Cnil;
+	V1929= Cnil;
+	{register object V1930;
+	V1930= (V1316);
+	goto T4774;
+T4774:;
+	if(((V1930))==Cnil){
+	goto T4776;
+	}
+	{object V1932;
+	V1932= (V1930)->c.c_car;
+	{object V1933;
+	V1933= make_cons((V1932),Cnil);
+	if(((V1929))==Cnil){
+	goto T4783;
+	}
+	(void)((((V1929))->c.c_cdr=((V1933)),((V1929))));
+	V1929= (V1933);
+	goto T4782;
+	
+	goto T4783;
+T4783:;
+	V1928= (V1933);
+	V1929= (V1928);
+	goto T4782;
+T4782:;}}
+	{object V1934;
+	V1934= (V1930)->c.c_cdr;
+	V1930= (V1934);
+	goto T4774;
+	}
+	goto T4776;
+T4776:;
+	goto T4772;
+	}
+	goto T4772;
+T4772:;
+	if(((V1929))==Cnil){
+	goto T4793;
+	}
+	(void)((((V1929))->c.c_cdr=((V1919)),((V1929))));
+	V1929= (V1919);
+	goto T4792;
+	
+	goto T4793;
+T4793:;
+	V1928= (V1919);
+	V1929= (V1928);
+	goto T4792;
+T4792:;
+	V1917= (V1928);}}
+	{register object V1936;
+	V1936= Cnil;
+	{register object V1937;
+	register object V1938;
+	V1937= (V1917);
+	V1938= V1917->c.c_car;
+	goto T4801;
+T4801:;
+	if(((V1937))==Cnil){
+	goto T4808;
+	}
+	goto T4806;
+	
+	goto T4808;
+T4808:;
+	goto T4803;
+	
+	goto T4806;
+T4806:;
+	if(((V1938))==Cnil){
+	goto T4811;
+	}
+	V1936= make_cons((V1938),(V1936));
+	V1942= tp2((V1938));
+	if(!((V1942)==(0))){
+	goto T4822;
+	}
+	goto T4821;
+	
+	goto T4822;
+T4822:;
+	goto T4819;
+	
+	goto T4821;
+T4821:;
+	{object V1943;
+	V1943= (V1938)->c.c_car;
+	{fixnum V1945;
+	V1945= 1;
+	V1946= tp4(V1943);
+	switch(V1946){
+	case -1:
+	goto T4833;
+T4833:;
+	goto T4830;
+	
+	case 1:
+	goto T4834;
+T4834:;
+	case 2:
+	goto T4835;
+T4835:;
+	case 3:
+	goto T4836;
+T4836:;
+	case 4:
+	goto T4837;
+T4837:;
+	case 5:
+	goto T4838;
+T4838:;
+	case 6:
+	goto T4839;
+T4839:;
+	goto T4828;
+	
+	default:
+	goto T4840;
+T4840:;
+	goto T4830;
+	}
+	goto T4828;
+	
+	goto T4830;
+T4830:;
+	V1945= 0;
+	goto T4827;
+	
+	goto T4828;
+T4828:;
+	goto T4827;
+T4827:;
+	switch(V1945){
+	case 0:
+	goto T4852;
+T4852:;
+	if(!(((V1943))==(((object)VV[230])))){
+	goto T4849;
+	}
+	goto T4850;
+	
+	case 1:
+	goto T4853;
+T4853:;
+	if(!(((V1943))==(((object)VV[230])))){
+	goto T4849;
+	}
+	goto T4850;
+	}
+	goto T4849;
+	
+	goto T4850;
+T4850:;
+	goto T4848;
+	
+	goto T4849;
+T4849:;
+	goto T4846;
+	
+	goto T4848;
+T4848:;
+	goto T4818;
+	
+	goto T4846;
+T4846:;
+	switch(V1945){
+	case 0:
+	goto T4862;
+T4862:;
+	if(!(((V1943))==(((object)VV[231])))){
+	goto T4859;
+	}
+	goto T4860;
+	
+	case 1:
+	goto T4863;
+T4863:;
+	if(!(((V1943))==(((object)VV[231])))){
+	goto T4859;
+	}
+	goto T4860;
+	}
+	goto T4859;
+	
+	goto T4860;
+T4860:;
+	goto T4858;
+	
+	goto T4859;
+T4859:;
+	goto T4856;
+	
+	goto T4858;
+T4858:;
+	goto T4818;
+	
+	goto T4856;
+T4856:;
+	switch(V1945){
+	case 0:
+	goto T4872;
+T4872:;
+	if(!(((V1943))==(((object)VV[232])))){
+	goto T4869;
+	}
+	goto T4870;
+	
+	case 1:
+	goto T4873;
+T4873:;
+	if(!(((V1943))==(((object)VV[232])))){
+	goto T4869;
+	}
+	goto T4870;
+	}
+	goto T4869;
+	
+	goto T4870;
+T4870:;
+	goto T4868;
+	
+	goto T4869;
+T4869:;
+	goto T4866;
+	
+	goto T4868;
+T4868:;
+	goto T4818;
+	
+	goto T4866;
+T4866:;
+	goto T4816;
+	}}
+	goto T4819;
+T4819:;
+	goto T4816;
+	
+	goto T4818;
+T4818:;
+	goto T4798;
+	
+	goto T4816;
+T4816:;
+	goto T4810;
+	
+	goto T4811;
+T4811:;
+	goto T4810;
+T4810:;
+	V1937= (V1937)->c.c_cdr;
+	V1938= V1937->c.c_car;
+	goto T4801;
+	
+	goto T4803;
+T4803:;
+	goto T4798;
+	}
+	goto T4798;
+T4798:;
+	if(((V1936))==Cnil){
+	goto T4881;
+	}
+	{register object V1949;
+	register object V1950;
+	V1949= (V1936)->c.c_cdr;
+	V1950= (((V1936))->c.c_cdr=(Cnil),((V1936)));
+	goto T4887;
+T4887:;
+	if(((V1949))==Cnil){
+	goto T4889;
+	}
+	{object V1951;
+	object V1952;
+	V1951= (V1949)->c.c_cdr;
+	V1952= (((V1949))->c.c_cdr=((V1950)),((V1949)));
+	V1949= (V1951);
+	V1950= (V1952);
+	goto T4887;
+	}
+	goto T4889;
+T4889:;
+	V1914= (V1950);
+	goto T4744;
+	}
+	goto T4881;
+T4881:;
+	V1914= Cnil;}}
+	goto T4744;
+T4744:;
+	{register object V1955;
+	V1955= Cnil;
+	{register object V1956;
+	register object V1957;
+	V1956= (V1318);
+	V1957= V1318->c.c_car;
+	goto T4903;
+T4903:;
+	if(((V1956))==Cnil){
+	goto T4910;
+	}
+	goto T4908;
+	
+	goto T4910;
+T4910:;
+	goto T4905;
+	
+	goto T4908;
+T4908:;
+	if(((V1957))==Cnil){
+	goto T4913;
+	}
+	V1955= make_cons((V1957),(V1955));
+	V1961= tp2((V1957));
+	if(!((V1961)==(0))){
+	goto T4924;
+	}
+	goto T4923;
+	
+	goto T4924;
+T4924:;
+	goto T4921;
+	
+	goto T4923;
+T4923:;
+	{object V1962;
+	V1962= (V1957)->c.c_car;
+	{fixnum V1964;
+	V1964= 1;
+	V1965= tp4(V1962);
+	switch(V1965){
+	case -1:
+	goto T4935;
+T4935:;
+	goto T4932;
+	
+	case 1:
+	goto T4936;
+T4936:;
+	case 2:
+	goto T4937;
+T4937:;
+	case 3:
+	goto T4938;
+T4938:;
+	case 4:
+	goto T4939;
+T4939:;
+	case 5:
+	goto T4940;
+T4940:;
+	case 6:
+	goto T4941;
+T4941:;
+	goto T4930;
+	
+	default:
+	goto T4942;
+T4942:;
+	goto T4932;
+	}
+	goto T4930;
+	
+	goto T4932;
+T4932:;
+	V1964= 0;
+	goto T4929;
+	
+	goto T4930;
+T4930:;
+	goto T4929;
+T4929:;
+	switch(V1964){
+	case 0:
+	goto T4954;
+T4954:;
+	if(!(((V1962))==(((object)VV[230])))){
+	goto T4951;
+	}
+	goto T4952;
+	
+	case 1:
+	goto T4955;
+T4955:;
+	if(!(((V1962))==(((object)VV[230])))){
+	goto T4951;
+	}
+	goto T4952;
+	}
+	goto T4951;
+	
+	goto T4952;
+T4952:;
+	goto T4950;
+	
+	goto T4951;
+T4951:;
+	goto T4948;
+	
+	goto T4950;
+T4950:;
+	goto T4920;
+	
+	goto T4948;
+T4948:;
+	switch(V1964){
+	case 0:
+	goto T4964;
+T4964:;
+	if(!(((V1962))==(((object)VV[231])))){
+	goto T4961;
+	}
+	goto T4962;
+	
+	case 1:
+	goto T4965;
+T4965:;
+	if(!(((V1962))==(((object)VV[231])))){
+	goto T4961;
+	}
+	goto T4962;
+	}
+	goto T4961;
+	
+	goto T4962;
+T4962:;
+	goto T4960;
+	
+	goto T4961;
+T4961:;
+	goto T4958;
+	
+	goto T4960;
+T4960:;
+	goto T4920;
+	
+	goto T4958;
+T4958:;
+	switch(V1964){
+	case 0:
+	goto T4974;
+T4974:;
+	if(!(((V1962))==(((object)VV[232])))){
+	goto T4971;
+	}
+	goto T4972;
+	
+	case 1:
+	goto T4975;
+T4975:;
+	if(!(((V1962))==(((object)VV[232])))){
+	goto T4971;
+	}
+	goto T4972;
+	}
+	goto T4971;
+	
+	goto T4972;
+T4972:;
+	goto T4970;
+	
+	goto T4971;
+T4971:;
+	goto T4968;
+	
+	goto T4970;
+T4970:;
+	goto T4920;
+	
+	goto T4968;
+T4968:;
+	goto T4918;
+	}}
+	goto T4921;
+T4921:;
+	goto T4918;
+	
+	goto T4920;
+T4920:;
+	goto T4900;
+	
+	goto T4918;
+T4918:;
+	goto T4912;
+	
+	goto T4913;
+T4913:;
+	goto T4912;
+T4912:;
+	V1956= (V1956)->c.c_cdr;
+	V1957= V1956->c.c_car;
+	goto T4903;
+	
+	goto T4905;
+T4905:;
+	goto T4900;
+	}
+	goto T4900;
+T4900:;
+	if(((V1955))==Cnil){
+	goto T4983;
+	}
+	{register object V1968;
+	register object V1969;
+	V1968= (V1955)->c.c_cdr;
+	V1969= (((V1955))->c.c_cdr=(Cnil),((V1955)));
+	goto T4989;
+T4989:;
+	if(((V1968))==Cnil){
+	goto T4991;
+	}
+	{object V1970;
+	object V1971;
+	V1970= (V1968)->c.c_cdr;
+	V1971= (((V1968))->c.c_cdr=((V1969)),((V1968)));
+	V1968= (V1970);
+	V1969= (V1971);
+	goto T4989;
+	}
+	goto T4991;
+T4991:;
+	V1954= (V1969);
+	goto T4899;
+	}
+	goto T4983;
+T4983:;
+	V1954= Cnil;}
+	goto T4899;
+T4899:;
+	V1915= make_cons(((object)VV[234]),(V1954));
+	V1916= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V1914);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V1915);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V1973;
+	register object V1974;
+	V1973= Cnil;
+	V1974= Cnil;
+	{register object V1975;
+	V1975= (V1914);
+	goto T5006;
+T5006:;
+	if(((V1975))==Cnil){
+	goto T5008;
+	}
+	{object V1977;
+	V1977= (V1975)->c.c_car;
+	{object V1978;
+	V1978= make_cons((V1977),Cnil);
+	if(((V1974))==Cnil){
+	goto T5015;
+	}
+	(void)((((V1974))->c.c_cdr=((V1978)),((V1974))));
+	V1974= (V1978);
+	goto T5014;
+	
+	goto T5015;
+T5015:;
+	V1973= (V1978);
+	V1974= (V1973);
+	goto T5014;
+T5014:;}}
+	{object V1979;
+	V1979= (V1975)->c.c_cdr;
+	V1975= (V1979);
+	goto T5006;
+	}
+	goto T5008;
+T5008:;
+	goto T5004;
+	}
+	goto T5004;
+T5004:;
+	if(((V1974))==Cnil){
+	goto T5025;
+	}
+	(void)((((V1974))->c.c_cdr=((V1915)),((V1974))));
+	V1974= (V1915);
+	goto T5024;
+	
+	goto T5025;
+T5025:;
+	V1973= (V1915);
+	V1974= (V1973);
+	goto T5024;
+T5024:;
+	V1913= (V1973);}}
+	V1883= make_cons(((object)VV[235]),(V1913));
+	V1884= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V1882);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V1883);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V1981;
+	register object V1982;
+	V1981= Cnil;
+	V1982= Cnil;
+	{register object V1983;
+	V1983= (V1882);
+	goto T5036;
+T5036:;
+	if(((V1983))==Cnil){
+	goto T5038;
+	}
+	{object V1985;
+	V1985= (V1983)->c.c_car;
+	{object V1986;
+	V1986= make_cons((V1985),Cnil);
+	if(((V1982))==Cnil){
+	goto T5045;
+	}
+	(void)((((V1982))->c.c_cdr=((V1986)),((V1982))));
+	V1982= (V1986);
+	goto T5044;
+	
+	goto T5045;
+T5045:;
+	V1981= (V1986);
+	V1982= (V1981);
+	goto T5044;
+T5044:;}}
+	{object V1987;
+	V1987= (V1983)->c.c_cdr;
+	V1983= (V1987);
+	goto T5036;
+	}
+	goto T5038;
+T5038:;
+	goto T5034;
+	}
+	goto T5034;
+T5034:;
+	if(((V1982))==Cnil){
+	goto T5055;
+	}
+	(void)((((V1982))->c.c_cdr=((V1883)),((V1982))));
+	V1982= (V1883);
+	goto T5054;
+	
+	goto T5055;
+T5055:;
+	V1981= (V1883);
+	V1982= (V1981);
+	goto T5054;
+T5054:;
+	V1881= (V1981);}}
+	V1880= make_cons(((object)VV[236]),(V1881));
+	if(((V1321))==Cnil){
+	goto T5060;
+	}
+	{object V1989 = list(3,((object)VV[103]),make_cons(list(2,(V1321),Cnil),Cnil),(V1880));
+	VMR46(V1989);}
+	goto T5060;
+T5060:;
+	{object V1990 = (V1880);
+	VMR46(V1990);}}
+	goto T4603;
+T4603:;
+	{register object V1991;
+	register object V1992;
+	register object V1993;
+	register object V1994;
+	register object V1995;
+	V1991= (V1319);
+	V1992= (V1320);
+	V1993= Cnil;
+	V1994= make_fixnum(0);
+	V1995= Cnil;
+	goto T5065;
+T5065:;
+	if(((V1991))==Cnil){
+	goto T5072;
+	}
+	goto T5070;
+	
+	goto T5072;
+T5072:;
+	goto T5067;
+	
+	goto T5070;
+T5070:;
+	V1996= (V1991)->c.c_car;
+	V1998= (V1992)->c.c_car;
+	if(!(equal((V1996),(V1998)))){
+	goto T5078;
+	}
+	goto T5075;
+	
+	goto T5078;
+T5078:;
+	V1993= (V1991);
+	V1994= make_fixnum(0);
+	goto T5074;
+	
+	goto T5075;
+T5075:;
+	V2000= (V1991)->c.c_car;
+	V1995= (fcall.valp=(fixnum)0,/* ANSI-LOOP::ESTIMATE-CODE-SIZE */(*LnkLI191)((V2000),(V1312)));
+	if(((V1995))==Cnil){
+	goto T5091;
+	}
+	goto T5088;
+	
+	goto T5091;
+T5091:;
+	goto T5087;
+	
+	goto T5088;
+T5088:;
+	{object V2003;
+	V2003= (V1995);
+	{object V2004;
+	V2004= immnum_plus((V1994),(V2003));
+	V1994= (V2004);}}
+	if(!(immnum_gt((V1994),make_fixnum(40)))){
+	goto T5085;
+	}
+	goto T5087;
+T5087:;
+	{register object V2005;
+	register object V2006;
+	V2005= Cnil;
+	V2006= Cnil;
+	goto T5102;
+T5102:;
+	{object V2007;
+	{object V2008;
+	V2008= (V1319)->c.c_car;
+	V1319= (V1319)->c.c_cdr;
+	V2007= (V2008);}
+	V2006= make_cons((V2007),(V2006));}
+	{object V2011;
+	{object V2012;
+	V2012= (V1320)->c.c_car;
+	V1320= (V1320)->c.c_cdr;
+	V2011= (V2012);}
+	V2005= make_cons((V2011),(V2005));}
+	V2015= (V1993)->c.c_cdr;
+	if(!(((V1319))==((V2015)))){
+	goto T5117;
+	}
+	goto T5100;
+	
+	goto T5117;
+T5117:;
+	goto T5102;
+	
+	goto T5100;
+T5100:;
+	if(((V1321))==Cnil){
+	goto T5126;
+	}
+	goto T5123;
+	
+	goto T5126;
+T5126:;
+	{object V2017;
+	V1321= (((object)VV[239])->s.s_dbind);
+	V2017= list(3,((object)VV[47]),(V1321),Ct);
+	V2006= make_cons((V2017),(V2006));
+	goto T5122;
+	}
+	goto T5123;
+T5123:;
+	goto T5122;
+T5122:;
+	{object V2018;
+	{object V2020;
+	{register object V2022;
+	V2022= Cnil;
+	{register object V2023;
+	register object V2024;
+	V2023= (V2005);
+	V2024= (V2005)->c.c_car;
+	goto T5137;
+T5137:;
+	if(((V2023))==Cnil){
+	goto T5144;
+	}
+	goto T5142;
+	
+	goto T5144;
+T5144:;
+	goto T5139;
+	
+	goto T5142;
+T5142:;
+	if(((V2024))==Cnil){
+	goto T5147;
+	}
+	V2022= make_cons((V2024),(V2022));
+	V2028= tp2((V2024));
+	if(!((V2028)==(0))){
+	goto T5158;
+	}
+	goto T5157;
+	
+	goto T5158;
+T5158:;
+	goto T5155;
+	
+	goto T5157;
+T5157:;
+	{object V2029;
+	V2029= (V2024)->c.c_car;
+	{fixnum V2031;
+	V2031= 1;
+	V2032= tp4(V2029);
+	switch(V2032){
+	case -1:
+	goto T5169;
+T5169:;
+	goto T5166;
+	
+	case 1:
+	goto T5170;
+T5170:;
+	case 2:
+	goto T5171;
+T5171:;
+	case 3:
+	goto T5172;
+T5172:;
+	case 4:
+	goto T5173;
+T5173:;
+	case 5:
+	goto T5174;
+T5174:;
+	case 6:
+	goto T5175;
+T5175:;
+	goto T5164;
+	
+	default:
+	goto T5176;
+T5176:;
+	goto T5166;
+	}
+	goto T5164;
+	
+	goto T5166;
+T5166:;
+	V2031= 0;
+	goto T5163;
+	
+	goto T5164;
+T5164:;
+	goto T5163;
+T5163:;
+	switch(V2031){
+	case 0:
+	goto T5188;
+T5188:;
+	if(!(((V2029))==(((object)VV[230])))){
+	goto T5185;
+	}
+	goto T5186;
+	
+	case 1:
+	goto T5189;
+T5189:;
+	if(!(((V2029))==(((object)VV[230])))){
+	goto T5185;
+	}
+	goto T5186;
+	}
+	goto T5185;
+	
+	goto T5186;
+T5186:;
+	goto T5184;
+	
+	goto T5185;
+T5185:;
+	goto T5182;
+	
+	goto T5184;
+T5184:;
+	goto T5154;
+	
+	goto T5182;
+T5182:;
+	switch(V2031){
+	case 0:
+	goto T5198;
+T5198:;
+	if(!(((V2029))==(((object)VV[231])))){
+	goto T5195;
+	}
+	goto T5196;
+	
+	case 1:
+	goto T5199;
+T5199:;
+	if(!(((V2029))==(((object)VV[231])))){
+	goto T5195;
+	}
+	goto T5196;
+	}
+	goto T5195;
+	
+	goto T5196;
+T5196:;
+	goto T5194;
+	
+	goto T5195;
+T5195:;
+	goto T5192;
+	
+	goto T5194;
+T5194:;
+	goto T5154;
+	
+	goto T5192;
+T5192:;
+	switch(V2031){
+	case 0:
+	goto T5208;
+T5208:;
+	if(!(((V2029))==(((object)VV[232])))){
+	goto T5205;
+	}
+	goto T5206;
+	
+	case 1:
+	goto T5209;
+T5209:;
+	if(!(((V2029))==(((object)VV[232])))){
+	goto T5205;
+	}
+	goto T5206;
+	}
+	goto T5205;
+	
+	goto T5206;
+T5206:;
+	goto T5204;
+	
+	goto T5205;
+T5205:;
+	goto T5202;
+	
+	goto T5204;
+T5204:;
+	goto T5154;
+	
+	goto T5202;
+T5202:;
+	goto T5152;
+	}}
+	goto T5155;
+T5155:;
+	goto T5152;
+	
+	goto T5154;
+T5154:;
+	goto T5134;
+	
+	goto T5152;
+T5152:;
+	goto T5146;
+	
+	goto T5147;
+T5147:;
+	goto T5146;
+T5146:;
+	V2023= (V2023)->c.c_cdr;
+	V2024= V2023->c.c_car;
+	goto T5137;
+	
+	goto T5139;
+T5139:;
+	goto T5134;
+	}
+	goto T5134;
+T5134:;
+	if(((V2022))==Cnil){
+	goto T5217;
+	}
+	{register object V2035;
+	register object V2036;
+	V2035= (V2022)->c.c_cdr;
+	V2036= (((V2022))->c.c_cdr=(Cnil),((V2022)));
+	goto T5223;
+T5223:;
+	if(((V2035))==Cnil){
+	goto T5225;
+	}
+	{object V2037;
+	object V2038;
+	V2037= (V2035)->c.c_cdr;
+	V2038= (((V2035))->c.c_cdr=((V2036)),((V2035)));
+	V2035= (V2037);
+	V2036= (V2038);
+	goto T5223;
+	}
+	goto T5225;
+T5225:;
+	V2020= (V2036);
+	goto T5133;
+	}
+	goto T5217;
+T5217:;
+	V2020= Cnil;}
+	goto T5133;
+T5133:;
+	if((V2020->c.c_cdr)==Cnil){
+	goto T5237;
+	}
+	goto T5234;
+	
+	goto T5237;
+T5237:;
+	V2019= V2020->c.c_car;
+	goto T5132;
+	
+	goto T5234;
+T5234:;
+	V2019= make_cons(((object)VV[53]),(V2020));}
+	goto T5132;
+T5132:;
+	{object V2041;
+	{register object V2043;
+	V2043= Cnil;
+	{register object V2044;
+	register object V2045;
+	V2044= (V2006);
+	V2045= (V2006)->c.c_car;
+	goto T5244;
+T5244:;
+	if(((V2044))==Cnil){
+	goto T5251;
+	}
+	goto T5249;
+	
+	goto T5251;
+T5251:;
+	goto T5246;
+	
+	goto T5249;
+T5249:;
+	if(((V2045))==Cnil){
+	goto T5254;
+	}
+	V2043= make_cons((V2045),(V2043));
+	V2049= tp2((V2045));
+	if(!((V2049)==(0))){
+	goto T5265;
+	}
+	goto T5264;
+	
+	goto T5265;
+T5265:;
+	goto T5262;
+	
+	goto T5264;
+T5264:;
+	{object V2050;
+	V2050= (V2045)->c.c_car;
+	{fixnum V2052;
+	V2052= 1;
+	V2053= tp4(V2050);
+	switch(V2053){
+	case -1:
+	goto T5276;
+T5276:;
+	goto T5273;
+	
+	case 1:
+	goto T5277;
+T5277:;
+	case 2:
+	goto T5278;
+T5278:;
+	case 3:
+	goto T5279;
+T5279:;
+	case 4:
+	goto T5280;
+T5280:;
+	case 5:
+	goto T5281;
+T5281:;
+	case 6:
+	goto T5282;
+T5282:;
+	goto T5271;
+	
+	default:
+	goto T5283;
+T5283:;
+	goto T5273;
+	}
+	goto T5271;
+	
+	goto T5273;
+T5273:;
+	V2052= 0;
+	goto T5270;
+	
+	goto T5271;
+T5271:;
+	goto T5270;
+T5270:;
+	switch(V2052){
+	case 0:
+	goto T5295;
+T5295:;
+	if(!(((V2050))==(((object)VV[230])))){
+	goto T5292;
+	}
+	goto T5293;
+	
+	case 1:
+	goto T5296;
+T5296:;
+	if(!(((V2050))==(((object)VV[230])))){
+	goto T5292;
+	}
+	goto T5293;
+	}
+	goto T5292;
+	
+	goto T5293;
+T5293:;
+	goto T5291;
+	
+	goto T5292;
+T5292:;
+	goto T5289;
+	
+	goto T5291;
+T5291:;
+	goto T5261;
+	
+	goto T5289;
+T5289:;
+	switch(V2052){
+	case 0:
+	goto T5305;
+T5305:;
+	if(!(((V2050))==(((object)VV[231])))){
+	goto T5302;
+	}
+	goto T5303;
+	
+	case 1:
+	goto T5306;
+T5306:;
+	if(!(((V2050))==(((object)VV[231])))){
+	goto T5302;
+	}
+	goto T5303;
+	}
+	goto T5302;
+	
+	goto T5303;
+T5303:;
+	goto T5301;
+	
+	goto T5302;
+T5302:;
+	goto T5299;
+	
+	goto T5301;
+T5301:;
+	goto T5261;
+	
+	goto T5299;
+T5299:;
+	switch(V2052){
+	case 0:
+	goto T5315;
+T5315:;
+	if(!(((V2050))==(((object)VV[232])))){
+	goto T5312;
+	}
+	goto T5313;
+	
+	case 1:
+	goto T5316;
+T5316:;
+	if(!(((V2050))==(((object)VV[232])))){
+	goto T5312;
+	}
+	goto T5313;
+	}
+	goto T5312;
+	
+	goto T5313;
+T5313:;
+	goto T5311;
+	
+	goto T5312;
+T5312:;
+	goto T5309;
+	
+	goto T5311;
+T5311:;
+	goto T5261;
+	
+	goto T5309;
+T5309:;
+	goto T5259;
+	}}
+	goto T5262;
+T5262:;
+	goto T5259;
+	
+	goto T5261;
+T5261:;
+	goto T5241;
+	
+	goto T5259;
+T5259:;
+	goto T5253;
+	
+	goto T5254;
+T5254:;
+	goto T5253;
+T5253:;
+	V2044= (V2044)->c.c_cdr;
+	V2045= V2044->c.c_car;
+	goto T5244;
+	
+	goto T5246;
+T5246:;
+	goto T5241;
+	}
+	goto T5241;
+T5241:;
+	if(((V2043))==Cnil){
+	goto T5324;
+	}
+	{register object V2056;
+	register object V2057;
+	V2056= (V2043)->c.c_cdr;
+	V2057= (((V2043))->c.c_cdr=(Cnil),((V2043)));
+	goto T5330;
+T5330:;
+	if(((V2056))==Cnil){
+	goto T5332;
+	}
+	{object V2058;
+	object V2059;
+	V2058= (V2056)->c.c_cdr;
+	V2059= (((V2056))->c.c_cdr=((V2057)),((V2056)));
+	V2056= (V2058);
+	V2057= (V2059);
+	goto T5330;
+	}
+	goto T5332;
+T5332:;
+	V2041= (V2057);
+	goto T5240;
+	}
+	goto T5324;
+T5324:;
+	V2041= Cnil;}
+	goto T5240;
+T5240:;
+	if((V2041->c.c_cdr)==Cnil){
+	goto T5344;
+	}
+	goto T5341;
+	
+	goto T5344;
+T5344:;
+	V2040= V2041->c.c_car;
+	goto T5239;
+	
+	goto T5341;
+T5341:;
+	V2040= make_cons(((object)VV[53]),(V2041));}
+	goto T5239;
+T5239:;
+	V2018= list(4,((object)VV[240]),(V1321),(V2019),(V2040));
+	V1316= make_cons((V2018),(V1316));}}
+	goto T5349;
+T5349:;
+	{object V2061;
+	V2061= (V1320)->c.c_car;
+	V1320= (V1320)->c.c_cdr;}
+	{object V2064;
+	{object V2065;
+	V2065= (V1319)->c.c_car;
+	V1319= (V1319)->c.c_cdr;
+	V2064= (V2065);}
+	V1316= make_cons((V2064),(V1316));}
+	V2068= (V1991)->c.c_cdr;
+	if(!(((V1319))==((V2068)))){
+	goto T5362;
+	}
+	goto T5347;
+	
+	goto T5362;
+T5362:;
+	goto T5349;
+	
+	goto T5347;
+T5347:;
+	goto T5063;
+	
+	goto T5085;
+T5085:;
+	goto T5074;
+T5074:;
+	{object V2070;
+	object V2071;
+	V2070= (V1991)->c.c_cdr;
+	V2071= (V1992)->c.c_cdr;
+	V1991= (V2070);
+	V1992= (V2071);}
+	goto T5065;
+	
+	goto T5067;
+T5067:;
+	{object V2074;
+	{object V2076;
+	object V2077;
+	object V2078;
+	{object V2079;
+	{object V2080;
+	object V2081;
+	V2080= (/* COMMON-LISP::NREVERSE */(*LnkLI192)((V1319)));
+	V2081= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V1314);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V2080);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V2082;
+	register object V2083;
+	V2082= Cnil;
+	V2083= Cnil;
+	{register object V2084;
+	V2084= (V1314);
+	goto T5386;
+T5386:;
+	if(((V2084))==Cnil){
+	goto T5388;
+	}
+	{object V2086;
+	V2086= (V2084)->c.c_car;
+	{object V2087;
+	V2087= make_cons((V2086),Cnil);
+	if(((V2083))==Cnil){
+	goto T5395;
+	}
+	(void)((((V2083))->c.c_cdr=((V2087)),((V2083))));
+	V2083= (V2087);
+	goto T5394;
+	
+	goto T5395;
+T5395:;
+	V2082= (V2087);
+	V2083= (V2082);
+	goto T5394;
+T5394:;}}
+	{object V2088;
+	V2088= (V2084)->c.c_cdr;
+	V2084= (V2088);
+	goto T5386;
+	}
+	goto T5388;
+T5388:;
+	goto T5384;
+	}
+	goto T5384;
+T5384:;
+	if(((V2083))==Cnil){
+	goto T5405;
+	}
+	(void)((((V2083))->c.c_cdr=((V2080)),((V2083))));
+	V2083= (V2080);
+	goto T5404;
+	
+	goto T5405;
+T5405:;
+	V2082= (V2080);
+	V2083= (V2082);
+	goto T5404;
+T5404:;
+	V2079= (V2082);}}
+	{register object V2090;
+	V2090= Cnil;
+	{register object V2091;
+	register object V2092;
+	V2091= (V2079);
+	V2092= V2079->c.c_car;
+	goto T5413;
+T5413:;
+	if(((V2091))==Cnil){
+	goto T5420;
+	}
+	goto T5418;
+	
+	goto T5420;
+T5420:;
+	goto T5415;
+	
+	goto T5418;
+T5418:;
+	if(((V2092))==Cnil){
+	goto T5423;
+	}
+	V2090= make_cons((V2092),(V2090));
+	V2096= tp2((V2092));
+	if(!((V2096)==(0))){
+	goto T5434;
+	}
+	goto T5433;
+	
+	goto T5434;
+T5434:;
+	goto T5431;
+	
+	goto T5433;
+T5433:;
+	{object V2097;
+	V2097= (V2092)->c.c_car;
+	{fixnum V2099;
+	V2099= 1;
+	V2100= tp4(V2097);
+	switch(V2100){
+	case -1:
+	goto T5445;
+T5445:;
+	goto T5442;
+	
+	case 1:
+	goto T5446;
+T5446:;
+	case 2:
+	goto T5447;
+T5447:;
+	case 3:
+	goto T5448;
+T5448:;
+	case 4:
+	goto T5449;
+T5449:;
+	case 5:
+	goto T5450;
+T5450:;
+	case 6:
+	goto T5451;
+T5451:;
+	goto T5440;
+	
+	default:
+	goto T5452;
+T5452:;
+	goto T5442;
+	}
+	goto T5440;
+	
+	goto T5442;
+T5442:;
+	V2099= 0;
+	goto T5439;
+	
+	goto T5440;
+T5440:;
+	goto T5439;
+T5439:;
+	switch(V2099){
+	case 0:
+	goto T5464;
+T5464:;
+	if(!(((V2097))==(((object)VV[230])))){
+	goto T5461;
+	}
+	goto T5462;
+	
+	case 1:
+	goto T5465;
+T5465:;
+	if(!(((V2097))==(((object)VV[230])))){
+	goto T5461;
+	}
+	goto T5462;
+	}
+	goto T5461;
+	
+	goto T5462;
+T5462:;
+	goto T5460;
+	
+	goto T5461;
+T5461:;
+	goto T5458;
+	
+	goto T5460;
+T5460:;
+	goto T5430;
+	
+	goto T5458;
+T5458:;
+	switch(V2099){
+	case 0:
+	goto T5474;
+T5474:;
+	if(!(((V2097))==(((object)VV[231])))){
+	goto T5471;
+	}
+	goto T5472;
+	
+	case 1:
+	goto T5475;
+T5475:;
+	if(!(((V2097))==(((object)VV[231])))){
+	goto T5471;
+	}
+	goto T5472;
+	}
+	goto T5471;
+	
+	goto T5472;
+T5472:;
+	goto T5470;
+	
+	goto T5471;
+T5471:;
+	goto T5468;
+	
+	goto T5470;
+T5470:;
+	goto T5430;
+	
+	goto T5468;
+T5468:;
+	switch(V2099){
+	case 0:
+	goto T5484;
+T5484:;
+	if(!(((V2097))==(((object)VV[232])))){
+	goto T5481;
+	}
+	goto T5482;
+	
+	case 1:
+	goto T5485;
+T5485:;
+	if(!(((V2097))==(((object)VV[232])))){
+	goto T5481;
+	}
+	goto T5482;
+	}
+	goto T5481;
+	
+	goto T5482;
+T5482:;
+	goto T5480;
+	
+	goto T5481;
+T5481:;
+	goto T5478;
+	
+	goto T5480;
+T5480:;
+	goto T5430;
+	
+	goto T5478;
+T5478:;
+	goto T5428;
+	}}
+	goto T5431;
+T5431:;
+	goto T5428;
+	
+	goto T5430;
+T5430:;
+	goto T5410;
+	
+	goto T5428;
+T5428:;
+	goto T5422;
+	
+	goto T5423;
+T5423:;
+	goto T5422;
+T5422:;
+	V2091= (V2091)->c.c_cdr;
+	V2092= V2091->c.c_car;
+	goto T5413;
+	
+	goto T5415;
+T5415:;
+	goto T5410;
+	}
+	goto T5410;
+T5410:;
+	if(((V2090))==Cnil){
+	goto T5493;
+	}
+	{register object V2103;
+	register object V2104;
+	V2103= (V2090)->c.c_cdr;
+	V2104= (((V2090))->c.c_cdr=(Cnil),((V2090)));
+	goto T5499;
+T5499:;
+	if(((V2103))==Cnil){
+	goto T5501;
+	}
+	{object V2105;
+	object V2106;
+	V2105= (V2103)->c.c_cdr;
+	V2106= (((V2103))->c.c_cdr=((V2104)),((V2103)));
+	V2103= (V2105);
+	V2104= (V2106);
+	goto T5499;
+	}
+	goto T5501;
+T5501:;
+	V2076= (V2104);
+	goto T5377;
+	}
+	goto T5493;
+T5493:;
+	V2076= Cnil;}}
+	goto T5377;
+T5377:;
+	{object V2109;
+	object V2110;
+	object V2111;
+	{object V2112;
+	{object V2114;
+	object V2115;
+	{register object V2117;
+	V2117= ((object)VV[233]);
+	{register object V2118;
+	V2118= Cnil;
+	{register object V2119;
+	V2119= (V1320);
+	goto T5518;
+T5518:;
+	if(((V2119))==Cnil){
+	goto T5520;
+	}
+	if(((V2118))==Cnil){
+	goto T5525;
+	}
+	V2117= (((V2118))->c.c_cdr=((V2117)),((V2118)));
+	goto T5524;
+	
+	goto T5525;
+T5525:;
+	goto T5524;
+T5524:;
+	V2118= (V2119);
+	{object V2121;
+	V2121= (V2119)->c.c_cdr;
+	V2119= (V2121);
+	goto T5518;
+	}
+	goto T5520;
+T5520:;
+	goto T5516;
+	}
+	goto T5516;
+T5516:;
+	if(((V2118))==Cnil){
+	goto T5533;
+	}
+	V2114= (((V2118))->c.c_cdr=((V2117)),((V2118)));
+	goto T5514;
+	
+	goto T5533;
+T5533:;
+	V2114= (V2117);}}
+	goto T5514;
+T5514:;
+	V2115= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V1316);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V2114);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V2123;
+	register object V2124;
+	V2123= Cnil;
+	V2124= Cnil;
+	{register object V2125;
+	V2125= (V1316);
+	goto T5542;
+T5542:;
+	if(((V2125))==Cnil){
+	goto T5544;
+	}
+	{object V2127;
+	V2127= (V2125)->c.c_car;
+	{object V2128;
+	V2128= make_cons((V2127),Cnil);
+	if(((V2124))==Cnil){
+	goto T5551;
+	}
+	(void)((((V2124))->c.c_cdr=((V2128)),((V2124))));
+	V2124= (V2128);
+	goto T5550;
+	
+	goto T5551;
+T5551:;
+	V2123= (V2128);
+	V2124= (V2123);
+	goto T5550;
+T5550:;}}
+	{object V2129;
+	V2129= (V2125)->c.c_cdr;
+	V2125= (V2129);
+	goto T5542;
+	}
+	goto T5544;
+T5544:;
+	goto T5540;
+	}
+	goto T5540;
+T5540:;
+	if(((V2124))==Cnil){
+	goto T5561;
+	}
+	(void)((((V2124))->c.c_cdr=((V2114)),((V2124))));
+	V2124= (V2114);
+	goto T5560;
+	
+	goto T5561;
+T5561:;
+	V2123= (V2114);
+	V2124= (V2123);
+	goto T5560;
+T5560:;
+	V2112= (V2123);}}
+	{register object V2131;
+	V2131= Cnil;
+	{register object V2132;
+	register object V2133;
+	V2132= (V2112);
+	V2133= V2112->c.c_car;
+	goto T5569;
+T5569:;
+	if(((V2132))==Cnil){
+	goto T5576;
+	}
+	goto T5574;
+	
+	goto T5576;
+T5576:;
+	goto T5571;
+	
+	goto T5574;
+T5574:;
+	if(((V2133))==Cnil){
+	goto T5579;
+	}
+	V2131= make_cons((V2133),(V2131));
+	V2137= tp2((V2133));
+	if(!((V2137)==(0))){
+	goto T5590;
+	}
+	goto T5589;
+	
+	goto T5590;
+T5590:;
+	goto T5587;
+	
+	goto T5589;
+T5589:;
+	{object V2138;
+	V2138= (V2133)->c.c_car;
+	{fixnum V2140;
+	V2140= 1;
+	V2141= tp4(V2138);
+	switch(V2141){
+	case -1:
+	goto T5601;
+T5601:;
+	goto T5598;
+	
+	case 1:
+	goto T5602;
+T5602:;
+	case 2:
+	goto T5603;
+T5603:;
+	case 3:
+	goto T5604;
+T5604:;
+	case 4:
+	goto T5605;
+T5605:;
+	case 5:
+	goto T5606;
+T5606:;
+	case 6:
+	goto T5607;
+T5607:;
+	goto T5596;
+	
+	default:
+	goto T5608;
+T5608:;
+	goto T5598;
+	}
+	goto T5596;
+	
+	goto T5598;
+T5598:;
+	V2140= 0;
+	goto T5595;
+	
+	goto T5596;
+T5596:;
+	goto T5595;
+T5595:;
+	switch(V2140){
+	case 0:
+	goto T5620;
+T5620:;
+	if(!(((V2138))==(((object)VV[230])))){
+	goto T5617;
+	}
+	goto T5618;
+	
+	case 1:
+	goto T5621;
+T5621:;
+	if(!(((V2138))==(((object)VV[230])))){
+	goto T5617;
+	}
+	goto T5618;
+	}
+	goto T5617;
+	
+	goto T5618;
+T5618:;
+	goto T5616;
+	
+	goto T5617;
+T5617:;
+	goto T5614;
+	
+	goto T5616;
+T5616:;
+	goto T5586;
+	
+	goto T5614;
+T5614:;
+	switch(V2140){
+	case 0:
+	goto T5630;
+T5630:;
+	if(!(((V2138))==(((object)VV[231])))){
+	goto T5627;
+	}
+	goto T5628;
+	
+	case 1:
+	goto T5631;
+T5631:;
+	if(!(((V2138))==(((object)VV[231])))){
+	goto T5627;
+	}
+	goto T5628;
+	}
+	goto T5627;
+	
+	goto T5628;
+T5628:;
+	goto T5626;
+	
+	goto T5627;
+T5627:;
+	goto T5624;
+	
+	goto T5626;
+T5626:;
+	goto T5586;
+	
+	goto T5624;
+T5624:;
+	switch(V2140){
+	case 0:
+	goto T5640;
+T5640:;
+	if(!(((V2138))==(((object)VV[232])))){
+	goto T5637;
+	}
+	goto T5638;
+	
+	case 1:
+	goto T5641;
+T5641:;
+	if(!(((V2138))==(((object)VV[232])))){
+	goto T5637;
+	}
+	goto T5638;
+	}
+	goto T5637;
+	
+	goto T5638;
+T5638:;
+	goto T5636;
+	
+	goto T5637;
+T5637:;
+	goto T5634;
+	
+	goto T5636;
+T5636:;
+	goto T5586;
+	
+	goto T5634;
+T5634:;
+	goto T5584;
+	}}
+	goto T5587;
+T5587:;
+	goto T5584;
+	
+	goto T5586;
+T5586:;
+	goto T5566;
+	
+	goto T5584;
+T5584:;
+	goto T5578;
+	
+	goto T5579;
+T5579:;
+	goto T5578;
+T5578:;
+	V2132= (V2132)->c.c_cdr;
+	V2133= V2132->c.c_car;
+	goto T5569;
+	
+	goto T5571;
+T5571:;
+	goto T5566;
+	}
+	goto T5566;
+T5566:;
+	if(((V2131))==Cnil){
+	goto T5649;
+	}
+	{register object V2144;
+	register object V2145;
+	V2144= (V2131)->c.c_cdr;
+	V2145= (((V2131))->c.c_cdr=(Cnil),((V2131)));
+	goto T5655;
+T5655:;
+	if(((V2144))==Cnil){
+	goto T5657;
+	}
+	{object V2146;
+	object V2147;
+	V2146= (V2144)->c.c_cdr;
+	V2147= (((V2144))->c.c_cdr=((V2145)),((V2144)));
+	V2144= (V2146);
+	V2145= (V2147);
+	goto T5655;
+	}
+	goto T5657;
+T5657:;
+	V2109= (V2145);
+	goto T5512;
+	}
+	goto T5649;
+T5649:;
+	V2109= Cnil;}}
+	goto T5512;
+T5512:;
+	{register object V2150;
+	V2150= Cnil;
+	{register object V2151;
+	register object V2152;
+	V2151= (V1318);
+	V2152= V1318->c.c_car;
+	goto T5671;
+T5671:;
+	if(((V2151))==Cnil){
+	goto T5678;
+	}
+	goto T5676;
+	
+	goto T5678;
+T5678:;
+	goto T5673;
+	
+	goto T5676;
+T5676:;
+	if(((V2152))==Cnil){
+	goto T5681;
+	}
+	V2150= make_cons((V2152),(V2150));
+	V2156= tp2((V2152));
+	if(!((V2156)==(0))){
+	goto T5692;
+	}
+	goto T5691;
+	
+	goto T5692;
+T5692:;
+	goto T5689;
+	
+	goto T5691;
+T5691:;
+	{object V2157;
+	V2157= (V2152)->c.c_car;
+	{fixnum V2159;
+	V2159= 1;
+	V2160= tp4(V2157);
+	switch(V2160){
+	case -1:
+	goto T5703;
+T5703:;
+	goto T5700;
+	
+	case 1:
+	goto T5704;
+T5704:;
+	case 2:
+	goto T5705;
+T5705:;
+	case 3:
+	goto T5706;
+T5706:;
+	case 4:
+	goto T5707;
+T5707:;
+	case 5:
+	goto T5708;
+T5708:;
+	case 6:
+	goto T5709;
+T5709:;
+	goto T5698;
+	
+	default:
+	goto T5710;
+T5710:;
+	goto T5700;
+	}
+	goto T5698;
+	
+	goto T5700;
+T5700:;
+	V2159= 0;
+	goto T5697;
+	
+	goto T5698;
+T5698:;
+	goto T5697;
+T5697:;
+	switch(V2159){
+	case 0:
+	goto T5722;
+T5722:;
+	if(!(((V2157))==(((object)VV[230])))){
+	goto T5719;
+	}
+	goto T5720;
+	
+	case 1:
+	goto T5723;
+T5723:;
+	if(!(((V2157))==(((object)VV[230])))){
+	goto T5719;
+	}
+	goto T5720;
+	}
+	goto T5719;
+	
+	goto T5720;
+T5720:;
+	goto T5718;
+	
+	goto T5719;
+T5719:;
+	goto T5716;
+	
+	goto T5718;
+T5718:;
+	goto T5688;
+	
+	goto T5716;
+T5716:;
+	switch(V2159){
+	case 0:
+	goto T5732;
+T5732:;
+	if(!(((V2157))==(((object)VV[231])))){
+	goto T5729;
+	}
+	goto T5730;
+	
+	case 1:
+	goto T5733;
+T5733:;
+	if(!(((V2157))==(((object)VV[231])))){
+	goto T5729;
+	}
+	goto T5730;
+	}
+	goto T5729;
+	
+	goto T5730;
+T5730:;
+	goto T5728;
+	
+	goto T5729;
+T5729:;
+	goto T5726;
+	
+	goto T5728;
+T5728:;
+	goto T5688;
+	
+	goto T5726;
+T5726:;
+	switch(V2159){
+	case 0:
+	goto T5742;
+T5742:;
+	if(!(((V2157))==(((object)VV[232])))){
+	goto T5739;
+	}
+	goto T5740;
+	
+	case 1:
+	goto T5743;
+T5743:;
+	if(!(((V2157))==(((object)VV[232])))){
+	goto T5739;
+	}
+	goto T5740;
+	}
+	goto T5739;
+	
+	goto T5740;
+T5740:;
+	goto T5738;
+	
+	goto T5739;
+T5739:;
+	goto T5736;
+	
+	goto T5738;
+T5738:;
+	goto T5688;
+	
+	goto T5736;
+T5736:;
+	goto T5686;
+	}}
+	goto T5689;
+T5689:;
+	goto T5686;
+	
+	goto T5688;
+T5688:;
+	goto T5668;
+	
+	goto T5686;
+T5686:;
+	goto T5680;
+	
+	goto T5681;
+T5681:;
+	goto T5680;
+T5680:;
+	V2151= (V2151)->c.c_cdr;
+	V2152= V2151->c.c_car;
+	goto T5671;
+	
+	goto T5673;
+T5673:;
+	goto T5668;
+	}
+	goto T5668;
+T5668:;
+	if(((V2150))==Cnil){
+	goto T5751;
+	}
+	{register object V2163;
+	register object V2164;
+	V2163= (V2150)->c.c_cdr;
+	V2164= (((V2150))->c.c_cdr=(Cnil),((V2150)));
+	goto T5757;
+T5757:;
+	if(((V2163))==Cnil){
+	goto T5759;
+	}
+	{object V2165;
+	object V2166;
+	V2165= (V2163)->c.c_cdr;
+	V2166= (((V2163))->c.c_cdr=((V2164)),((V2163)));
+	V2163= (V2165);
+	V2164= (V2166);
+	goto T5757;
+	}
+	goto T5759;
+T5759:;
+	V2149= (V2164);
+	goto T5667;
+	}
+	goto T5751;
+T5751:;
+	V2149= Cnil;}
+	goto T5667;
+T5667:;
+	V2110= make_cons(((object)VV[234]),(V2149));
+	V2111= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V2109);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V2110);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V2168;
+	register object V2169;
+	V2168= Cnil;
+	V2169= Cnil;
+	{register object V2170;
+	V2170= (V2109);
+	goto T5774;
+T5774:;
+	if(((V2170))==Cnil){
+	goto T5776;
+	}
+	{object V2172;
+	V2172= (V2170)->c.c_car;
+	{object V2173;
+	V2173= make_cons((V2172),Cnil);
+	if(((V2169))==Cnil){
+	goto T5783;
+	}
+	(void)((((V2169))->c.c_cdr=((V2173)),((V2169))));
+	V2169= (V2173);
+	goto T5782;
+	
+	goto T5783;
+T5783:;
+	V2168= (V2173);
+	V2169= (V2168);
+	goto T5782;
+T5782:;}}
+	{object V2174;
+	V2174= (V2170)->c.c_cdr;
+	V2170= (V2174);
+	goto T5774;
+	}
+	goto T5776;
+T5776:;
+	goto T5772;
+	}
+	goto T5772;
+T5772:;
+	if(((V2169))==Cnil){
+	goto T5793;
+	}
+	(void)((((V2169))->c.c_cdr=((V2110)),((V2169))));
+	V2169= (V2110);
+	goto T5792;
+	
+	goto T5793;
+T5793:;
+	V2168= (V2110);
+	V2169= (V2168);
+	goto T5792;
+T5792:;
+	V2108= (V2168);}}
+	V2077= make_cons(((object)VV[235]),(V2108));
+	V2078= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V2076);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V2077);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V2176;
+	register object V2177;
+	V2176= Cnil;
+	V2177= Cnil;
+	{register object V2178;
+	V2178= (V2076);
+	goto T5804;
+T5804:;
+	if(((V2178))==Cnil){
+	goto T5806;
+	}
+	{object V2180;
+	V2180= (V2178)->c.c_car;
+	{object V2181;
+	V2181= make_cons((V2180),Cnil);
+	if(((V2177))==Cnil){
+	goto T5813;
+	}
+	(void)((((V2177))->c.c_cdr=((V2181)),((V2177))));
+	V2177= (V2181);
+	goto T5812;
+	
+	goto T5813;
+T5813:;
+	V2176= (V2181);
+	V2177= (V2176);
+	goto T5812;
+T5812:;}}
+	{object V2182;
+	V2182= (V2178)->c.c_cdr;
+	V2178= (V2182);
+	goto T5804;
+	}
+	goto T5806;
+T5806:;
+	goto T5802;
+	}
+	goto T5802;
+T5802:;
+	if(((V2177))==Cnil){
+	goto T5823;
+	}
+	(void)((((V2177))->c.c_cdr=((V2077)),((V2177))));
+	V2177= (V2077);
+	goto T5822;
+	
+	goto T5823;
+T5823:;
+	V2176= (V2077);
+	V2177= (V2176);
+	goto T5822;
+T5822:;
+	V2075= (V2176);}}
+	V2074= make_cons(((object)VV[236]),(V2075));
+	if(((V1321))==Cnil){
+	goto T5828;
+	}
+	{object V2184 = list(3,((object)VV[103]),make_cons(list(2,(V1321),Cnil),Cnil),(V2074));
+	VMR46(V2184);}
+	goto T5828;
+T5828:;
+	{object V2185 = (V2074);
+	VMR46(V2185);}}}
+	goto T5063;
+T5063:;
+	goto T4570;
+	}
+}
+/*	local entry for function ANSI-LOOP::DUPLICATABLE-CODE-P	*/
+
+static fixnum LI53__DUPLICATABLE_CODE_P__loop(object V2188,object V2189)
+{	 VMB47 VMS47 VMV47
+	if(((V2188))==Cnil){
+	goto T5835;
+	}
+	goto T5832;
+	
+	goto T5835;
+T5835:;
+	{fixnum V2190 = 0;
+	VMR47(V2190);}
+	goto T5832;
+T5832:;
+	{fixnum V2191;
+	V2191= fix((fcall.valp=(fixnum)0,/* ANSI-LOOP::ESTIMATE-CODE-SIZE */(*LnkLI191)((V2188),(V2189))));
+	{fixnum V2192 = V2191;
+	VMR47(V2192);}}
+}
+/*	local entry for function ANSI-LOOP::DESTRUCTURING-SIZE	*/
+
+static object LI54__DESTRUCTURING_SIZE__loop(object V2194)
+{	 VMB48 VMS48 VMV48
+	{register object V2195;
+	register object V2196;
+	V2195= (V2194);
+	V2196= make_fixnum(0);
+	goto T5839;
+T5839:;
+	if(((V2195))==Cnil){
+	goto T5848;
+	}
+	V2198= tp2((V2195));
+	if(!((V2198)==(0))){
+	goto T5851;
+	}
+	goto T5847;
+	
+	goto T5851;
+T5851:;
+	goto T5846;
+	
+	goto T5848;
+T5848:;
+	goto T5846;
+	
+	goto T5847;
+T5847:;
+	goto T5844;
+	
+	goto T5846;
+T5846:;
+	goto T5841;
+	
+	goto T5844;
+T5844:;
+	{object V2199;
+	object V2200;
+	V2199= (V2195)->c.c_cdr;
+	{object V2202;
+	V2204= (V2195)->c.c_car;
+	V2202= (/* ANSI-LOOP::DESTRUCTURING-SIZE */(*LnkLI193)((V2204)));
+	{object V2206;
+	V2206= immnum_plus((V2202),(V2196));
+	V2200= (V2206);}}
+	V2195= (V2199);
+	V2196= (V2200);}
+	goto T5839;
+	
+	goto T5841;
+T5841:;
+	{int8_t V2208;
+	if(((V2195))==Cnil){
+	goto T5869;
+	}
+	goto T5866;
+	
+	goto T5869;
+T5869:;
+	V2208= 0;
+	goto T5865;
+	
+	goto T5866;
+T5866:;
+	V2208= 1;
+	goto T5865;
+T5865:;
+	{object V2209;
+	V2210= make_fixnum(V2208);
+	V2209= immnum_plus((V2196),(V2210));
+	{object V2211 = (V2209);
+	VMR48(V2211);}}}}
+}
+/*	local entry for function ANSI-LOOP::ESTIMATE-CODE-SIZE	*/
+
+static object LI55__ESTIMATE_CODE_SIZE__loop(VOL object V2214,VOL object V2215)
+{	 VMB49 VMS49 VMV49
+	{VOL fixnum V2216;
+	V2216= fcall.valp;
+	frs_push(FRS_CATCH,((object)VV[238]));
+	if(nlj_active)
+	{nlj_active=FALSE;frs_pop();
+	{object V2217;
+	V2217= ({register object _z=vs_base[0];register object *_x=vs_base+1,*_y=(object *)V2216;if (!_y) vs_top=base; else if (vs_top<_x) vs_top=_y-1; else {for(;_x<vs_top;) *_y++=*_x++;vs_top=_y;}_z;});
+	VMRV49(V2217,-2);}}
+	else{
+	{object V2218;
+	V2218= (fcall.valp=(fixnum)V2216,/* ANSI-LOOP::ESTIMATE-CODE-SIZE-1 */(*LnkLI194)((V2214),(V2215)));
+	frs_pop();
+	VMRV49(V2218,-2);}}}
+}
+/*	local entry for function ANSI-LOOP::ESTIMATE-CODE-SIZE-1	*/
+
+static object LI56__ESTIMATE_CODE_SIZE_1__loop(register object V2221,register object V2222)
+{	 VMB50 VMS50 VMV50
+	{fixnum V2223;
+	V2223= fcall.valp;
+	goto T5876;
+T5876:;
+	{object V2224;
+	V2224= (V2221);
+	V2225= tp5(V2224);
+	switch(V2225){
+	case -2:
+	goto T5883;
+T5883:;
+	case 19:
+	goto T5884;
+T5884:;
+	{fixnum V2227;
+	{fixnum V2228;
+	V2228= ((fixnum)V2224);
+	V2227= ((uchar*)V2228)[(fixnum)59];}
+	V2226= (V2227>>(fixnum)6);}
+	if(!((1)==(V2226))){
+	goto T5878;
+	}
+	goto T5880;
+	
+	case 0:
+	goto T5885;
+T5885:;
+	V2229= V2224->c.c_car;
+	if(!((((object)VV[244]))==((V2229)))){
+	goto T5878;
+	}
+	goto T5880;
+	
+	default:
+	goto T5886;
+T5886:;
+	goto T5880;
+	}
+	goto T5878;
+	
+	goto T5880;
+T5880:;
+	{object V2230;
+	V2230= make_fixnum(1);
+	VMRV50(V2230,0);}
+	goto T5878;
+T5878:;
+	if(((V2224))==Cnil){
+	goto T5895;
+	}
+	V2231= tp5(V2224);
+	switch(V2231){
+	case 19:
+	goto T5900;
+T5900:;
+	goto T5894;
+	
+	default:
+	goto T5901;
+T5901:;
+	goto T5892;
+	}
+	goto T5892;
+	
+	goto T5895;
+T5895:;
+	goto T5894;
+T5894:;
+	register object  V2233;
+	object V2232[31];
+	#define V2234 V2232[0]
+	
+	{
+	V2233= (fcall.fun=((object)VV[245])->s.s_gfdef,fcall.valp=(fixnum)V2232,fcall.argd=2,/* COMMON-LISP::MACROEXPAND-1 */(*LnkLI195)((V2224),(V2222)));
+	
+	for (vs_top=vs_top<V2232? V2232: vs_top;vs_top<V2232+1;) *vs_top++=Cnil;
+	vs_top=sup;
+	if(((V2234))==Cnil){
+	goto T5907;
+	}
+	{object V2235;
+	V2235= (V2233);
+	V2221= (V2235);
+	goto T5876;
+	}
+	goto T5907;
+T5907:;
+	{object V2236;
+	V2236= make_fixnum(1);
+	VMRV50(V2236,0);}
+	#undef V2234
+	
+	}
+	goto T5892;
+T5892:;
+	V2237= tp2(V2224);
+	if(!((V2237)==(0))){
+	goto T5918;
+	}
+	goto T5917;
+	
+	goto T5918;
+T5918:;
+	goto T5916;
+	
+	goto T5917;
+T5917:;
+	goto T5913;
+	
+	goto T5916;
+T5916:;
+	{object V2238;
+	V2238= make_fixnum(1);
+	VMRV50(V2238,0);}
+	goto T5913;
+T5913:;
+	{object V2239;
+	V2239= V2224->c.c_car;
+	if(((V2239))==Cnil){
+	goto T5925;
+	}
+	V2240= tp5(V2239);
+	switch(V2240){
+	case 19:
+	goto T5930;
+T5930:;
+	goto T5923;
+	
+	default:
+	goto T5931;
+T5931:;
+	goto T5921;
+	}
+	goto T5921;
+	
+	goto T5925;
+T5925:;}
+	goto T5923;
+T5923:;
+	{register object V2241;
+	object V2242;
+	register fixnum V2243;
+	V2241= V2224->c.c_car;
+	V2243= 0;
+	V2242= Cnil;
+	{register object V2244;
+	{fixnum V2245;
+	V2245= ((fixnum)V2241);
+	V2244= ((object*)V2245)[(fixnum)5];}
+	goto T5942;
+T5942:;
+	if(((V2244))==Cnil){
+	goto T5947;
+	}
+	goto T5944;
+	
+	goto T5947;
+T5947:;
+	V2242= Cnil;
+	goto T5938;
+	
+	goto T5944;
+T5944:;
+	V2247= (V2244)->c.c_car;
+	if(!(((V2247))==(((object)VV[238])))){
+	goto T5949;
+	}
+	{object V2250;
+	V2250= (V2244)->c.c_cdr;
+	V2242= V2250->c.c_car;
+	goto T5938;
+	}
+	goto T5949;
+T5949:;
+	{object V2251;
+	V2251= (V2244)->c.c_cdr;
+	{object V2253;
+	V2253= V2251->c.c_cdr;
+	V2244= (V2253);
+	goto T5942;
+	}}}
+	goto T5938;
+T5938:;
+	if(((V2242))==Cnil){
+	goto T5935;
+	}
+	V2254= tp4(V2242);
+	switch(V2254){
+	case -1:
+	goto T5962;
+T5962:;
+	case 1:
+	goto T5963;
+T5963:;
+	{fixnum V2255;
+	{object V2256;
+	V2256= V2224->c.c_cdr;
+	{register fixnum V2257;
+	V2257= 0;
+	{register object V2258;
+	register object V2259;
+	V2258= (V2256);
+	V2259= V2256->c.c_car;
+	goto T5970;
+T5970:;
+	if(((V2258))==Cnil){
+	goto T5977;
+	}
+	goto T5975;
+	
+	goto T5977;
+T5977:;
+	goto T5972;
+	
+	goto T5975;
+T5975:;
+	{object V2261;
+	V2261= (fcall.valp=(fixnum)0,/* ANSI-LOOP::ESTIMATE-CODE-SIZE-1 */(*LnkLI194)((V2259),(V2222)));
+	{fixnum V2262;
+	object V2263;
+	V2262= V2257;
+	V2263= (V2261);
+	{object V2264;
+	V2265= CMPmake_fixnum(V2262);
+	V2264= immnum_plus((V2265),(V2263));
+	V2257= fix((V2264));}}}
+	V2258= (V2258)->c.c_cdr;
+	V2259= V2258->c.c_car;
+	goto T5970;
+	
+	goto T5972;
+T5972:;
+	V2255= V2257;
+	goto T5965;
+	}}}
+	goto T5965;
+T5965:;
+	{object V2267;
+	V2268= CMPmake_fixnum(V2255);
+	V2267= immnum_plus((V2242),(V2268));
+	{object V2269;
+	V2269= (V2267);
+	VMRV50(V2269,0);}}}
+	default:
+	goto T5964;
+T5964:;
+	V2271= tp4(V2242);
+	if(!((V2271)==(24))){
+	goto T5997;
+	}
+	goto T5996;
+	
+	goto T5997;
+T5997:;
+	goto T5994;
+	
+	goto T5996;
+T5996:;
+	V2270= (V2242);
+	goto T5993;
+	
+	goto T5994;
+T5994:;
+	V2270= (V2242)->s.s_gfdef;
+	goto T5993;
+T5993:;
+	{object V2272;
+	V2272= ({object _z;fixnum _v=(fixnum)V2223;
+        fcall.fun=(V2270);fcall.valp=_v;fcall.argd=3-1;
+        _z=Rset && !((V2270))->fun.fun_argd && 
+        fcall.argd>=((V2270))->fun.fun_minarg && fcall.argd<=(((V2270))->fun.fun_maxarg) ? 
+        ((V2270))->fun.fun_self((V2224),(V2222)) : call_proc_cs2((V2224),(V2222));
+           if (!((V2270))->fun.fun_neval && !((V2270))->fun.fun_vv) vs_top=_v ? (object *)_v : sup;
+           _z;});
+	VMRV50(V2272,-2);}}
+	{object V2273;
+	V2273= Cnil;
+	VMRV50(V2273,0);}
+	goto T5935;
+T5935:;
+	{object V2274;
+	V2274= (((object)VV[246])->s.s_dbind);
+	{register object V2275;
+	V2275= (V2274);
+	goto T6012;
+T6012:;
+	if(((V2275))==Cnil){
+	goto T6014;
+	}
+	{object V2277;
+	V2277= (V2275)->c.c_car;
+	V2278= tp2(V2277);
+	if(!((V2278)==(0))){
+	goto T6025;
+	}
+	goto T6024;
+	
+	goto T6025;
+T6025:;
+	goto T6023;
+	
+	goto T6024;
+T6024:;
+	goto T6020;
+	
+	goto T6023;
+T6023:;
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[76]),((object)VV[247]),(V2277),((object)VV[248]),((object)VV[40]))));
+	goto T6019;
+	
+	goto T6020;
+T6020:;
+	goto T6019;
+T6019:;
+	if(((V2277))==Cnil){
+	goto T6031;
+	}
+	{object V2279;
+	V2279= V2277->c.c_car;
+	if(!(((V2241))==((V2279)))){
+	goto T6035;
+	}
+	goto T6030;
+	
+	goto T6035;
+T6035:;
+	goto T6028;
+	}
+	goto T6031;
+T6031:;
+	goto T6028;
+	
+	goto T6030;
+T6030:;
+	V2242= (V2277);
+	goto T6003;
+	
+	goto T6028;
+T6028:;}
+	{object V2280;
+	V2280= (V2275)->c.c_cdr;
+	V2275= (V2280);
+	goto T6012;
+	}
+	goto T6014;
+T6014:;
+	goto T6010;
+	}
+	goto T6010;
+T6010:;
+	if(((V2274))==Cnil){
+	goto T6008;
+	}
+	goto T6005;
+	
+	goto T6008;
+T6008:;
+	V2242= Cnil;
+	goto T6003;
+	
+	goto T6005;
+T6005:;
+	V2242= Cnil;}
+	goto T6003;
+T6003:;
+	if(((V2242))==Cnil){
+	goto T6000;
+	}
+	{fixnum V2282;
+	fixnum V2283;
+	{object V2284;
+	V2284= V2242->c.c_cdr;
+	V2282= fixint(V2284->c.c_car);}
+	{object V2285;
+	V2285= V2224->c.c_cdr;
+	{register fixnum V2286;
+	V2286= 0;
+	{register object V2287;
+	register object V2288;
+	V2287= (V2285);
+	V2288= V2285->c.c_car;
+	goto T6047;
+T6047:;
+	if(((V2287))==Cnil){
+	goto T6054;
+	}
+	goto T6052;
+	
+	goto T6054;
+T6054:;
+	goto T6049;
+	
+	goto T6052;
+T6052:;
+	{object V2290;
+	V2290= (fcall.valp=(fixnum)0,/* ANSI-LOOP::ESTIMATE-CODE-SIZE-1 */(*LnkLI194)((V2288),(V2222)));
+	{fixnum V2291;
+	object V2292;
+	V2291= V2286;
+	V2292= (V2290);
+	{object V2293;
+	V2294= CMPmake_fixnum(V2291);
+	V2293= immnum_plus((V2294),(V2292));
+	V2286= fix((V2293));}}}
+	V2287= (V2287)->c.c_cdr;
+	V2288= V2287->c.c_car;
+	goto T6047;
+	
+	goto T6049;
+T6049:;
+	V2283= V2286;
+	goto T6042;
+	}}}
+	goto T6042;
+T6042:;
+	{object V2296;
+	V2297= CMPmake_fixnum(V2282);
+	V2298= CMPmake_fixnum(V2283);
+	V2296= immnum_plus((V2297),(V2298));
+	{object V2299;
+	V2299= (V2296);
+	VMRV50(V2299,0);}}}
+	goto T6000;
+T6000:;
+	if(!(((V2241))==(((object)VV[249])))){
+	goto T6069;
+	}
+	{register object V2300;
+	register object V2301;
+	V2300= V2224->c.c_cdr;
+	V2301= V2300->c.c_car;
+	goto T6075;
+T6075:;
+	if(((V2300))==Cnil){
+	goto T6082;
+	}
+	goto T6080;
+	
+	goto T6082;
+T6082:;
+	goto T6077;
+	
+	goto T6080;
+T6080:;
+	{fixnum V2303;
+	{register fixnum V2305;
+	V2305= 0;
+	{register object V2306;
+	register object V2307;
+	V2306= (V2301);
+	V2307= (V2301)->c.c_car;
+	goto T6090;
+T6090:;
+	if(((V2306))==Cnil){
+	goto T6097;
+	}
+	goto T6095;
+	
+	goto T6097;
+T6097:;
+	goto T6092;
+	
+	goto T6095;
+T6095:;
+	{object V2309;
+	V2309= (fcall.valp=(fixnum)0,/* ANSI-LOOP::ESTIMATE-CODE-SIZE-1 */(*LnkLI194)((V2307),(V2222)));
+	{fixnum V2310;
+	object V2311;
+	V2310= V2305;
+	V2311= (V2309);
+	{object V2312;
+	V2313= CMPmake_fixnum(V2310);
+	V2312= immnum_plus((V2313),(V2311));
+	V2305= fix((V2312));}}}
+	V2306= (V2306)->c.c_cdr;
+	V2307= V2306->c.c_car;
+	goto T6090;
+	
+	goto T6092;
+T6092:;
+	V2303= V2305;
+	goto T6086;
+	}}
+	goto T6086;
+T6086:;
+	{fixnum V2315;
+	fixnum V2316;
+	V2315= V2243;
+	V2316= V2303;
+	{object V2317;
+	V2318= CMPmake_fixnum(V2315);
+	V2319= CMPmake_fixnum(V2316);
+	V2317= immnum_plus((V2318),(V2319));
+	V2243= fix((V2317));}}}
+	{object V2320;
+	V2321= CMPmake_fixnum(V2243);
+	V2320= immnum_plus((V2321),make_fixnum(1));
+	V2243= fix((V2320));}
+	V2300= (V2300)->c.c_cdr;
+	V2301= V2300->c.c_car;
+	goto T6075;
+	
+	goto T6077;
+T6077:;
+	{object V2323;
+	V2323= CMPmake_fixnum(V2243);
+	VMRV50(V2323,0);}}
+	goto T6069;
+T6069:;
+	if(!(((V2241))==(((object)VV[250])))){
+	goto T6124;
+	}
+	{register object V2324;
+	V2324= V2224->c.c_cdr;
+	goto T6129;
+T6129:;
+	if(((V2324))==Cnil){
+	goto T6136;
+	}
+	goto T6134;
+	
+	goto T6136;
+T6136:;
+	goto T6131;
+	
+	goto T6134;
+T6134:;
+	{object V2325;
+	object V2326;
+	{fixnum V2327;
+	object V2328;
+	V2327= V2243;
+	V2329= (V2324)->c.c_car;
+	V2328= (/* ANSI-LOOP::DESTRUCTURING-SIZE */(*LnkLI193)((V2329)));
+	{object V2331;
+	V2332= CMPmake_fixnum(V2327);
+	V2331= immnum_plus((V2332),(V2328));
+	V2325= (V2331);}}
+	{object V2335;
+	V2335= (V2324)->c.c_cdr;
+	V2333= V2335->c.c_car;}
+	V2326= (fcall.valp=(fixnum)0,/* ANSI-LOOP::ESTIMATE-CODE-SIZE-1 */(*LnkLI194)((V2333),(V2222)));
+	{object V2336;
+	V2336= immnum_plus((V2325),(V2326));
+	V2243= fix((V2336));}}
+	{object V2337;
+	V2337= (V2324)->c.c_cdr;
+	V2324= (V2337);}
+	goto T6129;
+	
+	goto T6131;
+T6131:;
+	{object V2339;
+	V2339= CMPmake_fixnum(V2243);
+	VMRV50(V2339,0);}}
+	goto T6124;
+T6124:;
+	if(!(((V2241))==(((object)VV[47])))){
+	goto T6164;
+	}
+	goto T6163;
+	
+	goto T6164;
+T6164:;
+	goto T6161;
+	
+	goto T6163;
+T6163:;
+	goto T6156;
+	
+	goto T6161;
+T6161:;
+	if(!(((V2241))==(((object)VV[251])))){
+	goto T6170;
+	}
+	goto T6169;
+	
+	goto T6170;
+T6170:;
+	goto T6167;
+	
+	goto T6169;
+T6169:;
+	goto T6156;
+	
+	goto T6167;
+T6167:;
+	goto T6154;
+	
+	goto T6156;
+T6156:;
+	{register object V2340;
+	V2340= V2224->c.c_cdr;
+	goto T6175;
+T6175:;
+	if(((V2340))==Cnil){
+	goto T6182;
+	}
+	goto T6180;
+	
+	goto T6182;
+T6182:;
+	goto T6177;
+	
+	goto T6180;
+T6180:;
+	{object V2341;
+	{fixnum V2342;
+	object V2343;
+	V2342= V2243;
+	{object V2346;
+	V2346= (V2340)->c.c_cdr;
+	V2344= V2346->c.c_car;}
+	V2343= (fcall.valp=(fixnum)0,/* ANSI-LOOP::ESTIMATE-CODE-SIZE-1 */(*LnkLI194)((V2344),(V2222)));
+	{object V2347;
+	V2348= CMPmake_fixnum(V2342);
+	V2347= immnum_plus((V2348),(V2343));
+	V2341= (V2347);}}
+	{object V2349;
+	V2349= immnum_plus((V2341),make_fixnum(1));
+	V2243= fix((V2349));}}
+	{object V2350;
+	V2350= (V2340)->c.c_cdr;
+	V2340= (V2350);}
+	goto T6175;
+	
+	goto T6177;
+T6177:;
+	{object V2352;
+	V2352= CMPmake_fixnum(V2243);
+	VMRV50(V2352,0);}}
+	goto T6154;
+T6154:;
+	if(!(((V2241))==(((object)VV[230])))){
+	goto T6198;
+	}
+	{object V2353;
+	V2353= make_fixnum(1);
+	VMRV50(V2353,0);}
+	goto T6198;
+T6198:;
+	if(!(((V2241))==(((object)VV[80])))){
+	goto T6201;
+	}
+	{object V2354;
+	V2354= make_fixnum(1);
+	VMRV50(V2354,0);}
+	goto T6201;
+T6201:;
+	if(!(((V2241))==(((object)VV[252])))){
+	goto T6204;
+	}
+	{fixnum V2355;
+	fixnum V2356;
+	{object V2358;
+	V2358= V2224->c.c_cdr;
+	V2357= V2358->c.c_car;}
+	V2355= length((V2357));
+	{object V2359;
+	{object V2360;
+	V2360= V2224->c.c_cdr;
+	V2359= V2360->c.c_cdr;}
+	{register fixnum V2361;
+	V2361= 0;
+	{register object V2362;
+	register object V2363;
+	V2362= (V2359);
+	V2363= V2359->c.c_car;
+	goto T6216;
+T6216:;
+	if(((V2362))==Cnil){
+	goto T6223;
+	}
+	goto T6221;
+	
+	goto T6223;
+T6223:;
+	goto T6218;
+	
+	goto T6221;
+T6221:;
+	{object V2365;
+	V2365= (fcall.valp=(fixnum)0,/* ANSI-LOOP::ESTIMATE-CODE-SIZE-1 */(*LnkLI194)((V2363),(V2222)));
+	{fixnum V2366;
+	object V2367;
+	V2366= V2361;
+	V2367= (V2365);
+	{object V2368;
+	V2369= CMPmake_fixnum(V2366);
+	V2368= immnum_plus((V2369),(V2367));
+	V2361= fix((V2368));}}}
+	V2362= (V2362)->c.c_cdr;
+	V2363= V2362->c.c_car;
+	goto T6216;
+	
+	goto T6218;
+T6218:;
+	V2356= V2361;
+	goto T6210;
+	}}}
+	goto T6210;
+T6210:;
+	{object V2371;
+	V2372= CMPmake_fixnum(V2355);
+	V2373= CMPmake_fixnum(V2356);
+	V2371= immnum_plus((V2372),(V2373));
+	{object V2374;
+	V2374= (V2371);
+	VMRV50(V2374,0);}}}
+	goto T6204;
+T6204:;
+	if(!(((V2241))==(((object)VV[232])))){
+	goto T6238;
+	}
+	{object V2375;
+	{object V2377;
+	{object V2378;
+	V2378= V2224->c.c_cdr;
+	V2377= V2378->c.c_cdr;}
+	V2376= V2377->c.c_car;}
+	V2375= (fcall.valp=(fixnum)0,/* ANSI-LOOP::ESTIMATE-CODE-SIZE-1 */(*LnkLI194)((V2376),(V2222)));
+	{object V2379;
+	V2379= immnum_plus((V2375),make_fixnum(1));
+	{object V2380;
+	V2380= (V2379);
+	VMRV50(V2380,0);}}}
+	goto T6238;
+T6238:;
+	if(!(((V2241))==(((object)VV[253])))){
+	goto T6262;
+	}
+	goto T6261;
+	
+	goto T6262;
+T6262:;
+	goto T6259;
+	
+	goto T6261;
+T6261:;
+	goto T6254;
+	
+	goto T6259;
+T6259:;
+	if(!(((V2241))==(((object)VV[254])))){
+	goto T6268;
+	}
+	goto T6267;
+	
+	goto T6268;
+T6268:;
+	goto T6265;
+	
+	goto T6267;
+T6267:;
+	goto T6254;
+	
+	goto T6265;
+T6265:;
+	goto T6252;
+	
+	goto T6254;
+T6254:;
+	goto T6251;
+	
+	goto T6252;
+T6252:;
+	V2381= ((fixnum)Cnil);
+	{fixnum V2383;
+	V2383= ((fixnum)V2241);
+	V2382= ((fixnum*)V2383)[(fixnum)1];}
+	if(!((V2381)!=(V2382))){
+	goto T6249;
+	}
+	goto T6251;
+T6251:;
+	goto T6248;
+	
+	goto T6249;
+T6249:;
+	{object V2384;
+	V2384= (((object)VV[255])->s.s_dbind);
+	{register object V2385;
+	V2385= (V2384);
+	goto T6282;
+T6282:;
+	if(((V2385))==Cnil){
+	goto T6284;
+	}
+	{object V2387;
+	V2387= (V2385)->c.c_car;
+	if(!(((V2241))==((V2387)))){
+	goto T6292;
+	}
+	goto T6290;
+	
+	goto T6292;
+T6292:;
+	goto T6288;
+	}
+	goto T6290;
+T6290:;
+	goto T6248;
+	
+	goto T6288;
+T6288:;
+	{object V2388;
+	V2388= (V2385)->c.c_cdr;
+	V2385= (V2388);
+	goto T6282;
+	}
+	goto T6284;
+T6284:;
+	goto T6280;
+	}
+	goto T6280;
+T6280:;
+	if(((V2384))==Cnil){
+	goto T6278;
+	}
+	goto T6275;
+	
+	goto T6278;
+T6278:;
+	goto T6246;
+	
+	goto T6275;
+T6275:;
+	goto T6246;
+	}
+	goto T6248;
+T6248:;
+	{frame_ptr fr;
+	fr=frs_sch_catch(((object)VV[238]));
+	if(fr==NULL) FEerror("The tag ~s is undefined.",1,((object)VV[238]));
+	base[0]= Cnil;
+	vs_top=(vs_base=base+0)+1;
+	unwind(fr,((object)VV[238]));
+	{object V2390;
+	V2390= Cnil;
+	VMRV50(V2390,0);}
+	}
+	goto T6246;
+T6246:;
+	register object  V2392;
+	object V2391[31];
+	#define V2393 V2391[0]
+	
+	{
+	V2392= (fcall.fun=((object)VV[245])->s.s_gfdef,fcall.valp=(fixnum)V2391,fcall.argd=2,/* COMMON-LISP::MACROEXPAND-1 */(*LnkLI195)((V2224),(V2222)));
+	
+	for (vs_top=vs_top<V2391? V2391: vs_top;vs_top<V2391+1;) *vs_top++=Cnil;
+	vs_top=sup;
+	if(((V2393))==Cnil){
+	goto T6302;
+	}
+	{object V2394;
+	V2394= (V2392);
+	V2221= (V2394);
+	goto T5876;
+	}
+	goto T6302;
+T6302:;
+	{fixnum V2395;
+	{object V2396;
+	V2396= V2224->c.c_cdr;
+	{register fixnum V2397;
+	V2397= 0;
+	{register object V2398;
+	register object V2399;
+	V2398= (V2396);
+	V2399= V2396->c.c_car;
+	goto T6313;
+T6313:;
+	if(((V2398))==Cnil){
+	goto T6320;
+	}
+	goto T6318;
+	
+	goto T6320;
+T6320:;
+	goto T6315;
+	
+	goto T6318;
+T6318:;
+	{object V2401;
+	V2401= (fcall.valp=(fixnum)0,/* ANSI-LOOP::ESTIMATE-CODE-SIZE-1 */(*LnkLI194)((V2399),(V2222)));
+	{fixnum V2402;
+	object V2403;
+	V2402= V2397;
+	V2403= (V2401);
+	{object V2404;
+	V2405= CMPmake_fixnum(V2402);
+	V2404= immnum_plus((V2405),(V2403));
+	V2397= fix((V2404));}}}
+	V2398= (V2398)->c.c_cdr;
+	V2399= V2398->c.c_car;
+	goto T6313;
+	
+	goto T6315;
+T6315:;
+	V2395= V2397;
+	goto T6308;
+	}}}
+	goto T6308;
+T6308:;
+	{object V2407;
+	V2408= CMPmake_fixnum(V2395);
+	V2407= immnum_plus(make_fixnum(3),(V2408));
+	{object V2409;
+	V2409= (V2407);
+	VMRV50(V2409,0);}}}
+	#undef V2393
+	
+	}}
+	goto T5921;
+T5921:;
+	{frame_ptr fr;
+	fr=frs_sch_catch(((object)VV[238]));
+	if(fr==NULL) FEerror("The tag ~s is undefined.",1,((object)VV[238]));
+	base[0]= Cnil;
+	vs_top=(vs_base=base+0)+1;
+	unwind(fr,((object)VV[238]));
+	{object V2410;
+	V2410= Cnil;
+	VMRV50(V2410,0);}
+	}}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-CONTEXT	*/
+
+static object LI77__LOOP_CONTEXT__loop()
+{	 VMB51 VMS51 VMV51
+	{register object V2411;
+	register object V2412;
+	V2411= (((object)VV[256])->s.s_dbind);
+	V2412= Cnil;
+	goto T6337;
+T6337:;
+	{object V2414;
+	V2414= (((object)VV[257])->s.s_dbind);
+	V2413= V2414->c.c_cdr;}
+	if(!(((V2411))==((V2413)))){
+	goto T6342;
+	}
+	goto T6339;
+	
+	goto T6342;
+T6342:;
+	{object V2415;
+	object V2416;
+	V2415= (V2411)->c.c_cdr;
+	V2418= (V2411)->c.c_car;
+	V2416= make_cons((V2418),(V2412));
+	V2411= (V2415);
+	V2412= (V2416);}
+	goto T6337;
+	
+	goto T6339;
+T6339:;
+	if(((V2412))==Cnil){
+	goto T6354;
+	}
+	{register object V2421;
+	register object V2422;
+	V2421= (V2412)->c.c_cdr;
+	V2422= (((V2412))->c.c_cdr=(Cnil),((V2412)));
+	goto T6360;
+T6360:;
+	if(((V2421))==Cnil){
+	goto T6362;
+	}
+	{object V2423;
+	object V2424;
+	V2423= (V2421)->c.c_cdr;
+	V2424= (((V2421))->c.c_cdr=((V2422)),((V2421)));
+	V2421= (V2423);
+	V2422= (V2424);
+	goto T6360;
+	}
+	goto T6362;
+T6362:;
+	{object V2426 = (V2422);
+	VMR51(V2426);}}
+	goto T6354;
+T6354:;
+	{object V2427 = Cnil;
+	VMR51(V2427);}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-ERROR	*/
+
+static object LI78__LOOP_ERROR__loop(object V2429,...)
+{	 VMB52 VMS52 VMV52
+	va_list ap;
+	va_start(ap,V2429);
+	{fixnum V2430;
+	register object V2431;
+	int8_t V2432;
+	register int8_t V2433;
+	object V2434;
+	V2430= fcall.valp;
+	V2431= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V2431))==Cnil){
+	goto T6374;
+	}
+	V2432= -((char)fcall.argd);
+	goto T6373;
+	
+	goto T6374;
+T6374:;
+	V2432= fcall.argd;
+	goto T6373;
+T6373:;
+	V2433= (V2432)-(1);
+	{register object V2435;
+	register object V2436;
+	object V2437;
+	V2435= Cnil;
+	V2436= Cnil;
+	V2437= Cnil;
+	goto T6380;
+T6380:;
+	if(!((0)>=(V2433))){
+	goto T6385;
+	}
+	goto T6382;
+	
+	goto T6385;
+T6385:;
+	V2433= (V2433)-(1);
+	V2436= va_arg(ap,object);
+	if(((V2431))==Cnil){
+	goto T6396;
+	}
+	if(!((V2433)==(0))){
+	goto T6393;
+	}
+	goto T6395;
+	
+	goto T6396;
+T6396:;
+	goto T6393;
+	
+	goto T6395;
+T6395:;
+	goto T6392;
+	
+	goto T6393;
+T6393:;
+	V2436= make_cons((V2436),Cnil);
+	goto T6392;
+T6392:;
+	if(((V2435))==Cnil){
+	goto T6401;
+	}
+	(void)((((V2435))->c.c_cdr=((V2436)),((V2435))));
+	V2435= (V2436);
+	goto T6400;
+	
+	goto T6401;
+T6401:;
+	V2437= (V2436);
+	V2435= (V2437);
+	goto T6400;
+T6400:;
+	goto T6380;
+	
+	goto T6382;
+T6382:;
+	V2434= (V2437);
+	goto T6378;
+	}
+	goto T6378;
+T6378:;
+	V2438= list(3,(V2429),(V2434),(/* ANSI-LOOP::LOOP-CONTEXT */(*LnkLI196)()));
+	{object V2439;
+	V2439= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[259]),((object)VV[260]),((object)VV[261]),(V2438)));
+	VMRV52(V2439,0);}}
+	va_end(ap);
+}
+/*	local entry for function ANSI-LOOP::LOOP-WARN	*/
+
+static object LI79__LOOP_WARN__loop(VOL object V2441,...)
+{	 VMB53 VMS53 VMV53
+	va_list ap;
+	va_start(ap,V2441);
+	{VOL object V2442;
+	VOL int8_t V2443;
+	VOL int8_t V2444;
+	VOL object V2445;
+	V2442= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V2442))==Cnil){
+	goto T6409;
+	}
+	V2443= -((char)fcall.argd);
+	goto T6408;
+	
+	goto T6409;
+T6409:;
+	V2443= fcall.argd;
+	goto T6408;
+T6408:;
+	V2444= (V2443)-(1);
+	{register object V2446;
+	register object V2447;
+	object V2448;
+	V2446= Cnil;
+	V2447= Cnil;
+	V2448= Cnil;
+	goto T6415;
+T6415:;
+	if(!((0)>=(V2444))){
+	goto T6420;
+	}
+	goto T6417;
+	
+	goto T6420;
+T6420:;
+	V2444= (V2444)-(1);
+	V2447= va_arg(ap,object);
+	if(((V2442))==Cnil){
+	goto T6431;
+	}
+	if(!((V2444)==(0))){
+	goto T6428;
+	}
+	goto T6430;
+	
+	goto T6431;
+T6431:;
+	goto T6428;
+	
+	goto T6430;
+T6430:;
+	goto T6427;
+	
+	goto T6428;
+T6428:;
+	V2447= make_cons((V2447),Cnil);
+	goto T6427;
+T6427:;
+	if(((V2446))==Cnil){
+	goto T6436;
+	}
+	(void)((((V2446))->c.c_cdr=((V2447)),((V2446))));
+	V2446= (V2447);
+	goto T6435;
+	
+	goto T6436;
+T6436:;
+	V2448= (V2447);
+	V2446= (V2448);
+	goto T6435;
+T6435:;
+	goto T6415;
+	
+	goto T6417;
+T6417:;
+	V2445= (V2448);
+	goto T6413;
+	}
+	goto T6413;
+T6413:;
+	{VOL object V2449;
+	VOL object V2450;
+	V2449= list(3,(V2441),(V2445),(/* ANSI-LOOP::LOOP-CONTEXT */(*LnkLI196)()));
+	V2450= listA(5,((object)VV[262]),((object)VV[263]),((object)VV[264]),(V2449),Cnil);
+	{VOL object V2451;
+	V2451= (fcall.valp=(fixnum)0,fcall.argd=3,/* SYSTEM::PROCESS-ERROR */(*LnkLI197)(((object)VV[266]),(V2450),((object)VV[267])));
+	if((symbol_value(((object)VV[268])))==Cnil){
+	goto T6446;
+	}
+	(void)((fcall.argd=2,/* COMMON-LISP::BREAK */(*LnkLI198)(((object)VV[270]),(V2451))));
+	goto T6445;
+	
+	goto T6446;
+T6446:;
+	goto T6445;
+T6445:;
+	{VOL object V2452;
+	
+	base[0]=make_cons(Cnil,Cnil);
+	V2452= (fcall.valp=(fixnum)0,/* SYSTEM::COERCE-TO-CONDITION */(*LnkLI199)((V2451),Cnil,((object)VV[272]),((object)VV[273])));
+	bds_bind(((object)VV[274]),(V2452));
+	base[1]=alloc_frame_id();
+	
+	base[1]=make_cons(base[1],base[0]);
+	frs_push(FRS_CATCH,(base[1]->c.c_car));
+	if(nlj_active){
+	nlj_active=FALSE;
+	if(eql(nlj_tag,((object)VV[275]))) {
+	   
+	vs_top=sup;
+	   goto T6452;
+	
+	}
+	FEerror("The GO tag ~s is not established.",1,nlj_tag);
+	}
+	V2453= fSinit_function(((object)VV[277]),(void *)LC80__LAMBDA__loop,Cdata,base[1],-1,1,397248);
+	V2454= fSinit_function(((object)VV[278]),(void *)LC81__LAMBDA__loop,Cdata,base[1],-1,0,258113);
+	V2455= (fcall.argd=6,/* SYSTEM::MAKE-RESTART */(*LnkLI200)(((object)VV[279]),((object)VV[280]),((object)VV[281]),(V2453),((object)VV[282]),(V2454)));
+	V2456= make_cons((V2455),(((object)VV[274])->s.s_dbind));
+	base[2]= make_cons((V2456),symbol_value(((object)VV[283])));
+	bds_bind(((object)VV[283]),base[2]);
+	{register object V2457;
+	base[3]= (((object)VV[284])->s.s_dbind);
+	V2457= (fcall.valp=(fixnum)0,/* SYSTEM::COERCE-TO-CONDITION */(*LnkLI199)((V2452),Cnil,((object)VV[272]),((object)VV[273])));
+	bds_bind(((object)VV[284]),base[3]);
+	if(((fcall.argd=2,/* COMMON-LISP::TYPEP */(*LnkLI184)((V2457),(((object)VV[285])->s.s_dbind))))==Cnil){
+	goto T6459;
+	}
+	(void)((fcall.argd=2,/* COMMON-LISP::BREAK */(*LnkLI198)(((object)VV[286]),(V2457))));
+	goto T6458;
+	
+	goto T6459;
+T6459:;
+	goto T6458;
+T6458:;
+	{int8_t V2458;
+	V2458= tp4(V2457);
+	if(!((8)<=(V2458))){
+	goto T6471;
+	}
+	if(!((V2458)<=(9))){
+	goto T6468;
+	}
+	goto T6469;
+	
+	goto T6471;
+T6471:;
+	goto T6468;
+	}
+	goto T6469;
+T6469:;
+	goto T6467;
+	
+	goto T6468;
+T6468:;
+	goto T6466;
+	
+	goto T6467;
+T6467:;
+	goto T6463;
+	
+	goto T6466;
+T6466:;
+	goto T6475;
+T6475:;
+	if(((((object)VV[284])->s.s_dbind))==Cnil){
+	goto T6482;
+	}
+	goto T6480;
+	
+	goto T6482;
+T6482:;
+	goto T6477;
+	
+	goto T6480;
+T6480:;
+	{register object V2459;
+	register object V2460;
+	{object V2461;
+	{object V2462;
+	V2462= (((object)VV[284])->s.s_dbind);
+	V2461= V2462->c.c_car;}
+	{object V2464;
+	V2464= (((object)VV[284])->s.s_dbind);
+	V2463= V2464->c.c_cdr;}
+	(((object)VV[284])->s.s_dbind)= (V2463);
+	V2459= (V2461);}
+	V2460= V2459->c.c_car;
+	goto T6491;
+T6491:;
+	if(((V2459))==Cnil){
+	goto T6498;
+	}
+	goto T6496;
+	
+	goto T6498;
+T6498:;
+	goto T6493;
+	
+	goto T6496;
+T6496:;
+	V2466= (V2460)->c.c_car;
+	if(((fcall.argd=2,/* COMMON-LISP::TYPEP */(*LnkLI184)((V2457),(V2466))))==Cnil){
+	goto T6501;
+	}
+	{object V2468;
+	V2468= (V2460)->c.c_cdr;
+	V2471= tp4(V2468);
+	if(!((V2471)==(24))){
+	goto T6510;
+	}
+	goto T6509;
+	
+	goto T6510;
+T6510:;
+	goto T6507;
+	
+	goto T6509;
+T6509:;
+	V2470= (V2468);
+	goto T6506;
+	
+	goto T6507;
+T6507:;
+	V2470= (V2468)->s.s_gfdef;
+	goto T6506;
+T6506:;
+	(void)(({object _z;fixnum _v=(fixnum)0;
+        fcall.fun=(V2470);fcall.valp=_v;fcall.argd=2-1;
+        _z=Rset && !((V2470))->fun.fun_argd && 
+        fcall.argd>=((V2470))->fun.fun_minarg && fcall.argd<=(((V2470))->fun.fun_maxarg) ? 
+        ((V2470))->fun.fun_self((V2457)) : call_proc_cs2((V2457));
+           if (!((V2470))->fun.fun_neval && !((V2470))->fun.fun_vv) vs_top=_v ? (object *)_v : sup;
+           _z;}));
+	goto T6500;
+	}
+	goto T6501;
+T6501:;
+	goto T6500;
+T6500:;
+	V2459= (V2459)->c.c_cdr;
+	V2460= V2459->c.c_car;
+	goto T6491;
+	
+	goto T6493;
+T6493:;
+	goto T6484;
+	}
+	goto T6484;
+T6484:;
+	goto T6475;
+	
+	goto T6477;
+T6477:;
+	goto T6462;
+	
+	goto T6463;
+T6463:;
+	goto T6462;
+T6462:;
+	frs_pop();
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	goto T6449;
+	}
+	goto T6452;
+T6452:;
+	{object V2473;
+	V2473= (base[0]->c.c_car);
+	if(((V2473))==Cnil){
+	goto T6524;
+	}
+	goto T6523;
+	
+	goto T6524;
+T6524:;
+	goto T6521;
+	
+	goto T6523;
+T6523:;
+	{object V2475;
+	V2475= V2473->c.c_car;
+	V2473= V2473->c.c_cdr;
+	V2474= (V2475);}
+	V2476= make_cons((V2474),Cnil);
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[287]),((object)VV[7]),((object)VV[288]),(V2476))));
+	goto T6520;
+	
+	goto T6521;
+T6521:;
+	goto T6520;
+T6520:;
+	{object V2477 = Cnil;
+	frs_pop();
+	bds_unwind1;
+	VMR53(V2477);}}}
+	goto T6449;
+T6449:;
+	(void)((fcall.fun=((object)VV[158])->s.s_gfdef,fcall.argd=3,/* COMMON-LISP::FORMAT */(*LnkLI176)(symbol_value(((object)VV[289])),((object)VV[290]),(V2451))));
+	{object V2478 = Cnil;
+	VMR53(V2478);}}}}
+	va_end(ap);
+}
+/*	local function LAMBDA	*/
+
+static object LC81__LAMBDA__loop(object V2480)
+{	
+	VMB54 VMS54 VMV54
+	vs_check;
+	{fixnum V2481;
+	V2481= fcall.valp;
+	{object V2482;
+	V2482= (fcall.fun=((object)VV[291])->s.s_gfdef,fcall.valp=(fixnum)V2481,fcall.argd=2,/* COMMON-LISP::WRITE-STRING */(*LnkLI201)(((object)VV[292]),(V2480)));
+	VMRV54(V2482,-2);}}
+	#undef base0
+}
+/*	local function LAMBDA	*/
+
+static object LC80__LAMBDA__loop(object V2484,...)
+{	
+	VMB55 VMS55 VMV55
+	va_list ap;
+	va_start(ap,V2484);
+	vs_check;
+	{object V2485;
+	fixnum V2486;
+	register object V2487;
+	register object V2488;
+	int8_t V2489;
+	register int8_t V2490;
+	object V2491;
+	V2485= fcall.fun;
+	#undef base0
+	#define base0 (V2485)->fun.fun_env
+	;
+	V2486= fcall.valp;
+	V2487= Ct;
+	V2488= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V2488))==Cnil){
+	goto T6536;
+	}
+	V2489= -((char)fcall.argd);
+	goto T6535;
+	
+	goto T6536;
+T6536:;
+	V2489= fcall.argd;
+	goto T6535;
+T6535:;
+	V2490= (V2489)-(0);
+	{register object V2492;
+	register object V2493;
+	object V2494;
+	V2492= Cnil;
+	V2493= Cnil;
+	V2494= Cnil;
+	goto T6542;
+T6542:;
+	if(!((0)>=(V2490))){
+	goto T6547;
+	}
+	goto T6544;
+	
+	goto T6547;
+T6547:;
+	V2490= (V2490)-(1);
+	if(((V2487))==Cnil){
+	goto T6553;
+	}
+	V2487= Cnil;
+	V2493= (V2484);
+	goto T6550;
+	
+	goto T6553;
+T6553:;
+	V2493= va_arg(ap,object);
+	goto T6550;
+T6550:;
+	if(((V2488))==Cnil){
+	goto T6563;
+	}
+	if(!((V2490)==(0))){
+	goto T6560;
+	}
+	goto T6562;
+	
+	goto T6563;
+T6563:;
+	goto T6560;
+	
+	goto T6562;
+T6562:;
+	goto T6559;
+	
+	goto T6560;
+T6560:;
+	V2493= make_cons((V2493),Cnil);
+	goto T6559;
+T6559:;
+	if(((V2492))==Cnil){
+	goto T6568;
+	}
+	(void)((((V2492))->c.c_cdr=((V2493)),((V2492))));
+	V2492= (V2493);
+	goto T6567;
+	
+	goto T6568;
+T6568:;
+	V2494= (V2493);
+	V2492= (V2494);
+	goto T6567;
+T6567:;
+	goto T6542;
+	
+	goto T6544;
+T6544:;
+	V2491= (V2494);
+	goto T6540;
+	}
+	goto T6540;
+T6540:;
+	(base0[1])->c.c_car= (V2491);
+	{frame_ptr fr;
+	fr=frs_sch((base0[0])->c.c_car);
+	if(fr==NULL)FEerror("The GO tag ~s is missing.",1,((object)VV[275]));
+	vs_base=vs_top;
+	unwind(fr,((object)VV[275]));}
+	{object V2495;
+	V2495= Cnil;
+	VMRV55(V2495,0);}}
+	#undef base0
+	va_end(ap);
+}
+/*	local entry for function ANSI-LOOP::LOOP-CHECK-DATA-TYPE	*/
+
+static object LI82__LOOP_CHECK_DATA_TYPE__loop(object V2498,object V2499,...)
+{	 VMB56 VMS56 VMV56
+	va_list ap;
+	va_start(ap,V2499);
+	{object V2500;
+	int8_t V2501;
+	int8_t V2502;
+	object V2503;
+	object V2504;
+	V2500= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V2500))==Cnil){
+	goto T6578;
+	}
+	V2501= -((char)fcall.argd);
+	goto T6577;
+	
+	goto T6578;
+T6578:;
+	V2501= fcall.argd;
+	goto T6577;
+T6577:;
+	V2502= (V2501)-(2);
+	V2503= Cnil;
+	if(((V2500))==Cnil){
+	goto T6584;
+	}
+	if(!((V2502)==(1))){
+	goto T6587;
+	}
+	V2502= 0;
+	V2503= va_arg(ap,object);
+	if(((V2503))==Cnil){
+	goto T6590;
+	}
+	goto T6583;
+	
+	goto T6590;
+T6590:;
+	goto T6583;
+	
+	goto T6587;
+T6587:;
+	goto T6583;
+	
+	goto T6584;
+T6584:;
+	goto T6583;
+T6583:;
+	if(!((V2502)>(0))){
+	goto T6596;
+	}
+	V2502= 0;
+	V2504= va_arg(ap,object);
+	goto T6582;
+	
+	goto T6596;
+T6596:;
+	if(((V2503))==Cnil){
+	goto T6601;
+	}
+	{object V2505;
+	V2505= (V2503)->c.c_car;
+	V2503= (V2503)->c.c_cdr;
+	V2504= (V2505);
+	goto T6582;
+	}
+	goto T6601;
+T6601:;
+	if(((V2499))==Cnil){
+	goto T6607;
+	}
+	V2504= (V2499);
+	goto T6582;
+	
+	goto T6607;
+T6607:;
+	V2504= Cnil;
+	goto T6582;
+T6582:;
+	if(((V2498))==Cnil){
+	goto T6613;
+	}
+	goto T6610;
+	
+	goto T6613;
+T6613:;
+	{object V2508 = (V2504);
+	VMR56(V2508);}
+	goto T6610;
+T6610:;
+	register object  V2510;
+	object V2509[1];
+	#define V2511 V2509[0]
+	
+	{
+	if(!(((V2499))==(Ct))){
+	goto T6619;
+	}
+	V2510= ({object  _t0=Ct;object  _t1=Ct;
+	V2511= (_t1);_t0;});
+	
+	vs_top=sup;
+	goto T6618;
+	
+	goto T6619;
+T6619:;
+	{object V2512;
+	object V2513;
+	V2514= (fcall.valp=(fixnum)0,/* SYSTEM::NORMALIZE-TYPE */(*LnkLI169)((V2498)));
+	V2512= (/* SYSTEM::NPROCESS-TYPE */(*LnkLI168)((V2514)));
+	V2515= (fcall.valp=(fixnum)0,/* SYSTEM::NORMALIZE-TYPE */(*LnkLI169)((V2499)));
+	V2513= (/* SYSTEM::NPROCESS-TYPE */(*LnkLI168)((V2515)));
+	V2516= (/* SYSTEM::NTP-SUBTP */(*LnkLI170)((V2512),(V2513)));
+	{object V2518;
+	{object V2519;
+	V2519= V2512->c.c_cdr;
+	V2518= V2519->c.c_cdr;}
+	if((V2518->c.c_car)==Cnil){
+	goto T6628;
+	}}
+	goto T6627;
+	
+	goto T6628;
+T6628:;
+	{object V2520;
+	{object V2521;
+	V2521= V2513->c.c_cdr;
+	V2520= V2521->c.c_cdr;}
+	if((V2520->c.c_car)==Cnil){
+	goto T6625;
+	}}
+	goto T6627;
+T6627:;
+	V2517= Cnil;
+	goto T6624;
+	
+	goto T6625;
+T6625:;
+	V2517= Ct;
+	goto T6624;
+T6624:;
+	V2510= ({object  _t0=(V2516);object  _t1=(V2517);
+	V2511= (_t1);_t0;});
+	
+	vs_top=sup;}
+	goto T6618;
+T6618:;
+	if(((V2511))==Cnil){
+	goto T6639;
+	}
+	goto T6636;
+	
+	goto T6639;
+T6639:;
+	(void)((fcall.argd=3,/* ANSI-LOOP::LOOP-WARN */(*LnkLI185)(((object)VV[293]),(V2498),(V2499))));
+	goto T6635;
+	
+	goto T6636;
+T6636:;
+	if(((V2510))==Cnil){
+	goto T6644;
+	}
+	goto T6641;
+	
+	goto T6644;
+T6644:;
+	(void)((fcall.argd=3,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[295]),(V2498),(V2499))));
+	goto T6635;
+	
+	goto T6641;
+T6641:;
+	goto T6635;
+T6635:;
+	{object V2522 = (V2498);
+	VMR56(V2522);}
+	#undef V2511
+	
+	}}
+	va_end(ap);
+}
+/*	local entry for function COMMON-LISP::LOOP-FINISH	*/
+
+static object LI83__LOOP_FINISH__loop(object V2525,object V2526)
+{	 VMB57 VMS57 VMV57
+	{object V2527;
+	V2527= V2525->c.c_cdr;
+	if(((V2527))==Cnil){
+	goto T6651;
+	}
+	goto T6650;
+	
+	goto T6651;
+T6651:;
+	goto T6648;
+	
+	goto T6650;
+T6650:;
+	{object V2529;
+	V2529= V2527->c.c_car;
+	V2527= V2527->c.c_cdr;
+	V2528= (V2529);}
+	V2530= make_cons((V2528),Cnil);
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[296]),((object)VV[7]),((object)VV[297]),(V2530))));
+	goto T6647;
+	
+	goto T6648;
+T6648:;
+	goto T6647;
+T6647:;
+	{object V2531 = ((object)VV[298]);
+	VMR57(V2531);}}
+}
+/*	local entry for function ANSI-LOOP::SUBST-GENSYMS-FOR-NIL	*/
+
+static object LI84__SUBST_GENSYMS_FOR_NIL__loop(object V2533)
+{	 VMB58 VMS58 VMV58
+	if(((V2533))==Cnil){
+	goto T6660;
+	}
+	goto T6657;
+	
+	goto T6660;
+T6660:;
+	{object V2534;
+	{object V2535;
+	V2535= (fcall.argd=0,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(make_fixnum(0)));
+	V2536= make_cons((V2535),(((object)VV[299])->s.s_dbind));
+	(((object)VV[299])->s.s_dbind)= (V2536);
+	V2534= (((object)VV[299])->s.s_dbind);}
+	{object V2537 = V2534->c.c_car;
+	VMR58(V2537);}}
+	goto T6657;
+T6657:;
+	V2538= tp2(V2533);
+	if(!((V2538)==(0))){
+	goto T6670;
+	}
+	goto T6669;
+	
+	goto T6670;
+T6670:;
+	goto T6668;
+	
+	goto T6669;
+T6669:;
+	goto T6665;
+	
+	goto T6668;
+T6668:;
+	{object V2539 = (V2533);
+	VMR58(V2539);}
+	goto T6665;
+T6665:;
+	V2540= V2533->c.c_car;
+	V2541= (/* ANSI-LOOP::SUBST-GENSYMS-FOR-NIL */(*LnkLI203)((V2540)));
+	V2542= V2533->c.c_cdr;
+	V2543= (/* ANSI-LOOP::SUBST-GENSYMS-FOR-NIL */(*LnkLI203)((V2542)));
+	{object V2544 = make_cons((V2541),(V2543));
+	VMR58(V2544);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-BUILD-DESTRUCTURING-BINDINGS	*/
+
+static object LI85__LOOP_BUILD_DESTRUCTURING_BINDINGS__loop(object V2547,object V2548)
+{	 VMB59 VMS59 VMV59
+	if(((V2547))==Cnil){
+	goto T6675;
+	}
+	bds_bind(((object)VV[299]),Cnil);
+	V2549= V2547->c.c_car;
+	V2550= (/* ANSI-LOOP::SUBST-GENSYMS-FOR-NIL */(*LnkLI203)((V2549)));
+	{object V2552;
+	V2552= V2547->c.c_cdr;
+	V2551= V2552->c.c_car;}
+	V2553= list(2,((object)VV[104]),make_cons(((object)VV[302]),(((object)VV[299])->s.s_dbind)));
+	{object V2555;
+	V2555= V2547->c.c_cdr;
+	V2554= V2555->c.c_cdr;}
+	{object V2556 = make_cons(listA(5,((object)VV[303]),(V2550),(V2551),(V2553),(/* ANSI-LOOP::LOOP-BUILD-DESTRUCTURING-BINDINGS */(*LnkLI204)((V2554),(V2548)))),Cnil);
+	bds_unwind1;
+	VMR59(V2556);}
+	goto T6675;
+T6675:;
+	{object V2557 = (V2548);
+	VMR59(V2557);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-TRANSLATE	*/
+
+static object LI86__LOOP_TRANSLATE__loop(object V2561,object V2562,object V2563)
+{	 VMB60 VMS60 VMV60
+	bds_bind(((object)VV[304]),V2563);
+	bds_bind(((object)VV[305]),V2562);
+	bds_bind(((object)VV[257]),V2561);
+	bds_bind(((object)VV[257]),(((object)VV[257])->s.s_dbind));
+	bds_bind(((object)VV[305]),(((object)VV[305])->s.s_dbind));
+	bds_bind(((object)VV[304]),(((object)VV[304])->s.s_dbind));
+	bds_bind(((object)VV[306]),(((object)VV[257])->s.s_dbind));
+	bds_bind(((object)VV[256]),Cnil);
+	bds_bind(((object)VV[307]),Cnil);
+	bds_bind(((object)VV[308]),Cnil);
+	bds_bind(((object)VV[309]),Cnil);
+	bds_bind(((object)VV[310]),Cnil);
+	bds_bind(((object)VV[311]),Cnil);
+	bds_bind(((object)VV[312]),Cnil);
+	bds_bind(((object)VV[313]),Cnil);
+	bds_bind(((object)VV[314]),Cnil);
+	bds_bind(((object)VV[315]),Cnil);
+	bds_bind(((object)VV[316]),Cnil);
+	bds_bind(((object)VV[317]),Cnil);
+	bds_bind(((object)VV[318]),Cnil);
+	bds_bind(((object)VV[319]),Cnil);
+	bds_bind(((object)VV[320]),Cnil);
+	bds_bind(((object)VV[321]),Cnil);
+	bds_bind(((object)VV[322]),Cnil);
+	bds_bind(((object)VV[323]),Cnil);
+	bds_bind(((object)VV[324]),Cnil);
+	bds_bind(((object)VV[325]),Cnil);
+	bds_bind(((object)VV[326]),Cnil);
+	bds_bind(((object)VV[327]),Cnil);
+	(void)((/* ANSI-LOOP::LOOP-ITERATION-DRIVER */(*LnkLI205)()));
+	(void)((/* ANSI-LOOP::LOOP-BIND-BLOCK */(*LnkLI206)()));
+	{register object V2564;
+	V2565= (/* COMMON-LISP::NREVERSE */(*LnkLI192)((((object)VV[314])->s.s_dbind)));
+	V2566= (/* COMMON-LISP::NREVERSE */(*LnkLI192)((((object)VV[316])->s.s_dbind)));
+	V2567= (/* COMMON-LISP::NREVERSE */(*LnkLI192)((((object)VV[317])->s.s_dbind)));
+	V2568= (/* COMMON-LISP::NREVERSE */(*LnkLI192)((((object)VV[319])->s.s_dbind)));
+	{object V2570;
+	register object V2571;
+	V2570= (((object)VV[320])->s.s_dbind);
+	V2571= (/* COMMON-LISP::NREVERSE */(*LnkLI192)((((object)VV[321])->s.s_dbind)));
+	{register object V2572;
+	V2572= Cnil;
+	{object V2573;
+	V2573= (V2570);
+	if(((V2573))==Cnil){
+	goto T6690;
+	}
+	if(((V2572))==Cnil){
+	goto T6695;
+	}
+	V2571= (((V2572))->c.c_cdr=((V2571)),((V2572)));
+	goto T6694;
+	
+	goto T6695;
+T6695:;
+	goto T6694;
+T6694:;
+	V2572= (V2573);
+	{register object V2575;
+	V2575= (V2573)->c.c_cdr;
+	goto T6702;
+T6702:;
+	if(((V2575))==Cnil){
+	goto T6704;
+	}
+	if(((V2572))==Cnil){
+	goto T6709;
+	}
+	V2571= (((V2572))->c.c_cdr=((V2571)),((V2572)));
+	goto T6708;
+	
+	goto T6709;
+T6709:;
+	goto T6708;
+T6708:;
+	V2572= (V2575);
+	{object V2578;
+	V2578= (V2575)->c.c_cdr;
+	V2575= (V2578);
+	goto T6702;
+	}
+	goto T6704;
+T6704:;
+	goto T6689;
+	}
+	goto T6690;
+T6690:;}
+	goto T6689;
+T6689:;
+	if(((V2572))==Cnil){
+	goto T6717;
+	}
+	V2569= (((V2572))->c.c_cdr=((V2571)),((V2572)));
+	goto T6686;
+	
+	goto T6717;
+T6717:;
+	V2569= (V2571);}}
+	goto T6686;
+T6686:;
+	V2564= list(6,((object)VV[330]),(V2565),(V2566),(V2567),(V2568),(V2569));
+	{register object V2580;
+	register object V2581;
+	V2580= (((object)VV[313])->s.s_dbind);
+	V2581= V2580->c.c_car;
+	goto T6723;
+T6723:;
+	if(((V2580))==Cnil){
+	goto T6730;
+	}
+	goto T6728;
+	
+	goto T6730;
+T6730:;
+	goto T6725;
+	
+	goto T6728;
+T6728:;
+	{object V2583;
+	object V2584;
+	object V2585;
+	object V2586;
+	V2583= (V2581)->c.c_car;
+	{object V2589;
+	V2589= (V2581)->c.c_cdr;
+	V2584= V2589->c.c_car;}
+	{object V2591;
+	{object V2592;
+	V2592= (V2581)->c.c_cdr;
+	V2591= V2592->c.c_cdr;}
+	V2585= V2591->c.c_car;}
+	{object V2594;
+	{object V2595;
+	{object V2596;
+	V2596= (V2581)->c.c_cdr;
+	V2595= V2596->c.c_cdr;}
+	V2594= V2595->c.c_cdr;}
+	V2586= V2594->c.c_car;}
+	{register object V2597;
+	register object V2598;
+	V2597= (V2586);
+	V2598= V2586->c.c_car;
+	goto T6746;
+T6746:;
+	if(((V2597))==Cnil){
+	goto T6753;
+	}
+	goto T6751;
+	
+	goto T6753;
+T6753:;
+	goto T6748;
+	
+	goto T6751;
+T6751:;
+	{object V2601;
+	object V2602;
+	V2601= make_cons((V2564),Cnil);
+	V2602= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V2598);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V2601);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V2603;
+	register object V2604;
+	V2603= Cnil;
+	V2604= Cnil;
+	{register object V2605;
+	V2605= (V2598);
+	goto T6764;
+T6764:;
+	if(((V2605))==Cnil){
+	goto T6766;
+	}
+	{object V2607;
+	V2607= (V2605)->c.c_car;
+	{object V2608;
+	V2608= make_cons((V2607),Cnil);
+	if(((V2604))==Cnil){
+	goto T6773;
+	}
+	(void)((((V2604))->c.c_cdr=((V2608)),((V2604))));
+	V2604= (V2608);
+	goto T6772;
+	
+	goto T6773;
+T6773:;
+	V2603= (V2608);
+	V2604= (V2603);
+	goto T6772;
+T6772:;}}
+	{object V2609;
+	V2609= (V2605)->c.c_cdr;
+	V2605= (V2609);
+	goto T6764;
+	}
+	goto T6766;
+T6766:;
+	goto T6762;
+	}
+	goto T6762;
+T6762:;
+	{object V2611;
+	V2611= V2602->c.c_cdr;
+	{object V2612;
+	V2612= V2611->c.c_car;
+	if(((V2604))==Cnil){
+	goto T6785;
+	}
+	(void)((((V2604))->c.c_cdr=((V2612)),((V2604))));
+	V2604= (V2612);
+	goto T6784;
+	
+	goto T6785;
+T6785:;
+	V2603= (V2612);
+	V2604= (V2603);
+	goto T6784;
+T6784:;}}
+	V2564= (V2603);}}
+	V2597= (V2597)->c.c_cdr;
+	V2598= V2597->c.c_car;
+	goto T6746;
+	
+	goto T6748;
+T6748:;
+	goto T6743;
+	}
+	goto T6743;
+T6743:;
+	if(((V2583))==Cnil){
+	goto T6798;
+	}
+	goto T6797;
+	
+	goto T6798;
+T6798:;
+	if(((V2584))==Cnil){
+	goto T6801;
+	}
+	goto T6797;
+	
+	goto T6801;
+T6801:;
+	if(((V2585))==Cnil){
+	goto T6795;
+	}
+	goto T6797;
+T6797:;
+	{object V2614;
+	V2614= make_cons((V2564),Cnil);
+	if(((V2584))==Cnil){
+	goto T6806;
+	}
+	{object V2615;
+	V2615= make_cons(((object)VV[104]),(V2584));
+	V2614= make_cons((V2615),(V2614));
+	goto T6805;
+	}
+	goto T6806;
+T6806:;
+	goto T6805;
+T6805:;
+	if(((V2583))==Cnil){
+	goto T6816;
+	}
+	goto T6813;
+	
+	goto T6816;
+T6816:;
+	V2616= ((object)VV[253]);
+	goto T6812;
+	
+	goto T6813;
+T6813:;
+	if(((((object)VV[183])->s.s_dbind))==Cnil){
+	goto T6818;
+	}
+	{object V2617;
+	V2617= (((object)VV[183])->s.s_dbind);
+	V2616= V2617->c.c_car;
+	goto T6812;
+	}
+	goto T6818;
+T6818:;
+	V2616= ((object)VV[103]);
+	goto T6812;
+T6812:;
+	V2564= listA(3,(V2616),(V2583),(/* ANSI-LOOP::LOOP-BUILD-DESTRUCTURING-BINDINGS */(*LnkLI204)((V2585),(V2614))));
+	goto T6732;
+	}
+	goto T6795;
+T6795:;}
+	goto T6732;
+T6732:;
+	V2580= (V2580)->c.c_cdr;
+	V2581= V2580->c.c_car;
+	goto T6723;
+	
+	goto T6725;
+T6725:;
+	goto T6720;
+	}
+	goto T6720;
+T6720:;
+	if(((((object)VV[326])->s.s_dbind))==Cnil){
+	goto T6826;
+	}
+	goto T6830;
+T6830:;
+	{object V2619;
+	V2619= (((object)VV[326])->s.s_dbind);
+	if((V2619->c.c_car)==Cnil){
+	goto T6837;
+	}}
+	goto T6835;
+	
+	goto T6837;
+T6837:;
+	goto T6832;
+	
+	goto T6835;
+T6835:;
+	{object V2621;
+	{object V2622;
+	V2622= (((object)VV[326])->s.s_dbind);
+	V2621= V2622->c.c_car;}
+	{object V2624;
+	V2624= (((object)VV[326])->s.s_dbind);
+	V2623= V2624->c.c_cdr;}
+	(((object)VV[326])->s.s_dbind)= (V2623);
+	V2620= (V2621);}
+	V2564= list(3,((object)VV[331]),(V2620),(V2564));
+	goto T6830;
+	
+	goto T6832;
+T6832:;
+	{object V2625 = (V2564);
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	VMR60(V2625);}
+	goto T6826;
+T6826:;
+	{object V2626 = list(3,((object)VV[331]),Cnil,(V2564));
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	bds_unwind1;
+	VMR60(V2626);}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-ITERATION-DRIVER	*/
+
+static object LI87__LOOP_ITERATION_DRIVER__loop()
+{	 VMB61 VMS61 VMV61
+	goto T6847;
+T6847:;
+	if(((((object)VV[257])->s.s_dbind))==Cnil){
+	goto T6854;
+	}
+	goto T6852;
+	
+	goto T6854;
+T6854:;
+	goto T6849;
+	
+	goto T6852;
+T6852:;
+	{object V2627;
+	object V2628;
+	{object V2629;
+	V2629= (((object)VV[257])->s.s_dbind);
+	V2627= V2629->c.c_car;}
+	V2628= Cnil;
+	if(((V2627))==Cnil){
+	goto T6863;
+	}
+	V2630= tp5(V2627);
+	switch(V2630){
+	case 19:
+	goto T6868;
+T6868:;
+	goto T6862;
+	
+	default:
+	goto T6869;
+T6869:;
+	goto T6861;
+	}
+	goto T6861;
+	
+	goto T6863;
+T6863:;
+	goto T6862;
+T6862:;
+	goto T6858;
+	
+	goto T6861;
+T6861:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[332]),(V2627))));
+	goto T6856;
+	
+	goto T6858;
+T6858:;
+	V2631= (((object)VV[257])->s.s_dbind);
+	(((object)VV[256])->s.s_dbind)= (V2631);
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	{object V2633;
+	V2633= (((object)VV[304])->s.s_dbind);
+	V2632= STREF(object ,(V2633),0);}
+	V2628= (/* ANSI-LOOP::LOOP-LOOKUP-KEYWORD */(*LnkLI208)((V2627),(V2632)));
+	if(((V2628))==Cnil){
+	goto T6874;
+	}
+	{object V2634;
+	V2635= V2628->c.c_car;
+	V2634= ({register object _sym=(V2635);_sym->s.s_sfdef!=NOT_SPECIAL ? make_cons(sLspecial,make_fixnum((long)_sym->s.s_sfdef)) : (_sym->s.s_mflag ? make_cons(sSmacro,_sym->s.s_gfdef) : _sym->s.s_gfdef);});
+	V2637= tp4(V2634);
+	if(!((V2637)==(24))){
+	goto T6885;
+	}
+	goto T6884;
+	
+	goto T6885;
+T6885:;
+	goto T6882;
+	
+	goto T6884;
+T6884:;
+	V2636= (V2634);
+	goto T6881;
+	
+	goto T6882;
+T6882:;
+	V2636= (V2634)->s.s_gfdef;
+	goto T6881;
+T6881:;
+	V2638= V2628->c.c_cdr;
+	(void)(({fixnum _v=(fixnum)0;object _z,_f=((V2636)),_l=((V2638)),_ll=_l;
+        object _x4=Cnil,_x3=Cnil,_x2=Cnil,_x1=Cnil,_x0=Cnil;
+        char _m=(2-2),_q=_f->fun.fun_minarg>_m ? _f->fun.fun_minarg-_m : 0;
+        char _n=Rset && !_f->fun.fun_argd ? _q : -1;
+        fcall.fun=_f;fcall.valp=_v;fcall.argd=-(2-1);
+        switch (_n) {
+          case 5: if (_l==Cnil) {_n=-1;break;} _x4=_l->c.c_car;_l=_l->c.c_cdr;
+          case 4: if (_l==Cnil) {_n=-1;break;} _x3=_l->c.c_car;_l=_l->c.c_cdr;
+          case 3: if (_l==Cnil) {_n=-1;break;} _x2=_l->c.c_car;_l=_l->c.c_cdr;
+          case 2: if (_l==Cnil) {_n=-1;break;} _x1=_l->c.c_car;_l=_l->c.c_cdr;
+          case 1: if (_l==Cnil) {_n=-1;break;} _x0=_l->c.c_car;_l=_l->c.c_cdr;
+          case 0: if (_n+_m+(_l==Cnil ? 0 : 1)>_f->fun.fun_maxarg) _n=-1; else fcall.argd-=_n;
+          default: break;
+        }
+        switch (_n) {
+          case 5:  _z=_f->fun.fun_self(_x4,_x3,_x2,_x1,_x0,_l);break;
+          case 4:  _z=_f->fun.fun_self(_x3,_x2,_x1,_x0,_l);break;
+          case 3:  _z=_f->fun.fun_self(_x2,_x1,_x0,_l);break;
+          case 2:  _z=_f->fun.fun_self(_x1,_x0,_l);break;
+          case 1:  _z=_f->fun.fun_self(_x0,_l);break;
+          case 0:  _z=(_f->fun.fun_maxarg ? _f->fun.fun_self(_l) : _f->fun.fun_self());break;
+          default: _z=call_proc_cs2(_ll);break;
+        }
+        if (!(_f)->fun.fun_neval && !(_f)->fun.fun_vv) vs_top=_v ? (object *)_v : sup;
+        _z;}));
+	goto T6856;
+	}
+	goto T6874;
+T6874:;
+	{object V2640;
+	V2640= (((object)VV[304])->s.s_dbind);
+	V2639= STREF(object ,(V2640),8);}
+	V2628= (/* ANSI-LOOP::LOOP-LOOKUP-KEYWORD */(*LnkLI208)((V2627),(V2639)));
+	if(((V2628))==Cnil){
+	goto T6889;
+	}
+	(void)((/* ANSI-LOOP::LOOP-HACK-ITERATION */(*LnkLI209)((V2628))));
+	goto T6856;
+	
+	goto T6889;
+T6889:;
+	if(((/* ANSI-LOOP::LOOP-TMEMBER */(*LnkLI210)((V2627),((object)VV[337]))))==Cnil){
+	goto T6894;
+	}
+	{object V2642;
+	V2642= (((object)VV[257])->s.s_dbind);
+	V2641= V2642->c.c_car;}
+	{object V2644;
+	V2644= (((object)VV[257])->s.s_dbind);
+	{object V2645;
+	V2645= V2644->c.c_cdr;
+	V2643= V2645->c.c_car;}}
+	(void)((fcall.argd=4,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[338]),(V2627),(V2641),(V2643))));
+	goto T6856;
+	
+	goto T6894;
+T6894:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[339]),(V2627))));}
+	goto T6856;
+T6856:;
+	goto T6847;
+	
+	goto T6849;
+T6849:;
+	{object V2646 = Cnil;
+	VMR61(V2646);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-POP-SOURCE	*/
+
+static object LI88__LOOP_POP_SOURCE__loop()
+{	 VMB62 VMS62 VMV62
+	if(((((object)VV[257])->s.s_dbind))==Cnil){
+	goto T6901;
+	}
+	{object V2647;
+	{object V2648;
+	V2648= (((object)VV[257])->s.s_dbind);
+	V2647= V2648->c.c_car;}
+	{object V2650;
+	V2650= (((object)VV[257])->s.s_dbind);
+	V2649= V2650->c.c_cdr;}
+	(((object)VV[257])->s.s_dbind)= (V2649);
+	{object V2651 = (V2647);
+	VMR62(V2651);}}
+	goto T6901;
+T6901:;
+	{object V2652 = (fcall.argd=1,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[340])));
+	VMR62(V2652);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-GET-COMPOUND-FORM	*/
+
+static object LI89__LOOP_GET_COMPOUND_FORM__loop()
+{	 VMB63 VMS63 VMV63
+	{object V2653;
+	V2653= (/* ANSI-LOOP::LOOP-GET-FORM */(*LnkLI211)());
+	if(((V2653))==Cnil){
+	goto T6914;
+	}
+	V2654= tp2(V2653);
+	if(!((V2654)==(0))){
+	goto T6917;
+	}
+	goto T6913;
+	
+	goto T6917;
+T6917:;
+	goto T6912;
+	
+	goto T6914;
+T6914:;
+	goto T6912;
+	
+	goto T6913;
+T6913:;
+	goto T6909;
+	
+	goto T6912;
+T6912:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[342]),(V2653))));
+	goto T6908;
+	
+	goto T6909;
+T6909:;
+	goto T6908;
+T6908:;
+	{object V2655 = (V2653);
+	VMR63(V2655);}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-GET-PROGN	*/
+
+static object LI90__LOOP_GET_PROGN__loop()
+{	 VMB64 VMS64 VMV64
+	{register object V2656;
+	register object V2657;
+	V2656= make_cons((/* ANSI-LOOP::LOOP-GET-COMPOUND-FORM */(*LnkLI212)()),Cnil);
+	{object V2658;
+	V2658= (((object)VV[257])->s.s_dbind);
+	V2657= V2658->c.c_car;}
+	goto T6923;
+T6923:;
+	if(((V2657))==Cnil){
+	goto T6932;
+	}
+	V2660= tp2((V2657));
+	if(!((V2660)==(0))){
+	goto T6935;
+	}
+	goto T6931;
+	
+	goto T6935;
+T6935:;
+	goto T6930;
+	
+	goto T6932;
+T6932:;
+	goto T6930;
+	
+	goto T6931;
+T6931:;
+	goto T6928;
+	
+	goto T6930;
+T6930:;
+	goto T6925;
+	
+	goto T6928;
+T6928:;
+	{object V2661;
+	object V2662;
+	V2663= (/* ANSI-LOOP::LOOP-GET-COMPOUND-FORM */(*LnkLI212)());
+	V2661= make_cons((V2663),(V2656));
+	{object V2664;
+	V2664= (((object)VV[257])->s.s_dbind);
+	V2662= V2664->c.c_car;}
+	V2656= (V2661);
+	V2657= (V2662);}
+	goto T6923;
+	
+	goto T6925;
+T6925:;
+	if(((V2656)->c.c_cdr)==Cnil){
+	goto T6949;
+	}
+	goto T6946;
+	
+	goto T6949;
+T6949:;
+	{object V2667 = (V2656)->c.c_car;
+	VMR64(V2667);}
+	goto T6946;
+T6946:;
+	{register object V2670;
+	register object V2671;
+	V2670= (V2656)->c.c_cdr;
+	V2671= (((V2656))->c.c_cdr=(Cnil),((V2656)));
+	goto T6955;
+T6955:;
+	if(((V2670))==Cnil){
+	goto T6957;
+	}
+	{object V2672;
+	object V2673;
+	V2672= (V2670)->c.c_cdr;
+	V2673= (((V2670))->c.c_cdr=((V2671)),((V2670)));
+	V2670= (V2672);
+	V2671= (V2673);
+	goto T6955;
+	}
+	goto T6957;
+T6957:;
+	V2668= (V2671);
+	goto T6951;
+	}
+	goto T6951;
+T6951:;
+	{object V2675 = make_cons(((object)VV[53]),(V2668));
+	VMR64(V2675);}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-GET-FORM	*/
+
+static object LI91__LOOP_GET_FORM__loop()
+{	 VMB65 VMS65 VMV65
+	if(((((object)VV[257])->s.s_dbind))==Cnil){
+	goto T6966;
+	}
+	{object V2676 = (/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)());
+	VMR65(V2676);}
+	goto T6966;
+T6966:;
+	{object V2677 = (fcall.argd=1,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[344])));
+	VMR65(V2677);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-CONSTRUCT-RETURN	*/
+
+static object LI92__LOOP_CONSTRUCT_RETURN__loop(object V2679)
+{	 VMB66 VMS66 VMV66
+	{object V2681;
+	V2681= (((object)VV[326])->s.s_dbind);
+	V2680= V2681->c.c_car;}
+	{object V2682 = list(3,((object)VV[232]),(V2680),(V2679));
+	VMR66(V2682);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-PSEUDO-BODY	*/
+
+static object LI93__LOOP_PSEUDO_BODY__loop(object V2684)
+{	 VMB67 VMS67 VMV67
+	V2685= make_cons((V2684),(((object)VV[317])->s.s_dbind));
+	(((object)VV[317])->s.s_dbind)= (V2685);
+	{object V2686 = (((object)VV[317])->s.s_dbind);
+	VMR67(V2686);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-EMIT-BODY	*/
+
+static object LI94__LOOP_EMIT_BODY__loop(object V2688)
+{	 VMB68 VMS68 VMV68
+	V2689= Ct;
+	(((object)VV[318])->s.s_dbind)= (V2689);
+	{object V2690 = (/* ANSI-LOOP::LOOP-PSEUDO-BODY */(*LnkLI213)((V2688)));
+	VMR68(V2690);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-EMIT-FINAL-VALUE	*/
+
+static object LI95__LOOP_EMIT_FINAL_VALUE__loop(object V2692,...)
+{	 VMB69 VMS69 VMV69
+	va_list ap;
+	va_start(ap,V2692);
+	{object V2693;
+	object V2694;
+	object V2695;
+	int8_t V2696;
+	int8_t V2697;
+	object V2698;
+	object V2699;
+	V2693= Ct;
+	V2694= Ct;
+	V2695= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V2695))==Cnil){
+	goto T6975;
+	}
+	V2696= -((char)fcall.argd);
+	goto T6974;
+	
+	goto T6975;
+T6975:;
+	V2696= fcall.argd;
+	goto T6974;
+T6974:;
+	V2697= (V2696)-(0);
+	V2698= Cnil;
+	if(((V2695))==Cnil){
+	goto T6981;
+	}
+	if(!((V2697)==(1))){
+	goto T6984;
+	}
+	V2697= 0;
+	V2694= Cnil;
+	V2698= (V2692);
+	if(((V2698))==Cnil){
+	goto T6987;
+	}
+	goto T6980;
+	
+	goto T6987;
+T6987:;
+	goto T6980;
+	
+	goto T6984;
+T6984:;
+	goto T6980;
+	
+	goto T6981;
+T6981:;
+	goto T6980;
+T6980:;
+	if(!((V2697)>(0))){
+	goto T6995;
+	}
+	V2697= 0;
+	if(((V2694))==Cnil){
+	goto T7000;
+	}
+	V2694= Cnil;
+	V2699= (V2692);
+	goto T6979;
+	
+	goto T7000;
+T7000:;
+	V2699= va_arg(ap,object);
+	goto T6979;
+	
+	goto T6995;
+T6995:;
+	if(((V2698))==Cnil){
+	goto T7005;
+	}
+	{object V2700;
+	V2700= (V2698)->c.c_car;
+	V2698= (V2698)->c.c_cdr;
+	V2699= (V2700);
+	goto T6979;
+	}
+	goto T7005;
+T7005:;
+	V2693= Cnil;
+	V2699= Cnil;
+	goto T6979;
+T6979:;
+	if(((V2693))==Cnil){
+	goto T7014;
+	}
+	{object V2704;
+	V2704= (/* ANSI-LOOP::LOOP-CONSTRUCT-RETURN */(*LnkLI214)((V2699)));
+	V2705= make_cons((V2704),(((object)VV[321])->s.s_dbind));
+	(((object)VV[321])->s.s_dbind)= (V2705);
+	goto T7013;
+	}
+	goto T7014;
+T7014:;
+	goto T7013;
+T7013:;
+	if(((((object)VV[322])->s.s_dbind))==Cnil){
+	goto T7020;
+	}
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-WARN */(*LnkLI185)(((object)VV[347]),(((object)VV[322])->s.s_dbind))));
+	goto T7019;
+	
+	goto T7020;
+T7020:;
+	goto T7019;
+T7019:;
+	{object V2707;
+	V2707= (((object)VV[256])->s.s_dbind);
+	V2706= V2707->c.c_car;}
+	(((object)VV[322])->s.s_dbind)= (V2706);
+	{object V2708 = (((object)VV[322])->s.s_dbind);
+	VMR69(V2708);}}
+	va_end(ap);
+}
+/*	local entry for function ANSI-LOOP::LOOP-DISALLOW-CONDITIONAL	*/
+
+static object LI96__LOOP_DISALLOW_CONDITIONAL__loop(object V2710,...)
+{	 VMB70 VMS70 VMV70
+	va_list ap;
+	va_start(ap,V2710);
+	{object V2711;
+	object V2712;
+	int8_t V2713;
+	int8_t V2714;
+	object V2715;
+	object V2716;
+	V2711= Ct;
+	V2712= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V2712))==Cnil){
+	goto T7026;
+	}
+	V2713= -((char)fcall.argd);
+	goto T7025;
+	
+	goto T7026;
+T7026:;
+	V2713= fcall.argd;
+	goto T7025;
+T7025:;
+	V2714= (V2713)-(0);
+	V2715= Cnil;
+	if(((V2712))==Cnil){
+	goto T7032;
+	}
+	if(!((V2714)==(1))){
+	goto T7035;
+	}
+	V2714= 0;
+	V2711= Cnil;
+	V2715= (V2710);
+	if(((V2715))==Cnil){
+	goto T7038;
+	}
+	goto T7031;
+	
+	goto T7038;
+T7038:;
+	goto T7031;
+	
+	goto T7035;
+T7035:;
+	goto T7031;
+	
+	goto T7032;
+T7032:;
+	goto T7031;
+T7031:;
+	if(!((V2714)>(0))){
+	goto T7046;
+	}
+	V2714= 0;
+	if(((V2711))==Cnil){
+	goto T7051;
+	}
+	V2711= Cnil;
+	V2716= (V2710);
+	goto T7030;
+	
+	goto T7051;
+T7051:;
+	V2716= va_arg(ap,object);
+	goto T7030;
+	
+	goto T7046;
+T7046:;
+	if(((V2715))==Cnil){
+	goto T7056;
+	}
+	{object V2717;
+	V2717= (V2715)->c.c_car;
+	V2715= (V2715)->c.c_cdr;
+	V2716= (V2717);
+	goto T7030;
+	}
+	goto T7056;
+T7056:;
+	V2716= Cnil;
+	goto T7030;
+T7030:;
+	if(((((object)VV[323])->s.s_dbind))==Cnil){
+	goto T7062;
+	}
+	{object V2720 = (fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[348]),(V2716)));
+	VMR70(V2720);}
+	goto T7062;
+T7062:;
+	{object V2721 = Cnil;
+	VMR70(V2721);}}
+	va_end(ap);
+}
+/*	local entry for function ANSI-LOOP::LOOP-DISALLOW-ANONYMOUS-COLLECTORS	*/
+
+static object LI97__LOOP_DISALLOW_ANONYMOUS_COLLECTORS__loop()
+{	 VMB71 VMS71 VMV71
+	{object V2722;
+	V2722= (((object)VV[327])->s.s_dbind);
+	{register object V2723;
+	V2724= tp2(V2722);
+	if(!((V2724)==(0))){
+	goto T7069;
+	}
+	V2723= Ct;
+	goto T7068;
+	
+	goto T7069;
+T7069:;
+	V2723= Cnil;
+	goto T7068;
+T7068:;
+	{register fixnum V2725;
+	register object V2726;
+	if(((V2723))==Cnil){
+	goto T7074;
+	}
+	V2725= 268435455;
+	goto T7073;
+	
+	goto T7074;
+T7074:;
+	V2725= length((V2722));
+	goto T7073;
+T7073:;
+	if(((V2723))==Cnil){
+	goto T7078;
+	}
+	if(((V2722))==Cnil){
+	goto T7081;
+	}
+	V2726= (V2722);
+	goto T7077;
+	
+	goto T7081;
+T7081:;
+	V2726= Cnil;
+	goto T7077;
+	
+	goto T7078;
+T7078:;
+	V2726= (V2722);
+	goto T7077;
+T7077:;
+	{object V2727;
+	if(((V2723))==Cnil){
+	goto T7085;
+	}
+	V2727= (V2726);
+	goto T7084;
+	
+	goto T7085;
+T7085:;
+	V2727= Cnil;
+	goto T7084;
+T7084:;
+	if(!((0)>=(V2725))){
+	goto T7093;
+	}
+	goto T7092;
+	
+	goto T7093;
+T7093:;
+	if(((V2723))==Cnil){
+	goto T7096;
+	}
+	if(((V2727))==Cnil){
+	goto T7099;
+	}
+	goto T7091;
+	
+	goto T7099;
+T7099:;
+	goto T7092;
+	
+	goto T7096;
+T7096:;
+	goto T7091;
+	
+	goto T7092;
+T7092:;
+	goto T7088;
+	
+	goto T7091;
+T7091:;
+	{object V2728;
+	if(((V2723))==Cnil){
+	goto T7103;
+	}
+	V2728= V2727->c.c_car;
+	goto T7102;
+	
+	goto T7103;
+T7103:;
+	V2728= (/* COMMON-LISP::ROW-MAJOR-AREF */(*LnkLI215)((V2726),(fixnum)0));
+	goto T7102;
+T7102:;
+	if((STREF(object ,(V2728),0))==Cnil){
+	goto T7111;
+	}
+	goto T7110;
+	
+	goto T7111;
+T7111:;
+	goto T7109;
+	
+	goto T7110;
+T7110:;
+	goto T7106;
+	
+	goto T7109;
+T7109:;
+	if(((V2728))==Cnil){
+	goto T7065;
+	}
+	goto T7067;
+	
+	goto T7106;
+T7106:;}
+	{register fixnum V2729;
+	register object V2730;
+	if(((V2723))==Cnil){
+	goto T7114;
+	}
+	V2729= 0;
+	goto T7113;
+	
+	goto T7114;
+T7114:;
+	V2729= 1;
+	goto T7113;
+T7113:;
+	V2730= V2727->c.c_cdr;
+	goto T7119;
+T7119:;
+	if(!((V2729)>=(V2725))){
+	goto T7125;
+	}
+	goto T7124;
+	
+	goto T7125;
+T7125:;
+	if(((V2723))==Cnil){
+	goto T7128;
+	}
+	if(((V2730))==Cnil){
+	goto T7131;
+	}
+	goto T7123;
+	
+	goto T7131;
+T7131:;
+	goto T7124;
+	
+	goto T7128;
+T7128:;
+	goto T7123;
+	
+	goto T7124;
+T7124:;
+	goto T7121;
+	
+	goto T7123;
+T7123:;
+	{object V2732;
+	{fixnum V2734;
+	V2734= V2729;
+	if(((V2723))==Cnil){
+	goto T7136;
+	}
+	V2732= (V2730)->c.c_car;
+	goto T7134;
+	
+	goto T7136;
+T7136:;
+	V2732= (/* COMMON-LISP::ROW-MAJOR-AREF */(*LnkLI215)((V2726),V2734));}
+	goto T7134;
+T7134:;
+	if((STREF(object ,(V2732),0))==Cnil){
+	goto T7144;
+	}
+	goto T7143;
+	
+	goto T7144;
+T7144:;
+	goto T7142;
+	
+	goto T7143;
+T7143:;
+	goto T7139;
+	
+	goto T7142;
+T7142:;
+	if(((V2732))==Cnil){
+	goto T7065;
+	}
+	goto T7067;
+	
+	goto T7139;
+T7139:;}
+	{fixnum V2735;
+	object V2736;
+	if(((V2723))==Cnil){
+	goto T7147;
+	}
+	V2735= V2729;
+	goto T7146;
+	
+	goto T7147;
+T7147:;
+	{fixnum V2737;
+	V2737= V2729;
+	{fixnum V2738;
+	V2738= (V2737)+(1);
+	V2735= V2738;}}
+	goto T7146;
+T7146:;
+	V2736= (V2730)->c.c_cdr;
+	V2729= V2735;
+	V2730= (V2736);
+	goto T7119;
+	}
+	goto T7121;
+T7121:;
+	goto T7065;
+	}
+	goto T7088;
+T7088:;
+	goto T7065;
+	}}}}
+	goto T7067;
+T7067:;
+	{object V2740 = (fcall.argd=1,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[350])));
+	VMR71(V2740);}
+	goto T7065;
+T7065:;
+	{object V2741 = Cnil;
+	VMR71(V2741);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-DISALLOW-AGGREGATE-BOOLEANS	*/
+
+static object LI98__LOOP_DISALLOW_AGGREGATE_BOOLEANS__loop()
+{	 VMB72 VMS72 VMV72
+	if(((/* ANSI-LOOP::LOOP-TMEMBER */(*LnkLI210)((((object)VV[322])->s.s_dbind),((object)VV[351]))))==Cnil){
+	goto T7157;
+	}
+	{object V2742 = (fcall.argd=1,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[352])));
+	VMR72(V2742);}
+	goto T7157;
+T7157:;
+	{object V2743 = Cnil;
+	VMR72(V2743);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-TYPED-INIT	*/
+
+static object LI99__LOOP_TYPED_INIT__loop(object V2745)
+{	 VMB73 VMS73 VMV73
+	if(((V2745))==Cnil){
+	goto T7163;
+	}
+	{object V2746;
+	object V2747;
+	V2748= (fcall.valp=(fixnum)0,/* SYSTEM::NORMALIZE-TYPE */(*LnkLI169)((V2745)));
+	V2746= (/* SYSTEM::NPROCESS-TYPE */(*LnkLI168)((V2748)));
+	V2749= (fcall.valp=(fixnum)0,/* SYSTEM::NORMALIZE-TYPE */(*LnkLI169)(((object)VV[353])));
+	V2747= (/* SYSTEM::NPROCESS-TYPE */(*LnkLI168)((V2749)));
+	V2750= (/* SYSTEM::NTP-SUBTP */(*LnkLI170)((V2746),(V2747)));
+	{object V2752;
+	{object V2753;
+	V2753= V2746->c.c_cdr;
+	V2752= V2753->c.c_cdr;}
+	if((V2752->c.c_car)==Cnil){
+	goto T7172;
+	}}
+	goto T7171;
+	
+	goto T7172;
+T7172:;
+	{object V2754;
+	{object V2755;
+	V2755= V2747->c.c_cdr;
+	V2754= V2755->c.c_cdr;}
+	if((V2754->c.c_car)==Cnil){
+	goto T7169;
+	}}
+	goto T7171;
+T7171:;
+	V2751= Cnil;
+	goto T7168;
+	
+	goto T7169;
+T7169:;
+	V2751= Ct;
+	goto T7168;
+T7168:;
+	if((({object  _t0=(V2750);object  _t1=(V2751);
+	(void)((_t1));_t0;}))==Cnil){
+	goto T7160;
+	}
+	goto T7162;
+	}
+	goto T7163;
+T7163:;
+	goto T7160;
+	
+	goto T7162;
+T7162:;
+	{object V2756;
+	object V2757;
+	V2758= (fcall.valp=(fixnum)0,/* SYSTEM::NORMALIZE-TYPE */(*LnkLI169)((V2745)));
+	V2756= (/* SYSTEM::NPROCESS-TYPE */(*LnkLI168)((V2758)));
+	V2759= (fcall.valp=(fixnum)0,/* SYSTEM::NORMALIZE-TYPE */(*LnkLI169)(((object)VV[354])));
+	V2757= (/* SYSTEM::NPROCESS-TYPE */(*LnkLI168)((V2759)));
+	V2760= (/* SYSTEM::NTP-SUBTP */(*LnkLI170)((V2756),(V2757)));
+	{object V2762;
+	{object V2763;
+	V2763= V2756->c.c_cdr;
+	V2762= V2763->c.c_cdr;}
+	if((V2762->c.c_car)==Cnil){
+	goto T7191;
+	}}
+	goto T7190;
+	
+	goto T7191;
+T7191:;
+	{object V2764;
+	{object V2765;
+	V2765= V2757->c.c_cdr;
+	V2764= V2765->c.c_cdr;}
+	if((V2764->c.c_car)==Cnil){
+	goto T7188;
+	}}
+	goto T7190;
+T7190:;
+	V2761= Cnil;
+	goto T7187;
+	
+	goto T7188;
+T7188:;
+	V2761= Ct;
+	goto T7187;
+T7187:;
+	if((({object  _t0=(V2760);object  _t1=(V2761);
+	(void)((_t1));_t0;}))==Cnil){
+	goto T7182;
+	}}
+	goto T7181;
+	
+	goto T7182;
+T7182:;
+	{object V2766;
+	object V2767;
+	V2768= (fcall.valp=(fixnum)0,/* SYSTEM::NORMALIZE-TYPE */(*LnkLI169)((V2745)));
+	V2766= (/* SYSTEM::NPROCESS-TYPE */(*LnkLI168)((V2768)));
+	V2769= (fcall.valp=(fixnum)0,/* SYSTEM::NORMALIZE-TYPE */(*LnkLI169)(((object)VV[355])));
+	V2767= (/* SYSTEM::NPROCESS-TYPE */(*LnkLI168)((V2769)));
+	V2770= (/* SYSTEM::NTP-SUBTP */(*LnkLI170)((V2766),(V2767)));
+	{object V2772;
+	{object V2773;
+	V2773= V2766->c.c_cdr;
+	V2772= V2773->c.c_cdr;}
+	if((V2772->c.c_car)==Cnil){
+	goto T7204;
+	}}
+	goto T7203;
+	
+	goto T7204;
+T7204:;
+	{object V2774;
+	{object V2775;
+	V2775= V2767->c.c_cdr;
+	V2774= V2775->c.c_cdr;}
+	if((V2774->c.c_car)==Cnil){
+	goto T7201;
+	}}
+	goto T7203;
+T7203:;
+	V2771= Cnil;
+	goto T7200;
+	
+	goto T7201;
+T7201:;
+	V2771= Ct;
+	goto T7200;
+T7200:;
+	if((({object  _t0=(V2770);object  _t1=(V2771);
+	(void)((_t1));_t0;}))==Cnil){
+	goto T7179;
+	}}
+	goto T7181;
+T7181:;
+	{object V2776 = (/* COMMON-LISP::COERCE */(*LnkLI216)(make_fixnum(0),(V2745)));
+	VMR73(V2776);}
+	goto T7179;
+T7179:;
+	{object V2777 = make_fixnum(0);
+	VMR73(V2777);}
+	goto T7160;
+T7160:;
+	{object V2778 = Cnil;
+	VMR73(V2778);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-OPTIONAL-TYPE	*/
+
+static object LI100__LOOP_OPTIONAL_TYPE__loop(object V2780,...)
+{	 VMB74 VMS74 VMV74
+	va_list ap;
+	va_start(ap,V2780);
+	{object V2781;
+	object V2782;
+	int8_t V2783;
+	int8_t V2784;
+	object V2785;
+	object V2786;
+	V2781= Ct;
+	V2782= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V2782))==Cnil){
+	goto T7213;
+	}
+	V2783= -((char)fcall.argd);
+	goto T7212;
+	
+	goto T7213;
+T7213:;
+	V2783= fcall.argd;
+	goto T7212;
+T7212:;
+	V2784= (V2783)-(0);
+	V2785= Cnil;
+	if(((V2782))==Cnil){
+	goto T7219;
+	}
+	if(!((V2784)==(1))){
+	goto T7222;
+	}
+	V2784= 0;
+	V2781= Cnil;
+	V2785= (V2780);
+	if(((V2785))==Cnil){
+	goto T7225;
+	}
+	goto T7218;
+	
+	goto T7225;
+T7225:;
+	goto T7218;
+	
+	goto T7222;
+T7222:;
+	goto T7218;
+	
+	goto T7219;
+T7219:;
+	goto T7218;
+T7218:;
+	if(!((V2784)>(0))){
+	goto T7233;
+	}
+	V2784= 0;
+	if(((V2781))==Cnil){
+	goto T7238;
+	}
+	V2781= Cnil;
+	V2786= (V2780);
+	goto T7217;
+	
+	goto T7238;
+T7238:;
+	V2786= va_arg(ap,object);
+	goto T7217;
+	
+	goto T7233;
+T7233:;
+	if(((V2785))==Cnil){
+	goto T7243;
+	}
+	{object V2787;
+	V2787= (V2785)->c.c_car;
+	V2785= (V2785)->c.c_cdr;
+	V2786= (V2787);
+	goto T7217;
+	}
+	goto T7243;
+T7243:;
+	V2786= Cnil;
+	goto T7217;
+T7217:;
+	base[0]= (V2786);
+	if(((((object)VV[257])->s.s_dbind))==Cnil){
+	goto T7249;
+	}
+	{object V2790;
+	V2790= (((object)VV[257])->s.s_dbind);
+	base[2]= V2790->c.c_car;}
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)(base[2],((object)VV[358]))))==Cnil){
+	goto T7253;
+	}
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	{object V2791 = (/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)());
+	VMR74(V2791);}
+	goto T7253;
+T7253:;
+	if((base[2])==Cnil){
+	goto T7260;
+	}
+	V2792= tp5(base[2]);
+	switch(V2792){
+	case 19:
+	goto T7265;
+T7265:;
+	goto T7259;
+	
+	default:
+	goto T7266;
+T7266:;
+	goto T7257;
+	}
+	goto T7257;
+	
+	goto T7260;
+T7260:;
+	goto T7259;
+T7259:;
+	{object V2793;
+	{object V2794;
+	{object V2795;
+	{object V2796;
+	V2796= (((object)VV[304])->s.s_dbind);
+	V2795= STREF(object ,(V2796),32);}
+	{fixnum V2797;
+	V2797= (fcall.fun=((object)VV[127])->s.s_gfdef,/* SYSTEM::GETHASH-INT */(*LnkLI175)(base[2],(V2795)));
+	V2798= ((fixnum*)V2797)[(fixnum)0];
+	if(!((0)==(V2798))){
+	goto T7272;
+	}
+	V2794= ({object  _t0=Cnil;object  _t1=Cnil;
+	(void)((_t1));_t0;});
+	goto T7269;
+	
+	goto T7272;
+T7272:;
+	V2799= ((object*)V2797)[(fixnum)1];
+	V2794= ({object  _t0=(V2799);object  _t1=Ct;
+	(void)((_t1));_t0;});}}
+	goto T7269;
+T7269:;
+	if(((V2794))==Cnil){
+	goto T7277;
+	}
+	V2793= (V2794);
+	goto T7268;
+	
+	goto T7277;
+T7277:;
+	{object V2800;
+	object V2801;
+	{fixnum V2802;
+	V2802= ((fixnum)base[2]);
+	V2800= ((object*)V2802)[(fixnum)3];}
+	{object V2803;
+	V2803= (((object)VV[304])->s.s_dbind);
+	V2801= STREF(object ,(V2803),40);}
+	{fixnum V2804;
+	V2804= (fcall.fun=((object)VV[127])->s.s_gfdef,/* SYSTEM::GETHASH-INT */(*LnkLI175)((V2800),(V2801)));
+	V2805= ((fixnum*)V2804)[(fixnum)0];
+	if(!((0)==(V2805))){
+	goto T7284;
+	}
+	V2793= ({object  _t0=Cnil;object  _t1=Cnil;
+	(void)((_t1));_t0;});
+	goto T7268;
+	
+	goto T7284;
+T7284:;
+	V2806= ((object*)V2804)[(fixnum)1];
+	V2793= ({object  _t0=(V2806);object  _t1=Ct;
+	(void)((_t1));_t0;});}}}
+	goto T7268;
+T7268:;
+	if(((V2793))==Cnil){
+	goto T7289;
+	}
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	{object V2807 = (V2793);
+	VMR74(V2807);}
+	goto T7289;
+T7289:;
+	{object V2808 = Cnil;
+	VMR74(V2808);}}
+	goto T7257;
+T7257:;
+	if(((V2786))==Cnil){
+	goto T7297;
+	}
+	V2809= tp2(V2786);
+	if(!((V2809)==(0))){
+	goto T7300;
+	}
+	goto T7296;
+	
+	goto T7300;
+T7300:;
+	goto T7294;
+	
+	goto T7297;
+T7297:;
+	goto T7294;
+	
+	goto T7296;
+T7296:;
+	V2810= tp2(base[2]);
+	if(!((V2810)==(0))){
+	goto T7308;
+	}
+	goto T7307;
+	
+	goto T7308;
+T7308:;
+	goto T7306;
+	
+	goto T7307;
+T7307:;
+	goto T7303;
+	
+	goto T7306;
+T7306:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[359]),base[2])));
+	goto T7293;
+	
+	goto T7303;
+T7303:;
+	goto T7293;
+	
+	goto T7294;
+T7294:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[360]),base[2])));
+	goto T7293;
+T7293:;
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	V2811= tp2(base[2]);
+	if(!((V2811)==(0))){
+	goto T7319;
+	}
+	goto T7318;
+	
+	goto T7319;
+T7319:;
+	goto T7317;
+	
+	goto T7318;
+T7318:;
+	goto T7315;
+	
+	goto T7317;
+T7317:;
+	goto T7314;
+	
+	goto T7315;
+T7315:;
+	goto T7312;
+	
+	goto T7314;
+T7314:;
+	{object V2812 = (fcall.argd=3,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[361]),base[2],(V2786)));
+	VMR74(V2812);}
+	goto T7312;
+T7312:;
+	V2814= base[2]->c.c_car;
+	V2815= V2786->c.c_car;
+	V2813= (L104__TRANSLATE__loop(base,(V2814),(V2815)));
+	V2817= base[2]->c.c_cdr;
+	V2818= V2786->c.c_cdr;
+	V2816= (L104__TRANSLATE__loop(base,(V2817),(V2818)));
+	{object V2819 = make_cons((V2813),(V2816));
+	VMR74(V2819);}
+	goto T7249;
+T7249:;
+	{object V2820 = Cnil;
+	VMR74(V2820);}}
+	va_end(ap);
+}
+/*	local function REPLICATE	*/
+
+static object L102__REPLICATE__loop(object *base0,object V2823,object V2824)
+{	
+	VMB75 VMS75 VMV75
+	vs_check;
+	if(((V2824))==Cnil){
+	goto T7333;
+	}
+	V2825= tp2(V2824);
+	if(!((V2825)==(0))){
+	goto T7336;
+	}
+	goto T7332;
+	
+	goto T7336;
+T7336:;
+	goto T7331;
+	
+	goto T7333;
+T7333:;
+	goto T7331;
+	
+	goto T7332;
+T7332:;
+	goto T7328;
+	
+	goto T7331;
+T7331:;
+	{object V2826 = (V2823);
+	VMR75(V2826);}
+	goto T7328;
+T7328:;
+	V2828= V2824->c.c_car;
+	V2827= (L102__REPLICATE__loop(base0,(V2823),(V2828)));
+	V2830= V2824->c.c_cdr;
+	V2829= (L102__REPLICATE__loop(base0,(V2823),(V2830)));
+	{object V2831 = make_cons((V2827),(V2829));
+	VMR75(V2831);}
+	#undef base0
+}
+/*	local function TRANSLATE	*/
+
+static object L104__TRANSLATE__loop(object *base0,object V2834,object V2835)
+{	
+	VMB76 VMS76 VMV76
+	vs_check;
+	if(((V2834))==Cnil){
+	goto T7346;
+	}
+	goto T7343;
+	
+	goto T7346;
+T7346:;
+	{object V2836 = Cnil;
+	VMR76(V2836);}
+	goto T7343;
+T7343:;
+	V2837= tp5(V2834);
+	switch(V2837){
+	case 19:
+	goto T7353;
+T7353:;
+	goto T7350;
+	
+	default:
+	goto T7354;
+T7354:;
+	goto T7348;
+	}
+	goto T7348;
+	
+	goto T7350;
+T7350:;
+	{object V2839;
+	{object V2840;
+	{object V2841;
+	V2841= (((object)VV[304])->s.s_dbind);
+	V2840= STREF(object ,(V2841),32);}
+	{fixnum V2842;
+	V2842= (fcall.fun=((object)VV[127])->s.s_gfdef,/* SYSTEM::GETHASH-INT */(*LnkLI175)((V2834),(V2840)));
+	V2843= ((fixnum*)V2842)[(fixnum)0];
+	if(!((0)==(V2843))){
+	goto T7360;
+	}
+	V2839= ({object  _t0=Cnil;object  _t1=Cnil;
+	(void)((_t1));_t0;});
+	goto T7357;
+	
+	goto T7360;
+T7360:;
+	V2844= ((object*)V2842)[(fixnum)1];
+	V2839= ({object  _t0=(V2844);object  _t1=Ct;
+	(void)((_t1));_t0;});}}
+	goto T7357;
+T7357:;
+	if(((V2839))==Cnil){
+	goto T7365;
+	}
+	V2838= (V2839);
+	goto T7356;
+	
+	goto T7365;
+T7365:;
+	{object V2845;
+	{object V2846;
+	object V2847;
+	{fixnum V2848;
+	V2848= ((fixnum)V2834);
+	V2846= ((object*)V2848)[(fixnum)3];}
+	{object V2849;
+	V2849= (((object)VV[304])->s.s_dbind);
+	V2847= STREF(object ,(V2849),40);}
+	{fixnum V2850;
+	V2850= (fcall.fun=((object)VV[127])->s.s_gfdef,/* SYSTEM::GETHASH-INT */(*LnkLI175)((V2846),(V2847)));
+	V2851= ((fixnum*)V2850)[(fixnum)0];
+	if(!((0)==(V2851))){
+	goto T7373;
+	}
+	V2845= ({object  _t0=Cnil;object  _t1=Cnil;
+	(void)((_t1));_t0;});
+	goto T7368;
+	
+	goto T7373;
+T7373:;
+	V2852= ((object*)V2850)[(fixnum)1];
+	V2845= ({object  _t0=(V2852);object  _t1=Ct;
+	(void)((_t1));_t0;});}}
+	goto T7368;
+T7368:;
+	if(((V2845))==Cnil){
+	goto T7378;
+	}
+	V2838= (V2845);
+	goto T7356;
+	
+	goto T7378;
+T7378:;
+	V2838= (fcall.argd=3,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[362]),base0[2],(V2834)));}}
+	goto T7356;
+T7356:;
+	{object V2853 = (L102__REPLICATE__loop(base0,(V2838),(V2835)));
+	VMR76(V2853);}
+	goto T7348;
+T7348:;
+	V2854= tp2(V2834);
+	if(!((V2854)==(0))){
+	goto T7389;
+	}
+	goto T7388;
+	
+	goto T7389;
+T7389:;
+	goto T7387;
+	
+	goto T7388;
+T7388:;
+	goto T7384;
+	
+	goto T7387;
+T7387:;
+	goto T7383;
+	
+	goto T7384;
+T7384:;
+	if(((V2835))==Cnil){
+	goto T7394;
+	}
+	V2855= tp2(V2835);
+	if(!((V2855)==(0))){
+	goto T7397;
+	}
+	goto T7393;
+	
+	goto T7397;
+T7397:;
+	goto T7392;
+	
+	goto T7394;
+T7394:;
+	goto T7392;
+	
+	goto T7393;
+T7393:;
+	goto T7381;
+	
+	goto T7392;
+T7392:;
+	goto T7383;
+T7383:;
+	{object V2856 = (fcall.argd=3,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[361]),base0[2],base0[0]));
+	VMR76(V2856);}
+	goto T7381;
+T7381:;
+	V2858= V2834->c.c_car;
+	V2859= V2835->c.c_car;
+	V2857= (L104__TRANSLATE__loop(base0,(V2858),(V2859)));
+	V2861= V2834->c.c_cdr;
+	V2862= V2835->c.c_cdr;
+	V2860= (L104__TRANSLATE__loop(base0,(V2861),(V2862)));
+	{object V2863 = make_cons((V2857),(V2860));
+	VMR76(V2863);}
+	#undef base0
+}
+/*	local entry for function ANSI-LOOP::LOOP-BIND-BLOCK	*/
+
+static object LI105__LOOP_BIND_BLOCK__loop()
+{	 VMB77 VMS77 VMV77
+	if(((((object)VV[308])->s.s_dbind))==Cnil){
+	goto T7409;
+	}
+	goto T7408;
+	
+	goto T7409;
+T7409:;
+	if(((((object)VV[311])->s.s_dbind))==Cnil){
+	goto T7412;
+	}
+	goto T7408;
+	
+	goto T7412;
+T7412:;
+	if(((((object)VV[315])->s.s_dbind))==Cnil){
+	goto T7406;
+	}
+	goto T7408;
+T7408:;
+	{object V2864;
+	V2865= (/* COMMON-LISP::NREVERSE */(*LnkLI192)((((object)VV[308])->s.s_dbind)));
+	V2864= list(4,(V2865),(((object)VV[311])->s.s_dbind),(((object)VV[312])->s.s_dbind),(((object)VV[315])->s.s_dbind));
+	V2866= make_cons((V2864),(((object)VV[313])->s.s_dbind));
+	(((object)VV[313])->s.s_dbind)= (V2866);}
+	V2867= Cnil;
+	(((object)VV[308])->s.s_dbind)= (V2867);
+	V2868= Cnil;
+	(((object)VV[311])->s.s_dbind)= (V2868);
+	V2869= Cnil;
+	(((object)VV[312])->s.s_dbind)= (V2869);
+	V2870= Cnil;
+	(((object)VV[315])->s.s_dbind)= (V2870);
+	{object V2871 = Cnil;
+	VMR77(V2871);}
+	goto T7406;
+T7406:;
+	{object V2872 = Cnil;
+	VMR77(V2872);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-VARIABLE-P	*/
+
+static object LI106__LOOP_VARIABLE_P__loop(register object V2874)
+{	 VMB78 VMS78 VMV78
+	{register object V2875;
+	V2875= (((object)VV[313])->s.s_dbind);
+	goto T7426;
+T7426:;
+	if(((V2875))==Cnil){
+	goto T7432;
+	}
+	goto T7429;
+	
+	goto T7432;
+T7432:;
+	{object V2876 = Cnil;
+	VMR78(V2876);}
+	goto T7429;
+T7429:;
+	{object V2877;
+	{object V2879;
+	V2879= (V2875)->c.c_car;
+	V2877= V2879->c.c_car;}
+	{register object V2880;
+	V2880= (V2877);
+	goto T7446;
+T7446:;
+	if(((V2880))==Cnil){
+	goto T7448;
+	}
+	{object V2882;
+	V2882= (V2880)->c.c_car;
+	V2883= tp2(V2882);
+	if(!((V2883)==(0))){
+	goto T7459;
+	}
+	goto T7458;
+	
+	goto T7459;
+T7459:;
+	goto T7457;
+	
+	goto T7458;
+T7458:;
+	goto T7454;
+	
+	goto T7457;
+T7457:;
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[76]),((object)VV[363]),(V2882),((object)VV[364]),((object)VV[40]))));
+	goto T7453;
+	
+	goto T7454;
+T7454:;
+	goto T7453;
+T7453:;
+	if(((V2882))==Cnil){
+	goto T7465;
+	}
+	{object V2884;
+	V2884= V2882->c.c_car;
+	if(!(((V2874))==((V2884)))){
+	goto T7469;
+	}
+	goto T7464;
+	
+	goto T7469;
+T7469:;
+	goto T7462;
+	}
+	goto T7465;
+T7465:;
+	goto T7462;
+	
+	goto T7464;
+T7464:;
+	goto T7436;
+	
+	goto T7462;
+T7462:;}
+	{object V2885;
+	V2885= (V2880)->c.c_cdr;
+	V2880= (V2885);
+	goto T7446;
+	}
+	goto T7448;
+T7448:;
+	goto T7444;
+	}
+	goto T7444;
+T7444:;
+	if(((V2877))==Cnil){
+	goto T7442;
+	}
+	goto T7439;
+	
+	goto T7442;
+T7442:;
+	goto T7434;
+	
+	goto T7439;
+T7439:;
+	goto T7434;
+	}
+	goto T7436;
+T7436:;
+	{object V2887 = Ct;
+	VMR78(V2887);}
+	goto T7434;
+T7434:;
+	{object V2888;
+	V2888= (V2875)->c.c_cdr;
+	V2875= (V2888);}
+	goto T7426;
+	}
+}
+/*	local entry for function ANSI-LOOP::LOOP-MAKE-VARIABLE	*/
+
+static object LI107__LOOP_MAKE_VARIABLE__loop(object V2893,object V2894,object V2895,...)
+{	 VMB79 VMS79 VMV79
+	va_list ap;
+	va_start(ap,V2895);
+	{object V2896;
+	int8_t V2897;
+	int8_t V2898;
+	object V2899;
+	object V2900;
+	V2896= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V2896))==Cnil){
+	goto T7480;
+	}
+	V2897= -((char)fcall.argd);
+	goto T7479;
+	
+	goto T7480;
+T7480:;
+	V2897= fcall.argd;
+	goto T7479;
+T7479:;
+	V2898= (V2897)-(3);
+	V2899= Cnil;
+	if(((V2896))==Cnil){
+	goto T7486;
+	}
+	if(!((V2898)==(1))){
+	goto T7489;
+	}
+	V2898= 0;
+	V2899= va_arg(ap,object);
+	if(((V2899))==Cnil){
+	goto T7492;
+	}
+	goto T7485;
+	
+	goto T7492;
+T7492:;
+	goto T7485;
+	
+	goto T7489;
+T7489:;
+	goto T7485;
+	
+	goto T7486;
+T7486:;
+	goto T7485;
+T7485:;
+	if(!((V2898)>(0))){
+	goto T7498;
+	}
+	V2898= 0;
+	V2900= va_arg(ap,object);
+	goto T7484;
+	
+	goto T7498;
+T7498:;
+	if(((V2899))==Cnil){
+	goto T7503;
+	}
+	{object V2901;
+	V2901= (V2899)->c.c_car;
+	V2899= (V2899)->c.c_cdr;
+	V2900= (V2901);
+	goto T7484;
+	}
+	goto T7503;
+T7503:;
+	V2900= Cnil;
+	goto T7484;
+T7484:;
+	{object V2904;
+	V2904= (V2893);
+	if(((V2893))==Cnil){
+	goto T7513;
+	}
+	goto T7510;
+	
+	goto T7513;
+T7513:;
+	if(((V2894))==Cnil){
+	goto T7520;
+	}
+	goto T7518;
+	
+	goto T7520;
+T7520:;
+	goto T7515;
+	
+	goto T7518;
+T7518:;
+	{object V2905;
+	V2904= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[365])));
+	V2905= list(2,(V2904),(V2894));
+	V2906= make_cons((V2905),(((object)VV[308])->s.s_dbind));
+	(((object)VV[308])->s.s_dbind)= (V2906);}
+	{object V2907;
+	V2907= list(2,((object)VV[302]),(V2904));
+	V2908= make_cons((V2907),(((object)VV[311])->s.s_dbind));
+	(((object)VV[311])->s.s_dbind)= (V2908);
+	goto T7509;
+	}
+	goto T7515;
+T7515:;
+	goto T7509;
+	
+	goto T7510;
+T7510:;
+	if(((V2904))==Cnil){
+	goto T7533;
+	}
+	V2910= tp2((V2904));
+	if(!((V2910)==(0))){
+	goto T7536;
+	}
+	goto T7532;
+	
+	goto T7536;
+T7536:;
+	goto T7531;
+	
+	goto T7533;
+T7533:;
+	goto T7531;
+	
+	goto T7532;
+T7532:;
+	goto T7528;
+	
+	goto T7531;
+T7531:;
+	if(((V2900))==Cnil){
+	goto T7540;
+	}
+	{object V2912;
+	V2912= (((object)VV[307])->s.s_dbind);
+	{register fixnum V2913;
+	V2913= 1;
+	V2914= tp4((V2904));
+	switch(V2914){
+	case -1:
+	goto T7553;
+T7553:;
+	goto T7550;
+	
+	case 1:
+	goto T7554;
+T7554:;
+	case 2:
+	goto T7555;
+T7555:;
+	case 3:
+	goto T7556;
+T7556:;
+	case 4:
+	goto T7557;
+T7557:;
+	case 5:
+	goto T7558;
+T7558:;
+	case 6:
+	goto T7559;
+T7559:;
+	goto T7548;
+	
+	default:
+	goto T7560;
+T7560:;
+	goto T7550;
+	}
+	goto T7548;
+	
+	goto T7550;
+T7550:;
+	V2913= 0;
+	goto T7547;
+	
+	goto T7548;
+T7548:;
+	goto T7547;
+T7547:;
+	{register object V2915;
+	V2915= (V2912);
+	goto T7570;
+T7570:;
+	if(((V2915))==Cnil){
+	goto T7572;
+	}
+	{object V2917;
+	V2917= (V2915)->c.c_car;
+	switch(V2913){
+	case 0:
+	goto T7583;
+T7583:;
+	if(!(((V2904))==((V2917)))){
+	goto T7580;
+	}
+	goto T7581;
+	
+	case 1:
+	goto T7584;
+T7584:;
+	if(!(eql((V2904),(V2917)))){
+	goto T7580;
+	}
+	goto T7581;
+	}
+	goto T7580;
+	
+	goto T7581;
+T7581:;
+	goto T7578;
+	
+	goto T7580;
+T7580:;
+	goto T7576;
+	}
+	goto T7578;
+T7578:;
+	goto T7545;
+	
+	goto T7576;
+T7576:;
+	{object V2918;
+	V2918= (V2915)->c.c_cdr;
+	V2915= (V2918);
+	goto T7570;
+	}
+	goto T7572;
+T7572:;
+	goto T7568;
+	}
+	goto T7568;
+T7568:;
+	if(((V2912))==Cnil){
+	goto T7566;
+	}
+	goto T7563;
+	
+	goto T7566;
+T7566:;
+	goto T7543;
+	
+	goto T7563;
+T7563:;
+	goto T7543;
+	}}
+	goto T7545;
+T7545:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[366]),(V2904))));
+	goto T7539;
+	
+	goto T7543;
+T7543:;
+	V2921= make_cons((V2904),(((object)VV[307])->s.s_dbind));
+	(((object)VV[307])->s.s_dbind)= (V2921);
+	goto T7539;
+	
+	goto T7540;
+T7540:;
+	{object V2923;
+	V2923= (((object)VV[308])->s.s_dbind);
+	{register fixnum V2924;
+	V2924= 1;
+	V2925= tp4((V2904));
+	switch(V2925){
+	case -1:
+	goto T7600;
+T7600:;
+	goto T7597;
+	
+	case 1:
+	goto T7601;
+T7601:;
+	case 2:
+	goto T7602;
+T7602:;
+	case 3:
+	goto T7603;
+T7603:;
+	case 4:
+	goto T7604;
+T7604:;
+	case 5:
+	goto T7605;
+T7605:;
+	case 6:
+	goto T7606;
+T7606:;
+	goto T7595;
+	
+	default:
+	goto T7607;
+T7607:;
+	goto T7597;
+	}
+	goto T7595;
+	
+	goto T7597;
+T7597:;
+	V2924= 0;
+	goto T7594;
+	
+	goto T7595;
+T7595:;
+	goto T7594;
+T7594:;
+	{register object V2926;
+	V2926= (V2923);
+	goto T7617;
+T7617:;
+	if(((V2926))==Cnil){
+	goto T7619;
+	}
+	{object V2928;
+	V2928= (V2926)->c.c_car;
+	V2929= tp2(V2928);
+	if(!((V2929)==(0))){
+	goto T7630;
+	}
+	goto T7629;
+	
+	goto T7630;
+T7630:;
+	goto T7628;
+	
+	goto T7629;
+T7629:;
+	goto T7625;
+	
+	goto T7628;
+T7628:;
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[76]),((object)VV[367]),(V2928),((object)VV[368]),((object)VV[40]))));
+	goto T7624;
+	
+	goto T7625;
+T7625:;
+	goto T7624;
+T7624:;
+	if(((V2928))==Cnil){
+	goto T7636;
+	}
+	{object V2930;
+	V2930= V2928->c.c_car;
+	switch(V2924){
+	case 0:
+	goto T7643;
+T7643:;
+	if(!(((V2904))==((V2930)))){
+	goto T7640;
+	}
+	goto T7641;
+	
+	case 1:
+	goto T7644;
+T7644:;
+	if(!(eql((V2904),(V2930)))){
+	goto T7640;
+	}
+	goto T7641;
+	}
+	goto T7640;
+	
+	goto T7641;
+T7641:;
+	goto T7635;
+	
+	goto T7640;
+T7640:;
+	goto T7633;
+	}
+	goto T7636;
+T7636:;
+	goto T7633;
+	
+	goto T7635;
+T7635:;
+	goto T7592;
+	
+	goto T7633;
+T7633:;}
+	{object V2931;
+	V2931= (V2926)->c.c_cdr;
+	V2926= (V2931);
+	goto T7617;
+	}
+	goto T7619;
+T7619:;
+	goto T7615;
+	}
+	goto T7615;
+T7615:;
+	if(((V2923))==Cnil){
+	goto T7613;
+	}
+	goto T7610;
+	
+	goto T7613;
+T7613:;
+	goto T7590;
+	
+	goto T7610;
+T7610:;
+	goto T7590;
+	}}
+	goto T7592;
+T7592:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[369]),(V2904))));
+	goto T7539;
+	
+	goto T7590;
+T7590:;
+	goto T7539;
+T7539:;
+	if(((V2904))==Cnil){
+	goto T7655;
+	}
+	V2934= tp5((V2904));
+	switch(V2934){
+	case 19:
+	goto T7660;
+T7660:;
+	goto T7654;
+	
+	default:
+	goto T7661;
+T7661:;
+	goto T7653;
+	}
+	goto T7653;
+	
+	goto T7655;
+T7655:;
+	goto T7654;
+T7654:;
+	goto T7650;
+	
+	goto T7653;
+T7653:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[370]),(V2904))));
+	goto T7649;
+	
+	goto T7650;
+T7650:;
+	goto T7649;
+T7649:;
+	(void)((/* ANSI-LOOP::LOOP-DECLARE-VARIABLE */(*LnkLI218)((V2904),(V2895))));
+	{object V2935;
+	if(((V2894))==Cnil){
+	goto T7666;
+	}
+	V2936= (V2894);
+	goto T7665;
+	
+	goto T7666;
+T7666:;
+	V2936= (/* ANSI-LOOP::LOOP-TYPED-INIT */(*LnkLI173)((V2895)));
+	goto T7665;
+T7665:;
+	V2935= list(2,(V2904),(V2936));
+	V2937= make_cons((V2935),(((object)VV[308])->s.s_dbind));
+	(((object)VV[308])->s.s_dbind)= (V2937);
+	goto T7509;
+	}
+	goto T7528;
+T7528:;
+	if(((V2894))==Cnil){
+	goto T7670;
+	}
+	if(((((object)VV[183])->s.s_dbind))==Cnil){
+	goto T7673;
+	}
+	(void)((/* ANSI-LOOP::LOOP-DECLARE-VARIABLE */(*LnkLI218)((V2904),(V2895))));
+	{object V2938;
+	V2938= list(2,(V2904),(V2894));
+	V2939= make_cons((V2938),(((object)VV[308])->s.s_dbind));
+	(((object)VV[308])->s.s_dbind)= (V2939);
+	goto T7509;
+	}
+	goto T7673;
+T7673:;
+	{object V2940;
+	V2940= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[372])));
+	(void)((/* ANSI-LOOP::LOOP-DECLARE-VARIABLE */(*LnkLI218)((V2904),(V2895))));
+	{object V2941;
+	V2941= list(2,(V2940),(V2894));
+	V2942= make_cons((V2941),(((object)VV[308])->s.s_dbind));
+	(((object)VV[308])->s.s_dbind)= (V2942);}
+	V2943= listA(3,(V2904),(V2940),(((object)VV[312])->s.s_dbind));
+	(((object)VV[312])->s.s_dbind)= (V2943);
+	goto T7509;
+	}
+	goto T7670;
+T7670:;
+	{object V2944;
+	object V2945;
+	V2944= Cnil;
+	V2945= Cnil;
+	if(((V2895))==Cnil){
+	goto T7691;
+	}
+	V2946= tp2(V2895);
+	if(!((V2946)==(0))){
+	goto T7694;
+	}
+	goto T7690;
+	
+	goto T7694;
+T7694:;
+	goto T7689;
+	
+	goto T7691;
+T7691:;
+	goto T7689;
+	
+	goto T7690;
+T7690:;
+	goto T7686;
+	
+	goto T7689;
+T7689:;
+	V2945= (V2895);
+	V2944= (V2945);
+	goto T7685;
+	
+	goto T7686;
+T7686:;
+	V2944= V2895->c.c_car;
+	V2945= V2895->c.c_cdr;
+	goto T7685;
+T7685:;
+	V2947= (V2904)->c.c_car;
+	(void)((fcall.argd=4,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V2947),Cnil,(V2944),(V2900))));
+	V2949= (V2904)->c.c_cdr;
+	(void)((fcall.argd=4,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V2949),Cnil,(V2945),(V2900))));}
+	goto T7509;
+T7509:;
+	{object V2951 = (V2904);
+	VMR79(V2951);}}}
+	va_end(ap);
+}
+/*	local entry for function ANSI-LOOP::LOOP-MAKE-ITERATION-VARIABLE	*/
+
+static object LI108__LOOP_MAKE_ITERATION_VARIABLE__loop(object V2955,object V2956,object V2957)
+{	 VMB80 VMS80 VMV80
+	{object V2958 = (fcall.argd=4,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V2955),(V2956),(V2957),Ct));
+	VMR80(V2958);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-DECLARE-VARIABLE	*/
+
+static object LI109__LOOP_DECLARE_VARIABLE__loop(register object V2961,register object V2962)
+{	 VMB81 VMS81 VMV81
+	goto T7706;
+T7706:;
+	{register object V2963;
+	object V2964;
+	V2963= (V2961);
+	V2964= (V2962);
+	if(((V2963))==Cnil){
+	goto T7714;
+	}
+	goto T7711;
+	
+	goto T7714;
+T7714:;
+	goto T7710;
+	
+	goto T7711;
+T7711:;
+	if(((V2964))==Cnil){
+	goto T7719;
+	}
+	goto T7716;
+	
+	goto T7719;
+T7719:;
+	goto T7710;
+	
+	goto T7716;
+T7716:;
+	if(!(((V2964))==(Ct))){
+	goto T7708;
+	}
+	goto T7710;
+T7710:;
+	{object V2965 = Cnil;
+	VMR81(V2965);}
+	goto T7708;
+T7708:;
+	V2966= tp5(V2963);
+	switch(V2966){
+	case 19:
+	goto T7726;
+T7726:;
+	goto T7723;
+	
+	default:
+	goto T7727;
+T7727:;
+	goto T7721;
+	}
+	goto T7721;
+	
+	goto T7723;
+T7723:;
+	if(!(((V2964))==(Ct))){
+	goto T7734;
+	}
+	goto T7733;
+	
+	goto T7734;
+T7734:;
+	{object V2967;
+	V2967= (((object)VV[309])->s.s_dbind);
+	{register object V2968;
+	V2968= (V2967);
+	goto T7745;
+T7745:;
+	if(((V2968))==Cnil){
+	goto T7747;
+	}
+	{object V2970;
+	V2970= (V2968)->c.c_car;
+	if(!(((V2963))==((V2970)))){
+	goto T7755;
+	}
+	goto T7753;
+	
+	goto T7755;
+T7755:;
+	goto T7751;
+	}
+	goto T7753;
+T7753:;
+	goto T7733;
+	
+	goto T7751;
+T7751:;
+	{object V2971;
+	V2971= (V2968)->c.c_cdr;
+	V2968= (V2971);
+	goto T7745;
+	}
+	goto T7747;
+T7747:;
+	goto T7743;
+	}
+	goto T7743;
+T7743:;
+	if(((V2967))==Cnil){
+	goto T7741;
+	}
+	goto T7738;
+	
+	goto T7741;
+T7741:;
+	goto T7732;
+	
+	goto T7738;
+T7738:;
+	goto T7732;
+	}
+	goto T7733;
+T7733:;
+	goto T7729;
+	
+	goto T7732;
+T7732:;
+	{object V2973;
+	V2973= list(3,((object)VV[105]),(V2964),(V2963));
+	V2974= make_cons((V2973),(((object)VV[311])->s.s_dbind));
+	(((object)VV[311])->s.s_dbind)= (V2974);
+	{object V2975 = (((object)VV[311])->s.s_dbind);
+	VMR81(V2975);}}
+	goto T7729;
+T7729:;
+	{object V2976 = Cnil;
+	VMR81(V2976);}
+	goto T7721;
+T7721:;
+	V2977= tp2(V2963);
+	if(!((V2977)==(0))){
+	goto T7765;
+	}
+	goto T7764;
+	
+	goto T7765;
+T7765:;
+	goto T7762;
+	
+	goto T7764;
+T7764:;
+	V2978= tp2(V2964);
+	if(!((V2978)==(0))){
+	goto T7771;
+	}
+	goto T7770;
+	
+	goto T7771;
+T7771:;
+	goto T7768;
+	
+	goto T7770;
+T7770:;
+	V2979= V2963->c.c_car;
+	V2980= V2964->c.c_car;
+	(void)((/* ANSI-LOOP::LOOP-DECLARE-VARIABLE */(*LnkLI218)((V2979),(V2980))));
+	{object V2981;
+	object V2982;
+	V2981= V2963->c.c_cdr;
+	V2982= V2964->c.c_cdr;
+	V2961= (V2981);
+	V2962= (V2982);
+	goto T7706;
+	}
+	goto T7768;
+T7768:;
+	V2983= V2963->c.c_car;
+	(void)((/* ANSI-LOOP::LOOP-DECLARE-VARIABLE */(*LnkLI218)((V2983),(V2964))));
+	{object V2984;
+	object V2985;
+	V2984= V2963->c.c_cdr;
+	V2985= (V2964);
+	V2961= (V2984);
+	V2962= (V2985);
+	goto T7706;
+	}
+	goto T7762;
+T7762:;
+	{object V2986 = (fcall.argd=2,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[374]),(V2963)));
+	VMR81(V2986);}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-MAYBE-BIND-FORM	*/
+
+static object LI110__LOOP_MAYBE_BIND_FORM__loop(object V2989,object V2990)
+{	 VMB82 VMS82 VMV82
+	if(((/* ANSI-LOOP::LOOP-CONSTANTP */(*LnkLI220)((V2989))))==Cnil){
+	goto T7790;
+	}
+	{object V2991 = (V2989);
+	VMR82(V2991);}
+	goto T7790;
+T7790:;
+	V2992= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[376])));
+	{object V2993 = (fcall.argd=3,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V2992),(V2989),(V2990)));
+	VMR82(V2993);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-DO-IF	*/
+
+static object LI111__LOOP_DO_IF__loop(register object V2996,object V2997)
+{	 VMB83 VMS83 VMV83
+	{object V2998;
+	register object V2999;
+	register object V3000;
+	V2998= (/* ANSI-LOOP::LOOP-GET-FORM */(*LnkLI211)());
+	bds_bind(((object)VV[323]),Ct);
+	V2999= Cnil;
+	V3000= Ct;
+	{object V3001;
+	object V3002;
+	{register object V3003;
+	V3003= Cnil;
+	goto T7796;
+T7796:;
+	{object V3004;
+	object V3005;
+	{object V3006;
+	V3006= (((object)VV[257])->s.s_dbind);
+	V3004= V3006->c.c_car;}
+	bds_bind(((object)VV[317]),Cnil);
+	V3005= Cnil;
+	if(((V3004))==Cnil){
+	goto T7805;
+	}
+	V3007= tp5(V3004);
+	switch(V3007){
+	case 19:
+	goto T7810;
+T7810:;
+	goto T7804;
+	
+	default:
+	goto T7811;
+T7811:;
+	goto T7803;
+	}
+	goto T7803;
+	
+	goto T7805;
+T7805:;
+	goto T7804;
+T7804:;
+	goto T7800;
+	
+	goto T7803;
+T7803:;
+	(void)((fcall.argd=3,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[377]),(V3004),(V2996))));
+	bds_unwind1;
+	goto T7798;
+	
+	goto T7800;
+T7800:;
+	V3008= (((object)VV[257])->s.s_dbind);
+	(((object)VV[256])->s.s_dbind)= (V3008);
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	{object V3010;
+	V3010= (((object)VV[257])->s.s_dbind);
+	V3009= V3010->c.c_car;}
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V3009),((object)VV[378]))))==Cnil){
+	goto T7820;
+	}
+	if(((V3000))==Cnil){
+	goto T7817;
+	}
+	goto T7819;
+	
+	goto T7820;
+T7820:;
+	goto T7817;
+	
+	goto T7819;
+T7819:;
+	if(((V2999))==Cnil){
+	goto T7826;
+	}
+	V3012= (V2999);
+	goto T7825;
+	
+	goto T7826;
+T7826:;
+	V2999= (/* ANSI-LOOP::LOOP-WHEN-IT-VARIABLE */(*LnkLI221)());
+	V3012= (V2999);
+	goto T7825;
+T7825:;
+	{object V3014;
+	V3014= (((object)VV[257])->s.s_dbind);
+	V3013= V3014->c.c_cdr;}
+	V3011= make_cons((V3012),(V3013));
+	(((object)VV[257])->s.s_dbind)= (V3011);
+	goto T7816;
+	
+	goto T7817;
+T7817:;
+	goto T7816;
+T7816:;
+	{object V3016;
+	V3016= (((object)VV[304])->s.s_dbind);
+	V3015= STREF(object ,(V3016),0);}
+	V3005= (/* ANSI-LOOP::LOOP-LOOKUP-KEYWORD */(*LnkLI208)((V3004),(V3015)));
+	if(((V3005))==Cnil){
+	goto T7837;
+	}
+	goto T7834;
+	
+	goto T7837;
+T7837:;
+	goto T7833;
+	
+	goto T7834;
+T7834:;
+	{object V3017;
+	V3018= V3005->c.c_car;
+	V3017= ({register object _sym=(V3018);_sym->s.s_sfdef!=NOT_SPECIAL ? make_cons(sLspecial,make_fixnum((long)_sym->s.s_sfdef)) : (_sym->s.s_mflag ? make_cons(sSmacro,_sym->s.s_gfdef) : _sym->s.s_gfdef);});
+	V3020= tp4(V3017);
+	if(!((V3020)==(24))){
+	goto T7848;
+	}
+	goto T7847;
+	
+	goto T7848;
+T7848:;
+	goto T7845;
+	
+	goto T7847;
+T7847:;
+	V3019= (V3017);
+	goto T7844;
+	
+	goto T7845;
+T7845:;
+	V3019= (V3017)->s.s_gfdef;
+	goto T7844;
+T7844:;
+	V3021= V3005->c.c_cdr;
+	(void)(({fixnum _v=(fixnum)0;object _z,_f=((V3019)),_l=((V3021)),_ll=_l;
+        object _x4=Cnil,_x3=Cnil,_x2=Cnil,_x1=Cnil,_x0=Cnil;
+        char _m=(2-2),_q=_f->fun.fun_minarg>_m ? _f->fun.fun_minarg-_m : 0;
+        char _n=Rset && !_f->fun.fun_argd ? _q : -1;
+        fcall.fun=_f;fcall.valp=_v;fcall.argd=-(2-1);
+        switch (_n) {
+          case 5: if (_l==Cnil) {_n=-1;break;} _x4=_l->c.c_car;_l=_l->c.c_cdr;
+          case 4: if (_l==Cnil) {_n=-1;break;} _x3=_l->c.c_car;_l=_l->c.c_cdr;
+          case 3: if (_l==Cnil) {_n=-1;break;} _x2=_l->c.c_car;_l=_l->c.c_cdr;
+          case 2: if (_l==Cnil) {_n=-1;break;} _x1=_l->c.c_car;_l=_l->c.c_cdr;
+          case 1: if (_l==Cnil) {_n=-1;break;} _x0=_l->c.c_car;_l=_l->c.c_cdr;
+          case 0: if (_n+_m+(_l==Cnil ? 0 : 1)>_f->fun.fun_maxarg) _n=-1; else fcall.argd-=_n;
+          default: break;
+        }
+        switch (_n) {
+          case 5:  _z=_f->fun.fun_self(_x4,_x3,_x2,_x1,_x0,_l);break;
+          case 4:  _z=_f->fun.fun_self(_x3,_x2,_x1,_x0,_l);break;
+          case 3:  _z=_f->fun.fun_self(_x2,_x1,_x0,_l);break;
+          case 2:  _z=_f->fun.fun_self(_x1,_x0,_l);break;
+          case 1:  _z=_f->fun.fun_self(_x0,_l);break;
+          case 0:  _z=(_f->fun.fun_maxarg ? _f->fun.fun_self(_l) : _f->fun.fun_self());break;
+          default: _z=call_proc_cs2(_ll);break;
+        }
+        if (!(_f)->fun.fun_neval && !(_f)->fun.fun_vv) vs_top=_v ? (object *)_v : sup;
+        _z;}));}
+	if(((((object)VV[317])->s.s_dbind))==Cnil){
+	goto T7852;
+	}
+	goto T7831;
+	
+	goto T7852;
+T7852:;
+	goto T7833;
+T7833:;
+	(void)((fcall.argd=3,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[380]),(V3004),(V2996))));
+	bds_unwind1;
+	goto T7798;
+	
+	goto T7831;
+T7831:;
+	{object V3022;
+	register object V3023;
+	V3022= (((object)VV[317])->s.s_dbind);
+	V3023= (V3003);
+	{register object V3024;
+	V3024= Cnil;
+	{register object V3025;
+	V3025= (V3022);
+	goto T7858;
+T7858:;
+	if(((V3025))==Cnil){
+	goto T7860;
+	}
+	if(((V3024))==Cnil){
+	goto T7865;
+	}
+	V3023= (((V3024))->c.c_cdr=((V3023)),((V3024)));
+	goto T7864;
+	
+	goto T7865;
+T7865:;
+	goto T7864;
+T7864:;
+	V3024= (V3025);
+	{object V3027;
+	V3027= (V3025)->c.c_cdr;
+	V3025= (V3027);
+	goto T7858;
+	}
+	goto T7860;
+T7860:;
+	goto T7856;
+	}
+	goto T7856;
+T7856:;
+	if(((V3024))==Cnil){
+	goto T7873;
+	}
+	V3003= (((V3024))->c.c_cdr=((V3023)),((V3024)));
+	goto T7854;
+	
+	goto T7873;
+T7873:;
+	V3003= (V3023);}}
+	goto T7854;
+T7854:;
+	bds_unwind1;}
+	goto T7798;
+T7798:;
+	V3000= Cnil;
+	{object V3030;
+	V3030= (((object)VV[257])->s.s_dbind);
+	V3029= V3030->c.c_car;}
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V3029),((object)VV[381]))))==Cnil){
+	goto T7879;
+	}
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	goto T7878;
+	
+	goto T7879;
+T7879:;
+	if(((V3003)->c.c_cdr)==Cnil){
+	goto T7883;
+	}
+	if(((V3003))==Cnil){
+	goto T7887;
+	}
+	{register object V3034;
+	register object V3035;
+	V3034= (V3003)->c.c_cdr;
+	V3035= (((V3003))->c.c_cdr=(Cnil),((V3003)));
+	goto T7893;
+T7893:;
+	if(((V3034))==Cnil){
+	goto T7895;
+	}
+	{object V3036;
+	object V3037;
+	V3036= (V3034)->c.c_cdr;
+	V3037= (((V3034))->c.c_cdr=((V3035)),((V3034)));
+	V3034= (V3036);
+	V3035= (V3037);
+	goto T7893;
+	}
+	goto T7895;
+T7895:;
+	V3032= (V3035);
+	goto T7886;
+	}
+	goto T7887;
+T7887:;
+	V3032= Cnil;
+	goto T7886;
+T7886:;
+	V3001= make_cons(((object)VV[53]),(V3032));
+	goto T7794;
+	
+	goto T7883;
+T7883:;
+	V3001= (V3003)->c.c_car;
+	goto T7794;
+	
+	goto T7878;
+T7878:;
+	goto T7796;
+	}
+	goto T7794;
+T7794:;
+	{object V3041;
+	V3041= (((object)VV[257])->s.s_dbind);
+	V3040= V3041->c.c_car;}
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V3040),((object)VV[382]))))==Cnil){
+	goto T7906;
+	}
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	{register object V3043;
+	V3043= Cnil;
+	goto T7913;
+T7913:;
+	{object V3044;
+	object V3045;
+	{object V3046;
+	V3046= (((object)VV[257])->s.s_dbind);
+	V3044= V3046->c.c_car;}
+	bds_bind(((object)VV[317]),Cnil);
+	V3045= Cnil;
+	if(((V3044))==Cnil){
+	goto T7922;
+	}
+	V3047= tp5(V3044);
+	switch(V3047){
+	case 19:
+	goto T7927;
+T7927:;
+	goto T7921;
+	
+	default:
+	goto T7928;
+T7928:;
+	goto T7920;
+	}
+	goto T7920;
+	
+	goto T7922;
+T7922:;
+	goto T7921;
+T7921:;
+	goto T7917;
+	
+	goto T7920;
+T7920:;
+	(void)((fcall.argd=3,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[377]),(V3044),((object)VV[383]))));
+	bds_unwind1;
+	goto T7915;
+	
+	goto T7917;
+T7917:;
+	V3048= (((object)VV[257])->s.s_dbind);
+	(((object)VV[256])->s.s_dbind)= (V3048);
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	{object V3050;
+	V3050= (((object)VV[257])->s.s_dbind);
+	V3049= V3050->c.c_car;}
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V3049),((object)VV[378]))))==Cnil){
+	goto T7934;
+	}
+	goto T7933;
+	
+	goto T7934;
+T7934:;
+	goto T7933;
+T7933:;
+	{object V3052;
+	V3052= (((object)VV[304])->s.s_dbind);
+	V3051= STREF(object ,(V3052),0);}
+	V3045= (/* ANSI-LOOP::LOOP-LOOKUP-KEYWORD */(*LnkLI208)((V3044),(V3051)));
+	if(((V3045))==Cnil){
+	goto T7945;
+	}
+	goto T7942;
+	
+	goto T7945;
+T7945:;
+	goto T7941;
+	
+	goto T7942;
+T7942:;
+	{object V3053;
+	V3054= V3045->c.c_car;
+	V3053= ({register object _sym=(V3054);_sym->s.s_sfdef!=NOT_SPECIAL ? make_cons(sLspecial,make_fixnum((long)_sym->s.s_sfdef)) : (_sym->s.s_mflag ? make_cons(sSmacro,_sym->s.s_gfdef) : _sym->s.s_gfdef);});
+	V3056= tp4(V3053);
+	if(!((V3056)==(24))){
+	goto T7956;
+	}
+	goto T7955;
+	
+	goto T7956;
+T7956:;
+	goto T7953;
+	
+	goto T7955;
+T7955:;
+	V3055= (V3053);
+	goto T7952;
+	
+	goto T7953;
+T7953:;
+	V3055= (V3053)->s.s_gfdef;
+	goto T7952;
+T7952:;
+	V3057= V3045->c.c_cdr;
+	(void)(({fixnum _v=(fixnum)0;object _z,_f=((V3055)),_l=((V3057)),_ll=_l;
+        object _x4=Cnil,_x3=Cnil,_x2=Cnil,_x1=Cnil,_x0=Cnil;
+        char _m=(2-2),_q=_f->fun.fun_minarg>_m ? _f->fun.fun_minarg-_m : 0;
+        char _n=Rset && !_f->fun.fun_argd ? _q : -1;
+        fcall.fun=_f;fcall.valp=_v;fcall.argd=-(2-1);
+        switch (_n) {
+          case 5: if (_l==Cnil) {_n=-1;break;} _x4=_l->c.c_car;_l=_l->c.c_cdr;
+          case 4: if (_l==Cnil) {_n=-1;break;} _x3=_l->c.c_car;_l=_l->c.c_cdr;
+          case 3: if (_l==Cnil) {_n=-1;break;} _x2=_l->c.c_car;_l=_l->c.c_cdr;
+          case 2: if (_l==Cnil) {_n=-1;break;} _x1=_l->c.c_car;_l=_l->c.c_cdr;
+          case 1: if (_l==Cnil) {_n=-1;break;} _x0=_l->c.c_car;_l=_l->c.c_cdr;
+          case 0: if (_n+_m+(_l==Cnil ? 0 : 1)>_f->fun.fun_maxarg) _n=-1; else fcall.argd-=_n;
+          default: break;
+        }
+        switch (_n) {
+          case 5:  _z=_f->fun.fun_self(_x4,_x3,_x2,_x1,_x0,_l);break;
+          case 4:  _z=_f->fun.fun_self(_x3,_x2,_x1,_x0,_l);break;
+          case 3:  _z=_f->fun.fun_self(_x2,_x1,_x0,_l);break;
+          case 2:  _z=_f->fun.fun_self(_x1,_x0,_l);break;
+          case 1:  _z=_f->fun.fun_self(_x0,_l);break;
+          case 0:  _z=(_f->fun.fun_maxarg ? _f->fun.fun_self(_l) : _f->fun.fun_self());break;
+          default: _z=call_proc_cs2(_ll);break;
+        }
+        if (!(_f)->fun.fun_neval && !(_f)->fun.fun_vv) vs_top=_v ? (object *)_v : sup;
+        _z;}));}
+	if(((((object)VV[317])->s.s_dbind))==Cnil){
+	goto T7960;
+	}
+	goto T7939;
+	
+	goto T7960;
+T7960:;
+	goto T7941;
+T7941:;
+	(void)((fcall.argd=3,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[380]),(V3044),((object)VV[383]))));
+	bds_unwind1;
+	goto T7915;
+	
+	goto T7939;
+T7939:;
+	{object V3058;
+	register object V3059;
+	V3058= (((object)VV[317])->s.s_dbind);
+	V3059= (V3043);
+	{register object V3060;
+	V3060= Cnil;
+	{register object V3061;
+	V3061= (V3058);
+	goto T7966;
+T7966:;
+	if(((V3061))==Cnil){
+	goto T7968;
+	}
+	if(((V3060))==Cnil){
+	goto T7973;
+	}
+	V3059= (((V3060))->c.c_cdr=((V3059)),((V3060)));
+	goto T7972;
+	
+	goto T7973;
+T7973:;
+	goto T7972;
+T7972:;
+	V3060= (V3061);
+	{object V3063;
+	V3063= (V3061)->c.c_cdr;
+	V3061= (V3063);
+	goto T7966;
+	}
+	goto T7968;
+T7968:;
+	goto T7964;
+	}
+	goto T7964;
+T7964:;
+	if(((V3060))==Cnil){
+	goto T7981;
+	}
+	V3043= (((V3060))->c.c_cdr=((V3059)),((V3060)));
+	goto T7962;
+	
+	goto T7981;
+T7981:;
+	V3043= (V3059);}}
+	goto T7962;
+T7962:;
+	bds_unwind1;}
+	goto T7915;
+T7915:;
+	V3000= Cnil;
+	{object V3066;
+	V3066= (((object)VV[257])->s.s_dbind);
+	V3065= V3066->c.c_car;}
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V3065),((object)VV[384]))))==Cnil){
+	goto T7987;
+	}
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	goto T7986;
+	
+	goto T7987;
+T7987:;
+	if(((V3043)->c.c_cdr)==Cnil){
+	goto T7991;
+	}
+	if(((V3043))==Cnil){
+	goto T7995;
+	}
+	{register object V3070;
+	register object V3071;
+	V3070= (V3043)->c.c_cdr;
+	V3071= (((V3043))->c.c_cdr=(Cnil),((V3043)));
+	goto T8001;
+T8001:;
+	if(((V3070))==Cnil){
+	goto T8003;
+	}
+	{object V3072;
+	object V3073;
+	V3072= (V3070)->c.c_cdr;
+	V3073= (((V3070))->c.c_cdr=((V3071)),((V3070)));
+	V3070= (V3072);
+	V3071= (V3073);
+	goto T8001;
+	}
+	goto T8003;
+T8003:;
+	V3068= (V3071);
+	goto T7994;
+	}
+	goto T7995;
+T7995:;
+	V3068= Cnil;
+	goto T7994;
+T7994:;
+	V3042= make_cons(((object)VV[53]),(V3068));
+	goto T7911;
+	
+	goto T7991;
+T7991:;
+	V3042= (V3043)->c.c_car;
+	goto T7911;
+	
+	goto T7986;
+T7986:;
+	goto T7913;
+	}
+	goto T7911;
+T7911:;
+	V3002= make_cons((V3042),Cnil);
+	goto T7905;
+	
+	goto T7906;
+T7906:;
+	V3002= Cnil;
+	goto T7905;
+T7905:;
+	{object V3077;
+	V3077= (((object)VV[257])->s.s_dbind);
+	V3076= V3077->c.c_car;}
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V3076),((object)VV[385]))))==Cnil){
+	goto T8014;
+	}
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	goto T8013;
+	
+	goto T8014;
+T8014:;
+	goto T8013;
+T8013:;
+	if(((V2999))==Cnil){
+	goto T8019;
+	}
+	V2998= list(3,((object)VV[47]),(V2999),(V2998));
+	goto T8018;
+	
+	goto T8019;
+T8019:;
+	goto T8018;
+T8018:;
+	if(((V2997))==Cnil){
+	goto T8024;
+	}
+	V3078= list(2,((object)VV[124]),(V2998));
+	goto T8023;
+	
+	goto T8024;
+T8024:;
+	V3078= (V2998);
+	goto T8023;
+T8023:;
+	V3079= listA(4,((object)VV[240]),(V3078),(V3001),(V3002));
+	{object V3080 = (/* ANSI-LOOP::LOOP-PSEUDO-BODY */(*LnkLI213)((V3079)));
+	bds_unwind1;
+	VMR83(V3080);}}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-DO-INITIALLY	*/
+
+static object LI112__LOOP_DO_INITIALLY__loop()
+{	 VMB84 VMS84 VMV84
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-DISALLOW-CONDITIONAL */(*LnkLI222)(((object)VV[387]))));
+	{object V3081;
+	V3081= (/* ANSI-LOOP::LOOP-GET-PROGN */(*LnkLI223)());
+	V3082= make_cons((V3081),(((object)VV[314])->s.s_dbind));
+	(((object)VV[314])->s.s_dbind)= (V3082);
+	{object V3083 = (((object)VV[314])->s.s_dbind);
+	VMR84(V3083);}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-DO-FINALLY	*/
+
+static object LI113__LOOP_DO_FINALLY__loop()
+{	 VMB85 VMS85 VMV85
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-DISALLOW-CONDITIONAL */(*LnkLI222)(((object)VV[389]))));
+	{object V3084;
+	V3084= (/* ANSI-LOOP::LOOP-GET-PROGN */(*LnkLI223)());
+	V3085= make_cons((V3084),(((object)VV[320])->s.s_dbind));
+	(((object)VV[320])->s.s_dbind)= (V3085);
+	{object V3086 = (((object)VV[320])->s.s_dbind);
+	VMR85(V3086);}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-DO-DO	*/
+
+static object LI114__LOOP_DO_DO__loop()
+{	 VMB86 VMS86 VMV86
+	V3087= (/* ANSI-LOOP::LOOP-GET-PROGN */(*LnkLI223)());
+	{object V3088 = (/* ANSI-LOOP::LOOP-EMIT-BODY */(*LnkLI224)((V3087)));
+	VMR86(V3088);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-DO-NAMED	*/
+
+static object LI115__LOOP_DO_NAMED__loop()
+{	 VMB87 VMS87 VMV87
+	{object V3089;
+	V3089= (/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)());
+	if(((V3089))==Cnil){
+	goto T8040;
+	}
+	V3090= tp5(V3089);
+	switch(V3090){
+	case 19:
+	goto T8045;
+T8045:;
+	goto T8039;
+	
+	default:
+	goto T8046;
+T8046:;
+	goto T8038;
+	}
+	goto T8038;
+	
+	goto T8040;
+T8040:;
+	goto T8039;
+T8039:;
+	goto T8035;
+	
+	goto T8038;
+T8038:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[391]),(V3089))));
+	goto T8034;
+	
+	goto T8035;
+T8035:;
+	goto T8034;
+T8034:;
+	if(((((object)VV[316])->s.s_dbind))==Cnil){
+	goto T8052;
+	}
+	goto T8051;
+	
+	goto T8052;
+T8052:;
+	if(((((object)VV[317])->s.s_dbind))==Cnil){
+	goto T8055;
+	}
+	goto T8051;
+	
+	goto T8055;
+T8055:;
+	if(((((object)VV[321])->s.s_dbind))==Cnil){
+	goto T8058;
+	}
+	goto T8051;
+	
+	goto T8058;
+T8058:;
+	if(((((object)VV[323])->s.s_dbind))==Cnil){
+	goto T8049;
+	}
+	goto T8051;
+T8051:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[392]),(V3089))));
+	goto T8048;
+	
+	goto T8049;
+T8049:;
+	goto T8048;
+T8048:;
+	if(((((object)VV[326])->s.s_dbind))==Cnil){
+	goto T8062;
+	}
+	{object V3092;
+	V3092= (((object)VV[326])->s.s_dbind);
+	V3091= V3092->c.c_car;}
+	(void)((fcall.argd=3,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[393]),(V3091),(V3089))));
+	goto T8061;
+	
+	goto T8062;
+T8062:;
+	goto T8061;
+T8061:;
+	V3093= list(2,(V3089),Cnil);
+	(((object)VV[326])->s.s_dbind)= (V3093);
+	{object V3094 = (((object)VV[326])->s.s_dbind);
+	VMR87(V3094);}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-DO-RETURN	*/
+
+static object LI116__LOOP_DO_RETURN__loop()
+{	 VMB88 VMS88 VMV88
+	V3095= (/* ANSI-LOOP::LOOP-GET-FORM */(*LnkLI211)());
+	V3096= (/* ANSI-LOOP::LOOP-CONSTRUCT-RETURN */(*LnkLI214)((V3095)));
+	{object V3097 = (/* ANSI-LOOP::LOOP-PSEUDO-BODY */(*LnkLI213)((V3096)));
+	VMR88(V3097);}
+}
+/*	local entry for function ANSI-LOOP::MAKE-LOOP-COLLECTOR	*/
+
+static object LI117__MAKE_LOOP_COLLECTOR__loop(object V3099,...)
+{	 VMB89 VMS89 VMV89
+	va_list ap;
+	va_start(ap,V3099);
+	{register object V3100;
+	object V3101;
+	register object V3102;
+	object V3103;
+	register object V3104;
+	object V3105;
+	register object V3106;
+	object V3107;
+	register object V3108;
+	object V3109;
+	register object V3110;
+	object V3111;
+	register object V3112;
+	register object V3113;
+	int8_t V3114;
+	register int8_t V3115;
+	register object V3116;
+	register object V3117;
+	object V3118;
+	register object V3119;
+	object V3120;
+	object V3121;
+	object V3122;
+	object V3123;
+	object V3124;
+	object V3125;
+	object V3126;
+	object V3127;
+	V3100= Cnil;
+	V3101= Cnil;
+	V3102= Cnil;
+	V3103= Cnil;
+	V3104= Cnil;
+	V3105= Cnil;
+	V3106= Cnil;
+	V3107= Cnil;
+	V3108= Cnil;
+	V3109= Cnil;
+	V3110= Cnil;
+	V3111= Cnil;
+	V3112= Ct;
+	V3113= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V3113))==Cnil){
+	goto T8069;
+	}
+	V3114= -((char)fcall.argd);
+	goto T8068;
+	
+	goto T8069;
+T8069:;
+	V3114= fcall.argd;
+	goto T8068;
+T8068:;
+	V3115= (V3114)-(0);
+	V3116= Cnil;
+	V3117= Cnil;
+	V3118= Cnil;
+	V3119= Cnil;
+	V3120= Cnil;
+	V3121= Cnil;
+	{register object V3128;
+	register object V3129;
+	V3128= Cnil;
+	V3129= Cnil;
+	goto T8076;
+T8076:;
+	{object V3130;
+	if(((V3113))==Cnil){
+	goto T8086;
+	}
+	if(!((V3115)==(1))){
+	goto T8089;
+	}
+	V3115= 0;
+	if(((V3112))==Cnil){
+	goto T8095;
+	}
+	V3112= Cnil;
+	V3116= (V3099);
+	goto T8092;
+	
+	goto T8095;
+T8095:;
+	V3116= va_arg(ap,object);
+	goto T8092;
+T8092:;
+	V3130= (V3116);
+	goto T8085;
+	
+	goto T8089;
+T8089:;
+	V3130= Cnil;
+	goto T8085;
+	
+	goto T8086;
+T8086:;
+	V3130= Cnil;
+	goto T8085;
+T8085:;
+	if(((V3130))==Cnil){
+	goto T8100;
+	}
+	goto T8084;
+	
+	goto T8100;
+T8100:;
+	{object V3131;
+	V3131= ((V3115)>(0)?Ct:Cnil);
+	if(((V3131))==Cnil){
+	goto T8104;
+	}
+	goto T8084;
+	
+	goto T8104;
+T8104:;
+	if(((V3116))==Cnil){
+	goto T8107;
+	}
+	goto T8084;
+	
+	goto T8107;
+T8107:;
+	goto T8083;
+	}}
+	goto T8084;
+T8084:;
+	goto T8081;
+	
+	goto T8083;
+T8083:;
+	goto T8078;
+	
+	goto T8081;
+T8081:;
+	if(((V3113))==Cnil){
+	goto T8113;
+	}
+	if(!((V3115)==(1))){
+	goto T8116;
+	}
+	V3115= 0;
+	if(((V3112))==Cnil){
+	goto T8125;
+	}
+	V3112= Cnil;
+	V3116= (V3099);
+	goto T8122;
+	
+	goto T8125;
+T8125:;
+	V3116= va_arg(ap,object);
+	goto T8122;
+T8122:;
+	if(((V3116))==Cnil){
+	goto T8119;
+	}
+	goto T8112;
+	
+	goto T8119;
+T8119:;
+	goto T8112;
+	
+	goto T8116;
+T8116:;
+	goto T8112;
+	
+	goto T8113;
+T8113:;
+	goto T8112;
+T8112:;
+	if(!((V3115)>(0))){
+	goto T8130;
+	}
+	V3115= (V3115)-(1);
+	if(((V3112))==Cnil){
+	goto T8135;
+	}
+	V3112= Cnil;
+	V3128= (V3099);
+	goto T8111;
+	
+	goto T8135;
+T8135:;
+	V3128= va_arg(ap,object);
+	goto T8111;
+	
+	goto T8130;
+T8130:;
+	if(((V3116))==Cnil){
+	goto T8140;
+	}
+	{object V3132;
+	V3132= (V3116)->c.c_car;
+	V3116= (V3116)->c.c_cdr;
+	V3128= (V3132);
+	goto T8111;
+	}
+	goto T8140;
+T8140:;
+	V3128= Cnil;
+	goto T8111;
+T8111:;
+	if(((V3113))==Cnil){
+	goto T8148;
+	}
+	if(!((V3115)==(1))){
+	goto T8151;
+	}
+	V3115= 0;
+	if(((V3112))==Cnil){
+	goto T8160;
+	}
+	V3112= Cnil;
+	V3116= (V3099);
+	goto T8157;
+	
+	goto T8160;
+T8160:;
+	V3116= va_arg(ap,object);
+	goto T8157;
+T8157:;
+	if(((V3116))==Cnil){
+	goto T8154;
+	}
+	goto T8147;
+	
+	goto T8154;
+T8154:;
+	goto T8147;
+	
+	goto T8151;
+T8151:;
+	goto T8147;
+	
+	goto T8148;
+T8148:;
+	goto T8147;
+T8147:;
+	if(!((V3115)>(0))){
+	goto T8165;
+	}
+	V3115= (V3115)-(1);
+	if(((V3112))==Cnil){
+	goto T8170;
+	}
+	V3112= Cnil;
+	V3129= (V3099);
+	goto T8146;
+	
+	goto T8170;
+T8170:;
+	V3129= va_arg(ap,object);
+	goto T8146;
+	
+	goto T8165;
+T8165:;
+	if(((V3116))==Cnil){
+	goto T8175;
+	}
+	{object V3135;
+	V3135= (V3116)->c.c_car;
+	V3116= (V3116)->c.c_cdr;
+	V3129= (V3135);
+	goto T8146;
+	}
+	goto T8175;
+T8175:;
+	V3138= make_cons((V3128),Cnil);
+	V3129= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[394]),((object)VV[59]),((object)VV[395]),(V3138)));
+	goto T8146;
+T8146:;
+	if(!(((V3128))==(((object)VV[396])))){
+	goto T8182;
+	}
+	if(((V3100))==Cnil){
+	goto T8188;
+	}
+	goto T8185;
+	
+	goto T8188;
+T8188:;
+	V3101= (V3129);
+	V3100= Ct;
+	goto T8181;
+	
+	goto T8185;
+T8185:;
+	goto T8181;
+	
+	goto T8182;
+T8182:;
+	if(!(((V3128))==(((object)VV[397])))){
+	goto T8193;
+	}
+	if(((V3102))==Cnil){
+	goto T8199;
+	}
+	goto T8196;
+	
+	goto T8199;
+T8199:;
+	V3103= (V3129);
+	V3102= Ct;
+	goto T8181;
+	
+	goto T8196;
+T8196:;
+	goto T8181;
+	
+	goto T8193;
+T8193:;
+	if(!(((V3128))==(((object)VV[398])))){
+	goto T8204;
+	}
+	if(((V3104))==Cnil){
+	goto T8210;
+	}
+	goto T8207;
+	
+	goto T8210;
+T8210:;
+	V3105= (V3129);
+	V3104= Ct;
+	goto T8181;
+	
+	goto T8207;
+T8207:;
+	goto T8181;
+	
+	goto T8204;
+T8204:;
+	if(!(((V3128))==(((object)VV[399])))){
+	goto T8215;
+	}
+	if(((V3106))==Cnil){
+	goto T8221;
+	}
+	goto T8218;
+	
+	goto T8221;
+T8221:;
+	V3107= (V3129);
+	V3106= Ct;
+	goto T8181;
+	
+	goto T8218;
+T8218:;
+	goto T8181;
+	
+	goto T8215;
+T8215:;
+	if(!(((V3128))==(((object)VV[400])))){
+	goto T8226;
+	}
+	if(((V3108))==Cnil){
+	goto T8232;
+	}
+	goto T8229;
+	
+	goto T8232;
+T8232:;
+	V3109= (V3129);
+	V3108= Ct;
+	goto T8181;
+	
+	goto T8229;
+T8229:;
+	goto T8181;
+	
+	goto T8226;
+T8226:;
+	if(!(((V3128))==(((object)VV[401])))){
+	goto T8237;
+	}
+	if(((V3110))==Cnil){
+	goto T8243;
+	}
+	goto T8240;
+	
+	goto T8243;
+T8243:;
+	V3111= (V3129);
+	V3110= Ct;
+	goto T8181;
+	
+	goto T8240;
+T8240:;
+	goto T8181;
+	
+	goto T8237;
+T8237:;
+	if(!(((V3128))==(((object)VV[67])))){
+	goto T8248;
+	}
+	if(((V3117))==Cnil){
+	goto T8254;
+	}
+	goto T8251;
+	
+	goto T8254;
+T8254:;
+	V3118= (V3129);
+	V3117= Ct;
+	goto T8181;
+	
+	goto T8251;
+T8251:;
+	goto T8181;
+	
+	goto T8248;
+T8248:;
+	if(((V3119))==Cnil){
+	goto T8262;
+	}
+	goto T8259;
+	
+	goto T8262;
+T8262:;
+	V3120= (V3129);
+	V3119= Ct;
+	V3121= (V3128);
+	goto T8181;
+	
+	goto T8259;
+T8259:;
+	goto T8181;
+T8181:;
+	goto T8076;
+	
+	goto T8078;
+T8078:;
+	goto T8074;
+	}
+	goto T8074;
+T8074:;
+	if(((V3100))==Cnil){
+	goto T8271;
+	}
+	V3122= (V3101);
+	goto T8073;
+	
+	goto T8271;
+T8271:;
+	V3122= Cnil;
+	goto T8073;
+T8073:;
+	if(((V3102))==Cnil){
+	goto T8275;
+	}
+	V3123= (V3103);
+	goto T8274;
+	
+	goto T8275;
+T8275:;
+	V3123= Cnil;
+	goto T8274;
+T8274:;
+	if(((V3104))==Cnil){
+	goto T8279;
+	}
+	V3124= (V3105);
+	goto T8278;
+	
+	goto T8279;
+T8279:;
+	V3124= Cnil;
+	goto T8278;
+T8278:;
+	if(((V3106))==Cnil){
+	goto T8283;
+	}
+	V3125= (V3107);
+	goto T8282;
+	
+	goto T8283;
+T8283:;
+	V3125= Cnil;
+	goto T8282;
+T8282:;
+	if(((V3108))==Cnil){
+	goto T8287;
+	}
+	V3126= (V3109);
+	goto T8286;
+	
+	goto T8287;
+T8287:;
+	V3126= Cnil;
+	goto T8286;
+T8286:;
+	if(((V3110))==Cnil){
+	goto T8291;
+	}
+	V3127= (V3111);
+	goto T8290;
+	
+	goto T8291;
+T8291:;
+	V3127= Cnil;
+	goto T8290;
+T8290:;
+	if(((V3118))==Cnil){
+	goto T8298;
+	}
+	goto T8295;
+	
+	goto T8298;
+T8298:;
+	if(((V3119))==Cnil){
+	goto T8300;
+	}
+	V3139= list(2,(V3121),(V3120));
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[402]),((object)VV[69]),((object)VV[403]),(V3139))));
+	goto T8294;
+	
+	goto T8300;
+T8300:;
+	goto T8294;
+	
+	goto T8295;
+T8295:;
+	goto T8294;
+T8294:;
+	{object V3140 = (fcall.fun=((object)VV[71])->s.s_gfdef,fcall.argd=7,/* SYSTEM::MAKE-STRUCTURE */(*LnkLI164)(((object)VV[404]),(V3122),(V3123),(V3124),(V3125),(V3126),(V3127)));
+	VMR89(V3140);}}
+	va_end(ap);
+}
+/*	local entry for function ANSI-LOOP::LOOP-COLLECTOR-NAME	*/
+
+static object LI118__LOOP_COLLECTOR_NAME__loop(object V3142)
+{	 VMB90 VMS90 VMV90
+	V3143= tp6(V3142);
+	if(!((V3143)==((fixnum)544))){
+	goto T8313;
+	}
+	goto T8312;
+	
+	goto T8313;
+T8313:;
+	goto T8310;
+	
+	goto T8312;
+T8312:;
+	{object V3144;
+	{fixnum V3145;
+	V3145= ((fixnum)V3142);
+	V3144= ((object*)V3145)[(fixnum)1];}
+	{fixnum V3147;
+	{fixnum V3148;
+	V3148= ((fixnum)V3144);
+	V3147= ((fixnum*)V3148)[(fixnum)2];}
+	V3146= ((object*)V3147)[(fixnum)0];}
+	if(!(((V3146))==(((object)VV[404])))){
+	goto T8318;
+	}
+	goto T8309;
+	
+	goto T8318;
+T8318:;
+	{register object V3149;
+	{fixnum V3150;
+	{fixnum V3151;
+	V3151= ((fixnum)V3144);
+	V3150= ((fixnum*)V3151)[(fixnum)2];}
+	V3149= ((object*)V3150)[(fixnum)4];}
+	goto T8328;
+T8328:;
+	if(((V3149))==Cnil){
+	goto T8330;
+	}
+	{fixnum V3154;
+	{fixnum V3155;
+	V3155= ((fixnum)(V3149));
+	V3154= ((fixnum*)V3155)[(fixnum)2];}
+	V3152= ((object*)V3154)[(fixnum)0];}
+	if(!(((V3152))==(((object)VV[404])))){
+	goto T8332;
+	}
+	goto T8309;
+	
+	goto T8332;
+T8332:;
+	{object V3156;
+	{fixnum V3158;
+	{fixnum V3159;
+	V3159= ((fixnum)(V3149));
+	V3158= ((fixnum*)V3159)[(fixnum)2];}
+	V3156= ((object*)V3158)[(fixnum)4];}
+	V3149= (V3156);
+	goto T8328;
+	}
+	goto T8330;
+T8330:;
+	goto T8308;
+	}}
+	goto T8310;
+T8310:;
+	goto T8308;
+	
+	goto T8309;
+T8309:;
+	goto T8307;
+	
+	goto T8308;
+T8308:;
+	goto T8305;
+	
+	goto T8307;
+T8307:;
+	goto T8304;
+	
+	goto T8305;
+T8305:;
+	V3142= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V3142),((object)VV[404]),Cnil));
+	goto T8304;
+T8304:;
+	{object V3160 = STREF(object ,(V3142),0);
+	VMR90(V3160);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-COLLECTOR-CLASS	*/
+
+static object LI119__LOOP_COLLECTOR_CLASS__loop(object V3162)
+{	 VMB91 VMS91 VMV91
+	V3163= tp6(V3162);
+	if(!((V3163)==((fixnum)544))){
+	goto T8354;
+	}
+	goto T8353;
+	
+	goto T8354;
+T8354:;
+	goto T8351;
+	
+	goto T8353;
+T8353:;
+	{object V3164;
+	{fixnum V3165;
+	V3165= ((fixnum)V3162);
+	V3164= ((object*)V3165)[(fixnum)1];}
+	{fixnum V3167;
+	{fixnum V3168;
+	V3168= ((fixnum)V3164);
+	V3167= ((fixnum*)V3168)[(fixnum)2];}
+	V3166= ((object*)V3167)[(fixnum)0];}
+	if(!(((V3166))==(((object)VV[404])))){
+	goto T8359;
+	}
+	goto T8350;
+	
+	goto T8359;
+T8359:;
+	{register object V3169;
+	{fixnum V3170;
+	{fixnum V3171;
+	V3171= ((fixnum)V3164);
+	V3170= ((fixnum*)V3171)[(fixnum)2];}
+	V3169= ((object*)V3170)[(fixnum)4];}
+	goto T8369;
+T8369:;
+	if(((V3169))==Cnil){
+	goto T8371;
+	}
+	{fixnum V3174;
+	{fixnum V3175;
+	V3175= ((fixnum)(V3169));
+	V3174= ((fixnum*)V3175)[(fixnum)2];}
+	V3172= ((object*)V3174)[(fixnum)0];}
+	if(!(((V3172))==(((object)VV[404])))){
+	goto T8373;
+	}
+	goto T8350;
+	
+	goto T8373;
+T8373:;
+	{object V3176;
+	{fixnum V3178;
+	{fixnum V3179;
+	V3179= ((fixnum)(V3169));
+	V3178= ((fixnum*)V3179)[(fixnum)2];}
+	V3176= ((object*)V3178)[(fixnum)4];}
+	V3169= (V3176);
+	goto T8369;
+	}
+	goto T8371;
+T8371:;
+	goto T8349;
+	}}
+	goto T8351;
+T8351:;
+	goto T8349;
+	
+	goto T8350;
+T8350:;
+	goto T8348;
+	
+	goto T8349;
+T8349:;
+	goto T8346;
+	
+	goto T8348;
+T8348:;
+	goto T8345;
+	
+	goto T8346;
+T8346:;
+	V3162= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V3162),((object)VV[404]),Cnil));
+	goto T8345;
+T8345:;
+	{object V3180 = STREF(object ,(V3162),8);
+	VMR91(V3180);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-COLLECTOR-HISTORY	*/
+
+static object LI120__LOOP_COLLECTOR_HISTORY__loop(object V3182)
+{	 VMB92 VMS92 VMV92
+	V3183= tp6(V3182);
+	if(!((V3183)==((fixnum)544))){
+	goto T8395;
+	}
+	goto T8394;
+	
+	goto T8395;
+T8395:;
+	goto T8392;
+	
+	goto T8394;
+T8394:;
+	{object V3184;
+	{fixnum V3185;
+	V3185= ((fixnum)V3182);
+	V3184= ((object*)V3185)[(fixnum)1];}
+	{fixnum V3187;
+	{fixnum V3188;
+	V3188= ((fixnum)V3184);
+	V3187= ((fixnum*)V3188)[(fixnum)2];}
+	V3186= ((object*)V3187)[(fixnum)0];}
+	if(!(((V3186))==(((object)VV[404])))){
+	goto T8400;
+	}
+	goto T8391;
+	
+	goto T8400;
+T8400:;
+	{register object V3189;
+	{fixnum V3190;
+	{fixnum V3191;
+	V3191= ((fixnum)V3184);
+	V3190= ((fixnum*)V3191)[(fixnum)2];}
+	V3189= ((object*)V3190)[(fixnum)4];}
+	goto T8410;
+T8410:;
+	if(((V3189))==Cnil){
+	goto T8412;
+	}
+	{fixnum V3194;
+	{fixnum V3195;
+	V3195= ((fixnum)(V3189));
+	V3194= ((fixnum*)V3195)[(fixnum)2];}
+	V3192= ((object*)V3194)[(fixnum)0];}
+	if(!(((V3192))==(((object)VV[404])))){
+	goto T8414;
+	}
+	goto T8391;
+	
+	goto T8414;
+T8414:;
+	{object V3196;
+	{fixnum V3198;
+	{fixnum V3199;
+	V3199= ((fixnum)(V3189));
+	V3198= ((fixnum*)V3199)[(fixnum)2];}
+	V3196= ((object*)V3198)[(fixnum)4];}
+	V3189= (V3196);
+	goto T8410;
+	}
+	goto T8412;
+T8412:;
+	goto T8390;
+	}}
+	goto T8392;
+T8392:;
+	goto T8390;
+	
+	goto T8391;
+T8391:;
+	goto T8389;
+	
+	goto T8390;
+T8390:;
+	goto T8387;
+	
+	goto T8389;
+T8389:;
+	goto T8386;
+	
+	goto T8387;
+T8387:;
+	V3182= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V3182),((object)VV[404]),Cnil));
+	goto T8386;
+T8386:;
+	{object V3200 = STREF(object ,(V3182),16);
+	VMR92(V3200);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-COLLECTOR-TEMPVARS	*/
+
+static object LI121__LOOP_COLLECTOR_TEMPVARS__loop(object V3202)
+{	 VMB93 VMS93 VMV93
+	V3203= tp6(V3202);
+	if(!((V3203)==((fixnum)544))){
+	goto T8436;
+	}
+	goto T8435;
+	
+	goto T8436;
+T8436:;
+	goto T8433;
+	
+	goto T8435;
+T8435:;
+	{object V3204;
+	{fixnum V3205;
+	V3205= ((fixnum)V3202);
+	V3204= ((object*)V3205)[(fixnum)1];}
+	{fixnum V3207;
+	{fixnum V3208;
+	V3208= ((fixnum)V3204);
+	V3207= ((fixnum*)V3208)[(fixnum)2];}
+	V3206= ((object*)V3207)[(fixnum)0];}
+	if(!(((V3206))==(((object)VV[404])))){
+	goto T8441;
+	}
+	goto T8432;
+	
+	goto T8441;
+T8441:;
+	{register object V3209;
+	{fixnum V3210;
+	{fixnum V3211;
+	V3211= ((fixnum)V3204);
+	V3210= ((fixnum*)V3211)[(fixnum)2];}
+	V3209= ((object*)V3210)[(fixnum)4];}
+	goto T8451;
+T8451:;
+	if(((V3209))==Cnil){
+	goto T8453;
+	}
+	{fixnum V3214;
+	{fixnum V3215;
+	V3215= ((fixnum)(V3209));
+	V3214= ((fixnum*)V3215)[(fixnum)2];}
+	V3212= ((object*)V3214)[(fixnum)0];}
+	if(!(((V3212))==(((object)VV[404])))){
+	goto T8455;
+	}
+	goto T8432;
+	
+	goto T8455;
+T8455:;
+	{object V3216;
+	{fixnum V3218;
+	{fixnum V3219;
+	V3219= ((fixnum)(V3209));
+	V3218= ((fixnum*)V3219)[(fixnum)2];}
+	V3216= ((object*)V3218)[(fixnum)4];}
+	V3209= (V3216);
+	goto T8451;
+	}
+	goto T8453;
+T8453:;
+	goto T8431;
+	}}
+	goto T8433;
+T8433:;
+	goto T8431;
+	
+	goto T8432;
+T8432:;
+	goto T8430;
+	
+	goto T8431;
+T8431:;
+	goto T8428;
+	
+	goto T8430;
+T8430:;
+	goto T8427;
+	
+	goto T8428;
+T8428:;
+	V3202= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V3202),((object)VV[404]),Cnil));
+	goto T8427;
+T8427:;
+	{object V3220 = STREF(object ,(V3202),24);
+	VMR93(V3220);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-COLLECTOR-DTYPE	*/
+
+static object LI122__LOOP_COLLECTOR_DTYPE__loop(object V3222)
+{	 VMB94 VMS94 VMV94
+	V3223= tp6(V3222);
+	if(!((V3223)==((fixnum)544))){
+	goto T8477;
+	}
+	goto T8476;
+	
+	goto T8477;
+T8477:;
+	goto T8474;
+	
+	goto T8476;
+T8476:;
+	{object V3224;
+	{fixnum V3225;
+	V3225= ((fixnum)V3222);
+	V3224= ((object*)V3225)[(fixnum)1];}
+	{fixnum V3227;
+	{fixnum V3228;
+	V3228= ((fixnum)V3224);
+	V3227= ((fixnum*)V3228)[(fixnum)2];}
+	V3226= ((object*)V3227)[(fixnum)0];}
+	if(!(((V3226))==(((object)VV[404])))){
+	goto T8482;
+	}
+	goto T8473;
+	
+	goto T8482;
+T8482:;
+	{register object V3229;
+	{fixnum V3230;
+	{fixnum V3231;
+	V3231= ((fixnum)V3224);
+	V3230= ((fixnum*)V3231)[(fixnum)2];}
+	V3229= ((object*)V3230)[(fixnum)4];}
+	goto T8492;
+T8492:;
+	if(((V3229))==Cnil){
+	goto T8494;
+	}
+	{fixnum V3234;
+	{fixnum V3235;
+	V3235= ((fixnum)(V3229));
+	V3234= ((fixnum*)V3235)[(fixnum)2];}
+	V3232= ((object*)V3234)[(fixnum)0];}
+	if(!(((V3232))==(((object)VV[404])))){
+	goto T8496;
+	}
+	goto T8473;
+	
+	goto T8496;
+T8496:;
+	{object V3236;
+	{fixnum V3238;
+	{fixnum V3239;
+	V3239= ((fixnum)(V3229));
+	V3238= ((fixnum*)V3239)[(fixnum)2];}
+	V3236= ((object*)V3238)[(fixnum)4];}
+	V3229= (V3236);
+	goto T8492;
+	}
+	goto T8494;
+T8494:;
+	goto T8472;
+	}}
+	goto T8474;
+T8474:;
+	goto T8472;
+	
+	goto T8473;
+T8473:;
+	goto T8471;
+	
+	goto T8472;
+T8472:;
+	goto T8469;
+	
+	goto T8471;
+T8471:;
+	goto T8468;
+	
+	goto T8469;
+T8469:;
+	V3222= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V3222),((object)VV[404]),Cnil));
+	goto T8468;
+T8468:;
+	{object V3240 = STREF(object ,(V3222),32);
+	VMR94(V3240);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-COLLECTOR-DATA	*/
+
+static object LI123__LOOP_COLLECTOR_DATA__loop(object V3242)
+{	 VMB95 VMS95 VMV95
+	V3243= tp6(V3242);
+	if(!((V3243)==((fixnum)544))){
+	goto T8518;
+	}
+	goto T8517;
+	
+	goto T8518;
+T8518:;
+	goto T8515;
+	
+	goto T8517;
+T8517:;
+	{object V3244;
+	{fixnum V3245;
+	V3245= ((fixnum)V3242);
+	V3244= ((object*)V3245)[(fixnum)1];}
+	{fixnum V3247;
+	{fixnum V3248;
+	V3248= ((fixnum)V3244);
+	V3247= ((fixnum*)V3248)[(fixnum)2];}
+	V3246= ((object*)V3247)[(fixnum)0];}
+	if(!(((V3246))==(((object)VV[404])))){
+	goto T8523;
+	}
+	goto T8514;
+	
+	goto T8523;
+T8523:;
+	{register object V3249;
+	{fixnum V3250;
+	{fixnum V3251;
+	V3251= ((fixnum)V3244);
+	V3250= ((fixnum*)V3251)[(fixnum)2];}
+	V3249= ((object*)V3250)[(fixnum)4];}
+	goto T8533;
+T8533:;
+	if(((V3249))==Cnil){
+	goto T8535;
+	}
+	{fixnum V3254;
+	{fixnum V3255;
+	V3255= ((fixnum)(V3249));
+	V3254= ((fixnum*)V3255)[(fixnum)2];}
+	V3252= ((object*)V3254)[(fixnum)0];}
+	if(!(((V3252))==(((object)VV[404])))){
+	goto T8537;
+	}
+	goto T8514;
+	
+	goto T8537;
+T8537:;
+	{object V3256;
+	{fixnum V3258;
+	{fixnum V3259;
+	V3259= ((fixnum)(V3249));
+	V3258= ((fixnum*)V3259)[(fixnum)2];}
+	V3256= ((object*)V3258)[(fixnum)4];}
+	V3249= (V3256);
+	goto T8533;
+	}
+	goto T8535;
+T8535:;
+	goto T8513;
+	}}
+	goto T8515;
+T8515:;
+	goto T8513;
+	
+	goto T8514;
+T8514:;
+	goto T8512;
+	
+	goto T8513;
+T8513:;
+	goto T8510;
+	
+	goto T8512;
+T8512:;
+	goto T8509;
+	
+	goto T8510;
+T8510:;
+	V3242= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V3242),((object)VV[404]),Cnil));
+	goto T8509;
+T8509:;
+	{object V3260 = STREF(object ,(V3242),40);
+	VMR95(V3260);}
+}
+/*	local entry for function ::G683	*/
+
+static object LI124__G683__loop(object V3262)
+{	 VMB96 VMS96 VMV96
+	V3263= tp6(V3262);
+	if(!((V3263)==((fixnum)544))){
+	goto T8549;
+	}
+	{object V3264;
+	{fixnum V3265;
+	V3265= ((fixnum)V3262);
+	V3264= ((object*)V3265)[(fixnum)1];}
+	{fixnum V3267;
+	{fixnum V3268;
+	V3268= ((fixnum)V3264);
+	V3267= ((fixnum*)V3268)[(fixnum)2];}
+	V3266= ((object*)V3267)[(fixnum)0];}
+	if(!(((V3266))==(((object)VV[404])))){
+	goto T8558;
+	}
+	goto T8555;
+	
+	goto T8558;
+T8558:;
+	{register object V3269;
+	{fixnum V3270;
+	{fixnum V3271;
+	V3271= ((fixnum)V3264);
+	V3270= ((fixnum*)V3271)[(fixnum)2];}
+	V3269= ((object*)V3270)[(fixnum)4];}
+	goto T8568;
+T8568:;
+	if(((V3269))==Cnil){
+	goto T8570;
+	}
+	{fixnum V3274;
+	{fixnum V3275;
+	V3275= ((fixnum)(V3269));
+	V3274= ((fixnum*)V3275)[(fixnum)2];}
+	V3272= ((object*)V3274)[(fixnum)0];}
+	if(!(((V3272))==(((object)VV[404])))){
+	goto T8572;
+	}
+	goto T8555;
+	
+	goto T8572;
+T8572:;
+	{object V3276;
+	{fixnum V3278;
+	{fixnum V3279;
+	V3279= ((fixnum)(V3269));
+	V3278= ((fixnum*)V3279)[(fixnum)2];}
+	V3276= ((object*)V3278)[(fixnum)4];}
+	V3269= (V3276);
+	goto T8568;
+	}
+	goto T8570;
+T8570:;
+	goto T8553;
+	}}
+	goto T8555;
+T8555:;
+	{object V3280 = Ct;
+	VMR96(V3280);}
+	goto T8553;
+T8553:;
+	{object V3281 = Cnil;
+	VMR96(V3281);}
+	goto T8549;
+T8549:;
+	{object V3282 = Cnil;
+	VMR96(V3282);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-GET-COLLECTION-INFO	*/
+
+static object LI125__LOOP_GET_COLLECTION_INFO__loop(object V3286,object V3287,object V3288)
+{	 VMB97 VMS97 VMV97
+	{fixnum V3289;
+	V3289= fcall.valp;
+	{object V3290;
+	object V3291;
+	register object V3292;
+	V3290= (/* ANSI-LOOP::LOOP-GET-FORM */(*LnkLI211)());
+	{object V3293;
+	V3293= (((object)VV[304])->s.s_dbind);
+	if((STREF(object ,(V3293),48))==Cnil){
+	goto T8591;
+	}
+	goto T8590;
+	
+	goto T8591;
+T8591:;
+	goto T8589;
+	}
+	goto T8590;
+T8590:;
+	goto T8586;
+	
+	goto T8589;
+T8589:;
+	V3291= (fcall.argd=0,/* ANSI-LOOP::LOOP-OPTIONAL-TYPE */(*LnkLI225)(make_fixnum(0)));
+	goto T8585;
+	
+	goto T8586;
+T8586:;
+	V3291= Cnil;
+	goto T8585;
+T8585:;
+	{object V3295;
+	V3295= (((object)VV[257])->s.s_dbind);
+	V3294= V3295->c.c_car;}
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V3294),((object)VV[406]))))==Cnil){
+	goto T8594;
+	}
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	V3292= (/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)());
+	goto T8593;
+	
+	goto T8594;
+T8594:;
+	V3292= Cnil;
+	goto T8593;
+T8593:;
+	if(((V3292))==Cnil){
+	goto T8605;
+	}
+	V3296= tp5(V3292);
+	switch(V3296){
+	case 19:
+	goto T8610;
+T8610:;
+	goto T8604;
+	
+	default:
+	goto T8611;
+T8611:;
+	goto T8603;
+	}
+	goto T8603;
+	
+	goto T8605;
+T8605:;
+	goto T8604;
+T8604:;
+	goto T8600;
+	
+	goto T8603;
+T8603:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[407]),(V3292))));
+	goto T8599;
+	
+	goto T8600;
+T8600:;
+	goto T8599;
+T8599:;
+	if(((V3292))==Cnil){
+	goto T8617;
+	}
+	goto T8614;
+	
+	goto T8617;
+T8617:;
+	(void)((/* ANSI-LOOP::LOOP-DISALLOW-AGGREGATE-BOOLEANS */(*LnkLI226)()));
+	goto T8613;
+	
+	goto T8614;
+T8614:;
+	goto T8613;
+T8613:;
+	if(((V3291))==Cnil){
+	goto T8623;
+	}
+	goto T8620;
+	
+	goto T8623;
+T8623:;
+	{object V3297;
+	V3297= (fcall.argd=0,/* ANSI-LOOP::LOOP-OPTIONAL-TYPE */(*LnkLI225)(make_fixnum(0)));
+	if(((V3297))==Cnil){
+	goto T8627;
+	}
+	V3291= (V3297);
+	goto T8625;
+	
+	goto T8627;
+T8627:;
+	V3291= (V3288);}
+	goto T8625;
+T8625:;
+	goto T8619;
+	
+	goto T8620;
+T8620:;
+	goto T8619;
+T8619:;
+	{object V3298;
+	{object V3299;
+	V3299= (((object)VV[327])->s.s_dbind);
+	{register object V3300;
+	V3301= tp2(V3299);
+	if(!((V3301)==(0))){
+	goto T8632;
+	}
+	V3300= Ct;
+	goto T8631;
+	
+	goto T8632;
+T8632:;
+	V3300= Cnil;
+	goto T8631;
+T8631:;
+	{register fixnum V3302;
+	register object V3303;
+	if(((V3300))==Cnil){
+	goto T8637;
+	}
+	V3302= 268435455;
+	goto T8636;
+	
+	goto T8637;
+T8637:;
+	V3302= length((V3299));
+	goto T8636;
+T8636:;
+	if(((V3300))==Cnil){
+	goto T8641;
+	}
+	if(((V3299))==Cnil){
+	goto T8644;
+	}
+	V3303= (V3299);
+	goto T8640;
+	
+	goto T8644;
+T8644:;
+	V3303= Cnil;
+	goto T8640;
+	
+	goto T8641;
+T8641:;
+	V3303= (V3299);
+	goto T8640;
+T8640:;
+	{object V3304;
+	if(((V3300))==Cnil){
+	goto T8649;
+	}
+	V3304= (V3303);
+	goto T8648;
+	
+	goto T8649;
+T8649:;
+	V3304= Cnil;
+	goto T8648;
+T8648:;
+	if(!((0)>=(V3302))){
+	goto T8657;
+	}
+	goto T8656;
+	
+	goto T8657;
+T8657:;
+	if(((V3300))==Cnil){
+	goto T8660;
+	}
+	if(((V3304))==Cnil){
+	goto T8663;
+	}
+	goto T8655;
+	
+	goto T8663;
+T8663:;
+	goto T8656;
+	
+	goto T8660;
+T8660:;
+	goto T8655;
+	
+	goto T8656;
+T8656:;
+	goto T8652;
+	
+	goto T8655;
+T8655:;
+	{object V3305;
+	if(((V3300))==Cnil){
+	goto T8667;
+	}
+	V3305= V3304->c.c_car;
+	goto T8666;
+	
+	goto T8667;
+T8667:;
+	V3305= (/* COMMON-LISP::ROW-MAJOR-AREF */(*LnkLI215)((V3303),(fixnum)0));
+	goto T8666;
+T8666:;
+	{object V3306;
+	V3306= STREF(object ,(V3305),0);
+	if(!(((V3292))==((V3306)))){
+	goto T8674;
+	}
+	goto T8672;
+	
+	goto T8674;
+T8674:;
+	goto T8670;
+	}
+	goto T8672;
+T8672:;
+	V3298= (V3305);
+	goto T8630;
+	
+	goto T8670;
+T8670:;}
+	{register fixnum V3307;
+	register object V3308;
+	if(((V3300))==Cnil){
+	goto T8677;
+	}
+	V3307= 0;
+	goto T8676;
+	
+	goto T8677;
+T8677:;
+	V3307= 1;
+	goto T8676;
+T8676:;
+	V3308= V3304->c.c_cdr;
+	goto T8682;
+T8682:;
+	if(!((V3307)>=(V3302))){
+	goto T8689;
+	}
+	goto T8688;
+	
+	goto T8689;
+T8689:;
+	if(((V3300))==Cnil){
+	goto T8692;
+	}
+	if(((V3308))==Cnil){
+	goto T8695;
+	}
+	goto T8687;
+	
+	goto T8695;
+T8695:;
+	goto T8688;
+	
+	goto T8692;
+T8692:;
+	goto T8687;
+	
+	goto T8688;
+T8688:;
+	goto T8684;
+	
+	goto T8687;
+T8687:;
+	{object V3310;
+	{fixnum V3312;
+	V3312= V3307;
+	if(((V3300))==Cnil){
+	goto T8700;
+	}
+	V3310= (V3308)->c.c_car;
+	goto T8698;
+	
+	goto T8700;
+T8700:;
+	V3310= (/* COMMON-LISP::ROW-MAJOR-AREF */(*LnkLI215)((V3303),V3312));}
+	goto T8698;
+T8698:;
+	{object V3313;
+	V3313= STREF(object ,(V3310),0);
+	if(!(((V3292))==((V3313)))){
+	goto T8707;
+	}
+	goto T8705;
+	
+	goto T8707;
+T8707:;
+	goto T8703;
+	}
+	goto T8705;
+T8705:;
+	V3298= (V3310);
+	goto T8630;
+	
+	goto T8703;
+T8703:;}
+	{fixnum V3314;
+	object V3315;
+	if(((V3300))==Cnil){
+	goto T8710;
+	}
+	V3314= V3307;
+	goto T8709;
+	
+	goto T8710;
+T8710:;
+	{fixnum V3316;
+	V3316= V3307;
+	{fixnum V3317;
+	V3317= (V3316)+(1);
+	V3314= V3317;}}
+	goto T8709;
+T8709:;
+	V3315= (V3308)->c.c_cdr;
+	V3307= V3314;
+	V3308= (V3315);
+	goto T8682;
+	}
+	goto T8684;
+T8684:;
+	V3298= Cnil;
+	goto T8630;
+	}
+	goto T8652;
+T8652:;
+	V3298= Cnil;}}}}
+	goto T8630;
+T8630:;
+	if(((V3298))==Cnil){
+	goto T8724;
+	}
+	goto T8721;
+	
+	goto T8724;
+T8724:;
+	if(((V3292))==Cnil){
+	goto T8730;
+	}
+	if(((/* ANSI-LOOP::LOOP-VARIABLE-P */(*LnkLI227)((V3292))))==Cnil){
+	goto T8727;
+	}
+	goto T8729;
+	
+	goto T8730;
+T8730:;
+	goto T8727;
+	
+	goto T8729;
+T8729:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[410]),(V3292))));
+	goto T8726;
+	
+	goto T8727;
+T8727:;
+	goto T8726;
+T8726:;
+	{object V3319;
+	V3320= make_cons((V3286),Cnil);
+	V3298= (fcall.argd=8,/* ANSI-LOOP::MAKE-LOOP-COLLECTOR */(*LnkLI228)(((object)VV[412]),(V3292),((object)VV[413]),(V3287),((object)VV[414]),(V3320),((object)VV[415]),(V3291)));
+	V3319= (V3298);
+	V3321= make_cons((V3319),(((object)VV[327])->s.s_dbind));
+	(((object)VV[327])->s.s_dbind)= (V3321);
+	goto T8720;
+	}
+	goto T8721;
+T8721:;
+	V3322= STREF(object ,(V3298),8);
+	if(!(((V3322))==((V3287)))){
+	goto T8740;
+	}
+	goto T8737;
+	
+	goto T8740;
+T8740:;
+	{object V3324;
+	V3324= STREF(object ,(V3298),16);
+	V3323= V3324->c.c_car;}
+	(void)((fcall.argd=4,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[416]),(V3292),(V3323),(V3286))));
+	goto T8736;
+	
+	goto T8737;
+T8737:;
+	goto T8736;
+T8736:;
+	V3325= STREF(object ,(V3298),32);
+	if(!(equal((V3291),(V3325)))){
+	goto T8749;
+	}
+	goto T8746;
+	
+	goto T8749;
+T8749:;
+	V3326= STREF(object ,(V3298),32);
+	(void)((fcall.argd=4,/* ANSI-LOOP::LOOP-WARN */(*LnkLI185)(((object)VV[417]),(V3292),(V3291),(V3326))));
+	V3327= STREF(object ,(V3298),32);
+	if(!(((V3327))==(Ct))){
+	goto T8754;
+	}
+	STSET(object ,(V3298),32, (V3291));
+	(void)((V3291));
+	goto T8745;
+	
+	goto T8754;
+T8754:;
+	goto T8745;
+	
+	goto T8746;
+T8746:;
+	goto T8745;
+T8745:;
+	{object V3328;
+	V3329= STREF(object ,(V3298),16);
+	V3328= make_cons((V3286),(V3329));
+	STSET(object ,(V3298),16, (V3328));
+	(void)((V3328));}
+	goto T8720;
+T8720:;
+	{object V3330;
+	if (V3289) {
+	#define V3331 ((object *)V3289)[0]
+	V3330= ({object  _t0=(V3298);object  _t1=(V3290);
+	V3331= (_t1);_t0;});
+	#undef V3331
+	} else {
+	V3330= ({object  _t0=(V3298);object  _t1=(V3290);
+	(void)((_t1));_t0;});
+	}
+	VMRV97(V3330,1);}}}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-LIST-COLLECTION	*/
+
+static object LI126__LOOP_LIST_COLLECTION__loop(object V3333)
+{	 VMB98 VMS98 VMV98
+	register object  V3335;
+	object V3334[1];
+	#define V3336 V3334[0]
+	
+	{
+	V3335= (fcall.valp=(fixnum)V3334,/* ANSI-LOOP::LOOP-GET-COLLECTION-INFO */(*LnkLI229)((V3333),((object)VV[40]),((object)VV[40])));
+	
+	vs_top=sup;
+	{object V3337;
+	V3337= STREF(object ,(V3335),24);
+	if(((V3337))==Cnil){
+	goto T8769;
+	}
+	goto T8766;
+	
+	goto T8769;
+T8769:;
+	V3338= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[419])));
+	V3339= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[420])));
+	if((STREF(object ,(V3335),0))==Cnil){
+	goto T8777;
+	}
+	goto T8776;
+	
+	goto T8777;
+T8777:;
+	goto T8774;
+	
+	goto T8776;
+T8776:;
+	V3341= STREF(object ,(V3335),0);
+	V3340= make_cons((V3341),Cnil);
+	goto T8773;
+	
+	goto T8774;
+T8774:;
+	V3340= Cnil;
+	goto T8773;
+T8773:;
+	V3337= listA(3,(V3338),(V3339),(V3340));
+	STSET(object ,(V3335),24, (V3337));
+	(void)((V3337));
+	{object V3342;
+	V3342= list(2,((object)VV[421]),(V3337));
+	V3343= make_cons((V3342),(((object)VV[315])->s.s_dbind));
+	(((object)VV[315])->s.s_dbind)= (V3343);}
+	if((STREF(object ,(V3335),0))==Cnil){
+	goto T8788;
+	}
+	goto T8787;
+	
+	goto T8788;
+T8788:;
+	goto T8786;
+	
+	goto T8787;
+T8787:;
+	goto T8783;
+	
+	goto T8786;
+T8786:;
+	V3344= V3337->c.c_car;
+	{object V3346;
+	V3346= V3337->c.c_cdr;
+	V3345= V3346->c.c_cdr;}
+	V3347= listA(3,((object)VV[423]),(V3344),(V3345));
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-EMIT-FINAL-VALUE */(*LnkLI230)((V3347))));
+	goto T8765;
+	
+	goto T8783;
+T8783:;
+	goto T8765;
+	
+	goto T8766;
+T8766:;
+	goto T8765;
+T8765:;
+	if(!(((V3333))==(((object)VV[40])))){
+	goto T8794;
+	}
+	V3336= list(2,((object)VV[40]),(V3336));
+	goto T8793;
+	
+	goto T8794;
+T8794:;
+	if(!(((V3333))==(((object)VV[424])))){
+	goto T8798;
+	}
+	goto T8793;
+	
+	goto T8798;
+T8798:;
+	if(!(((V3333))==(((object)VV[425])))){
+	goto T8801;
+	}
+	if(((V3336))==Cnil){
+	goto T8812;
+	}
+	V3348= tp2(V3336);
+	if(!((V3348)==(0))){
+	goto T8815;
+	}
+	goto T8811;
+	
+	goto T8815;
+T8815:;
+	goto T8809;
+	
+	goto T8812;
+T8812:;
+	goto T8809;
+	
+	goto T8811;
+T8811:;
+	V3349= V3336->c.c_car;
+	if(!(((V3349))==(((object)VV[40])))){
+	goto T8807;
+	}
+	goto T8808;
+	
+	goto T8809;
+T8809:;
+	goto T8807;
+	
+	goto T8808;
+T8808:;
+	goto T8804;
+	
+	goto T8807;
+T8807:;
+	V3336= list(2,((object)VV[426]),(V3336));
+	goto T8793;
+	
+	goto T8804;
+T8804:;
+	goto T8793;
+	
+	goto T8801;
+T8801:;
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[76]),((object)VV[427]),(V3333),((object)VV[428]),((object)VV[429]))));
+	goto T8793;
+T8793:;
+	V3350= list(3,((object)VV[430]),(V3337),(V3336));
+	{object V3351 = (/* ANSI-LOOP::LOOP-EMIT-BODY */(*LnkLI224)((V3350)));
+	VMR98(V3351);}}
+	#undef V3336
+	
+	}
+}
+/*	local entry for function ANSI-LOOP::LOOP-SUM-COLLECTION	*/
+
+static object LI127__LOOP_SUM_COLLECTION__loop(object V3355,object V3356,object V3357)
+{	 VMB99 VMS99 VMV99
+	register object  V3359;
+	object V3358[1];
+	#define V3360 V3358[0]
+	
+	{
+	V3359= (fcall.valp=(fixnum)V3358,/* ANSI-LOOP::LOOP-GET-COLLECTION-INFO */(*LnkLI229)((V3355),((object)VV[431]),(V3357)));
+	
+	vs_top=sup;
+	V3361= STREF(object ,(V3359),32);
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-CHECK-DATA-TYPE */(*LnkLI231)((V3361),(V3356))));
+	{object V3362;
+	V3362= STREF(object ,(V3359),24);
+	if(((V3362))==Cnil){
+	goto T8831;
+	}
+	goto T8828;
+	
+	goto T8831;
+T8831:;
+	{object V3364;
+	V3364= STREF(object ,(V3359),0);
+	if(((V3364))==Cnil){
+	goto T8837;
+	}
+	V3363= (V3364);
+	goto T8835;
+	
+	goto T8837;
+T8837:;
+	V3363= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[433])));}
+	goto T8835;
+T8835:;
+	V3365= STREF(object ,(V3359),32);
+	V3362= make_cons((fcall.argd=3,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V3363),Cnil,(V3365))),Cnil);
+	STSET(object ,(V3359),24, (V3362));
+	(void)((V3362));
+	if((STREF(object ,(V3359),0))==Cnil){
+	goto T8846;
+	}
+	goto T8845;
+	
+	goto T8846;
+T8846:;
+	goto T8844;
+	
+	goto T8845;
+T8845:;
+	goto T8841;
+	
+	goto T8844;
+T8844:;
+	{object V3367;
+	V3367= STREF(object ,(V3359),24);
+	V3366= V3367->c.c_car;}
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-EMIT-FINAL-VALUE */(*LnkLI230)((V3366))));
+	goto T8827;
+	
+	goto T8841;
+T8841:;
+	goto T8827;
+	
+	goto T8828;
+T8828:;
+	goto T8827;
+T8827:;
+	if(!(((V3355))==(((object)VV[434])))){
+	goto T8851;
+	}
+	V3369= (V3362)->c.c_car;
+	V3371= (V3362)->c.c_car;
+	V3373= (V3362)->c.c_car;
+	V3375= list(2,((object)VV[435]),(V3373));
+	V3368= list(3,((object)VV[46]),(V3360),list(3,((object)VV[47]),(V3369),(/* ANSI-LOOP::HIDE-VARIABLE-REFERENCE */(*LnkLI174)(Ct,(V3371),(V3375)))));
+	goto T8850;
+	
+	goto T8851;
+T8851:;
+	V3376= (V3362)->c.c_car;
+	V3378= (V3362)->c.c_car;
+	V3380= (V3362)->c.c_car;
+	V3382= (/* ANSI-LOOP::HIDE-VARIABLE-REFERENCE */(*LnkLI174)(Ct,(V3378),(V3380)));
+	V3368= list(3,((object)VV[47]),(V3376),list(3,((object)VV[436]),(V3382),(V3360)));
+	goto T8850;
+T8850:;
+	{object V3383 = (/* ANSI-LOOP::LOOP-EMIT-BODY */(*LnkLI224)((V3368)));
+	VMR99(V3383);}}
+	#undef V3360
+	
+	}
+}
+/*	local entry for function ANSI-LOOP::LOOP-MAXMIN-COLLECTION	*/
+
+static object LI128__LOOP_MAXMIN_COLLECTION__loop(object V3385)
+{	 VMB100 VMS100 VMV100
+	register object  V3387;
+	object V3386[1];
+	#define V3388 V3386[0]
+	
+	{
+	V3387= (fcall.valp=(fixnum)V3386,/* ANSI-LOOP::LOOP-GET-COLLECTION-INFO */(*LnkLI229)((V3385),((object)VV[437]),(((object)VV[438])->s.s_dbind)));
+	
+	vs_top=sup;
+	V3389= STREF(object ,(V3387),32);
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-CHECK-DATA-TYPE */(*LnkLI231)((V3389),(((object)VV[438])->s.s_dbind))));
+	{object V3390;
+	V3390= STREF(object ,(V3387),40);
+	if(((V3390))==Cnil){
+	goto T8871;
+	}
+	goto T8868;
+	
+	goto T8871;
+T8871:;
+	{object V3392;
+	V3392= STREF(object ,(V3387),0);
+	if(((V3392))==Cnil){
+	goto T8877;
+	}
+	V3391= (V3392);
+	goto T8875;
+	
+	goto T8877;
+T8877:;
+	V3391= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[440])));}
+	goto T8875;
+T8875:;
+	V3393= STREF(object ,(V3387),32);
+	V3390= (/* ANSI-LOOP::MAKE-LOOP-MINIMAX */(*LnkLI232)((V3391),(V3393)));
+	STSET(object ,(V3387),40, (V3390));
+	(void)((V3390));
+	if((STREF(object ,(V3387),0))==Cnil){
+	goto T8886;
+	}
+	goto T8885;
+	
+	goto T8886;
+T8886:;
+	goto T8884;
+	
+	goto T8885;
+T8885:;
+	goto T8881;
+	
+	goto T8884;
+T8884:;
+	V3394= STREF(object ,(V3390),0);
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-EMIT-FINAL-VALUE */(*LnkLI230)((V3394))));
+	goto T8867;
+	
+	goto T8881;
+T8881:;
+	goto T8867;
+	
+	goto T8868;
+T8868:;
+	goto T8867;
+T8867:;
+	(void)((/* ANSI-LOOP::LOOP-NOTE-MINIMAX-OPERATION */(*LnkLI233)((V3385),(V3390))));
+	{object V3395;
+	V3395= list(2,((object)VV[442]),(V3390));
+	V3396= make_cons((V3395),(((object)VV[315])->s.s_dbind));
+	(((object)VV[315])->s.s_dbind)= (V3396);}
+	V3397= list(4,((object)VV[443]),(V3390),(V3385),(V3388));
+	{object V3398 = (/* ANSI-LOOP::LOOP-EMIT-BODY */(*LnkLI224)((V3397)));
+	VMR100(V3398);}}
+	#undef V3388
+	
+	}
+}
+/*	local entry for function ANSI-LOOP::LOOP-DO-ALWAYS	*/
+
+static object LI129__LOOP_DO_ALWAYS__loop(object V3401,object V3402)
+{	 VMB101 VMS101 VMV101
+	{object V3403;
+	V3403= (/* ANSI-LOOP::LOOP-GET-FORM */(*LnkLI211)());
+	if(((V3401))==Cnil){
+	goto T8895;
+	}
+	(void)((fcall.argd=0,/* ANSI-LOOP::LOOP-DISALLOW-CONDITIONAL */(*LnkLI222)(make_fixnum(0))));
+	goto T8894;
+	
+	goto T8895;
+T8895:;
+	goto T8894;
+T8894:;
+	(void)((/* ANSI-LOOP::LOOP-DISALLOW-ANONYMOUS-COLLECTORS */(*LnkLI234)()));
+	if(((V3402))==Cnil){
+	goto T8901;
+	}
+	V3404= ((object)VV[46]);
+	goto T8900;
+	
+	goto T8901;
+T8901:;
+	V3404= ((object)VV[445]);
+	goto T8900;
+T8900:;
+	V3405= list(3,(V3404),(V3403),(/* ANSI-LOOP::LOOP-CONSTRUCT-RETURN */(*LnkLI214)(Cnil)));
+	(void)((/* ANSI-LOOP::LOOP-EMIT-BODY */(*LnkLI224)((V3405))));
+	{object V3406 = (fcall.argd=1,/* ANSI-LOOP::LOOP-EMIT-FINAL-VALUE */(*LnkLI230)(Ct));
+	VMR101(V3406);}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-DO-THEREIS	*/
+
+static object LI130__LOOP_DO_THEREIS__loop(object V3408)
+{	 VMB102 VMS102 VMV102
+	if(((V3408))==Cnil){
+	goto T8905;
+	}
+	(void)((fcall.argd=0,/* ANSI-LOOP::LOOP-DISALLOW-CONDITIONAL */(*LnkLI222)(make_fixnum(0))));
+	goto T8904;
+	
+	goto T8905;
+T8905:;
+	goto T8904;
+T8904:;
+	(void)((/* ANSI-LOOP::LOOP-DISALLOW-ANONYMOUS-COLLECTORS */(*LnkLI234)()));
+	(void)((fcall.argd=0,/* ANSI-LOOP::LOOP-EMIT-FINAL-VALUE */(*LnkLI230)(make_fixnum(0))));
+	V3409= (/* ANSI-LOOP::LOOP-WHEN-IT-VARIABLE */(*LnkLI221)());
+	V3410= list(3,((object)VV[47]),(V3409),(/* ANSI-LOOP::LOOP-GET-FORM */(*LnkLI211)()));
+	V3411= list(3,((object)VV[46]),(V3410),(/* ANSI-LOOP::LOOP-CONSTRUCT-RETURN */(*LnkLI214)((((object)VV[324])->s.s_dbind))));
+	{object V3412 = (/* ANSI-LOOP::LOOP-EMIT-BODY */(*LnkLI224)((V3411)));
+	VMR102(V3412);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-DO-WHILE	*/
+
+static object LI131__LOOP_DO_WHILE__loop(object V3415,object V3416)
+{	 VMB103 VMS103 VMV103
+	{object V3417;
+	V3417= (/* ANSI-LOOP::LOOP-GET-FORM */(*LnkLI211)());
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-DISALLOW-CONDITIONAL */(*LnkLI222)((V3416))));
+	if(((V3415))==Cnil){
+	goto T8913;
+	}
+	V3418= ((object)VV[46]);
+	goto T8912;
+	
+	goto T8913;
+T8913:;
+	V3418= ((object)VV[445]);
+	goto T8912;
+T8912:;
+	V3419= list(3,(V3418),(V3417),((object)VV[446]));
+	{object V3420 = (/* ANSI-LOOP::LOOP-PSEUDO-BODY */(*LnkLI213)((V3419)));
+	VMR103(V3420);}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-DO-WITH	*/
+
+static object LI132__LOOP_DO_WITH__loop()
+{	 VMB104 VMS104 VMV104
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-DISALLOW-CONDITIONAL */(*LnkLI222)(((object)VV[447]))));
+	{register object V3421;
+	register object V3422;
+	register object V3423;
+	V3421= Cnil;
+	V3422= Cnil;
+	V3423= Cnil;
+	goto T8918;
+T8918:;
+	V3421= (/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)());
+	V3423= (fcall.argd=1,/* ANSI-LOOP::LOOP-OPTIONAL-TYPE */(*LnkLI225)((V3421)));
+	{object V3425;
+	V3425= (((object)VV[257])->s.s_dbind);
+	V3424= V3425->c.c_car;}
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V3424),((object)VV[448]))))==Cnil){
+	goto T8926;
+	}
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	V3422= (/* ANSI-LOOP::LOOP-GET-FORM */(*LnkLI211)());
+	goto T8925;
+	
+	goto T8926;
+T8926:;
+	V3422= Cnil;
+	goto T8925;
+T8925:;
+	if(((V3421))==Cnil){
+	goto T8935;
+	}
+	if(((/* ANSI-LOOP::LOOP-VARIABLE-P */(*LnkLI227)((V3421))))==Cnil){
+	goto T8932;
+	}
+	goto T8934;
+	
+	goto T8935;
+T8935:;
+	goto T8932;
+	
+	goto T8934;
+T8934:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[449]),(V3421))));
+	goto T8931;
+	
+	goto T8932;
+T8932:;
+	goto T8931;
+T8931:;
+	(void)((fcall.argd=3,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V3421),(V3422),(V3423))));
+	{object V3427;
+	V3427= (((object)VV[257])->s.s_dbind);
+	V3426= V3427->c.c_car;}
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V3426),((object)VV[450]))))==Cnil){
+	goto T8940;
+	}
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	goto T8939;
+	
+	goto T8940;
+T8940:;
+	{object V3428 = (/* ANSI-LOOP::LOOP-BIND-BLOCK */(*LnkLI206)());
+	VMR104(V3428);}
+	goto T8939;
+T8939:;
+	goto T8918;
+	}
+}
+/*	local entry for function ANSI-LOOP::LOOP-HACK-ITERATION	*/
+
+static object LI133__LOOP_HACK_ITERATION__loop(object V3430)
+{	 VMB105 VMS105 VMV105
+	{register object V3431;
+	V3431= (V3430);
+	{register object V3432;
+	register object V3433;
+	register object V3434;
+	register object V3435;
+	register object V3436;
+	register object V3437;
+	register object V3438;
+	register object V3439;
+	register object V3440;
+	register object V3441;
+	V3432= Cnil;
+	V3433= Cnil;
+	V3434= Cnil;
+	V3435= Cnil;
+	V3436= Cnil;
+	V3437= Cnil;
+	V3438= Cnil;
+	V3439= Cnil;
+	V3440= Cnil;
+	V3441= Cnil;
+	goto T8946;
+T8946:;
+	{object V3442;
+	V3443= (V3431)->c.c_car;
+	V3442= ({register object _sym=(V3443);_sym->s.s_sfdef!=NOT_SPECIAL ? make_cons(sLspecial,make_fixnum((long)_sym->s.s_sfdef)) : (_sym->s.s_mflag ? make_cons(sSmacro,_sym->s.s_gfdef) : _sym->s.s_gfdef);});
+	V3446= tp4(V3442);
+	if(!((V3446)==(24))){
+	goto T8957;
+	}
+	goto T8956;
+	
+	goto T8957;
+T8957:;
+	goto T8954;
+	
+	goto T8956;
+T8956:;
+	V3445= (V3442);
+	goto T8953;
+	
+	goto T8954;
+T8954:;
+	V3445= (V3442)->s.s_gfdef;
+	goto T8953;
+T8953:;
+	V3447= (V3431)->c.c_cdr;
+	V3441= ({fixnum _v=(fixnum)0;object _z,_f=((V3445)),_l=((V3447)),_ll=_l;
+        object _x4=Cnil,_x3=Cnil,_x2=Cnil,_x1=Cnil,_x0=Cnil;
+        char _m=(2-2),_q=_f->fun.fun_minarg>_m ? _f->fun.fun_minarg-_m : 0;
+        char _n=Rset && !_f->fun.fun_argd ? _q : -1;
+        fcall.fun=_f;fcall.valp=_v;fcall.argd=-(2-1);
+        switch (_n) {
+          case 5: if (_l==Cnil) {_n=-1;break;} _x4=_l->c.c_car;_l=_l->c.c_cdr;
+          case 4: if (_l==Cnil) {_n=-1;break;} _x3=_l->c.c_car;_l=_l->c.c_cdr;
+          case 3: if (_l==Cnil) {_n=-1;break;} _x2=_l->c.c_car;_l=_l->c.c_cdr;
+          case 2: if (_l==Cnil) {_n=-1;break;} _x1=_l->c.c_car;_l=_l->c.c_cdr;
+          case 1: if (_l==Cnil) {_n=-1;break;} _x0=_l->c.c_car;_l=_l->c.c_cdr;
+          case 0: if (_n+_m+(_l==Cnil ? 0 : 1)>_f->fun.fun_maxarg) _n=-1; else fcall.argd-=_n;
+          default: break;
+        }
+        switch (_n) {
+          case 5:  _z=_f->fun.fun_self(_x4,_x3,_x2,_x1,_x0,_l);break;
+          case 4:  _z=_f->fun.fun_self(_x3,_x2,_x1,_x0,_l);break;
+          case 3:  _z=_f->fun.fun_self(_x2,_x1,_x0,_l);break;
+          case 2:  _z=_f->fun.fun_self(_x1,_x0,_l);break;
+          case 1:  _z=_f->fun.fun_self(_x0,_l);break;
+          case 0:  _z=(_f->fun.fun_maxarg ? _f->fun.fun_self(_l) : _f->fun.fun_self());break;
+          default: _z=call_proc_cs2(_ll);break;
+        }
+        if (!(_f)->fun.fun_neval && !(_f)->fun.fun_vv) vs_top=_v ? (object *)_v : sup;
+        _z;});}
+	V3440= (V3441);
+	if((V3440->c.c_car)==Cnil){
+	goto T8962;
+	}
+	{object V3449;
+	V3449= V3440->c.c_car;
+	V3432= make_cons((V3449),(V3432));
+	goto T8961;
+	}
+	goto T8962;
+T8962:;
+	goto T8961;
+T8961:;
+	{object V3451;
+	object V3452;
+	{object V3454;
+	V3440= V3440->c.c_cdr;
+	V3454= (V3440);
+	V3453= V3454->c.c_car;}
+	V3451= (/* COMMON-LISP::COPY-LIST */(*LnkLI235)((V3453)));
+	V3452= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V3433);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V3451);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V3455;
+	object V3456;
+	V3455= Cnil;
+	V3456= Cnil;
+	V3455= (V3433);
+	if(((V3433))==Cnil){
+	goto T8982;
+	}
+	goto T8981;
+	
+	goto T8982;
+T8982:;
+	goto T8979;
+	
+	goto T8981;
+T8981:;
+	{object V3457;
+	V3457= (V3433)->c.c_cdr;
+	{register object V3458;
+	register object V3459;
+	V3458= (V3433);
+	V3459= (V3457);
+	goto T8987;
+T8987:;
+	if(((V3459))==Cnil){
+	goto T8996;
+	}
+	goto T8995;
+	
+	goto T8996;
+T8996:;
+	goto T8994;
+	
+	goto T8995;
+T8995:;
+	goto T8992;
+	
+	goto T8994;
+T8994:;
+	goto T8989;
+	
+	goto T8992;
+T8992:;
+	{object V3461;
+	object V3462;
+	V3461= (V3458)->c.c_cdr;
+	V3462= (V3459)->c.c_cdr;
+	V3458= (V3461);
+	V3459= (V3462);}
+	goto T8987;
+	
+	goto T8989;
+T8989:;
+	V3456= (V3458);
+	goto T8984;
+	}}
+	goto T8984;
+T8984:;
+	goto T8976;
+	
+	goto T8979;
+T8979:;
+	goto T8976;
+T8976:;
+	if(((V3456))==Cnil){
+	goto T9008;
+	}
+	(void)((((V3456))->c.c_cdr=((V3451)),((V3456))));
+	goto T9007;
+	
+	goto T9008;
+T9008:;
+	V3455= (V3451);
+	goto T9007;
+T9007:;
+	V3433= (V3455);}}
+	{object V3465;
+	V3440= V3440->c.c_cdr;
+	V3465= (V3440);
+	if((V3465->c.c_car)==Cnil){
+	goto T9013;
+	}}
+	{object V3466;
+	V3466= V3440->c.c_car;
+	V3434= make_cons((V3466),(V3434));
+	goto T9012;
+	}
+	goto T9013;
+T9013:;
+	goto T9012;
+T9012:;
+	{object V3468;
+	object V3469;
+	{object V3471;
+	V3440= V3440->c.c_cdr;
+	V3471= (V3440);
+	V3470= V3471->c.c_car;}
+	V3468= (/* COMMON-LISP::COPY-LIST */(*LnkLI235)((V3470)));
+	V3469= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V3435);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V3468);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V3472;
+	object V3473;
+	V3472= Cnil;
+	V3473= Cnil;
+	V3472= (V3435);
+	if(((V3435))==Cnil){
+	goto T9035;
+	}
+	goto T9034;
+	
+	goto T9035;
+T9035:;
+	goto T9032;
+	
+	goto T9034;
+T9034:;
+	{object V3474;
+	V3474= (V3435)->c.c_cdr;
+	{register object V3475;
+	register object V3476;
+	V3475= (V3435);
+	V3476= (V3474);
+	goto T9040;
+T9040:;
+	if(((V3476))==Cnil){
+	goto T9049;
+	}
+	goto T9048;
+	
+	goto T9049;
+T9049:;
+	goto T9047;
+	
+	goto T9048;
+T9048:;
+	goto T9045;
+	
+	goto T9047;
+T9047:;
+	goto T9042;
+	
+	goto T9045;
+T9045:;
+	{object V3478;
+	object V3479;
+	V3478= (V3475)->c.c_cdr;
+	V3479= (V3476)->c.c_cdr;
+	V3475= (V3478);
+	V3476= (V3479);}
+	goto T9040;
+	
+	goto T9042;
+T9042:;
+	V3473= (V3475);
+	goto T9037;
+	}}
+	goto T9037;
+T9037:;
+	goto T9029;
+	
+	goto T9032;
+T9032:;
+	goto T9029;
+T9029:;
+	if(((V3473))==Cnil){
+	goto T9061;
+	}
+	(void)((((V3473))->c.c_cdr=((V3468)),((V3473))));
+	goto T9060;
+	
+	goto T9061;
+T9061:;
+	V3472= (V3468);
+	goto T9060;
+T9060:;
+	V3435= (V3472);}}
+	V3440= V3440->c.c_cdr;
+	if(((((object)VV[318])->s.s_dbind))==Cnil){
+	goto T9068;
+	}
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[451]))));
+	goto T9067;
+	
+	goto T9068;
+T9068:;
+	goto T9067;
+T9067:;
+	if(((V3440))==Cnil){
+	goto T9075;
+	}
+	goto T9072;
+	
+	goto T9075;
+T9075:;
+	V3440= (V3441);
+	goto T9071;
+	
+	goto T9072;
+T9072:;
+	goto T9071;
+T9071:;
+	if(((V3440)->c.c_car)==Cnil){
+	goto T9079;
+	}
+	{object V3483;
+	V3483= (V3440)->c.c_car;
+	V3436= make_cons((V3483),(V3436));
+	goto T9078;
+	}
+	goto T9079;
+T9079:;
+	goto T9078;
+T9078:;
+	{object V3486;
+	object V3487;
+	{object V3489;
+	V3440= (V3440)->c.c_cdr;
+	V3489= (V3440);
+	V3488= V3489->c.c_car;}
+	V3486= (/* COMMON-LISP::COPY-LIST */(*LnkLI235)((V3488)));
+	V3487= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V3437);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V3486);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V3491;
+	object V3492;
+	V3491= Cnil;
+	V3492= Cnil;
+	V3491= (V3437);
+	if(((V3437))==Cnil){
+	goto T9099;
+	}
+	goto T9098;
+	
+	goto T9099;
+T9099:;
+	goto T9096;
+	
+	goto T9098;
+T9098:;
+	{object V3493;
+	V3493= (V3437)->c.c_cdr;
+	{register object V3494;
+	register object V3495;
+	V3494= (V3437);
+	V3495= (V3493);
+	goto T9104;
+T9104:;
+	if(((V3495))==Cnil){
+	goto T9113;
+	}
+	goto T9112;
+	
+	goto T9113;
+T9113:;
+	goto T9111;
+	
+	goto T9112;
+T9112:;
+	goto T9109;
+	
+	goto T9111;
+T9111:;
+	goto T9106;
+	
+	goto T9109;
+T9109:;
+	{object V3497;
+	object V3498;
+	V3497= (V3494)->c.c_cdr;
+	V3498= (V3495)->c.c_cdr;
+	V3494= (V3497);
+	V3495= (V3498);}
+	goto T9104;
+	
+	goto T9106;
+T9106:;
+	V3492= (V3494);
+	goto T9101;
+	}}
+	goto T9101;
+T9101:;
+	goto T9093;
+	
+	goto T9096;
+T9096:;
+	goto T9093;
+T9093:;
+	if(((V3492))==Cnil){
+	goto T9125;
+	}
+	(void)((((V3492))->c.c_cdr=((V3486)),((V3492))));
+	goto T9124;
+	
+	goto T9125;
+T9125:;
+	V3491= (V3486);
+	goto T9124;
+T9124:;
+	V3437= (V3491);}}
+	{object V3501;
+	V3440= V3440->c.c_cdr;
+	V3501= (V3440);
+	if((V3501->c.c_car)==Cnil){
+	goto T9130;
+	}}
+	{object V3502;
+	V3502= V3440->c.c_car;
+	V3438= make_cons((V3502),(V3438));
+	goto T9129;
+	}
+	goto T9130;
+T9130:;
+	goto T9129;
+T9129:;
+	{object V3504;
+	object V3505;
+	{object V3507;
+	V3507= V3440->c.c_cdr;
+	V3506= V3507->c.c_car;}
+	V3504= (/* COMMON-LISP::COPY-LIST */(*LnkLI235)((V3506)));
+	V3505= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V3439);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V3504);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V3508;
+	object V3509;
+	V3508= Cnil;
+	V3509= Cnil;
+	V3508= (V3439);
+	if(((V3439))==Cnil){
+	goto T9151;
+	}
+	goto T9150;
+	
+	goto T9151;
+T9151:;
+	goto T9148;
+	
+	goto T9150;
+T9150:;
+	{object V3510;
+	V3510= (V3439)->c.c_cdr;
+	{register object V3511;
+	register object V3512;
+	V3511= (V3439);
+	V3512= (V3510);
+	goto T9156;
+T9156:;
+	if(((V3512))==Cnil){
+	goto T9165;
+	}
+	goto T9164;
+	
+	goto T9165;
+T9165:;
+	goto T9163;
+	
+	goto T9164;
+T9164:;
+	goto T9161;
+	
+	goto T9163;
+T9163:;
+	goto T9158;
+	
+	goto T9161;
+T9161:;
+	{object V3514;
+	object V3515;
+	V3514= (V3511)->c.c_cdr;
+	V3515= (V3512)->c.c_cdr;
+	V3511= (V3514);
+	V3512= (V3515);}
+	goto T9156;
+	
+	goto T9158;
+T9158:;
+	V3509= (V3511);
+	goto T9153;
+	}}
+	goto T9153;
+T9153:;
+	goto T9145;
+	
+	goto T9148;
+T9148:;
+	goto T9145;
+T9145:;
+	if(((V3509))==Cnil){
+	goto T9177;
+	}
+	(void)((((V3509))->c.c_cdr=((V3504)),((V3509))));
+	goto T9176;
+	
+	goto T9177;
+T9177:;
+	V3508= (V3504);
+	goto T9176;
+T9176:;
+	V3439= (V3508);}}
+	{object V3519;
+	V3519= (((object)VV[257])->s.s_dbind);
+	V3518= V3519->c.c_car;}
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V3518),((object)VV[452]))))==Cnil){
+	goto T9185;
+	}
+	goto T9182;
+	
+	goto T9185;
+T9185:;
+	V3521= (/* ANSI-LOOP::LOOP-MAKE-DESETQ */(*LnkLI180)((V3439)));
+	{object V3523;
+	V3523= (V3438);
+	if(((V3523))==Cnil){
+	goto T9194;
+	}
+	goto T9191;
+	
+	goto T9194;
+T9194:;
+	V3522= Cnil;
+	goto T9190;
+	
+	goto T9191;
+T9191:;
+	{object V3524;
+	V3524= V3523->c.c_car;
+	if(!((Ct)==((V3524)))){
+	goto T9207;
+	}
+	goto T9205;
+	
+	goto T9207;
+T9207:;
+	goto T9203;
+	}
+	goto T9205;
+T9205:;
+	goto T9198;
+	
+	goto T9203;
+T9203:;
+	{register object V3525;
+	V3525= V3523->c.c_cdr;
+	goto T9211;
+T9211:;
+	if(((V3525))==Cnil){
+	goto T9213;
+	}
+	{object V3527;
+	V3527= (V3525)->c.c_car;
+	if(!((Ct)==((V3527)))){
+	goto T9221;
+	}
+	goto T9219;
+	
+	goto T9221;
+T9221:;
+	goto T9217;
+	}
+	goto T9219;
+T9219:;
+	goto T9198;
+	
+	goto T9217;
+T9217:;
+	{object V3528;
+	V3528= (V3525)->c.c_cdr;
+	V3525= (V3528);
+	goto T9211;
+	}
+	goto T9213;
+T9213:;
+	goto T9201;
+	}
+	goto T9201;
+T9201:;
+	goto T9196;
+	
+	goto T9198;
+T9198:;
+	V3522= ((object)VV[453]);
+	goto T9190;
+	
+	goto T9196;
+T9196:;
+	{object V3531;
+	{register object V3532;
+	register object V3533;
+	V3532= V3523->c.c_cdr;
+	V3533= (((V3523))->c.c_cdr=(Cnil),((V3523)));
+	goto T9238;
+T9238:;
+	if(((V3532))==Cnil){
+	goto T9240;
+	}
+	{object V3534;
+	object V3535;
+	V3534= (V3532)->c.c_cdr;
+	V3535= (((V3532))->c.c_cdr=((V3533)),((V3532)));
+	V3532= (V3534);
+	V3533= (V3535);
+	goto T9238;
+	}
+	goto T9240;
+T9240:;
+	V3523= (V3533);
+	goto T9234;
+	}
+	goto T9234;
+T9234:;
+	V3531= (V3523);
+	if((V3531->c.c_cdr)==Cnil){
+	goto T9231;
+	}}
+	goto T9228;
+	
+	goto T9231;
+T9231:;
+	V3530= V3523->c.c_car;
+	goto T9227;
+	
+	goto T9228;
+T9228:;
+	V3530= make_cons(((object)VV[123]),(V3523));
+	goto T9227;
+T9227:;
+	V3522= list(3,((object)VV[46]),(V3530),((object)VV[454]));}
+	goto T9190;
+T9190:;
+	V3537= (/* ANSI-LOOP::LOOP-MAKE-PSETQ */(*LnkLI181)((V3437)));
+	{object V3539;
+	V3539= (V3436);
+	if(((V3539))==Cnil){
+	goto T9253;
+	}
+	goto T9250;
+	
+	goto T9253;
+T9253:;
+	V3538= Cnil;
+	goto T9249;
+	
+	goto T9250;
+T9250:;
+	{object V3540;
+	V3540= V3539->c.c_car;
+	if(!((Ct)==((V3540)))){
+	goto T9266;
+	}
+	goto T9264;
+	
+	goto T9266;
+T9266:;
+	goto T9262;
+	}
+	goto T9264;
+T9264:;
+	goto T9257;
+	
+	goto T9262;
+T9262:;
+	{register object V3541;
+	V3541= V3539->c.c_cdr;
+	goto T9270;
+T9270:;
+	if(((V3541))==Cnil){
+	goto T9272;
+	}
+	{object V3543;
+	V3543= (V3541)->c.c_car;
+	if(!((Ct)==((V3543)))){
+	goto T9280;
+	}
+	goto T9278;
+	
+	goto T9280;
+T9280:;
+	goto T9276;
+	}
+	goto T9278;
+T9278:;
+	goto T9257;
+	
+	goto T9276;
+T9276:;
+	{object V3544;
+	V3544= (V3541)->c.c_cdr;
+	V3541= (V3544);
+	goto T9270;
+	}
+	goto T9272;
+T9272:;
+	goto T9260;
+	}
+	goto T9260;
+T9260:;
+	goto T9255;
+	
+	goto T9257;
+T9257:;
+	V3538= ((object)VV[453]);
+	goto T9249;
+	
+	goto T9255;
+T9255:;
+	{object V3547;
+	{register object V3548;
+	register object V3549;
+	V3548= V3539->c.c_cdr;
+	V3549= (((V3539))->c.c_cdr=(Cnil),((V3539)));
+	goto T9297;
+T9297:;
+	if(((V3548))==Cnil){
+	goto T9299;
+	}
+	{object V3550;
+	object V3551;
+	V3550= (V3548)->c.c_cdr;
+	V3551= (((V3548))->c.c_cdr=((V3549)),((V3548)));
+	V3548= (V3550);
+	V3549= (V3551);
+	goto T9297;
+	}
+	goto T9299;
+T9299:;
+	V3539= (V3549);
+	goto T9293;
+	}
+	goto T9293;
+T9293:;
+	V3547= (V3539);
+	if((V3547->c.c_cdr)==Cnil){
+	goto T9290;
+	}}
+	goto T9287;
+	
+	goto T9290;
+T9290:;
+	V3546= V3539->c.c_car;
+	goto T9286;
+	
+	goto T9287;
+T9287:;
+	V3546= make_cons(((object)VV[123]),(V3539));
+	goto T9286;
+T9286:;
+	V3538= list(3,((object)VV[46]),(V3546),((object)VV[454]));}
+	goto T9249;
+T9249:;
+	V3520= listA(5,(V3521),(V3522),(V3537),(V3538),(((object)VV[316])->s.s_dbind));
+	(((object)VV[316])->s.s_dbind)= (V3520);
+	V3554= (/* ANSI-LOOP::LOOP-MAKE-DESETQ */(*LnkLI180)((V3435)));
+	{object V3556;
+	V3556= (V3434);
+	if(((V3556))==Cnil){
+	goto T9314;
+	}
+	goto T9311;
+	
+	goto T9314;
+T9314:;
+	V3555= Cnil;
+	goto T9310;
+	
+	goto T9311;
+T9311:;
+	{object V3557;
+	V3557= V3556->c.c_car;
+	if(!((Ct)==((V3557)))){
+	goto T9327;
+	}
+	goto T9325;
+	
+	goto T9327;
+T9327:;
+	goto T9323;
+	}
+	goto T9325;
+T9325:;
+	goto T9318;
+	
+	goto T9323;
+T9323:;
+	{register object V3558;
+	V3558= V3556->c.c_cdr;
+	goto T9331;
+T9331:;
+	if(((V3558))==Cnil){
+	goto T9333;
+	}
+	{object V3560;
+	V3560= (V3558)->c.c_car;
+	if(!((Ct)==((V3560)))){
+	goto T9341;
+	}
+	goto T9339;
+	
+	goto T9341;
+T9341:;
+	goto T9337;
+	}
+	goto T9339;
+T9339:;
+	goto T9318;
+	
+	goto T9337;
+T9337:;
+	{object V3561;
+	V3561= (V3558)->c.c_cdr;
+	V3558= (V3561);
+	goto T9331;
+	}
+	goto T9333;
+T9333:;
+	goto T9321;
+	}
+	goto T9321;
+T9321:;
+	goto T9316;
+	
+	goto T9318;
+T9318:;
+	V3555= ((object)VV[453]);
+	goto T9310;
+	
+	goto T9316;
+T9316:;
+	{object V3564;
+	{register object V3565;
+	register object V3566;
+	V3565= V3556->c.c_cdr;
+	V3566= (((V3556))->c.c_cdr=(Cnil),((V3556)));
+	goto T9358;
+T9358:;
+	if(((V3565))==Cnil){
+	goto T9360;
+	}
+	{object V3567;
+	object V3568;
+	V3567= (V3565)->c.c_cdr;
+	V3568= (((V3565))->c.c_cdr=((V3566)),((V3565)));
+	V3565= (V3567);
+	V3566= (V3568);
+	goto T9358;
+	}
+	goto T9360;
+T9360:;
+	V3556= (V3566);
+	goto T9354;
+	}
+	goto T9354;
+T9354:;
+	V3564= (V3556);
+	if((V3564->c.c_cdr)==Cnil){
+	goto T9351;
+	}}
+	goto T9348;
+	
+	goto T9351;
+T9351:;
+	V3563= V3556->c.c_car;
+	goto T9347;
+	
+	goto T9348;
+T9348:;
+	V3563= make_cons(((object)VV[123]),(V3556));
+	goto T9347;
+T9347:;
+	V3555= list(3,((object)VV[46]),(V3563),((object)VV[454]));}
+	goto T9310;
+T9310:;
+	V3570= (/* ANSI-LOOP::LOOP-MAKE-PSETQ */(*LnkLI181)((V3433)));
+	{object V3572;
+	V3572= (V3432);
+	if(((V3572))==Cnil){
+	goto T9373;
+	}
+	goto T9370;
+	
+	goto T9373;
+T9373:;
+	V3571= Cnil;
+	goto T9369;
+	
+	goto T9370;
+T9370:;
+	{object V3573;
+	V3573= V3572->c.c_car;
+	if(!((Ct)==((V3573)))){
+	goto T9386;
+	}
+	goto T9384;
+	
+	goto T9386;
+T9386:;
+	goto T9382;
+	}
+	goto T9384;
+T9384:;
+	goto T9377;
+	
+	goto T9382;
+T9382:;
+	{register object V3574;
+	V3574= V3572->c.c_cdr;
+	goto T9390;
+T9390:;
+	if(((V3574))==Cnil){
+	goto T9392;
+	}
+	{object V3576;
+	V3576= (V3574)->c.c_car;
+	if(!((Ct)==((V3576)))){
+	goto T9400;
+	}
+	goto T9398;
+	
+	goto T9400;
+T9400:;
+	goto T9396;
+	}
+	goto T9398;
+T9398:;
+	goto T9377;
+	
+	goto T9396;
+T9396:;
+	{object V3577;
+	V3577= (V3574)->c.c_cdr;
+	V3574= (V3577);
+	goto T9390;
+	}
+	goto T9392;
+T9392:;
+	goto T9380;
+	}
+	goto T9380;
+T9380:;
+	goto T9375;
+	
+	goto T9377;
+T9377:;
+	V3571= ((object)VV[453]);
+	goto T9369;
+	
+	goto T9375;
+T9375:;
+	{object V3580;
+	{register object V3581;
+	register object V3582;
+	V3581= V3572->c.c_cdr;
+	V3582= (((V3572))->c.c_cdr=(Cnil),((V3572)));
+	goto T9417;
+T9417:;
+	if(((V3581))==Cnil){
+	goto T9419;
+	}
+	{object V3583;
+	object V3584;
+	V3583= (V3581)->c.c_cdr;
+	V3584= (((V3581))->c.c_cdr=((V3582)),((V3581)));
+	V3581= (V3583);
+	V3582= (V3584);
+	goto T9417;
+	}
+	goto T9419;
+T9419:;
+	V3572= (V3582);
+	goto T9413;
+	}
+	goto T9413;
+T9413:;
+	V3580= (V3572);
+	if((V3580->c.c_cdr)==Cnil){
+	goto T9410;
+	}}
+	goto T9407;
+	
+	goto T9410;
+T9410:;
+	V3579= V3572->c.c_car;
+	goto T9406;
+	
+	goto T9407;
+T9407:;
+	V3579= make_cons(((object)VV[123]),(V3572));
+	goto T9406;
+T9406:;
+	V3571= list(3,((object)VV[46]),(V3579),((object)VV[454]));}
+	goto T9369;
+T9369:;
+	V3553= listA(5,(V3554),(V3555),(V3570),(V3571),(((object)VV[319])->s.s_dbind));
+	(((object)VV[319])->s.s_dbind)= (V3553);
+	(void)((/* ANSI-LOOP::LOOP-BIND-BLOCK */(*LnkLI206)()));
+	{object V3586 = Cnil;
+	VMR105(V3586);}
+	goto T9182;
+T9182:;
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	{object V3587;
+	V3587= (((object)VV[304])->s.s_dbind);
+	if((STREF(object ,(V3587),56))==Cnil){
+	goto T9439;
+	}
+	goto T9438;
+	
+	goto T9439;
+T9439:;
+	goto T9437;
+	}
+	goto T9438;
+T9438:;
+	goto T9434;
+	
+	goto T9437;
+T9437:;
+	{object V3589;
+	V3589= (((object)VV[257])->s.s_dbind);
+	V3588= V3589->c.c_car;}
+	{object V3591;
+	V3591= (((object)VV[304])->s.s_dbind);
+	V3590= STREF(object ,(V3591),8);}
+	V3440= (/* ANSI-LOOP::LOOP-LOOKUP-KEYWORD */(*LnkLI208)((V3588),(V3590)));
+	if(((V3440))==Cnil){
+	goto T9431;
+	}
+	goto T9433;
+	
+	goto T9434;
+T9434:;
+	goto T9431;
+	
+	goto T9433;
+T9433:;
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	V3431= (V3440);
+	goto T9430;
+	
+	goto T9431;
+T9431:;
+	goto T9430;
+T9430:;
+	goto T8946;
+	}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-DO-FOR	*/
+
+static object LI134__LOOP_DO_FOR__loop()
+{	 VMB106 VMS106 VMV106
+	{fixnum V3592;
+	V3592= fcall.valp;
+	{object V3593;
+	object V3594;
+	object V3595;
+	object V3596;
+	object V3597;
+	V3593= (/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)());
+	V3594= (fcall.argd=1,/* ANSI-LOOP::LOOP-OPTIONAL-TYPE */(*LnkLI225)((V3593)));
+	V3595= (/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)());
+	V3596= Cnil;
+	V3597= Cnil;
+	V3596= (/* ANSI-LOOP::LOOP-GET-FORM */(*LnkLI211)());
+	if(((V3595))==Cnil){
+	goto T9462;
+	}
+	V3598= tp5(V3595);
+	switch(V3598){
+	case 19:
+	goto T9467;
+T9467:;
+	goto T9461;
+	
+	default:
+	goto T9468;
+T9468:;
+	goto T9459;
+	}
+	goto T9459;
+	
+	goto T9462;
+T9462:;
+	goto T9461;
+T9461:;
+	{object V3600;
+	V3600= (((object)VV[304])->s.s_dbind);
+	V3599= STREF(object ,(V3600),16);}
+	V3597= (/* ANSI-LOOP::LOOP-LOOKUP-KEYWORD */(*LnkLI208)((V3595),(V3599)));
+	if(((V3597))==Cnil){
+	goto T9457;
+	}
+	goto T9458;
+	
+	goto T9459;
+T9459:;
+	goto T9457;
+	
+	goto T9458;
+T9458:;
+	goto T9454;
+	
+	goto T9457;
+T9457:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[455]),(V3595))));
+	goto T9453;
+	
+	goto T9454;
+T9454:;
+	goto T9453;
+T9453:;
+	{object V3601;
+	V3601= (V3597)->c.c_car;
+	V3604= tp4(V3601);
+	if(!((V3604)==(24))){
+	goto T9477;
+	}
+	goto T9476;
+	
+	goto T9477;
+T9477:;
+	goto T9474;
+	
+	goto T9476;
+T9476:;
+	V3603= (V3601);
+	goto T9473;
+	
+	goto T9474;
+T9474:;
+	V3603= (V3601)->s.s_gfdef;
+	goto T9473;
+T9473:;
+	V3605= (V3597)->c.c_cdr;
+	{object V3607;
+	V3607= ({fixnum _v=(fixnum)V3592;object _z,_f=((V3603)),_l=((V3605)),_ll=_l;
+        object _x4=Cnil,_x3=Cnil,_x2=Cnil,_x1=Cnil,_x0=Cnil;
+        char _m=(5-2),_q=_f->fun.fun_minarg>_m ? _f->fun.fun_minarg-_m : 0;
+        char _n=Rset && !_f->fun.fun_argd ? _q : -1;
+        fcall.fun=_f;fcall.valp=_v;fcall.argd=-(5-1);
+        switch (_n) {
+          case 5: if (_l==Cnil) {_n=-1;break;} _x4=_l->c.c_car;_l=_l->c.c_cdr;
+          case 4: if (_l==Cnil) {_n=-1;break;} _x3=_l->c.c_car;_l=_l->c.c_cdr;
+          case 3: if (_l==Cnil) {_n=-1;break;} _x2=_l->c.c_car;_l=_l->c.c_cdr;
+          case 2: if (_l==Cnil) {_n=-1;break;} _x1=_l->c.c_car;_l=_l->c.c_cdr;
+          case 1: if (_l==Cnil) {_n=-1;break;} _x0=_l->c.c_car;_l=_l->c.c_cdr;
+          case 0: if (_n+_m+(_l==Cnil ? 0 : 1)>_f->fun.fun_maxarg) _n=-1; else fcall.argd-=_n;
+          default: break;
+        }
+        switch (_n) {
+          case 5:  _z=_f->fun.fun_self((V3593),(V3596),(V3594),_x4,_x3,_x2,_x1,_x0,_l);break;
+          case 4:  _z=_f->fun.fun_self((V3593),(V3596),(V3594),_x3,_x2,_x1,_x0,_l);break;
+          case 3:  _z=_f->fun.fun_self((V3593),(V3596),(V3594),_x2,_x1,_x0,_l);break;
+          case 2:  _z=_f->fun.fun_self((V3593),(V3596),(V3594),_x1,_x0,_l);break;
+          case 1:  _z=_f->fun.fun_self((V3593),(V3596),(V3594),_x0,_l);break;
+          case 0:  _z=_f->fun.fun_self((V3593),(V3596),(V3594),_l);break;
+          default: _z=call_proc_cs2((V3593),(V3596),(V3594),_ll);break;
+        }
+        if (!(_f)->fun.fun_neval && !(_f)->fun.fun_vv) vs_top=_v ? (object *)_v : sup;
+        _z;});
+	VMRV106(V3607,-2);}}}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-DO-REPEAT	*/
+
+static object LI135__LOOP_DO_REPEAT__loop()
+{	 VMB107 VMS107 VMV107
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-DISALLOW-CONDITIONAL */(*LnkLI222)(((object)VV[456]))));
+	{object V3608;
+	V3608= (/* ANSI-LOOP::LOOP-GET-FORM */(*LnkLI211)());
+	{object V3609;
+	V3610= (fcall.argd=0,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(make_fixnum(0)));
+	V3609= (fcall.argd=3,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V3610),(V3608),((object)VV[457])));
+	{object V3611;
+	V3611= list(3,((object)VV[46]),list(2,((object)VV[458]),list(2,((object)VV[459]),(V3609))),((object)VV[460]));
+	V3612= make_cons((V3611),(((object)VV[316])->s.s_dbind));
+	(((object)VV[316])->s.s_dbind)= (V3612);}
+	{object V3613;
+	V3613= list(3,((object)VV[46]),list(2,((object)VV[458]),list(2,((object)VV[459]),(V3609))),((object)VV[461]));
+	V3614= make_cons((V3613),(((object)VV[319])->s.s_dbind));
+	(((object)VV[319])->s.s_dbind)= (V3614);
+	{object V3615 = (((object)VV[319])->s.s_dbind);
+	VMR107(V3615);}}}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-WHEN-IT-VARIABLE	*/
+
+static object LI136__LOOP_WHEN_IT_VARIABLE__loop()
+{	 VMB108 VMS108 VMV108
+	if(((((object)VV[324])->s.s_dbind))==Cnil){
+	goto T9489;
+	}
+	{object V3616 = (((object)VV[324])->s.s_dbind);
+	VMR108(V3616);}
+	goto T9489;
+T9489:;
+	V3618= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[462])));
+	V3617= (fcall.argd=3,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V3618),Cnil,Cnil));
+	(((object)VV[324])->s.s_dbind)= (V3617);
+	{object V3619 = (((object)VV[324])->s.s_dbind);
+	VMR108(V3619);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-ANSI-FOR-EQUALS	*/
+
+static object LI137__LOOP_ANSI_FOR_EQUALS__loop(object V3623,object V3624,object V3625)
+{	 VMB109 VMS109 VMV109
+	(void)((/* ANSI-LOOP::LOOP-MAKE-ITERATION-VARIABLE */(*LnkLI236)((V3623),Cnil,(V3625))));
+	{object V3627;
+	V3627= (((object)VV[257])->s.s_dbind);
+	V3626= V3627->c.c_car;}
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V3626),((object)VV[464]))))==Cnil){
+	goto T9494;
+	}
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	V3628= list(2,(V3623),(/* ANSI-LOOP::LOOP-GET-FORM */(*LnkLI211)()));
+	{object V3629 = listA(7,Cnil,(V3628),Cnil,Cnil,Cnil,list(2,(V3623),(V3624)),((object)VV[465]));
+	VMR109(V3629);}
+	goto T9494;
+T9494:;
+	{object V3630 = listA(3,Cnil,list(2,(V3623),(V3624)),((object)VV[466]));
+	VMR109(V3630);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-FOR-ACROSS	*/
+
+static object LI138__LOOP_FOR_ACROSS__loop(object V3634,object V3635,object V3636)
+{	 VMB110 VMS110 VMV110
+	(void)((/* ANSI-LOOP::LOOP-MAKE-ITERATION-VARIABLE */(*LnkLI236)((V3634),Cnil,(V3636))));
+	{object V3637;
+	object V3638;
+	V3637= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[467])));
+	V3638= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[468])));
+	register object  V3640;
+	object V3639[2];
+	#define V3641 V3639[0]
+	#define V3642 V3639[1]
+	
+	{
+	V3640= (fcall.valp=(fixnum)V3639,fcall.argd=2,/* ANSI-LOOP::LOOP-CONSTANT-FOLD-IF-POSSIBLE */(*LnkLI237)((V3635),((object)VV[470])));
+	
+	vs_top=sup;
+	if(((V3640))==Cnil){
+	goto T9515;
+	}
+	V3644= tp2(V3640);
+	if(!((V3644)==(0))){
+	goto T9518;
+	}
+	goto T9514;
+	
+	goto T9518;
+T9518:;
+	goto T9512;
+	
+	goto T9515;
+T9515:;
+	goto T9512;
+	
+	goto T9514;
+T9514:;
+	V3645= V3640->c.c_car;
+	if(!(((V3645))==(((object)VV[471])))){
+	goto T9509;
+	}
+	goto T9511;
+	
+	goto T9512;
+T9512:;
+	goto T9509;
+	
+	goto T9511;
+T9511:;
+	{object V3646;
+	V3646= V3640->c.c_cdr;
+	V3643= V3646->c.c_car;
+	goto T9508;
+	}
+	goto T9509;
+T9509:;
+	V3643= ((object)VV[470]);
+	goto T9508;
+T9508:;
+	(void)((fcall.argd=3,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V3637),(V3640),(V3643))));
+	(void)((fcall.argd=3,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V3638),make_fixnum(0),((object)VV[226]))));
+	{fixnum V3647;
+	object V3648;
+	object V3649;
+	object V3650;
+	object V3651;
+	object V3652;
+	V3647= 0;
+	if(((V3641))==Cnil){
+	goto T9529;
+	}
+	goto T9526;
+	
+	goto T9529;
+T9529:;
+	{object V3653;
+	V3653= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[472])));
+	{object V3654;
+	V3654= list(3,((object)VV[47]),(V3653),list(2,((object)VV[473]),(V3637)));
+	V3655= make_cons((V3654),(((object)VV[314])->s.s_dbind));
+	(((object)VV[314])->s.s_dbind)= (V3655);}
+	V3648= (fcall.argd=3,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V3653),make_fixnum(0),((object)VV[226])));
+	goto T9525;
+	}
+	goto T9526;
+T9526:;
+	V3647= length((V3642));
+	V3648= CMPmake_fixnum(V3647);
+	goto T9525;
+T9525:;
+	V3649= list(3,((object)VV[474]),(V3638),(V3648));
+	V3650= (V3649);
+	V3651= list(2,(V3634),list(3,((object)VV[475]),(V3637),(V3638)));
+	V3652= list(2,(V3638),list(2,((object)VV[435]),(V3638)));
+	if(((V3641))==Cnil){
+	goto T9540;
+	}
+	V3649= ((V3647)==(0)?Ct:Cnil);
+	if(!((V3647)<=(1))){
+	goto T9545;
+	}
+	V3650= Ct;
+	goto T9539;
+	
+	goto T9545;
+T9545:;
+	goto T9539;
+	
+	goto T9540;
+T9540:;
+	goto T9539;
+T9539:;
+	if(!(((V3649))==((V3650)))){
+	goto T9553;
+	}
+	goto T9550;
+	
+	goto T9553;
+T9553:;
+	V3656= list(4,(V3649),(V3651),Cnil,(V3652));
+	goto T9549;
+	
+	goto T9550;
+T9550:;
+	V3656= Cnil;
+	goto T9549;
+T9549:;
+	{object V3657 = listA(5,(V3650),(V3651),Cnil,(V3652),(V3656));
+	VMR110(V3657);}}
+	#undef V3641
+	#undef V3642
+	
+	}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-LIST-STEP	*/
+
+static object LI139__LOOP_LIST_STEP__loop(object V3659)
+{	 VMB111 VMS111 VMV111
+	{fixnum V3660;
+	V3660= fcall.valp;
+	{object V3661;
+	{object V3663;
+	V3663= (((object)VV[257])->s.s_dbind);
+	V3662= V3663->c.c_car;}
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V3662),((object)VV[476]))))==Cnil){
+	goto T9557;
+	}
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	V3661= (/* ANSI-LOOP::LOOP-GET-FORM */(*LnkLI211)());
+	goto T9556;
+	
+	goto T9557;
+T9557:;
+	V3661= ((object)VV[477]);
+	goto T9556;
+T9556:;
+	if(((V3661))==Cnil){
+	goto T9568;
+	}
+	V3664= tp2(V3661);
+	if(!((V3664)==(0))){
+	goto T9571;
+	}
+	goto T9567;
+	
+	goto T9571;
+T9571:;
+	goto T9565;
+	
+	goto T9568;
+T9568:;
+	goto T9565;
+	
+	goto T9567;
+T9567:;
+	V3665= V3661->c.c_car;
+	if(!(((V3665))==(((object)VV[244])))){
+	goto T9562;
+	}
+	goto T9564;
+	
+	goto T9565;
+T9565:;
+	goto T9562;
+	
+	goto T9564;
+T9564:;
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-WARN */(*LnkLI185)(((object)VV[478]))));
+	V3666= list(3,((object)VV[479]),(V3661),(V3659));
+	{object V3667;
+	if (V3660) {
+	#define V3668 ((object *)V3660)[0]
+	V3667= ({object  _t0=(V3666);object  _t1=Cnil;
+	V3668= (_t1);_t0;});
+	#undef V3668
+	} else {
+	V3667= ({object  _t0=(V3666);object  _t1=Cnil;
+	(void)((_t1));_t0;});
+	}
+	VMRV111(V3667,1);}
+	goto T9562;
+T9562:;
+	if(((V3661))==Cnil){
+	goto T9582;
+	}
+	V3669= tp2(V3661);
+	if(!((V3669)==(0))){
+	goto T9585;
+	}
+	goto T9581;
+	
+	goto T9585;
+T9585:;
+	goto T9579;
+	
+	goto T9582;
+T9582:;
+	goto T9579;
+	
+	goto T9581;
+T9581:;
+	V3670= V3661->c.c_car;
+	if(!(((V3670))==(((object)VV[80])))){
+	goto T9576;
+	}
+	goto T9578;
+	
+	goto T9579;
+T9579:;
+	goto T9576;
+	
+	goto T9578;
+T9578:;
+	{object V3672;
+	V3672= V3661->c.c_cdr;
+	V3671= V3672->c.c_car;}
+	V3673= list(2,(V3671),(V3659));
+	{object V3675;
+	V3675= V3661->c.c_cdr;
+	V3674= V3675->c.c_car;}
+	{object V3676;
+	if (V3660) {
+	#define V3677 ((object *)V3660)[0]
+	V3676= ({object  _t0=(V3673);object  _t1=(V3674);
+	V3677= (_t1);_t0;});
+	#undef V3677
+	} else {
+	V3676= ({object  _t0=(V3673);object  _t1=(V3674);
+	(void)((_t1));_t0;});
+	}
+	VMRV111(V3676,1);}
+	goto T9576;
+T9576:;
+	V3678= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[480])));
+	V3679= (fcall.argd=3,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V3678),(V3661),((object)VV[80])));
+	V3680= list(3,((object)VV[479]),(V3679),(V3659));
+	{object V3681;
+	if (V3660) {
+	#define V3682 ((object *)V3660)[0]
+	V3681= ({object  _t0=(V3680);object  _t1=Cnil;
+	V3682= (_t1);_t0;});
+	#undef V3682
+	} else {
+	V3681= ({object  _t0=(V3680);object  _t1=Cnil;
+	(void)((_t1));_t0;});
+	}
+	VMRV111(V3681,1);}}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-FOR-ON	*/
+
+static object LI140__LOOP_FOR_ON__loop(object V3686,object V3687,object V3688)
+{	 VMB112 VMS112 VMV112
+	register object  V3690;
+	object V3689[2];
+	#define V3691 V3689[0]
+	#define V3692 V3689[1]
+	
+	{
+	V3690= (fcall.valp=(fixnum)V3689,fcall.argd=1,/* ANSI-LOOP::LOOP-CONSTANT-FOLD-IF-POSSIBLE */(*LnkLI237)((V3687)));
+	
+	vs_top=sup;
+	{object V3693;
+	V3693= (V3686);
+	if(((V3686))==Cnil){
+	goto T9602;
+	}
+	V3694= tp5(V3686);
+	switch(V3694){
+	case 19:
+	goto T9607;
+T9607:;
+	goto T9601;
+	
+	default:
+	goto T9608;
+T9608:;
+	goto T9599;
+	}
+	goto T9599;
+	
+	goto T9602;
+T9602:;
+	goto T9599;
+	
+	goto T9601;
+T9601:;
+	(void)((/* ANSI-LOOP::LOOP-MAKE-ITERATION-VARIABLE */(*LnkLI236)((V3686),(V3690),(V3688))));
+	goto T9598;
+	
+	goto T9599;
+T9599:;
+	V3693= (fcall.argd=0,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(make_fixnum(0)));
+	(void)((fcall.argd=3,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V3693),(V3690),((object)VV[40]))));
+	(void)((/* ANSI-LOOP::LOOP-MAKE-ITERATION-VARIABLE */(*LnkLI236)((V3686),Cnil,(V3688))));
+	goto T9598;
+T9598:;
+	register object  V3696;
+	object V3695[1];
+	#define V3697 V3695[0]
+	
+	{
+	V3696= (fcall.valp=(fixnum)V3695,/* ANSI-LOOP::LOOP-LIST-STEP */(*LnkLI238)((V3693)));
+	
+	vs_top=sup;
+	{object V3698;
+	object V3699;
+	V3700= (((V3686))==((V3693))?Ct:Cnil);
+	V3701= list(2,((object)VV[482]),(V3693));
+	V3698= (/* ANSI-LOOP::HIDE-VARIABLE-REFERENCE */(*LnkLI174)((V3700),(V3693),(V3701)));
+	V3699= (V3698);
+	if(((V3691))==Cnil){
+	goto T9621;
+	}
+	V3702= tp2(V3692);
+	if(!((V3702)==(0))){
+	goto T9624;
+	}
+	goto T9620;
+	
+	goto T9624;
+T9624:;
+	goto T9618;
+	
+	goto T9621;
+T9621:;
+	goto T9618;
+	
+	goto T9620;
+T9620:;
+	if(((V3692))==Cnil){
+	goto T9628;
+	}
+	V3698= Cnil;
+	goto T9627;
+	
+	goto T9628;
+T9628:;
+	V3698= Ct;
+	goto T9627;
+T9627:;
+	goto T9617;
+	
+	goto T9618;
+T9618:;
+	goto T9617;
+T9617:;
+	if(!(((V3686))==((V3693)))){
+	goto T9631;
+	}
+	{object V3703 = list(8,Cnil,list(2,(V3693),(/* ANSI-LOOP::HIDE-VARIABLE-REFERENCE */(*LnkLI174)(Ct,(V3693),(V3696)))),(V3699),Cnil,Cnil,Cnil,(V3698),Cnil);
+	VMR112(V3703);}
+	goto T9631;
+T9631:;
+	{object V3704;
+	object V3705;
+	V3704= list(2,(V3686),(V3693));
+	V3705= list(2,(V3693),(V3696));
+	if(!(((V3698))==((V3699)))){
+	goto T9640;
+	}
+	goto T9637;
+	
+	goto T9640;
+T9640:;
+	V3706= list(4,(V3698),(V3704),Cnil,(V3705));
+	goto T9636;
+	
+	goto T9637;
+T9637:;
+	V3706= Cnil;
+	goto T9636;
+T9636:;
+	{object V3707 = listA(5,(V3699),(V3704),Cnil,(V3705),(V3706));
+	VMR112(V3707);}}}
+	#undef V3697
+	
+	}}
+	#undef V3691
+	#undef V3692
+	
+	}
+}
+/*	local entry for function ANSI-LOOP::LOOP-FOR-IN	*/
+
+static object LI141__LOOP_FOR_IN__loop(object V3711,object V3712,object V3713)
+{	 VMB113 VMS113 VMV113
+	register object  V3715;
+	object V3714[2];
+	#define V3716 V3714[0]
+	#define V3717 V3714[1]
+	
+	{
+	V3715= (fcall.valp=(fixnum)V3714,fcall.argd=1,/* ANSI-LOOP::LOOP-CONSTANT-FOLD-IF-POSSIBLE */(*LnkLI237)((V3712)));
+	
+	vs_top=sup;
+	{object V3718;
+	V3718= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[483])));
+	(void)((/* ANSI-LOOP::LOOP-MAKE-ITERATION-VARIABLE */(*LnkLI236)((V3711),Cnil,(V3713))));
+	(void)((fcall.argd=3,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V3718),(V3715),((object)VV[40]))));
+	register object  V3720;
+	object V3719[1];
+	#define V3721 V3719[0]
+	
+	{
+	V3720= (fcall.valp=(fixnum)V3719,/* ANSI-LOOP::LOOP-LIST-STEP */(*LnkLI238)((V3718)));
+	
+	vs_top=sup;
+	{object V3722;
+	object V3723;
+	object V3724;
+	object V3725;
+	V3722= list(2,((object)VV[484]),(V3718));
+	V3723= (V3722);
+	V3724= list(2,(V3711),list(2,((object)VV[185]),(V3718)));
+	V3725= list(2,(V3718),(V3720));
+	if(((V3716))==Cnil){
+	goto T9661;
+	}
+	V3726= tp2(V3717);
+	if(!((V3726)==(0))){
+	goto T9664;
+	}
+	goto T9660;
+	
+	goto T9664;
+T9664:;
+	goto T9658;
+	
+	goto T9661;
+T9661:;
+	goto T9658;
+	
+	goto T9660;
+T9660:;
+	if(((V3717))==Cnil){
+	goto T9668;
+	}
+	V3722= Cnil;
+	goto T9667;
+	
+	goto T9668;
+T9668:;
+	V3722= Ct;
+	goto T9667;
+T9667:;
+	goto T9657;
+	
+	goto T9658;
+T9658:;
+	goto T9657;
+T9657:;
+	if(!(((V3722))==((V3723)))){
+	goto T9675;
+	}
+	goto T9672;
+	
+	goto T9675;
+T9675:;
+	V3727= list(4,(V3722),(V3724),Cnil,(V3725));
+	goto T9671;
+	
+	goto T9672;
+T9672:;
+	V3727= Cnil;
+	goto T9671;
+T9671:;
+	{object V3728 = listA(5,(V3723),(V3724),Cnil,(V3725),(V3727));
+	VMR113(V3728);}}
+	#undef V3721
+	
+	}}
+	#undef V3716
+	#undef V3717
+	
+	}
+}
+/*	local entry for function ANSI-LOOP::MAKE-LOOP-PATH	*/
+
+static object LI142__MAKE_LOOP_PATH__loop(object V3730,...)
+{	 VMB114 VMS114 VMV114
+	va_list ap;
+	va_start(ap,V3730);
+	{register object V3731;
+	object V3732;
+	register object V3733;
+	object V3734;
+	register object V3735;
+	object V3736;
+	register object V3737;
+	object V3738;
+	register object V3739;
+	object V3740;
+	register object V3741;
+	register object V3742;
+	int8_t V3743;
+	register int8_t V3744;
+	register object V3745;
+	register object V3746;
+	object V3747;
+	register object V3748;
+	object V3749;
+	object V3750;
+	object V3751;
+	object V3752;
+	object V3753;
+	object V3754;
+	object V3755;
+	V3731= Cnil;
+	V3732= Cnil;
+	V3733= Cnil;
+	V3734= Cnil;
+	V3735= Cnil;
+	V3736= Cnil;
+	V3737= Cnil;
+	V3738= Cnil;
+	V3739= Cnil;
+	V3740= Cnil;
+	V3741= Ct;
+	V3742= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V3742))==Cnil){
+	goto T9679;
+	}
+	V3743= -((char)fcall.argd);
+	goto T9678;
+	
+	goto T9679;
+T9679:;
+	V3743= fcall.argd;
+	goto T9678;
+T9678:;
+	V3744= (V3743)-(0);
+	V3745= Cnil;
+	V3746= Cnil;
+	V3747= Cnil;
+	V3748= Cnil;
+	V3749= Cnil;
+	V3750= Cnil;
+	{register object V3756;
+	register object V3757;
+	V3756= Cnil;
+	V3757= Cnil;
+	goto T9686;
+T9686:;
+	{object V3758;
+	if(((V3742))==Cnil){
+	goto T9696;
+	}
+	if(!((V3744)==(1))){
+	goto T9699;
+	}
+	V3744= 0;
+	if(((V3741))==Cnil){
+	goto T9705;
+	}
+	V3741= Cnil;
+	V3745= (V3730);
+	goto T9702;
+	
+	goto T9705;
+T9705:;
+	V3745= va_arg(ap,object);
+	goto T9702;
+T9702:;
+	V3758= (V3745);
+	goto T9695;
+	
+	goto T9699;
+T9699:;
+	V3758= Cnil;
+	goto T9695;
+	
+	goto T9696;
+T9696:;
+	V3758= Cnil;
+	goto T9695;
+T9695:;
+	if(((V3758))==Cnil){
+	goto T9710;
+	}
+	goto T9694;
+	
+	goto T9710;
+T9710:;
+	{object V3759;
+	V3759= ((V3744)>(0)?Ct:Cnil);
+	if(((V3759))==Cnil){
+	goto T9714;
+	}
+	goto T9694;
+	
+	goto T9714;
+T9714:;
+	if(((V3745))==Cnil){
+	goto T9717;
+	}
+	goto T9694;
+	
+	goto T9717;
+T9717:;
+	goto T9693;
+	}}
+	goto T9694;
+T9694:;
+	goto T9691;
+	
+	goto T9693;
+T9693:;
+	goto T9688;
+	
+	goto T9691;
+T9691:;
+	if(((V3742))==Cnil){
+	goto T9723;
+	}
+	if(!((V3744)==(1))){
+	goto T9726;
+	}
+	V3744= 0;
+	if(((V3741))==Cnil){
+	goto T9735;
+	}
+	V3741= Cnil;
+	V3745= (V3730);
+	goto T9732;
+	
+	goto T9735;
+T9735:;
+	V3745= va_arg(ap,object);
+	goto T9732;
+T9732:;
+	if(((V3745))==Cnil){
+	goto T9729;
+	}
+	goto T9722;
+	
+	goto T9729;
+T9729:;
+	goto T9722;
+	
+	goto T9726;
+T9726:;
+	goto T9722;
+	
+	goto T9723;
+T9723:;
+	goto T9722;
+T9722:;
+	if(!((V3744)>(0))){
+	goto T9740;
+	}
+	V3744= (V3744)-(1);
+	if(((V3741))==Cnil){
+	goto T9745;
+	}
+	V3741= Cnil;
+	V3756= (V3730);
+	goto T9721;
+	
+	goto T9745;
+T9745:;
+	V3756= va_arg(ap,object);
+	goto T9721;
+	
+	goto T9740;
+T9740:;
+	if(((V3745))==Cnil){
+	goto T9750;
+	}
+	{object V3760;
+	V3760= (V3745)->c.c_car;
+	V3745= (V3745)->c.c_cdr;
+	V3756= (V3760);
+	goto T9721;
+	}
+	goto T9750;
+T9750:;
+	V3756= Cnil;
+	goto T9721;
+T9721:;
+	if(((V3742))==Cnil){
+	goto T9758;
+	}
+	if(!((V3744)==(1))){
+	goto T9761;
+	}
+	V3744= 0;
+	if(((V3741))==Cnil){
+	goto T9770;
+	}
+	V3741= Cnil;
+	V3745= (V3730);
+	goto T9767;
+	
+	goto T9770;
+T9770:;
+	V3745= va_arg(ap,object);
+	goto T9767;
+T9767:;
+	if(((V3745))==Cnil){
+	goto T9764;
+	}
+	goto T9757;
+	
+	goto T9764;
+T9764:;
+	goto T9757;
+	
+	goto T9761;
+T9761:;
+	goto T9757;
+	
+	goto T9758;
+T9758:;
+	goto T9757;
+T9757:;
+	if(!((V3744)>(0))){
+	goto T9775;
+	}
+	V3744= (V3744)-(1);
+	if(((V3741))==Cnil){
+	goto T9780;
+	}
+	V3741= Cnil;
+	V3757= (V3730);
+	goto T9756;
+	
+	goto T9780;
+T9780:;
+	V3757= va_arg(ap,object);
+	goto T9756;
+	
+	goto T9775;
+T9775:;
+	if(((V3745))==Cnil){
+	goto T9785;
+	}
+	{object V3763;
+	V3763= (V3745)->c.c_car;
+	V3745= (V3745)->c.c_cdr;
+	V3757= (V3763);
+	goto T9756;
+	}
+	goto T9785;
+T9785:;
+	V3766= make_cons((V3756),Cnil);
+	V3757= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[485]),((object)VV[59]),((object)VV[486]),(V3766)));
+	goto T9756;
+T9756:;
+	if(!(((V3756))==(((object)VV[487])))){
+	goto T9792;
+	}
+	if(((V3731))==Cnil){
+	goto T9798;
+	}
+	goto T9795;
+	
+	goto T9798;
+T9798:;
+	V3732= (V3757);
+	V3731= Ct;
+	goto T9791;
+	
+	goto T9795;
+T9795:;
+	goto T9791;
+	
+	goto T9792;
+T9792:;
+	if(!(((V3756))==(((object)VV[488])))){
+	goto T9803;
+	}
+	if(((V3733))==Cnil){
+	goto T9809;
+	}
+	goto T9806;
+	
+	goto T9809;
+T9809:;
+	V3734= (V3757);
+	V3733= Ct;
+	goto T9791;
+	
+	goto T9806;
+T9806:;
+	goto T9791;
+	
+	goto T9803;
+T9803:;
+	if(!(((V3756))==(((object)VV[489])))){
+	goto T9814;
+	}
+	if(((V3735))==Cnil){
+	goto T9820;
+	}
+	goto T9817;
+	
+	goto T9820;
+T9820:;
+	V3736= (V3757);
+	V3735= Ct;
+	goto T9791;
+	
+	goto T9817;
+T9817:;
+	goto T9791;
+	
+	goto T9814;
+T9814:;
+	if(!(((V3756))==(((object)VV[490])))){
+	goto T9825;
+	}
+	if(((V3737))==Cnil){
+	goto T9831;
+	}
+	goto T9828;
+	
+	goto T9831;
+T9831:;
+	V3738= (V3757);
+	V3737= Ct;
+	goto T9791;
+	
+	goto T9828;
+T9828:;
+	goto T9791;
+	
+	goto T9825;
+T9825:;
+	if(!(((V3756))==(((object)VV[491])))){
+	goto T9836;
+	}
+	if(((V3739))==Cnil){
+	goto T9842;
+	}
+	goto T9839;
+	
+	goto T9842;
+T9842:;
+	V3740= (V3757);
+	V3739= Ct;
+	goto T9791;
+	
+	goto T9839;
+T9839:;
+	goto T9791;
+	
+	goto T9836;
+T9836:;
+	if(!(((V3756))==(((object)VV[67])))){
+	goto T9847;
+	}
+	if(((V3746))==Cnil){
+	goto T9853;
+	}
+	goto T9850;
+	
+	goto T9853;
+T9853:;
+	V3747= (V3757);
+	V3746= Ct;
+	goto T9791;
+	
+	goto T9850;
+T9850:;
+	goto T9791;
+	
+	goto T9847;
+T9847:;
+	if(((V3748))==Cnil){
+	goto T9861;
+	}
+	goto T9858;
+	
+	goto T9861;
+T9861:;
+	V3749= (V3757);
+	V3748= Ct;
+	V3750= (V3756);
+	goto T9791;
+	
+	goto T9858;
+T9858:;
+	goto T9791;
+T9791:;
+	goto T9686;
+	
+	goto T9688;
+T9688:;
+	goto T9684;
+	}
+	goto T9684;
+T9684:;
+	if(((V3731))==Cnil){
+	goto T9870;
+	}
+	V3751= (V3732);
+	goto T9683;
+	
+	goto T9870;
+T9870:;
+	V3751= Cnil;
+	goto T9683;
+T9683:;
+	if(((V3733))==Cnil){
+	goto T9874;
+	}
+	V3752= (V3734);
+	goto T9873;
+	
+	goto T9874;
+T9874:;
+	V3752= Cnil;
+	goto T9873;
+T9873:;
+	if(((V3735))==Cnil){
+	goto T9878;
+	}
+	V3753= (V3736);
+	goto T9877;
+	
+	goto T9878;
+T9878:;
+	V3753= Cnil;
+	goto T9877;
+T9877:;
+	if(((V3737))==Cnil){
+	goto T9882;
+	}
+	V3754= (V3738);
+	goto T9881;
+	
+	goto T9882;
+T9882:;
+	V3754= Cnil;
+	goto T9881;
+T9881:;
+	if(((V3739))==Cnil){
+	goto T9886;
+	}
+	V3755= (V3740);
+	goto T9885;
+	
+	goto T9886;
+T9886:;
+	V3755= Cnil;
+	goto T9885;
+T9885:;
+	if(((V3747))==Cnil){
+	goto T9893;
+	}
+	goto T9890;
+	
+	goto T9893;
+T9893:;
+	if(((V3748))==Cnil){
+	goto T9895;
+	}
+	V3767= list(2,(V3750),(V3749));
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[492]),((object)VV[69]),((object)VV[493]),(V3767))));
+	goto T9889;
+	
+	goto T9895;
+T9895:;
+	goto T9889;
+	
+	goto T9890;
+T9890:;
+	goto T9889;
+T9889:;
+	{object V3768 = (fcall.fun=((object)VV[71])->s.s_gfdef,fcall.argd=6,/* SYSTEM::MAKE-STRUCTURE */(*LnkLI164)(((object)VV[494]),(V3751),(V3752),(V3753),(V3754),(V3755)));
+	VMR114(V3768);}}
+	va_end(ap);
+}
+/*	local entry for function ANSI-LOOP::LOOP-PATH-NAMES	*/
+
+static object LI143__LOOP_PATH_NAMES__loop(object V3770)
+{	 VMB115 VMS115 VMV115
+	V3771= tp6(V3770);
+	if(!((V3771)==((fixnum)544))){
+	goto T9908;
+	}
+	goto T9907;
+	
+	goto T9908;
+T9908:;
+	goto T9905;
+	
+	goto T9907;
+T9907:;
+	{object V3772;
+	{fixnum V3773;
+	V3773= ((fixnum)V3770);
+	V3772= ((object*)V3773)[(fixnum)1];}
+	{fixnum V3775;
+	{fixnum V3776;
+	V3776= ((fixnum)V3772);
+	V3775= ((fixnum*)V3776)[(fixnum)2];}
+	V3774= ((object*)V3775)[(fixnum)0];}
+	if(!(((V3774))==(((object)VV[494])))){
+	goto T9913;
+	}
+	goto T9904;
+	
+	goto T9913;
+T9913:;
+	{register object V3777;
+	{fixnum V3778;
+	{fixnum V3779;
+	V3779= ((fixnum)V3772);
+	V3778= ((fixnum*)V3779)[(fixnum)2];}
+	V3777= ((object*)V3778)[(fixnum)4];}
+	goto T9923;
+T9923:;
+	if(((V3777))==Cnil){
+	goto T9925;
+	}
+	{fixnum V3782;
+	{fixnum V3783;
+	V3783= ((fixnum)(V3777));
+	V3782= ((fixnum*)V3783)[(fixnum)2];}
+	V3780= ((object*)V3782)[(fixnum)0];}
+	if(!(((V3780))==(((object)VV[494])))){
+	goto T9927;
+	}
+	goto T9904;
+	
+	goto T9927;
+T9927:;
+	{object V3784;
+	{fixnum V3786;
+	{fixnum V3787;
+	V3787= ((fixnum)(V3777));
+	V3786= ((fixnum*)V3787)[(fixnum)2];}
+	V3784= ((object*)V3786)[(fixnum)4];}
+	V3777= (V3784);
+	goto T9923;
+	}
+	goto T9925;
+T9925:;
+	goto T9903;
+	}}
+	goto T9905;
+T9905:;
+	goto T9903;
+	
+	goto T9904;
+T9904:;
+	goto T9902;
+	
+	goto T9903;
+T9903:;
+	goto T9900;
+	
+	goto T9902;
+T9902:;
+	goto T9899;
+	
+	goto T9900;
+T9900:;
+	V3770= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V3770),((object)VV[494]),Cnil));
+	goto T9899;
+T9899:;
+	{object V3788 = STREF(object ,(V3770),0);
+	VMR115(V3788);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-PATH-PREPOSITION-GROUPS	*/
+
+static object LI144__LOOP_PATH_PREPOSITION_GROUPS__loop(object V3790)
+{	 VMB116 VMS116 VMV116
+	V3791= tp6(V3790);
+	if(!((V3791)==((fixnum)544))){
+	goto T9949;
+	}
+	goto T9948;
+	
+	goto T9949;
+T9949:;
+	goto T9946;
+	
+	goto T9948;
+T9948:;
+	{object V3792;
+	{fixnum V3793;
+	V3793= ((fixnum)V3790);
+	V3792= ((object*)V3793)[(fixnum)1];}
+	{fixnum V3795;
+	{fixnum V3796;
+	V3796= ((fixnum)V3792);
+	V3795= ((fixnum*)V3796)[(fixnum)2];}
+	V3794= ((object*)V3795)[(fixnum)0];}
+	if(!(((V3794))==(((object)VV[494])))){
+	goto T9954;
+	}
+	goto T9945;
+	
+	goto T9954;
+T9954:;
+	{register object V3797;
+	{fixnum V3798;
+	{fixnum V3799;
+	V3799= ((fixnum)V3792);
+	V3798= ((fixnum*)V3799)[(fixnum)2];}
+	V3797= ((object*)V3798)[(fixnum)4];}
+	goto T9964;
+T9964:;
+	if(((V3797))==Cnil){
+	goto T9966;
+	}
+	{fixnum V3802;
+	{fixnum V3803;
+	V3803= ((fixnum)(V3797));
+	V3802= ((fixnum*)V3803)[(fixnum)2];}
+	V3800= ((object*)V3802)[(fixnum)0];}
+	if(!(((V3800))==(((object)VV[494])))){
+	goto T9968;
+	}
+	goto T9945;
+	
+	goto T9968;
+T9968:;
+	{object V3804;
+	{fixnum V3806;
+	{fixnum V3807;
+	V3807= ((fixnum)(V3797));
+	V3806= ((fixnum*)V3807)[(fixnum)2];}
+	V3804= ((object*)V3806)[(fixnum)4];}
+	V3797= (V3804);
+	goto T9964;
+	}
+	goto T9966;
+T9966:;
+	goto T9944;
+	}}
+	goto T9946;
+T9946:;
+	goto T9944;
+	
+	goto T9945;
+T9945:;
+	goto T9943;
+	
+	goto T9944;
+T9944:;
+	goto T9941;
+	
+	goto T9943;
+T9943:;
+	goto T9940;
+	
+	goto T9941;
+T9941:;
+	V3790= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V3790),((object)VV[494]),Cnil));
+	goto T9940;
+T9940:;
+	{object V3808 = STREF(object ,(V3790),8);
+	VMR116(V3808);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-PATH-INCLUSIVE-PERMITTED	*/
+
+static object LI145__LOOP_PATH_INCLUSIVE_PERMITTED__loop(object V3810)
+{	 VMB117 VMS117 VMV117
+	V3811= tp6(V3810);
+	if(!((V3811)==((fixnum)544))){
+	goto T9990;
+	}
+	goto T9989;
+	
+	goto T9990;
+T9990:;
+	goto T9987;
+	
+	goto T9989;
+T9989:;
+	{object V3812;
+	{fixnum V3813;
+	V3813= ((fixnum)V3810);
+	V3812= ((object*)V3813)[(fixnum)1];}
+	{fixnum V3815;
+	{fixnum V3816;
+	V3816= ((fixnum)V3812);
+	V3815= ((fixnum*)V3816)[(fixnum)2];}
+	V3814= ((object*)V3815)[(fixnum)0];}
+	if(!(((V3814))==(((object)VV[494])))){
+	goto T9995;
+	}
+	goto T9986;
+	
+	goto T9995;
+T9995:;
+	{register object V3817;
+	{fixnum V3818;
+	{fixnum V3819;
+	V3819= ((fixnum)V3812);
+	V3818= ((fixnum*)V3819)[(fixnum)2];}
+	V3817= ((object*)V3818)[(fixnum)4];}
+	goto T10005;
+T10005:;
+	if(((V3817))==Cnil){
+	goto T10007;
+	}
+	{fixnum V3822;
+	{fixnum V3823;
+	V3823= ((fixnum)(V3817));
+	V3822= ((fixnum*)V3823)[(fixnum)2];}
+	V3820= ((object*)V3822)[(fixnum)0];}
+	if(!(((V3820))==(((object)VV[494])))){
+	goto T10009;
+	}
+	goto T9986;
+	
+	goto T10009;
+T10009:;
+	{object V3824;
+	{fixnum V3826;
+	{fixnum V3827;
+	V3827= ((fixnum)(V3817));
+	V3826= ((fixnum*)V3827)[(fixnum)2];}
+	V3824= ((object*)V3826)[(fixnum)4];}
+	V3817= (V3824);
+	goto T10005;
+	}
+	goto T10007;
+T10007:;
+	goto T9985;
+	}}
+	goto T9987;
+T9987:;
+	goto T9985;
+	
+	goto T9986;
+T9986:;
+	goto T9984;
+	
+	goto T9985;
+T9985:;
+	goto T9982;
+	
+	goto T9984;
+T9984:;
+	goto T9981;
+	
+	goto T9982;
+T9982:;
+	V3810= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V3810),((object)VV[494]),Cnil));
+	goto T9981;
+T9981:;
+	{object V3828 = STREF(object ,(V3810),16);
+	VMR117(V3828);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-PATH-FUNCTION	*/
+
+static object LI146__LOOP_PATH_FUNCTION__loop(object V3830)
+{	 VMB118 VMS118 VMV118
+	V3831= tp6(V3830);
+	if(!((V3831)==((fixnum)544))){
+	goto T10031;
+	}
+	goto T10030;
+	
+	goto T10031;
+T10031:;
+	goto T10028;
+	
+	goto T10030;
+T10030:;
+	{object V3832;
+	{fixnum V3833;
+	V3833= ((fixnum)V3830);
+	V3832= ((object*)V3833)[(fixnum)1];}
+	{fixnum V3835;
+	{fixnum V3836;
+	V3836= ((fixnum)V3832);
+	V3835= ((fixnum*)V3836)[(fixnum)2];}
+	V3834= ((object*)V3835)[(fixnum)0];}
+	if(!(((V3834))==(((object)VV[494])))){
+	goto T10036;
+	}
+	goto T10027;
+	
+	goto T10036;
+T10036:;
+	{register object V3837;
+	{fixnum V3838;
+	{fixnum V3839;
+	V3839= ((fixnum)V3832);
+	V3838= ((fixnum*)V3839)[(fixnum)2];}
+	V3837= ((object*)V3838)[(fixnum)4];}
+	goto T10046;
+T10046:;
+	if(((V3837))==Cnil){
+	goto T10048;
+	}
+	{fixnum V3842;
+	{fixnum V3843;
+	V3843= ((fixnum)(V3837));
+	V3842= ((fixnum*)V3843)[(fixnum)2];}
+	V3840= ((object*)V3842)[(fixnum)0];}
+	if(!(((V3840))==(((object)VV[494])))){
+	goto T10050;
+	}
+	goto T10027;
+	
+	goto T10050;
+T10050:;
+	{object V3844;
+	{fixnum V3846;
+	{fixnum V3847;
+	V3847= ((fixnum)(V3837));
+	V3846= ((fixnum*)V3847)[(fixnum)2];}
+	V3844= ((object*)V3846)[(fixnum)4];}
+	V3837= (V3844);
+	goto T10046;
+	}
+	goto T10048;
+T10048:;
+	goto T10026;
+	}}
+	goto T10028;
+T10028:;
+	goto T10026;
+	
+	goto T10027;
+T10027:;
+	goto T10025;
+	
+	goto T10026;
+T10026:;
+	goto T10023;
+	
+	goto T10025;
+T10025:;
+	goto T10022;
+	
+	goto T10023;
+T10023:;
+	V3830= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V3830),((object)VV[494]),Cnil));
+	goto T10022;
+T10022:;
+	{object V3848 = STREF(object ,(V3830),24);
+	VMR118(V3848);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-PATH-USER-DATA	*/
+
+static object LI147__LOOP_PATH_USER_DATA__loop(object V3850)
+{	 VMB119 VMS119 VMV119
+	V3851= tp6(V3850);
+	if(!((V3851)==((fixnum)544))){
+	goto T10072;
+	}
+	goto T10071;
+	
+	goto T10072;
+T10072:;
+	goto T10069;
+	
+	goto T10071;
+T10071:;
+	{object V3852;
+	{fixnum V3853;
+	V3853= ((fixnum)V3850);
+	V3852= ((object*)V3853)[(fixnum)1];}
+	{fixnum V3855;
+	{fixnum V3856;
+	V3856= ((fixnum)V3852);
+	V3855= ((fixnum*)V3856)[(fixnum)2];}
+	V3854= ((object*)V3855)[(fixnum)0];}
+	if(!(((V3854))==(((object)VV[494])))){
+	goto T10077;
+	}
+	goto T10068;
+	
+	goto T10077;
+T10077:;
+	{register object V3857;
+	{fixnum V3858;
+	{fixnum V3859;
+	V3859= ((fixnum)V3852);
+	V3858= ((fixnum*)V3859)[(fixnum)2];}
+	V3857= ((object*)V3858)[(fixnum)4];}
+	goto T10087;
+T10087:;
+	if(((V3857))==Cnil){
+	goto T10089;
+	}
+	{fixnum V3862;
+	{fixnum V3863;
+	V3863= ((fixnum)(V3857));
+	V3862= ((fixnum*)V3863)[(fixnum)2];}
+	V3860= ((object*)V3862)[(fixnum)0];}
+	if(!(((V3860))==(((object)VV[494])))){
+	goto T10091;
+	}
+	goto T10068;
+	
+	goto T10091;
+T10091:;
+	{object V3864;
+	{fixnum V3866;
+	{fixnum V3867;
+	V3867= ((fixnum)(V3857));
+	V3866= ((fixnum*)V3867)[(fixnum)2];}
+	V3864= ((object*)V3866)[(fixnum)4];}
+	V3857= (V3864);
+	goto T10087;
+	}
+	goto T10089;
+T10089:;
+	goto T10067;
+	}}
+	goto T10069;
+T10069:;
+	goto T10067;
+	
+	goto T10068;
+T10068:;
+	goto T10066;
+	
+	goto T10067;
+T10067:;
+	goto T10064;
+	
+	goto T10066;
+T10066:;
+	goto T10063;
+	
+	goto T10064;
+T10064:;
+	V3850= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V3850),((object)VV[494]),Cnil));
+	goto T10063;
+T10063:;
+	{object V3868 = STREF(object ,(V3850),32);
+	VMR119(V3868);}
+}
+/*	local entry for function ::G792	*/
+
+static object LI148__G792__loop(object V3870)
+{	 VMB120 VMS120 VMV120
+	V3871= tp6(V3870);
+	if(!((V3871)==((fixnum)544))){
+	goto T10103;
+	}
+	{object V3872;
+	{fixnum V3873;
+	V3873= ((fixnum)V3870);
+	V3872= ((object*)V3873)[(fixnum)1];}
+	{fixnum V3875;
+	{fixnum V3876;
+	V3876= ((fixnum)V3872);
+	V3875= ((fixnum*)V3876)[(fixnum)2];}
+	V3874= ((object*)V3875)[(fixnum)0];}
+	if(!(((V3874))==(((object)VV[494])))){
+	goto T10112;
+	}
+	goto T10109;
+	
+	goto T10112;
+T10112:;
+	{register object V3877;
+	{fixnum V3878;
+	{fixnum V3879;
+	V3879= ((fixnum)V3872);
+	V3878= ((fixnum*)V3879)[(fixnum)2];}
+	V3877= ((object*)V3878)[(fixnum)4];}
+	goto T10122;
+T10122:;
+	if(((V3877))==Cnil){
+	goto T10124;
+	}
+	{fixnum V3882;
+	{fixnum V3883;
+	V3883= ((fixnum)(V3877));
+	V3882= ((fixnum*)V3883)[(fixnum)2];}
+	V3880= ((object*)V3882)[(fixnum)0];}
+	if(!(((V3880))==(((object)VV[494])))){
+	goto T10126;
+	}
+	goto T10109;
+	
+	goto T10126;
+T10126:;
+	{object V3884;
+	{fixnum V3886;
+	{fixnum V3887;
+	V3887= ((fixnum)(V3877));
+	V3886= ((fixnum*)V3887)[(fixnum)2];}
+	V3884= ((object*)V3886)[(fixnum)4];}
+	V3877= (V3884);
+	goto T10122;
+	}
+	goto T10124;
+T10124:;
+	goto T10107;
+	}}
+	goto T10109;
+T10109:;
+	{object V3888 = Ct;
+	VMR120(V3888);}
+	goto T10107;
+T10107:;
+	{object V3889 = Cnil;
+	VMR120(V3889);}
+	goto T10103;
+T10103:;
+	{object V3890 = Cnil;
+	VMR120(V3890);}
+}
+/*	local entry for function ANSI-LOOP::ADD-LOOP-PATH	*/
+
+static object LI149__ADD_LOOP_PATH__loop(object V3894,object V3895,object V3896,...)
+{	 VMB121 VMS121 VMV121
+	va_list ap;
+	va_start(ap,V3896);
+	{register object V3897;
+	object V3898;
+	register object V3899;
+	object V3900;
+	register object V3901;
+	object V3902;
+	register object V3903;
+	int8_t V3904;
+	register int8_t V3905;
+	register object V3906;
+	register object V3907;
+	object V3908;
+	register object V3909;
+	object V3910;
+	object V3911;
+	object V3912;
+	object V3913;
+	object V3914;
+	V3897= Cnil;
+	V3898= Cnil;
+	V3899= Cnil;
+	V3900= Cnil;
+	V3901= Cnil;
+	V3902= Cnil;
+	V3903= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V3903))==Cnil){
+	goto T10139;
+	}
+	V3904= -((char)fcall.argd);
+	goto T10138;
+	
+	goto T10139;
+T10139:;
+	V3904= fcall.argd;
+	goto T10138;
+T10138:;
+	V3905= (V3904)-(3);
+	V3906= Cnil;
+	V3907= Cnil;
+	V3908= Cnil;
+	V3909= Cnil;
+	V3910= Cnil;
+	V3911= Cnil;
+	{register object V3915;
+	register object V3916;
+	V3915= Cnil;
+	V3916= Cnil;
+	goto T10146;
+T10146:;
+	{object V3917;
+	if(((V3903))==Cnil){
+	goto T10156;
+	}
+	if(!((V3905)==(1))){
+	goto T10159;
+	}
+	V3905= 0;
+	V3906= va_arg(ap,object);
+	V3917= (V3906);
+	goto T10155;
+	
+	goto T10159;
+T10159:;
+	V3917= Cnil;
+	goto T10155;
+	
+	goto T10156;
+T10156:;
+	V3917= Cnil;
+	goto T10155;
+T10155:;
+	if(((V3917))==Cnil){
+	goto T10165;
+	}
+	goto T10154;
+	
+	goto T10165;
+T10165:;
+	{object V3918;
+	V3918= ((V3905)>(0)?Ct:Cnil);
+	if(((V3918))==Cnil){
+	goto T10169;
+	}
+	goto T10154;
+	
+	goto T10169;
+T10169:;
+	if(((V3906))==Cnil){
+	goto T10172;
+	}
+	goto T10154;
+	
+	goto T10172;
+T10172:;
+	goto T10153;
+	}}
+	goto T10154;
+T10154:;
+	goto T10151;
+	
+	goto T10153;
+T10153:;
+	goto T10148;
+	
+	goto T10151;
+T10151:;
+	if(((V3903))==Cnil){
+	goto T10178;
+	}
+	if(!((V3905)==(1))){
+	goto T10181;
+	}
+	V3905= 0;
+	V3906= va_arg(ap,object);
+	if(((V3906))==Cnil){
+	goto T10184;
+	}
+	goto T10177;
+	
+	goto T10184;
+T10184:;
+	goto T10177;
+	
+	goto T10181;
+T10181:;
+	goto T10177;
+	
+	goto T10178;
+T10178:;
+	goto T10177;
+T10177:;
+	if(!((V3905)>(0))){
+	goto T10190;
+	}
+	V3905= (V3905)-(1);
+	V3915= va_arg(ap,object);
+	goto T10176;
+	
+	goto T10190;
+T10190:;
+	if(((V3906))==Cnil){
+	goto T10195;
+	}
+	{object V3919;
+	V3919= (V3906)->c.c_car;
+	V3906= (V3906)->c.c_cdr;
+	V3915= (V3919);
+	goto T10176;
+	}
+	goto T10195;
+T10195:;
+	V3915= Cnil;
+	goto T10176;
+T10176:;
+	if(((V3903))==Cnil){
+	goto T10203;
+	}
+	if(!((V3905)==(1))){
+	goto T10206;
+	}
+	V3905= 0;
+	V3906= va_arg(ap,object);
+	if(((V3906))==Cnil){
+	goto T10209;
+	}
+	goto T10202;
+	
+	goto T10209;
+T10209:;
+	goto T10202;
+	
+	goto T10206;
+T10206:;
+	goto T10202;
+	
+	goto T10203;
+T10203:;
+	goto T10202;
+T10202:;
+	if(!((V3905)>(0))){
+	goto T10215;
+	}
+	V3905= (V3905)-(1);
+	V3916= va_arg(ap,object);
+	goto T10201;
+	
+	goto T10215;
+T10215:;
+	if(((V3906))==Cnil){
+	goto T10220;
+	}
+	{object V3922;
+	V3922= (V3906)->c.c_car;
+	V3906= (V3906)->c.c_cdr;
+	V3916= (V3922);
+	goto T10201;
+	}
+	goto T10220;
+T10220:;
+	V3925= make_cons((V3915),Cnil);
+	V3916= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[495]),((object)VV[59]),((object)VV[496]),(V3925)));
+	goto T10201;
+T10201:;
+	if(!(((V3915))==(((object)VV[488])))){
+	goto T10227;
+	}
+	if(((V3897))==Cnil){
+	goto T10233;
+	}
+	goto T10230;
+	
+	goto T10233;
+T10233:;
+	V3898= (V3916);
+	V3897= Ct;
+	goto T10226;
+	
+	goto T10230;
+T10230:;
+	goto T10226;
+	
+	goto T10227;
+T10227:;
+	if(!(((V3915))==(((object)VV[489])))){
+	goto T10238;
+	}
+	if(((V3899))==Cnil){
+	goto T10244;
+	}
+	goto T10241;
+	
+	goto T10244;
+T10244:;
+	V3900= (V3916);
+	V3899= Ct;
+	goto T10226;
+	
+	goto T10241;
+T10241:;
+	goto T10226;
+	
+	goto T10238;
+T10238:;
+	if(!(((V3915))==(((object)VV[491])))){
+	goto T10249;
+	}
+	if(((V3901))==Cnil){
+	goto T10255;
+	}
+	goto T10252;
+	
+	goto T10255;
+T10255:;
+	V3902= (V3916);
+	V3901= Ct;
+	goto T10226;
+	
+	goto T10252;
+T10252:;
+	goto T10226;
+	
+	goto T10249;
+T10249:;
+	if(!(((V3915))==(((object)VV[67])))){
+	goto T10260;
+	}
+	if(((V3907))==Cnil){
+	goto T10266;
+	}
+	goto T10263;
+	
+	goto T10266;
+T10266:;
+	V3908= (V3916);
+	V3907= Ct;
+	goto T10226;
+	
+	goto T10263;
+T10263:;
+	goto T10226;
+	
+	goto T10260;
+T10260:;
+	if(((V3909))==Cnil){
+	goto T10274;
+	}
+	goto T10271;
+	
+	goto T10274;
+T10274:;
+	V3910= (V3916);
+	V3909= Ct;
+	V3911= (V3915);
+	goto T10226;
+	
+	goto T10271;
+T10271:;
+	goto T10226;
+T10226:;
+	goto T10146;
+	
+	goto T10148;
+T10148:;
+	goto T10144;
+	}
+	goto T10144;
+T10144:;
+	if(((V3897))==Cnil){
+	goto T10283;
+	}
+	V3912= (V3898);
+	goto T10143;
+	
+	goto T10283;
+T10283:;
+	V3912= Cnil;
+	goto T10143;
+T10143:;
+	if(((V3899))==Cnil){
+	goto T10287;
+	}
+	V3913= (V3900);
+	goto T10286;
+	
+	goto T10287;
+T10287:;
+	V3913= Cnil;
+	goto T10286;
+T10286:;
+	if(((V3901))==Cnil){
+	goto T10291;
+	}
+	V3914= (V3902);
+	goto T10290;
+	
+	goto T10291;
+T10291:;
+	V3914= Cnil;
+	goto T10290;
+T10290:;
+	if(((V3908))==Cnil){
+	goto T10298;
+	}
+	goto T10295;
+	
+	goto T10298;
+T10298:;
+	if(((V3909))==Cnil){
+	goto T10300;
+	}
+	V3926= list(2,(V3911),(V3910));
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[497]),((object)VV[69]),((object)VV[498]),(V3926))));
+	goto T10294;
+	
+	goto T10300;
+T10300:;
+	goto T10294;
+	
+	goto T10295;
+T10295:;
+	goto T10294;
+T10294:;
+	{object V3927;
+	object V3928;
+	V3927= (V3894);
+	V3928= (V3896);
+	V3929= tp2(V3894);
+	if(!((V3929)==(0))){
+	goto T10309;
+	}
+	goto T10308;
+	
+	goto T10309;
+T10309:;
+	goto T10307;
+	
+	goto T10308;
+T10308:;
+	goto T10304;
+	
+	goto T10307;
+T10307:;
+	V3927= make_cons((V3894),Cnil);
+	goto T10303;
+	
+	goto T10304;
+T10304:;
+	goto T10303;
+T10303:;
+	V3930= tp6(V3896);
+	if(!((V3930)==((fixnum)544))){
+	goto T10323;
+	}
+	goto T10322;
+	
+	goto T10323;
+T10323:;
+	goto T10320;
+	
+	goto T10322;
+T10322:;
+	{object V3931;
+	{fixnum V3932;
+	V3932= ((fixnum)V3896);
+	V3931= ((object*)V3932)[(fixnum)1];}
+	{fixnum V3934;
+	{fixnum V3935;
+	V3935= ((fixnum)V3931);
+	V3934= ((fixnum*)V3935)[(fixnum)2];}
+	V3933= ((object*)V3934)[(fixnum)0];}
+	if(!(((V3933))==(((object)VV[153])))){
+	goto T10328;
+	}
+	goto T10319;
+	
+	goto T10328;
+T10328:;
+	{register object V3936;
+	{fixnum V3937;
+	{fixnum V3938;
+	V3938= ((fixnum)V3931);
+	V3937= ((fixnum*)V3938)[(fixnum)2];}
+	V3936= ((object*)V3937)[(fixnum)4];}
+	goto T10338;
+T10338:;
+	if(((V3936))==Cnil){
+	goto T10340;
+	}
+	{fixnum V3941;
+	{fixnum V3942;
+	V3942= ((fixnum)(V3936));
+	V3941= ((fixnum*)V3942)[(fixnum)2];}
+	V3939= ((object*)V3941)[(fixnum)0];}
+	if(!(((V3939))==(((object)VV[153])))){
+	goto T10342;
+	}
+	goto T10319;
+	
+	goto T10342;
+T10342:;
+	{object V3943;
+	{fixnum V3945;
+	{fixnum V3946;
+	V3946= ((fixnum)(V3936));
+	V3945= ((fixnum*)V3946)[(fixnum)2];}
+	V3943= ((object*)V3945)[(fixnum)4];}
+	V3936= (V3943);
+	goto T10338;
+	}
+	goto T10340;
+T10340:;
+	goto T10318;
+	}}
+	goto T10320;
+T10320:;
+	goto T10318;
+	
+	goto T10319;
+T10319:;
+	goto T10317;
+	
+	goto T10318;
+T10318:;
+	goto T10315;
+	
+	goto T10317;
+T10317:;
+	V3928= (V3896);
+	goto T10314;
+	
+	goto T10315;
+T10315:;
+	V3928= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[499]),(V3896),((object)VV[153]),Cnil));
+	goto T10314;
+T10314:;
+	{register object V3947;
+	register object V3948;
+	V3947= STREF(object ,(V3928),24);
+	{object V3951;
+	register object V3952;
+	V3951= Cnil;
+	V3952= Cnil;
+	{register object V3953;
+	V3953= (V3927);
+	goto T10360;
+T10360:;
+	if(((V3953))==Cnil){
+	goto T10362;
+	}
+	{object V3955;
+	V3955= (V3953)->c.c_car;
+	{object V3956;
+	{object V3958;
+	V3958= (V3955);
+	V3959= tp5(V3955);
+	switch(V3959){
+	case -2:
+	goto T10378;
+T10378:;
+	case 19:
+	goto T10379;
+T10379:;
+	goto T10375;
+	
+	default:
+	goto T10380;
+T10380:;
+	goto T10374;
+	}
+	goto T10374;
+	
+	goto T10375;
+T10375:;
+	goto T10373;
+	
+	goto T10374;
+T10374:;
+	goto T10371;
+	
+	goto T10373;
+T10373:;
+	V3958= (V3955);
+	goto T10370;
+	
+	goto T10371;
+T10371:;
+	V3958= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[501]),(V3955),((object)VV[128]),Cnil));
+	goto T10370;
+T10370:;
+	{fixnum V3960;
+	V3960= ((fixnum)V3958);
+	V3957= ((object*)V3960)[(fixnum)3];}}
+	V3956= make_cons((V3957),Cnil);
+	if(((V3952))==Cnil){
+	goto T10385;
+	}
+	{object V3961;
+	V3961= (((V3952))->c.c_cdr=((V3956)),((V3952)));
+	V3952= V3961->c.c_cdr;
+	goto T10384;
+	}
+	goto T10385;
+T10385:;
+	V3951= (V3956);
+	V3952= (V3951);
+	goto T10384;
+T10384:;}}
+	{object V3962;
+	V3962= (V3953)->c.c_cdr;
+	V3953= (V3962);
+	goto T10360;
+	}
+	goto T10362;
+T10362:;
+	goto T10358;
+	}
+	goto T10358;
+T10358:;
+	V3949= (V3951);}
+	{object V3965;
+	register object V3966;
+	V3965= Cnil;
+	V3966= Cnil;
+	{register object V3967;
+	V3967= (V3912);
+	goto T10397;
+T10397:;
+	if(((V3967))==Cnil){
+	goto T10399;
+	}
+	{object V3969;
+	V3969= (V3967)->c.c_car;
+	{object V3970;
+	V3972= tp2(V3969);
+	if(!((V3972)==(0))){
+	goto T10409;
+	}
+	goto T10408;
+	
+	goto T10409;
+T10409:;
+	goto T10406;
+	
+	goto T10408;
+T10408:;
+	V3971= (V3969);
+	goto T10405;
+	
+	goto T10406;
+T10406:;
+	V3971= make_cons((V3969),Cnil);
+	goto T10405;
+T10405:;
+	V3970= make_cons((V3971),Cnil);
+	if(((V3966))==Cnil){
+	goto T10413;
+	}
+	{object V3973;
+	V3973= (((V3966))->c.c_cdr=((V3970)),((V3966)));
+	V3966= V3973->c.c_cdr;
+	goto T10412;
+	}
+	goto T10413;
+T10413:;
+	V3965= (V3970);
+	V3966= (V3965);
+	goto T10412;
+T10412:;}}
+	{object V3974;
+	V3974= (V3967)->c.c_cdr;
+	V3967= (V3974);
+	goto T10397;
+	}
+	goto T10399;
+T10399:;
+	goto T10395;
+	}
+	goto T10395;
+T10395:;
+	V3964= (V3965);}
+	V3948= (fcall.argd=10,/* ANSI-LOOP::MAKE-LOOP-PATH */(*LnkLI239)(((object)VV[502]),(V3949),((object)VV[503]),(V3895),((object)VV[504]),(V3914),((object)VV[505]),(V3964),((object)VV[506]),(V3913)));
+	{register object V3976;
+	register object V3977;
+	V3976= (V3927);
+	V3977= V3976->c.c_car;
+	goto T10424;
+T10424:;
+	if(((V3976))==Cnil){
+	goto T10431;
+	}
+	goto T10429;
+	
+	goto T10431;
+T10431:;
+	goto T10426;
+	
+	goto T10429;
+T10429:;
+	{object V3979;
+	{fixnum V3981;
+	V3981= ((fixnum)(V3977));
+	V3979= ((object*)V3981)[(fixnum)3];}
+	{fixnum V3982;
+	{fixnum V3983;
+	{fixnum V3984;
+	V3984= ((fixnum)V3947);
+	V3983= ((long*)V3984)[(fixnum)4];}
+	V3982= (V3983>>(fixnum)4);}
+	{fixnum V3986;
+	V3986= (V3982)+(1);
+	V3985= V3986;}
+	{fixnum V3988;
+	{fixnum V3989;
+	V3989= ((fixnum)V3947);
+	V3988= ((long*)V3989)[(fixnum)7];}
+	V3987= (V3988>>(fixnum)4);}
+	if(!((V3985)>=(V3987))){
+	goto T10440;
+	}
+	(void)((fcall.fun=((object)VV[170])->s.s_gfdef,/* SYSTEM::EXTEND-HASHTABLE */(*LnkLI179)((V3947))));
+	goto T10439;
+	
+	goto T10440;
+T10440:;
+	goto T10439;
+T10439:;
+	{fixnum V3990;
+	V3990= (fcall.fun=((object)VV[127])->s.s_gfdef,/* SYSTEM::GETHASH-INT */(*LnkLI175)((V3979),(V3947)));
+	V3991= ((fixnum*)V3990)[(fixnum)0];
+	if(!((0)==(V3991))){
+	goto T10450;
+	}
+	{fixnum V3992;
+	{fixnum V3993;
+	V3993= (V3982)+(1);
+	V3992= V3993;}
+	{fixnum V3994;
+	fixnum V3995;
+	V3994= ((fixnum)V3947);
+	{fixnum V3996;
+	int8_t V3997;
+	V3996= (V3992<<(fixnum)4);
+	{fixnum V3998;
+	{fixnum V3999;
+	V3999= ((fixnum)V3947);
+	V3998= ((long*)V3999)[(fixnum)4];}
+	V3997= (V3998&(fixnum)15);}
+	V3995= (V3996|(fixnum)V3997);}
+	(void)(((long*)V3994)[(fixnum)4]=V3995);}
+	goto T10449;
+	}
+	goto T10450;
+T10450:;
+	goto T10449;
+T10449:;
+	{fixnum V4000;
+	V4000= ((fixnum)V3979);
+	(void)(((fixnum*)V3990)[(fixnum)0]=V4000);}
+	(void)(((object*)V3990)[(fixnum)1]=V3948);}}}
+	V3976= (V3976)->c.c_cdr;
+	V3977= V3976->c.c_car;
+	goto T10424;
+	
+	goto T10426;
+T10426:;
+	goto T10421;
+	}
+	goto T10421;
+T10421:;
+	{object V4002 = (V3948);
+	VMR121(V4002);}}}}
+	va_end(ap);
+}
+/*	local entry for function ANSI-LOOP::LOOP-FOR-BEING	*/
+
+static object LI150__LOOP_FOR_BEING__loop(object V4006,object V4007,object V4008)
+{	 VMB122 VMS122 VMV122
+	{object V4009;
+	object V4010;
+	object V4011;
+	object V4012;
+	object V4013;
+	V4009= Cnil;
+	V4010= Cnil;
+	V4011= Cnil;
+	V4012= Cnil;
+	V4013= Cnil;
+	if(((/* ANSI-LOOP::LOOP-TMEMBER */(*LnkLI210)((V4007),((object)VV[507]))))==Cnil){
+	goto T10471;
+	}
+	V4009= (/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)());
+	goto T10470;
+	
+	goto T10471;
+T10471:;
+	{object V4015;
+	V4015= (((object)VV[257])->s.s_dbind);
+	V4014= V4015->c.c_car;}
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V4014),((object)VV[508]))))==Cnil){
+	goto T10475;
+	}
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	V4011= Ct;
+	{object V4017;
+	V4017= (((object)VV[257])->s.s_dbind);
+	V4016= V4017->c.c_car;}
+	if(((/* ANSI-LOOP::LOOP-TMEMBER */(*LnkLI210)((V4016),((object)VV[509]))))==Cnil){
+	goto T10486;
+	}
+	goto T10483;
+	
+	goto T10486;
+T10486:;
+	{object V4019;
+	V4019= (((object)VV[257])->s.s_dbind);
+	V4018= V4019->c.c_car;}
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[510]),(V4018))));
+	goto T10482;
+	
+	goto T10483;
+T10483:;
+	goto T10482;
+T10482:;
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	V4009= (/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)());
+	V4013= make_cons(list(2,((object)VV[511]),(V4007)),Cnil);
+	goto T10470;
+	
+	goto T10475;
+T10475:;
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[512]))));
+	goto T10470;
+T10470:;
+	if(((V4009))==Cnil){
+	goto T10500;
+	}
+	V4021= tp5((V4009));
+	switch(V4021){
+	case 19:
+	goto T10505;
+T10505:;
+	goto T10499;
+	
+	default:
+	goto T10506;
+T10506:;
+	goto T10498;
+	}
+	goto T10498;
+	
+	goto T10500;
+T10500:;
+	goto T10499;
+T10499:;
+	goto T10495;
+	
+	goto T10498;
+T10498:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[513]),(V4009))));
+	goto T10494;
+	
+	goto T10495;
+T10495:;
+	{object V4023;
+	V4023= (((object)VV[304])->s.s_dbind);
+	V4022= STREF(object ,(V4023),24);}
+	V4010= (/* ANSI-LOOP::LOOP-LOOKUP-KEYWORD */(*LnkLI208)((V4009),(V4022)));
+	if(((V4010))==Cnil){
+	goto T10511;
+	}
+	goto T10508;
+	
+	goto T10511;
+T10511:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[514]),(V4009))));
+	goto T10494;
+	
+	goto T10508;
+T10508:;
+	if(((V4011))==Cnil){
+	goto T10518;
+	}
+	if((STREF(object ,(V4010),16))==Cnil){
+	goto T10523;
+	}
+	goto T10522;
+	
+	goto T10523;
+T10523:;
+	goto T10521;
+	
+	goto T10522;
+T10522:;
+	goto T10515;
+	
+	goto T10521;
+T10521:;
+	goto T10517;
+	
+	goto T10518;
+T10518:;
+	goto T10515;
+	
+	goto T10517;
+T10517:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[515]),(V4009))));
+	goto T10494;
+	
+	goto T10515;
+T10515:;
+	goto T10494;
+T10494:;
+	{object V4024;
+	object V4025;
+	object V4026;
+	V4024= STREF(object ,(V4010),24);
+	{object V4029;
+	object V4030;
+	V4031= STREF(object ,(V4010),8);
+	V4029= (fcall.argd=2,/* ANSI-LOOP::LOOP-COLLECT-PREPOSITIONAL-PHRASES */(*LnkLI240)((V4031),Ct));
+	V4030= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V4013);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V4029);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V4033;
+	object V4034;
+	V4033= Cnil;
+	V4034= Cnil;
+	V4033= (V4013);
+	if(((V4013))==Cnil){
+	goto T10539;
+	}
+	goto T10538;
+	
+	goto T10539;
+T10539:;
+	goto T10536;
+	
+	goto T10538;
+T10538:;
+	V4034= (V4013);
+	goto T10533;
+	
+	goto T10536;
+T10536:;
+	goto T10533;
+T10533:;
+	if(((V4034))==Cnil){
+	goto T10545;
+	}
+	(void)((((V4034))->c.c_cdr=((V4029)),((V4034))));
+	goto T10544;
+	
+	goto T10545;
+T10545:;
+	V4033= (V4029);
+	goto T10544;
+T10544:;
+	V4025= (V4033);}}
+	V4026= STREF(object ,(V4010),32);
+	if(((V4024))==Cnil){
+	goto T10554;
+	}
+	V4036= tp5(V4024);
+	switch(V4036){
+	case 19:
+	goto T10559;
+T10559:;
+	goto T10553;
+	
+	default:
+	goto T10560;
+T10560:;
+	goto T10551;
+	}
+	goto T10551;
+	
+	goto T10554;
+T10554:;
+	goto T10553;
+T10553:;
+	V4024= ({register object _sym=(V4024);_sym->s.s_sfdef!=NOT_SPECIAL ? make_cons(sLspecial,make_fixnum((long)_sym->s.s_sfdef)) : (_sym->s.s_mflag ? make_cons(sSmacro,_sym->s.s_gfdef) : _sym->s.s_gfdef);});
+	goto T10550;
+	
+	goto T10551;
+T10551:;
+	goto T10550;
+T10550:;
+	if(((V4011))==Cnil){
+	goto T10564;
+	}
+	V4039= tp4((V4024));
+	if(!((V4039)==(24))){
+	goto T10571;
+	}
+	goto T10570;
+	
+	goto T10571;
+T10571:;
+	goto T10568;
+	
+	goto T10570;
+T10570:;
+	V4037= (V4024);
+	goto T10567;
+	
+	goto T10568;
+T10568:;
+	V4037= (V4024)->s.s_gfdef;
+	goto T10567;
+T10567:;
+	V4012= ({fixnum _v=(fixnum)0;object _z,_f=((V4037)),_l=((V4026)),_ll=_l;
+        object _x4=Cnil,_x3=Cnil,_x2=Cnil,_x1=Cnil,_x0=Cnil;
+        char _m=(7-2),_q=_f->fun.fun_minarg>_m ? _f->fun.fun_minarg-_m : 0;
+        char _n=Rset && !_f->fun.fun_argd ? _q : -1;
+        fcall.fun=_f;fcall.valp=_v;fcall.argd=-(7-1);
+        switch (_n) {
+          case 5: if (_l==Cnil) {_n=-1;break;} _x4=_l->c.c_car;_l=_l->c.c_cdr;
+          case 4: if (_l==Cnil) {_n=-1;break;} _x3=_l->c.c_car;_l=_l->c.c_cdr;
+          case 3: if (_l==Cnil) {_n=-1;break;} _x2=_l->c.c_car;_l=_l->c.c_cdr;
+          case 2: if (_l==Cnil) {_n=-1;break;} _x1=_l->c.c_car;_l=_l->c.c_cdr;
+          case 1: if (_l==Cnil) {_n=-1;break;} _x0=_l->c.c_car;_l=_l->c.c_cdr;
+          case 0: if (_n+_m+(_l==Cnil ? 0 : 1)>_f->fun.fun_maxarg) _n=-1; else fcall.argd-=_n;
+          default: break;
+        }
+        switch (_n) {
+          case 5:  _z=_f->fun.fun_self((V4006),(V4008),(V4025),((object)VV[517]),Ct,_x4,_x3,_x2,_x1,_x0,_l);break;
+          case 4:  _z=_f->fun.fun_self((V4006),(V4008),(V4025),((object)VV[517]),Ct,_x3,_x2,_x1,_x0,_l);break;
+          case 3:  _z=_f->fun.fun_self((V4006),(V4008),(V4025),((object)VV[517]),Ct,_x2,_x1,_x0,_l);break;
+          case 2:  _z=_f->fun.fun_self((V4006),(V4008),(V4025),((object)VV[517]),Ct,_x1,_x0,_l);break;
+          case 1:  _z=_f->fun.fun_self((V4006),(V4008),(V4025),((object)VV[517]),Ct,_x0,_l);break;
+          case 0:  _z=_f->fun.fun_self((V4006),(V4008),(V4025),((object)VV[517]),Ct,_l);break;
+          default: _z=call_proc_cs2((V4006),(V4008),(V4025),((object)VV[517]),Ct,_ll);break;
+        }
+        if (!(_f)->fun.fun_neval && !(_f)->fun.fun_vv) vs_top=_v ? (object *)_v : sup;
+        _z;});
+	goto T10563;
+	
+	goto T10564;
+T10564:;
+	V4042= tp4((V4024));
+	if(!((V4042)==(24))){
+	goto T10578;
+	}
+	goto T10577;
+	
+	goto T10578;
+T10578:;
+	goto T10575;
+	
+	goto T10577;
+T10577:;
+	V4040= (V4024);
+	goto T10574;
+	
+	goto T10575;
+T10575:;
+	V4040= (V4024)->s.s_gfdef;
+	goto T10574;
+T10574:;
+	V4012= ({fixnum _v=(fixnum)0;object _z,_f=((V4040)),_l=((V4026)),_ll=_l;
+        object _x4=Cnil,_x3=Cnil,_x2=Cnil,_x1=Cnil,_x0=Cnil;
+        char _m=(5-2),_q=_f->fun.fun_minarg>_m ? _f->fun.fun_minarg-_m : 0;
+        char _n=Rset && !_f->fun.fun_argd ? _q : -1;
+        fcall.fun=_f;fcall.valp=_v;fcall.argd=-(5-1);
+        switch (_n) {
+          case 5: if (_l==Cnil) {_n=-1;break;} _x4=_l->c.c_car;_l=_l->c.c_cdr;
+          case 4: if (_l==Cnil) {_n=-1;break;} _x3=_l->c.c_car;_l=_l->c.c_cdr;
+          case 3: if (_l==Cnil) {_n=-1;break;} _x2=_l->c.c_car;_l=_l->c.c_cdr;
+          case 2: if (_l==Cnil) {_n=-1;break;} _x1=_l->c.c_car;_l=_l->c.c_cdr;
+          case 1: if (_l==Cnil) {_n=-1;break;} _x0=_l->c.c_car;_l=_l->c.c_cdr;
+          case 0: if (_n+_m+(_l==Cnil ? 0 : 1)>_f->fun.fun_maxarg) _n=-1; else fcall.argd-=_n;
+          default: break;
+        }
+        switch (_n) {
+          case 5:  _z=_f->fun.fun_self((V4006),(V4008),(V4025),_x4,_x3,_x2,_x1,_x0,_l);break;
+          case 4:  _z=_f->fun.fun_self((V4006),(V4008),(V4025),_x3,_x2,_x1,_x0,_l);break;
+          case 3:  _z=_f->fun.fun_self((V4006),(V4008),(V4025),_x2,_x1,_x0,_l);break;
+          case 2:  _z=_f->fun.fun_self((V4006),(V4008),(V4025),_x1,_x0,_l);break;
+          case 1:  _z=_f->fun.fun_self((V4006),(V4008),(V4025),_x0,_l);break;
+          case 0:  _z=_f->fun.fun_self((V4006),(V4008),(V4025),_l);break;
+          default: _z=call_proc_cs2((V4006),(V4008),(V4025),_ll);break;
+        }
+        if (!(_f)->fun.fun_neval && !(_f)->fun.fun_vv) vs_top=_v ? (object *)_v : sup;
+        _z;});
+	goto T10563;
+T10563:;}
+	if(((((object)VV[310])->s.s_dbind))==Cnil){
+	goto T10582;
+	}
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[518]),(((object)VV[310])->s.s_dbind))));
+	goto T10581;
+	
+	goto T10582;
+T10582:;
+	goto T10581;
+T10581:;
+	{fixnum V4043;
+	V4043= length((V4012));
+	if(!((V4043)==(6))){
+	goto T10599;
+	}
+	goto T10598;
+	
+	goto T10599;
+T10599:;
+	goto T10596;
+	
+	goto T10598;
+T10598:;
+	goto T10590;
+	
+	goto T10596;
+T10596:;
+	if(!((V4043)==(10))){
+	goto T10605;
+	}
+	goto T10604;
+	
+	goto T10605;
+T10605:;
+	goto T10602;
+	
+	goto T10604;
+T10604:;
+	goto T10590;
+	
+	goto T10602;
+T10602:;
+	goto T10589;
+	}
+	goto T10590;
+T10590:;
+	goto T10586;
+	
+	goto T10589;
+T10589:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[519]),(V4009))));
+	goto T10585;
+	
+	goto T10586;
+T10586:;
+	goto T10585;
+T10585:;
+	{register object V4044;
+	register object V4045;
+	V4044= V4012->c.c_car;
+	V4045= Cnil;
+	goto T10611;
+T10611:;
+	if(((V4044))==Cnil){
+	goto T10618;
+	}
+	goto T10616;
+	
+	goto T10618;
+T10618:;
+	goto T10613;
+	
+	goto T10616;
+T10616:;
+	{object V4046;
+	V4045= (V4044)->c.c_car;
+	V4046= (V4045);
+	if(((V4046))==Cnil){
+	goto T10628;
+	}
+	V4048= tp2(V4046);
+	if(!((V4048)==(0))){
+	goto T10631;
+	}
+	goto T10627;
+	
+	goto T10631;
+T10631:;
+	goto T10626;
+	
+	goto T10628;
+T10628:;
+	goto T10626;
+	
+	goto T10627;
+T10627:;
+	goto T10621;
+	
+	goto T10626;
+T10626:;}
+	(void)((/* ANSI-LOOP::LOOP-MAKE-ITERATION-VARIABLE */(*LnkLI236)((V4045),Cnil,Cnil)));
+	goto T10620;
+	
+	goto T10621;
+T10621:;
+	V4049= V4045->c.c_car;
+	{object V4051;
+	V4051= V4045->c.c_cdr;
+	V4050= V4051->c.c_car;}
+	{object V4053;
+	{object V4054;
+	V4054= V4045->c.c_cdr;
+	V4053= V4054->c.c_cdr;}
+	V4052= V4053->c.c_car;}
+	(void)((/* ANSI-LOOP::LOOP-MAKE-ITERATION-VARIABLE */(*LnkLI236)((V4049),(V4050),(V4052))));
+	goto T10620;
+T10620:;
+	{object V4055;
+	V4055= (V4044)->c.c_cdr;
+	V4044= (V4055);}
+	goto T10611;
+	
+	goto T10613;
+T10613:;
+	goto T10608;
+	}
+	goto T10608;
+T10608:;
+	{object V4058;
+	object V4059;
+	object V4060;
+	{object V4062;
+	V4062= V4012->c.c_cdr;
+	V4061= V4062->c.c_car;}
+	V4058= (/* COMMON-LISP::REVERSE */(*LnkLI241)((V4061)));
+	V4059= (((object)VV[314])->s.s_dbind);
+	V4060= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V4058);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V4059);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V4063;
+	object V4064;
+	V4063= Cnil;
+	V4064= Cnil;
+	V4063= (V4058);
+	if(((V4058))==Cnil){
+	goto T10659;
+	}
+	V4065= tp2(V4058);
+	if(!((V4065)==(0))){
+	goto T10662;
+	}
+	goto T10658;
+	
+	goto T10662;
+T10662:;
+	goto T10656;
+	
+	goto T10659;
+T10659:;
+	goto T10656;
+	
+	goto T10658;
+T10658:;
+	{object V4066;
+	V4066= V4058->c.c_cdr;
+	{register object V4067;
+	register object V4068;
+	V4067= (V4058);
+	V4068= (V4066);
+	goto T10668;
+T10668:;
+	if(((V4068))==Cnil){
+	goto T10677;
+	}
+	goto T10676;
+	
+	goto T10677;
+T10677:;
+	goto T10675;
+	
+	goto T10676;
+T10676:;
+	goto T10673;
+	
+	goto T10675;
+T10675:;
+	goto T10670;
+	
+	goto T10673;
+T10673:;
+	{object V4070;
+	object V4071;
+	V4070= (V4067)->c.c_cdr;
+	V4071= (V4068)->c.c_cdr;
+	V4067= (V4070);
+	V4068= (V4071);}
+	goto T10668;
+	
+	goto T10670;
+T10670:;
+	V4064= (V4067);
+	goto T10665;
+	}}
+	goto T10665;
+T10665:;
+	goto T10653;
+	
+	goto T10656;
+T10656:;
+	goto T10653;
+T10653:;
+	if(((V4064))==Cnil){
+	goto T10689;
+	}
+	(void)((((V4064))->c.c_cdr=((V4059)),((V4064))));
+	goto T10688;
+	
+	goto T10689;
+T10689:;
+	V4063= (V4059);
+	goto T10688;
+T10688:;
+	V4057= (V4063);}}
+	(((object)VV[314])->s.s_dbind)= (V4057);
+	{object V4074;
+	V4074= V4012->c.c_cdr;
+	{object V4075 = V4074->c.c_cdr;
+	VMR122(V4075);}}}
+}
+/*	local entry for function ANSI-LOOP::NAMED-VARIABLE	*/
+
+static object LI151__NAMED_VARIABLE__loop(object V4077)
+{	 VMB123 VMS123 VMV123
+	{fixnum V4078;
+	V4078= fcall.valp;
+	{register object V4079;
+	V4079= (/* ANSI-LOOP::LOOP-TASSOC */(*LnkLI242)((V4077),(((object)VV[310])->s.s_dbind)));
+	if(((V4079))==Cnil){
+	goto T10699;
+	}
+	goto T10696;
+	
+	goto T10699;
+T10699:;
+	V4080= (fcall.argd=0,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(make_fixnum(0)));
+	{object V4081;
+	if (V4078) {
+	#define V4082 ((object *)V4078)[0]
+	V4081= ({object  _t0=(V4080);object  _t1=Cnil;
+	V4082= (_t1);_t0;});
+	#undef V4082
+	} else {
+	V4081= ({object  _t0=(V4080);object  _t1=Cnil;
+	(void)((_t1));_t0;});
+	}
+	VMRV123(V4081,1);}
+	goto T10696;
+T10696:;
+	{register object V4084;
+	V4084= (((object)VV[310])->s.s_dbind);
+	{register object V4085;
+	V4086= tp2(V4084);
+	if(!((V4086)==(0))){
+	goto T10704;
+	}
+	V4085= Ct;
+	goto T10703;
+	
+	goto T10704;
+T10704:;
+	V4085= Cnil;
+	goto T10703;
+T10703:;
+	{register fixnum V4087;
+	object V4088;
+	if(((V4085))==Cnil){
+	goto T10709;
+	}
+	V4087= 268435455;
+	goto T10708;
+	
+	goto T10709;
+T10709:;
+	V4087= length((V4084));
+	goto T10708;
+T10708:;
+	if(((V4085))==Cnil){
+	goto T10713;
+	}
+	if(((V4084))==Cnil){
+	goto T10716;
+	}
+	V4088= (V4084);
+	goto T10712;
+	
+	goto T10716;
+T10716:;
+	V4088= Cnil;
+	goto T10712;
+	
+	goto T10713;
+T10713:;
+	V4088= (V4084);
+	goto T10712;
+T10712:;
+	{object V4089;
+	object V4090;
+	register object V4091;
+	register object V4092;
+	if(((V4085))==Cnil){
+	goto T10725;
+	}
+	goto T10722;
+	
+	goto T10725;
+T10725:;
+	V4093= CMPmake_fixnum(V4087);
+	goto T10721;
+	
+	goto T10722;
+T10722:;
+	V4093= Cnil;
+	goto T10721;
+T10721:;
+	V4089= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(1*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V4093);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	V4090= Cnil;
+	V4091= Cnil;
+	V4092= Cnil;
+	{object V4094;
+	if(((V4085))==Cnil){
+	goto T10729;
+	}
+	V4094= (V4088);
+	goto T10728;
+	
+	goto T10729;
+T10729:;
+	V4094= Cnil;
+	goto T10728;
+T10728:;
+	if(!((0)>=(V4087))){
+	goto T10737;
+	}
+	goto T10736;
+	
+	goto T10737;
+T10737:;
+	if(((V4085))==Cnil){
+	goto T10742;
+	}
+	if(((V4094))==Cnil){
+	goto T10745;
+	}
+	goto T10740;
+	
+	goto T10745;
+T10745:;
+	goto T10741;
+	
+	goto T10742;
+T10742:;
+	goto T10740;
+	
+	goto T10741;
+T10741:;
+	goto T10736;
+	
+	goto T10740;
+T10740:;
+	goto T10735;
+	
+	goto T10736;
+T10736:;
+	goto T10732;
+	
+	goto T10735;
+T10735:;
+	{object V4095;
+	if(((V4085))==Cnil){
+	goto T10752;
+	}
+	V4095= V4094->c.c_car;
+	goto T10751;
+	
+	goto T10752;
+T10752:;
+	V4095= (/* COMMON-LISP::ROW-MAJOR-AREF */(*LnkLI215)((V4084),(fixnum)0));
+	goto T10751;
+T10751:;
+	if(!(((V4079))==((V4095)))){
+	goto T10755;
+	}
+	goto T10750;
+	
+	goto T10755;
+T10755:;
+	goto T10748;
+	}
+	goto T10750;
+T10750:;
+	if(((V4085))==Cnil){
+	goto T10760;
+	}
+	V4096= (V4094);
+	goto T10759;
+	
+	goto T10760;
+T10760:;
+	V4096= make_fixnum(0);
+	goto T10759;
+T10759:;
+	V4092= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(1*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V4096);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	V4090= (V4092);
+	V4091= (V4090);
+	goto T10747;
+	
+	goto T10748;
+T10748:;
+	goto T10747;
+T10747:;
+	{register fixnum V4097;
+	register object V4098;
+	if(((V4085))==Cnil){
+	goto T10767;
+	}
+	V4097= 0;
+	goto T10766;
+	
+	goto T10767;
+T10767:;
+	V4097= 1;
+	goto T10766;
+T10766:;
+	V4098= V4094->c.c_cdr;
+	goto T10772;
+T10772:;
+	if(!((V4097)>=(V4087))){
+	goto T10779;
+	}
+	goto T10778;
+	
+	goto T10779;
+T10779:;
+	if(((V4085))==Cnil){
+	goto T10784;
+	}
+	if(((V4098))==Cnil){
+	goto T10787;
+	}
+	goto T10782;
+	
+	goto T10787;
+T10787:;
+	goto T10783;
+	
+	goto T10784;
+T10784:;
+	goto T10782;
+	
+	goto T10783;
+T10783:;
+	goto T10778;
+	
+	goto T10782;
+T10782:;
+	goto T10777;
+	
+	goto T10778;
+T10778:;
+	goto T10774;
+	
+	goto T10777;
+T10777:;
+	{object V4100;
+	{fixnum V4102;
+	V4102= V4097;
+	if(((V4085))==Cnil){
+	goto T10795;
+	}
+	V4100= (V4098)->c.c_car;
+	goto T10793;
+	
+	goto T10795;
+T10795:;
+	V4100= (/* COMMON-LISP::ROW-MAJOR-AREF */(*LnkLI215)((V4084),V4102));}
+	goto T10793;
+T10793:;
+	if(!(((V4079))==((V4100)))){
+	goto T10798;
+	}
+	goto T10792;
+	
+	goto T10798;
+T10798:;
+	goto T10790;
+	}
+	goto T10792;
+T10792:;
+	{fixnum V4105;
+	V4105= V4097;
+	if(((V4085))==Cnil){
+	goto T10804;
+	}
+	V4103= (V4098);
+	goto T10802;
+	
+	goto T10804;
+T10804:;
+	V4103= CMPmake_fixnum(V4105);}
+	goto T10802;
+T10802:;
+	V4092= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(1*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V4103);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	if(((V4091))==Cnil){
+	goto T10809;
+	}
+	{object V4106;
+	V4106= (((V4091))->c.c_cdr=((V4092)),((V4091)));
+	V4091= V4106->c.c_cdr;
+	goto T10808;
+	}
+	goto T10809;
+T10809:;
+	V4090= (V4092);
+	V4091= (V4090);
+	goto T10808;
+T10808:;
+	goto T10789;
+	
+	goto T10790;
+T10790:;
+	goto T10789;
+T10789:;
+	{fixnum V4107;
+	object V4108;
+	if(((V4085))==Cnil){
+	goto T10815;
+	}
+	V4107= V4097;
+	goto T10814;
+	
+	goto T10815;
+T10815:;
+	{fixnum V4109;
+	V4109= V4097;
+	{fixnum V4110;
+	V4110= (V4109)+(1);
+	V4107= V4110;}}
+	goto T10814;
+T10814:;
+	V4108= (V4098)->c.c_cdr;
+	V4097= V4107;
+	V4098= (V4108);
+	goto T10772;
+	}
+	goto T10774;
+T10774:;
+	goto T10727;
+	}
+	goto T10732;
+T10732:;}
+	goto T10727;
+T10727:;
+	if(((V4091))==Cnil){
+	goto T10827;
+	}
+	{object V4112;
+	V4112= (((V4091))->c.c_cdr=((V4089)),((V4091)));
+	V4091= V4112->c.c_cdr;
+	goto T10826;
+	}
+	goto T10827;
+T10827:;
+	V4090= (V4089);
+	V4091= (V4090);
+	goto T10826;
+T10826:;
+	if(((V4090)->c.c_cdr)==Cnil){
+	goto T10836;
+	}
+	goto T10833;
+	
+	goto T10836;
+T10836:;
+	V4083= (V4084);
+	goto T10702;
+	
+	goto T10833;
+T10833:;
+	if(((V4085))==Cnil){
+	goto T10838;
+	}
+	{register object V4114;
+	object V4115;
+	register object V4116;
+	V4114= Cnil;
+	V4115= Cnil;
+	V4116= Cnil;
+	{register object V4117;
+	register object V4118;
+	V4117= (V4090);
+	V4118= V4117->c.c_car;
+	goto T10843;
+T10843:;
+	if(((V4117))==Cnil){
+	goto T10850;
+	}
+	goto T10848;
+	
+	goto T10850;
+T10850:;
+	goto T10845;
+	
+	goto T10848;
+T10848:;
+	{register object V4120;
+	if(((V4114))==Cnil){
+	goto T10854;
+	}
+	V4120= (V4114)->c.c_cdr;
+	goto T10853;
+	
+	goto T10854;
+T10854:;
+	V4120= (V4084);
+	goto T10853;
+T10853:;
+	goto T10858;
+T10858:;
+	if(((V4118))==Cnil){
+	goto T10866;
+	}
+	V4122= (V4118);
+	goto T10865;
+	
+	goto T10866;
+T10866:;
+	V4122= (V4120);
+	goto T10865;
+T10865:;
+	if(!(((V4120))==((V4122)))){
+	goto T10863;
+	}
+	goto T10860;
+	
+	goto T10863;
+T10863:;
+	if(((V4116))==Cnil){
+	goto T10871;
+	}
+	{object V4124;
+	V4124= (((V4116))->c.c_cdr=((V4120)),((V4116)));
+	V4116= V4124->c.c_cdr;
+	goto T10870;
+	}
+	goto T10871;
+T10871:;
+	V4115= (V4120);
+	V4116= (V4115);
+	goto T10870;
+T10870:;
+	{object V4125;
+	V4125= (V4120)->c.c_cdr;
+	V4120= (V4125);}
+	goto T10858;
+	
+	goto T10860;
+T10860:;
+	if(((V4118))==Cnil){
+	goto T10885;
+	}
+	goto T10882;
+	
+	goto T10885;
+T10885:;
+	if(((V4116))==Cnil){
+	goto T10888;
+	}
+	{object V4128;
+	V4128= (((V4116))->c.c_cdr=((V4120)),((V4116)));
+	V4116= V4128->c.c_cdr;
+	goto T10887;
+	}
+	goto T10888;
+T10888:;
+	V4115= (V4120);
+	V4116= (V4115);
+	goto T10887;
+T10887:;
+	goto T10881;
+	
+	goto T10882;
+T10882:;
+	goto T10881;
+T10881:;
+	V4114= (V4118);
+	goto T10852;
+	}
+	goto T10852;
+T10852:;
+	V4117= (V4117)->c.c_cdr;
+	V4118= V4117->c.c_car;
+	goto T10843;
+	
+	goto T10845;
+T10845:;
+	V4083= (V4115);
+	goto T10702;
+	}}
+	goto T10838;
+T10838:;
+	{fixnum V4130;
+	register object V4131;
+	{fixnum V4132;
+	{fixnum V4133;
+	{register object V4135;
+	register fixnum V4136;
+	V4135= (V4090);
+	V4136= 0;
+	goto T10904;
+T10904:;
+	if(((V4135))==Cnil){
+	goto T10906;
+	}
+	{object V4137;
+	fixnum V4138;
+	V4137= (V4135)->c.c_cdr;
+	{fixnum V4140;
+	V4140= V4136;
+	{fixnum V4141;
+	V4141= (V4140)+(1);
+	V4138= V4141;}}
+	V4135= (V4137);
+	V4136= V4138;
+	goto T10904;
+	}
+	goto T10906;
+T10906:;
+	V4133= V4136;
+	goto T10901;
+	}
+	goto T10901;
+T10901:;
+	{fixnum V4142;
+	V4142= (V4133)-(1);
+	V4132= V4142;}}
+	{fixnum V4143;
+	V4143= (V4087)-(V4132);
+	V4130= V4143;}}
+	V4144= tp4(V4084);
+	switch(V4144){
+	case 8:
+	goto T10925;
+T10925:;
+	case 11:
+	goto T10926;
+T10926:;
+	case 13:
+	goto T10927;
+T10927:;
+	{fixnum V4146;
+	{fixnum V4147;
+	V4147= ((fixnum)V4084);
+	V4146= ((uchar*)V4147)[(fixnum)2];}
+	V4145= (V4146&(fixnum)1);}
+	if(!((V4145)==(0))){
+	goto T10929;
+	}
+	goto T10920;
+	
+	goto T10929;
+T10929:;
+	goto T10922;
+	
+	default:
+	goto T10928;
+T10928:;
+	goto T10920;
+	}
+	goto T10920;
+	
+	goto T10922;
+T10922:;
+	V4131= (V4084);
+	goto T10919;
+	
+	goto T10920;
+T10920:;
+	{object V4148;
+	object V4149;
+	V4148= Cnil;
+	V4149= (/* COMMON-LISP::ARRAY-ELEMENT-TYPE */(*LnkLI187)((V4088)));
+	V4148= (V4149);
+	{object V4150;
+	if(!(((V4148))==(Ct))){
+	goto T10940;
+	}
+	V4150= (V4148);
+	goto T10939;
+	
+	goto T10940;
+T10940:;
+	if(!(((V4148))==(((object)VV[212])))){
+	goto T10943;
+	}
+	V4150= (V4148);
+	goto T10939;
+	
+	goto T10943;
+T10943:;
+	if(!(((V4148))==(((object)VV[213])))){
+	goto T10946;
+	}
+	V4150= (V4148);
+	goto T10939;
+	
+	goto T10946;
+T10946:;
+	if(!(((V4148))==(((object)VV[214])))){
+	goto T10949;
+	}
+	V4150= (V4148);
+	goto T10939;
+	
+	goto T10949;
+T10949:;
+	if(!(((V4148))==(((object)VV[215])))){
+	goto T10952;
+	}
+	V4150= (V4148);
+	goto T10939;
+	
+	goto T10952;
+T10952:;
+	if(!(((V4148))==(((object)VV[216])))){
+	goto T10955;
+	}
+	V4150= (V4148);
+	goto T10939;
+	
+	goto T10955;
+T10955:;
+	if(!(((V4148))==(((object)VV[217])))){
+	goto T10958;
+	}
+	V4150= (V4148);
+	goto T10939;
+	
+	goto T10958;
+T10958:;
+	if(!(((V4148))==(((object)VV[218])))){
+	goto T10961;
+	}
+	V4150= (V4148);
+	goto T10939;
+	
+	goto T10961;
+T10961:;
+	if(!(((V4148))==(((object)VV[219])))){
+	goto T10964;
+	}
+	V4150= (V4148);
+	goto T10939;
+	
+	goto T10964;
+T10964:;
+	if(!(((V4148))==(((object)VV[220])))){
+	goto T10967;
+	}
+	V4150= (V4148);
+	goto T10939;
+	
+	goto T10967;
+T10967:;
+	if(!(((V4148))==(((object)VV[221])))){
+	goto T10970;
+	}
+	V4150= (V4148);
+	goto T10939;
+	
+	goto T10970;
+T10970:;
+	if(!(((V4148))==(((object)VV[222])))){
+	goto T10973;
+	}
+	V4150= (V4148);
+	goto T10939;
+	
+	goto T10973;
+T10973:;
+	if(!(((V4148))==(((object)VV[223])))){
+	goto T10976;
+	}
+	V4150= (V4148);
+	goto T10939;
+	
+	goto T10976;
+T10976:;
+	if(!(((V4148))==(((object)VV[224])))){
+	goto T10979;
+	}
+	V4150= (V4148);
+	goto T10939;
+	
+	goto T10979;
+T10979:;
+	if(!(((V4148))==(((object)VV[225])))){
+	goto T10982;
+	}
+	V4150= (V4148);
+	goto T10939;
+	
+	goto T10982;
+T10982:;
+	if(!(((V4148))==(((object)VV[226])))){
+	goto T10985;
+	}
+	V4150= (V4148);
+	goto T10939;
+	
+	goto T10985;
+T10985:;
+	V4150= (/* SYSTEM::EXPAND-ARRAY-ELEMENT-TYPE */(*LnkLI188)((V4148)));
+	goto T10939;
+T10939:;
+	{object V4151;
+	V4151= (fcall.fun=((object)VV[228])->s.s_gfdef,/* SYSTEM::MAKE-VECTOR */(*LnkLI189)((V4150),V4130,Cnil,Cnil,Cnil,(fixnum)0,Cnil,Cnil));
+	V4131= (V4151);}}}
+	goto T10919;
+T10919:;
+	{register object V4152;
+	register fixnum V4153;
+	register fixnum V4154;
+	register fixnum V4155;
+	V4152= (V4090);
+	V4153= -1;
+	V4154= fix(V4152->c.c_car);
+	V4155= 0;
+	goto T10993;
+T10993:;
+	if(((V4152))==Cnil){
+	goto T11000;
+	}
+	goto T10998;
+	
+	goto T11000;
+T11000:;
+	goto T10995;
+	
+	goto T10998;
+T10998:;
+	{fixnum V4156;
+	fixnum V4157;
+	fixnum V4158;
+	{fixnum V4159;
+	fixnum V4160;
+	V4159= V4153;
+	{fixnum V4161;
+	V4161= V4155;
+	{fixnum V4162;
+	V4162= (V4161)-(1);
+	V4160= V4162;}}
+	{fixnum V4163;
+	V4163= (V4159)-(V4160);
+	V4156= V4163;}}
+	{fixnum V4164;
+	V4164= V4153;
+	{fixnum V4165;
+	V4165= (V4164)+(1);
+	V4157= V4165;}}
+	{fixnum V4166;
+	fixnum V4167;
+	V4166= V4154;
+	V4167= V4153;
+	{fixnum V4168;
+	V4168= (V4166)-(V4167);
+	V4158= V4168;}}
+	{int8_t V4169;
+	{fixnum V4170;
+	{fixnum V4171;
+	{fixnum V4172;
+	V4172= ((fixnum)V4131);
+	V4171= ((ushort*)V4172)[(fixnum)1];}
+	V4170= (V4171>>(fixnum)6);}
+	V4169= (V4170&(fixnum)15);}
+	if(!((V4169)==(0))){
+	goto T11021;
+	}
+	V4173= CMPmake_fixnum(V4156);
+	V4174= CMPmake_fixnum(V4157);
+	V4175= CMPmake_fixnum(V4158);
+	(void)((/* SYSTEM::COPY-BIT-VECTOR */(*LnkLI243)((V4131),(V4173),(V4084),(V4174),(V4175))));
+	goto T11016;
+	
+	goto T11021;
+T11021:;
+	{fixnum V4176;
+	fixnum V4177;
+	{fixnum V4178;
+	V4178= ((fixnum)V4131);
+	V4176= ((fixnum*)V4178)[(fixnum)1];}
+	if(!(((V4131))==((V4084)))){
+	goto T11027;
+	}
+	V4177= V4176;
+	goto T11026;
+	
+	goto T11027;
+T11027:;
+	{fixnum V4179;
+	V4179= ((fixnum)V4084);
+	V4177= ((fixnum*)V4179)[(fixnum)1];}
+	goto T11026;
+T11026:;
+	{fixnum V4180;
+	fixnum V4181;
+	fixnum V4182;
+	{fixnum V4183;
+	{int8_t V4184;
+	{int8_t V4185;
+	V4185= (V4169)-(1);
+	V4184= V4185;}
+	V4183= (V4156<<(fixnum)V4184);}
+	V4180= (V4176+V4183);}
+	{fixnum V4186;
+	{int8_t V4187;
+	{int8_t V4188;
+	V4188= (V4169)-(1);
+	V4187= V4188;}
+	V4186= (V4157<<(fixnum)V4187);}
+	V4181= (V4177+V4186);}
+	{int8_t V4189;
+	{int8_t V4190;
+	V4190= (V4169)-(1);
+	V4189= V4190;}
+	V4182= (V4158<<(fixnum)V4189);}
+	(void)({fixnum f=1;f;});
+	(void)(((fixnum(*)(fixnum,fixnum,fixnum))(dlmemmove))(V4180,V4181,V4182));}}}
+	goto T11016;
+T11016:;}
+	V4152= (V4152)->c.c_cdr;
+	V4153= V4154;
+	V4154= fix(V4152->c.c_car);
+	{fixnum V4192;
+	V4192= V4155;
+	{fixnum V4193;
+	V4193= (V4192)+(1);
+	V4155= V4193;}}
+	goto T10993;
+	
+	goto T10995;
+T10995:;
+	if(!(((V4084))==((V4131)))){
+	goto T11056;
+	}
+	{fixnum V4194;
+	fixnum V4195;
+	V4194= ((fixnum)V4131);
+	{fixnum V4196;
+	{fixnum V4197;
+	{fixnum V4198;
+	V4198= ((fixnum)V4131);
+	V4197= ((uint*)V4198)[(fixnum)4];}
+	V4196= (V4197&(fixnum)-268435456);}
+	V4195= (V4130|V4196);}
+	(void)(((uint*)V4194)[(fixnum)4]=(uint)V4195);}
+	goto T11055;
+	
+	goto T11056;
+T11056:;
+	goto T11055;
+T11055:;
+	V4083= (V4131);
+	goto T10702;
+	}}}}}}
+	goto T10702;
+T10702:;
+	(((object)VV[310])->s.s_dbind)= (V4083);
+	V4199= V4079->c.c_cdr;
+	{object V4200;
+	if (V4078) {
+	#define V4201 ((object *)V4078)[0]
+	V4200= ({object  _t0=(V4199);object  _t1=Ct;
+	V4201= (_t1);_t0;});
+	#undef V4201
+	} else {
+	V4200= ({object  _t0=(V4199);object  _t1=Ct;
+	(void)((_t1));_t0;});
+	}
+	VMRV123(V4200,1);}}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-COLLECT-PREPOSITIONAL-PHRASES	*/
+
+static object LI152__LOOP_COLLECT_PREPOSITIONAL_PHRASES__loop(object V4203,...)
+{	 VMB124 VMS124 VMV124
+	va_list ap;
+	va_start(ap,V4203);
+	{object V4204;
+	int8_t V4205;
+	int8_t V4206;
+	object V4207;
+	register object V4208;
+	object V4209;
+	V4204= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V4204))==Cnil){
+	goto T11068;
+	}
+	V4205= -((char)fcall.argd);
+	goto T11067;
+	
+	goto T11068;
+T11068:;
+	V4205= fcall.argd;
+	goto T11067;
+T11067:;
+	V4206= (V4205)-(1);
+	V4207= Cnil;
+	if(((V4204))==Cnil){
+	goto T11074;
+	}
+	if(!((V4206)==(1))){
+	goto T11077;
+	}
+	V4206= 0;
+	V4207= va_arg(ap,object);
+	if(((V4207))==Cnil){
+	goto T11080;
+	}
+	goto T11073;
+	
+	goto T11080;
+T11080:;
+	goto T11073;
+	
+	goto T11077;
+T11077:;
+	goto T11073;
+	
+	goto T11074;
+T11074:;
+	goto T11073;
+T11073:;
+	if(!((V4206)>(0))){
+	goto T11086;
+	}
+	V4206= (V4206)-(1);
+	V4208= va_arg(ap,object);
+	goto T11072;
+	
+	goto T11086;
+T11086:;
+	if(((V4207))==Cnil){
+	goto T11091;
+	}
+	{object V4210;
+	V4210= (V4207)->c.c_car;
+	V4207= (V4207)->c.c_cdr;
+	V4208= (V4210);
+	goto T11072;
+	}
+	goto T11091;
+T11091:;
+	V4208= Cnil;
+	goto T11072;
+T11072:;
+	if(((V4204))==Cnil){
+	goto T11099;
+	}
+	if(!((V4206)==(1))){
+	goto T11102;
+	}
+	V4206= 0;
+	V4207= va_arg(ap,object);
+	if(((V4207))==Cnil){
+	goto T11105;
+	}
+	goto T11098;
+	
+	goto T11105;
+T11105:;
+	goto T11098;
+	
+	goto T11102;
+T11102:;
+	goto T11098;
+	
+	goto T11099;
+T11099:;
+	goto T11098;
+T11098:;
+	if(!((V4206)>(0))){
+	goto T11111;
+	}
+	V4206= (V4206)-(1);
+	V4209= va_arg(ap,object);
+	goto T11097;
+	
+	goto T11111;
+T11111:;
+	if(((V4207))==Cnil){
+	goto T11116;
+	}
+	{object V4213;
+	V4213= (V4207)->c.c_car;
+	V4207= (V4207)->c.c_cdr;
+	V4209= (V4213);
+	goto T11097;
+	}
+	goto T11116;
+T11116:;
+	V4209= Cnil;
+	goto T11097;
+T11097:;
+	{register object V4216;
+	register object V4217;
+	register object V4218;
+	register object V4219;
+	register object V4220;
+	register object V4221;
+	{object V4222;
+	register object V4223;
+	V4222= Cnil;
+	V4223= Cnil;
+	{register object V4224;
+	V4224= (V4209);
+	goto T11126;
+T11126:;
+	if(((V4224))==Cnil){
+	goto T11128;
+	}
+	{object V4226;
+	V4226= (V4224)->c.c_car;
+	{object V4227;
+	{register object V4229;
+	V4229= V4226->c.c_car;
+	{register object V4230;
+	V4231= tp2(V4203);
+	if(!((V4231)==(0))){
+	goto T11137;
+	}
+	V4230= Ct;
+	goto T11136;
+	
+	goto T11137;
+T11137:;
+	V4230= Cnil;
+	goto T11136;
+T11136:;
+	{register fixnum V4232;
+	register object V4233;
+	if(((V4230))==Cnil){
+	goto T11142;
+	}
+	V4232= 268435455;
+	goto T11141;
+	
+	goto T11142;
+T11142:;
+	V4232= length((V4203));
+	goto T11141;
+T11141:;
+	if(((V4230))==Cnil){
+	goto T11146;
+	}
+	if(((V4203))==Cnil){
+	goto T11149;
+	}
+	V4233= (V4203);
+	goto T11145;
+	
+	goto T11149;
+T11149:;
+	V4233= Cnil;
+	goto T11145;
+	
+	goto T11146;
+T11146:;
+	V4233= (V4203);
+	goto T11145;
+T11145:;
+	{object V4234;
+	if(((V4230))==Cnil){
+	goto T11153;
+	}
+	V4234= (V4233);
+	goto T11152;
+	
+	goto T11153;
+T11153:;
+	V4234= Cnil;
+	goto T11152;
+T11152:;
+	if(!((0)>=(V4232))){
+	goto T11161;
+	}
+	goto T11160;
+	
+	goto T11161;
+T11161:;
+	if(((V4230))==Cnil){
+	goto T11164;
+	}
+	if(((V4234))==Cnil){
+	goto T11167;
+	}
+	goto T11159;
+	
+	goto T11167;
+T11167:;
+	goto T11160;
+	
+	goto T11164;
+T11164:;
+	goto T11159;
+	
+	goto T11160;
+T11160:;
+	goto T11156;
+	
+	goto T11159;
+T11159:;
+	{object V4235;
+	if(((V4230))==Cnil){
+	goto T11171;
+	}
+	V4235= V4234->c.c_car;
+	goto T11170;
+	
+	goto T11171;
+T11171:;
+	V4235= (/* COMMON-LISP::ROW-MAJOR-AREF */(*LnkLI215)((V4233),(fixnum)0));
+	goto T11170;
+T11170:;
+	{object V4236;
+	V4236= (/* ANSI-LOOP::LOOP-TMEMBER */(*LnkLI210)((V4229),(V4235)));
+	if((V4236->c.c_car)==Cnil){
+	goto T11177;
+	}}
+	goto T11176;
+	
+	goto T11177;
+T11177:;
+	goto T11174;
+	
+	goto T11176;
+T11176:;
+	V4228= (V4235);
+	goto T11134;
+	
+	goto T11174;
+T11174:;}
+	{register fixnum V4237;
+	register object V4238;
+	if(((V4230))==Cnil){
+	goto T11181;
+	}
+	V4237= 0;
+	goto T11180;
+	
+	goto T11181;
+T11181:;
+	V4237= 1;
+	goto T11180;
+T11180:;
+	V4238= V4234->c.c_cdr;
+	goto T11186;
+T11186:;
+	if(!((V4237)>=(V4232))){
+	goto T11193;
+	}
+	goto T11192;
+	
+	goto T11193;
+T11193:;
+	if(((V4230))==Cnil){
+	goto T11196;
+	}
+	if(((V4238))==Cnil){
+	goto T11199;
+	}
+	goto T11191;
+	
+	goto T11199;
+T11199:;
+	goto T11192;
+	
+	goto T11196;
+T11196:;
+	goto T11191;
+	
+	goto T11192;
+T11192:;
+	goto T11188;
+	
+	goto T11191;
+T11191:;
+	{object V4240;
+	{fixnum V4242;
+	V4242= V4237;
+	if(((V4230))==Cnil){
+	goto T11204;
+	}
+	V4240= (V4238)->c.c_car;
+	goto T11202;
+	
+	goto T11204;
+T11204:;
+	V4240= (/* COMMON-LISP::ROW-MAJOR-AREF */(*LnkLI215)((V4233),V4242));}
+	goto T11202;
+T11202:;
+	{object V4243;
+	V4243= (/* ANSI-LOOP::LOOP-TMEMBER */(*LnkLI210)((V4229),(V4240)));
+	if((V4243->c.c_car)==Cnil){
+	goto T11210;
+	}}
+	goto T11209;
+	
+	goto T11210;
+T11210:;
+	goto T11207;
+	
+	goto T11209;
+T11209:;
+	V4228= (V4240);
+	goto T11134;
+	
+	goto T11207;
+T11207:;}
+	{fixnum V4244;
+	object V4245;
+	if(((V4230))==Cnil){
+	goto T11214;
+	}
+	V4244= V4237;
+	goto T11213;
+	
+	goto T11214;
+T11214:;
+	{fixnum V4246;
+	V4246= V4237;
+	{fixnum V4247;
+	V4247= (V4246)+(1);
+	V4244= V4247;}}
+	goto T11213;
+T11213:;
+	V4245= (V4238)->c.c_cdr;
+	V4237= V4244;
+	V4238= (V4245);
+	goto T11186;
+	}
+	goto T11188;
+T11188:;
+	V4228= Cnil;
+	goto T11134;
+	}
+	goto T11156;
+T11156:;
+	V4228= Cnil;}}}}
+	goto T11134;
+T11134:;
+	V4227= (/* COMMON-LISP::COPY-LIST */(*LnkLI235)((V4228)));
+	if(((V4223))==Cnil){
+	goto T11225;
+	}
+	(void)((((V4223))->c.c_cdr=((V4227)),((V4223))));
+	goto T11224;
+	
+	goto T11225;
+T11225:;
+	V4222= (V4227);
+	goto T11224;
+T11224:;
+	if(((V4227))==Cnil){
+	goto T11232;
+	}
+	goto T11231;
+	
+	goto T11232;
+T11232:;
+	goto T11229;
+	
+	goto T11231;
+T11231:;
+	{object V4249;
+	V4249= V4227->c.c_cdr;
+	{register object V4250;
+	register object V4251;
+	V4250= (V4227);
+	V4251= (V4249);
+	goto T11237;
+T11237:;
+	if(((V4251))==Cnil){
+	goto T11246;
+	}
+	goto T11245;
+	
+	goto T11246;
+T11246:;
+	goto T11244;
+	
+	goto T11245;
+T11245:;
+	goto T11242;
+	
+	goto T11244;
+T11244:;
+	goto T11239;
+	
+	goto T11242;
+T11242:;
+	{object V4253;
+	object V4254;
+	V4253= (V4250)->c.c_cdr;
+	V4254= (V4251)->c.c_cdr;
+	V4250= (V4253);
+	V4251= (V4254);}
+	goto T11237;
+	
+	goto T11239;
+T11239:;
+	V4223= (V4250);
+	goto T11234;
+	}}
+	goto T11234;
+T11234:;
+	goto T11131;
+	
+	goto T11229;
+T11229:;}}
+	goto T11131;
+T11131:;
+	{object V4257;
+	V4257= (V4224)->c.c_cdr;
+	V4224= (V4257);
+	goto T11126;
+	}
+	goto T11128;
+T11128:;
+	goto T11124;
+	}
+	goto T11124;
+T11124:;
+	V4220= (V4222);}
+	{object V4259;
+	register object V4260;
+	V4259= Cnil;
+	V4260= Cnil;
+	{register object V4261;
+	V4261= (V4209);
+	goto T11263;
+T11263:;
+	if(((V4261))==Cnil){
+	goto T11265;
+	}
+	{object V4263;
+	V4263= (V4261)->c.c_car;
+	{object V4264;
+	{object V4266;
+	V4266= (V4263);
+	V4267= tp2(V4263);
+	if(!((V4267)==(0))){
+	goto T11279;
+	}
+	goto T11278;
+	
+	goto T11279;
+T11279:;
+	goto T11277;
+	
+	goto T11278;
+T11278:;
+	goto T11276;
+	
+	goto T11277;
+T11277:;
+	goto T11274;
+	
+	goto T11276;
+T11276:;
+	V4266= (V4263);
+	goto T11273;
+	
+	goto T11274;
+T11274:;
+	V4266= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI165)(((object)VV[74]),(V4263),((object)VV[40]),Cnil));
+	goto T11273;
+T11273:;
+	V4265= V4266->c.c_car;}
+	V4264= make_cons((V4265),Cnil);
+	if(((V4260))==Cnil){
+	goto T11284;
+	}
+	{object V4268;
+	V4268= (((V4260))->c.c_cdr=((V4264)),((V4260)));
+	V4260= V4268->c.c_cdr;
+	goto T11283;
+	}
+	goto T11284;
+T11284:;
+	V4259= (V4264);
+	V4260= (V4259);
+	goto T11283;
+T11283:;}}
+	{object V4269;
+	V4269= (V4261)->c.c_cdr;
+	V4261= (V4269);
+	goto T11263;
+	}
+	goto T11265;
+T11265:;
+	goto T11261;
+	}
+	goto T11261;
+T11261:;
+	V4221= (V4259);}
+	V4216= Cnil;
+	V4217= (V4209);
+	V4218= Cnil;
+	V4219= Cnil;
+	goto T11293;
+T11293:;
+	if(((((object)VV[257])->s.s_dbind))==Cnil){
+	goto T11300;
+	}
+	goto T11298;
+	
+	goto T11300;
+T11300:;
+	goto T11295;
+	
+	goto T11298;
+T11298:;
+	{object V4271;
+	V4271= (((object)VV[257])->s.s_dbind);
+	V4216= V4271->c.c_car;}
+	{register object V4272;
+	register object V4273;
+	V4272= (V4203);
+	V4273= V4203->c.c_car;
+	goto T11307;
+T11307:;
+	if(((V4272))==Cnil){
+	goto T11314;
+	}
+	goto T11312;
+	
+	goto T11314;
+T11314:;
+	goto T11309;
+	
+	goto T11312;
+T11312:;
+	V4219= (L153__IN_GROUP_P__loop(base,(V4216),(V4273)));
+	if(((V4219))==Cnil){
+	goto T11317;
+	}
+	V4218= (V4273);
+	goto T11304;
+	
+	goto T11317;
+T11317:;
+	V4272= (V4272)->c.c_cdr;
+	V4273= V4272->c.c_car;
+	goto T11307;
+	
+	goto T11309;
+T11309:;
+	goto T11304;
+	}
+	goto T11304;
+T11304:;
+	if(((V4218))==Cnil){
+	goto T11328;
+	}
+	{register object V4277;
+	V4277= (V4220);
+	goto T11343;
+T11343:;
+	if(((V4277))==Cnil){
+	goto T11345;
+	}
+	{object V4279;
+	V4279= (V4277)->c.c_car;
+	if(!(((V4219))==((V4279)))){
+	goto T11353;
+	}
+	goto T11351;
+	
+	goto T11353;
+T11353:;
+	goto T11349;
+	}
+	goto T11351;
+T11351:;
+	goto T11334;
+	
+	goto T11349;
+T11349:;
+	{object V4280;
+	V4280= (V4277)->c.c_cdr;
+	V4277= (V4280);
+	goto T11343;
+	}
+	goto T11345;
+T11345:;
+	goto T11341;
+	}
+	goto T11341;
+T11341:;
+	if(((V4220))==Cnil){
+	goto T11339;
+	}
+	goto T11336;
+	
+	goto T11339;
+T11339:;
+	goto T11332;
+	
+	goto T11336;
+T11336:;
+	goto T11332;
+	
+	goto T11334;
+T11334:;
+	{register object V4285;
+	V4285= (V4221);
+	goto T11370;
+T11370:;
+	if(((V4285))==Cnil){
+	goto T11372;
+	}
+	{object V4287;
+	V4287= (V4285)->c.c_car;
+	if(!(((V4219))==((V4287)))){
+	goto T11380;
+	}
+	goto T11378;
+	
+	goto T11380;
+T11380:;
+	goto T11376;
+	}
+	goto T11378;
+T11378:;
+	goto T11361;
+	
+	goto T11376;
+T11376:;
+	{object V4288;
+	V4288= (V4285)->c.c_cdr;
+	V4285= (V4288);
+	goto T11370;
+	}
+	goto T11372;
+T11372:;
+	goto T11368;
+	}
+	goto T11368;
+T11368:;
+	if(((V4221))==Cnil){
+	goto T11366;
+	}
+	goto T11363;
+	
+	goto T11366;
+T11366:;
+	goto T11359;
+	
+	goto T11363;
+T11363:;
+	goto T11359;
+	
+	goto T11361;
+T11361:;
+	V4282= ((object)VV[523]);
+	goto T11358;
+	
+	goto T11359;
+T11359:;
+	V4282= ((object)VV[524]);
+	goto T11358;
+T11358:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)((V4282),(V4216))));
+	goto T11331;
+	
+	goto T11332;
+T11332:;
+	goto T11331;
+T11331:;
+	V4291= tp2((V4218));
+	if(!((V4291)==(0))){
+	goto T11390;
+	}
+	goto T11389;
+	
+	goto T11390;
+T11390:;
+	goto T11387;
+	
+	goto T11389;
+T11389:;
+	{object V4294;
+	V4294= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(2*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V4218);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V4221);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V4295;
+	register object V4296;
+	V4295= Cnil;
+	V4296= Cnil;
+	{object V4297;
+	V4297= (V4218)->c.c_car;
+	{object V4298;
+	V4298= make_cons((V4297),Cnil);
+	V4295= (V4298);
+	V4296= (V4295);}}
+	{register object V4299;
+	V4299= (V4218)->c.c_cdr;
+	goto T11405;
+T11405:;
+	if(((V4299))==Cnil){
+	goto T11407;
+	}
+	{object V4301;
+	V4301= (V4299)->c.c_car;
+	{object V4302;
+	V4302= make_cons((V4301),Cnil);
+	(void)((((V4296))->c.c_cdr=((V4302)),((V4296))));
+	V4296= (V4302);}}
+	{object V4303;
+	V4303= (V4299)->c.c_cdr;
+	V4299= (V4303);
+	goto T11405;
+	}
+	goto T11407;
+T11407:;
+	goto T11397;
+	}
+	goto T11397;
+T11397:;
+	(void)((((V4296))->c.c_cdr=((V4221)),((V4296))));
+	V4296= (V4221);
+	V4221= (V4295);
+	goto T11386;
+	}}
+	goto T11387;
+T11387:;
+	V4221= make_cons((V4218),(V4221));
+	goto T11386;
+T11386:;
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	{object V4305;
+	V4305= list(2,(V4219),(/* ANSI-LOOP::LOOP-GET-FORM */(*LnkLI211)()));
+	V4217= make_cons((V4305),(V4217));
+	goto T11327;
+	}
+	goto T11328;
+T11328:;
+	if(((V4208))==Cnil){
+	goto T11427;
+	}
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V4216),((object)VV[525]))))==Cnil){
+	goto T11424;
+	}
+	goto T11426;
+	
+	goto T11427;
+T11427:;
+	goto T11424;
+	
+	goto T11426;
+T11426:;
+	(void)((/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)()));
+	{register object V4306;
+	register object V4307;
+	V4306= (/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)());
+	V4307= Cnil;
+	goto T11433;
+T11433:;
+	{object V4309;
+	V4309= (V4306)->c.c_cdr;
+	if((V4309->c.c_car)==Cnil){
+	goto T11436;
+	}}
+	V4310= (V4306)->c.c_car;
+	V4307= (/* ANSI-LOOP::LOOP-TASSOC */(*LnkLI242)((V4310),(((object)VV[310])->s.s_dbind)));
+	if(((V4307))==Cnil){
+	goto T11440;
+	}
+	V4312= (V4306)->c.c_car;
+	{object V4316;
+	V4316= (V4306)->c.c_cdr;
+	V4314= V4316->c.c_car;}
+	{object V4318;
+	V4318= V4307->c.c_cdr;
+	V4317= V4318->c.c_car;}
+	(void)((fcall.argd=4,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[526]),(V4312),(V4314),(V4317))));
+	goto T11435;
+	
+	goto T11440;
+T11440:;
+	{object V4319;
+	V4320= (V4306)->c.c_car;
+	{object V4324;
+	V4324= (V4306)->c.c_cdr;
+	V4322= V4324->c.c_car;}
+	V4319= make_cons((V4320),(V4322));
+	V4325= make_cons((V4319),(((object)VV[310])->s.s_dbind));
+	(((object)VV[310])->s.s_dbind)= (V4325);
+	goto T11435;
+	}
+	goto T11436;
+T11436:;
+	goto T11435;
+T11435:;
+	if(((((object)VV[257])->s.s_dbind))==Cnil){
+	goto T11462;
+	}
+	goto T11459;
+	
+	goto T11462;
+T11462:;
+	goto T11458;
+	
+	goto T11459;
+T11459:;
+	{object V4326;
+	{object V4327;
+	V4327= (((object)VV[257])->s.s_dbind);
+	V4326= V4327->c.c_car;}
+	if(((V4326))==Cnil){
+	goto T11465;
+	}
+	V4328= tp5(V4326);
+	switch(V4328){
+	case 19:
+	goto T11470;
+T11470:;
+	goto T11458;
+	
+	default:
+	goto T11471;
+T11471:;
+	goto T11456;
+	}
+	goto T11456;
+	
+	goto T11465;
+T11465:;}
+	goto T11458;
+T11458:;
+	goto T11327;
+	
+	goto T11456;
+T11456:;
+	{object V4329;
+	V4329= (/* ANSI-LOOP::LOOP-POP-SOURCE */(*LnkLI207)());
+	V4306= (V4329);}
+	goto T11433;
+	}
+	goto T11424;
+T11424:;
+	{object V4330 = (/* COMMON-LISP::NREVERSE */(*LnkLI192)((V4217)));
+	VMR124(V4330);}
+	goto T11327;
+T11327:;
+	V4218= Cnil;
+	V4219= Cnil;
+	goto T11293;
+	
+	goto T11295;
+T11295:;
+	{object V4331 = (/* COMMON-LISP::NREVERSE */(*LnkLI192)((V4217)));
+	VMR124(V4331);}}}
+	va_end(ap);
+}
+/*	local function IN-GROUP-P	*/
+
+static object L153__IN_GROUP_P__loop(object *base0,object V4334,object V4335)
+{	
+	VMB125 VMS125 VMV125
+	vs_check;
+	{object V4336;
+	V4336= (/* ANSI-LOOP::LOOP-TMEMBER */(*LnkLI210)((V4334),(V4335)));
+	{object V4337 = V4336->c.c_car;
+	VMR125(V4337);}}
+	#undef base0
+}
+/*	local entry for function ANSI-LOOP::LOOP-SEQUENCER	*/
+
+static object LI154__LOOP_SEQUENCER__loop(object V4348,register object V4349,object V4350,object V4351,object V4352,register object V4353,register object V4354,object V4355,object V4356,object V4357)
+{	 VMB126 VMS126 VMV126
+	{object V4358;
+	V4358= (V4355);
+	{object V4359;
+	object V4360;
+	object V4361;
+	object V4362;
+	object V4363;
+	register object V4364;
+	object V4365;
+	register object V4366;
+	object V4367;
+	object V4368;
+	object V4369;
+	object V4370;
+	object V4371;
+	register object V4372;
+	register object V4373;
+	register object V4374;
+	{object V4375;
+	{object V4376;
+	V4376= (/* ANSI-LOOP::LOOP-TYPED-INIT */(*LnkLI173)((V4349)));
+	if(((V4376))==Cnil){
+	goto T11489;
+	}
+	V4375= (V4376);
+	goto T11487;
+	
+	goto T11489;
+T11489:;
+	V4375= make_fixnum(0);}
+	goto T11487;
+T11487:;
+	{object V4377;
+	V4377= immnum_plus((V4375),make_fixnum(1));
+	V4363= (V4377);}}
+	if(((V4348))==Cnil){
+	goto T11494;
+	}
+	V4374= (V4348);
+	goto T11493;
+	
+	goto T11494;
+T11494:;
+	V4374= fSgensym0();
+	goto T11493;
+T11493:;
+	V4359= Cnil;
+	V4360= Cnil;
+	V4361= Cnil;
+	V4362= Cnil;
+	V4364= Ct;
+	V4365= Cnil;
+	V4366= Cnil;
+	V4367= Cnil;
+	V4368= Cnil;
+	V4369= Cnil;
+	V4370= Cnil;
+	V4371= Cnil;
+	V4372= Cnil;
+	V4373= Cnil;
+	if(((V4351))==Cnil){
+	goto T11498;
+	}
+	(void)((/* ANSI-LOOP::LOOP-MAKE-ITERATION-VARIABLE */(*LnkLI236)((V4351),Cnil,(V4352))));
+	goto T11497;
+	
+	goto T11498;
+T11498:;
+	goto T11497;
+T11497:;
+	{register object V4378;
+	register object V4379;
+	register object V4380;
+	register object V4381;
+	V4378= (V4357);
+	V4379= Cnil;
+	V4380= Cnil;
+	V4381= Cnil;
+	goto T11503;
+T11503:;
+	if(((V4378))==Cnil){
+	goto T11510;
+	}
+	goto T11508;
+	
+	goto T11510;
+T11510:;
+	goto T11505;
+	
+	goto T11508;
+T11508:;
+	{object V4383;
+	V4383= (V4378)->c.c_car;
+	V4379= V4383->c.c_car;}
+	{object V4385;
+	{object V4386;
+	V4386= (V4378)->c.c_car;
+	V4385= V4386->c.c_cdr;}
+	V4380= V4385->c.c_car;}
+	if(!(((V4379))==(((object)VV[527])))){
+	goto T11523;
+	}
+	goto T11522;
+	
+	goto T11523;
+T11523:;
+	if(!(((V4379))==(((object)VV[528])))){
+	goto T11520;
+	}
+	goto T11522;
+T11522:;
+	V4360= Ct;
+	(void)((fcall.argd=3,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V4353),(V4380),(V4354))));
+	goto T11519;
+	
+	goto T11520;
+T11520:;
+	if(!(((V4379))==(((object)VV[529])))){
+	goto T11531;
+	}
+	goto T11530;
+	
+	goto T11531;
+T11531:;
+	if(!(((V4379))==(((object)VV[530])))){
+	goto T11534;
+	}
+	goto T11530;
+	
+	goto T11534;
+T11534:;
+	if(!(((V4379))==(((object)VV[531])))){
+	goto T11528;
+	}
+	goto T11530;
+T11530:;
+	V4368= Ct;
+	if(!(((V4379))==(((object)VV[532])))){
+	goto T11540;
+	}
+	V4366= ((object)VV[533]);
+	goto T11539;
+	
+	goto T11540;
+T11540:;
+	if(!(((V4379))==(((object)VV[534])))){
+	goto T11544;
+	}
+	V4366= ((object)VV[535]);
+	goto T11539;
+	
+	goto T11544;
+T11544:;
+	goto T11539;
+T11539:;
+	register object  V4388;
+	object V4387[2];
+	#define V4389 V4387[0]
+	#define V4390 V4387[1]
+	
+	{
+	V4388= (fcall.valp=(fixnum)V4387,fcall.argd=2,/* ANSI-LOOP::LOOP-CONSTANT-FOLD-IF-POSSIBLE */(*LnkLI237)((V4380),(V4349)));
+	
+	vs_top=sup;
+	V4380= (V4388);
+	V4370= (V4389);
+	V4369= (V4390);
+	#undef V4389
+	#undef V4390
+	
+	}
+	(void)((/* ANSI-LOOP::LOOP-MAKE-ITERATION-VARIABLE */(*LnkLI236)((V4374),(V4380),(V4349))));
+	goto T11519;
+	
+	goto T11528;
+T11528:;
+	if(!(((V4379))==(((object)VV[536])))){
+	goto T11563;
+	}
+	goto T11562;
+	
+	goto T11563;
+T11563:;
+	if(!(((V4379))==(((object)VV[537])))){
+	goto T11566;
+	}
+	goto T11562;
+	
+	goto T11566;
+T11566:;
+	if(!(((V4379))==(((object)VV[538])))){
+	goto T11569;
+	}
+	goto T11562;
+	
+	goto T11569;
+T11569:;
+	if(!(((V4379))==(((object)VV[539])))){
+	goto T11572;
+	}
+	goto T11562;
+	
+	goto T11572;
+T11572:;
+	if(!(((V4379))==(((object)VV[540])))){
+	goto T11560;
+	}
+	goto T11562;
+T11562:;
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V4379),((object)VV[541]))))==Cnil){
+	goto T11576;
+	}
+	V4366= ((object)VV[535]);
+	V4367= ((object)VV[535]);
+	goto T11575;
+	
+	goto T11576;
+T11576:;
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V4379),((object)VV[542]))))==Cnil){
+	goto T11581;
+	}
+	V4367= Ct;
+	goto T11575;
+	
+	goto T11581;
+T11581:;
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V4379),((object)VV[543]))))==Cnil){
+	goto T11585;
+	}
+	V4366= ((object)VV[533]);
+	V4367= ((object)VV[533]);
+	goto T11575;
+	
+	goto T11585;
+T11585:;
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V4379),((object)VV[544]))))==Cnil){
+	goto T11590;
+	}
+	V4366= ((object)VV[533]);
+	goto T11575;
+	
+	goto T11590;
+T11590:;
+	if(((/* ANSI-LOOP::LOOP-TEQUAL */(*LnkLI217)((V4379),((object)VV[545]))))==Cnil){
+	goto T11594;
+	}
+	V4366= ((object)VV[535]);
+	goto T11575;
+	
+	goto T11594;
+T11594:;
+	goto T11575;
+T11575:;
+	V4371= Ct;
+	register object  V4392;
+	object V4391[2];
+	#define V4393 V4391[0]
+	#define V4394 V4391[1]
+	
+	{
+	V4392= (fcall.valp=(fixnum)V4391,fcall.argd=2,/* ANSI-LOOP::LOOP-CONSTANT-FOLD-IF-POSSIBLE */(*LnkLI237)((V4380),(V4349)));
+	
+	vs_top=sup;
+	V4380= (V4392);
+	V4372= (V4393);
+	V4373= (V4394);
+	#undef V4393
+	#undef V4394
+	
+	}
+	if(((V4372))==Cnil){
+	goto T11613;
+	}
+	V4359= list(2,((object)VV[244]),(V4373));
+	goto T11612;
+	
+	goto T11613;
+T11613:;
+	V4395= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[546])));
+	V4359= (fcall.argd=3,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V4395),(V4380),(V4349)));
+	goto T11612;
+T11612:;
+	goto T11519;
+	
+	goto T11560;
+T11560:;
+	if(!(((V4379))==(((object)VV[547])))){
+	goto T11616;
+	}
+	register object  V4397;
+	object V4396[2];
+	#define V4398 V4396[0]
+	#define V4399 V4396[1]
+	
+	{
+	V4397= (fcall.valp=(fixnum)V4396,fcall.argd=2,/* ANSI-LOOP::LOOP-CONSTANT-FOLD-IF-POSSIBLE */(*LnkLI237)((V4380),(V4349)));
+	
+	vs_top=sup;
+	V4380= (V4397);
+	V4364= (V4398);
+	V4363= (V4399);
+	#undef V4398
+	#undef V4399
+	
+	}
+	if(((V4364))==Cnil){
+	goto T11634;
+	}
+	goto T11631;
+	
+	goto T11634;
+T11634:;
+	V4363= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[548])));
+	(void)((fcall.argd=3,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V4363),(V4380),(V4349))));
+	goto T11519;
+	
+	goto T11631;
+T11631:;
+	goto T11519;
+	
+	goto T11616;
+T11616:;
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[549]),(V4379))));
+	goto T11519;
+T11519:;
+	if(((V4381))==Cnil){
+	goto T11641;
+	}
+	if(((V4366))==Cnil){
+	goto T11644;
+	}
+	if(!(((V4366))==((V4381)))){
+	goto T11647;
+	}
+	goto T11638;
+	
+	goto T11647;
+T11647:;
+	goto T11640;
+	
+	goto T11644;
+T11644:;
+	goto T11638;
+	
+	goto T11641;
+T11641:;
+	goto T11638;
+	
+	goto T11640;
+T11640:;
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[550]))));
+	goto T11637;
+	
+	goto T11638;
+T11638:;
+	goto T11637;
+T11637:;
+	V4381= (V4366);
+	{object V4400;
+	V4400= (V4378)->c.c_cdr;
+	V4378= (V4400);}
+	goto T11503;
+	
+	goto T11505;
+T11505:;
+	goto T11501;
+	}
+	goto T11501;
+T11501:;
+	if(((V4353))==Cnil){
+	goto T11661;
+	}
+	if(((V4360))==Cnil){
+	goto T11664;
+	}
+	goto T11658;
+	
+	goto T11664;
+T11664:;
+	goto T11660;
+	
+	goto T11661;
+T11661:;
+	goto T11658;
+	
+	goto T11660;
+T11660:;
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[551]))));
+	goto T11657;
+	
+	goto T11658;
+T11658:;
+	goto T11657;
+T11657:;
+	if(((V4368))==Cnil){
+	goto T11670;
+	}
+	goto T11667;
+	
+	goto T11670;
+T11670:;
+	V4370= Ct;
+	{object V4403;
+	V4403= (/* ANSI-LOOP::LOOP-TYPED-INIT */(*LnkLI173)((V4349)));
+	if(((V4403))==Cnil){
+	goto T11677;
+	}
+	V4369= (V4403);
+	goto T11675;
+	
+	goto T11677;
+T11677:;
+	V4369= make_fixnum(0);}
+	goto T11675;
+T11675:;
+	V4402= (V4369);
+	(void)((/* ANSI-LOOP::LOOP-MAKE-ITERATION-VARIABLE */(*LnkLI236)((V4374),(V4402),(V4349))));
+	goto T11666;
+	
+	goto T11667;
+T11667:;
+	goto T11666;
+T11666:;
+	if(!(((V4366))==(Cnil))){
+	goto T11691;
+	}
+	goto T11690;
+	
+	goto T11691;
+T11691:;
+	goto T11688;
+	
+	goto T11690;
+T11690:;
+	goto T11683;
+	
+	goto T11688;
+T11688:;
+	if(!(((V4366))==(((object)VV[535])))){
+	goto T11697;
+	}
+	goto T11696;
+	
+	goto T11697;
+T11697:;
+	goto T11694;
+	
+	goto T11696;
+T11696:;
+	goto T11683;
+	
+	goto T11694;
+T11694:;
+	goto T11681;
+	
+	goto T11683;
+T11683:;
+	if(((V4371))==Cnil){
+	goto T11704;
+	}
+	goto T11703;
+	
+	goto T11704;
+T11704:;
+	if(((V4356))==Cnil){
+	goto T11701;
+	}
+	goto T11703;
+T11703:;
+	if(((V4371))==Cnil){
+	goto T11711;
+	}
+	goto T11708;
+	
+	goto T11711;
+T11711:;
+	V4359= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[552])));
+	(void)((fcall.argd=3,/* ANSI-LOOP::LOOP-MAKE-VARIABLE */(*LnkLI219)((V4359),Cnil,(V4349))));
+	{object V4405;
+	V4405= list(3,((object)VV[47]),(V4359),(V4356));
+	V4406= make_cons((V4405),(((object)VV[314])->s.s_dbind));
+	(((object)VV[314])->s.s_dbind)= (V4406);
+	goto T11707;
+	}
+	goto T11708;
+T11708:;
+	goto T11707;
+T11707:;
+	if(((V4367))==Cnil){
+	goto T11718;
+	}
+	V4361= ((object)VV[119]);
+	goto T11717;
+	
+	goto T11718;
+T11718:;
+	V4361= ((object)VV[474]);
+	goto T11717;
+T11717:;
+	goto T11700;
+	
+	goto T11701;
+T11701:;
+	goto T11700;
+T11700:;
+	if(!(((V4363))==(make_fixnum(1)))){
+	goto T11722;
+	}
+	V4365= list(2,((object)VV[435]),(V4374));
+	goto T11721;
+	
+	goto T11722;
+T11722:;
+	V4365= list(3,((object)VV[436]),(V4374),(V4363));
+	goto T11721;
+T11721:;
+	goto T11680;
+	
+	goto T11681;
+T11681:;
+	if(((V4368))==Cnil){
+	goto T11729;
+	}
+	goto T11726;
+	
+	goto T11729;
+T11729:;
+	if(((V4356))==Cnil){
+	goto T11735;
+	}
+	goto T11732;
+	
+	goto T11735;
+T11735:;
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[553]))));
+	goto T11731;
+	
+	goto T11732;
+T11732:;
+	goto T11731;
+T11731:;
+	{object V4407;
+	V4407= list(3,((object)VV[47]),(V4374),list(2,((object)VV[554]),(V4356)));
+	V4408= make_cons((V4407),(((object)VV[314])->s.s_dbind));
+	(((object)VV[314])->s.s_dbind)= (V4408);
+	goto T11725;
+	}
+	goto T11726;
+T11726:;
+	goto T11725;
+T11725:;
+	if(((V4356))==Cnil){
+	goto T11743;
+	}
+	if(((V4359))==Cnil){
+	goto T11746;
+	}
+	goto T11740;
+	
+	goto T11746;
+T11746:;
+	goto T11742;
+	
+	goto T11743;
+T11743:;
+	goto T11740;
+	
+	goto T11742;
+T11742:;
+	V4359= (/* ANSI-LOOP::LOOP-TYPED-INIT */(*LnkLI173)((V4349)));
+	V4367= Ct;
+	goto T11739;
+	
+	goto T11740;
+T11740:;
+	goto T11739;
+T11739:;
+	if(((V4359))==Cnil){
+	goto T11752;
+	}
+	if(((V4367))==Cnil){
+	goto T11756;
+	}
+	V4361= ((object)VV[117]);
+	goto T11755;
+	
+	goto T11756;
+T11756:;
+	V4361= ((object)VV[555]);
+	goto T11755;
+T11755:;
+	goto T11751;
+	
+	goto T11752;
+T11752:;
+	goto T11751;
+T11751:;
+	if(!(((V4363))==(make_fixnum(1)))){
+	goto T11760;
+	}
+	V4365= list(2,((object)VV[554]),(V4374));
+	goto T11759;
+	
+	goto T11760;
+T11760:;
+	V4365= list(3,((object)VV[556]),(V4374),(V4363));
+	goto T11759;
+T11759:;
+	goto T11680;
+T11680:;
+	if(((V4361))==Cnil){
+	goto T11764;
+	}
+	V4409= list(3,(V4361),(V4374),(V4359));
+	V4362= (/* ANSI-LOOP::HIDE-VARIABLE-REFERENCE */(*LnkLI174)(Ct,(V4374),(V4409)));
+	goto T11763;
+	
+	goto T11764;
+T11764:;
+	goto T11763;
+T11763:;
+	if(((V4355))==Cnil){
+	goto T11769;
+	}
+	V4358= list(2,(V4351),(/* ANSI-LOOP::HIDE-VARIABLE-REFERENCE */(*LnkLI174)((V4350),(V4374),(V4355))));
+	goto T11768;
+	
+	goto T11769;
+T11769:;
+	goto T11768;
+T11768:;
+	{object V4410;
+	object V4411;
+	V4410= (V4362);
+	V4411= (V4362);
+	if(((V4364))==Cnil){
+	goto T11777;
+	}
+	if(((V4370))==Cnil){
+	goto T11780;
+	}
+	if(((V4372))==Cnil){
+	goto T11774;
+	}
+	goto T11776;
+	
+	goto T11780;
+T11780:;
+	goto T11774;
+	
+	goto T11777;
+T11777:;
+	goto T11774;
+	
+	goto T11776;
+T11776:;
+	{object V4412;
+	{object V4414;
+	{fixnum V4415;
+	{fixnum V4416;
+	V4416= ((fixnum)(V4361));
+	V4415= ((fixnum*)V4416)[(fixnum)1];}
+	if((((object)V4415))==Cnil){
+	goto T11791;
+	}
+	V4417= CMPmake_fixnum(V4415);
+	V4414= make_cons(((object)VV[557]),(V4417));
+	goto T11788;
+	
+	goto T11791;
+T11791:;
+	V4414= Cnil;}
+	goto T11788;
+T11788:;
+	if(((V4414))==Cnil){
+	goto T11794;
+	}
+	V4412= (V4414);
+	goto T11787;
+	
+	goto T11794;
+T11794:;
+	{object V4418;
+	{fixnum V4419;
+	V4419= ((fixnum)(V4361));
+	V4418= ((object*)V4419)[(fixnum)4];}
+	V4420= ((fixnum)V4418);
+	if(!((V4420)==(0))){
+	goto T11800;
+	}
+	(void)((fcall.argd=3,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[558]),((object)VV[559]),(V4361))));
+	goto T11799;
+	
+	goto T11800;
+T11800:;
+	goto T11799;
+T11799:;
+	{fixnum V4422;
+	{fixnum V4423;
+	V4423= ((fixnum)(V4361));
+	V4422= ((uchar*)V4423)[(fixnum)63];}
+	V4421= (V4422>>(fixnum)7);}
+	if(!((V4421)==(0))){
+	goto T11804;
+	}
+	V4412= (V4418);
+	goto T11787;
+	
+	goto T11804;
+T11804:;
+	V4412= make_cons(((object)VV[560]),(V4418));}}
+	goto T11787;
+T11787:;
+	V4425= tp4(V4412);
+	if(!((V4425)==(24))){
+	goto T11814;
+	}
+	goto T11813;
+	
+	goto T11814;
+T11814:;
+	goto T11811;
+	
+	goto T11813;
+T11813:;
+	V4424= (V4412);
+	goto T11810;
+	
+	goto T11811;
+T11811:;
+	V4424= (V4412)->s.s_gfdef;
+	goto T11810;
+T11810:;
+	V4410= ({object _z;fixnum _v=(fixnum)0;
+        fcall.fun=(V4424);fcall.valp=_v;fcall.argd=3-1;
+        _z=Rset && !((V4424))->fun.fun_argd && 
+        fcall.argd>=((V4424))->fun.fun_minarg && fcall.argd<=(((V4424))->fun.fun_maxarg) ? 
+        ((V4424))->fun.fun_self((V4369),(V4373)) : call_proc_cs2((V4369),(V4373));
+           if (!((V4424))->fun.fun_neval && !((V4424))->fun.fun_vv) vs_top=_v ? (object *)_v : sup;
+           _z;});}
+	if(((V4410))==Cnil){
+	goto T11783;
+	}
+	V4411= Ct;
+	goto T11773;
+	
+	goto T11783;
+T11783:;
+	goto T11773;
+	
+	goto T11774;
+T11774:;
+	goto T11773;
+T11773:;
+	{object V4426 = list(8,Cnil,list(2,(V4374),(/* ANSI-LOOP::HIDE-VARIABLE-REFERENCE */(*LnkLI174)(Ct,(V4374),(V4365)))),(V4411),(V4358),Cnil,Cnil,(V4410),(V4358));
+	VMR126(V4426);}}}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-FOR-ARITHMETIC	*/
+
+static object LI155__LOOP_FOR_ARITHMETIC__loop(object V4431,object V4432,object V4433,object V4434)
+{	 VMB127 VMS127 VMV127
+	V4435= (fcall.argd=2,/* ANSI-LOOP::LOOP-CHECK-DATA-TYPE */(*LnkLI231)((V4433),(((object)VV[438])->s.s_dbind)));
+	V4436= make_cons(list(2,(V4434),(V4432)),Cnil);
+	V4437= (fcall.argd=3,/* ANSI-LOOP::LOOP-COLLECT-PREPOSITIONAL-PHRASES */(*LnkLI240)(((object)VV[562]),Cnil,(V4436)));
+	{object V4438 = (/* ANSI-LOOP::LOOP-SEQUENCER */(*LnkLI244)((V4431),(V4435),Ct,Cnil,Cnil,Cnil,Cnil,Cnil,Cnil,(V4437)));
+	VMR127(V4438);}
+}
+/*	local entry for function ANSI-LOOP::LOOP-SEQUENCE-ELEMENTS-PATH	*/
+
+static object LI156__LOOP_SEQUENCE_ELEMENTS_PATH__loop(object V4442,object V4443,object V4444,...)
+{	 VMB128 VMS128 VMV128
+	va_list ap;
+	va_start(ap,V4444);
+	{register object V4445;
+	object V4446;
+	register object V4447;
+	object V4448;
+	register object V4449;
+	object V4450;
+	register object V4451;
+	object V4452;
+	register object V4453;
+	int8_t V4454;
+	register int8_t V4455;
+	register object V4456;
+	register object V4457;
+	object V4458;
+	register object V4459;
+	object V4460;
+	object V4461;
+	object V4462;
+	object V4463;
+	object V4464;
+	object V4465;
+	V4445= Cnil;
+	V4446= Cnil;
+	V4447= Cnil;
+	V4448= Cnil;
+	V4449= Cnil;
+	V4450= Cnil;
+	V4451= Cnil;
+	V4452= Cnil;
+	V4453= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V4453))==Cnil){
+	goto T11820;
+	}
+	V4454= -((char)fcall.argd);
+	goto T11819;
+	
+	goto T11820;
+T11820:;
+	V4454= fcall.argd;
+	goto T11819;
+T11819:;
+	V4455= (V4454)-(3);
+	V4456= Cnil;
+	V4457= Cnil;
+	V4458= Cnil;
+	V4459= Cnil;
+	V4460= Cnil;
+	V4461= Cnil;
+	{register object V4466;
+	register object V4467;
+	V4466= Cnil;
+	V4467= Cnil;
+	goto T11827;
+T11827:;
+	{object V4468;
+	if(((V4453))==Cnil){
+	goto T11837;
+	}
+	if(!((V4455)==(1))){
+	goto T11840;
+	}
+	V4455= 0;
+	V4456= va_arg(ap,object);
+	V4468= (V4456);
+	goto T11836;
+	
+	goto T11840;
+T11840:;
+	V4468= Cnil;
+	goto T11836;
+	
+	goto T11837;
+T11837:;
+	V4468= Cnil;
+	goto T11836;
+T11836:;
+	if(((V4468))==Cnil){
+	goto T11846;
+	}
+	goto T11835;
+	
+	goto T11846;
+T11846:;
+	{object V4469;
+	V4469= ((V4455)>(0)?Ct:Cnil);
+	if(((V4469))==Cnil){
+	goto T11850;
+	}
+	goto T11835;
+	
+	goto T11850;
+T11850:;
+	if(((V4456))==Cnil){
+	goto T11853;
+	}
+	goto T11835;
+	
+	goto T11853;
+T11853:;
+	goto T11834;
+	}}
+	goto T11835;
+T11835:;
+	goto T11832;
+	
+	goto T11834;
+T11834:;
+	goto T11829;
+	
+	goto T11832;
+T11832:;
+	if(((V4453))==Cnil){
+	goto T11859;
+	}
+	if(!((V4455)==(1))){
+	goto T11862;
+	}
+	V4455= 0;
+	V4456= va_arg(ap,object);
+	if(((V4456))==Cnil){
+	goto T11865;
+	}
+	goto T11858;
+	
+	goto T11865;
+T11865:;
+	goto T11858;
+	
+	goto T11862;
+T11862:;
+	goto T11858;
+	
+	goto T11859;
+T11859:;
+	goto T11858;
+T11858:;
+	if(!((V4455)>(0))){
+	goto T11871;
+	}
+	V4455= (V4455)-(1);
+	V4466= va_arg(ap,object);
+	goto T11857;
+	
+	goto T11871;
+T11871:;
+	if(((V4456))==Cnil){
+	goto T11876;
+	}
+	{object V4470;
+	V4470= (V4456)->c.c_car;
+	V4456= (V4456)->c.c_cdr;
+	V4466= (V4470);
+	goto T11857;
+	}
+	goto T11876;
+T11876:;
+	V4466= Cnil;
+	goto T11857;
+T11857:;
+	if(((V4453))==Cnil){
+	goto T11884;
+	}
+	if(!((V4455)==(1))){
+	goto T11887;
+	}
+	V4455= 0;
+	V4456= va_arg(ap,object);
+	if(((V4456))==Cnil){
+	goto T11890;
+	}
+	goto T11883;
+	
+	goto T11890;
+T11890:;
+	goto T11883;
+	
+	goto T11887;
+T11887:;
+	goto T11883;
+	
+	goto T11884;
+T11884:;
+	goto T11883;
+T11883:;
+	if(!((V4455)>(0))){
+	goto T11896;
+	}
+	V4455= (V4455)-(1);
+	V4467= va_arg(ap,object);
+	goto T11882;
+	
+	goto T11896;
+T11896:;
+	if(((V4456))==Cnil){
+	goto T11901;
+	}
+	{object V4473;
+	V4473= (V4456)->c.c_car;
+	V4456= (V4456)->c.c_cdr;
+	V4467= (V4473);
+	goto T11882;
+	}
+	goto T11901;
+T11901:;
+	V4476= make_cons((V4466),Cnil);
+	V4467= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[563]),((object)VV[59]),((object)VV[564]),(V4476)));
+	goto T11882;
+T11882:;
+	if(!(((V4466))==(((object)VV[565])))){
+	goto T11908;
+	}
+	if(((V4445))==Cnil){
+	goto T11914;
+	}
+	goto T11911;
+	
+	goto T11914;
+T11914:;
+	V4446= (V4467);
+	V4445= Ct;
+	goto T11907;
+	
+	goto T11911;
+T11911:;
+	goto T11907;
+	
+	goto T11908;
+T11908:;
+	if(!(((V4466))==(((object)VV[566])))){
+	goto T11919;
+	}
+	if(((V4447))==Cnil){
+	goto T11925;
+	}
+	goto T11922;
+	
+	goto T11925;
+T11925:;
+	V4448= (V4467);
+	V4447= Ct;
+	goto T11907;
+	
+	goto T11922;
+T11922:;
+	goto T11907;
+	
+	goto T11919;
+T11919:;
+	if(!(((V4466))==(((object)VV[567])))){
+	goto T11930;
+	}
+	if(((V4449))==Cnil){
+	goto T11936;
+	}
+	goto T11933;
+	
+	goto T11936;
+T11936:;
+	V4450= (V4467);
+	V4449= Ct;
+	goto T11907;
+	
+	goto T11933;
+T11933:;
+	goto T11907;
+	
+	goto T11930;
+T11930:;
+	if(!(((V4466))==(((object)VV[568])))){
+	goto T11941;
+	}
+	if(((V4451))==Cnil){
+	goto T11947;
+	}
+	goto T11944;
+	
+	goto T11947;
+T11947:;
+	V4452= (V4467);
+	V4451= Ct;
+	goto T11907;
+	
+	goto T11944;
+T11944:;
+	goto T11907;
+	
+	goto T11941;
+T11941:;
+	if(!(((V4466))==(((object)VV[67])))){
+	goto T11952;
+	}
+	if(((V4457))==Cnil){
+	goto T11958;
+	}
+	goto T11955;
+	
+	goto T11958;
+T11958:;
+	V4458= (V4467);
+	V4457= Ct;
+	goto T11907;
+	
+	goto T11955;
+T11955:;
+	goto T11907;
+	
+	goto T11952;
+T11952:;
+	if(((V4459))==Cnil){
+	goto T11966;
+	}
+	goto T11963;
+	
+	goto T11966;
+T11966:;
+	V4460= (V4467);
+	V4459= Ct;
+	V4461= (V4466);
+	goto T11907;
+	
+	goto T11963;
+T11963:;
+	goto T11907;
+T11907:;
+	goto T11827;
+	
+	goto T11829;
+T11829:;
+	goto T11825;
+	}
+	goto T11825;
+T11825:;
+	if(((V4445))==Cnil){
+	goto T11975;
+	}
+	V4462= (V4446);
+	goto T11824;
+	
+	goto T11975;
+T11975:;
+	V4462= Cnil;
+	goto T11824;
+T11824:;
+	if(((V4447))==Cnil){
+	goto T11979;
+	}
+	V4463= (V4448);
+	goto T11978;
+	
+	goto T11979;
+T11979:;
+	V4463= Cnil;
+	goto T11978;
+T11978:;
+	if(((V4449))==Cnil){
+	goto T11983;
+	}
+	V4464= (V4450);
+	goto T11982;
+	
+	goto T11983;
+T11983:;
+	V4464= Cnil;
+	goto T11982;
+T11982:;
+	if(((V4451))==Cnil){
+	goto T11987;
+	}
+	V4465= (V4452);
+	goto T11986;
+	
+	goto T11987;
+T11987:;
+	V4465= Cnil;
+	goto T11986;
+T11986:;
+	if(((V4458))==Cnil){
+	goto T11994;
+	}
+	goto T11991;
+	
+	goto T11994;
+T11994:;
+	if(((V4459))==Cnil){
+	goto T11996;
+	}
+	V4477= list(2,(V4461),(V4460));
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[569]),((object)VV[69]),((object)VV[570]),(V4477))));
+	goto T11990;
+	
+	goto T11996;
+T11996:;
+	goto T11990;
+	
+	goto T11991;
+T11991:;
+	goto T11990;
+T11990:;
+	register object  V4479;
+	object V4478[1];
+	#define V4480 V4478[0]
+	
+	{
+	V4479= (fcall.valp=(fixnum)V4478,/* ANSI-LOOP::NAMED-VARIABLE */(*LnkLI245)(((object)VV[572])));
+	
+	vs_top=sup;
+	{object V4481;
+	V4481= (fcall.valp=(fixnum)0,/* ANSI-LOOP::NAMED-VARIABLE */(*LnkLI245)(((object)VV[573])));
+	if(((V4443))==Cnil){
+	goto T12005;
+	}
+	V4482= (V4443);
+	goto T12004;
+	
+	goto T12005;
+T12005:;
+	V4482= (V4465);
+	goto T12004;
+T12004:;
+	V4483= list(3,(V4462),(V4481),(V4479));
+	V4484= list(2,(V4463),(V4481));
+	{object V4485 = listA(3,Cnil,Cnil,(/* ANSI-LOOP::LOOP-SEQUENCER */(*LnkLI244)((V4479),((object)VV[226]),(V4480),(V4442),(V4482),(V4481),(V4464),(V4483),(V4484),(V4444))));
+	VMR128(V4485);}}
+	#undef V4480
+	
+	}}
+	va_end(ap);
+}
+/*	local entry for function ANSI-LOOP::LOOP-HASH-TABLE-ITERATION-PATH	*/
+
+static object LI157__LOOP_HASH_TABLE_ITERATION_PATH__loop(object V4489,object V4490,object V4491,...)
+{	 VMB129 VMS129 VMV129
+	va_list ap;
+	va_start(ap,V4491);
+	{register object V4492;
+	object V4493;
+	register object V4494;
+	int8_t V4495;
+	register int8_t V4496;
+	register object V4497;
+	register object V4498;
+	object V4499;
+	register object V4500;
+	object V4501;
+	object V4502;
+	object V4503;
+	V4492= Cnil;
+	V4493= Cnil;
+	V4494= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V4494))==Cnil){
+	goto T12010;
+	}
+	V4495= -((char)fcall.argd);
+	goto T12009;
+	
+	goto T12010;
+T12010:;
+	V4495= fcall.argd;
+	goto T12009;
+T12009:;
+	V4496= (V4495)-(3);
+	V4497= Cnil;
+	V4498= Cnil;
+	V4499= Cnil;
+	V4500= Cnil;
+	V4501= Cnil;
+	V4502= Cnil;
+	{register object V4504;
+	register object V4505;
+	V4504= Cnil;
+	V4505= Cnil;
+	goto T12017;
+T12017:;
+	{object V4506;
+	if(((V4494))==Cnil){
+	goto T12027;
+	}
+	if(!((V4496)==(1))){
+	goto T12030;
+	}
+	V4496= 0;
+	V4497= va_arg(ap,object);
+	V4506= (V4497);
+	goto T12026;
+	
+	goto T12030;
+T12030:;
+	V4506= Cnil;
+	goto T12026;
+	
+	goto T12027;
+T12027:;
+	V4506= Cnil;
+	goto T12026;
+T12026:;
+	if(((V4506))==Cnil){
+	goto T12036;
+	}
+	goto T12025;
+	
+	goto T12036;
+T12036:;
+	{object V4507;
+	V4507= ((V4496)>(0)?Ct:Cnil);
+	if(((V4507))==Cnil){
+	goto T12040;
+	}
+	goto T12025;
+	
+	goto T12040;
+T12040:;
+	if(((V4497))==Cnil){
+	goto T12043;
+	}
+	goto T12025;
+	
+	goto T12043;
+T12043:;
+	goto T12024;
+	}}
+	goto T12025;
+T12025:;
+	goto T12022;
+	
+	goto T12024;
+T12024:;
+	goto T12019;
+	
+	goto T12022;
+T12022:;
+	if(((V4494))==Cnil){
+	goto T12049;
+	}
+	if(!((V4496)==(1))){
+	goto T12052;
+	}
+	V4496= 0;
+	V4497= va_arg(ap,object);
+	if(((V4497))==Cnil){
+	goto T12055;
+	}
+	goto T12048;
+	
+	goto T12055;
+T12055:;
+	goto T12048;
+	
+	goto T12052;
+T12052:;
+	goto T12048;
+	
+	goto T12049;
+T12049:;
+	goto T12048;
+T12048:;
+	if(!((V4496)>(0))){
+	goto T12061;
+	}
+	V4496= (V4496)-(1);
+	V4504= va_arg(ap,object);
+	goto T12047;
+	
+	goto T12061;
+T12061:;
+	if(((V4497))==Cnil){
+	goto T12066;
+	}
+	{object V4508;
+	V4508= (V4497)->c.c_car;
+	V4497= (V4497)->c.c_cdr;
+	V4504= (V4508);
+	goto T12047;
+	}
+	goto T12066;
+T12066:;
+	V4504= Cnil;
+	goto T12047;
+T12047:;
+	if(((V4494))==Cnil){
+	goto T12074;
+	}
+	if(!((V4496)==(1))){
+	goto T12077;
+	}
+	V4496= 0;
+	V4497= va_arg(ap,object);
+	if(((V4497))==Cnil){
+	goto T12080;
+	}
+	goto T12073;
+	
+	goto T12080;
+T12080:;
+	goto T12073;
+	
+	goto T12077;
+T12077:;
+	goto T12073;
+	
+	goto T12074;
+T12074:;
+	goto T12073;
+T12073:;
+	if(!((V4496)>(0))){
+	goto T12086;
+	}
+	V4496= (V4496)-(1);
+	V4505= va_arg(ap,object);
+	goto T12072;
+	
+	goto T12086;
+T12086:;
+	if(((V4497))==Cnil){
+	goto T12091;
+	}
+	{object V4511;
+	V4511= (V4497)->c.c_car;
+	V4497= (V4497)->c.c_cdr;
+	V4505= (V4511);
+	goto T12072;
+	}
+	goto T12091;
+T12091:;
+	V4514= make_cons((V4504),Cnil);
+	V4505= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[574]),((object)VV[59]),((object)VV[575]),(V4514)));
+	goto T12072;
+T12072:;
+	if(!(((V4504))==(((object)VV[576])))){
+	goto T12098;
+	}
+	if(((V4492))==Cnil){
+	goto T12104;
+	}
+	goto T12101;
+	
+	goto T12104;
+T12104:;
+	V4493= (V4505);
+	V4492= Ct;
+	goto T12097;
+	
+	goto T12101;
+T12101:;
+	goto T12097;
+	
+	goto T12098;
+T12098:;
+	if(!(((V4504))==(((object)VV[67])))){
+	goto T12109;
+	}
+	if(((V4498))==Cnil){
+	goto T12115;
+	}
+	goto T12112;
+	
+	goto T12115;
+T12115:;
+	V4499= (V4505);
+	V4498= Ct;
+	goto T12097;
+	
+	goto T12112;
+T12112:;
+	goto T12097;
+	
+	goto T12109;
+T12109:;
+	if(((V4500))==Cnil){
+	goto T12123;
+	}
+	goto T12120;
+	
+	goto T12123;
+T12123:;
+	V4501= (V4505);
+	V4500= Ct;
+	V4502= (V4504);
+	goto T12097;
+	
+	goto T12120;
+T12120:;
+	goto T12097;
+T12097:;
+	goto T12017;
+	
+	goto T12019;
+T12019:;
+	goto T12015;
+	}
+	goto T12015;
+T12015:;
+	if(((V4492))==Cnil){
+	goto T12132;
+	}
+	V4503= (V4493);
+	goto T12014;
+	
+	goto T12132;
+T12132:;
+	V4503= Cnil;
+	goto T12014;
+T12014:;
+	if(((V4499))==Cnil){
+	goto T12139;
+	}
+	goto T12136;
+	
+	goto T12139;
+T12139:;
+	if(((V4500))==Cnil){
+	goto T12141;
+	}
+	V4515= list(2,(V4502),(V4501));
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[577]),((object)VV[69]),((object)VV[578]),(V4515))));
+	goto T12135;
+	
+	goto T12141;
+T12141:;
+	goto T12135;
+	
+	goto T12136;
+T12136:;
+	goto T12135;
+T12135:;
+	if((V4491->c.c_cdr)==Cnil){
+	goto T12148;
+	}
+	goto T12147;
+	
+	goto T12148;
+T12148:;
+	{object V4516;
+	{object V4517;
+	V4517= V4491->c.c_car;
+	V4516= V4517->c.c_car;}
+	{fixnum V4518;
+	V4518= 1;
+	V4519= tp4(V4516);
+	switch(V4519){
+	case -1:
+	goto T12162;
+T12162:;
+	goto T12159;
+	
+	case 1:
+	goto T12163;
+T12163:;
+	case 2:
+	goto T12164;
+T12164:;
+	case 3:
+	goto T12165;
+T12165:;
+	case 4:
+	goto T12166;
+T12166:;
+	case 5:
+	goto T12167;
+T12167:;
+	case 6:
+	goto T12168;
+T12168:;
+	goto T12157;
+	
+	default:
+	goto T12169;
+T12169:;
+	goto T12159;
+	}
+	goto T12157;
+	
+	goto T12159;
+T12159:;
+	V4518= 0;
+	goto T12156;
+	
+	goto T12157;
+T12157:;
+	goto T12156;
+T12156:;
+	switch(V4518){
+	case 0:
+	goto T12181;
+T12181:;
+	if(!(((V4516))==(((object)VV[528])))){
+	goto T12178;
+	}
+	goto T12179;
+	
+	case 1:
+	goto T12182;
+T12182:;
+	if(!(((V4516))==(((object)VV[528])))){
+	goto T12178;
+	}
+	goto T12179;
+	}
+	goto T12178;
+	
+	goto T12179;
+T12179:;
+	goto T12177;
+	
+	goto T12178;
+T12178:;
+	goto T12175;
+	
+	goto T12177;
+T12177:;
+	goto T12152;
+	
+	goto T12175;
+T12175:;
+	switch(V4518){
+	case 0:
+	goto T12191;
+T12191:;
+	if(!(((V4516))==(((object)VV[527])))){
+	goto T12188;
+	}
+	goto T12189;
+	
+	case 1:
+	goto T12192;
+T12192:;
+	if(!(((V4516))==(((object)VV[527])))){
+	goto T12188;
+	}
+	goto T12189;
+	}
+	goto T12188;
+	
+	goto T12189;
+T12189:;
+	goto T12187;
+	
+	goto T12188;
+T12188:;
+	goto T12185;
+	
+	goto T12187;
+T12187:;
+	goto T12152;
+	
+	goto T12185;
+T12185:;
+	goto T12151;
+	}}
+	goto T12152;
+T12152:;
+	goto T12145;
+	
+	goto T12151;
+T12151:;
+	goto T12147;
+T12147:;
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[579]))));
+	goto T12144;
+	
+	goto T12145;
+T12145:;
+	if(((V4491))==Cnil){
+	goto T12198;
+	}
+	goto T12195;
+	
+	goto T12198;
+T12198:;
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[580]))));
+	goto T12144;
+	
+	goto T12195;
+T12195:;
+	goto T12144;
+T12144:;
+	{object V4520;
+	object V4521;
+	object V4522;
+	object V4523;
+	V4520= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[581])));
+	V4521= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[582])));
+	V4522= Cnil;
+	V4523= Cnil;
+	register object  V4525;
+	object V4524[1];
+	#define V4526 V4524[0]
+	
+	{
+	if(!(((V4503))==(((object)VV[583])))){
+	goto T12207;
+	}
+	V4527= ((object)VV[584]);
+	goto T12206;
+	
+	goto T12207;
+T12207:;
+	V4527= ((object)VV[583]);
+	goto T12206;
+T12206:;
+	V4525= (fcall.valp=(fixnum)V4524,/* ANSI-LOOP::NAMED-VARIABLE */(*LnkLI245)((V4527)));
+	
+	vs_top=sup;
+	V4522= (/* ANSI-LOOP::LOOP-WHEN-IT-VARIABLE */(*LnkLI221)());
+	{object V4528;
+	object V4529;
+	object V4530;
+	object V4531;
+	object V4532;
+	object V4533;
+	object V4534;
+	V4528= Cnil;
+	V4529= Cnil;
+	V4530= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[585])));
+	V4531= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[586])));
+	V4532= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[587])));
+	if(((V4489))==Cnil){
+	goto T12217;
+	}
+	V4533= (V4489);
+	goto T12216;
+	
+	goto T12217;
+T12217:;
+	V4533= (fcall.argd=0,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(make_fixnum(0)));
+	goto T12216;
+T12216:;
+	V4535= list(3,(V4533),Cnil,(V4490));
+	{object V4537;
+	{object V4538;
+	V4538= V4491->c.c_car;
+	V4537= V4538->c.c_cdr;}
+	V4536= V4537->c.c_car;}
+	V4539= list(2,(V4520),(V4536));
+	if(((V4525))==Cnil){
+	goto T12225;
+	}
+	V4540= make_cons(list(2,(V4525),Cnil),Cnil);
+	goto T12224;
+	
+	goto T12225;
+T12225:;
+	V4540= Cnil;
+	goto T12224;
+T12224:;
+	V4534= listA(3,(V4535),(V4539),(V4540));
+	if(!(((V4503))==(((object)VV[583])))){
+	goto T12229;
+	}
+	V4528= (V4533);
+	V4529= (V4525);
+	goto T12228;
+	
+	goto T12229;
+T12229:;
+	V4528= (V4525);
+	V4529= (V4533);
+	goto T12228;
+T12228:;
+	{object V4541;
+	V4541= list(2,((object)VV[588]),list(2,(V4521),(V4520)));
+	V4542= make_cons((V4541),(((object)VV[315])->s.s_dbind));
+	(((object)VV[315])->s.s_dbind)= (V4542);}
+	if(((V4528))==Cnil){
+	goto T12245;
+	}
+	V4544= tp2((V4528));
+	if(!((V4544)==(0))){
+	goto T12248;
+	}
+	goto T12244;
+	
+	goto T12248;
+T12248:;
+	goto T12242;
+	
+	goto T12245;
+T12245:;
+	goto T12242;
+	
+	goto T12244;
+T12244:;
+	V4545= (V4528);
+	V4528= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[586])));
+	V4523= listA(3,(V4545),(V4528),Cnil);
+	{object V4546;
+	V4546= list(2,(V4528),Cnil);
+	V4534= make_cons((V4546),(V4534));
+	goto T12241;
+	}
+	goto T12242;
+T12242:;
+	goto T12241;
+T12241:;
+	if(((V4529))==Cnil){
+	goto T12260;
+	}
+	V4548= tp2((V4529));
+	if(!((V4548)==(0))){
+	goto T12263;
+	}
+	goto T12259;
+	
+	goto T12263;
+T12263:;
+	goto T12257;
+	
+	goto T12260;
+T12260:;
+	goto T12257;
+	
+	goto T12259;
+T12259:;
+	V4549= (V4529);
+	V4529= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[585])));
+	V4523= listA(3,(V4549),(V4529),(V4523));
+	{object V4550;
+	V4550= list(2,(V4529),Cnil);
+	V4534= make_cons((V4550),(V4534));
+	goto T12256;
+	}
+	goto T12257;
+T12257:;
+	goto T12256;
+T12256:;
+	V4551= list(3,(V4532),(V4531),(V4530));
+	V4552= make_cons((V4521),Cnil);
+	V4553= list(3,((object)VV[47]),(V4529),(V4530));
+	V4554= list(4,((object)VV[46]),(V4532),(V4553),list(3,((object)VV[47]),(V4528),(V4531)));
+	{object V4555 = list(6,(V4534),Cnil,Cnil,Cnil,list(2,((object)VV[124]),list(5,((object)VV[589]),(V4551),(V4552),(V4554),list(3,((object)VV[47]),(V4522),(V4532)))),(V4523));
+	VMR129(V4555);}}
+	#undef V4526
+	
+	}}}
+	va_end(ap);
+}
+/*	local entry for function ANSI-LOOP::LOOP-PACKAGE-SYMBOLS-ITERATION-PATH	*/
+
+static object LI158__LOOP_PACKAGE_SYMBOLS_ITERATION_PATH__loop(object V4559,object V4560,object V4561,...)
+{	 VMB130 VMS130 VMV130
+	va_list ap;
+	va_start(ap,V4561);
+	{register object V4562;
+	object V4563;
+	register object V4564;
+	int8_t V4565;
+	register int8_t V4566;
+	register object V4567;
+	register object V4568;
+	object V4569;
+	register object V4570;
+	object V4571;
+	object V4572;
+	object V4573;
+	V4562= Cnil;
+	V4563= Cnil;
+	V4564= (((char)fcall.argd)<(0)?Ct:Cnil);
+	if(((V4564))==Cnil){
+	goto T12273;
+	}
+	V4565= -((char)fcall.argd);
+	goto T12272;
+	
+	goto T12273;
+T12273:;
+	V4565= fcall.argd;
+	goto T12272;
+T12272:;
+	V4566= (V4565)-(3);
+	V4567= Cnil;
+	V4568= Cnil;
+	V4569= Cnil;
+	V4570= Cnil;
+	V4571= Cnil;
+	V4572= Cnil;
+	{register object V4574;
+	register object V4575;
+	V4574= Cnil;
+	V4575= Cnil;
+	goto T12280;
+T12280:;
+	{object V4576;
+	if(((V4564))==Cnil){
+	goto T12290;
+	}
+	if(!((V4566)==(1))){
+	goto T12293;
+	}
+	V4566= 0;
+	V4567= va_arg(ap,object);
+	V4576= (V4567);
+	goto T12289;
+	
+	goto T12293;
+T12293:;
+	V4576= Cnil;
+	goto T12289;
+	
+	goto T12290;
+T12290:;
+	V4576= Cnil;
+	goto T12289;
+T12289:;
+	if(((V4576))==Cnil){
+	goto T12299;
+	}
+	goto T12288;
+	
+	goto T12299;
+T12299:;
+	{object V4577;
+	V4577= ((V4566)>(0)?Ct:Cnil);
+	if(((V4577))==Cnil){
+	goto T12303;
+	}
+	goto T12288;
+	
+	goto T12303;
+T12303:;
+	if(((V4567))==Cnil){
+	goto T12306;
+	}
+	goto T12288;
+	
+	goto T12306;
+T12306:;
+	goto T12287;
+	}}
+	goto T12288;
+T12288:;
+	goto T12285;
+	
+	goto T12287;
+T12287:;
+	goto T12282;
+	
+	goto T12285;
+T12285:;
+	if(((V4564))==Cnil){
+	goto T12312;
+	}
+	if(!((V4566)==(1))){
+	goto T12315;
+	}
+	V4566= 0;
+	V4567= va_arg(ap,object);
+	if(((V4567))==Cnil){
+	goto T12318;
+	}
+	goto T12311;
+	
+	goto T12318;
+T12318:;
+	goto T12311;
+	
+	goto T12315;
+T12315:;
+	goto T12311;
+	
+	goto T12312;
+T12312:;
+	goto T12311;
+T12311:;
+	if(!((V4566)>(0))){
+	goto T12324;
+	}
+	V4566= (V4566)-(1);
+	V4574= va_arg(ap,object);
+	goto T12310;
+	
+	goto T12324;
+T12324:;
+	if(((V4567))==Cnil){
+	goto T12329;
+	}
+	{object V4578;
+	V4578= (V4567)->c.c_car;
+	V4567= (V4567)->c.c_cdr;
+	V4574= (V4578);
+	goto T12310;
+	}
+	goto T12329;
+T12329:;
+	V4574= Cnil;
+	goto T12310;
+T12310:;
+	if(((V4564))==Cnil){
+	goto T12337;
+	}
+	if(!((V4566)==(1))){
+	goto T12340;
+	}
+	V4566= 0;
+	V4567= va_arg(ap,object);
+	if(((V4567))==Cnil){
+	goto T12343;
+	}
+	goto T12336;
+	
+	goto T12343;
+T12343:;
+	goto T12336;
+	
+	goto T12340;
+T12340:;
+	goto T12336;
+	
+	goto T12337;
+T12337:;
+	goto T12336;
+T12336:;
+	if(!((V4566)>(0))){
+	goto T12349;
+	}
+	V4566= (V4566)-(1);
+	V4575= va_arg(ap,object);
+	goto T12335;
+	
+	goto T12349;
+T12349:;
+	if(((V4567))==Cnil){
+	goto T12354;
+	}
+	{object V4581;
+	V4581= (V4567)->c.c_car;
+	V4567= (V4567)->c.c_cdr;
+	V4575= (V4581);
+	goto T12335;
+	}
+	goto T12354;
+T12354:;
+	V4584= make_cons((V4574),Cnil);
+	V4575= (fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[590]),((object)VV[59]),((object)VV[591]),(V4584)));
+	goto T12335;
+T12335:;
+	if(!(((V4574))==(((object)VV[592])))){
+	goto T12361;
+	}
+	if(((V4562))==Cnil){
+	goto T12367;
+	}
+	goto T12364;
+	
+	goto T12367;
+T12367:;
+	V4563= (V4575);
+	V4562= Ct;
+	goto T12360;
+	
+	goto T12364;
+T12364:;
+	goto T12360;
+	
+	goto T12361;
+T12361:;
+	if(!(((V4574))==(((object)VV[67])))){
+	goto T12372;
+	}
+	if(((V4568))==Cnil){
+	goto T12378;
+	}
+	goto T12375;
+	
+	goto T12378;
+T12378:;
+	V4569= (V4575);
+	V4568= Ct;
+	goto T12360;
+	
+	goto T12375;
+T12375:;
+	goto T12360;
+	
+	goto T12372;
+T12372:;
+	if(((V4570))==Cnil){
+	goto T12386;
+	}
+	goto T12383;
+	
+	goto T12386;
+T12386:;
+	V4571= (V4575);
+	V4570= Ct;
+	V4572= (V4574);
+	goto T12360;
+	
+	goto T12383;
+T12383:;
+	goto T12360;
+T12360:;
+	goto T12280;
+	
+	goto T12282;
+T12282:;
+	goto T12278;
+	}
+	goto T12278;
+T12278:;
+	if(((V4562))==Cnil){
+	goto T12395;
+	}
+	V4573= (V4563);
+	goto T12277;
+	
+	goto T12395;
+T12395:;
+	V4573= Cnil;
+	goto T12277;
+T12277:;
+	if(((V4569))==Cnil){
+	goto T12402;
+	}
+	goto T12399;
+	
+	goto T12402;
+T12402:;
+	if(((V4570))==Cnil){
+	goto T12404;
+	}
+	V4585= list(2,(V4572),(V4571));
+	(void)((fcall.argd=5,/* COMMON-LISP::ERROR */(*LnkLI162)(((object)VV[2]),((object)VV[593]),((object)VV[69]),((object)VV[594]),(V4585))));
+	goto T12398;
+	
+	goto T12404;
+T12404:;
+	goto T12398;
+	
+	goto T12399;
+T12399:;
+	goto T12398;
+T12398:;
+	if(((V4561))==Cnil){
+	goto T12411;
+	}
+	if((V4561->c.c_cdr)==Cnil){
+	goto T12408;
+	}
+	goto T12410;
+	
+	goto T12411;
+T12411:;
+	goto T12408;
+	
+	goto T12410;
+T12410:;
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[595]))));
+	goto T12407;
+	
+	goto T12408;
+T12408:;
+	if(((V4561))==Cnil){
+	goto T12417;
+	}
+	{object V4586;
+	{object V4587;
+	V4587= V4561->c.c_car;
+	V4586= V4587->c.c_car;}
+	{fixnum V4588;
+	V4588= 1;
+	V4589= tp4(V4586);
+	switch(V4589){
+	case -1:
+	goto T12431;
+T12431:;
+	goto T12428;
+	
+	case 1:
+	goto T12432;
+T12432:;
+	case 2:
+	goto T12433;
+T12433:;
+	case 3:
+	goto T12434;
+T12434:;
+	case 4:
+	goto T12435;
+T12435:;
+	case 5:
+	goto T12436;
+T12436:;
+	case 6:
+	goto T12437;
+T12437:;
+	goto T12426;
+	
+	default:
+	goto T12438;
+T12438:;
+	goto T12428;
+	}
+	goto T12426;
+	
+	goto T12428;
+T12428:;
+	V4588= 0;
+	goto T12425;
+	
+	goto T12426;
+T12426:;
+	goto T12425;
+T12425:;
+	switch(V4588){
+	case 0:
+	goto T12450;
+T12450:;
+	if(!(((V4586))==(((object)VV[528])))){
+	goto T12447;
+	}
+	goto T12448;
+	
+	case 1:
+	goto T12451;
+T12451:;
+	if(!(((V4586))==(((object)VV[528])))){
+	goto T12447;
+	}
+	goto T12448;
+	}
+	goto T12447;
+	
+	goto T12448;
+T12448:;
+	goto T12446;
+	
+	goto T12447;
+T12447:;
+	goto T12444;
+	
+	goto T12446;
+T12446:;
+	goto T12421;
+	
+	goto T12444;
+T12444:;
+	switch(V4588){
+	case 0:
+	goto T12460;
+T12460:;
+	if(!(((V4586))==(((object)VV[527])))){
+	goto T12457;
+	}
+	goto T12458;
+	
+	case 1:
+	goto T12461;
+T12461:;
+	if(!(((V4586))==(((object)VV[527])))){
+	goto T12457;
+	}
+	goto T12458;
+	}
+	goto T12457;
+	
+	goto T12458;
+T12458:;
+	goto T12456;
+	
+	goto T12457;
+T12457:;
+	goto T12454;
+	
+	goto T12456;
+T12456:;
+	goto T12421;
+	
+	goto T12454;
+T12454:;
+	goto T12420;
+	}}
+	goto T12421;
+T12421:;
+	goto T12414;
+	
+	goto T12420;
+T12420:;
+	goto T12416;
+	
+	goto T12417;
+T12417:;
+	goto T12414;
+	
+	goto T12416;
+T12416:;
+	{object V4591;
+	V4591= V4561->c.c_car;
+	V4590= V4591->c.c_car;}
+	(void)((fcall.argd=2,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[596]),(V4590))));
+	goto T12407;
+	
+	goto T12414;
+T12414:;
+	goto T12407;
+T12407:;
+	if(((V4559))==Cnil){
+	goto T12472;
+	}
+	V4592= tp5(V4559);
+	switch(V4592){
+	case 19:
+	goto T12477;
+T12477:;
+	goto T12471;
+	
+	default:
+	goto T12478;
+T12478:;
+	goto T12470;
+	}
+	goto T12470;
+	
+	goto T12472;
+T12472:;
+	goto T12471;
+T12471:;
+	goto T12467;
+	
+	goto T12470;
+T12470:;
+	(void)((fcall.argd=1,/* ANSI-LOOP::LOOP-ERROR */(*LnkLI202)(((object)VV[597]))));
+	goto T12466;
+	
+	goto T12467;
+T12467:;
+	goto T12466;
+T12466:;
+	{object V4593;
+	object V4594;
+	object V4595;
+	object V4596;
+	V4593= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[598])));
+	V4594= (fcall.argd=1,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(((object)VV[599])));
+	if(((V4559))==Cnil){
+	goto T12483;
+	}
+	V4595= (V4559);
+	goto T12482;
+	
+	goto T12483;
+T12483:;
+	V4595= (fcall.argd=0,/* ANSI-LOOP::LOOP-GENTEMP */(*LnkLI172)(make_fixnum(0)));
+	goto T12482;
+T12482:;
+	{object V4597;
+	{object V4598;
+	{object V4599;
+	V4599= V4561->c.c_car;
+	V4598= V4599->c.c_cdr;}
+	V4597= V4598->c.c_car;}
+	if(((V4597))==Cnil){
+	goto T12490;
+	}
+	V4596= (V4597);
+	goto T12486;
+	
+	goto T12490;
+T12490:;
+	V4596= ((object)VV[600]);}
+	goto T12486;
+T12486:;
+	{object V4600;
+	V4600= list(2,((object)VV[601]),listA(3,(V4594),(V4593),(V4573)));
+	V4601= make_cons((V4600),(((object)VV[315])->s.s_dbind));
+	(((object)VV[315])->s.s_dbind)= (V4601);}
+	V4602= list(3,(V4595),Cnil,(V4560));
+	V4603= list(2,(V4602),list(2,(V4593),(V4596)));
+	V4604= (/* ANSI-LOOP::LOOP-WHEN-IT-VARIABLE */(*LnkLI221)());
+	V4605= list(2,(V4604),(V4595));
+	{object V4606 = list(6,(V4603),Cnil,Cnil,Cnil,list(2,((object)VV[124]),list(3,((object)VV[252]),(V4605),make_cons((V4594),Cnil))),Cnil);
+	VMR130(V4606);}}}
+	va_end(ap);
+}
+/*	local entry for function ANSI-LOOP::MAKE-ANSI-LOOP-UNIVERSE	*/
+
+static object LI159__MAKE_ANSI_LOOP_UNIVERSE__loop(object V4608)
+{	 VMB131 VMS131 VMV131
+	{object V4609;
+	V4610= list(2,((object)VV[434]),list(4,((object)VV[603]),((object)VV[434]),(((object)VV[438])->s.s_dbind),((object)VV[226])));
+	V4611= list(2,((object)VV[604]),list(4,((object)VV[603]),((object)VV[434]),(((object)VV[438])->s.s_dbind),((object)VV[226])));
+	V4612= (fcall.fun=((object)VV[41])->s.s_gfdef,fcall.valp=(fixnum)0,fcall.argd=15,/* COMMON-LISP::LIST* */(*LnkLI247)(((object)VV[605]),((object)VV[606]),((object)VV[607]),((object)VV[608]),((object)VV[609]),((object)VV[610]),((object)VV[611]),((object)VV[612]),((object)VV[613]),((object)VV[614]),((object)VV[615]),((object)VV[616]),(V4610),(V4611),((object)VV[617])));
+	if(((V4608))==Cnil){
+	goto T12498;
+	}
+	V4613= ((object)VV[618]);
+	goto T12497;
+	
+	goto T12498;
+T12498:;
+	V4613= Ct;
+	goto T12497;
+T12497:;
+	V4609= (fcall.argd=12,/* ANSI-LOOP::MAKE-STANDARD-LOOP-UNIVERSE */(*LnkLI246)(((object)VV[619]),(V4612),((object)VV[620]),((object)VV[621]),((object)VV[622]),((object)VV[623]),((object)VV[624]),((object)VV[625]),((object)VV[626]),Cnil,((object)VV[627]),(V4613)));
+	(void)((fcall.argd=9,/* ANSI-LOOP::ADD-LOOP-PATH */(*LnkLI248)(((object)VV[629]),((object)VV[630]),(V4609),((object)VV[631]),((object)VV[632]),((object)VV[633]),Cnil,((object)VV[634]),((object)VV[635]))));
+	(void)((fcall.argd=9,/* ANSI-LOOP::ADD-LOOP-PATH */(*LnkLI248)(((object)VV[636]),((object)VV[630]),(V4609),((object)VV[637]),((object)VV[638]),((object)VV[639]),Cnil,((object)VV[640]),((object)VV[641]))));
+	(void)((fcall.argd=9,/* ANSI-LOOP::ADD-LOOP-PATH */(*LnkLI248)(((object)VV[642]),((object)VV[643]),(V4609),((object)VV[644]),((object)VV[645]),((object)VV[646]),Cnil,((object)VV[647]),((object)VV[648]))));
+	(void)((fcall.argd=9,/* ANSI-LOOP::ADD-LOOP-PATH */(*LnkLI248)(((object)VV[649]),((object)VV[643]),(V4609),((object)VV[650]),((object)VV[651]),((object)VV[652]),Cnil,((object)VV[653]),((object)VV[654]))));
+	(void)((fcall.argd=9,/* ANSI-LOOP::ADD-LOOP-PATH */(*LnkLI248)(((object)VV[655]),((object)VV[643]),(V4609),((object)VV[656]),((object)VV[657]),((object)VV[658]),Cnil,((object)VV[659]),((object)VV[660]))));
+	{object V4614 = (V4609);
+	VMR131(V4614);}}
+}
+/*	local entry for function ANSI-LOOP::LOOP-STANDARD-EXPANSION	*/
+
+static object LI160__LOOP_STANDARD_EXPANSION__loop(object V4618,object V4619,object V4620)
+{	 VMB132 VMS132 VMV132
+	if(((V4618))==Cnil){
+	goto T12509;
+	}
+	{object V4621;
+	V4621= V4618->c.c_car;
+	if(((V4621))==Cnil){
+	goto T12513;
+	}
+	V4622= tp5(V4621);
+	switch(V4622){
+	case 19:
+	goto T12518;
+T12518:;
+	goto T12508;
+	
+	default:
+	goto T12519;
+T12519:;
+	goto T12506;
+	}
+	goto T12506;
+	
+	goto T12513;
+T12513:;
+	goto T12508;
+	}
+	goto T12509;
+T12509:;
+	goto T12506;
+	
+	goto T12508;
+T12508:;
+	{object V4623 = (/* ANSI-LOOP::LOOP-TRANSLATE */(*LnkLI249)((V4618),(V4619),(V4620)));
+	VMR132(V4623);}
+	goto T12506;
+T12506:;
+	{object V4624;
+	V4624= fSgensym0();
+	V4625= make_cons(((object)VV[53]),(V4618));
+	{object V4626 = list(3,((object)VV[331]),Cnil,list(4,((object)VV[236]),(V4624),(V4625),list(2,((object)VV[230]),(V4624))));
+	VMR132(V4626);}}
+}
+/*	local entry for function COMMON-LISP::LOOP	*/
+
+static object LI161__LOOP__loop(object V4629,object V4630)
+{	 VMB133 VMS133 VMV133
+	{object V4631;
+	V4631= V4629->c.c_cdr;
+	{object V4632 = (/* ANSI-LOOP::LOOP-STANDARD-EXPANSION */(*LnkLI250)((V4631),(V4630),(((object)VV[663])->s.s_dbind)));
+	VMR133(V4632);}}
+}
+static object  LnkTLI250(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[662]),0,3,(void **)(void *)&LnkLI250,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-STANDARD-EXPANSION */
+static object  LnkTLI249(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[661]),0,3,(void **)(void *)&LnkLI249,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-TRANSLATE */
+static object  LnkTLI248(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[628]),0,262147,(void **)(void *)&LnkLI248,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::ADD-LOOP-PATH */
+static object  LnkTLI247(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[41]),1,520192,(void **)(void *)&LnkLI247,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::LIST* */
+static object  LnkTLI246(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[602]),0,262144,(void **)(void *)&LnkLI246,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::MAKE-STANDARD-LOOP-UNIVERSE */
+static object  LnkTLI245(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[571]),0,4097,(void **)(void *)&LnkLI245,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::NAMED-VARIABLE */
+static object  LnkTLI244(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[561]),0,10,(void **)(void *)&LnkLI244,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-SEQUENCER */
+static object  LnkTLI243(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[522]),0,5,(void **)(void *)&LnkLI243,0,first,ap);va_end(ap);return V1;} /* SYSTEM::COPY-BIT-VECTOR */
+static object  LnkTLI242(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[521]),0,2,(void **)(void *)&LnkLI242,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-TASSOC */
+static object  LnkTLI241(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[520]),0,1,(void **)(void *)&LnkLI241,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::REVERSE */
+static object  LnkTLI240(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[516]),0,262145,(void **)(void *)&LnkLI240,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-COLLECT-PREPOSITIONAL-PHRASES */
+static object  LnkTLI239(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[500]),0,262144,(void **)(void *)&LnkLI239,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::MAKE-LOOP-PATH */
+static object  LnkTLI238(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[481]),0,4097,(void **)(void *)&LnkLI238,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-LIST-STEP */
+static object  LnkTLI237(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[469]),0,270337,(void **)(void *)&LnkLI237,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-CONSTANT-FOLD-IF-POSSIBLE */
+static object  LnkTLI236(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[463]),0,3,(void **)(void *)&LnkLI236,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-MAKE-ITERATION-VARIABLE */
+static object  LnkTLI235(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[9]),0,1,(void **)(void *)&LnkLI235,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::COPY-LIST */
+static object  LnkTLI234(){object V1=(object )call_proc_new(((object)VV[444]),0,0,(void **)(void *)&LnkLI234,0,0,0);return V1;} /* ANSI-LOOP::LOOP-DISALLOW-ANONYMOUS-COLLECTORS */
+static object  LnkTLI233(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[441]),0,2,(void **)(void *)&LnkLI233,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-NOTE-MINIMAX-OPERATION */
+static object  LnkTLI232(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[439]),0,2,(void **)(void *)&LnkLI232,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::MAKE-LOOP-MINIMAX */
+static object  LnkTLI231(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[432]),0,262146,(void **)(void *)&LnkLI231,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-CHECK-DATA-TYPE */
+static object  LnkTLI230(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[422]),0,262144,(void **)(void *)&LnkLI230,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-EMIT-FINAL-VALUE */
+static object  LnkTLI229(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[418]),0,4099,(void **)(void *)&LnkLI229,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-GET-COLLECTION-INFO */
+static object  LnkTLI228(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[411]),0,262144,(void **)(void *)&LnkLI228,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::MAKE-LOOP-COLLECTOR */
+static object  LnkTLI227(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[409]),0,1,(void **)(void *)&LnkLI227,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-VARIABLE-P */
+static object  LnkTLI226(){object V1=(object )call_proc_new(((object)VV[408]),0,0,(void **)(void *)&LnkLI226,0,0,0);return V1;} /* ANSI-LOOP::LOOP-DISALLOW-AGGREGATE-BOOLEANS */
+static object  LnkTLI225(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[405]),0,262144,(void **)(void *)&LnkLI225,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-OPTIONAL-TYPE */
+static object  LnkTLI224(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[390]),0,1,(void **)(void *)&LnkLI224,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-EMIT-BODY */
+static object  LnkTLI223(){object V1=(object )call_proc_new(((object)VV[388]),0,0,(void **)(void *)&LnkLI223,0,0,0);return V1;} /* ANSI-LOOP::LOOP-GET-PROGN */
+static object  LnkTLI222(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[386]),0,262144,(void **)(void *)&LnkLI222,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-DISALLOW-CONDITIONAL */
+static object  LnkTLI221(){object V1=(object )call_proc_new(((object)VV[379]),0,0,(void **)(void *)&LnkLI221,0,0,0);return V1;} /* ANSI-LOOP::LOOP-WHEN-IT-VARIABLE */
+static object  LnkTLI220(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[375]),0,1,(void **)(void *)&LnkLI220,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-CONSTANTP */
+static object  LnkTLI219(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[373]),0,262147,(void **)(void *)&LnkLI219,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-MAKE-VARIABLE */
+static object  LnkTLI218(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[371]),0,2,(void **)(void *)&LnkLI218,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-DECLARE-VARIABLE */
+static object  LnkTLI217(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[357]),0,2,(void **)(void *)&LnkLI217,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-TEQUAL */
+static object  LnkTLI216(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[356]),0,2,(void **)(void *)&LnkLI216,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::COERCE */
+static object  LnkTLI215(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[349]),0,2,(void **)(void *)&LnkLI215,16,first,ap);va_end(ap);return V1;} /* COMMON-LISP::ROW-MAJOR-AREF */
+static object  LnkTLI214(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[346]),0,1,(void **)(void *)&LnkLI214,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-CONSTRUCT-RETURN */
+static object  LnkTLI213(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[345]),0,1,(void **)(void *)&LnkLI213,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-PSEUDO-BODY */
+static object  LnkTLI212(){object V1=(object )call_proc_new(((object)VV[343]),0,0,(void **)(void *)&LnkLI212,0,0,0);return V1;} /* ANSI-LOOP::LOOP-GET-COMPOUND-FORM */
+static object  LnkTLI211(){object V1=(object )call_proc_new(((object)VV[341]),0,0,(void **)(void *)&LnkLI211,0,0,0);return V1;} /* ANSI-LOOP::LOOP-GET-FORM */
+static object  LnkTLI210(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[336]),0,2,(void **)(void *)&LnkLI210,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-TMEMBER */
+static object  LnkTLI209(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[335]),0,1,(void **)(void *)&LnkLI209,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-HACK-ITERATION */
+static object  LnkTLI208(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[334]),0,2,(void **)(void *)&LnkLI208,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-LOOKUP-KEYWORD */
+static object  LnkTLI207(){object V1=(object )call_proc_new(((object)VV[333]),0,0,(void **)(void *)&LnkLI207,0,0,0);return V1;} /* ANSI-LOOP::LOOP-POP-SOURCE */
+static object  LnkTLI206(){object V1=(object )call_proc_new(((object)VV[329]),0,0,(void **)(void *)&LnkLI206,0,0,0);return V1;} /* ANSI-LOOP::LOOP-BIND-BLOCK */
+static object  LnkTLI205(){object V1=(object )call_proc_new(((object)VV[328]),0,0,(void **)(void *)&LnkLI205,0,0,0);return V1;} /* ANSI-LOOP::LOOP-ITERATION-DRIVER */
+static object  LnkTLI204(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[301]),0,2,(void **)(void *)&LnkLI204,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-BUILD-DESTRUCTURING-BINDINGS */
+static object  LnkTLI203(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[300]),0,1,(void **)(void *)&LnkLI203,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::SUBST-GENSYMS-FOR-NIL */
+static object  LnkTLI202(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[294]),0,262145,(void **)(void *)&LnkLI202,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-ERROR */
+static object  LnkTLI201(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[291]),1,520192,(void **)(void *)&LnkLI201,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::WRITE-STRING */
+static object  LnkTLI200(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[276]),0,262144,(void **)(void *)&LnkLI200,0,first,ap);va_end(ap);return V1;} /* SYSTEM::MAKE-RESTART */
+static object  LnkTLI199(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[271]),0,258052,(void **)(void *)&LnkLI199,0,first,ap);va_end(ap);return V1;} /* SYSTEM::COERCE-TO-CONDITION */
+static object  LnkTLI198(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[269]),0,262144,(void **)(void *)&LnkLI198,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::BREAK */
+static object  LnkTLI197(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[265]),0,520194,(void **)(void *)&LnkLI197,0,first,ap);va_end(ap);return V1;} /* SYSTEM::PROCESS-ERROR */
+static object  LnkTLI196(){object V1=(object )call_proc_new(((object)VV[258]),0,0,(void **)(void *)&LnkLI196,0,0,0);return V1;} /* ANSI-LOOP::LOOP-CONTEXT */
+static object  LnkTLI195(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[245]),1,520192,(void **)(void *)&LnkLI195,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::MACROEXPAND-1 */
+static object  LnkTLI194(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[243]),0,258050,(void **)(void *)&LnkLI194,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::ESTIMATE-CODE-SIZE-1 */
+static object  LnkTLI193(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[242]),0,1,(void **)(void *)&LnkLI193,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::DESTRUCTURING-SIZE */
+static object  LnkTLI192(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[241]),0,1,(void **)(void *)&LnkLI192,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::NREVERSE */
+static object  LnkTLI191(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[238]),0,258050,(void **)(void *)&LnkLI191,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::ESTIMATE-CODE-SIZE */
+static fixnum  LnkTLI190(object first,...){fixnum V1;va_list ap;va_start(ap,first);V1=(fixnum )call_proc_new(((object)VV[237]),0,1,(void **)(void *)&LnkLI190,1,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-CODE-DUPLICATION-THRESHOLD */
+static object  LnkTLI189(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[228]),1,8,(void **)(void *)&LnkLI189,4112,first,ap);va_end(ap);return V1;} /* SYSTEM::MAKE-VECTOR */
+static object  LnkTLI188(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[227]),0,1,(void **)(void *)&LnkLI188,0,first,ap);va_end(ap);return V1;} /* SYSTEM::EXPAND-ARRAY-ELEMENT-TYPE */
+static object  LnkTLI187(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[211]),0,1,(void **)(void *)&LnkLI187,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::ARRAY-ELEMENT-TYPE */
+static fixnum  LnkTLI186(object first,...){fixnum V1;va_list ap;va_start(ap,first);V1=(fixnum )call_proc_new(((object)VV[192]),0,16385,(void **)(void *)&LnkLI186,1,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-OPTIMIZATION-QUANTITIES */
+static object  LnkTLI185(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[190]),0,262145,(void **)(void *)&LnkLI185,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-WARN */
+static object  LnkTLI184(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[189]),0,262146,(void **)(void *)&LnkLI184,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::TYPEP */
+static object  LnkTLI183(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[188]),1,258049,(void **)(void *)&LnkLI183,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::EVAL */
+static object  LnkTLI182(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[187]),0,262145,(void **)(void *)&LnkLI182,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::CONSTANTP */
+static object  LnkTLI181(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[181]),0,1,(void **)(void *)&LnkLI181,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-MAKE-PSETQ */
+static object  LnkTLI180(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[180]),0,1,(void **)(void *)&LnkLI180,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-MAKE-DESETQ */
+static fixnum  LnkTLI179(object first,...){fixnum V1;va_list ap;va_start(ap,first);V1=(fixnum )call_proc_new(((object)VV[170]),1,1,(void **)(void *)&LnkLI179,1,first,ap);va_end(ap);return V1;} /* SYSTEM::EXTEND-HASHTABLE */
+static object  LnkTLI178(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[169]),1,5,(void **)(void *)&LnkLI178,0,first,ap);va_end(ap);return V1;} /* SYSTEM::MAKE-HASH-TABLE-INT */
+static object  LnkTLI177(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[165]),0,262144,(void **)(void *)&LnkLI177,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::MAKE-LOOP-UNIVERSE */
+static object  LnkTLI176(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[158]),1,262146,(void **)(void *)&LnkLI176,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::FORMAT */
+static fixnum  LnkTLI175(object first,...){fixnum V1;va_list ap;va_start(ap,first);V1=(fixnum )call_proc_new(((object)VV[127]),1,2,(void **)(void *)&LnkLI175,1,first,ap);va_end(ap);return V1;} /* SYSTEM::GETHASH-INT */
+static object  LnkTLI174(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[116]),0,3,(void **)(void *)&LnkLI174,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::HIDE-VARIABLE-REFERENCE */
+static object  LnkTLI173(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[102]),0,1,(void **)(void *)&LnkLI173,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-TYPED-INIT */
+static object  LnkTLI172(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[90]),0,262144,(void **)(void *)&LnkLI172,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::LOOP-GENTEMP */
+static object  LnkTLI171(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[89]),0,262144,(void **)(void *)&LnkLI171,0,first,ap);va_end(ap);return V1;} /* ANSI-LOOP::MAKE-LOOP-MINIMAX-INTERNAL */
+static object  LnkTLI170(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[88]),0,2,(void **)(void *)&LnkLI170,0,first,ap);va_end(ap);return V1;} /* SYSTEM::NTP-SUBTP */
+static object  LnkTLI169(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[87]),0,258049,(void **)(void *)&LnkLI169,0,first,ap);va_end(ap);return V1;} /* SYSTEM::NORMALIZE-TYPE */
+static object  LnkTLI168(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[86]),0,1,(void **)(void *)&LnkLI168,0,first,ap);va_end(ap);return V1;} /* SYSTEM::NPROCESS-TYPE */
+static object  LnkTLI167(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[81]),0,262145,(void **)(void *)&LnkLI167,0,first,ap);va_end(ap);return V1;} /* SYSTEM::IMPROPER-CONSP */
+static object  LnkTLI166(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[79]),1,1,(void **)(void *)&LnkLI166,0,first,ap);va_end(ap);return V1;} /* SYSTEM::SI-CLASSP */
+static object  LnkTLI165(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[73]),0,262147,(void **)(void *)&LnkLI165,0,first,ap);va_end(ap);return V1;} /* SYSTEM::CHECK-TYPE-SYMBOL */
+static object  LnkTLI164(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[71]),1,262145,(void **)(void *)&LnkLI164,0,first,ap);va_end(ap);return V1;} /* SYSTEM::MAKE-STRUCTURE */
+static object  LnkTLI163(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[39]),1,520193,(void **)(void *)&LnkLI163,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::MACROEXPAND */
+static object  LnkTLI162(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[0]),0,262145,(void **)(void *)&LnkLI162,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::ERROR */
+	
+	#ifdef SYSTEM_SPECIAL_INIT
+	SYSTEM_SPECIAL_INIT
+	#endif
--- /dev/null
+++ gcl27-2.7.0/mod/gcl_loop.h
@@ -0,0 +1,1377 @@
+
+static object LI1__LOOP_COPYLISTA__loop(object V3,object V4)
+;
+#define VMB1  object  V13 ,V9 ,V8;
+#define VMS1
+#define VMV1
+#define VMRV1(a_,b_) return(a_);
+#define VMR1(a_) VMRV1(a_,0);
+static object LI2__LOOP_GENTEMP__loop(object V16,...)
+;
+#define VMB2
+#define VMS2
+#define VMV2
+#define VMRV2(a_,b_) return(a_);
+#define VMR2(a_) VMRV2(a_,0);
+static fixnum LI3__LOOP_OPTIMIZATION_QUANTITIES__loop(object V32)
+;
+#define VMB3 register object *  base=vs_top;
+#define VMS3 vs_top += 4;
+#define VMV3 vs_check;
+#define VMRV3(a_,b_) if ((b_)>=-1) vs_top=V33 ? (object *)V33+(b_) : base; return(a_);
+#define VMR3(a_) VMRV3(a_,0);
+static object LI4__HIDE_VARIABLE_REFERENCES__loop(object V41,object V42)
+;
+#define VMB4
+#define VMS4
+#define VMV4
+#define VMRV4(a_,b_) return(a_);
+#define VMR4(a_) VMRV4(a_,0);
+static object LI5__HIDE_VARIABLE_REFERENCE__loop(object V47,object V48,object V49)
+;
+#define VMB5
+#define VMS5
+#define VMV5
+#define VMRV5(a_,b_) return(a_);
+#define VMR5(a_) VMRV5(a_,0);
+static object LI6__WITH_LOOP_LIST_COLLECTION_HEAD__loop(object V53,object V54)
+;
+#define VMB6  object  V79 ,V77 ,V73 ,V69 ,V65 ,V63;
+#define VMS6
+#define VMV6
+#define VMRV6(a_,b_) return(a_);
+#define VMR6(a_) VMRV6(a_,0);
+static object LI7__LOOP_COLLECT_RPLACD__loop(object V83,object V84)
+;
+#define VMB7  object  V153 ,V148 ,V146 ,V143;  fixnum  V139;  int8_t  V133;  fixnum  V125;  object  V121 ,V119;  int8_t  V118;  object  V116 ,V112 ,V111 ,V107 ,V103 ,V99 ,V95 ,V93;
+#define VMS7
+#define VMV7
+#define VMRV7(a_,b_) return(a_);
+#define VMR7(a_) VMRV7(a_,0);
+static object LI8__LOOP_COLLECT_ANSWER__loop(object V157,object V158)
+;
+#define VMB8  object  V171 ,V167 ,V163;
+#define VMS8
+#define VMV8
+#define VMRV8(a_,b_) return(a_);
+#define VMR8(a_) VMRV8(a_,0);
+static object LI9__MAKE_LOOP_MINIMAX_INTERNAL__loop(object V175,...)
+;
+#define VMB9  object  V215 ,V214;
+#define VMS9
+#define VMV9
+#define VMRV9(a_,b_) return(a_);
+#define VMR9(a_) VMRV9(a_,0);
+static object LI10__LOOP_MINIMAX_ANSWER_VARIABLE__loop(object V218)
+;
+#define VMB10  object  V228 ,V222;  fixnum  V219;
+#define VMS10
+#define VMV10
+#define VMRV10(a_,b_) return(a_);
+#define VMR10(a_) VMRV10(a_,0);
+static object LI11__LOOP_MINIMAX_TYPE__loop(object V238)
+;
+#define VMB11  object  V248 ,V242;  fixnum  V239;
+#define VMS11
+#define VMV11
+#define VMRV11(a_,b_) return(a_);
+#define VMR11(a_) VMRV11(a_,0);
+static object LI12__LOOP_MINIMAX_TEMP_VARIABLE__loop(object V258)
+;
+#define VMB12  object  V268 ,V262;  fixnum  V259;
+#define VMS12
+#define VMV12
+#define VMRV12(a_,b_) return(a_);
+#define VMR12(a_) VMRV12(a_,0);
+static object LI13__LOOP_MINIMAX_FLAG_VARIABLE__loop(object V278)
+;
+#define VMB13  object  V288 ,V282;  fixnum  V279;
+#define VMS13
+#define VMV13
+#define VMRV13(a_,b_) return(a_);
+#define VMR13(a_) VMRV13(a_,0);
+static object LI14__LOOP_MINIMAX_OPERATIONS__loop(object V298)
+;
+#define VMB14  object  V308 ,V302;  fixnum  V299;
+#define VMS14
+#define VMV14
+#define VMRV14(a_,b_) return(a_);
+#define VMR14(a_) VMRV14(a_,0);
+static object LI15__LOOP_MINIMAX_INFINITY_DATA__loop(object V318)
+;
+#define VMB15  object  V328 ,V322;  fixnum  V319;
+#define VMS15
+#define VMV15
+#define VMRV15(a_,b_) return(a_);
+#define VMR15(a_) VMRV15(a_,0);
+static object LI16__G5__loop(object V338)
+;
+#define VMB16  object  V348 ,V342;  fixnum  V339;
+#define VMS16
+#define VMV16
+#define VMRV16(a_,b_) return(a_);
+#define VMR16(a_) VMRV16(a_,0);
+static object LI17__MAKE_LOOP_MINIMAX__loop(object V361,register object V362)
+;
+#define VMB17  object  V396 ,V395 ,V388 ,V387 ,V386 ,V385;  fixnum  V382;  fixnum  V380;  fixnum  V378 ,V377;  fixnum  V375;  fixnum  V373;  int8_t  V369;
+#define VMS17
+#define VMV17
+#define VMRV17(a_,b_) return(a_);
+#define VMR17(a_) VMRV17(a_,0);
+static object LI18__LOOP_NOTE_MINIMAX_OPERATION__loop(register object V400,object V401)
+;
+#define VMB18  object  V410;
+#define VMS18
+#define VMV18
+#define VMRV18(a_,b_) return(a_);
+#define VMR18(a_) VMRV18(a_,0);
+static object LI19__WITH_MINIMAX_VALUE__loop(object V414,object V415)
+;
+#define VMB19  object  V437 ,V436 ,V434 ,V432 ,V431 ,V430 ,V428 ,V420;
+#define VMS19
+#define VMV19
+#define VMRV19(a_,b_) return(a_);
+#define VMR19(a_) VMRV19(a_,0);
+static object LI20__LOOP_ACCUMULATE_MINIMAX_VALUE__loop(object V441,object V442)
+;
+#define VMB20  object  V471 ,V470 ,V469 ,V468 ,V467 ,V466 ,V461 ,V457 ,V456 ,V452 ,V448;
+#define VMS20
+#define VMV20
+#define VMRV20(a_,b_) return(a_);
+#define VMR20(a_) VMRV20(a_,0);
+static object LI21__LOOP_TEQUAL__loop(object V484,object V485)
+;
+#define VMB21  int8_t  V493;  fixnum  V492 ,V486;
+#define VMS21
+#define VMV21
+#define VMRV21(a_,b_) return(a_);
+#define VMR21(a_) VMRV21(a_,0);
+static object LI22__LOOP_TASSOC__loop(register object V521,object V522)
+;
+#define VMB22  int8_t  V535;  fixnum  V534;  int8_t  V527;  fixnum  V523;
+#define VMS22
+#define VMV22
+#define VMRV22(a_,b_) return(a_);
+#define VMR22(a_) VMRV22(a_,0);
+static object LI23__LOOP_TMEMBER__loop(register object V566,object V567)
+;
+#define VMB23  int8_t  V578;  fixnum  V577 ,V568;
+#define VMS23
+#define VMV23
+#define VMRV23(a_,b_) return(a_);
+#define VMR23(a_) VMRV23(a_,0);
+static object LI24__LOOP_LOOKUP_KEYWORD__loop(object V609,object V610)
+;
+#define VMB24  object  V617;  fixnum  V615;  fixnum  V611;
+#define VMS24
+#define VMV24
+#define VMRV24(a_,b_) return(a_);
+#define VMR24(a_) VMRV24(a_,0);
+static object LI25__LOOP_STORE_TABLE_DATA__loop(object V622,object V623)
+;
+#define VMB25  object  V642 ,V638 ,V637 ,V633 ,V629;
+#define VMS25
+#define VMV25
+#define VMRV25(a_,b_) return(a_);
+#define VMR25(a_) VMRV25(a_,0);
+static object LI26__MAKE_LOOP_UNIVERSE__loop(object V645,...)
+;
+#define VMB26  object  V691 ,V690;
+#define VMS26
+#define VMV26
+#define VMRV26(a_,b_) return(a_);
+#define VMR26(a_) VMRV26(a_,0);
+static object LI27__LOOP_UNIVERSE_KEYWORDS__loop(object V694)
+;
+#define VMB27  object  V704 ,V698;  fixnum  V695;
+#define VMS27
+#define VMV27
+#define VMRV27(a_,b_) return(a_);
+#define VMR27(a_) VMRV27(a_,0);
+static object LI28__LOOP_UNIVERSE_ITERATION_KEYWORDS__loop(object V714)
+;
+#define VMB28  object  V724 ,V718;  fixnum  V715;
+#define VMS28
+#define VMV28
+#define VMRV28(a_,b_) return(a_);
+#define VMR28(a_) VMRV28(a_,0);
+static object LI29__LOOP_UNIVERSE_FOR_KEYWORDS__loop(object V734)
+;
+#define VMB29  object  V744 ,V738;  fixnum  V735;
+#define VMS29
+#define VMV29
+#define VMRV29(a_,b_) return(a_);
+#define VMR29(a_) VMRV29(a_,0);
+static object LI30__LOOP_UNIVERSE_PATH_KEYWORDS__loop(object V754)
+;
+#define VMB30  object  V764 ,V758;  fixnum  V755;
+#define VMS30
+#define VMV30
+#define VMRV30(a_,b_) return(a_);
+#define VMR30(a_) VMRV30(a_,0);
+static object LI31__LOOP_UNIVERSE_TYPE_SYMBOLS__loop(object V774)
+;
+#define VMB31  object  V784 ,V778;  fixnum  V775;
+#define VMS31
+#define VMV31
+#define VMRV31(a_,b_) return(a_);
+#define VMR31(a_) VMRV31(a_,0);
+static object LI32__LOOP_UNIVERSE_TYPE_KEYWORDS__loop(object V794)
+;
+#define VMB32  object  V804 ,V798;  fixnum  V795;
+#define VMS32
+#define VMV32
+#define VMRV32(a_,b_) return(a_);
+#define VMR32(a_) VMRV32(a_,0);
+static object LI33__LOOP_UNIVERSE_ANSI__loop(object V814)
+;
+#define VMB33  object  V824 ,V818;  fixnum  V815;
+#define VMS33
+#define VMV33
+#define VMRV33(a_,b_) return(a_);
+#define VMR33(a_) VMRV33(a_,0);
+static object LI34__LOOP_UNIVERSE_IMPLICIT_FOR_REQUIRED__loop(object V834)
+;
+#define VMB34  object  V844 ,V838;  fixnum  V835;
+#define VMS34
+#define VMV34
+#define VMRV34(a_,b_) return(a_);
+#define VMR34(a_) VMRV34(a_,0);
+static object LI35__G63__loop(object V854)
+;
+#define VMB35  object  V864 ,V858;  fixnum  V855;
+#define VMS35
+#define VMV35
+#define VMRV35(a_,b_) return(a_);
+#define VMR35(a_) VMRV35(a_,0);
+static object LI36__PRINT_LOOP_UNIVERSE__loop(object V878,object V879,object V880)
+;
+#define VMB36  int8_t  V887;  object  V883;
+#define VMS36 register object *sup=vs_top+0;vs_top=sup;
+#define VMV36
+#define VMRV36(a_,b_) return(a_);
+#define VMR36(a_) VMRV36(a_,0);
+static object LI37__MAKE_STANDARD_LOOP_UNIVERSE__loop(object V890,...)
+;
+#define VMB37  int8_t  V1143;  object  V1130;  fixnum  V1119;  fixnum  V1115;  fixnum  V1113;  object  V1091 ,V1090;  fixnum  V1079;  fixnum  V1075;  fixnum  V1073;  object  V1051;  fixnum  V1040;  fixnum  V1036;  fixnum  V1034;  object  V1012;  fixnum  V1001;  fixnum  V997;  fixnum  V995;  object  V973;  fixnum  V962;  fixnum  V958;  fixnum  V956;  object  V934 ,V933 ,V932;
+#define VMS37
+#define VMV37
+#define VMRV37(a_,b_) return(a_);
+#define VMR37(a_) VMRV37(a_,0);
+static object LI38__LOOP_MAKE_PSETQ__loop(object V1154)
+;
+#define VMB38  object  V1163 ,V1161 ,V1159 ,V1156 ,V1155;
+#define VMS38
+#define VMV38
+#define VMRV38(a_,b_) return(a_);
+#define VMR38(a_) VMRV38(a_,0);
+static object LI39__LOOP_MAKE_DESETQ__loop(object V1167)
+;
+#define VMB39  object  V1169;
+#define VMS39
+#define VMV39
+#define VMRV39(a_,b_) return(a_);
+#define VMR39(a_) VMRV39(a_,0);
+static object LI40__LOOP_REALLY_DESETQ__loop(object V1175,object V1176)
+;
+#define VMB40 register object *  base=vs_top;  object  V1196 ,V1186 ,V1182;
+#define VMS40 vs_top += 3;
+#define VMV40 vs_check;
+#define VMRV40(a_,b_) vs_top=base; return(a_);
+#define VMR40(a_) VMRV40(a_,0);
+static object L44__LOOP_DESETQ_INTERNAL__loop(object *base0,object V1206,object V1207,...)
+;
+#define VMB41  object  V1267 ,V1250 ,V1249 ,V1248;  fixnum  V1233 ,V1231;  object  V1228;  int8_t  V1227;  object  V1218;  int8_t  V1217;  fixnum  V1216;
+#define VMS41
+#define VMV41
+#define VMRV41(a_,b_) return(a_);
+#define VMR41(a_) VMRV41(a_,0);
+static object L42__FIND_NON_NULL__loop(object *base0,object V1274)
+;
+#define VMB42  object  V1278;  int8_t  V1277;
+#define VMS42
+#define VMV42
+#define VMRV42(a_,b_) return(a_);
+#define VMR42(a_) VMRV42(a_,0);
+static object LI45__LOOP_CONSTANT_FOLD_IF_POSSIBLE__loop(object V1285,...)
+;
+#define VMB43 register object *  base=vs_top;
+#define VMS43 vs_top += 2;
+#define VMV43 vs_check;
+#define VMRV43(a_,b_) if ((b_)>=-1) vs_top=V1286 ? (object *)V1286+(b_) : base; return(a_);
+#define VMR43(a_) VMRV43(a_,0);
+static object LI46__LOOP_CONSTANTP__loop(object V1301)
+;
+#define VMB44
+#define VMS44
+#define VMV44
+#define VMRV44(a_,b_) return(a_);
+#define VMR44(a_) VMRV44(a_,0);
+static fixnum LI47__LOOP_CODE_DUPLICATION_THRESHOLD__loop(object V1304)
+;
+#define VMB45
+#define VMS45 register object *sup=vs_top+0;vs_top=sup;
+#define VMV45
+#define VMRV45(a_,b_) return(a_);
+#define VMR45(a_) VMRV45(a_,0);
+static object LI48__LOOP_BODY__loop(object V1311,register object V1312)
+;
+#define VMB46  fixnum  V2160;  int8_t  V2156;  object  V2149;  fixnum  V2141;  int8_t  V2137;  object  V2108;  fixnum  V2100;  int8_t  V2096;  object  V2075 ,V2068;  fixnum  V2053;  int8_t  V2049;  object  V2040;  fixnum  V2032;  int8_t  V2028;  object  V2019 ,V2015 ,V2000 ,V1998 ,V1996;  fixnum  V1965;  int8_t  V1961;  object  V1954;  fixnum  V1946;  int8_t  V1942;  object  V1913;  fixnum  V1905;  int8_t  V1901;  object  V1881 ,V1871 ,V1869;  fixnum  V1844;  int8_t  V1840;  object  V1833;  fixnum  V1825;  int8_t  V1821;  object  V1794;  fixnum  V1786;  int8_t  V1782;  fixnum  V1700 ,V1642;  int8_t  V1634;  fixnum  V1633;  int8_t  V1625;  object  V1618;  fixnum  V1586 ,V1561 ,V1536 ,V1511;  int8_t  V1499;  fixnum  V1498;  object  V1493 ,V1488 ,V1484;  int8_t  V1481;  fixnum  V1450 ,V1425 ,V1400 ,V1375;  int8_t  V1363;  fixnum  V1362;  object  V1357 ,V1352 ,V1348;  int8_t  V1345;  object  V1344 ,V1340 ,V1339 ,V1335 ,V1331 ,V1327 ,V1323;
+#define VMS46
+#define VMV46
+#define VMRV46(a_,b_) return(a_);
+#define VMR46(a_) VMRV46(a_,0);
+static fixnum LI53__DUPLICATABLE_CODE_P__loop(object V2188,object V2189)
+;
+#define VMB47
+#define VMS47
+#define VMV47
+#define VMRV47(a_,b_) return(a_);
+#define VMR47(a_) VMRV47(a_,0);
+static object LI54__DESTRUCTURING_SIZE__loop(object V2194)
+;
+#define VMB48  object  V2210 ,V2204;  int8_t  V2198;
+#define VMS48
+#define VMV48
+#define VMRV48(a_,b_) return(a_);
+#define VMR48(a_) VMRV48(a_,0);
+static object LI55__ESTIMATE_CODE_SIZE__loop(VOL object V2214,VOL object V2215)
+;
+static void *dlsetjmp;
+#define VMB49 register object * VOL  base=vs_top; frame_ptr VOL  old_frs_top=frs_top;
+#define VMS49
+#define VMV49
+#define VMRV49(a_,b_) if ((b_)>=-1) vs_top=V2216 ? (object *)V2216+(b_) : base; for (;frs_top>old_frs_top;) frs_pop(); return(a_);
+#define VMR49(a_) VMRV49(a_,0);
+static object LI56__ESTIMATE_CODE_SIZE_1__loop(register object V2221,register object V2222)
+;
+#define VMB50 register object *  base=vs_top;  object  V2408 ,V2405;  fixnum  V2382;  fixnum  V2381;  object  V2376 ,V2373 ,V2372 ,V2369 ,V2357 ,V2348 ,V2344 ,V2333 ,V2332 ,V2329 ,V2321 ,V2319 ,V2318 ,V2313 ,V2298 ,V2297 ,V2294;  int8_t  V2278;  int8_t  V2271;  object  V2270 ,V2268 ,V2265;  fixnum  V2254;  object  V2247;  fixnum  V2240;  int8_t  V2237;  fixnum  V2231;  object  V2229;  int8_t  V2226;  fixnum  V2225;
+#define VMS50 register object *sup=vs_top+1;vs_top=sup;
+#define VMV50 vs_check;
+#define VMRV50(a_,b_) if ((b_)>=-1) vs_top=V2223 ? (object *)V2223+(b_) : base; return(a_);
+#define VMR50(a_) VMRV50(a_,0);
+static object LI77__LOOP_CONTEXT__loop()
+;
+#define VMB51  object  V2418 ,V2413;
+#define VMS51
+#define VMV51
+#define VMRV51(a_,b_) return(a_);
+#define VMR51(a_) VMRV51(a_,0);
+static object LI78__LOOP_ERROR__loop(object V2429,...)
+;
+#define VMB52 register object *  base=vs_top;  object  V2438;
+#define VMS52
+#define VMV52
+#define VMRV52(a_,b_) if ((b_)>=-1) vs_top=V2430 ? (object *)V2430+(b_) : base; return(a_);
+#define VMR52(a_) VMRV52(a_,0);
+static object LI79__LOOP_WARN__loop(VOL object V2441,...)
+;
+#define VMB53 register object * VOL  base=vs_top; bds_ptr VOL  old_bds_top=bds_top; frame_ptr VOL  old_frs_top=frs_top; VOL  object  V2476 ,V2474; VOL  int8_t  V2471; VOL  object  V2470 ,V2466 ,V2463 ,V2456 ,V2455 ,V2454 ,V2453;
+#define VMS53 register object *VOL sup=vs_top+4;vs_top=sup;
+#define VMV53 vs_check;
+#define VMRV53(a_,b_) vs_top=base; for (;bds_top>old_bds_top;) bds_unwind1; for (;frs_top>old_frs_top;) frs_pop(); return(a_);
+#define VMR53(a_) VMRV53(a_,0);
+static object LC81__LAMBDA__loop(object V2480)
+;
+#define VMB54 register object *  base=vs_top;
+#define VMS54
+#define VMV54
+#define VMRV54(a_,b_) if ((b_)>=-1) vs_top=V2481 ? (object *)V2481+(b_) : base; return(a_);
+#define VMR54(a_) VMRV54(a_,0);
+static object LC80__LAMBDA__loop(object V2484,...)
+;
+#define VMB55 register object *  base=vs_top;
+#define VMS55
+#define VMV55
+#define VMRV55(a_,b_) if ((b_)>=-1) vs_top=V2486 ? (object *)V2486+(b_) : base; return(a_);
+#define VMR55(a_) VMRV55(a_,0);
+static object LI82__LOOP_CHECK_DATA_TYPE__loop(object V2498,object V2499,...)
+;
+#define VMB56  object  V2517 ,V2516 ,V2515 ,V2514;
+#define VMS56 register object *sup=vs_top+0;vs_top=sup;
+#define VMV56
+#define VMRV56(a_,b_) return(a_);
+#define VMR56(a_) VMRV56(a_,0);
+static object LI83__LOOP_FINISH__loop(object V2525,object V2526)
+;
+#define VMB57  object  V2530 ,V2528;
+#define VMS57
+#define VMV57
+#define VMRV57(a_,b_) return(a_);
+#define VMR57(a_) VMRV57(a_,0);
+static object LI84__SUBST_GENSYMS_FOR_NIL__loop(object V2533)
+;
+#define VMB58  object  V2543 ,V2542 ,V2541 ,V2540;  int8_t  V2538;  object  V2536;
+#define VMS58
+#define VMV58
+#define VMRV58(a_,b_) return(a_);
+#define VMR58(a_) VMRV58(a_,0);
+static object LI85__LOOP_BUILD_DESTRUCTURING_BINDINGS__loop(object V2547,object V2548)
+;
+#define VMB59 bds_ptr  old_bds_top=bds_top;  object  V2554 ,V2553 ,V2551 ,V2550 ,V2549;
+#define VMS59
+#define VMV59
+#define VMRV59(a_,b_) for (;bds_top>old_bds_top;) bds_unwind1; return(a_);
+#define VMR59(a_) VMRV59(a_,0);
+static object LI86__LOOP_TRANSLATE__loop(object V2561,object V2562,object V2563)
+;
+#define VMB60 bds_ptr  old_bds_top=bds_top;  object  V2623 ,V2620 ,V2616 ,V2569 ,V2568 ,V2567 ,V2566 ,V2565;
+#define VMS60
+#define VMV60
+#define VMRV60(a_,b_) for (;bds_top>old_bds_top;) bds_unwind1; return(a_);
+#define VMR60(a_) VMRV60(a_,0);
+static object LI87__LOOP_ITERATION_DRIVER__loop()
+;
+#define VMB61  object  V2643 ,V2641 ,V2639 ,V2638;  int8_t  V2637;  object  V2636 ,V2635 ,V2632 ,V2631;  fixnum  V2630;
+#define VMS61 register object *sup=vs_top+0;vs_top=sup;
+#define VMV61
+#define VMRV61(a_,b_) return(a_);
+#define VMR61(a_) VMRV61(a_,0);
+static object LI88__LOOP_POP_SOURCE__loop()
+;
+#define VMB62  object  V2649;
+#define VMS62
+#define VMV62
+#define VMRV62(a_,b_) return(a_);
+#define VMR62(a_) VMRV62(a_,0);
+static object LI89__LOOP_GET_COMPOUND_FORM__loop()
+;
+#define VMB63  int8_t  V2654;
+#define VMS63
+#define VMV63
+#define VMRV63(a_,b_) return(a_);
+#define VMR63(a_) VMRV63(a_,0);
+static object LI90__LOOP_GET_PROGN__loop()
+;
+#define VMB64  object  V2668 ,V2663;  int8_t  V2660;
+#define VMS64
+#define VMV64
+#define VMRV64(a_,b_) return(a_);
+#define VMR64(a_) VMRV64(a_,0);
+static object LI91__LOOP_GET_FORM__loop()
+;
+#define VMB65
+#define VMS65
+#define VMV65
+#define VMRV65(a_,b_) return(a_);
+#define VMR65(a_) VMRV65(a_,0);
+static object LI92__LOOP_CONSTRUCT_RETURN__loop(object V2679)
+;
+#define VMB66  object  V2680;
+#define VMS66
+#define VMV66
+#define VMRV66(a_,b_) return(a_);
+#define VMR66(a_) VMRV66(a_,0);
+static object LI93__LOOP_PSEUDO_BODY__loop(object V2684)
+;
+#define VMB67  object  V2685;
+#define VMS67
+#define VMV67
+#define VMRV67(a_,b_) return(a_);
+#define VMR67(a_) VMRV67(a_,0);
+static object LI94__LOOP_EMIT_BODY__loop(object V2688)
+;
+#define VMB68  object  V2689;
+#define VMS68
+#define VMV68
+#define VMRV68(a_,b_) return(a_);
+#define VMR68(a_) VMRV68(a_,0);
+static object LI95__LOOP_EMIT_FINAL_VALUE__loop(object V2692,...)
+;
+#define VMB69  object  V2706 ,V2705;
+#define VMS69
+#define VMV69
+#define VMRV69(a_,b_) return(a_);
+#define VMR69(a_) VMRV69(a_,0);
+static object LI96__LOOP_DISALLOW_CONDITIONAL__loop(object V2710,...)
+;
+#define VMB70
+#define VMS70
+#define VMV70
+#define VMRV70(a_,b_) return(a_);
+#define VMR70(a_) VMRV70(a_,0);
+static object LI97__LOOP_DISALLOW_ANONYMOUS_COLLECTORS__loop()
+;
+#define VMB71  int8_t  V2724;
+#define VMS71
+#define VMV71
+#define VMRV71(a_,b_) return(a_);
+#define VMR71(a_) VMRV71(a_,0);
+static object LI98__LOOP_DISALLOW_AGGREGATE_BOOLEANS__loop()
+;
+#define VMB72
+#define VMS72
+#define VMV72
+#define VMRV72(a_,b_) return(a_);
+#define VMR72(a_) VMRV72(a_,0);
+static object LI99__LOOP_TYPED_INIT__loop(object V2745)
+;
+#define VMB73  object  V2771 ,V2770 ,V2769 ,V2768 ,V2761 ,V2760 ,V2759 ,V2758 ,V2751 ,V2750 ,V2749 ,V2748;
+#define VMS73
+#define VMV73
+#define VMRV73(a_,b_) return(a_);
+#define VMR73(a_) VMRV73(a_,0);
+static object LI100__LOOP_OPTIONAL_TYPE__loop(object V2780,...)
+;
+#define VMB74 register object *  base=vs_top;  object  V2818 ,V2817 ,V2816 ,V2815 ,V2814 ,V2813;  int8_t  V2811 ,V2810 ,V2809;  object  V2806;  fixnum  V2805;  object  V2799;  fixnum  V2798;  fixnum  V2792;
+#define VMS74 vs_top += 5;
+#define VMV74 vs_check;
+#define VMRV74(a_,b_) vs_top=base; return(a_);
+#define VMR74(a_) VMRV74(a_,0);
+static object L102__REPLICATE__loop(object *base0,object V2823,object V2824)
+;
+#define VMB75  object  V2830 ,V2829 ,V2828 ,V2827;  int8_t  V2825;
+#define VMS75
+#define VMV75
+#define VMRV75(a_,b_) return(a_);
+#define VMR75(a_) VMRV75(a_,0);
+static object L104__TRANSLATE__loop(object *base0,object V2834,object V2835)
+;
+#define VMB76  object  V2862 ,V2861 ,V2860 ,V2859 ,V2858 ,V2857;  int8_t  V2855 ,V2854;  object  V2852;  fixnum  V2851;  object  V2844;  fixnum  V2843;  object  V2838;  fixnum  V2837;
+#define VMS76
+#define VMV76
+#define VMRV76(a_,b_) return(a_);
+#define VMR76(a_) VMRV76(a_,0);
+static object LI105__LOOP_BIND_BLOCK__loop()
+;
+#define VMB77  object  V2870 ,V2869 ,V2868 ,V2867 ,V2866 ,V2865;
+#define VMS77
+#define VMV77
+#define VMRV77(a_,b_) return(a_);
+#define VMR77(a_) VMRV77(a_,0);
+static object LI106__LOOP_VARIABLE_P__loop(register object V2874)
+;
+#define VMB78  int8_t  V2883;
+#define VMS78
+#define VMV78
+#define VMRV78(a_,b_) return(a_);
+#define VMR78(a_) VMRV78(a_,0);
+static object LI107__LOOP_MAKE_VARIABLE__loop(object V2893,object V2894,object V2895,...)
+;
+#define VMB79  object  V2949 ,V2947;  int8_t  V2946;  object  V2943 ,V2942 ,V2939 ,V2937 ,V2936;  fixnum  V2934;  int8_t  V2929;  fixnum  V2925;  object  V2921;  fixnum  V2914;  int8_t  V2910;  object  V2908 ,V2906;
+#define VMS79
+#define VMV79
+#define VMRV79(a_,b_) return(a_);
+#define VMR79(a_) VMRV79(a_,0);
+static object LI108__LOOP_MAKE_ITERATION_VARIABLE__loop(object V2955,object V2956,object V2957)
+;
+#define VMB80
+#define VMS80
+#define VMV80
+#define VMRV80(a_,b_) return(a_);
+#define VMR80(a_) VMRV80(a_,0);
+static object LI109__LOOP_DECLARE_VARIABLE__loop(register object V2961,register object V2962)
+;
+#define VMB81  object  V2983 ,V2980 ,V2979;  int8_t  V2978 ,V2977;  object  V2974;  fixnum  V2966;
+#define VMS81
+#define VMV81
+#define VMRV81(a_,b_) return(a_);
+#define VMR81(a_) VMRV81(a_,0);
+static object LI110__LOOP_MAYBE_BIND_FORM__loop(object V2989,object V2990)
+;
+#define VMB82  object  V2992;
+#define VMS82
+#define VMV82
+#define VMRV82(a_,b_) return(a_);
+#define VMR82(a_) VMRV82(a_,0);
+static object LI111__LOOP_DO_IF__loop(register object V2996,object V2997)
+;
+#define VMB83 bds_ptr  old_bds_top=bds_top;  object  V3079 ,V3078 ,V3076 ,V3068 ,V3065 ,V3057;  int8_t  V3056;  object  V3055 ,V3054 ,V3051 ,V3049 ,V3048;  fixnum  V3047;  object  V3042 ,V3040 ,V3032 ,V3029 ,V3021;  int8_t  V3020;  object  V3019 ,V3018 ,V3015 ,V3013 ,V3012 ,V3011 ,V3009 ,V3008;  fixnum  V3007;
+#define VMS83 register object *sup=vs_top+0;vs_top=sup;
+#define VMV83
+#define VMRV83(a_,b_) for (;bds_top>old_bds_top;) bds_unwind1; return(a_);
+#define VMR83(a_) VMRV83(a_,0);
+static object LI112__LOOP_DO_INITIALLY__loop()
+;
+#define VMB84  object  V3082;
+#define VMS84
+#define VMV84
+#define VMRV84(a_,b_) return(a_);
+#define VMR84(a_) VMRV84(a_,0);
+static object LI113__LOOP_DO_FINALLY__loop()
+;
+#define VMB85  object  V3085;
+#define VMS85
+#define VMV85
+#define VMRV85(a_,b_) return(a_);
+#define VMR85(a_) VMRV85(a_,0);
+static object LI114__LOOP_DO_DO__loop()
+;
+#define VMB86  object  V3087;
+#define VMS86
+#define VMV86
+#define VMRV86(a_,b_) return(a_);
+#define VMR86(a_) VMRV86(a_,0);
+static object LI115__LOOP_DO_NAMED__loop()
+;
+#define VMB87  object  V3093;  object  V3091;  fixnum  V3090;
+#define VMS87
+#define VMV87
+#define VMRV87(a_,b_) return(a_);
+#define VMR87(a_) VMRV87(a_,0);
+static object LI116__LOOP_DO_RETURN__loop()
+;
+#define VMB88  object  V3096 ,V3095;
+#define VMS88
+#define VMV88
+#define VMRV88(a_,b_) return(a_);
+#define VMR88(a_) VMRV88(a_,0);
+static object LI117__MAKE_LOOP_COLLECTOR__loop(object V3099,...)
+;
+#define VMB89  object  V3139 ,V3138;
+#define VMS89
+#define VMV89
+#define VMRV89(a_,b_) return(a_);
+#define VMR89(a_) VMRV89(a_,0);
+static object LI118__LOOP_COLLECTOR_NAME__loop(object V3142)
+;
+#define VMB90  object  V3152 ,V3146;  fixnum  V3143;
+#define VMS90
+#define VMV90
+#define VMRV90(a_,b_) return(a_);
+#define VMR90(a_) VMRV90(a_,0);
+static object LI119__LOOP_COLLECTOR_CLASS__loop(object V3162)
+;
+#define VMB91  object  V3172 ,V3166;  fixnum  V3163;
+#define VMS91
+#define VMV91
+#define VMRV91(a_,b_) return(a_);
+#define VMR91(a_) VMRV91(a_,0);
+static object LI120__LOOP_COLLECTOR_HISTORY__loop(object V3182)
+;
+#define VMB92  object  V3192 ,V3186;  fixnum  V3183;
+#define VMS92
+#define VMV92
+#define VMRV92(a_,b_) return(a_);
+#define VMR92(a_) VMRV92(a_,0);
+static object LI121__LOOP_COLLECTOR_TEMPVARS__loop(object V3202)
+;
+#define VMB93  object  V3212 ,V3206;  fixnum  V3203;
+#define VMS93
+#define VMV93
+#define VMRV93(a_,b_) return(a_);
+#define VMR93(a_) VMRV93(a_,0);
+static object LI122__LOOP_COLLECTOR_DTYPE__loop(object V3222)
+;
+#define VMB94  object  V3232 ,V3226;  fixnum  V3223;
+#define VMS94
+#define VMV94
+#define VMRV94(a_,b_) return(a_);
+#define VMR94(a_) VMRV94(a_,0);
+static object LI123__LOOP_COLLECTOR_DATA__loop(object V3242)
+;
+#define VMB95  object  V3252 ,V3246;  fixnum  V3243;
+#define VMS95
+#define VMV95
+#define VMRV95(a_,b_) return(a_);
+#define VMR95(a_) VMRV95(a_,0);
+static object LI124__G683__loop(object V3262)
+;
+#define VMB96  object  V3272 ,V3266;  fixnum  V3263;
+#define VMS96
+#define VMV96
+#define VMRV96(a_,b_) return(a_);
+#define VMR96(a_) VMRV96(a_,0);
+static object LI125__LOOP_GET_COLLECTION_INFO__loop(object V3286,object V3287,object V3288)
+;
+#define VMB97 register object *  base=vs_top;  object  V3329 ,V3327 ,V3326 ,V3325 ,V3323 ,V3322 ,V3321 ,V3320;  int8_t  V3301;  fixnum  V3296;  object  V3294;
+#define VMS97 vs_top += 1;
+#define VMV97 vs_check;
+#define VMRV97(a_,b_) if ((b_)>=-1) vs_top=V3289 ? (object *)V3289+(b_) : base; return(a_);
+#define VMR97(a_) VMRV97(a_,0);
+static object LI126__LOOP_LIST_COLLECTION__loop(object V3333)
+;
+#define VMB98  object  V3350 ,V3349;  int8_t  V3348;  object  V3347;  object  V3345 ,V3344 ,V3343 ,V3341 ,V3340 ,V3339 ,V3338;
+#define VMS98 register object *sup=vs_top+0;vs_top=sup;
+#define VMV98
+#define VMRV98(a_,b_) return(a_);
+#define VMR98(a_) VMRV98(a_,0);
+static object LI127__LOOP_SUM_COLLECTION__loop(object V3355,object V3356,object V3357)
+;
+#define VMB99  object  V3382 ,V3380 ,V3378 ,V3376 ,V3375 ,V3373 ,V3371 ,V3369 ,V3368;  object  V3366;  object  V3365 ,V3363 ,V3361;
+#define VMS99 register object *sup=vs_top+0;vs_top=sup;
+#define VMV99
+#define VMRV99(a_,b_) return(a_);
+#define VMR99(a_) VMRV99(a_,0);
+static object LI128__LOOP_MAXMIN_COLLECTION__loop(object V3385)
+;
+#define VMB100  object  V3397 ,V3396;  object  V3394;  object  V3393 ,V3391 ,V3389;
+#define VMS100 register object *sup=vs_top+0;vs_top=sup;
+#define VMV100
+#define VMRV100(a_,b_) return(a_);
+#define VMR100(a_) VMRV100(a_,0);
+static object LI129__LOOP_DO_ALWAYS__loop(object V3401,object V3402)
+;
+#define VMB101  object  V3405 ,V3404;
+#define VMS101
+#define VMV101
+#define VMRV101(a_,b_) return(a_);
+#define VMR101(a_) VMRV101(a_,0);
+static object LI130__LOOP_DO_THEREIS__loop(object V3408)
+;
+#define VMB102  object  V3411 ,V3410 ,V3409;
+#define VMS102
+#define VMV102
+#define VMRV102(a_,b_) return(a_);
+#define VMR102(a_) VMRV102(a_,0);
+static object LI131__LOOP_DO_WHILE__loop(object V3415,object V3416)
+;
+#define VMB103  object  V3419 ,V3418;
+#define VMS103
+#define VMV103
+#define VMRV103(a_,b_) return(a_);
+#define VMR103(a_) VMRV103(a_,0);
+static object LI132__LOOP_DO_WITH__loop()
+;
+#define VMB104  object  V3426 ,V3424;
+#define VMS104
+#define VMV104
+#define VMRV104(a_,b_) return(a_);
+#define VMR104(a_) VMRV104(a_,0);
+static object LI133__LOOP_HACK_ITERATION__loop(object V3430)
+;
+#define VMB105  object  V3590 ,V3588 ,V3579 ,V3571 ,V3570 ,V3563 ,V3555 ,V3554 ,V3553 ,V3546 ,V3538 ,V3537 ,V3530 ,V3522 ,V3521 ,V3520 ,V3518 ,V3506 ,V3488 ,V3470 ,V3453 ,V3447;  int8_t  V3446;  object  V3445 ,V3443;
+#define VMS105 register object *sup=vs_top+0;vs_top=sup;
+#define VMV105
+#define VMRV105(a_,b_) return(a_);
+#define VMR105(a_) VMRV105(a_,0);
+static object LI134__LOOP_DO_FOR__loop()
+;
+#define VMB106 register object *  base=vs_top;  object  V3605;  int8_t  V3604;  object  V3603 ,V3599;  fixnum  V3598;
+#define VMS106 register object *sup=vs_top+0;vs_top=sup;
+#define VMV106
+#define VMRV106(a_,b_) if ((b_)>=-1) vs_top=V3592 ? (object *)V3592+(b_) : base; return(a_);
+#define VMR106(a_) VMRV106(a_,0);
+static object LI135__LOOP_DO_REPEAT__loop()
+;
+#define VMB107  object  V3614 ,V3612 ,V3610;
+#define VMS107
+#define VMV107
+#define VMRV107(a_,b_) return(a_);
+#define VMR107(a_) VMRV107(a_,0);
+static object LI136__LOOP_WHEN_IT_VARIABLE__loop()
+;
+#define VMB108  object  V3618 ,V3617;
+#define VMS108
+#define VMV108
+#define VMRV108(a_,b_) return(a_);
+#define VMR108(a_) VMRV108(a_,0);
+static object LI137__LOOP_ANSI_FOR_EQUALS__loop(object V3623,object V3624,object V3625)
+;
+#define VMB109  object  V3628 ,V3626;
+#define VMS109
+#define VMV109
+#define VMRV109(a_,b_) return(a_);
+#define VMR109(a_) VMRV109(a_,0);
+static object LI138__LOOP_FOR_ACROSS__loop(object V3634,object V3635,object V3636)
+;
+#define VMB110  object  V3656 ,V3655 ,V3645;  int8_t  V3644;  object  V3643;
+#define VMS110 register object *sup=vs_top+0;vs_top=sup;
+#define VMV110
+#define VMRV110(a_,b_) return(a_);
+#define VMR110(a_) VMRV110(a_,0);
+static object LI139__LOOP_LIST_STEP__loop(object V3659)
+;
+#define VMB111 register object *  base=vs_top;  object  V3680;  object  V3679 ,V3678 ,V3674;  object  V3673;  object  V3671 ,V3670;  int8_t  V3669;  object  V3666;  object  V3665;  int8_t  V3664;  object  V3662;
+#define VMS111 vs_top += 1;
+#define VMV111 vs_check;
+#define VMRV111(a_,b_) if ((b_)>=-1) vs_top=V3660 ? (object *)V3660+(b_) : base; return(a_);
+#define VMR111(a_) VMRV111(a_,0);
+static object LI140__LOOP_FOR_ON__loop(object V3686,object V3687,object V3688)
+;
+#define VMB112  object  V3706;  int8_t  V3702;  object  V3701 ,V3700;  fixnum  V3694;
+#define VMS112 register object *sup=vs_top+0;vs_top=sup;
+#define VMV112
+#define VMRV112(a_,b_) return(a_);
+#define VMR112(a_) VMRV112(a_,0);
+static object LI141__LOOP_FOR_IN__loop(object V3711,object V3712,object V3713)
+;
+#define VMB113  object  V3727;  int8_t  V3726;
+#define VMS113 register object *sup=vs_top+0;vs_top=sup;
+#define VMV113
+#define VMRV113(a_,b_) return(a_);
+#define VMR113(a_) VMRV113(a_,0);
+static object LI142__MAKE_LOOP_PATH__loop(object V3730,...)
+;
+#define VMB114  object  V3767 ,V3766;
+#define VMS114
+#define VMV114
+#define VMRV114(a_,b_) return(a_);
+#define VMR114(a_) VMRV114(a_,0);
+static object LI143__LOOP_PATH_NAMES__loop(object V3770)
+;
+#define VMB115  object  V3780 ,V3774;  fixnum  V3771;
+#define VMS115
+#define VMV115
+#define VMRV115(a_,b_) return(a_);
+#define VMR115(a_) VMRV115(a_,0);
+static object LI144__LOOP_PATH_PREPOSITION_GROUPS__loop(object V3790)
+;
+#define VMB116  object  V3800 ,V3794;  fixnum  V3791;
+#define VMS116
+#define VMV116
+#define VMRV116(a_,b_) return(a_);
+#define VMR116(a_) VMRV116(a_,0);
+static object LI145__LOOP_PATH_INCLUSIVE_PERMITTED__loop(object V3810)
+;
+#define VMB117  object  V3820 ,V3814;  fixnum  V3811;
+#define VMS117
+#define VMV117
+#define VMRV117(a_,b_) return(a_);
+#define VMR117(a_) VMRV117(a_,0);
+static object LI146__LOOP_PATH_FUNCTION__loop(object V3830)
+;
+#define VMB118  object  V3840 ,V3834;  fixnum  V3831;
+#define VMS118
+#define VMV118
+#define VMRV118(a_,b_) return(a_);
+#define VMR118(a_) VMRV118(a_,0);
+static object LI147__LOOP_PATH_USER_DATA__loop(object V3850)
+;
+#define VMB119  object  V3860 ,V3854;  fixnum  V3851;
+#define VMS119
+#define VMV119
+#define VMRV119(a_,b_) return(a_);
+#define VMR119(a_) VMRV119(a_,0);
+static object LI148__G792__loop(object V3870)
+;
+#define VMB120  object  V3880 ,V3874;  fixnum  V3871;
+#define VMS120
+#define VMV120
+#define VMRV120(a_,b_) return(a_);
+#define VMR120(a_) VMRV120(a_,0);
+static object LI149__ADD_LOOP_PATH__loop(object V3894,object V3895,object V3896,...)
+;
+#define VMB121  fixnum  V3991;  fixnum  V3987;  fixnum  V3985;  int8_t  V3972;  object  V3971 ,V3964;  fixnum  V3959;  object  V3957 ,V3949 ,V3939 ,V3933;  fixnum  V3930;  int8_t  V3929;  object  V3926 ,V3925;
+#define VMS121
+#define VMV121
+#define VMRV121(a_,b_) return(a_);
+#define VMR121(a_) VMRV121(a_,0);
+static object LI150__LOOP_FOR_BEING__loop(object V4006,object V4007,object V4008)
+;
+#define VMB122  int8_t  V4065;  object  V4061 ,V4057 ,V4052 ,V4050 ,V4049;  int8_t  V4048;  int8_t  V4042;  object  V4040;  int8_t  V4039;  object  V4037;  fixnum  V4036;  object  V4031 ,V4022;  fixnum  V4021;  object  V4018;  object  V4016 ,V4014;
+#define VMS122 register object *sup=vs_top+0;vs_top=sup;
+#define VMV122
+#define VMRV122(a_,b_) return(a_);
+#define VMR122(a_) VMRV122(a_,0);
+static object LI151__NAMED_VARIABLE__loop(object V4077)
+;
+static void *dlmemmove;
+#define VMB123 register object *  base=vs_top;  object  V4199 ,V4175 ,V4174 ,V4173;  int8_t  V4145;  fixnum  V4144;  object  V4122 ,V4103 ,V4096 ,V4093;  int8_t  V4086;  object  V4083;  object  V4080;
+#define VMS123 vs_top += 1;
+#define VMV123 vs_check;
+#define VMRV123(a_,b_) if ((b_)>=-1) vs_top=V4078 ? (object *)V4078+(b_) : base; return(a_);
+#define VMR123(a_) VMRV123(a_,0);
+static object LI152__LOOP_COLLECT_PREPOSITIONAL_PHRASES__loop(object V4203,...)
+;
+#define VMB124 register object *  base=vs_top;  fixnum  V4328;  object  V4325 ,V4322 ,V4320 ,V4317 ,V4314;  object  V4312;  object  V4310;  int8_t  V4291;  object  V4282;  int8_t  V4267;  object  V4265;  int8_t  V4231;  object  V4228;
+#define VMS124 vs_top += 1;
+#define VMV124 vs_check;
+#define VMRV124(a_,b_) vs_top=base; return(a_);
+#define VMR124(a_) VMRV124(a_,0);
+static object L153__IN_GROUP_P__loop(object *base0,object V4334,object V4335)
+;
+#define VMB125
+#define VMS125
+#define VMV125
+#define VMRV125(a_,b_) return(a_);
+#define VMR125(a_) VMRV125(a_,0);
+static object LI154__LOOP_SEQUENCER__loop(object V4348,register object V4349,object V4350,object V4351,object V4352,register object V4353,register object V4354,object V4355,object V4356,object V4357)
+;
+#define VMB126  int8_t  V4425;  object  V4424;  int8_t  V4421;  fixnum  V4420;  object  V4417 ,V4409 ,V4408 ,V4406 ,V4402 ,V4395;
+#define VMS126 register object *sup=vs_top+0;vs_top=sup;
+#define VMV126
+#define VMRV126(a_,b_) return(a_);
+#define VMR126(a_) VMRV126(a_,0);
+static object LI155__LOOP_FOR_ARITHMETIC__loop(object V4431,object V4432,object V4433,object V4434)
+;
+#define VMB127  object  V4437 ,V4436 ,V4435;
+#define VMS127
+#define VMV127
+#define VMRV127(a_,b_) return(a_);
+#define VMR127(a_) VMRV127(a_,0);
+static object LI156__LOOP_SEQUENCE_ELEMENTS_PATH__loop(object V4442,object V4443,object V4444,...)
+;
+#define VMB128  object  V4484 ,V4483 ,V4482 ,V4477 ,V4476;
+#define VMS128 register object *sup=vs_top+0;vs_top=sup;
+#define VMV128
+#define VMRV128(a_,b_) return(a_);
+#define VMR128(a_) VMRV128(a_,0);
+static object LI157__LOOP_HASH_TABLE_ITERATION_PATH__loop(object V4489,object V4490,object V4491,...)
+;
+#define VMB129  object  V4554 ,V4553 ,V4552 ,V4551 ,V4549;  int8_t  V4548;  object  V4545;  int8_t  V4544;  object  V4542 ,V4540 ,V4539 ,V4536 ,V4535 ,V4527;  fixnum  V4519;  object  V4515 ,V4514;
+#define VMS129 register object *sup=vs_top+0;vs_top=sup;
+#define VMV129
+#define VMRV129(a_,b_) return(a_);
+#define VMR129(a_) VMRV129(a_,0);
+static object LI158__LOOP_PACKAGE_SYMBOLS_ITERATION_PATH__loop(object V4559,object V4560,object V4561,...)
+;
+#define VMB130  object  V4605 ,V4604 ,V4603 ,V4602 ,V4601;  fixnum  V4592;  object  V4590;  fixnum  V4589;  object  V4585 ,V4584;
+#define VMS130
+#define VMV130
+#define VMRV130(a_,b_) return(a_);
+#define VMR130(a_) VMRV130(a_,0);
+static object LI159__MAKE_ANSI_LOOP_UNIVERSE__loop(object V4608)
+;
+#define VMB131  object  V4613 ,V4612 ,V4611 ,V4610;
+#define VMS131
+#define VMV131
+#define VMRV131(a_,b_) return(a_);
+#define VMR131(a_) VMRV131(a_,0);
+static object LI160__LOOP_STANDARD_EXPANSION__loop(object V4618,object V4619,object V4620)
+;
+#define VMB132  object  V4625;  fixnum  V4622;
+#define VMS132
+#define VMV132
+#define VMRV132(a_,b_) return(a_);
+#define VMR132(a_) VMRV132(a_,0);
+static object LI161__LOOP__loop(object V4629,object V4630)
+;
+#define VMB133
+#define VMS133
+#define VMV133
+#define VMRV133(a_,b_) return(a_);
+#define VMR133(a_) VMRV133(a_,0);
+#define VM133 0
+#define VM132 0
+#define VM131 0
+#define VM130 0
+#define VM129 0
+#define VM128 0
+#define VM127 0
+#define VM126 0
+#define VM125 0
+#define VM124 1
+#define VM123 1
+#define VM122 0
+#define VM121 0
+#define VM120 0
+#define VM119 0
+#define VM118 0
+#define VM117 0
+#define VM116 0
+#define VM115 0
+#define VM114 0
+#define VM113 0
+#define VM112 0
+#define VM111 1
+#define VM110 0
+#define VM109 0
+#define VM108 0
+#define VM107 0
+#define VM106 0
+#define VM105 0
+#define VM104 0
+#define VM103 0
+#define VM102 0
+#define VM101 0
+#define VM100 0
+#define VM99 0
+#define VM98 0
+#define VM97 1
+#define VM96 0
+#define VM95 0
+#define VM94 0
+#define VM93 0
+#define VM92 0
+#define VM91 0
+#define VM90 0
+#define VM89 0
+#define VM88 0
+#define VM87 0
+#define VM86 0
+#define VM85 0
+#define VM84 0
+#define VM83 0
+#define VM82 0
+#define VM81 0
+#define VM80 0
+#define VM79 0
+#define VM78 0
+#define VM77 0
+#define VM76 0
+#define VM75 0
+#define VM74 5
+#define VM73 0
+#define VM72 0
+#define VM71 0
+#define VM70 0
+#define VM69 0
+#define VM68 0
+#define VM67 0
+#define VM66 0
+#define VM65 0
+#define VM64 0
+#define VM63 0
+#define VM62 0
+#define VM61 0
+#define VM60 0
+#define VM59 0
+#define VM58 0
+#define VM57 0
+#define VM56 0
+#define VM55 0
+#define VM54 0
+#define VM53 4
+#define VM52 0
+#define VM51 0
+#define VM50 1
+#define VM49 0
+#define VM48 0
+#define VM47 0
+#define VM46 0
+#define VM45 0
+#define VM44 0
+#define VM43 2
+#define VM42 0
+#define VM41 0
+#define VM40 3
+#define VM39 0
+#define VM38 0
+#define VM37 0
+#define VM36 0
+#define VM35 0
+#define VM34 0
+#define VM33 0
+#define VM32 0
+#define VM31 0
+#define VM30 0
+#define VM29 0
+#define VM28 0
+#define VM27 0
+#define VM26 0
+#define VM25 0
+#define VM24 0
+#define VM23 0
+#define VM22 0
+#define VM21 0
+#define VM20 0
+#define VM19 0
+#define VM18 0
+#define VM17 0
+#define VM16 0
+#define VM15 0
+#define VM14 0
+#define VM13 0
+#define VM12 0
+#define VM11 0
+#define VM10 0
+#define VM9 0
+#define VM8 0
+#define VM7 0
+#define VM6 0
+#define VM5 0
+#define VM4 0
+#define VM3 4
+#define VM2 0
+#define VM1 0
+static void * VVi[665]={
+#define Cdata VV[664]
+(void *)(LI1__LOOP_COPYLISTA__loop),
+(void *)(LI2__LOOP_GENTEMP__loop),
+(void *)(LI3__LOOP_OPTIMIZATION_QUANTITIES__loop),
+(void *)(LI4__HIDE_VARIABLE_REFERENCES__loop),
+(void *)(LI5__HIDE_VARIABLE_REFERENCE__loop),
+(void *)(LI6__WITH_LOOP_LIST_COLLECTION_HEAD__loop),
+(void *)(LI7__LOOP_COLLECT_RPLACD__loop),
+(void *)(LI8__LOOP_COLLECT_ANSWER__loop),
+(void *)(LI9__MAKE_LOOP_MINIMAX_INTERNAL__loop),
+(void *)(LI10__LOOP_MINIMAX_ANSWER_VARIABLE__loop),
+(void *)(LI11__LOOP_MINIMAX_TYPE__loop),
+(void *)(LI12__LOOP_MINIMAX_TEMP_VARIABLE__loop),
+(void *)(LI13__LOOP_MINIMAX_FLAG_VARIABLE__loop),
+(void *)(LI14__LOOP_MINIMAX_OPERATIONS__loop),
+(void *)(LI15__LOOP_MINIMAX_INFINITY_DATA__loop),
+(void *)(LI16__G5__loop),
+(void *)(LI17__MAKE_LOOP_MINIMAX__loop),
+(void *)(LI18__LOOP_NOTE_MINIMAX_OPERATION__loop),
+(void *)(LI19__WITH_MINIMAX_VALUE__loop),
+(void *)(LI20__LOOP_ACCUMULATE_MINIMAX_VALUE__loop),
+(void *)(LI21__LOOP_TEQUAL__loop),
+(void *)(LI22__LOOP_TASSOC__loop),
+(void *)(LI23__LOOP_TMEMBER__loop),
+(void *)(LI24__LOOP_LOOKUP_KEYWORD__loop),
+(void *)(LI25__LOOP_STORE_TABLE_DATA__loop),
+(void *)(LI26__MAKE_LOOP_UNIVERSE__loop),
+(void *)(LI27__LOOP_UNIVERSE_KEYWORDS__loop),
+(void *)(LI28__LOOP_UNIVERSE_ITERATION_KEYWORDS__loop),
+(void *)(LI29__LOOP_UNIVERSE_FOR_KEYWORDS__loop),
+(void *)(LI30__LOOP_UNIVERSE_PATH_KEYWORDS__loop),
+(void *)(LI31__LOOP_UNIVERSE_TYPE_SYMBOLS__loop),
+(void *)(LI32__LOOP_UNIVERSE_TYPE_KEYWORDS__loop),
+(void *)(LI33__LOOP_UNIVERSE_ANSI__loop),
+(void *)(LI34__LOOP_UNIVERSE_IMPLICIT_FOR_REQUIRED__loop),
+(void *)(LI35__G63__loop),
+(void *)(LI36__PRINT_LOOP_UNIVERSE__loop),
+(void *)(LI37__MAKE_STANDARD_LOOP_UNIVERSE__loop),
+(void *)(LI38__LOOP_MAKE_PSETQ__loop),
+(void *)(LI39__LOOP_MAKE_DESETQ__loop),
+(void *)(LI40__LOOP_REALLY_DESETQ__loop),
+(void *)(LI45__LOOP_CONSTANT_FOLD_IF_POSSIBLE__loop),
+(void *)(LI46__LOOP_CONSTANTP__loop),
+(void *)(LI47__LOOP_CODE_DUPLICATION_THRESHOLD__loop),
+(void *)(LI48__LOOP_BODY__loop),
+(void *)(LI53__DUPLICATABLE_CODE_P__loop),
+(void *)(LI54__DESTRUCTURING_SIZE__loop),
+(void *)(&dlsetjmp),
+(void *)(LI55__ESTIMATE_CODE_SIZE__loop),
+(void *)(LI56__ESTIMATE_CODE_SIZE_1__loop),
+(void *)(LI77__LOOP_CONTEXT__loop),
+(void *)(LI78__LOOP_ERROR__loop),
+(void *)(LI79__LOOP_WARN__loop),
+(void *)(LI82__LOOP_CHECK_DATA_TYPE__loop),
+(void *)(LI83__LOOP_FINISH__loop),
+(void *)(LI84__SUBST_GENSYMS_FOR_NIL__loop),
+(void *)(LI85__LOOP_BUILD_DESTRUCTURING_BINDINGS__loop),
+(void *)(LI86__LOOP_TRANSLATE__loop),
+(void *)(LI87__LOOP_ITERATION_DRIVER__loop),
+(void *)(LI88__LOOP_POP_SOURCE__loop),
+(void *)(LI89__LOOP_GET_COMPOUND_FORM__loop),
+(void *)(LI90__LOOP_GET_PROGN__loop),
+(void *)(LI91__LOOP_GET_FORM__loop),
+(void *)(LI92__LOOP_CONSTRUCT_RETURN__loop),
+(void *)(LI93__LOOP_PSEUDO_BODY__loop),
+(void *)(LI94__LOOP_EMIT_BODY__loop),
+(void *)(LI95__LOOP_EMIT_FINAL_VALUE__loop),
+(void *)(LI96__LOOP_DISALLOW_CONDITIONAL__loop),
+(void *)(LI97__LOOP_DISALLOW_ANONYMOUS_COLLECTORS__loop),
+(void *)(LI98__LOOP_DISALLOW_AGGREGATE_BOOLEANS__loop),
+(void *)(LI99__LOOP_TYPED_INIT__loop),
+(void *)(LI100__LOOP_OPTIONAL_TYPE__loop),
+(void *)(LI105__LOOP_BIND_BLOCK__loop),
+(void *)(LI106__LOOP_VARIABLE_P__loop),
+(void *)(LI107__LOOP_MAKE_VARIABLE__loop),
+(void *)(LI108__LOOP_MAKE_ITERATION_VARIABLE__loop),
+(void *)(LI109__LOOP_DECLARE_VARIABLE__loop),
+(void *)(LI110__LOOP_MAYBE_BIND_FORM__loop),
+(void *)(LI111__LOOP_DO_IF__loop),
+(void *)(LI112__LOOP_DO_INITIALLY__loop),
+(void *)(LI113__LOOP_DO_FINALLY__loop),
+(void *)(LI114__LOOP_DO_DO__loop),
+(void *)(LI115__LOOP_DO_NAMED__loop),
+(void *)(LI116__LOOP_DO_RETURN__loop),
+(void *)(LI117__MAKE_LOOP_COLLECTOR__loop),
+(void *)(LI118__LOOP_COLLECTOR_NAME__loop),
+(void *)(LI119__LOOP_COLLECTOR_CLASS__loop),
+(void *)(LI120__LOOP_COLLECTOR_HISTORY__loop),
+(void *)(LI121__LOOP_COLLECTOR_TEMPVARS__loop),
+(void *)(LI122__LOOP_COLLECTOR_DTYPE__loop),
+(void *)(LI123__LOOP_COLLECTOR_DATA__loop),
+(void *)(LI124__G683__loop),
+(void *)(LI125__LOOP_GET_COLLECTION_INFO__loop),
+(void *)(LI126__LOOP_LIST_COLLECTION__loop),
+(void *)(LI127__LOOP_SUM_COLLECTION__loop),
+(void *)(LI128__LOOP_MAXMIN_COLLECTION__loop),
+(void *)(LI129__LOOP_DO_ALWAYS__loop),
+(void *)(LI130__LOOP_DO_THEREIS__loop),
+(void *)(LI131__LOOP_DO_WHILE__loop),
+(void *)(LI132__LOOP_DO_WITH__loop),
+(void *)(LI133__LOOP_HACK_ITERATION__loop),
+(void *)(LI134__LOOP_DO_FOR__loop),
+(void *)(LI135__LOOP_DO_REPEAT__loop),
+(void *)(LI136__LOOP_WHEN_IT_VARIABLE__loop),
+(void *)(LI137__LOOP_ANSI_FOR_EQUALS__loop),
+(void *)(LI138__LOOP_FOR_ACROSS__loop),
+(void *)(LI139__LOOP_LIST_STEP__loop),
+(void *)(LI140__LOOP_FOR_ON__loop),
+(void *)(LI141__LOOP_FOR_IN__loop),
+(void *)(LI142__MAKE_LOOP_PATH__loop),
+(void *)(LI143__LOOP_PATH_NAMES__loop),
+(void *)(LI144__LOOP_PATH_PREPOSITION_GROUPS__loop),
+(void *)(LI145__LOOP_PATH_INCLUSIVE_PERMITTED__loop),
+(void *)(LI146__LOOP_PATH_FUNCTION__loop),
+(void *)(LI147__LOOP_PATH_USER_DATA__loop),
+(void *)(LI148__G792__loop),
+(void *)(LI149__ADD_LOOP_PATH__loop),
+(void *)(LI150__LOOP_FOR_BEING__loop),
+(void *)(&dlmemmove),
+(void *)(LI151__NAMED_VARIABLE__loop),
+(void *)(LI152__LOOP_COLLECT_PREPOSITIONAL_PHRASES__loop),
+(void *)(LI154__LOOP_SEQUENCER__loop),
+(void *)(LI155__LOOP_FOR_ARITHMETIC__loop),
+(void *)(LI156__LOOP_SEQUENCE_ELEMENTS_PATH__loop),
+(void *)(LI157__LOOP_HASH_TABLE_ITERATION_PATH__loop),
+(void *)(LI158__LOOP_PACKAGE_SYMBOLS_ITERATION_PATH__loop),
+(void *)(LI159__MAKE_ANSI_LOOP_UNIVERSE__loop),
+(void *)(LI160__LOOP_STANDARD_EXPANSION__loop),
+(void *)(LI161__LOOP__loop)
+};
+#define VV (VVi)
+static object  LnkTLI250(object,...);
+static object  (*LnkLI250)() = (object (*)()) LnkTLI250;
+static object  LnkTLI249(object,...);
+static object  (*LnkLI249)() = (object (*)()) LnkTLI249;
+static object  LnkTLI248(object,...);
+static object  (*LnkLI248)() = (object (*)()) LnkTLI248;
+static object  LnkTLI247(object,...);
+static object  (*LnkLI247)() = (object (*)()) LnkTLI247;
+static object  LnkTLI246(object,...);
+static object  (*LnkLI246)() = (object (*)()) LnkTLI246;
+static object  LnkTLI245(object,...);
+static object  (*LnkLI245)() = (object (*)()) LnkTLI245;
+static object  LnkTLI244(object,...);
+static object  (*LnkLI244)() = (object (*)()) LnkTLI244;
+static object  LnkTLI243(object,...);
+static object  (*LnkLI243)() = (object (*)()) LnkTLI243;
+static object  LnkTLI242(object,...);
+static object  (*LnkLI242)() = (object (*)()) LnkTLI242;
+static object  LnkTLI241(object,...);
+static object  (*LnkLI241)() = (object (*)()) LnkTLI241;
+static object  LnkTLI240(object,...);
+static object  (*LnkLI240)() = (object (*)()) LnkTLI240;
+static object  LnkTLI239(object,...);
+static object  (*LnkLI239)() = (object (*)()) LnkTLI239;
+static object  LnkTLI238(object,...);
+static object  (*LnkLI238)() = (object (*)()) LnkTLI238;
+static object  LnkTLI237(object,...);
+static object  (*LnkLI237)() = (object (*)()) LnkTLI237;
+static object  LnkTLI236(object,...);
+static object  (*LnkLI236)() = (object (*)()) LnkTLI236;
+static object  LnkTLI235(object,...);
+static object  (*LnkLI235)() = (object (*)()) LnkTLI235;
+static object  LnkTLI234();
+static object  (*LnkLI234)() = LnkTLI234;
+static object  LnkTLI233(object,...);
+static object  (*LnkLI233)() = (object (*)()) LnkTLI233;
+static object  LnkTLI232(object,...);
+static object  (*LnkLI232)() = (object (*)()) LnkTLI232;
+static object  LnkTLI231(object,...);
+static object  (*LnkLI231)() = (object (*)()) LnkTLI231;
+static object  LnkTLI230(object,...);
+static object  (*LnkLI230)() = (object (*)()) LnkTLI230;
+static object  LnkTLI229(object,...);
+static object  (*LnkLI229)() = (object (*)()) LnkTLI229;
+static object  LnkTLI228(object,...);
+static object  (*LnkLI228)() = (object (*)()) LnkTLI228;
+static object  LnkTLI227(object,...);
+static object  (*LnkLI227)() = (object (*)()) LnkTLI227;
+static object  LnkTLI226();
+static object  (*LnkLI226)() = LnkTLI226;
+static object  LnkTLI225(object,...);
+static object  (*LnkLI225)() = (object (*)()) LnkTLI225;
+static object  LnkTLI224(object,...);
+static object  (*LnkLI224)() = (object (*)()) LnkTLI224;
+static object  LnkTLI223();
+static object  (*LnkLI223)() = LnkTLI223;
+static object  LnkTLI222(object,...);
+static object  (*LnkLI222)() = (object (*)()) LnkTLI222;
+static object  LnkTLI221();
+static object  (*LnkLI221)() = LnkTLI221;
+static object  LnkTLI220(object,...);
+static object  (*LnkLI220)() = (object (*)()) LnkTLI220;
+static object  LnkTLI219(object,...);
+static object  (*LnkLI219)() = (object (*)()) LnkTLI219;
+static object  LnkTLI218(object,...);
+static object  (*LnkLI218)() = (object (*)()) LnkTLI218;
+static object  LnkTLI217(object,...);
+static object  (*LnkLI217)() = (object (*)()) LnkTLI217;
+static object  LnkTLI216(object,...);
+static object  (*LnkLI216)() = (object (*)()) LnkTLI216;
+static object  LnkTLI215(object,...);
+static object  (*LnkLI215)() = (object (*)()) LnkTLI215;
+static object  LnkTLI214(object,...);
+static object  (*LnkLI214)() = (object (*)()) LnkTLI214;
+static object  LnkTLI213(object,...);
+static object  (*LnkLI213)() = (object (*)()) LnkTLI213;
+static object  LnkTLI212();
+static object  (*LnkLI212)() = LnkTLI212;
+static object  LnkTLI211();
+static object  (*LnkLI211)() = LnkTLI211;
+static object  LnkTLI210(object,...);
+static object  (*LnkLI210)() = (object (*)()) LnkTLI210;
+static object  LnkTLI209(object,...);
+static object  (*LnkLI209)() = (object (*)()) LnkTLI209;
+static object  LnkTLI208(object,...);
+static object  (*LnkLI208)() = (object (*)()) LnkTLI208;
+static object  LnkTLI207();
+static object  (*LnkLI207)() = LnkTLI207;
+static object  LnkTLI206();
+static object  (*LnkLI206)() = LnkTLI206;
+static object  LnkTLI205();
+static object  (*LnkLI205)() = LnkTLI205;
+static object  LnkTLI204(object,...);
+static object  (*LnkLI204)() = (object (*)()) LnkTLI204;
+static object  LnkTLI203(object,...);
+static object  (*LnkLI203)() = (object (*)()) LnkTLI203;
+static object  LnkTLI202(object,...);
+static object  (*LnkLI202)() = (object (*)()) LnkTLI202;
+static object  LnkTLI201(object,...);
+static object  (*LnkLI201)() = (object (*)()) LnkTLI201;
+static object  LnkTLI200(object,...);
+static object  (*LnkLI200)() = (object (*)()) LnkTLI200;
+static object  LnkTLI199(object,...);
+static object  (*LnkLI199)() = (object (*)()) LnkTLI199;
+static object  LnkTLI198(object,...);
+static object  (*LnkLI198)() = (object (*)()) LnkTLI198;
+static object  LnkTLI197(object,...);
+static object  (*LnkLI197)() = (object (*)()) LnkTLI197;
+static object  LnkTLI196();
+static object  (*LnkLI196)() = LnkTLI196;
+static object  LnkTLI195(object,...);
+static object  (*LnkLI195)() = (object (*)()) LnkTLI195;
+static object  LnkTLI194(object,...);
+static object  (*LnkLI194)() = (object (*)()) LnkTLI194;
+static object  LnkTLI193(object,...);
+static object  (*LnkLI193)() = (object (*)()) LnkTLI193;
+static object  LnkTLI192(object,...);
+static object  (*LnkLI192)() = (object (*)()) LnkTLI192;
+static object  LnkTLI191(object,...);
+static object  (*LnkLI191)() = (object (*)()) LnkTLI191;
+static fixnum  LnkTLI190(object,...);
+static fixnum  (*LnkLI190)() = (fixnum (*)()) LnkTLI190;
+static object  LnkTLI189(object,...);
+static object  (*LnkLI189)() = (object (*)()) LnkTLI189;
+static object  LnkTLI188(object,...);
+static object  (*LnkLI188)() = (object (*)()) LnkTLI188;
+static object  LnkTLI187(object,...);
+static object  (*LnkLI187)() = (object (*)()) LnkTLI187;
+static fixnum  LnkTLI186(object,...);
+static fixnum  (*LnkLI186)() = (fixnum (*)()) LnkTLI186;
+static object  LnkTLI185(object,...);
+static object  (*LnkLI185)() = (object (*)()) LnkTLI185;
+static object  LnkTLI184(object,...);
+static object  (*LnkLI184)() = (object (*)()) LnkTLI184;
+static object  LnkTLI183(object,...);
+static object  (*LnkLI183)() = (object (*)()) LnkTLI183;
+static object  LnkTLI182(object,...);
+static object  (*LnkLI182)() = (object (*)()) LnkTLI182;
+static object  LnkTLI181(object,...);
+static object  (*LnkLI181)() = (object (*)()) LnkTLI181;
+static object  LnkTLI180(object,...);
+static object  (*LnkLI180)() = (object (*)()) LnkTLI180;
+static fixnum  LnkTLI179(object,...);
+static fixnum  (*LnkLI179)() = (fixnum (*)()) LnkTLI179;
+static object  LnkTLI178(object,...);
+static object  (*LnkLI178)() = (object (*)()) LnkTLI178;
+static object  LnkTLI177(object,...);
+static object  (*LnkLI177)() = (object (*)()) LnkTLI177;
+static object  LnkTLI176(object,...);
+static object  (*LnkLI176)() = (object (*)()) LnkTLI176;
+static fixnum  LnkTLI175(object,...);
+static fixnum  (*LnkLI175)() = (fixnum (*)()) LnkTLI175;
+static object  LnkTLI174(object,...);
+static object  (*LnkLI174)() = (object (*)()) LnkTLI174;
+static object  LnkTLI173(object,...);
+static object  (*LnkLI173)() = (object (*)()) LnkTLI173;
+static object  LnkTLI172(object,...);
+static object  (*LnkLI172)() = (object (*)()) LnkTLI172;
+static object  LnkTLI171(object,...);
+static object  (*LnkLI171)() = (object (*)()) LnkTLI171;
+static object  LnkTLI170(object,...);
+static object  (*LnkLI170)() = (object (*)()) LnkTLI170;
+static object  LnkTLI169(object,...);
+static object  (*LnkLI169)() = (object (*)()) LnkTLI169;
+static object  LnkTLI168(object,...);
+static object  (*LnkLI168)() = (object (*)()) LnkTLI168;
+static object  LnkTLI167(object,...);
+static object  (*LnkLI167)() = (object (*)()) LnkTLI167;
+static object  LnkTLI166(object,...);
+static object  (*LnkLI166)() = (object (*)()) LnkTLI166;
+static object  LnkTLI165(object,...);
+static object  (*LnkLI165)() = (object (*)()) LnkTLI165;
+static object  LnkTLI164(object,...);
+static object  (*LnkLI164)() = (object (*)()) LnkTLI164;
+static object  LnkTLI163(object,...);
+static object  (*LnkLI163)() = (object (*)()) LnkTLI163;
+static object  LnkTLI162(object,...);
+static object  (*LnkLI162)() = (object (*)()) LnkTLI162;
--- /dev/null
+++ gcl27-2.7.0/mod/gcl_make_defpackage.c
@@ -0,0 +1,2000 @@
+
+#include "cmpinclude.h"
+#include "gcl_make_defpackage.h"
+void init_gcl_make_defpackage(){do_init((void *)VV);}
+/*	local entry for function SYSTEM::MAKE-DEFPACKAGE-FORM	*/
+
+static object LI1__MAKE_DEFPACKAGE_FORM__make_defpackage(object V2)
+{	 VMB1 VMS1 VMV1
+	{register object V3;
+	V3= (fcall.fun=((object)VV[0])->s.s_gfdef,/* COMMON-LISP::FIND-PACKAGE */(*LnkLI2)((V2)));
+	{object V4;
+	object V5;
+	register object V6;
+	object V7;
+	register object V8;
+	object V9;
+	register object V10;
+	register object V11;
+	object V12;
+	object V13;
+	{object V14;
+	V14= (/* SYSTEM::COERCE-TO-PACKAGE */(*LnkLI3)((V3)));
+	{fixnum V15;
+	V15= ((fixnum)V14);
+	V4= ((object*)V15)[(fixnum)1];}}
+	V5= (fcall.fun=((object)VV[2])->s.s_gfdef,fcall.valp=(fixnum)0,fcall.argd=1,/* COMMON-LISP::PACKAGE-NICKNAMES */(*LnkLI4)((V3)));
+	V6= (fcall.fun=((object)VV[3])->s.s_gfdef,fcall.valp=(fixnum)0,fcall.argd=1,/* COMMON-LISP::PACKAGE-USE-LIST */(*LnkLI5)((V3)));
+	{object V16;
+	register object V17;
+	V16= Cnil;
+	V17= Cnil;
+	{register object V18;
+	V18= (V6);
+	goto T11;
+T11:;
+	if(((V18))==Cnil){
+	goto T13;
+	}
+	{object V20;
+	V20= (V18)->c.c_car;
+	{object V21;
+	{object V23;
+	V23= (/* SYSTEM::COERCE-TO-PACKAGE */(*LnkLI3)((V20)));
+	{fixnum V24;
+	V24= ((fixnum)V23);
+	V22= ((object*)V24)[(fixnum)1];}}
+	V21= make_cons((V22),Cnil);
+	if(((V17))==Cnil){
+	goto T23;
+	}
+	{object V25;
+	V25= (((V17))->c.c_cdr=((V21)),((V17)));
+	V17= V25->c.c_cdr;
+	goto T22;
+	}
+	goto T23;
+T23:;
+	V16= (V21);
+	V17= (V16);
+	goto T22;
+T22:;}}
+	{object V26;
+	V26= (V18)->c.c_cdr;
+	V18= (V26);
+	goto T11;
+	}
+	goto T13;
+T13:;
+	goto T9;
+	}
+	goto T9;
+T9:;
+	V7= (V16);}
+	V8= Cnil;
+	V9= (fcall.fun=((object)VV[4])->s.s_gfdef,fcall.valp=(fixnum)0,fcall.argd=1,/* COMMON-LISP::PACKAGE-SHADOWING-SYMBOLS */(*LnkLI6)((V3)));
+	V10= Cnil;
+	V11= Cnil;
+	V12= Cnil;
+	V13= Cnil;
+	{register object V28;
+	register object V29;
+	register object V30;
+	register object V31;
+	register fixnum V32;
+	register fixnum V33;
+	register object V34;
+	register object V35;
+	V28= (V3);
+	V29= Cnil;
+	V30= Cnil;
+	V31= Cnil;
+	V32= 0;
+	V33= 0;
+	V34= Cnil;
+	V35= Cnil;
+	{register object V36;
+	register object V37;
+	V36= Cnil;
+	V37= Cnil;
+	goto T36;
+T36:;
+	register object  V39;
+	object V38[3];
+	#define V40 V38[0]
+	
+	{
+	{object V41;
+	goto T51;
+T51:;
+	if(!(((V30))==((V29)))){
+	goto T56;
+	}
+	if(((V34))==Cnil){
+	goto T53;
+	}
+	goto T55;
+	
+	goto T56;
+T56:;
+	goto T53;
+	
+	goto T55;
+T55:;
+	{object V42;
+	V42= (V34);
+	{object V43;
+	V43= (V34)->c.c_car;
+	V34= (V34)->c.c_cdr;}
+	V41= (V42);
+	goto T49;
+	}
+	goto T53;
+T53:;
+	if(!((V32)<(V33))){
+	goto T63;
+	}
+	{fixnum V47;
+	V47= V32;
+	{fixnum V48;
+	{fixnum V49;
+	V49= ((fixnum)(V30));
+	V48= ((fixnum*)V49)[(fixnum)7];}
+	V34= ((object*)V48)[V47];}}
+	V35= ((object)VV[5]);
+	{fixnum V50;
+	V50= V32;
+	{fixnum V51;
+	V51= (V50)+(1);
+	V32= V51;}}
+	goto T51;
+	
+	goto T63;
+T63:;
+	if(((V31))==Cnil){
+	goto T77;
+	}
+	V32= 0;
+	V53= tp2((V31));
+	if(!((V53)==(0))){
+	goto T88;
+	}
+	goto T87;
+	
+	goto T88;
+T88:;
+	goto T85;
+	
+	goto T87;
+T87:;
+	{object V54;
+	V54= (V31)->c.c_car;
+	V31= (V31)->c.c_cdr;
+	V30= (V54);
+	goto T84;
+	}
+	goto T85;
+T85:;
+	{object V57;
+	V57= (V31);
+	V31= Cnil;
+	V30= (V57);}
+	goto T84;
+T84:;
+	register object  V59;
+	object V58[31];
+	#define V60 V58[0]
+	
+	{
+	V59= (fcall.fun=((object)VV[6])->s.s_gfdef,fcall.valp=(fixnum)V58,fcall.argd=1,/* SYSTEM::PACKAGE-SIZE */(*LnkLI7)((V30)));
+	
+	for (vs_top=vs_top<V58? V58: vs_top;vs_top<V58+1;) *vs_top++=Cnil;
+	vs_top=sup;
+	V33= fix((V59));
+	#undef V60
+	
+	}
+	goto T51;
+	
+	goto T77;
+T77:;
+	if(((V28))==Cnil){
+	goto T104;
+	}
+	V63= tp2((V28));
+	if(!((V63)==(0))){
+	goto T113;
+	}
+	goto T112;
+	
+	goto T113;
+T113:;
+	goto T110;
+	
+	goto T112;
+T112:;
+	{object V64;
+	V64= (V28)->c.c_car;
+	V28= (V28)->c.c_cdr;
+	V61= (V64);
+	goto T109;
+	}
+	goto T110;
+T110:;
+	{object V67;
+	V67= (V28);
+	V28= Cnil;
+	V61= (V67);}
+	goto T109;
+T109:;
+	V29= (/* SYSTEM::COERCE-TO-PACKAGE */(*LnkLI3)((V61)));
+	V31= (V29);
+	goto T51;
+	
+	goto T104;
+T104:;
+	V41= Cnil;
+	goto T49;
+	
+	goto T49;
+T49:;
+	V68= V41->c.c_car;
+	V39= ({object  _t0=(V41);object  _t1=(V68);object  _t2=(V35);object  _t3=(V29);
+	V40= (_t1);
+	(void)((_t2));
+	(void)((_t3));_t0;});
+	
+	vs_top=sup;}
+	V36= (V39);
+	V37= (V40);
+	if(((V36))==Cnil){
+	goto T43;
+	}
+	#undef V40
+	
+	}
+	goto T41;
+	
+	goto T43;
+T43:;
+	goto T38;
+	
+	goto T41;
+T41:;
+	{object V69;
+	{fixnum V70;
+	V70= ((fixnum)V37);
+	V69= ((object*)V70)[(fixnum)3];}
+	V8= make_cons((V69),(V8));}
+	goto T36;
+	
+	goto T38;
+T38:;
+	goto T32;
+	}}
+	goto T32;
+T32:;
+	{register object V71;
+	register object V72;
+	register object V73;
+	register object V74;
+	register fixnum V75;
+	register fixnum V76;
+	register fixnum V77;
+	register fixnum V78;
+	register object V79;
+	register object V80;
+	V71= (V3);
+	V72= Cnil;
+	V73= Cnil;
+	V74= Cnil;
+	V75= 0;
+	V76= 0;
+	V77= 0;
+	V78= 0;
+	V79= Cnil;
+	V80= Cnil;
+	{register object V81;
+	register object V82;
+	V81= Cnil;
+	V82= Cnil;
+	goto T139;
+T139:;
+	register object  V84;
+	object V83[3];
+	#define V85 V83[0]
+	
+	{
+	{object V86;
+	goto T154;
+T154:;
+	if(!(((V73))==((V72)))){
+	goto T159;
+	}
+	if(((V79))==Cnil){
+	goto T156;
+	}
+	goto T158;
+	
+	goto T159;
+T159:;
+	goto T156;
+	
+	goto T158;
+T158:;
+	{object V87;
+	V87= (V79);
+	{object V88;
+	V88= (V79)->c.c_car;
+	V79= (V79)->c.c_cdr;}
+	V86= (V87);
+	goto T152;
+	}
+	goto T156;
+T156:;
+	if(!(((V73))==((V72)))){
+	goto T172;
+	}
+	goto T169;
+	
+	goto T172;
+T172:;
+	if(((V79))==Cnil){
+	goto T166;
+	}
+	goto T168;
+	
+	goto T169;
+T169:;
+	goto T166;
+	
+	goto T168;
+T168:;
+	{object V91;
+	register object V92;
+	fixnum V93;
+	{object V94;
+	V94= (V79);
+	{object V95;
+	V95= (V79)->c.c_car;
+	V79= (V79)->c.c_cdr;}
+	V91= (V94);}
+	{object V98;
+	V98= V91->c.c_car;
+	{fixnum V99;
+	V99= ((fixnum)V98);
+	V92= ((object*)V99)[(fixnum)3];}}
+	V93= (fcall.fun=((object)VV[7])->s.s_gfdef,/* SYSTEM::PACK-HASH */(*LnkLI8)((V92)));
+	{object V100;
+	{fixnum V102;
+	V103= (fcall.fun=((object)VV[8])->s.s_gfdef,/* SYSTEM::PACKAGE-INTERNAL_SIZE */(*LnkLI9)((V72)));
+	V102= ({register fixnum _t=(V93)%(V103);((V103)<0 && _t<=0) || ((V103)>0 && _t>=0) ? _t : _t + (V103);});
+	{fixnum V104;
+	{fixnum V105;
+	V105= ((fixnum)(V72));
+	V104= ((fixnum*)V105)[(fixnum)6];}
+	V100= ((object*)V104)[V102];}}
+	{register object V106;
+	V106= (V100);
+	goto T197;
+T197:;
+	if(((V106))==Cnil){
+	goto T199;
+	}
+	{object V108;
+	V108= (V106)->c.c_car;
+	{register object V109;
+	register fixnum V110;
+	register fixnum V111;
+	{fixnum V112;
+	V112= ((fixnum)V108);
+	V109= ((object*)V112)[(fixnum)3];}
+	V113= tp4(V92);
+	switch(V113){
+	case 8:
+	goto T217;
+T217:;
+	{fixnum V115;
+	{fixnum V116;
+	V116= ((fixnum)V92);
+	V115= ((uchar*)V116)[(fixnum)2];}
+	V114= (V115&(fixnum)1);}
+	if(!((V114)==(0))){
+	goto T219;
+	}
+	goto T212;
+	
+	goto T219;
+T219:;
+	goto T214;
+	
+	default:
+	goto T218;
+T218:;
+	goto T212;
+	}
+	goto T212;
+	
+	goto T214;
+T214:;
+	{fixnum V117;
+	{fixnum V118;
+	V118= ((fixnum)V92);
+	V117= ((uint*)V118)[(fixnum)4];}
+	V110= (V117&(fixnum)268435455);
+	goto T211;
+	}
+	goto T212;
+T212:;
+	{fixnum V119;
+	{fixnum V120;
+	V120= ((fixnum)V92);
+	V119= ((uint*)V120)[(fixnum)1];}
+	V110= (V119>>(fixnum)4);}
+	goto T211;
+T211:;
+	V121= tp4(V109);
+	switch(V121){
+	case 8:
+	goto T235;
+T235:;
+	{fixnum V123;
+	{fixnum V124;
+	V124= ((fixnum)V109);
+	V123= ((uchar*)V124)[(fixnum)2];}
+	V122= (V123&(fixnum)1);}
+	if(!((V122)==(0))){
+	goto T237;
+	}
+	goto T230;
+	
+	goto T237;
+T237:;
+	goto T232;
+	
+	default:
+	goto T236;
+T236:;
+	goto T230;
+	}
+	goto T230;
+	
+	goto T232;
+T232:;
+	{fixnum V125;
+	{fixnum V126;
+	V126= ((fixnum)V109);
+	V125= ((uint*)V126)[(fixnum)4];}
+	V111= (V125&(fixnum)268435455);
+	goto T229;
+	}
+	goto T230;
+T230:;
+	{fixnum V127;
+	{fixnum V128;
+	V128= ((fixnum)V109);
+	V127= ((uint*)V128)[(fixnum)1];}
+	V111= (V127>>(fixnum)4);}
+	goto T229;
+T229:;
+	{register fixnum V129;
+	register fixnum V130;
+	V129= 0;
+	V130= 0;
+	goto T250;
+T250:;
+	if(!((V129)>=(V110))){
+	goto T257;
+	}
+	goto T256;
+	
+	goto T257;
+T257:;
+	if(!((V130)>=(V111))){
+	goto T260;
+	}
+	goto T256;
+	
+	goto T260;
+T260:;
+	{fixnum V131;
+	fixnum V132;
+	{fixnum V133;
+	V133= V129;
+	{fixnum V134;
+	{fixnum V135;
+	V135= ((fixnum)V92);
+	V134= ((fixnum*)V135)[(fixnum)1];}
+	V131= ((uchar*)V134)[V133];}}
+	{fixnum V136;
+	V136= V130;
+	{fixnum V137;
+	{fixnum V138;
+	V138= ((fixnum)V109);
+	V137= ((fixnum*)V138)[(fixnum)1];}
+	V132= ((uchar*)V137)[V136];}}
+	if(!((V131)==(V132))){
+	goto T263;
+	}}
+	goto T255;
+	
+	goto T263;
+T263:;
+	goto T256;
+T256:;
+	goto T252;
+	
+	goto T255;
+T255:;
+	{fixnum V139;
+	fixnum V140;
+	{fixnum V141;
+	V141= V129;
+	{fixnum V142;
+	V142= (V141)+(1);
+	V139= V142;}}
+	{fixnum V143;
+	V143= V130;
+	{fixnum V144;
+	V144= (V143)+(1);
+	V140= V144;}}
+	V129= V139;
+	V130= V140;}
+	goto T250;
+	
+	goto T252;
+T252:;
+	if(!((V129)>=(V110))){
+	goto T285;
+	}
+	if(!((V130)>=(V111))){
+	goto T207;
+	}
+	goto T208;
+	
+	goto T285;
+T285:;
+	goto T207;
+	}}
+	goto T208;
+T208:;
+	goto T205;
+	
+	goto T207;
+T207:;
+	goto T203;
+	}
+	goto T205;
+T205:;
+	goto T185;
+	
+	goto T203;
+T203:;
+	{object V145;
+	V145= (V106)->c.c_cdr;
+	V106= (V145);
+	goto T197;
+	}
+	goto T199;
+T199:;
+	goto T195;
+	}
+	goto T195;
+T195:;
+	if(((V100))==Cnil){
+	goto T193;
+	}
+	goto T190;
+	
+	goto T193;
+T193:;
+	goto T183;
+	
+	goto T190;
+T190:;
+	goto T183;
+	}
+	goto T185;
+T185:;
+	goto T154;
+	
+	goto T183;
+T183:;
+	{object V147;
+	{fixnum V149;
+	V150= (fcall.fun=((object)VV[9])->s.s_gfdef,/* SYSTEM::PACKAGE-EXTERNAL_SIZE */(*LnkLI10)((V72)));
+	V149= ({register fixnum _t=(V93)%(V150);((V150)<0 && _t<=0) || ((V150)>0 && _t>=0) ? _t : _t + (V150);});
+	{fixnum V151;
+	{fixnum V152;
+	V152= ((fixnum)(V72));
+	V151= ((fixnum*)V152)[(fixnum)7];}
+	V147= ((object*)V151)[V149];}}
+	{register object V153;
+	V153= (V147);
+	goto T305;
+T305:;
+	if(((V153))==Cnil){
+	goto T307;
+	}
+	{object V155;
+	V155= (V153)->c.c_car;
+	{register object V156;
+	register fixnum V157;
+	register fixnum V158;
+	{fixnum V159;
+	V159= ((fixnum)V155);
+	V156= ((object*)V159)[(fixnum)3];}
+	V160= tp4(V92);
+	switch(V160){
+	case 8:
+	goto T325;
+T325:;
+	{fixnum V162;
+	{fixnum V163;
+	V163= ((fixnum)V92);
+	V162= ((uchar*)V163)[(fixnum)2];}
+	V161= (V162&(fixnum)1);}
+	if(!((V161)==(0))){
+	goto T327;
+	}
+	goto T320;
+	
+	goto T327;
+T327:;
+	goto T322;
+	
+	default:
+	goto T326;
+T326:;
+	goto T320;
+	}
+	goto T320;
+	
+	goto T322;
+T322:;
+	{fixnum V164;
+	{fixnum V165;
+	V165= ((fixnum)V92);
+	V164= ((uint*)V165)[(fixnum)4];}
+	V157= (V164&(fixnum)268435455);
+	goto T319;
+	}
+	goto T320;
+T320:;
+	{fixnum V166;
+	{fixnum V167;
+	V167= ((fixnum)V92);
+	V166= ((uint*)V167)[(fixnum)1];}
+	V157= (V166>>(fixnum)4);}
+	goto T319;
+T319:;
+	V168= tp4(V156);
+	switch(V168){
+	case 8:
+	goto T343;
+T343:;
+	{fixnum V170;
+	{fixnum V171;
+	V171= ((fixnum)V156);
+	V170= ((uchar*)V171)[(fixnum)2];}
+	V169= (V170&(fixnum)1);}
+	if(!((V169)==(0))){
+	goto T345;
+	}
+	goto T338;
+	
+	goto T345;
+T345:;
+	goto T340;
+	
+	default:
+	goto T344;
+T344:;
+	goto T338;
+	}
+	goto T338;
+	
+	goto T340;
+T340:;
+	{fixnum V172;
+	{fixnum V173;
+	V173= ((fixnum)V156);
+	V172= ((uint*)V173)[(fixnum)4];}
+	V158= (V172&(fixnum)268435455);
+	goto T337;
+	}
+	goto T338;
+T338:;
+	{fixnum V174;
+	{fixnum V175;
+	V175= ((fixnum)V156);
+	V174= ((uint*)V175)[(fixnum)1];}
+	V158= (V174>>(fixnum)4);}
+	goto T337;
+T337:;
+	{register fixnum V176;
+	register fixnum V177;
+	V176= 0;
+	V177= 0;
+	goto T358;
+T358:;
+	if(!((V176)>=(V157))){
+	goto T365;
+	}
+	goto T364;
+	
+	goto T365;
+T365:;
+	if(!((V177)>=(V158))){
+	goto T368;
+	}
+	goto T364;
+	
+	goto T368;
+T368:;
+	{fixnum V178;
+	fixnum V179;
+	{fixnum V180;
+	V180= V176;
+	{fixnum V181;
+	{fixnum V182;
+	V182= ((fixnum)V92);
+	V181= ((fixnum*)V182)[(fixnum)1];}
+	V178= ((uchar*)V181)[V180];}}
+	{fixnum V183;
+	V183= V177;
+	{fixnum V184;
+	{fixnum V185;
+	V185= ((fixnum)V156);
+	V184= ((fixnum*)V185)[(fixnum)1];}
+	V179= ((uchar*)V184)[V183];}}
+	if(!((V178)==(V179))){
+	goto T371;
+	}}
+	goto T363;
+	
+	goto T371;
+T371:;
+	goto T364;
+T364:;
+	goto T360;
+	
+	goto T363;
+T363:;
+	{fixnum V186;
+	fixnum V187;
+	{fixnum V188;
+	V188= V176;
+	{fixnum V189;
+	V189= (V188)+(1);
+	V186= V189;}}
+	{fixnum V190;
+	V190= V177;
+	{fixnum V191;
+	V191= (V190)+(1);
+	V187= V191;}}
+	V176= V186;
+	V177= V187;}
+	goto T358;
+	
+	goto T360;
+T360:;
+	if(!((V176)>=(V157))){
+	goto T393;
+	}
+	if(!((V177)>=(V158))){
+	goto T315;
+	}
+	goto T316;
+	
+	goto T393;
+T393:;
+	goto T315;
+	}}
+	goto T316;
+T316:;
+	goto T313;
+	
+	goto T315;
+T315:;
+	goto T311;
+	}
+	goto T313;
+T313:;
+	goto T293;
+	
+	goto T311;
+T311:;
+	{object V192;
+	V192= (V153)->c.c_cdr;
+	V153= (V192);
+	goto T305;
+	}
+	goto T307;
+T307:;
+	goto T303;
+	}
+	goto T303;
+T303:;
+	if(((V147))==Cnil){
+	goto T301;
+	}
+	goto T298;
+	
+	goto T301;
+T301:;
+	goto T291;
+	
+	goto T298;
+T298:;
+	goto T291;
+	}
+	goto T293;
+T293:;
+	goto T154;
+	
+	goto T291;
+T291:;
+	V80= ((object)VV[10]);
+	V86= (V91);
+	goto T152;
+	}
+	goto T166;
+T166:;
+	if(!(((V73))==((V72)))){
+	goto T404;
+	}
+	if(!((V75)<(V77))){
+	goto T401;
+	}
+	goto T403;
+	
+	goto T404;
+T404:;
+	goto T401;
+	
+	goto T403;
+T403:;
+	{fixnum V195;
+	V195= V75;
+	{fixnum V196;
+	{fixnum V197;
+	V197= ((fixnum)(V73));
+	V196= ((fixnum*)V197)[(fixnum)6];}
+	V79= ((object*)V196)[V195];}}
+	V80= ((object)VV[11]);
+	{fixnum V198;
+	V198= V75;
+	{fixnum V199;
+	V199= (V198)+(1);
+	V75= V199;}}
+	goto T154;
+	
+	goto T401;
+T401:;
+	if(!((V76)<(V78))){
+	goto T418;
+	}
+	{fixnum V201;
+	V201= V76;
+	{fixnum V202;
+	{fixnum V203;
+	V203= ((fixnum)(V73));
+	V202= ((fixnum*)V203)[(fixnum)7];}
+	V79= ((object*)V202)[V201];}}
+	V80= ((object)VV[12]);
+	{fixnum V204;
+	V204= V76;
+	{fixnum V205;
+	V205= (V204)+(1);
+	V76= V205;}}
+	goto T154;
+	
+	goto T418;
+T418:;
+	if(((V74))==Cnil){
+	goto T432;
+	}
+	V75= 0;
+	V76= 0;
+	V207= tp2((V74));
+	if(!((V207)==(0))){
+	goto T444;
+	}
+	goto T443;
+	
+	goto T444;
+T444:;
+	goto T441;
+	
+	goto T443;
+T443:;
+	{object V208;
+	V208= (V74)->c.c_car;
+	V74= (V74)->c.c_cdr;
+	V73= (V208);
+	goto T440;
+	}
+	goto T441;
+T441:;
+	{object V211;
+	V211= (V74);
+	V74= Cnil;
+	V73= (V211);}
+	goto T440;
+T440:;
+	register object  V213;
+	object V212[31];
+	#define V214 V212[0]
+	
+	{
+	V213= (fcall.fun=((object)VV[6])->s.s_gfdef,fcall.valp=(fixnum)V212,fcall.argd=1,/* SYSTEM::PACKAGE-SIZE */(*LnkLI7)((V73)));
+	
+	for (vs_top=vs_top<V212? V212: vs_top;vs_top<V212+1;) *vs_top++=Cnil;
+	vs_top=sup;
+	V78= fix((V213));
+	V77= fix((V214));
+	#undef V214
+	
+	}
+	goto T154;
+	
+	goto T432;
+T432:;
+	if(((V71))==Cnil){
+	goto T461;
+	}
+	V217= tp2((V71));
+	if(!((V217)==(0))){
+	goto T470;
+	}
+	goto T469;
+	
+	goto T470;
+T470:;
+	goto T467;
+	
+	goto T469;
+T469:;
+	{object V218;
+	V218= (V71)->c.c_car;
+	V71= (V71)->c.c_cdr;
+	V215= (V218);
+	goto T466;
+	}
+	goto T467;
+T467:;
+	{object V221;
+	V221= (V71);
+	V71= Cnil;
+	V215= (V221);}
+	goto T466;
+T466:;
+	V72= (/* SYSTEM::COERCE-TO-PACKAGE */(*LnkLI3)((V215)));
+	V222= (fcall.fun=((object)VV[3])->s.s_gfdef,fcall.valp=(fixnum)0,fcall.argd=1,/* COMMON-LISP::PACKAGE-USE-LIST */(*LnkLI5)((V72)));
+	V74= make_cons((V72),(V222));
+	goto T154;
+	
+	goto T461;
+T461:;
+	V86= Cnil;
+	goto T152;
+	
+	goto T152;
+T152:;
+	V223= V86->c.c_car;
+	V84= ({object  _t0=(V86);object  _t1=(V223);object  _t2=(V80);object  _t3=(V72);
+	V85= (_t1);
+	(void)((_t2));
+	(void)((_t3));_t0;});
+	
+	vs_top=sup;}
+	V81= (V84);
+	V82= (V85);
+	if(((V81))==Cnil){
+	goto T146;
+	}
+	#undef V85
+	
+	}
+	goto T144;
+	
+	goto T146;
+T146:;
+	goto T141;
+	
+	goto T144;
+T144:;
+	{fixnum V225;
+	V225= ((fixnum)V82);
+	V224= ((object*)V225)[(fixnum)6];}
+	if(!(((V3))==((V224)))){
+	goto T491;
+	}
+	goto T490;
+	
+	goto T491;
+T491:;
+	{register object V226;
+	{fixnum V227;
+	V227= ((fixnum)V82);
+	V226= ((object*)V227)[(fixnum)6];}
+	{object V228;
+	if(((V6))==Cnil){
+	goto T499;
+	}
+	V228= (V6);
+	goto T498;
+	
+	goto T499;
+T499:;
+	V228= Cnil;
+	goto T498;
+T498:;
+	{register fixnum V229;
+	register object V230;
+	V229= 0;
+	V230= (V228);
+	goto T505;
+T505:;
+	if(!((V229)>=((fixnum)268435455))){
+	goto T511;
+	}
+	goto T510;
+	
+	goto T511;
+T511:;
+	if(((V230))==Cnil){
+	goto T514;
+	}
+	goto T509;
+	
+	goto T514;
+T514:;
+	goto T510;
+T510:;
+	goto T507;
+	
+	goto T509;
+T509:;
+	{object V232;
+	V232= (V230)->c.c_car;
+	if(!(((V226))==((V232)))){
+	goto T521;
+	}
+	goto T520;
+	
+	goto T521;
+T521:;
+	goto T518;
+	
+	goto T520;
+T520:;
+	if(((V232))==Cnil){
+	goto T489;
+	}
+	goto T490;
+	
+	goto T518;
+T518:;}
+	{fixnum V234;
+	object V235;
+	V234= V229;
+	V235= (V230)->c.c_cdr;
+	V229= V234;
+	V230= (V235);
+	goto T505;
+	}
+	goto T507;
+T507:;
+	goto T489;
+	}}}
+	goto T490;
+T490:;
+	goto T486;
+	
+	goto T489;
+T489:;
+	V10= make_cons((V82),(V10));
+	goto T485;
+	
+	goto T486;
+T486:;
+	goto T485;
+T485:;
+	goto T139;
+	
+	goto T141;
+T141:;
+	goto T133;
+	}}
+	goto T133;
+T133:;
+	{object V238;
+	register object V239;
+	V238= Cnil;
+	V239= Cnil;
+	{register object V240;
+	V240= (V9);
+	goto T536;
+T536:;
+	if(((V240))==Cnil){
+	goto T538;
+	}
+	{register object V242;
+	V242= (V240)->c.c_car;
+	{object V243;
+	{register object V244;
+	V244= (V10);
+	goto T554;
+T554:;
+	if(((V244))==Cnil){
+	goto T556;
+	}
+	{object V246;
+	V246= (V244)->c.c_car;
+	if(!(eql((V242),(V246)))){
+	goto T566;
+	}
+	goto T565;
+	
+	goto T566;
+T566:;
+	goto T564;
+	
+	goto T565;
+T565:;
+	goto T562;
+	
+	goto T564;
+T564:;
+	goto T560;
+	}
+	goto T562;
+T562:;
+	goto T546;
+	
+	goto T560;
+T560:;
+	{object V247;
+	V247= (V244)->c.c_cdr;
+	V244= (V247);
+	goto T554;
+	}
+	goto T556;
+T556:;
+	goto T552;
+	}
+	goto T552;
+T552:;
+	if(((V10))==Cnil){
+	goto T550;
+	}
+	goto T547;
+	
+	goto T550;
+T550:;
+	goto T544;
+	
+	goto T547;
+T547:;
+	goto T544;
+	
+	goto T546;
+T546:;
+	V243= make_cons((V242),Cnil);
+	goto T543;
+	
+	goto T544;
+T544:;
+	V243= Cnil;
+	goto T543;
+T543:;
+	if(((V239))==Cnil){
+	goto T572;
+	}
+	(void)((((V239))->c.c_cdr=((V243)),((V239))));
+	goto T571;
+	
+	goto T572;
+T572:;
+	V238= (V243);
+	goto T571;
+T571:;
+	if(((V243))==Cnil){
+	goto T579;
+	}
+	goto T578;
+	
+	goto T579;
+T579:;
+	goto T576;
+	
+	goto T578;
+T578:;
+	V239= (V243);
+	goto T541;
+	
+	goto T576;
+T576:;}}
+	goto T541;
+T541:;
+	{object V249;
+	V249= (V240)->c.c_cdr;
+	V240= (V249);
+	goto T536;
+	}
+	goto T538;
+T538:;
+	goto T534;
+	}
+	goto T534;
+T534:;
+	V11= (V238);}
+	{object V251;
+	register object V252;
+	V251= Cnil;
+	V252= Cnil;
+	{register object V253;
+	V253= (V9);
+	goto T591;
+T591:;
+	if(((V253))==Cnil){
+	goto T593;
+	}
+	{register object V255;
+	V255= (V253)->c.c_car;
+	{object V256;
+	{register object V257;
+	V257= (V11);
+	goto T611;
+T611:;
+	if(((V257))==Cnil){
+	goto T613;
+	}
+	{object V259;
+	V259= (V257)->c.c_car;
+	if(!(eql((V255),(V259)))){
+	goto T623;
+	}
+	goto T622;
+	
+	goto T623;
+T623:;
+	goto T621;
+	
+	goto T622;
+T622:;
+	goto T619;
+	
+	goto T621;
+T621:;
+	goto T617;
+	}
+	goto T619;
+T619:;
+	goto T603;
+	
+	goto T617;
+T617:;
+	{object V260;
+	V260= (V257)->c.c_cdr;
+	V257= (V260);
+	goto T611;
+	}
+	goto T613;
+T613:;
+	goto T609;
+	}
+	goto T609;
+T609:;
+	if(((V11))==Cnil){
+	goto T607;
+	}
+	goto T604;
+	
+	goto T607;
+T607:;
+	goto T602;
+	
+	goto T604;
+T604:;
+	goto T602;
+	
+	goto T603;
+T603:;
+	goto T599;
+	
+	goto T602;
+T602:;
+	V256= make_cons((V255),Cnil);
+	goto T598;
+	
+	goto T599;
+T599:;
+	V256= Cnil;
+	goto T598;
+T598:;
+	if(((V252))==Cnil){
+	goto T629;
+	}
+	(void)((((V252))->c.c_cdr=((V256)),((V252))));
+	goto T628;
+	
+	goto T629;
+T629:;
+	V251= (V256);
+	goto T628;
+T628:;
+	if(((V256))==Cnil){
+	goto T636;
+	}
+	goto T635;
+	
+	goto T636;
+T636:;
+	goto T633;
+	
+	goto T635;
+T635:;
+	V252= (V256);
+	goto T596;
+	
+	goto T633;
+T633:;}}
+	goto T596;
+T596:;
+	{object V262;
+	V262= (V253)->c.c_cdr;
+	V253= (V262);
+	goto T591;
+	}
+	goto T593;
+T593:;
+	goto T589;
+	}
+	goto T589;
+T589:;
+	V12= (V251);}
+	{object V265;
+	register object V266;
+	V265= Cnil;
+	V266= Cnil;
+	{register object V267;
+	V267= (V10);
+	goto T648;
+T648:;
+	if(((V267))==Cnil){
+	goto T650;
+	}
+	{register object V269;
+	V269= (V267)->c.c_car;
+	{object V270;
+	{register object V271;
+	V271= (V11);
+	goto T668;
+T668:;
+	if(((V271))==Cnil){
+	goto T670;
+	}
+	{object V273;
+	V273= (V271)->c.c_car;
+	if(!(eql((V269),(V273)))){
+	goto T680;
+	}
+	goto T679;
+	
+	goto T680;
+T680:;
+	goto T678;
+	
+	goto T679;
+T679:;
+	goto T676;
+	
+	goto T678;
+T678:;
+	goto T674;
+	}
+	goto T676;
+T676:;
+	goto T660;
+	
+	goto T674;
+T674:;
+	{object V274;
+	V274= (V271)->c.c_cdr;
+	V271= (V274);
+	goto T668;
+	}
+	goto T670;
+T670:;
+	goto T666;
+	}
+	goto T666;
+T666:;
+	if(((V11))==Cnil){
+	goto T664;
+	}
+	goto T661;
+	
+	goto T664;
+T664:;
+	goto T659;
+	
+	goto T661;
+T661:;
+	goto T659;
+	
+	goto T660;
+T660:;
+	goto T656;
+	
+	goto T659;
+T659:;
+	V270= make_cons((V269),Cnil);
+	goto T655;
+	
+	goto T656;
+T656:;
+	V270= Cnil;
+	goto T655;
+T655:;
+	if(((V266))==Cnil){
+	goto T686;
+	}
+	(void)((((V266))->c.c_cdr=((V270)),((V266))));
+	goto T685;
+	
+	goto T686;
+T686:;
+	V265= (V270);
+	goto T685;
+T685:;
+	if(((V270))==Cnil){
+	goto T693;
+	}
+	goto T692;
+	
+	goto T693;
+T693:;
+	goto T690;
+	
+	goto T692;
+T692:;
+	V266= (V270);
+	goto T653;
+	
+	goto T690;
+T690:;}}
+	goto T653;
+T653:;
+	{object V276;
+	V276= (V267)->c.c_cdr;
+	V267= (V276);
+	goto T648;
+	}
+	goto T650;
+T650:;
+	goto T646;
+	}
+	goto T646;
+T646:;
+	V13= (V265);}
+	{object V279;
+	object V280;
+	object V281;
+	object V282;
+	object V283;
+	object V284;
+	object V285;
+	if(((V5))==Cnil){
+	goto T702;
+	}
+	V279= make_cons(make_cons(((object)VV[13]),(V5)),Cnil);
+	goto T701;
+	
+	goto T702;
+T702:;
+	V279= Cnil;
+	goto T701;
+T701:;
+	if(((V7))==Cnil){
+	goto T706;
+	}
+	V280= make_cons(make_cons(((object)VV[14]),(V7)),Cnil);
+	goto T705;
+	
+	goto T706;
+T706:;
+	V280= Cnil;
+	goto T705;
+T705:;
+	if(((V8))==Cnil){
+	goto T710;
+	}
+	V281= make_cons(make_cons(((object)VV[15]),(V8)),Cnil);
+	goto T709;
+	
+	goto T710;
+T710:;
+	V281= Cnil;
+	goto T709;
+T709:;
+	if(((V12))==Cnil){
+	goto T714;
+	}
+	{object V287;
+	register object V288;
+	V287= Cnil;
+	V288= Cnil;
+	{object V289;
+	V289= V12->c.c_car;
+	{object V290;
+	{object V292;
+	V292= (V289);
+	V293= tp5(V289);
+	switch(V293){
+	case -2:
+	goto T733;
+T733:;
+	case 19:
+	goto T734;
+T734:;
+	goto T730;
+	
+	default:
+	goto T735;
+T735:;
+	goto T729;
+	}
+	goto T729;
+	
+	goto T730;
+T730:;
+	goto T728;
+	
+	goto T729;
+T729:;
+	goto T726;
+	
+	goto T728;
+T728:;
+	V292= (V289);
+	goto T725;
+	
+	goto T726;
+T726:;
+	V292= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI11)(((object)VV[17]),(V289),((object)VV[18]),Cnil));
+	goto T725;
+T725:;
+	{fixnum V294;
+	V294= ((fixnum)V292);
+	V291= ((object*)V294)[(fixnum)3];}}
+	V290= make_cons((V291),Cnil);
+	V287= (V290);
+	V288= (V287);}}
+	{register object V295;
+	V295= V12->c.c_cdr;
+	goto T743;
+T743:;
+	if(((V295))==Cnil){
+	goto T745;
+	}
+	{object V297;
+	V297= (V295)->c.c_car;
+	{object V298;
+	{object V300;
+	V300= (V297);
+	V301= tp5(V297);
+	switch(V301){
+	case -2:
+	goto T761;
+T761:;
+	case 19:
+	goto T762;
+T762:;
+	goto T758;
+	
+	default:
+	goto T763;
+T763:;
+	goto T757;
+	}
+	goto T757;
+	
+	goto T758;
+T758:;
+	goto T756;
+	
+	goto T757;
+T757:;
+	goto T754;
+	
+	goto T756;
+T756:;
+	V300= (V297);
+	goto T753;
+	
+	goto T754;
+T754:;
+	V300= (fcall.argd=4,/* SYSTEM::CHECK-TYPE-SYMBOL */(*LnkLI11)(((object)VV[17]),(V297),((object)VV[18]),Cnil));
+	goto T753;
+T753:;
+	{fixnum V302;
+	V302= ((fixnum)V300);
+	V299= ((object*)V302)[(fixnum)3];}}
+	V298= make_cons((V299),Cnil);
+	if(((V288))==Cnil){
+	goto T768;
+	}
+	{object V303;
+	V303= (((V288))->c.c_cdr=((V298)),((V288)));
+	V288= V303->c.c_cdr;
+	goto T767;
+	}
+	goto T768;
+T768:;
+	V287= (V298);
+	V288= (V287);
+	goto T767;
+T767:;}}
+	{object V304;
+	V304= (V295)->c.c_cdr;
+	V295= (V304);
+	goto T743;
+	}
+	goto T745;
+T745:;
+	goto T719;
+	}
+	goto T719;
+T719:;
+	V286= (V287);}
+	V282= make_cons(make_cons(((object)VV[19]),(V286)),Cnil);
+	goto T713;
+	
+	goto T714;
+T714:;
+	V282= Cnil;
+	goto T713;
+T713:;
+	if(((V11))==Cnil){
+	goto T777;
+	}
+	{object V306;
+	register object V307;
+	V306= Cnil;
+	V307= Cnil;
+	{object V308;
+	V308= V11->c.c_car;
+	{object V309;
+	{object V312;
+	{fixnum V313;
+	V313= ((fixnum)V308);
+	V312= ((object*)V313)[(fixnum)6];}
+	{object V314;
+	V314= (/* SYSTEM::COERCE-TO-PACKAGE */(*LnkLI3)((V312)));
+	{fixnum V315;
+	V315= ((fixnum)V314);
+	V311= ((object*)V315)[(fixnum)1];}}}
+	{fixnum V317;
+	V317= ((fixnum)V308);
+	V316= ((object*)V317)[(fixnum)3];}
+	V310= make_cons(list(3,((object)VV[20]),(V311),(V316)),Cnil);
+	V309= make_cons((V310),Cnil);
+	V306= (V309);
+	V307= (V306);}}
+	{register object V318;
+	V318= V11->c.c_cdr;
+	goto T797;
+T797:;
+	if(((V318))==Cnil){
+	goto T799;
+	}
+	{object V320;
+	V320= (V318)->c.c_car;
+	{object V321;
+	{object V324;
+	{fixnum V325;
+	V325= ((fixnum)V320);
+	V324= ((object*)V325)[(fixnum)6];}
+	{object V326;
+	V326= (/* SYSTEM::COERCE-TO-PACKAGE */(*LnkLI3)((V324)));
+	{fixnum V327;
+	V327= ((fixnum)V326);
+	V323= ((object*)V327)[(fixnum)1];}}}
+	{fixnum V329;
+	V329= ((fixnum)V320);
+	V328= ((object*)V329)[(fixnum)3];}
+	V322= make_cons(list(3,((object)VV[21]),(V323),(V328)),Cnil);
+	V321= make_cons((V322),Cnil);
+	if(((V307))==Cnil){
+	goto T814;
+	}
+	{object V330;
+	V330= (((V307))->c.c_cdr=((V321)),((V307)));
+	V307= V330->c.c_cdr;
+	goto T813;
+	}
+	goto T814;
+T814:;
+	V306= (V321);
+	V307= (V306);
+	goto T813;
+T813:;}}
+	{object V331;
+	V331= (V318)->c.c_cdr;
+	V318= (V331);
+	goto T797;
+	}
+	goto T799;
+T799:;
+	goto T781;
+	}
+	goto T781;
+T781:;
+	V283= (V306);
+	goto T776;
+	}
+	goto T777;
+T777:;
+	V283= Cnil;
+	goto T776;
+T776:;
+	if(((V13))==Cnil){
+	goto T823;
+	}
+	{object V333;
+	register object V334;
+	V333= Cnil;
+	V334= Cnil;
+	{object V335;
+	V335= V13->c.c_car;
+	{object V336;
+	{object V339;
+	{fixnum V340;
+	V340= ((fixnum)V335);
+	V339= ((object*)V340)[(fixnum)6];}
+	{object V341;
+	V341= (/* SYSTEM::COERCE-TO-PACKAGE */(*LnkLI3)((V339)));
+	{fixnum V342;
+	V342= ((fixnum)V341);
+	V338= ((object*)V342)[(fixnum)1];}}}
+	{fixnum V344;
+	V344= ((fixnum)V335);
+	V343= ((object*)V344)[(fixnum)3];}
+	V337= make_cons(list(3,((object)VV[22]),(V338),(V343)),Cnil);
+	V336= make_cons((V337),Cnil);
+	V333= (V336);
+	V334= (V333);}}
+	{register object V345;
+	V345= V13->c.c_cdr;
+	goto T843;
+T843:;
+	if(((V345))==Cnil){
+	goto T845;
+	}
+	{object V347;
+	V347= (V345)->c.c_car;
+	{object V348;
+	{object V351;
+	{fixnum V352;
+	V352= ((fixnum)V347);
+	V351= ((object*)V352)[(fixnum)6];}
+	{object V353;
+	V353= (/* SYSTEM::COERCE-TO-PACKAGE */(*LnkLI3)((V351)));
+	{fixnum V354;
+	V354= ((fixnum)V353);
+	V350= ((object*)V354)[(fixnum)1];}}}
+	{fixnum V356;
+	V356= ((fixnum)V347);
+	V355= ((object*)V356)[(fixnum)3];}
+	V349= make_cons(list(3,((object)VV[23]),(V350),(V355)),Cnil);
+	V348= make_cons((V349),Cnil);
+	if(((V334))==Cnil){
+	goto T860;
+	}
+	{object V357;
+	V357= (((V334))->c.c_cdr=((V348)),((V334)));
+	V334= V357->c.c_cdr;
+	goto T859;
+	}
+	goto T860;
+T860:;
+	V333= (V348);
+	V334= (V333);
+	goto T859;
+T859:;}}
+	{object V358;
+	V358= (V345)->c.c_cdr;
+	V345= (V358);
+	goto T843;
+	}
+	goto T845;
+T845:;
+	goto T827;
+	}
+	goto T827;
+T827:;
+	V284= (V333);
+	goto T822;
+	}
+	goto T823;
+T823:;
+	V284= Cnil;
+	goto T822;
+T822:;
+	V285= 
+	({object _b=OBJ_ALIGNED_STACK_ALLOC(6*sizeof(struct cons));
+	register struct cons *_p=(void *)_b;
+	_p->c_car=(V279);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V280);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V281);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V282);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V283);_p->c_cdr=(object)(_p+1);_p++;
+	_p->c_car=(V284);_p->c_cdr=(object)(_p+1);_p++;
+	_p[-1].c_cdr=Cnil;_b;});
+	{object V360;
+	register object V361;
+	V360= Cnil;
+	V361= Cnil;
+	if(((V279))==Cnil){
+	goto T873;
+	}
+	{object V362;
+	V362= V279->c.c_car;
+	{object V363;
+	V363= make_cons((V362),Cnil);
+	V360= (V363);
+	V361= (V360);}}
+	goto T872;
+	
+	goto T873;
+T873:;
+	goto T872;
+T872:;
+	if(((V280))==Cnil){
+	goto T883;
+	}
+	{object V364;
+	V364= V280->c.c_car;
+	{object V365;
+	V365= make_cons((V364),Cnil);
+	if(((V361))==Cnil){
+	goto T890;
+	}
+	(void)((((V361))->c.c_cdr=((V365)),((V361))));
+	V361= (V365);
+	goto T889;
+	
+	goto T890;
+T890:;
+	V360= (V365);
+	V361= (V360);
+	goto T889;
+T889:;}}
+	goto T882;
+	
+	goto T883;
+T883:;
+	goto T882;
+T882:;
+	if(((V281))==Cnil){
+	goto T897;
+	}
+	{object V366;
+	V366= V281->c.c_car;
+	{object V367;
+	V367= make_cons((V366),Cnil);
+	if(((V361))==Cnil){
+	goto T904;
+	}
+	(void)((((V361))->c.c_cdr=((V367)),((V361))));
+	V361= (V367);
+	goto T903;
+	
+	goto T904;
+T904:;
+	V360= (V367);
+	V361= (V360);
+	goto T903;
+T903:;}}
+	goto T896;
+	
+	goto T897;
+T897:;
+	goto T896;
+T896:;
+	if(((V282))==Cnil){
+	goto T911;
+	}
+	{object V368;
+	V368= V282->c.c_car;
+	{object V369;
+	V369= make_cons((V368),Cnil);
+	if(((V361))==Cnil){
+	goto T918;
+	}
+	(void)((((V361))->c.c_cdr=((V369)),((V361))));
+	V361= (V369);
+	goto T917;
+	
+	goto T918;
+T918:;
+	V360= (V369);
+	V361= (V360);
+	goto T917;
+T917:;}}
+	goto T910;
+	
+	goto T911;
+T911:;
+	goto T910;
+T910:;
+	{register object V370;
+	V370= (V283);
+	goto T926;
+T926:;
+	if(((V370))==Cnil){
+	goto T928;
+	}
+	{object V372;
+	V372= (V370)->c.c_car;
+	{object V373;
+	V373= make_cons((V372),Cnil);
+	if(((V361))==Cnil){
+	goto T935;
+	}
+	(void)((((V361))->c.c_cdr=((V373)),((V361))));
+	V361= (V373);
+	goto T934;
+	
+	goto T935;
+T935:;
+	V360= (V373);
+	V361= (V360);
+	goto T934;
+T934:;}}
+	{object V374;
+	V374= (V370)->c.c_cdr;
+	V370= (V374);
+	goto T926;
+	}
+	goto T928;
+T928:;
+	goto T924;
+	}
+	goto T924;
+T924:;
+	if(((V361))==Cnil){
+	goto T945;
+	}
+	(void)((((V361))->c.c_cdr=((V284)),((V361))));
+	V361= (V284);
+	goto T944;
+	
+	goto T945;
+T945:;
+	V360= (V284);
+	V361= (V360);
+	goto T944;
+T944:;
+	V278= (V360);}}
+	{object V376 = listA(3,((object)VV[24]),(V4),(V278));
+	VMR1(V376);}}}
+}
+static object  LnkTLI11(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[16]),0,262147,(void **)(void *)&LnkLI11,0,first,ap);va_end(ap);return V1;} /* SYSTEM::CHECK-TYPE-SYMBOL */
+static fixnum  LnkTLI10(object first,...){fixnum V1;va_list ap;va_start(ap,first);V1=(fixnum )call_proc_new(((object)VV[9]),1,1,(void **)(void *)&LnkLI10,1,first,ap);va_end(ap);return V1;} /* SYSTEM::PACKAGE-EXTERNAL_SIZE */
+static fixnum  LnkTLI9(object first,...){fixnum V1;va_list ap;va_start(ap,first);V1=(fixnum )call_proc_new(((object)VV[8]),1,1,(void **)(void *)&LnkLI9,1,first,ap);va_end(ap);return V1;} /* SYSTEM::PACKAGE-INTERNAL_SIZE */
+static fixnum  LnkTLI8(object first,...){fixnum V1;va_list ap;va_start(ap,first);V1=(fixnum )call_proc_new(((object)VV[7]),1,1,(void **)(void *)&LnkLI8,1,first,ap);va_end(ap);return V1;} /* SYSTEM::PACK-HASH */
+static object  LnkTLI7(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[6]),1,520192,(void **)(void *)&LnkLI7,0,first,ap);va_end(ap);return V1;} /* SYSTEM::PACKAGE-SIZE */
+static object  LnkTLI6(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[4]),1,520192,(void **)(void *)&LnkLI6,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::PACKAGE-SHADOWING-SYMBOLS */
+static object  LnkTLI5(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[3]),1,520192,(void **)(void *)&LnkLI5,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::PACKAGE-USE-LIST */
+static object  LnkTLI4(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[2]),1,520192,(void **)(void *)&LnkLI4,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::PACKAGE-NICKNAMES */
+static object  LnkTLI3(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[1]),0,1,(void **)(void *)&LnkLI3,0,first,ap);va_end(ap);return V1;} /* SYSTEM::COERCE-TO-PACKAGE */
+static object  LnkTLI2(object first,...){object V1;va_list ap;va_start(ap,first);V1=(object )call_proc_new(((object)VV[0]),1,1,(void **)(void *)&LnkLI2,0,first,ap);va_end(ap);return V1;} /* COMMON-LISP::FIND-PACKAGE */
+	
+	#ifdef SYSTEM_SPECIAL_INIT
+	SYSTEM_SPECIAL_INIT
+	#endif
--- /dev/null
+++ gcl27-2.7.0/mod/gcl_make_defpackage.h
@@ -0,0 +1,34 @@
+
+static object LI1__MAKE_DEFPACKAGE_FORM__make_defpackage(object V2)
+;
+#define VMB1  object  V355 ,V350 ,V349 ,V343 ,V338 ,V337 ,V328 ,V323 ,V322 ,V316 ,V311 ,V310;  fixnum  V301;  object  V299;  fixnum  V293;  object  V291 ,V286 ,V278 ,V224 ,V223 ,V222;  int8_t  V217;  object  V215;  int8_t  V207;  int8_t  V169;  fixnum  V168;  int8_t  V161;  fixnum  V160;  fixnum  V150;  int8_t  V122;  fixnum  V121;  int8_t  V114;  fixnum  V113;  fixnum  V103;  object  V68;  int8_t  V63;  object  V61;  int8_t  V53;  object  V22;
+#define VMS1 register object *sup=vs_top+0;vs_top=sup;
+#define VMV1
+#define VMRV1(a_,b_) return(a_);
+#define VMR1(a_) VMRV1(a_,0);
+#define VM1 0
+static void * VVi[26]={
+#define Cdata VV[25]
+(void *)(LI1__MAKE_DEFPACKAGE_FORM__make_defpackage)
+};
+#define VV (VVi)
+static object  LnkTLI11(object,...);
+static object  (*LnkLI11)() = (object (*)()) LnkTLI11;
+static fixnum  LnkTLI10(object,...);
+static fixnum  (*LnkLI10)() = (fixnum (*)()) LnkTLI10;
+static fixnum  LnkTLI9(object,...);
+static fixnum  (*LnkLI9)() = (fixnum (*)()) LnkTLI9;
+static fixnum  LnkTLI8(object,...);
+static fixnum  (*LnkLI8)() = (fixnum (*)()) LnkTLI8;
+static object  LnkTLI7(object,...);
+static object  (*LnkLI7)() = (object (*)()) LnkTLI7;
+static object  LnkTLI6(object,...);
+static object  (*LnkLI6)() = (object (*)()) LnkTLI6;
+static object  LnkTLI5(object,...);
+static object  (*LnkLI5)() = (object (*)()) LnkTLI5;
+static object  LnkTLI4(object,...);
+static object  (*LnkLI4)() = (object (*)()) LnkTLI4;
+static object  LnkTLI3(object,...);
+static object  (*LnkLI3)() = (object (*)()) LnkTLI3;
+static object  LnkTLI2(object,...);
+static object  (*LnkLI2)() = (object (*)()) LnkTLI2;
--- gcl27-2.7.0.orig/o/alloc.c
+++ gcl27-2.7.0/o/alloc.c
@@ -1199,6 +1199,15 @@ gcl_init_alloc(void *cs_start) {
 
   fixnum cssize=(1L<<23);
 
+#ifdef GCL_GPROF
+  if (raw_image) {
+    sigset_t prof;
+    sigemptyset(&prof);
+    sigaddset(&prof,SIGPROF);
+    sigprocmask(SIG_BLOCK,&prof,NULL);
+  }
+#endif
+
   prelink_init();
   
 #ifdef RECREATE_HEAP
--- gcl27-2.7.0.orig/o/gprof.c
+++ gcl27-2.7.0/o/gprof.c
@@ -87,12 +87,6 @@ DEFUN("GPROF-ADDRESSES",object,fSgprof_a
 
 }
 
-DEFUN("KCL-SELF",object,fSkcl_self,SI,0,0,NONE,OO,OO,OO,OO,(void),"") {
-
-  return make_simple_string(kcl_self);
-
-}
-
 DEFUN("PTABLE-ALLOC-LENGTH",object,fSptable_alloc_length,SI,0,0,NONE,OO,OO,OO,OO,(void),"") {
   return make_fixnum(c_table.alloc_length);
 }
--- gcl27-2.7.0.orig/o/main.c
+++ gcl27-2.7.0/o/main.c
@@ -370,7 +370,9 @@ minimize_image(void) {
   nrbpage=0;
   resize_hole(0,t_relocatable,0);
 
+#ifdef USE_GPROF
   gprof_cleanup();
+#endif
   
 #if defined(BSD) || defined(ATT)  
   mbrk(core_end=heap_end);
@@ -473,7 +475,9 @@ gcl_cleanup(int gc) {
   {extern void _cleanup(void);_cleanup();}
 #endif
 
+#ifdef USE_GPROF
   gprof_cleanup();
+#endif
 
   if (gc) {
 
@@ -559,6 +563,12 @@ which(const char *n,char *o) {
 
 #endif
 
+DEFUN("KCL-SELF",object,fSkcl_self,SI,0,0,NONE,OO,OO,OO,OO,(void),"") {
+
+  return make_simple_string(kcl_self);
+
+}
+
 int
 main(int argc, char **argv, char **envp) {
 
@@ -593,14 +603,6 @@ main(int argc, char **argv, char **envp)
 
   if (raw_image) {
 
-#ifdef GCL_GPROF
-    sigset_t prof;
-    int r;
-    sigemptyset(&prof);
-    sigaddset(&prof,SIGPROF);
-    sigprocmask(SIG_BLOCK,&prof,NULL);
-#endif
-
     printf("GCL (GNU Common Lisp)  %s  %ld pages\n",LISP_IMPLEMENTATION_VERSION,real_maxpage);
     fflush(stdout);
     
--- gcl27-2.7.0.orig/o/makefile
+++ gcl27-2.7.0/o/makefile
@@ -38,7 +38,13 @@ boot.o: boot.c $(DECL) boot.h #FIXME cle
 	$(CC) -c $(CFLAGS) $(DEFS) -fPIC $*.c $(AUX_INFO) 
 
 gprof.o: gprof.c $(DECL)
-	$(CC) -c $(filter-out -fomit-frame-pointer,$(CFLAGS)) $(DEFS) -pg $*.c $(AUX_INFO)
+	[ "$(GPROF)" = "" ] || $(CC) -c $(filter-out -fomit-frame-pointer,$(CFLAGS)) $(DEFS) -pg $*.c $(AUX_INFO)
+	[ "$(GPROF)" != "" ] || (touch foo.c ;$(CC) -c foo.c $(CFLAGS) $(DEFS) $(AUX_INFO) -o $@; rm foo.c)
+
+gprof.ini: gprof.c grab_defs
+	[ "$(GPROF)" = "" ] || $(CC) -DINICOMP -DNO_DEFUN $(CFLAGS) $(DEFS) -E $*.c |\
+		 sed -e 's,DEFUNB(\([^)]*\)),\nDEFUNB(\1),g' -e 's/DEF,//g' -e 's:\"[ ]*):\"):g' | ./grab_defs > $@
+	touch $@
 
 prelink.o: prelink.c $(DECL)
 	$(CC) -c $(filter-out -pg,$(CFLAGS)) -fPIE $(DEFS) $*.c $(AUX_INFO)
@@ -78,7 +84,7 @@ boot.h: boot.ini
 	rm $*.c
 
 $(DPP):	../bin/dpp.c
-	${CC} ${DEFS} -o $@ $<
+	${CC} $(CFLAGS) $(LDFLAGS) ${DEFS} -o $@ $<
 
 new_init.c: ${INI_FILES}
 	echo '#include "make-init.h"' > $@
--- gcl27-2.7.0.orig/o/num_comp.c
+++ gcl27-2.7.0/o/num_comp.c
@@ -55,23 +55,9 @@ number_compare(object x, object y) {
 
     case t_fixnum:
 
-      if (is_imm_fixnum(x)) {
-
-	if (is_imm_fixnum(y))
-	  return fix(x)<fix(y) ? -1 : (fix(x)==fix(y) ? 0 : 1);
-	else
-	  return fix(y)<0 ? 1 : -1;
-
-      } else {
-
-	if (is_imm_fixnum(y))
-	  return fix(x)<0 ? -1 : 1;
-	else {
-	  fixnum fx=fix(x),fy=fix(y);
-	  return fx<fy ? -1 : (fx==fy ? 0 : 1);
-
-	}
-
+      {
+	fixnum fx=fix(x),fy=fix(y);
+	return fx<fy ? -1 : (fx==fy ? 0 : 1);
       }
 
     case t_bignum:
--- gcl27-2.7.0.orig/o/print.d
+++ gcl27-2.7.0/o/print.d
@@ -1682,33 +1682,35 @@ write_object(object x,int level) {
 		break;
 
 	case t_structure:
-	  object y=structure_to_list(x);
-	  if (PRINTcircle)
-	    if (write_sharp_eq(x,FALSE)==DONE) return;
-	  if (y->c.c_cdr==Cnil) {/*FIXME: Where is this specified?*/
-	    write_str("#S(");
-	    print_symbol_name_body(y->c.c_car->s.s_name,1);
-	    write_ch(')');
+	  {
+	    object y=structure_to_list(x);
+	    if (PRINTcircle)
+	      if (write_sharp_eq(x,FALSE)==DONE) return;
+	    if (y->c.c_cdr==Cnil) {/*FIXME: Where is this specified?*/
+	      write_str("#S(");
+	      print_symbol_name_body(y->c.c_car->s.s_name,1);
+	      write_ch(')');
+	      break;
+	    }
+	    if (PRINTlevel >= 0 && level >= PRINTlevel) {
+	      write_ch('#');
+	      break;
+	    }
+	    if (type_of(x->str.str_def) != t_structure)
+	      FEwrong_type_argument(sLstructure, x->str.str_def);
+	    if (S_DATA(x->str.str_def)->print_function != Cnil) {
+	      call_structure_print_function(x, level);
+	      break;
+	    }
+	    if (PRINTstructure) {
+	      write_str("#S");
+	      vs_push(MMcons(sSstructure_list,y));/*FIXME alloc etc.*/
+	      write_object(y, level);
+	      vs_popp;
+	      break;
+	    }
 	    break;
 	  }
-	  if (PRINTlevel >= 0 && level >= PRINTlevel) {
-	    write_ch('#');
-	    break;
-	  }
-	  if (type_of(x->str.str_def) != t_structure)
-	    FEwrong_type_argument(sLstructure, x->str.str_def);
-	  if (S_DATA(x->str.str_def)->print_function != Cnil) {
-	    call_structure_print_function(x, level);
-	    break;
-	  }
-	  if (PRINTstructure) {
-	    write_str("#S");
-	    vs_push(MMcons(sSstructure_list,y));/*FIXME alloc etc.*/
-	    write_object(y, level);
-	    vs_popp;
-	    break;
-	  }
-	  break;
 
 	case t_readtable:
 	        write_unreadable_str(x,"#<readtable ");
--- gcl27-2.7.0.orig/o/sockets.c
+++ gcl27-2.7.0/o/sockets.c
@@ -433,6 +433,7 @@ fill pointer, and this will be advanced.
     if (x->s.s_hpack == keyword_package)
       {if (code == normal)
 	 PUSH('-');}
+    x=x->s.s_name;
   case t_simple_string:/*FIXME?*/
   case t_string:
     {int len = VLEN(x);
--- gcl27-2.7.0.orig/o/unixsys.c
+++ gcl27-2.7.0/o/unixsys.c
@@ -24,6 +24,7 @@ Foundation, 675 Mass Ave, Cambridge, MA
 #include <string.h>
 #include <sys/stat.h>
 #include <sys/types.h>
+#include <spawn.h>
 #ifndef __MINGW32__
 #include <sys/wait.h>
 #endif
@@ -32,6 +33,7 @@ Foundation, 675 Mass Ave, Cambridge, MA
 
 #if !defined(__MINGW32__) && !defined(__CYGWIN__)
 
+
 int
 vsystem(const char *command) {
 
@@ -40,6 +42,9 @@ vsystem(const char *command) {
   const char *x1[]={"/bin/sh","-c",NULL,NULL},*spc=" \n\t",**p1,**pp;
   int s;
   pid_t pid;
+  posix_spawnattr_t attr;
+  posix_spawn_file_actions_t file_actions;
+  extern char **environ;
 
   if (strpbrk(command,"\"'$<>"))
 
@@ -58,11 +63,13 @@ vsystem(const char *command) {
 
   }
 
-  if (!(pid=pvfork())) {
-    errno=0;
-    execvp(*p1,(void *)p1);
-    _exit(128|(errno&0x7f));
-  }
+  massert(!posix_spawn_file_actions_init(&file_actions));
+  massert(!posix_spawnattr_init(&attr));
+
+  massert(!posix_spawnp(&pid, *p1, &file_actions, &attr,  (void *)p1, environ));
+
+  massert(!posix_spawnattr_destroy(&attr));
+  massert(!posix_spawn_file_actions_destroy(&file_actions));
 
   massert(pid>0);
   massert(pid==waitpid(pid,&s,0));
--- gcl27-2.7.0.orig/o/usig.c
+++ gcl27-2.7.0/o/usig.c
@@ -232,8 +232,12 @@ sigfpe3(int sig,siginfo_t *i,void *v) {
 #endif
   ifuncall3(sSfloating_point_error,FPE_CODE(i,v),FPE_ADDR(i,v),FPE_CTXT(v));
 
+#ifdef FPE_SET_CTXT_ADDR
   FPE_SET_CTXT_ADDR(v,FPE_ADDR(i,v));
+#endif
+#ifdef FPE_CLR_CTXT_CWD
   FPE_CLR_CTXT_CWD(v);
+#endif
 
 }
 
--- gcl27-2.7.0.orig/unixport/init_raw.lsp.in
+++ gcl27-2.7.0/unixport/init_raw.lsp.in
@@ -42,7 +42,7 @@
 	 (apply 'make-function-plist
 		(list (mapcar 'cmp-norm-tp (get s 'proclaimed-arg-types))
 		      (cmp-norm-tp (get s 'proclaimed-return-type)))
-		(or (cdr (c-function-plist fun)) (list nil nil nil nil s))))))
+		(or (cdr (c-function-plist fun)) (list nil nil nil 1 s))))));FIXME props
     (dolist (l '(proclaimed-function proclaimed-arg-types proclaimed-return-type))
       (remprop s l))))
 
@@ -79,6 +79,7 @@
 (setq *gcl-extra-version* @LI-EXTVERS@
       *gcl-minor-version* @LI-MINVERS@ 
       *gcl-major-version* @LI-MAJVERS@
+      *gcl-git-tag* @LI-GITTAG@
       *gcl-release-date*  "@LI-RELEASE@")
 
 (defvar *system-banner* (default-system-banner))
--- gcl27-2.7.0.orig/unixport/makefile
+++ gcl27-2.7.0/unixport/makefile
@@ -68,7 +68,7 @@ $(LSPDIR)/auto_new.lsp: $(LSPDIR)/auto.l
 		echo "(AUTOLOAD 'init-readline '|readline|)" >>$@
 
 libboot.so: ../o/boot.o
-	$(CC) -shared -Wl,-undefined -Wl,dynamic_lookup $< -o $@
+	$(CC) $(CFLAGS) -shared -Wl,-undefined -Wl,dynamic_lookup $< -o $@
 
 init_raw.lsp: init_raw.lsp.in
 
@@ -77,6 +77,7 @@ init_raw.lsp: init_raw.lsp.in
 		-e "s#@LI-EXTVERS@#`cat ../minvers | cut -f2 -d.`#1" \
 		-e "s#@LI-MINVERS@#`cat ../minvers | cut -f1 -d.`#1" \
 		-e "s#@LI-MAJVERS@#`cat ../majvers`#1" \
+		-e "s#@LI-GITTAG@#`cat ../git.tag`#1" \
 		-e "s#@LI-RELEASE@#`cat ../release`#1" \
 		-e "s#@LI-CC@#\"$(GCL_CC) -c $(filter-out -pg,$(FINAL_CFLAGS))\"#1" \
 		-e "s#@LI-DFP@#\"$(filter -pg,$(FINAL_CFLAGS))\"#1" \
